|
![]() |
#1 |
Участник
|
Цитата:
Сообщение от Kadawrik
![]() Цитата:
У Unit Price: AutoFormatType = 2, AutoFormatExpr = Currency Code У Brutto/netto: 0 и <> DecimalPlaces у обоих <Undefined> В табличной форме, которая открывается при просмотре ордера эти Properties соответственно: 0, <>, 2:2 Версия Нава: 5.0 SP 1 В конторе, где я работаю, очень много чего в программе доделано/переделано (слишком уж специфики у них своей много) |
|
![]() |
#2 |
Участник
|
Цитата:
Код: T37_BruttoNettoBerechnung(VAR prc_T37 : Record "Sales Line") WITH prc_T37 DO BEGIN IF lrc_SalesHeader.GET("Document Type","Document No.") THEN BEGIN IF lrc_SalesHeader."Prices Including VAT" THEN BEGIN "Brutto/Netto-Preis" := "Unit Price" / (1 + "VAT %" / 100); END ELSE BEGIN "Brutto/Netto-Preis" := "Unit Price" * (1 + "VAT %" / 100); END; END; END; |
|