Print Drug Lic no On Invoice, Need Help for correction in Printing

Discussion in 'Free Source Codes' started by Rajsrisrimal, Dec 30, 2016.

    
  1. Rajsrisrimal

    Rajsrisrimal Member


    Sir,
    I altered TDL to mention and Drug Lic No. (DL No. ) in normal Invoice, but I need help that its not on right place in invoice. Here I like to Thanks Rajan Pillai sir for providing supporting code.




    ;;Following Code is to print "DL No" on Invoices
    ;;;---
    [#Part: CMP Tax Info]

    Add : Line : At End : CMP DLNNoTL

    [Line: CMP DLNNoTL]

    Right Field : Medium Prompt
    Local : Field : Medium Prompt : Set as : "Drug Lic No. :"
    Option : Small Size Line
    Space Top : 0.4

    [#Part: CMP Tax Value]

    Add : Line : At End : CMP DLNNoVAL

    [Line: CMP DLNNoVAL]

    Field : Name Field
    Local : Field : Name Field : Storage : CMPDLNNoVAL
    Local : Field : Name Field : Full width : Yes
    Local : Field : Name Field : Max : 200
    Local : Field : Name Field : Line : 2
    Option : Small Size Line
    Space Top : 0.4


    [#Part: LED Other Details]

    Add : Lines : At End : LED DLNo

    [Line: LED DLNo]

    Fields : Medium Prompt, LED DLNo
    Local : Field : Medium Prompt : Set as : $$LocaleString:"Drug Lic. No :"
    Invisible : NOT @@IsIndian



    [Field: LED DLNo]

    Use : Name Field
    Storage : LEDDLNo
    Full width : YEs
    Line : 2
    Max : 200

    [#Part:EXPINV VATDetails]
    Add : Lines : AT END : SalesHCmpDLicno,SalesBuyerDLIC

    Line: SalesHCmpDLicno

    [Line: SalesHCmpDLicno]

    Space Top : 0.05
    Field : Short Prompt,Name Field
    Local : Field : Short Prompt : Set As : "Our DL No:"
    Local : Field : Name Field : Set As : $CMPDLNNoVAL:Company:##SVCurrentCompany
    Local : Field : Name Field : Full width : Yes
    Local : Field : Name Field : Style : Normal

    [System: UDF]

    CMPDLNNoVAL : String : 21110
    LEDDLNo : String : 21111


    [Line: SalesBuyerDLIC]

    Field : Short Prompt ,Name Field
    Local : Field : Short Prompt: Set As : "Party DL No:"
    Local : Field : Name Field : Set As : $LEDDLNo:Ledger:$PartyLedgerName
    Local : Field : Name Field : Full width : Yes
    Local : Field : Name Field : Style : Normal
     

    Attached Files:



  2. nsrao-Vijayawada

    nsrao-Vijayawada New Member


    Kindly check with this modification


    ;;Following Code is to print "DL No" on Invoices
    ;;;---
    [#Part: CMP Tax Info]

    Add : Line : At End : CMP DLNNoTL

    [Line: CMP DLNNoTL]

    Right Field : Medium Prompt
    Local : Field : Medium Prompt : Set as : "Drug Lic No. :"
    Option : Small Size Line
    Space Top : 0.4

    [#Part: CMP Tax Value]

    Add : Line : At End : CMP DLNNoVAL

    [Line: CMP DLNNoVAL]

    Field : Name Field
    Local : Field : Name Field : Storage : CMPDLNNoVAL
    Local : Field : Name Field : Full width : Yes
    Local : Field : Name Field : Max : 200
    Local : Field : Name Field : Line : 2
    Option : Small Size Line
    Space Top : 0.4


    [#Part: LED Other Details]

    Add : Lines : At End : LED DLNo

    [Line: LED DLNo]

    Fields : Medium Prompt, LED DLNo
    Local : Field : Medium Prompt : Set as : $$LocaleString:"Drug Lic. No :"
    Invisible : NOT @@IsIndian



    [Field: LED DLNo]

    Use : Name Field
    Storage : LEDDLNo
    Full width : YEs
    Line : 2
    Max : 200

    [#Part: EXPINV SaleSalesTax]
    ;;[#Part:EXPINV VATDetails]
    Add : Lines : AT END : SalesHCmpDLicno,SalesBuyerDLIC

    Line: SalesHCmpDLicno

    [Line: SalesHCmpDLicno]

    Space Top : 0.05
    Field : Short Prompt,Name Field
    Local : Field : Short Prompt : Set As : "Our DL No:"
    Local : Field : Name Field : Set As : $CMPDLNNoVAL:Company:##SVCurrentCompany
    Local : Field : Name Field : Full width : Yes
    Local : Field : Name Field : Style : Normal

    [System: UDF]

    CMPDLNNoVAL : String : 21110
    LEDDLNo : String : 21111


    [Line: SalesBuyerDLIC]

    Field : Short Prompt ,Name Field
    Local : Field : Short Prompt: Set As : "Party DL No:"
    Local : Field : Name Field : Set As : $LEDDLNo:Ledger:$PartyLedgerName
    Local : Field : Name Field : Full width : Yes
    Local : Field : Name Field : Style : Normal
     
    Rajsrisrimal likes this.


  3. Rajsrisrimal

    Rajsrisrimal Member


    Thank You NS Rao Sir,
    Its working superb , Once again thanks for helping.
     


Share This Page