Тема: IF THEN ELSE
Показать сообщение отдельно
Старый 23.10.2013, 16:53   #7  
Captain is offline
Captain
Участник
Лучший по профессии 2017
 
300 / 81 (3) ++++
Регистрация: 28.02.2003
Цитата:
Сообщение от Fierce Посмотреть сообщение
Уважаемые форумчане, помогите.
Выгружаю в цыкле строки, делаю условие 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;
Поле Amount имеет тип FlowField.Перед проверкой условия сделайте вызов
Код:
VendorLEDENTRY.CALCFIELDS(Amount);
__________________
---------------------------------------------------------------------------------------------
"Собрать стадо из баранов легко, трудно собрать стадо из кошек" Профессор Сергей Капица