Billing Invoice

Problem 1):
The total result of the bill's money with the previous money is not being accurate.
2)Dr, Cr, is having problems in deducting the money received from the total money.

 

1)The first problem is that if the total sum of the invoice bill with the previous status is Cr, then the total amout is not correct.
;---- code---
[#Part: EXPSMP OpPageBreak]

Delete : Parts : EXPSMP Company, EXPSMP InvTitle, EXPSMP Columnm



[#Part: EXPSMP OpPageBreak]

Replace : Part : EXPSMP Party : peaceTop Part
Add : Part : After : peace Top Part : Mky Invoice, Mky Party and Invoice Date








[Line: Rcpt Words1]

Fields : Short Prompt, Rcpt Words1
Local : Field : Short Prompt : Info : "The sum of Amount "
SpaceBottom : 1

[Field: Rcpt Words1]

Set as : $$InWords:#EXPINVTotal+" Only"

Style : Normal Bold
Lines : 0
FullWidth : Yes


;..

[#Form: Simple Printed Invoice]

Option : sayfata Bottom : $$IsSales:##SVVoucherType

[!Form : sayfata Bottom]

Add : BottomParts : After : EXPSMP Totals : InvBottom


[Part : InvBottom]
;Left Parts : jsj1 ;Right
Right Parts : Ngnx, ;jsj2
;Border : Thin box
;width : 34% page
;Border : Thin center

[part : Ngnx]
lines : Ngnx1, Ngnx5, Ngnx4, Ngnx3, Ngnx6 ;Ngnx2,Ngnx,
width : 34% page
Border : Thin Right

[line : dha]

Field : TallyLng, FirstTallym, dha

[Field : TallyLng]

Use : Short Name Field
Set as : "."
Style : Normal

[Field : FirstTallym]

Use : Simple Field
Set as : " = "
Style : Normal

[Field : dha]

Use : Name Field
Set as : $dha
Align : Right

[line : dob]
Field : TallyLng, FirstTallym, dob

Local : Field : TallyLng : Set as : "."

[Field : dob]

Use : Name Field
Set as : $$String:$dob
Align : Right



[line : dddmn]
Field : TallyLng, FirstTallym, dddmn

Local : Field : TallyLng : Set as : ""

[Field : dddmn]

Use : Name Field
Set as : $dddmn
Align : Right


[line : moyNB]
Field : TallyLng, FirstTallym, moyNB

Local : Field : TallyLng : Set as : "."

[Field : moyNB]

Use : Name Field
Set as : $moynb
Align : Right

[line : moyNB1]
Field : TallyLng, FirstTallym, moyNB1

Local : Field : TallyLng : Set as : "."

[Field : moyNB1]

Use : Name Field
Set as : $moynb1
Align : Right

[line : moyNBu]
Field : TallyLng, FirstTallym, moyNBu

Local : Field : TallyLng : Set as : "."

[Field : moyNBu]

Use : Name Field
Set as : $$String:$moynbu
Align : Right



[line : Ngnx1]
Field : TallyLng, FirstTallym, Ngnx1

Local : Field : TallyLng : Set as : "Previous Balance "

[Field:Ngnx1]


Use:Amount Field
Set as: @PreBalAmt
Format:"Symbol,DrCr"
Invisible: Not ##InvBalPrint
PreBalAmt: If ($$IsDr:$$ToValue:$Date:$ClosingBalance:Ledger:$$CollectionField:$LedgerName:1:LedgerEntries) +
Then($$ToValue:$Date:$ClosingBalance:Ledger:$$CollectionField:$LedgerName:1:LedgerEntries) - $$abs:#EXPINVTotal else +
($$ToValue:$Date:$ClosingBalance:Ledger:$$CollectionField:$LedgerName:1:LedgerEntries) + $$abs:#EXPINVTotal

/*

[Field : Ngnx1]
Use : Amount Forex Field
Set as : $DPM
Align : Right
*/

[line : Ngnx2]
Field : TallyLng, FirstTallym, Ngnx2

Local : Field : TallyLng : Set as : ""

[Field : Ngnx2]

Use : Amount Forex Field
Set as : (-1) * $DPMN
Align : Right


[line : Ngnx3]
Field : TallyLng, FirstTallym, Ngnx3

Local : Field : TallyLng : Set as : "Receipt Amount"

[Field : Ngnx3]
Use : Amount Forex Field
Format:"Symbol,DrCr"
Set as : (-1) * $DPMO
Align : Right


[line : Ngnx4]
Field : TallyLng, FirstTallym, Ngnx4

Local : Field : TallyLng : Set as : "Total Amount"

[Field : Ngnx4]

Use : Amount Forex Field
Format:"Symbol,DrCr"
Set as : #Ngnx1 + #Ngnx5
Align : Right
Border : Thin box

[line : Ngnx5]
Field : TallyLng, FirstTallym, Ngnx5

Local : Field : TallyLng : Set as : "Discount Sales Inv Amount"

[Field : Ngnx5]

Use : Amount Forex Field
Format:"Symbol,Dr"
Invisible : NOT ##EXPINVTotal
Set as :#EXPINVTotal ;;: $$abs
Align : Right


[line : Ngnx6]
Field : TallyLng, FirstTallym, Ngnx6

Local : Field : TallyLng : Set as : "Current Balance"

[Field : Ngnx6]

Use : Amount Forex Field
Format:"Symbol,DrCr"
Set as : #Ngnx1 + #Ngnx3 + #Ngnx5
Align : Right
Border : Thin Top
Border : Thin box


[line : PPy]
Field : TallyLng, FirstTallym, PPy

Local : Field : TallyLng : Set as : "."

[Field : PPy]

Use : Amount Forex Field
Set as : "0.00"
Align : Right


[line : PPJ]
Field : TallyLng, FirstTallym, PPJ

Local : Field : TallyLng : Set as : "."

[Field : PPJ]

Use : Amount Forex Field
Set as :#EXPINVTotal - #PPX
;;Border : Thin Bottomt


[line : PPX]
Field : TallyLng, FirstTallym, PPX

Local : Field : TallyLng : Set as : "."

[Field : PPX]

Use : Amount Forex Field
Set as : $$abs:#EXPINVTotal ;$$Total:EXPINVAccAmount * (-1)

;;------009876-----
[#Part: DBLLINE Narration]

Option : Cheque No : $$IsSales:##SVVoucherType OR $$IsDelNote:##SVVoucherType

[!Part :Cheque No]
Add : Lines :Before : VCH NarrPrompt :Billing Statas


[Line : Billing Statas]

Fields : Medium Prompt, Billing Statas
Local : Field : Medium Prompt : Info : "BIlling Invoice Create"
Local : Field : Medium Prompt : Style : Normal

[Field: Billing Statas]

Use : Logical Field
Storage : IsBillingStatas
SubForm : Billing Statas : $$Value



[Report : Billing Statas]

Form : Billing Statas

[Form : Billing Statas]

Part : EnvBottom

[Part : EnvBottom]
;Left Parts : PPR ;Right
Left Part : PPR1

[part : PPR]

;Option : PPRS : $$IsSales:##SVVoucherType
Option : PPRD : $$IsDelNote:##SVVoucherType


[!Part : PPRs]
;lines : NAS,; NAHJ1, NASP, NASP2, NASP1, NAHJ
;width : 50% page

[!Part : PPRd]
;lines : RMPD
width : 60% page

[part : PPR1]

Option : PPR1S : $$IsSales:##SVVoucherType
Option : PPR1D : $$IsDelNote:##SVVoucherType

[!Part : PPR1s]
lines : DPMO, ;DPMP, DPMQ, DPMR ;, DPMN, DPM,
width : 25% page

[!Part : PPR1d]
lines : RMPT
width : 25% page


[line : NAS]

Field : ParentT, FirstTallyodB, NAS

[Field : ParentT]

Use : Short Name Field
Set as : "."
Style : Normal
Skip : Yes

[Field : FirstTallyodB]

Use : Simple Field
Set as : " = "
Style : Normal
Skip : Yes

[Field : NAS]

Use : Name Field
Storage : NAS
Align : Right




[line : NAHJ1]
Field : ParentT, FirstTallyodB, NAHJ1

Local : Field : ParentT : Set as : "."

[Field : NAHJ1]

Use : Uni Date Field
Storage : NAHJ1
Align : Right


[line : NASP]
Field : ParentT, FirstTallyodB, NASP

Local : Field : ParentT : Set as : "."

[Field : NASP]

Use : Name Field
Storage : NASP
Align : Right


[line : NASP2]
Field : ParentT, FirstTallyodB, NASP2

Local : Field : ParentT : Set as : "."

[Field : NASP2]

Use : Name Field
Storage : NASP2
Align : Right

[line : NASP1]
Field : ParentT, FirstTallyodB, NASP1

Local : Field : ParentT : Set as :"."

[Field : NASP1]
Use : Name Field
Storage : NASP1
Align : Right


[line : NAHJ]
Field : ParentT, FirstTallyodB, NAHJ

Local : Field : ParentT : Set as : "."

[Field : NAHJ]

Use : Uni Date Field
Storage : NAHJ
Align : Right

[line : RMPD]
Field : ParentT, FirstTallyodB, RMPD

Local : Field : ParentT : Set as : "."

[Field : RMPD]
Use : Name Field
Storage : RMPD
Align : Right



[System : UDF]

NAS:String:3001
NASP:String:3002
NASP2:String:3003
NASP1:String:3004
;RMPD:String:3005
NAHJate:3005
NAHJ1ate:3006
IsBillingStatas:Logical:1001



[line : DPM]
Field : ParentT, FirstTallyodB, DPM

Local : Field : ParentT : Set as : "Previous Balance"

[Field : DPM]

Use : Amount Forex Field
Storage : DPM
Align : Right


[line : DPMN]
Field : ParentT, FirstTallyodB, DPMN

Local : Field : ParentT : Set as : "."

[Field : DPMN]

Use : Amount Forex Field
Storage : DPMN
Align : Right


[line : DPMO]
Field : ParentT, FirstTallyodB, DPMO

Local : Field : ParentT : Set as : "Receipt Amount"

[Field : DPMO]

Use : Amount Forex Field
Format:"Symbol,DrCr"
Invisible : NOT ##EXPINVTotal
;Invisible : NOT ##IsLedgerReport
Storage : DPMO
Align : Right


[line : DPMP]
Field : ParentT, FirstTallyodB, DPMP

Local : Field : ParentT : Set as : "."

[Field : DPMP]

Use : Amount Forex Field
Storage : DPMP
Align : Right



[line : DPMQ]
Field : ParentT, FirstTallyodB, DPMQ

Local : Field : ParentT : Set as : "."

[Field : DPMQ]

Use : Amount Forex Field
Storage : DPMQ
Align : Right



[line : DPMR]
Field : ParentT, FirstTallyodB, DPMR

Local : Field : ParentT : Set as : "."

[Field : DPMR]

Use : Amount Forex Field
Storage : DPMR
Align : Right

[line : RMPT]
Field : ParentT, FirstTallyodB, RMPT

Local : Field : ParentT : Set as : "."

[Field : RMPT]
Use : Name Field
Storage : RMPT
Align : Right



[System : UDF]

DPM:Amount:3001
;DPMN:Amount:3002
DPMO:Amount:3003
DPMP:Amount:3004
DPMQ:Amount:3005
DPMR:Amount:3006
;RMPT:String:3007

 

[line : Ngnx4]
Field : TallyLng, FirstTallym, Ngnx4

Local : Field : TallyLng : Set as : "Total Amount"

[Field : Ngnx4]

Use : Amount Forex Field
Format:"Symbol,DrCr"
Set as : #Ngnx1 + #Ngnx5 ;;(Set as Problem this line condition )
Align : Right
Border : Thin box

 

Sir
I'm trying but can't work the total amount. So is it possible to cooperate ? Thanks

 

(Previous Balance + Discount Sales Inv. Amount) = Total Amount
Solve this Plz.

 

Finally done. I am requesting to improve more from this.

 

Can you share tdl code for last 5 transactions
As i am in need of it