--------------------CODE STARTS HERE--------------------
;;===================================================CODE By Rajiv Mishra=================================================
[#Line: EI ColumnOne]
Add: Option: Disc EI ColumnOne: @@IsSales
Add: Option: Disc EI ColumnOne: @@IsPurchase
[!Line: Disc EI ColumnOne]
Local: Field: VCH DiscTitle: Set as: "Disc Amt"
Local: Field: Default : Style : Normal Bold
[#Line: VCHBATCH ColumnOne]
Add: Option: Disc EI ColumnName: @@IsSales
Add: Option: Disc EI ColumnName: @@IsPurchase
[!Line: Disc EI ColumnName]
Local: Field: VCH DiscTitle: Info: "Disc Amt"
[#Field: MPSDiscountTitle]
Set as: "Discount Amt"
[System: Formula]
CalcedAmt: ($Rate * $BilledQty) - $BatchDiscount
NrmlAmount: ($BilledQty * $Rate) - $BatchDiscount
[# Field: EXPINV DiscTitle]
Info : $$LocaleString:"Disc."
Border : Thin Left
Align : Centre
Width : 5
Style : Small
Invisible : If (@@IsJobOrderOut OR @@IsJobOrderIn OR (@@IsSales And (@@AcctsInvoice OR @@AcctsInvoiceMfgr))) Then Yes Else (NOT @@WithDiscount OR (NOT @@InvWithRate AND NOT @@InvWithAmt))
[#Field: VCH Discount]
Delete: Format
Add: Format: "Nopercent,NoZero"
[#Field: VCHBATCH Discount]
Delete: Format
Add: Format: "Nopercent,NoZero"
[#Field: VCH Value]
Resetval: if (@@NoBaseUnits OR $$IsEmpty:BilledQty) then $$Value else (($Rate * $BilledQty) - $Discount)
[#Field: EXPINV Discount]
Use : Number Field
Align : Right
Style : Small
Set as : $Discount
Width : 5
Border : Thin Left
Format : "NoZero,NoPercentage"
Invisible : If (@@IsJobOrderOut OR @@IsJobOrderIn OR (@@IsSales And (@@AcctsInvoice OR @@AcctsInvoiceMfgr))) Then Yes Else (NOT @@WithDiscount OR (NOT @@InvWithRate AND NOT @@InvWithAmt))
------------------Code Ended Here----------
.jpg)
कोई टिप्पणी नहीं:
एक टिप्पणी भेजें