Enjoy...... ( I Seen Many Time This Issue While Changing Salary Entries Amount) Works For "Entries Having Only Two Ledgers." like:- ledger1 dr 1000.00 ledger2 cr 1000.00 [#Form: Ledger Vouchers] Add: Button: InputNewVchjayamt1 [#Form: Day Book] Add: Button: InputNewVchjayamt1 [Button: InputNewVchjayamt1] Title: "Set Fix Vch Amt" Key: CTRL+F7 Action List : InputVchjayamt1, ModifyVchjayamt 1 [Button: InputVchjayamt1] Key:CTRL+F7 Action: Alter: Rpt InputVchjayamt1 [Button: ModifyVchjayamt1] Key: CTRL+F7 Action: Call : FuncEdit4 [Function: FuncEdit4] Variable : MSTID : String 100 : WALK COLLECTION : SELjayVouchers4 120 : SET : MSTID : "ID:"+ $$String:$MasterID 130 : NEW OBJECT : Voucher : ##MSTID 140 : SET TARGET : LedgerEntries[1] 160 : SET VALUE : Amount : #NvVchjayamt 170 : SET TARGET : .. 172 : SET TARGET : LedgerEntries[2] 175 : SET VALUE : Amount : #NvVchjayamt 177 : SET TARGET : .. 180 : SET TARGET : .. 190 : ACCEPT ALTER 200 : END WALK [Collection: SELjayVouchers4] Data Source : Report : Selected Fetch : All Ledger Entries [Report: Rpt InputVchjayamt1] Title : "Set Vch Amount" Form : Input Vchjayamt1 Auto : Yes [Form: Input Vchjayamt1] Part : Input Vchjayamt1 Width: 25% Screen Height: 8% Screen [Part: Input Vchjayamt1] Line: New Vchjayamt1 [Line: New Vchjayamt1] Field : Long Prompt , Newvchjayamt Local : Field: Long Prompt : Set As: "New Vch Amount" [Field : Newvchjayamt] Use : Short Name Field Modifies : NvVchjayamt Border : Thin Box Width : 15 [System : Variable] Nvvchjayamt : " " [Variable : NvVchjayamt] Type : Amount Persistent : Yes
if amount can be changed, why not the ledger name?? both amount and ledgername are in same sub-object level, i.e., ledger entries
pls check edited code reference sir jay kumar [#Form: Ledger Vouchers] Add: Button: InputNewVchjayamt1 [#Form: Day Book] Add: Button: InputNewVchjayamt1 [Button: InputNewVchjayamt1] Title: "Set Fix Vch Amt" Key: CTRL+F7 Action List : InputVchjayamt1, ModifyVchjayamt 1 [Button: InputVchjayamt1] Key:CTRL+F7 Action: Alter: Rpt InputVchjayamt1 [Button: ModifyVchjayamt1] Key: CTRL+F7 Action: Call : FuncEdit4 [Function: FuncEdit4] Variable : MSTID : String 100 : WALK COLLECTION : SELjayVouchers4 120 : SET : MSTID : "ID:"+ $$String:$MasterID 130 : NEW OBJECT : Voucher : ##MSTID 140 : SET TARGET : LedgerEntries[1] 161 : SET VALUE : LedgerName : #LedgerVariable 170 : SET TARGET : .. 172 : SET TARGET : LedgerEntries[2] 177 : SET VALUE : LedgerName : #LedgerVariable 177 : SET TARGET : .. 180 : SET TARGET : .. 190 : ACCEPT ALTER 200 : END WALK [Collection: SELjayVouchers4] Data Source : Report : Selected Fetch : All Ledger Entries [Report: Rpt InputVchjayamt1] Title : "Set Vch Amount" Form : Input Vchjayamt1 Auto : Yes [Form: Input Vchjayamt1] Part : Input Vchjayamt1 Width: 25% Screen Height: 8% Screen [Part: Input Vchjayamt1] Line: New Vchjayamt1 [Line: New Vchjayamt1] Field : Long Prompt , Newvchjayamt Local : Field: Long Prompt : Set As: "New Vch Ledger" [Field : Newvchjayamt] Use : Short Name Field Modifies : LedgerVariable Border : Thin Box Width : 15 [System : Variable] LedgerVariable : " " [Variable : LedgerVariable] Type : LedgerName Persistent : Yes
Try Like This....... [#Form: Ledger Vouchers] Add: Button: InputNewjayLed1 [#Form: Day Book] Add: Button: InputNewjayLed1 [Button: InputNewjayLed1] Title: "Change Ledger" Key: CTRL+F7 Action List : InputVchjayamt3, ModifyVchjayamt3 [Button: InputVchjayamt3] Key:CTRL+F7 Action: Alter: Rpt InputVchjayamt1 [Button: ModifyVchjayamt3] Key: CTRL+F7 Action: Call : FuncEdit4 [Function: FuncEdit4] Variable : MSTID : String 100 : WALK COLLECTION : SELjayVouchers4 120 : SET : MSTID : "ID:"+ $$String:$MasterID 130 : NEW OBJECT : Voucher : ##MSTID 140 : SET TARGET : LedgerEntries[1] 161 : SET VALUE : LedgerName : #LedgerVariable 170 : SET TARGET : .. ;172 : SET TARGET : LedgerEntries[2] ;177 : SET VALUE : LedgerName : #LedgerVariable ;178 : SET TARGET : .. 180 : SET TARGET : .. 190 : ACCEPT ALTER 200 : END WALK [Collection: SELjayVouchers4] Data Source : Report : Selected Fetch : All Ledger Entries [Report: Rpt InputVchjayamt1] Title : "Set Vch Amount" Form : Input Vchjayamt1 Auto : Yes [Form: Input Vchjayamt1] Part : Input Vchjayamt1 Width: 25% Screen Height: 8% Screen [Part: Input Vchjayamt1] Line: New Vchjayamt1 [Line: New Vchjayamt1] Field : Long Prompt , Newvchjayamt Local : Field: Long Prompt : Set As: "New Vch Ledger" [Field : Newvchjayamt] Use : Short Name Field Modifies : LedgerVariable Border : Thin Box Width : 15 Table: Ledger Show Table : Always [System : Variable] LedgerVariable : " " [Variable : LedgerVariable] Type : String Persistent : Yes
Dear joy kumar sir how to change bank ledger and how to change dr----10000 cr-----7000 cr-----2000 cr-----1000
Do not work for receipt posting change. Error message : FUNCTION: 'FuncEdit4' LABEL: 190 : Incorrect ledger selected in Bank Allocations screen
FUNCTION: 'FuncEdit5' LABEL: 190 : Voucher totals do not match! Dr: 25,000.00 Dr Cr: Diff: 25,000.00 Dr how to solve please guide me.
Error message : FUNCTION: 'FuncEdit4' LABEL: 190 : Incorrect ledger selected in Bank Allocations screen Please help