Тема: IF THEN ELSE
Показать сообщение отдельно
Старый 23.10.2013, 16:22   #1  
srg is offline
srg
Участник
 
116 / 10 (1) +
Регистрация: 20.08.2013
Уважаемые форумчане, помогите.
Выгружаю в цыкле строки, делаю условие if then else, Для выгрузки сумм с + в поле б, с суммой -, в поле г, но оно почему-то выгружает лишь ноли, и все время в одну строку, хотя в строках суммы и с плюсом и минусом ???WTF??
Код:
i:=18;
VendorLEDENTRY.RESET;
VendorLEDENTRY.SETRANGE(VendorLEDENTRY."Vendor No.",VendorCode);
VendorLEDENTRY.SETFILTER("Posting Date",'<=%1&>=%2',OnDate,DateAE);
IF VendorLEDENTRY.FINDSET THEN
      REPEAT
      ExcelMgt.FillCell('B'+FORMAT(i),FORMAT(VendorLEDENTRY."Posting Date"));
      ExcelMgt.FillCell('C'+FORMAT(i),FORMAT(VendorLEDENTRY.Description));
      IF VendorLEDENTRY."Original Amount"<0 THEN
            ExcelMgt.FillCell('F'+FORMAT(i),FORMAT(VendorLEDENTRY.Amount))
            ELSE
                 ExcelMgt.FillCell('G'+FORMAT(i),FORMAT(VendorLEDENTRY.Amount));
 i+=1;
UNTIL VendorLEDENTRY.NEXT=0;