|
|
#1 |
|
Участник
|
Как-то не совпадает размерность полей..
Я понимаю, что это "наследие прошлого". Но все равно исправлять то нужно помоему? |
|
|
|
|
#2 |
|
Участник
|
А где эта функциональность использовать можно. Не подскажите?
|
|
|
|
|
#3 |
|
Участник
|
|
|
|
|
|
#4 |
|
Moderator
|
Цитата:
report 12456 - создает книгу продаж (это один из обязательных российских отчетов по НДС).... только, кажется, он к этим полям он не имеет прямого отношения.... Во всяком случае я связи не нашла. |
|
|
|
|
#5 |
|
Участник
|
Цитата:
Код: DataItemVarName=PrepmtVATEntry;
OnPreDataItem=VAR
Customer@1210001 : Record 18;
Delimiter@1210000 : Code[1];
BEGIN
IF NOT ShowVendPrepmt THEN
CurrReport.BREAK;
SETRANGE("Posting Date",VATLedgerName."Start Date",VATLedgerName."End Date");
IF CustFilter <> '' THEN BEGIN
Delimiter := '';
Customer.RESET;
Customer.SETFILTER("No.",CustFilter);
IF Customer.FIND('-') THEN
REPEAT
IF Customer."Vendor No." <> '' THEN BEGIN
VendFilter := VendFilter + Delimiter + Customer."Vendor No.";
Delimiter := '|';
END;
UNTIL Customer.NEXT = 0;
SETFILTER("Bill-to/Pay-to No.",VendFilter);
END;Код: DataItemVarName=PurchReturnVATEntry;
OnPreDataItem=VAR
Customer@1001 : Record 18;
Delimiter@1000 : Code[1];
BEGIN
SETRANGE("Posting Date",VATLedgerName."Start Date",VATLedgerName."End Date");
IF CustFilter <> '' THEN
BEGIN
Delimiter := '';
Customer.RESET;
Customer.SETFILTER("No.",CustFilter);
IF Customer.FIND('-') THEN
REPEAT
IF Customer."Vendor No." <> '' THEN BEGIN
VendFilter := VendFilter + Delimiter + Customer."Vendor No.";
Delimiter := '|';
END;
UNTIL Customer.NEXT = 0;
SETFILTER("Bill-to/Pay-to No.",VendFilter);
END;P.S. А теперь введите 40 знаков в Имени Поставщика, выберите код в Клиенте. А затем покрутите роликом по этой форме... |
|
|