How to adjust same size in invoice (print preview & export) pdf format

Discussion in 'Free Source Codes' started by Jenny, Oct 26, 2018.

    
  1. Jenny

    Jenny Active Member


    Please Help me in this code "print preview and export size not same" .. how to set same size them..
    Code:
    ;;;;;;;;;;;;;;;;;;INVOICE START;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
    
    [#Form : Sales Color]
              Delete  : Print
              Add     : Print : nInvA
    
    [#Form : Credit Note Color]
              Delete  : Print
              Add     : Print : nInvA
             
    [Report :nInvA]
              Use   : Printed Invoice
              Delete: Form : Printed Invoice
              Form  : nInvA
    
            
    [Form:nInvA]
        Width       :  8.27  INCH
        Height      : 11.69 INCH
        Space Top: 0.50 INCH
        Space Bottom: 0.50 INCH
        Space Left: 0.50 INCH
        Space Right: 0.50 INCH
          
        Part: KA Opening Page Break, KA Invoice Body
        Bottom Part: nGSTanalisysBankdetailsledgerentries,KA Invoice Total, KA Goods Sold
        Page Break   : ClKA Page Break, KA Opening Page Break
      
    [Part:ClKA Page Break]
              Lines           : GIKA ClPgBrk
    
              [Line: GIKA ClPgBrk]
                       Fields          : Simple Field
                       Local: Field: Simple Field          : Set As       : "Continued..."
                       Local: Field: Simple Field          : FullWidth  : Yes
                       Local: Field: Simple Field          : Align                  : Right
                       Border                   : Full Thin Top
    
    [Part: KA Opening Page Break]
              Part: KA Invoice Title, KA CMP Details, KA Coloumn Titles
              Vertical: Yes
            
    [Part:KA Invoice Title]
              Line:KA Invoice Title
    
            
    [Line:KA Invoice Title]
              Field: Simple Field
              Right Field:Name Field
              Local: Field: Simple Field: Set as: if @@IsCreditNote then "Credit Note" else "QUOTATION"
              Local: Field: Simple Field: Style: Pramod CMP Name
              Local: Field: Simple Field: Space Left: 35
              Local: Field: Simple Field: Full Width: Yes
              Local: Field: Name Field: Set as:If @@GetCopyNum = 1 Then "" Else +
                                                                                   If @@GetCopyNum = 2 Then $$LocaleString:"DUPLICATE FOR SUPPLIER" Else +
                                                                             If @@GetCopyNum = 3 Then $$LocaleString:"TRIPLICATE FOR TRANSPOTER" Else +
                                                                             If @@GetCopyNum = 4 Then $$LocaleString:"EXTRA COPY" Else $
    
    $LocaleString:"EXTRA COPY"
    
    [Style: Pramod CMP Name]
    Font: BankGothic Md BT
    Height:20
    Bold: Yes
                                                                                 
    [Part:KA CMP Details]
      Left Part: DMICash CMP Name Details,KA Customer Details
      Border: Thick Cover
      Height: 45 mms
    
            [Part:DMICash CMP Name Details]
                      Line: KA CMP Name, KA CMP Address,KA Invoice No, KA Invoice Date, KA Invoice ShippedBy
                      Width: 59% Page
                      Border: Thick Right
                     
                    
                    [Line: KA CMP Name]
                              Field: KA CMP Name
                              Local: Field: KA CMP Name: Set as: @@CmpMailName
                              Local: Field: KA CMP Name: Style:Parth CMP Name Cash
                              Local: Field:KA CMP Name: Full Width: Yes
                              Local: Field:KA CMP Name: Print FG : Red
                    [Field: KA CMP Name]
                    Use : Name Field
                    Set as : ""
                   
    
                    [Style: Parth CMP Name Cash]
                              Font: Adobe Garamond Pro Bold
                              Height:15
                              Bold: Yes
                            
                    [Line:KA CMP Address]
                              Field: Name Field
                              Local: Field: Name Field: Set as: $$FullList:CompanyAddress:$Address
                              Local: Field: Name Field: Full Width: Yes
                              Local: Field: Name Field: Line:0
                           
                              Local: Field: Name Field: Border: Sub Column Titles
                              Space Bottom:0.50
    
    
                    [Line:KA Invoice No]
                              Field: Medium Prompt,Simple Field
                              Local: Field: Medium Prompt: Set as: if @@IsCreditNote then "Cr.Note No :"
    
    else "Quotation No :"
                           
                              Local: Field: Medium Prompt: Width: 15
                              Local: Field: Simple Field: Set as: $VoucherNumber
                              Local: Field: Simple Field: Style:Normal Bold
                              Local: Field: Simple Field: Full Width: Yes
                              Space Top:0.10
                              Space Bottom:0.25
                        
                    [Line:KA Invoice Date]
                              Field: Medium Prompt, Simple Field
                              Local: Field: Medium Prompt: Set as: "Date"
                               Local: Field: Simple Field: Style:Normal Bold
                              Local: Field: Medium Prompt: Width: 15
                              Local: Field: Simple Field: Set as: $Date
                             
                              Local: Field: Simple Field: Full Width: Yes
                              Space Bottom:0.25
                            
    
                    [Line:KA Invoice ShippedBy]
                              Field: Medium Prompt, Simple Field
                              Local: Field: Medium Prompt: Set as: "Rate Contract No :"
                              Local: Field: Medium Prompt: Style: Normal
                              Local: Field: Medium Prompt: Width: 15
                              Local: Field: Simple Field: Set as: "4700003300"
                              Local: Field: Simple Field: Style: Normal
                              Local: Field: Simple Field: Full Width: Yes
                              Local: Field: Simple Field: Style:Normal Bold
        
            [Part:KA Customer Details]
                      Line:KA Customer Details Title, KA Customer Name, KA Customer Address, KA Customer State
    
    Name, KA Customer GST No
                      Width: 41% Page
    
                   
                      Repeat:KACustomerAddress:PartyAddress
        
            [Line:KA Customer Details Title]
                      Field: Simple Field
                      Local: Field: Simple Field : Set as: "CUSTOMER DETAILS "
                      Local: Field: Default : Style : Normal Bold
                      Local: Field: Simple Field: Full Width: Yes
                      Space Top:0.25
                      Space Bottom:0.25
                    Local : Field : Simple Field  : Space Left:0.10
                       Local: Field: Simple Field: Border: Sub Column Titles
                        Local: Field: Default: Align: Center
                    Local: Field: Simple Field: Style:CMP Name Style
                    Local: Field:Simple Field: Print BG :Grey
    [Style: CMP Name Style]
    Font: Engravers MT
    Height:12
    Bold: Yes
    
    
    
            [Line:KA Customer Name]
                      Field: Simple Field
                      Local: Field: Simple Field: Set as: @@SimpleOtherPartyName
                      Local: Field: Default : Style : Normal Bold
                      Local: Field: Simple Field: Full Width: Yes
                      Space Top:0.25
                   
                    
            [Line:KA Customer Address]
                    
            Fields : KA Customer Address
            [Field: KA Customer Address]
            Use : Name Field
            Set as : $Address
            Full Width : Yes
            Style : Normal
            [Line:KA Customer State Name]
                      Field: Simple Field
                      Local: Field: Simple Field: Set as: "State Name"+"  :  "+ $LedStateName:Ledger:$LedgerName +" 
    
    "+ "Code :"+"  "+ $$getgststatecode:$LedStateName:Ledger:$LedgerName
                      Local: Field: Simple Field: Local Formula:StateName : If NOT ($$IsEmpty:$StateName OR $
    
    $IsSysName:NotApplicable:$StateName) Then $StateName Else $LedStateName:Ledger:@PartyName
                      Local: Field: Simple Field: Full Width: Yes
                      Local: Field: Simple Field: Style: Normal
                   
                    
            [Line:KA Customer GST No]
                      Field: Simple Field
                      Local: Field: Simple Field: Set as: "GSTIN No : " +"  "+ $PARTYGSTIN:Ledger:$LedgerName  +" 
    
    "+" PAN No :"+"  "+$IncomeTaxNumber:Ledger:$LedgerName
                      Local: Field: Simple Field: Full Width: Yes
                   
                    
           
    [Part:KA Coloumn Titles]
              Line:KA Invoice Body Title
    
              Border: Thick Cover
              Common Border: Yes
    
    [Part: KA Invoice Body]
              Part:KA Invoice Body Coloumns
              Vertical: Yes
              Border: Thin Cover
            
    [Part:KA Invoice Body Title]
              Line:KA Invoice Body Title
        Common Border: Yes
             
            
    [Line:KA Invoice Body Title]
              Use: KA Invoice Body Coloumns
              Local: Field: Default: Type: String
              Local: Field: Default : Lines : 2
              Local: Field: Default: Align: Center
            
              Local: Field:KA SrNo: Set as: "Sr No"
             
              Local: Field:KA Item Description: Set as: "Particulars"
       
       
              Local: Field: KA GST : Set as : "%"
       
              Local: Field:KA HSN:  Set as: "HSN"
                 
              Local: Field:KA Billed Qty:  Set as: "Qty"
           
              Local: Field: KA Rate: Set as: "Rate"
       
              Local: Field:KA Gross Amt: Set as: "Amount"
       
              Border: Thin Top
              Space Top: 0.25
    Local: Field: Default: Style:PMP Name Style
    [Style: PMP Name Style]
    Font: Cambria (Headings)
    Height:10
    Bold: Yes
    
            
    [Part:KA Invoice Body Coloumns]
              Line:KA Invoice Body Coloumns
    
              Repeat:KA Invoice Body Coloumns:Inventory Entries
             ; Bottom Line: KA Invoice Body Coloumns Total
              Scroll: Vertical
              Float: No
              Common Border: Yes
        Vertical : Yes
    
            
    [Line:KA Invoice Body Coloumns]
              Left Field: KA SrNo, KA Item Description,KA GST
              Right Field:KA HSN,KA Billed Qty, KA Rate, KA Gross Amt
              Space Top: 0.25
              Explode : Item Desc : $$NumItems:UserDescription > 0 ;;;$$NumItems is a used defned functions which can be
    ;;;used for counting purposes. It takes collection name as parameter
        Border: Thin Top
              Local: Field:KA SrNo: Width: 4
    
              Local: Field:KA Item Description: Width:52
               Local: Field: KA GST: Width: 2.5
               Local: Field:KA HSN: Width:8
              Local: Field:KA Billed Qty: Width: 9
              Local: Field: KA Rate: Width: 5
              Local: Field:KA Gross Amt: Width: 10
            
              Local: Field:KA SrNo: Border: Thin Right
        
              Local: Field:KA Billed Qty: Border: Thin Left
              Local: Field: KA Rate: Border: Thin Left
              Local: Field:KA Gross Amt: Border: Thin Left
    
    
    
    [Part: Item Desc]
    Lines : Item Desc
    Repeat : Item Desc : UserDescription
    
    [Line: Item Desc]
    Field:KA SrNo, KA Item Description
    Local:Field:KA SrNo:Set as:""
    Local:Field:KA Item Description:Info:$UserDescription
    Local : Field : Default : Style : Normal
    Local : Field : Default : Lines : 0
    
    
    [Field: Item Desc]
    Use : Name Field
    Width : 52
    Indent : 8
    Set as : $UserDescription
    Style : Normal
    Size : 4
    
    
         
    [Field: KA Sr NO]
              Use: Simple Field
              Set as: $$Line
              Format: "No Zero"
             Style : Normal Bold
              Align: Center
                  
    
    [Field:KA Item Description]
              Use: Simple Field
              Set as: $StockItemName
             Style : Normal Bold
    
    [Field: KA GST]
    Use : Name Field
    Set as : $GSTIGSTRate:StockItem:$StockItemName
    Format : "NoZero, Percentage"
    Border : Thin Left
    Align : Centre
    Width : 2.5
       
    
    [Field: KA HSN]
    Use : Name Field
    Set as : $GSTHSNCode:StockItem:$StockItemName
    Border : Thin Left
    Align : Centre
    Width : 8
    
    
    [Field:KA Billed Qty]
              Use: Qty Primary Field
              Set as: $BilledQty
              Width : 9
            
    [Field:KA Rate]
              Use:  Rate Price Field
              Set as: $Rate
             
          
    [Field:KA Gross Amt]
              Use:Amount Forex Field
              Set as: $Amount
    Width: 10        
    
    [Part:nGSTanalisysBankdetailsledgerentries]
        Left Part:VCH GST AnalysisDetails
        Border: Thick Cover
        Common Border:Yes
       
               
    [Part:KA Invoice Total]
              Right Part: KA Ledger Entries
              Left Part: KA Invoice Sing Off
              Border: Thick Box
            
    [Part:KA Ledger Entries]
              Line:nGrossTotal,KA Ledger Entries
              Repeat:KA Ledger Entries:Ledger Entries
              Float: No
              Common Border: Yes
              Bottom Line: KA Invoice Total
            
    [Style:nStyleGross]
        Font:"Calibri"
        Height:10
        Bold:Yes
    
    [Line:nGrossTotal]
              Field: nGrossTotalTitle, nGrossTotalAmt
              Border: thick Bottom
              Height:5 mms
    Local: Field: Default: Style:PPP Name Style
    [Style: PPP Name Style]
    Font: Cambria (Headings)
    Height:10
    Bold: Yes
    
    [Field:nGrossTotalTitle]
              Use: Simple Field
              Set as:"GROSS TOTAL"
             
              Width:20.7
              ;Border: Thick Bottom
            
    [Field:nGrossTotalAmt]
              Use: Amount Field
              Set as: $$CollAmtTotal:InventoryEntries:$Amount
              Style: nStyleGross
              Width:10
              Border: Thin Left
             
    [Line: KA Ledger Entries]
              Remove if    : $LedgerName = $PartyLedgerName
              Field: KA Ledger Name, KA Ledger Amount
              Space Top: 0.5
              Border: Thin Bottom
           
    [Field: KA Ledger Name]
              Use: Simple Field
              Set as: $LedgerName
             
              Width: 20.7
              Border: Thin Left
            
    [Field:KA Ledger Amount]
              Use: Amount Field
              Set as: $Amount
                     Width: 10
              Border: Thin Left
              Align: Right
    
    [Line:KA Invoice Total]
              Field: KA Invoice Total Title, KA Invoice Total Amt
              Space Bottom:0.25
    Local: Field: KA Invoice Total Title: Style:PP Name Style
    [Style: PP Name Style]
    Font: Cambria (Headings)
    Height:12
    Bold: Yes
    
             
    [Field:KA Invoice Total Title]
              Use: Simple Field
              Set as:"QUOTATION TOTAL"
              Width:20.7
            
    [Field:KA Invoice Total Amt]
              Use: Amount Field
              Set as: $Amount
              Style: Large Bold
              Width:10
              Border: Thin Left
    
    [Part:KA Invoice Sing Off]
              Part: KA Amount In Word and Declaration, KA Invoice Sing Off Part
              Vertical: Yes
            
    [Part:KA Amount In Word and Declaration]
              Line: KA Amount In Word
            
    [Line:KA Amount In Word]
              Field: Simple Field
              Local: Field: Simple Field: Set as: "AMOUNT IN WORDS :" +"  "+ $$InWords:$Amount
              Local: Field: Simple Field: Full Width: Yes
              Local : Field : Default : Style : Tiny Bold   
                     
              Local: Field: Simple Field: Line:0
            
    [Part:KA Invoice Sing Off Part]
              Left Part: nBankDetails
              Right Part: For KA
              Border: thick Top
    
        [Part:nBankDetails]
             Line:nInvBankNameLine
    
                  [Line: nInvBankNameLine]
                   
                        Fields      : Simple Field
                        Local       : Field : Simple Field     : Set as    :"NOTE :" +"  "+ $$String:$RemarkFld
          Local : Field : Default : Style : Tiny Bold               
                       
                         Local: Field: Simple Field: Full Width: Yes
                         Local: Field: Simple Field: Line:0
    
    [Line: nInvBranchLine]
                        Space Top:0.75
                        ;Space Bottom:0.25
                        Fields      : Medium Prompt,Name Field
                                                    
                        Local       : Field : Medium Prompt        : Width     :30 mms; 18% Page
                       
                       
                       
                        Local        : Field : Name Field    :Align:Left
                        Local       : Field : Name Field       : Width     :50 mms   
    
              
    [Part:For KA]
              Line: For KA,
              Bottom Line:KA Authorised Signatory
              Border: Thick Left
    
        
    [Line: For KA]
              Field: Simple Field
              Local: Field: Simple Field: Set as: " For " +" "+ @@CmpMailName
              Local: Field: Simple Field: Full Width: Yes
               Local: Field: Simple Field: Style:Normal Bold
              Local: Field: Simple Field: Align: Right
              Space Top: 0.50
             
    
    [Line:KA Authorised Signatory]
              Field: Simple Field
              Local: Field: Simple Field: Set as: "Authorized Signatory"
              Local: Field: Simple Field: Full Width: Yes
              Local: Field: Simple Field: Style:Normal Bold
              Local: Field: Simple Field: Align: Center
              Space Top:2
              Space Bottom:1.0
    
    [Part:KA Goods Sold]
              Line:KA Juridiction
            
    [Line:KA Juridiction]
              Field: Simple Field
              Local: Field: Simple Field: Set as: ""
              Local: Field: Simple Field: Align: Center
              Local: Field: Simple Field: Full Width: Yes
     

    Attached Files:

    nasir likes this.


  2. Prema75

    Prema75 New Member


     

    Attached Files:

    nasir likes this.


Share This Page