Хорошо быть beta-тестером....

[RedFox]

Цитата:

Сообщение от gala

report 12456 - создает книгу продаж (это один из обязательных российских отчетов по НДС).... только, кажется, он к этим полям он не имеет прямого отношения.... Во всяком случае я связи не нашла.

Немного по коду:

		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 знаков в Имени Поставщика, выберите код в Клиенте. А затем покрутите роликом по этой форме...