Cheque Number Duplicate Alert

Discussion in 'Free Source Codes' started by Ch Suresh, Oct 11, 2023.

    
  1. Ch Suresh

    Ch Suresh Member


    Dear Experts, Greetings of the day..!
    Today I am writing a code to control duplication of cheques. For this, I wrote a separate field on the sales entry screen with the name Cheque No: for this field, I need a Duplicate alert control message
    and also this field is needed to fetch in the Bank Reconciliation report.Here i am attaching my code here
    Please guide me


    [#Part: DBLLINE Narration]
    Add:Option:CHS NARRATION:mad:@IsPayment
    [!Part:CHS NARRATION]
    Add:Line:Before:VCH NarrPrompt:CHS CHIQUENO

    [Line:CHS CHIQUENO]
    Field:Simple Field, CHSCHEQUENO
    Local:Field:Simple Field:Set as:"CHEQUE NO"
    Local:Field:Simple Field:Skip:Yes

    [Field:CHSCHEQUENO]
    Use:Name Field
    Set as:$$Value
    Storage:CHSCHEQUENO
    Unique:Yes


    [System:UDF]
    CHSCHEQUENO:String:1994


    ;;;;;;;; BAnk Reconciliation report;;;;;;;;;;
    [#Line: EBanking Recon Summary Title]
    Add:Field:After: EBanking Summary ChqNo:ChsChequeNumber
    Local:Field:ChsChequeNumber:Set as:$$LocaleString:"Cheque No."
    [#Line: EBank Recon Vouchers]
    Add:Field:After: EBanking Summary ChqNo:ChsChequeNumber
    ; Local : Field : EBanking Summary ChqNo :Delete : Set as : If NOT ##AutoBRSUpdateBankDate AND NOT $$IsEmpty:$BankersDateTemp Then $TransactionChequeNo Else If ##AutoBRSUpdateChqNum Then If NOT $$IsEmpty:mad:@AutoBRSMT490InstNum Then @@AutoBRSMT490InstNum Else $TransactionChequeNo Else $TransactionChequeNo
    ; Local : Field : EBanking Summary ChqNo :Set as:$"Suresh"
    [Field:ChsChequeNumber]
    Use:Name Field
    Set as:$CHSCHEQUENO
    Set always:Yes
    Skip:Yes


    [#Collection:EBank Recon Vouchers]
    Fetch:CHSCHEQUENO
     


  2. Ch Suresh

    Ch Suresh Member


    Dear experts, Please guide me....

    I tried and got the solution for the Cheque Number Duplicate control, But I need to fetch that cheque number in the bank reconciliation report

    ;;;;;;;; Bank Reconciliation report;;;;;;;;;;
    [#Line: EBanking Recon Summary Title]
    Add:Field:After: EBanking Summary ChqNo:ChsChequeNumber
    Local:Field:ChsChequeNumber:Set as:$$LocaleString:"Cheque No."

    [#Line: EBank Recon Vouchers]
    Add:Field:After: EBanking Summary ChqNo:ChsChequeNumber


    [Field:ChsChequeNumber]
    Use:Name Field
    Set as:$CHSCHEQUENO
    Set always:Yes
    Skip:Yes


    [#Collection:EBank Recon Vouc
     


Share This Page