Credit & Debit

[saxena09]

Hi All,

m Himanshu Saxena from new delhi

i want to overwrite the value in text box as:-

DATE PartyId Dr Cr
01/04/08 ABC 500.00 0.00
05/05/08 ABC 0.00 200.00
15/05/08 ABC 0.00 500.00


Total Amount 500.00 700.00

Now in that case m create a Text box with Name Of "CH"
After that m create one Value Box with Name of "Total"

Now m do a coman in Total box =[DRSUM]-[CRSUM]

In thtat case i hv recd a entry as -200.00 in Total Box

now m create Private Sub As

Private Sub Report_CH(Cancel As String)
If([Total>0]) Then StrCpy "Ch,Credit"
Else
StrCpy "CH,Debit"
End If
End Sub

But this is not working in my Report in "CH" Text Box

Can any one please Help me in this matter ..................

[debasisdas]

Hi Himanshu

Welcome to Bytes.com (our new identity)

Feel free to post questions in the related forum only by choosing from under the blue bar on the top of your page.

Please follow the posting guidelines in every new post/reply.

Please specify your post/question clearly.

Regards
Debasis