Показать сообщение отдельно
Старый 18.04.2012, 11:53   #42  
ZoyaKom is offline
ZoyaKom
Участник
 
99 / 10 (1) +
Регистрация: 05.04.2012
Цитата:
Сообщение от InTacto Посмотреть сообщение
Цитата:
Сообщение от zoya210489 Посмотреть сообщение
В таблице Detailed Vendor Ledg. Entry, есть поля и поставщик, и учетная группа и договор может попробывать как нибудь на нее настроить фильтр??

Код:

DVLE.SETCURRENTKEY(DVLE."Vendor Posting Group",DVLE."Vendor No.",DVLE."Agreement No.");
IF DVLE.GET("Vendor Ledger Entry"."Vendor Posting Group") and DVLE.GET("Vendor Ledger Entry"."Vendor No.") THEN BEGIN
DVLE.SETRANGE(DVLE."Posting Date",StartDate,EndDate);
DVLE.CALCSUMS(DVLE."Debit Amount (LCY)",DVLE."Credit Amount (LCY)");
LineAmount1[3] := DVLE."Debit Amount (LCY)";
LineAmount1[4] := DVLE."Credit Amount (LCY)";
END;
Сорри, смотрел табличку 4 версии, там таких полей нет. В 5 есть. Это упрощает все.
Можно почти забыть про временную табличку, правда отсутствие счета может подпортить картину.
Вы так и не ответили что за смысл в этой строке
Код:
IF DVLE.GET("Vendor Ledger Entry"."Vendor Posting Group") and DVLE.GET("Vendor Ledger Entry"."Vendor No.") THEN BEGIN
для справки, GET возвращает запись по главному ключу, у DVLE это поле Entry No с типом Integer. Кроме цифорок для этой таблицы пихать в GET ничего нельзя, о чем и выводится ошибка.
Если вы хотите поставить фильтры, то используйте setrange или setfilter, что вы и делаете для даты, а вот для группы и договора делаете почему-то по другому.

Просто я написала код для счета поставщика (учетная группа):

IF GLA.GET("Vendor Ledger Entry"."Vendor Posting Group") THEN GL:=GLA.Name;
IF GLA.GET("Vendor Ledger Entry"."Vendor Posting Group") THEN BEGIN
GLA.SETRANGE("Date Filter",StartDate,EndDate);
GLA.CALCFIELDS(GLA."Debit Amount",GLA."Credit Amount");
LineAmount1[1] := GLA."Debit Amount";
LineAmount1[2] := GLA."Credit Amount";
END;

Где GLA - это Record G/L Account.
GL - это Text (100)
LineAmount1 - это Decimal.

У меня в отчете есть раздел groupheader в который я вывожу счета (по учетным группам поставщиков).
В этом разделе я разместила 4 textbox: 1)"Vendor Ledger Entry"."Vendor Posting Group"; 2)GL (выводит наименования счета) 3)LineAmount1[1] (выводит сумму по дебету для конкретного счета) 4) LineAmount1[2] (выводит сумму по кредиту для конкретного счета).

И у меня это получилось правильно вывести, вот я и подумала по аналогии сделать с поставщиками.

Я думала что функция GET позволит вычислить значание дебета и кредита для нужной комбинации свое.