Показать сообщение отдельно
Старый 02.09.2004, 10:36   #4  
Prof is offline
Prof
Участник
 
732 / 64 (4) ++++
Регистрация: 18.10.2002
Адрес: Москва
Суперпростенький код - импорт банковских счетов из файла

PHP код:
static void importBankAccounts(Args _args)
{
    
FileName    fileName 'c:\\work\\data\\accounts';
    
ASCIIIO     io = new ASCIIIO(fileNAme'R');
    
//CommaIO     io = new CommaIO(fileNAme, 'R');
    
str         s;
    
container   con;
    
EmplTable   emplTAble;
    
EmplBankAccount_RU  bankAccount;
    ;
    
io.outFieldDelimiter(';');
    
io.inFieldDelimiter(';');
    
io.outRecordDelimiter(';');
    if (
io)
    {
        
ttsbegin;

        while (
io.status() == IO_Status::Ok)
        {
            
con io.read();
            
emplTAble EmplTable::findByName(conpeek(con,1));
            if (
emplTable)
            {
                
select bankAccount where bankAccount.EmplAccount == emplTable.EmplId
                    
&& bankAccount.BankGroupId == 'МСЭБ';

                
bankAccount.AccountNum conpeek(con2);
                if (!
bankAccount)
                {
                    
bankAccount.AccountID 'МСЭБ_' emplTAble.EmplId;
                    
bankAccount.EmplAccount emplTable.EmplId;
                    
bankAccount.BankGroupId 'МСЭБ';
                    
bankAccount.insert();
                }
                else
                {
                    
bankAccount.update();
                }
            }
            else 
info(conpeek(con,1));
        }
        
ttscommit;
    }