Few lines are missing here.
Pls Watch the full video first.
[#Form: Ledger Vouchers]
Add: Button: InputNewVchRajivamt1
[#Form: Day Book]
Add: Button: InputNewVchRajivamt1
[Button: InputNewVchRajivamt1]
Title: "Set Fix Vch Amt"
Key: CTRL+F7
Action List : InputVchRajivamt1, ModifyVchRajivamt 1
[Button: InputVchRajivamt1]
Key:CTRL+F7
Action: Alter: Rpt InputVchRajivamt1
[Button: ModifyVchRajivamt1]
Key: CTRL+F7
Action: Call : FuncEdit4
[Function: FuncEdit4]
Variable : MSTID : String
100 : WALK COLLECTION : SELRajivVouchers4
120 : SET : MSTID : "ID:"+ $$String:$MasterID
130 : NEW OBJECT : Voucher : ##MSTID
140 : SET TARGET : LedgerEntries[1]
160 : SET VALUE : Amount : #NvVchRajivamt
170 : SET TARGET : ..
172 : SET TARGET : LedgerEntries[2]
175 : SET VALUE : Amount : #NvVchRajivamt
177 : SET TARGET : ..
180 : SET TARGET : ..
190 : ACCEPT ALTER
200 : END WALK
[Collection: SELRajivVouchers4]
Data Source : Report : Selected
Fetch : All Ledger Entries
[Report: Rpt InputVchRajivamt1]
Title : "Set Vch Amount"
Form : Input VchRajivamt1
Auto : Yes
[Form: Input VchRajivamt1]
Part : Input VchRajivamt1
Width: 25% Screen
Height: 8% Screen
[Part: Input VchRajivamt1]
Line: New VchRajivamt1
[Line: New VchRajivamt1]
Field : Long Prompt , NewvchRajivamt
Local : Field: Long Prompt : Set As: "New Vch Amount"
[Field : NewvchRajivamt]
Use : Short Name Field
Modifies : NvVchRajivamt
Border : Thin Box
Width : 15
[System : Variable]
NvvchRajivamt : " "
कोई टिप्पणी नहीं:
एक टिप्पणी भेजें