Multiple Json File Loading- A Demo

Discussion in 'Free Source Codes' started by garima, Mar 19, 2020.

         
  1. garima

    garima Active Member


    This free codes demonstrates how multiple json files (GSTR2A only) can be loaded and then letter viewed for a particular month;

    For @Bipin Damania, @sattam

    @Jenny, @santhosh-c-kurian

    MultiReco.jpg MultiMonth.jpg
    MultiReport.jpg
    Code:
    [#Menu        : Import Indirect]
        Add    : Key Item    :  After : @@LocBanking    :  "JSon GSTR2A   "    : 2 : Menu    : Rbc_2AReco :NOT $$IsEmpty:$$SelectedCmps ;AND @@RBC_TM_IsOn
    
    [Menu        :Rbc_2AReco]
         Key Item    :   "JSon Viewer    "    : J : alter    : Rbc_Jsn_Options :  NOT $$IsEmpty:$$SelectedCmps ;AND @@RBC_TM_IsOn
         Key Item    :   "Reconciliation "    : R : Display Collection:  RecoMonthSelection :  NOT $$IsEmpty:$$SelectedCmps ;AND @@RBC_TM_IsOn
    
    [System: Variable]
    
        Rbc_jsn_Path     : ""
        Rbc_jsn_File     : ""
        Rbc_jsn_PathFile: ""
    
    [Variable: Rbc_jsn_Path]
        Type: String
        Default: ""
        Persist: Yes
    
    
    [Variable: Rbc_jsn_File]
        Type: String
        Default: ""
        Persist: Yes
    
    [Variable: Rbc_jsn_PathFile]
        Type: String
        Default: ""
        Persist: Yes
    ;------------------------------------------------------------------------------------------------------------------------------------------------
    
    
    [Object : JSonFilePathList]
        Collection    : JSonPathFileName    : JSonFilePathName
    
    
    [Object : JSonFilePathName]
    
        Storage : JSonFileName        : String
        Storage : JSonPathFileName  : String
    
    
    ;-------------------------------------------------------------------------------------------------------------
    [Report: Rbc_jsn_Options]
    
        Form        : Rbc_jsn_Options
        Full Screen    : Yes
        Object        : JSonFilePathList
    
    [Form: Rbc_jsn_Options]
        No Confirm      : No
        Space Top       : 1
        Space Left      : 1
        Space Right     : 1
        Space Bottom    : 1
        Height        : 70% Page
        Width         : 50% Page
        Vertical Align  : Centre
    
        Local    : Field    : Rbc_jsn_Import Directory    : Modifies    : Rbc_jsn_Path    : Yes
        Local    : Field    : Rbc_jsn_Import FileName    : Modifies    : Rbc_jsn_File    : Yes
       
        Local: Field: Form SubTitle    : Info    : "Select JSon or Zip file from the List"
    
    
        Part: Rbc_jsn_ImportSet
        On    : Form Accept :  Yes:  Call: MainFunction2A ;
    ;    On    : Form Accept :  Yes:  Display Collection : RecoMonthSelection
        On    : Form Accept: Yes: Form Accept
    
    
    
    
    [Part: Rbc_jsn_ImportSet]
        Parts    : Rbc_jsn_Import Title, Form SubTitle
        Parts    : Rbc_jsn_Import Directory, Rbc_jsn_Import Details
        Vertical     : Yes
        Border            : thin Bottom
       
    [Part: Rbc_jsn_Import Title]
        Lines    : Rbc_jsn_Import, Rbc_jsn_Import Info
        Space Bottom    : 0.20
        Border            : thin Bottom
    
    [Part        : Rbc_jsn_Import Directory]
          Line   :   Rbc_jsn_Import Directory
         
        [Line: Rbc_jsn_Import]
            Fields          : Form Sub Title
            Local   : Field : Form Sub Title : Info    : $$LocaleString:"RBC JSon file Importing"
                   
        [Line: Rbc_jsn_Import Info]
            Field    : Simple Field
         
            Local   : Field : Simple Field : Info       : $$LocaleString:"(Only Zip/JSon (.zip and .json) Format is Supported)"
            Local   : Field : Simple Field : Full Width : Yes
            Local   : Field : Simple Field : Align      : Centre
    
           
    [Part: Rbc_jsn_Import Details]
         
            Lines    : Rbc_jsn_Import FileName
            Repeat    :    Rbc_jsn_Import FileName : JSonPathFileName
            Break On    : $$IsEnd:$jsonFileName Or $$IsEndOfList:$jsonFileName
            Space Bottom    : 0.10
            Space Bottom    : 0.20
            Scroll        : Vertical
           
           
        [Line: Rbc_jsn_Import Directory]
            Field   : Long Prompt, Rbc_jsn_Import Directory
            Local   : Field : Long Prompt    : Info     : $$LocaleString:"Import Directory :"
            Local   : Field : Long Prompt : Alignment: Left
            Local   : Field : Long Prompt : Width : 30
            Space Bottom    : 0.20
           
       
         [Line: Rbc_jsn_Import FileName]
            Field   : Rbc_jsn_Import Prompt, Rbc_jsn_Import FileName, Rbc_jsn_ImportPathFileName
               Space Bottom    : 0.20
        
        [Field     : Rbc_jsn_Import Prompt]
        
            Use        : Long Prompt
            Set As  : $$LocaleString:"Import File "+$$String:$$Line +" (.zip, .json) :"
            Alignment: Left
            Width : 30
     
        [Field: Rbc_jsn_Import Directory]
            Use        : Name Field
            Width   : @@MaxNameWidth
            Set as    : ##Rbc_jsn_Path;##RbcVTopUpExcelPath
            Full Width   : Yes
            Style        : Normal
            Set Always   : Yes
            Storage      : u_RMP_Directory
            Modifies     : Rbc_jsn_Path
            ;Variable    : RbcVTopUpExcelPath
            Validate    : NOT $$IsEmpty:$$Value
    
       
        [Field: RBC Medium Prompt]
            Use            : Name Field
            Set as        : ""
            Width         : @@NarrWidth
            Full Width    : Yes
            Style        : Normal
           
       [Field: Rbc_jsn_Import FileName]
            Use        : Name Field
            Width      : @@MaxNameWidth
    
            Full Width : Yes
            Modifies   : Rbc_jsn_File
    
            Storage    : JSonFileName
            Style      : Normal
            Set Always : Yes
            Table       : RbcJSonList of Files, EndOfList
            Show Table : On Blank
            Common Table    : No
            Unique        : Yes
            Validate    : NOT $$IsEmpty:$$Value
    
            On    : Accept :  (NOT $$IsEndOfList:$$Value ) : Set:Rbc_jsn_PathFile:##Rbc_jsn_Path+"\"+$$Value
            On     : Accept: (NOT $$IsEndOfList:$$Value ): Field Accept
    
        [Field: Rbc_jsn_ImportPathFileName]
            Use        : Name Field
            Set as        : ##Rbc_jsn_Path+"\"+#Rbc_jsn_ImportFileName
            Skip        : Yes
            Storage    : JSonPathFileName
            Invisible    : Yes
            Set Always : Yes
    
       
    
    [Collection: RbcJSonList of Files]
                Title                : "List of Files : " + ##Rbc_jsn_Path
                Source Collection    : RbcJSon Files Src
                Compute              : Name            : $Name
                Compute              : FileDate        : $LastModifiedDate
                Compute              : FileSize        : $FileSize
                Compute              : IsDirectory    : $IsDirectory
    
                Format               : $Name, 30
                Format               : $FileDate, 15
                Format               : $FileSize, 8
                Format               : @@FileType
                Sub Title            : "File Name", "System Date", "Size", "Type"
                Full Height          : Yes
                Filter               : RBC_JSonAvailableFormatFilter
                Unique                 : $Name, $JSonFileName
                Client Only           : Yes
       
    [Collection:RbcJSon Files Src]
    
        Data Source    : Directory    : ##Rbc_jsn_Path
        Filter        :  RBC_JSonOnlyFilesFilter
        Filter        :  RBC_JSonSelectedFormats
       
        Client Only    : Yes
        Keep Source: Yes
    
    [Function: RbcJSonSupportedFiles]
    
        Parameter    : InFileName    : String
    
        0010        : Do If    :  ##InFileName ENDING WITH "zip" OR ##InFileName ENDING WITH "json": Return    : Yes
    
    [System: Formula]
    
        RBC_JSonOnlyFilesFilter            : NOT $IsDirectory
        RBC_JSonSelectedFormats            :  ($Name ENDING WITH "zip" OR $Name ENDING WITH "json")
    
        RBC_JSonAvailableFormatFilter    :  If ($Name Containing "~$") Then No Else If ##AutoBRSSFileType = "JSon" +
                                            Then (##IsJSonFormatSupported AND ($Name ENDING WITH "zip" OR $Name ENDING WITH "json")) Else + Yes
    
    
    ;--------------------------------------------------------------------------------------------------------------
    [System    : Variables]
        svctin    : ""
        svCtinChanged : No
    
    [Variable    : svCtin]
        Type    : String
        Set Always    : Yes
    
    [Variable    : svCtinChanged]
        Type    : Logical
        Set Always    : Yes
    
    
    [Button: Jsonfilepath]
        Title: Upload JSON
        Key: Alt+J
        Action : Alter: Jenny_jsn_Options
    ;------------------------------------------------------------------------------------------------------------------------------------------
    
    [Collection    : GSTR2A]
        Data Source    : File JSON: ##SvCurrentJsonFile
        JSON Object    :rootObject
        Fetch : *.*
        Client Only:Yes
        ;Object    :  rootObject
    
    
    [Object    : rootObject]
        Storage        : gstin    : String
        Storage        : fp    : String
        Collection    : b2b    : b2bObject
        Collection  : cdn     : cdnObject
    
    [Object        :     b2bObject]
        Storage        :     ctin    : String
        Storage        :    cfs        : String
        Storage        :    cname     : String
        Collection    :    inv    : invObject
    
    [Object : cdnObject]
    
        Storage     : ctin : String
        Storage     : cfs : String
        Storage        : cname     : String
        Collection     : nt : ntObject
    
                
    [Object    : invObject]
        
        Storage        :  val        : Number
        Storage        :  inv_typ    : String
        Storage        :  pos        : Number
        Storage        :  idt        : String
        Storage        :  rchrg     : String
        Storage        :  inum        : String
        Storage        :  chksum    : String
        
        Collection    : itms    : itmsObject
    
    [Object : ntObject]
    
        Storage     : val         : Number
        Storage     : ntty         : String
        Storage     : nt_dt        : String
        Storage     : idt         : String
        Storage     : nt_num    : String
        Storage     : inum        : String
        Storage     : chksum     : String
        Collection     : itms     : itmsObject
    
    [Object    : itmsObject]
        Storage    :     num    : Number
        Collection    : itm_det     : itm_detObject
    
    
    [Object: itm_detObject]
       Storage        :  samt    : Amount
       Storage        :  rt     : Number
       Storage        :  txval: Amount
       Storage        :  camt : Amount
       Storage        :  csamt : Amount
    
    ;--------------------------------------------------------------------------------------------------------------------
    
    [Object        : Lv2A]
        [Object        : Lvb2b]
        [Object        : Lvcdn]
            [Object    : LvInvoices]
            [Object    : LvNotes]
                [Object    : LvItems]
    
    
    [Collection    : TuAPortalDataSrc]
        Data Source    : Variable: Lv2A
        Fetch    : lv2aCmpCTIN, lv2aFinYear,lv2aFinMnth        
     
        Fetch    : Lvb2b.*,Lvb2b.LvInvoices.*, Lvb2b.Invoices.LvItems.*,  Lvcdn.* , Lvcdn.LvNotes.*, Lvcdn.LvNotes.LvItems.*
    
    [Collection    : TuAPortalDataColl]
        Source Collection    : TuAPortalDataSrc
        Fetch    : *.*
        Fetch    : lv2aCmpCTIN, lv2aFinYear,lv2aFinMnth        
        Filter    : FltMonthFilter
    
    [System        : Formulae]
        FltMonthFilter    : $lv2aFinMnth = ##SvSelectedRecoMonth
    
    [Collection    : TuPotalRecoMonth]
        Title    : "Reco Month"
    
        Source Collection    : TuAPortalDataSrc
        Fetch    : lv2aCmpCTIN, lv2aFinYear,lv2aFinMnth        
    
        Compute    : Name : $lv2aFinMnth
        Format    : $Name, 15
    
    [Variable    : SvSelectedRecoMonth]
        Type    : String
        Persistent    : No
        Volatile    : Yes
    
    [Collection: RecoMonthSelection]
    
        Source Collection    : TuPotalRecoMonth
         Trigger        : RecoMonthSelection
        Variable    : SvSelectedRecoMonth
        Report        : User Report
        FullHeight  : Yes
        Format      : $Name, 15
        Fetch        : Name
    
    
    [Report: RecoMonthSelection]
        Form: RecoMonthSelection
        Title    : $$LocaleString:"Select Reconciliation Period"
    
    [Form: RecoMonthSelection]
        Part    :  RecoMonthSelection
        Space Left    : 1
        Space Right    : 1
        Vertical Align    : Top
    ;    No Confirm    : Yes
        ;On        : Form Accept    : Yes: Display :User Report
        On        : Form Accept    : Yes: Form Accept
        Local    : Field        : RecoMonth : Modifies: SvSelectedRecoMonth
    [Part: RecoMonthSelection]
    
        Line    : RecoMonthTL ,RecoMonth
    
    
    [Line: RecoMonthTL]
        Field    : Name Field
        Local    : Field    : Name Field    : Info    : "Month"
        Local    : Field    : Name Field    : Align    : Center
    
    [Line: RecoMonth]
        Space Top    : .50
        Field        : RecoMonth
        
    [Field: RecoMonth]
        Use            : Name Field
        Modifies    : SvSelectedRecoMonth
        Table        : TuPotalRecoMonth
        Show Table    : Always
        Align        : Center
    
    ;----------------------------------------------------------------------------------------------------------------------------------------
    [System        : Variables]
        List Variable        : Lv2A
        SvCurrentJsonFile    : ""
        SvSelectedRecoMonth    : ""
    
    [Variable    : SvCurrentJsonFile]
        Type        : String
        Set Always    : Yes
    
    [Variable    : Lv2A]
        Variable : TableName         :     String
        Variable : lv2aCmpCTIN        :    String
        Variable : lv2aFinYear        :    String
        Variable : lv2aFinMnth        :    String
    
        List Variable    : Lvb2b
        List Variable    : Lvcdn
    
    
    [Variable    :Lvb2b]
    
        Variable : lvb2bcTin            :    String
        Variable : lvb2bcName            :    String
        Variable : lvb2bcfStatus        :    Logical
    
        List Variable    : LvInvoices
    
    
    [Variable    :Lvcdn]
    
        Variable : lvcdncTin            :    String
        Variable : lvcdncName            :    String
        Variable : lvcdncfStatus        :    Logical
    
    
        List Variable    : LvNotes
    
    [Variable    : LvInvoices]
        Variable : lvInvCount        :     Number
        Variable : lvb2bType            :    String
        Variable : lvb2bPOS                :    String
        Variable : lvb2bIsRev            :    Logical
        Variable : lvb2bINum            :    String
        Variable : lvb2bIDate            :    Date
        Variable : lvb2bVal                :    Amount
        List Variable    : LvItems
    
    [Variable    : LvNotes]
        Variable : lvInvCount        :     Number
        Variable : lvcdnType            :    String
        Variable : lvcdnPOS                :    String
        Variable : lvcdnIsRev            :    Logical
        Variable : lvcdnINum            :    String
        Variable : lvcdnIDate            :    Date
        Variable : lvcdnntNum            :    String
        Variable : lvcdnntDate            :    Date
        Variable : lvcdnVal                :    Amount
        List Variable    : LvItems
    
    
    [Variable    : LvItems]
    
        Variable : lvItmRate            :    Number
        Variable : lvItmtxVal            :    Amount
        Variable : lvItmSGST            :    Amount
        Variable : lvItmCGST            :    Amount
        Variable : lvItmIGST            :    Amount
        Variable : lvItmCESS            :    Amount
        Variable : lvItmVal                :    Amount
    
    
    ;--------------------------------------------------------------------------------------------------------------------------------
    
    [Collection    : GSTR2A_PartySummary ]
        Source Collection    : TuAPortalDataColl
        Fetch    : .*
        Walk     :    Lvb2b
    
        By            : ctin        :$$String:$lvb2bctin
        Compute       : cfs        :$lvb2bcfstatus
        Compute       : cname      :$lvb2bcName
    
        Walk        : LvInvoices
        Compute Var : cvinvcnt     :Number : $$NumItems
    
    
        Aggr Compute :val          : Sum :$lvb2bVal
    
        Walk        : LvItems
        Aggr Compute : invcnt : Sum: ##cvinvcnt
        Aggr Compute :txval     : Sum :$lvItmTxval
        Aggr Compute :iamt         : Sum :$lvItmIGST
        Aggr Compute :camt         : Sum :$lvItmCGST
        Aggr Compute :samt        : Sum :$lvItmSGST
        Aggr Compute :csamt        : Sum :$lvItmCESS
    
    
    [Collection    : GSTR2A_PartyBills]
    
        Source Collection: TuAPortalDataColl
    
        Walk     :    Lvb2b
        By      : ctin    :$$String:$lvb2bctin
    
    
        Walk    : LvInvoices
        By            : inum    : $$String:$lvb2bInum
        Compute        : idt    : $$Date:$lvb2bIdDate
     
        Walk    : LvItems
    
        ;By        : inum    : $lvb2bInum
        ;Compute   : cname     : $lvb2bcName
    
        Compute    : idt    : $$Date:$lvb2bIDate
       
        Compute    : rt    : $b2bItmRate  ; use By if you want to show rate wise details also.
    
        Aggr Compute :val        : Sum :$lvItmVal
        Aggr Compute :txval     : Sum :$lvItmTxval
        Aggr Compute :iamt         : Sum :$lvItmIGST
        Aggr Compute :camt         : Sum :$lvItmCGST
        Aggr Compute :samt        : Sum :$lvItmSGST
        Aggr Compute :iamt         : Sum :$lvItmCESS
    
        Filter        : cvgstinFilter
    
    [System    : Variables]
        sv2ARecoPartyName : ""
    
    ;--------------------------------------------------------------------------------------------------------------------------------
    
    
    [Function    : MainFunction2A]
        Variable : v2aIdx    : Number
    
        Variable : vb2bIdx    : Number
        Variable : vcdnIdx    : Number
    
        Variable : vInvIdx    : Number
        Variable : vntIdx    : Number
    
        Variable : vitmIdx    : Number
    
        0050    :    List Delete Ex    : Lv2A
        0060    :    Set    : v2aIdx : 1
        0100    :    Walk Collection    : JSonPathFileName; JSonFilePathColl
        0200    :        Set        : SvCurrentJsonFile : $jsonPathFileName
        0250    :        Log     : ##SvCurrentJsonFile
        0300    :        Do If    : NOT ($$isEmpty:##SvCurrentJsonFile) : Call :  GetDatafrom2APortal
        0900    :    End Walk
        ;1000    : Display Collection : RecoMonthSelection
    
    
    
    [Function    : GetDatafrom2APortal]
    
        
        0070    :    Walk Collection    : GSTR2A
        0080    :        List Add Ex    :  Lv2A
    
        0100    :        Set :    Lv2A[##v2aIdx].lv2aCmpCTIN    :    $gstin
        0110    :        Set :    Lv2A[##v2aIdx].lv2aFinYear    :    $$StringPart:$fp:2:4
        0120    :        Set :    Lv2A[##v2aIdx].lv2aFinMnth    :    $fp
        0145    :        Do If    : ($$NumItems:b2b > 0) : Call :set2Ab2bValues
        0150    :        Do If    : ($$NumItems:cdn > 0) : Call :set2AcdnValues
        0200    :        Increment    :v2aIdx
        0300    :    End Walk ; GSTR2A
        
        0400    :    Return
    
    
    
    [Function    : set2Ab2bValues]
    
        0050    :     Set        : vb2bIdx : 1
        0055    :    Set     : Lv2A[##v2aIdx].TableName     :"b2b"
        0060    :    Walk     : b2b
        0070    :        List Add Ex    :  Lv2A[##v2aIdx].Lvb2b
        0150    :        Set :    Lv2A[##v2aIdx].Lvb2b[##vb2bIdx].lvb2bcTin    :    $ctin
        0160    :        Set :    Lv2A[##v2aIdx].Lvb2b[##vb2bIdx].lvb2bcName    :    $cname
        0170    :        Set :    Lv2A[##v2aIdx].Lvb2b[##vb2bIdx].lvb2bcfStatus:    if $cfs = "Y" then Yes else if $cfs ="N" then No else No
        ;0180    :        Log:$ctin
        0190    :        Set    : vInvIdx : 1
        0210    :        Walk : inv
        0215    :            List Add Ex    :  Lv2A[##v2aIdx].Lvb2b[##vb2bIdx].LvInvoices
        0218    :            Set :     Lv2A[##v2aIdx].Lvb2b[##vb2bIdx].LvInvoices[##vInvIdx].lvb2bType :$inv_typ
        0220    :            Set :     Lv2A[##v2aIdx].Lvb2b[##vb2bIdx].LvInvoices[##vInvIdx].lvInvCount :$$NumItems:itms
        0230    :            Set :     Lv2A[##v2aIdx].Lvb2b[##vb2bIdx].LvInvoices[##vInvIdx].lvb2bPOS     :$pos
        0240    :            Set :     Lv2A[##v2aIdx].Lvb2b[##vb2bIdx].LvInvoices[##vInvIdx].lvb2bIsRev :if $rchrg = "Y" then Yes else if $rchrg  ="N" then No else No
        0250    :            Set :     Lv2A[##v2aIdx].Lvb2b[##vb2bIdx].LvInvoices[##vInvIdx].lvb2bINum  :$inum
        0260    :            Set :     Lv2A[##v2aIdx].Lvb2b[##vb2bIdx].LvInvoices[##vInvIdx].lvb2bIDate :$idt
        0270    :            Set :     Lv2A[##v2aIdx].Lvb2b[##vb2bIdx].LvInvoices[##vInvIdx].lvb2bVal      :$$AsAmount:$Val
        ;0275    :            Log:$$NumItems:itms
    
        0280    :            Set    : vitmIdx : 1
        0285    :            Walk : itms
        ;0290    :                Walk : itm_det
        0295    :                List Add Ex    :  Lv2A[##v2aIdx].Lvb2b[##vb2bIdx].LvInvoices[##vInvIdx].LvItems
        0300    :                Set  :Lv2A[##v2aIdx].Lvb2b[##vb2bIdx].LvInvoices[##vInvIdx].LvItems[##vitmIdx].lvitmRate    :$$Number:$itm_det[1].rt
        0310    :                Set  :Lv2A[##v2aIdx].Lvb2b[##vb2bIdx].LvInvoices[##vInvIdx].LvItems[##vitmIdx].lvitmTxVal   :$$AsAmount:$itm_det[1].txval
        0320    :                Set  :Lv2A[##v2aIdx].Lvb2b[##vb2bIdx].LvInvoices[##vInvIdx].LvItems[##vitmIdx].lvitmSGST    :$$AsAmount:$itm_det[1].samt
        0330    :                Set  :Lv2A[##v2aIdx].Lvb2b[##vb2bIdx].LvInvoices[##vInvIdx].LvItems[##vitmIdx].lvitmCGST    :$$AsAmount:$itm_det[1].camt
        0340    :                Set  :Lv2A[##v2aIdx].Lvb2b[##vb2bIdx].LvInvoices[##vInvIdx].LvItems[##vitmIdx].lvitmIGST    :$$AsAmount:$itm_det[1].iamt
        0350    :                Set  :Lv2A[##v2aIdx].Lvb2b[##vb2bIdx].LvInvoices[##vInvIdx].LvItems[##vitmIdx].lvitmCESS    :$$AsAmount:$itm_det[1].csamt
    ;    0360    :                Log:$$String:##v2aIdx+ " "+$$String:##vb2bIdx+ " "+$$String:##vInvIdx +" "+$$String:##vitmIdx
        0370    :                Increment    : vitmIdx
        ;0400    :                End Walk ; itm_det
        0610    :             End Walk    ;itms
    
        0620    :             Increment    : vInvIdx
        0650    :        End Walk    ; inv
    
        0680    :        Increment    :vb2bIdx
        0700    :    End Walk    ; b2b
    
    [Function    : set2AcdnValues]
    
        0050    :     Set        : vcdnIdx    : 1
        0055    :    Set     : Lv2A[##v2aIdx].TableName     :"cdn"
        0060    :    Walk     : cdn
    
        0070    :    List Add Ex    :  Lv2A[##v2aIdx].Lvcdn
        0150    :    Set : Lv2A[##v2aIdx].Lvcdn[##vcdnIdx].lvcdncTin        :    $ctin
        0160    :    Set : Lv2A[##v2aIdx].Lvcdn[##vcdnIdx].lvcdncName    :    $cname
        0170    :    Set : Lv2A[##v2aIdx].Lvcdn[##vcdnIdx].lvcdncfStatus    :    if $cfs = "Y" then Yes else if $cfs ="N" then No else No
    
        0190    :    Set    : vntIdx : 1
        0210    :    Walk : nt
        0215    :        List Add Ex    :  Lv2A[##v2aIdx].Lvcdn[##vcdnIdx].LvNotes
        0218    :        Set :    Lv2A[##v2aIdx].Lvcdn[##vcdnIdx].LvNotes[##vntIdx].lvInvCount    :    $$NumItems:itms
        0220    :        Set :    Lv2A[##v2aIdx].Lvcdn[##vcdnIdx].LvNotes[##vntIdx].lvcdnType        :    $ntty
        0230    :        Set :    Lv2A[##v2aIdx].Lvcdn[##vcdnIdx].LvNotes[##vntIdx].lvcdnPOS        :    ""
        0240    :        Set :    Lv2A[##v2aIdx].Lvcdn[##vcdnIdx].LvNotes[##vntIdx].lvcdnIsRev      :    No
        0250    :        Set :    Lv2A[##v2aIdx].Lvcdn[##vcdnIdx].LvNotes[##vntIdx].lvcdnINum        :    $inum
        0255    :        Set :    Lv2A[##v2aIdx].Lvcdn[##vcdnIdx].LvNotes[##vntIdx].lvcdnntNum    :    $nt_num
        0260    :        Set :    Lv2A[##v2aIdx].Lvcdn[##vcdnIdx].LvNotes[##vntIdx].lvcdnIDate    :    $idt
        0265    :        Set :    Lv2A[##v2aIdx].Lvcdn[##vcdnIdx].LvNotes[##vntIdx].lvcdnntDate    :    $nt_dt
        0270    :        Set :    Lv2A[##v2aIdx].Lvcdn[##vcdnIdx].LvNotes[##vntIdx].lvcdnVal        :    $$AsAmount:$Val
        0275    :        Log:$$String:$$LoopIndex + $$String:" -Invoice No " + $$String:$inum
    
        0285    :        Set    : vitmIdx : 1
    
        0290    :            Walk : itms
    ;    0290    :                Walk : itm_det
        
        0295    :                List Add Ex    :  Lv2A[##v2aIdx].Lvcdn[##vcdnIdx].LvNotes[##vntIdx].LvItems
        0300    :                Set  :    Lv2A[##v2aIdx].Lvcdn[##vcdnIdx].LvNotes[##vntIdx].LvItems[##vitmIdx].lvitmRate    :$$Number:$itm_det[1].rt
        0310    :                Set  :    Lv2A[##v2aIdx].Lvcdn[##vcdnIdx].LvNotes[##vntIdx].LvItems[##vitmIdx].lvitmtxVal :$$AsAmount:$itm_det[1].txval
        0320    :                Set  :    Lv2A[##v2aIdx].Lvcdn[##vcdnIdx].LvNotes[##vntIdx].LvItems[##vitmIdx].lvitmSGST    :$$AsAmount:$itm_det[1].samt
        0330    :                Set  :    Lv2A[##v2aIdx].Lvcdn[##vcdnIdx].LvNotes[##vntIdx].LvItems[##vitmIdx].lvitmCGST    :$$AsAmount:$itm_det[1].camt
        0340    :                Set  :    Lv2A[##v2aIdx].Lvcdn[##vcdnIdx].LvNotes[##vntIdx].LvItems[##vitmIdx].lvitmIGST    :$$AsAmount:$itm_det[1].iamt
        0350    :                Set  :    Lv2A[##v2aIdx].Lvcdn[##vcdnIdx].LvNotes[##vntIdx].LvItems[##vitmIdx].lvitmCESS    :$$AsAmount:$itm_det[1].csamt
    
        0360    :                Increment    : vitmIdx
        ;0400    :                End walk    ; itm_det
        0610    :             End Walk    ;itms
    
        0640    :            Increment    : vntIdx
        0650    :        End Walk    ; inv
    
        0680    :        Increment    :vcdnIdx
        0700    :    End Walk    ; b2b
    ;-------------------------------------------------------------------------------------------------------------------------------
    [Report    :   User Report]
    ;    Use     : DSP Template
    
        Title   : "GSTR - DETAILS"
         Form    : User Report
        Set     : vjennyAllfilter : ""
        Set     : svCtinChanged : No
    
    [Form:User Report]
       ; Use         : DSP Template
        Parts    : Rbc_Gstr2_Top,  Jenny_InvPart
    
        Height : 100% screen
        Width : 100% screen
        Local : Field : FormSubTitle : Set As : $$LocaleString:"GSTR - DETAILS"
        Local   : Field : Form SubTitle : Color          : Dark Red
        Local: Field:Form SubTitle    : Style    : Large SerIf Bold
        Add: Button: Jsonfilepath,jennyAllfilter
    
    
    [Part: Rbc_Gstr2_Top]
    
        Line  : FormSubTitle,  Rbc_Party_TopTitle,  Rbc_Party_TopRep
    
        Local : Field: FormSubTitle : Set as: "GSTR-2 Portal Details- For the Period: " +$$String:##SvSelectedRecoMonth
        Repeat: Rbc_Party_TopRep: GSTR2A_PartySummary
        Bottom Line    : Rbc_Party_TopRepTotal
        Scroll    : Vertical
        Height    : 40 % Screen
        Local    : Line: Default : Border: thin bottom
        Local    : Line: Default : Height    : 1.2
    
        Totals    :  Rbc_St_taxval,  Rbc_St_Igst, Rbc_St_Cgst, Rbc_St_Sgst,Rbc_St_invAmount                    
              
    
    [Line: Rbc_Party_TopTitle]
    
        Field            : Rbc_S_SrNo, Rbc_S_Gstin,Rbc_S_PartyName, Rbc_St_invno
        Right Field        : Rbc_St_invAmount, Rbc_St_taxval,  Rbc_St_Cgst, Rbc_St_Sgst, Rbc_St_Igst,
        Right Field        : Rbc_Cfsstat
    
    
        Local: Field     : Defalt    : Type  : string
        Local: Field     : Defalt    : Skip     : Yes
        Local: Field     : Default     : Style: Small Bold
        Local: Field     : Default     : Align: Centre
    ;    Local: Field     : Default     :Color: Maroon    ;DarkBlue16Bit
    
        Local: Field     : Rbc_S_SrNo                : Info  : "SNo"
        Local: Field    : Rbc_S_Gstin             : Set as: "Party GSTIN"
        Local: Field    : Rbc_S_Gstin             : Alignment    : Left
        Local: Field    : Rbc_S_PartyName         : Set as: "Party Name"
        Local: Field    : Rbc_St_invno        : Info: "No. of Bills"
        Local: Field    : Rbc_St_taxval        : Info    : "Taxable Value"
        Local: Field    : Rbc_St_Igst            : Info    : "IGST"
        Local: Field    : Rbc_St_Cgst            : Info    : "CGST"
        Local: Field    : Rbc_St_Sgst            : Info    : "SGST"
        Local: Field    : Rbc_St_invAmount     : Info    : "Total Inv Amount"
        Local: Field    : Rbc_Cfsstat                : Info    : "Submitted Status"
        Local: Field    : Default    : Border        : thin left Right
        Border    : Column Titles
        Height    : 1.5
        Local     : Field : Default :Color:DarkBlue16Bit; Maroon
    
        [Line: Rbc_Party_TopRep]
       
            Field            : Rbc_S_Srno, Rbc_S_Gstin,Rbc_S_PartyName, Rbc_St_invno,
            Right Field        : Rbc_St_invAmount, Rbc_St_taxval,  Rbc_St_Cgst, Rbc_St_Sgst, Rbc_St_Igst,
            Right Field        :  Rbc_Cfsstat
       
            Key      : RbcSetCtin ;,  RbcSetParty ;, Rbc_Fim_lLedAlter AlterOnEnter
            Local     : Field : Default : Style: Tiny Bold
            Local     : Field : Default : Align: Right
            Local     : Field : Rbc_S_PartyName: Alignment:Left
            Local      : Field : Rbc_S_Gstin  : Align: Centre
            Local     : Field : Rbc_St_invno : Align: Center
            Local     : Field : Rbc_Cfsstat : Align: Center
            Local     : Field : Default :Color:DarkBlue16Bit; Maroon    ;
            ;Explode: TSPLItemJSonExp
            Local    : Field    : Default : Border: thin right
            On        : Focus    : Yes      : Trigger Key: Enter
            Height    : 1.2
    
        [Line: Rbc_Party_TopRepTotal]
            Use    : Rbc_Party_TopRep
        ;    Local: Field     : Defalt    : Type  : string
        ;    Local: Field     : Defalt    : Skip     : Yes
            Local: Field     : Default     : Style: Small Bold
            Local: Field     : Default     : Align: Right
    ;        Local: Field     : Default     :Color: Maroon    ;DarkBlue16Bit
       
            Local: Field     : Rbc_S_SrNo                : Info  : "Total"
            Local: Field     : Rbc_S_SrNo                : Delete    : Border
            Local: Field    : Rbc_S_Gstin             : Set as: ""
            Local: Field    : Rbc_S_Gstin             : Delete    : Border
            Local: Field    : Rbc_S_PartyName         : Set as: ""
            Local: Field    : Rbc_S_PartyName         : Delete    : Border
            Local: Field    : Rbc_St_invno        : Info: ""
            Local: Field    : Rbc_St_invno        : Delete    : Border
            Local: Field    : Rbc_St_taxval        : Set As: $$Total:Rbc_St_taxval
            Local: Field    : Rbc_St_Igst            : Set As: $$Total:Rbc_St_Igst   
            Local: Field    : Rbc_St_Cgst            : Set As: $$Total:Rbc_St_Cgst   
            Local: Field    : Rbc_St_Sgst            : Set As: $$Total:Rbc_St_Sgst   
            Local: Field    : Rbc_St_invAmount     : Set As: $$Total:Rbc_St_invAmount
            Local: Field    : Rbc_Cfsstat                : Info    : ""
            Local: Field    : Rbc_Cfsstat                :Delete    : Border
       
            Local: Field    : Default    : Border        : thin left Right
            Border    : Thin top Bottom
            Height    : 1.5
            Local     : Field : Default :Color:DarkBlue16Bit; Maroon
       
        [Key: RbcSetCtin]
    
            Key     : Enter
            Action  :    Call: rbc_setctin
            Inactive: (NOT $$InDisplayMode )
       
        [Function    : rbc_setctin]
           
            100    :    Set    : svctin :    $ctin
            150    :    Set    : sv2ARecoPartyName :$$CollectionFieldByKey:$Name:##svCtin:RBC_PartyGstnWise
        ;    200    :    Set    : svCtinChanged : Yes
    
        [Field : Rbc_S_SrNo]
       
            Use    : Number Field
            Set as : $$Line
            Width  : 6
            Style  : Normal
            Align  : Center
       
       
            [Field: Rbc_S_Gstin]
                Use: Name field
                Set as: $$String:$ctin
                Set Always: Yes
                Alignment    : right
                Width    :20
       
            [Field    : Rbc_S_PartyName]
                Use    : Name field
                Set as: If $$IsEmpty:$cName then  $$CollectionFieldByKey:$Name:$ctin:RBC_PartyGstnWise else $$String:$cname
                Set Always: Yes
                Full Width    : Yes
                Alignment    : Left
           
            [Field: Rbc_St_invno]
    
                Use: Number Field
                set as: $$String:$invcnt
                Width    : 8
           
            [Field: Rbc_St_taxval]
           
                Use: Amount Field
                Set as:$$AsAmount:$txval
                Set Always    : yes
                Width:10
           
            [Field: Rbc_St_Igst]
                Use: Amount Field
           
                Set as : $$AsAmount:$Iamt
                Set Always    : yes
                Width:10
           
            [Field: Rbc_St_Cgst]
           
                Use: Amount  Field
                Set as: $$AsAmount:$Camt
                Set Always    : yes
                Width:10
           
            [Field: Rbc_St_Sgst]
           
                Use        : Amount Field
                Set as    : $$AsAmount:$samt
                Set Always    : yes
                Width:10   
           
            [Field: Rbc_St_invAmount]
           
                Use: Amount Field
                Set as : $$AsAmount:$Val ; $txVal+$Iamt+$Camt+$Samt
                Align:Right
                Width:10
           
            [Field: Rbc_Cfsstat]
           
                Use      : Name Field
                Set as: $$String:$cfs
                Width    : 10
    
    [Part:Jenny_InvPart]
        Left Part    : jnyJsonDataPart
        Right Part    : jnyTallyDataPart
        Border        : thin Box
        Common Border    : Yes
        Vertical    : No
        Common Border    :No
    
    [Part : JennyTitlePart]
        Line        :FormSubTitle ,Rbc_PartyNameLine, User Report Titles
        Local        : Field : FormSubTitle : Info : $$LocaleString:"Json Bill Wise Details"
        Local          : Field : Form SubTitle        : Color          : Dark Red
        Local        : Field:Form SubTitle    : Style    : Large SerIf Bold
        Local        : Line: Default : Border: thin bottom
        Local        : Line: Default : Height    : 1.2
        Border        : thin Box
    
     
    [Line    :Rbc_PartyNameLine]
        Field    : Medium Prompt, PartyInvoiceName
        Local    : Field    : Medium Prompt : Set as: "Party Name:"
        Local    : Field    : Default :Align: Left
        Local    : Field    : Default : Style: Small  Bold
        Local   : Field : Default :Color:DarkBlue16Bit; Maroon
        Local   : Field : Default :Color:DarkBlue16Bit; Maroon
    
    
    
    [Part : jnyJsonDataPart]
        Top Part    : JennyTitlePart
        Bottom Part    :jnyJsonBillPart
        Vertical    : Yes
    
    [Part            : jnyJsonBillPart]
    
        Line        :    User Report Data
        Repeat        :    User Report Data:GSTR2A_PartyBills
        BottomLines :     JennyTotal
        Scroll        :  Vertical
        Total          :    PartySNo,PartyInvoiceTotal,PartyInvoiceNetAmt,PartySGSTAmt,PartyCGSTAmt,PartyIGSTAmt,PartyCESSAmt
    
        Local        : Line: Default : Border: thin bottom
        Local        : Line: Default : Height    : 1.2
        Border        : thin Box
        Common Border    : Yes
    
    [Part : jnyTallyDataPart]
        Top Part    : JennyTitlePart
        Bottom Part : jnyTallyBillPart
        Vertical    : Yes
        Local        : Part: JennyTitlePart :Local : Field : FormSubTitle : Info : $$LocaleString:"Tally Bill Wise Details"
    
        [Part        : jnyTallyBillPart]
       
        Line        :    User Report Data
        Repeat        :    User Report Data:Tally2A_PartyBills
        BottomLines :     JennyTotal
        Scroll        :  Vertical
        Total          :    PartySNo,PartyInvoiceTotal,PartyInvoiceNetAmt,PartySGSTAmt,PartyCGSTAmt,PartyIGSTAmt,PartyCESSAmt
    
        Local        : Line: Default : Border: thin bottom
        Local        : Line: Default : Height    : 1.2
        Border        : thin Box
        Common Border    : Yes
    [Line:User Report Titles]
    
        Use        :    User Report Data
    
        Left Fields:PartySNo,PartyInvDate,PartyInvoiceNo ;PartyInvoiceName ;PartyGSTINNo,
        Right Fields:, PartyRateofTax, PartyInvoiceTotal,PartyInvoiceNetAmt,PartySGSTAmt,PartyCGSTAmt,PartyIGSTAmt,PartyCESSAmt
    
        Local: Field     : Defalt    : Type  : string
        Local: Field     : Defalt    : Skip     : Yes
        Local: Field     : Default     : Style: Small Bold
    
        Local: Field    : Default     : Border : thin left right
    
        Local:Field:PartySNo:Info:"S.No."
        Local:Field:PartyInvDate:Info:"Date"
       ; Local:Field:PartyGSTINNo:Set as:"GSTN"
        Local:Field:PartyInvoiceNo:Set as:"Inoice No"
        Local:Field:PartyInvoiceName:Set as:"Party Name"
        Local:Field:PartyRateofTax:Info:"Rate %"
        Local:Field:PartyInvoiceTotal:Info:"Total"
        Local:Field:PartyInvoiceNetAmt:Info:"Taxable Amount"
        Local:Field:PartySGSTAmt:Info:"SGST"
        Local:Field:PartyCGSTAmt:Info:"CGST"
        Local:Field:PartyIGSTAmt:Info:"IGST"
        Local:Field:PartyCESSAmt:Info:"CESS"
    
    
        Border    : Column Titles
        Height    : 1.5
       Space Bottom    : 0
    
    [Line:User Report Data]
        Local: Field    : Default     : Border : thin left right
        Left Fields    :PartySNo,PartyInvDate,PartyInvoiceNo ;,PartyInvoiceName;  PartyGSTINNo,
        Right Fields:PartyRateofTax, PartyInvoiceTotal,PartyInvoiceNetAmt,PartySGSTAmt,PartyCGSTAmt,PartyIGSTAmt,PartyCESSAmt
    
        Local     : Field : Default : Style: Tiny bold
    
        Local     : Field : Default :Color:DarkBlue16Bit; Maroon    ;
    
        Border: thin bottom
    
    [Field:PartySNo]
        Set as:$$Line
        Width:5
        Align: Right
    
    [Field:PartyInvDate]
        Use        : Short Date Field
        Set as    :$$Date:$idt
        Width    :10
        Align    : Right
    
    [Field:PartyGSTINNo]
        Set as:$ctin
        Width:15
        Align: Right
    
    [Field:PartyInvoiceNo]
        Set as:$inum
        Width:10
        Align: Centre
    
    [Field:PartyInvoiceName]
        Use    :    Name Field
        Set as: ##sv2arecoPartyName ; $$CollectionFieldByKey:$Name:##svctin:RBC_PartyGstnWise
        Alignment: Left
        Case    : Upper Case
    
    
    
    [Field    : PartyRateofTax]
        Use        : Number Field
        Set as    :$$Number:$rt
        ;Format    :"Percent"
        Alignment    : Center
    
    [Field:PartyInvoiceTotal]
        Use    : Amount Field
        Set as:$$AsAmount:$val
        Width:10
        Alignment    : Right
    
    [Field:PartyInvoiceNetAmt]
        Use    : Amount Field
        Set as:$$AsAmount:$txval
        Width:10
       Alignment    : Right
    
    [Field:PartySGSTAmt]
        Use    : Amount Field
        Set as:$$AsAmount:$samt
        Width:10
       Alignment    : Right
    
    [Field:PartyCGSTAmt]
        Use    : Amount Field
        Set as:$$AsAmount:$camt
        Width:10
       Alignment    : Right
    
    [Field:PartyIGSTAmt]
        Use    : Amount Field
        Set as:$$AsAmount:$iamt
        Width:10
       Alignment    : Right
    
    [Field:PartyCESSAmt]
        Use    : Amount Field
        Set as:$$AsAmount:$csamt
        Width:10
       Alignment    : Right
    
    [Line: JennyTotal]
            Use    :    User Report Data
            Local : Field : Default : Type    : String
            Local : Field : Default : Style : Tiny Bold
            Local : Field : Default : Align : Centre
            Local : Field : PartySNo        : Set as: "Total"
            Local : Field : PartySNo        :Delete    : Border
            Local : Field : PartyInvDate     : Set as: ""
            Local : Field : PartyGSTINNo    : Set as: ""
            Local : Field : PartyInvoiceNo    : Set as: ""
            ;Local : Field : PartyInvoiceName: Set as: ""
            Local : Field : PartyRateOfTax    : Set as: ""
            Local : Field : PartyInvDate     : Delete    : Border
            Local : Field : PartyGSTINNo    : Delete    : Border
            Local : Field : PartyInvoiceNo    : Delete    : Border
            Local : Field : PartyInvoiceName: Delete    : Border
            Local : Field : PartyRateOfTax    :  Delete    : Border
            Local : Field : PartyInvoiceTotal: Set as: $$Total:PartyInvoiceTotal
            Local : Field : PartyInvoiceNetAmt: Set as: $$Total:PartyInvoiceNetAmt
            Local : Field : PartySGSTAmt : Set as: $$Total:PartySGSTAmt
            Local : Field : PartyCGSTAmt : Set as: $$Total:PartyCGSTAmt
            Local : Field : PartyIGSTAmt : Set as: $$Total:PartyIGSTAmt
            Local : Field : PartyCESSAmt : Set as: $$Total:PartyCESSAmt
            Border    : Thin top Bottom
            Local: Field    : Default     : Border : thin left right
       
       
    ;;;;;;;;;;;;;;;;;;;;;;;;;;FILTER START;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
    
    [Button:jennyAllfilter]
        Key : Alt+F
        Action : Alter: jennyAllfilter
        Title : Filter
    
    [Report:jennyAllfilter]
        Form : jennyAllfilter
    
    [Form:jennyAllfilter]
        Part : jennyAllfilter
        No Confirmation : Yes
    
    [Part:jennyAllfilter]
        Line : jennyAllfilter
    
    [Line:jennyAllfilter]
        Field : Medium Prompt,jennyAllfilter
        Option : alter on enter
        Local : Field : Medium Prompt : Set as : "Filter : "
        Local : Field : Medium Prompt : Color :Blue
        Local : Field : Medium Prompt : Style :Normal Bold
    
    [Field:jennyAllfilter]
        Use : Name Field
        Width : 30
        Border : Thin Box
        Variable : vjennyAllfilter
        Modifies : vjennyAllfilter
    
    [System: Formulae]
        jennyAllfilter : $ctin = ##vjennyAllfilter Or $inum = ##vjennyAllfilter Or $$IsSysName:##vjennyAllfilter
    
    [Variable:vjennyAllfilter]
        Type : String
    
    [System:Variable]
        vjennyAllfilter : ""
    
    [Collection    : RBC_PartyGstnWise]
        Type        : Ledger
        Child Of    : $$GroupSundryCreditors ; Group would be Sundry Debtors for GSTR1
        Fetch        : PartyGSTIN, Name
    
        Format        : $PartyGSTIN, 20
        Format        : $Name, 25
    
        Search Key    : $PartyGSTIN
        Sort        : @@Default : $PartyGSTIN
        Filter        : RBCnonEmptyGstin
    
    [System            : Formulae]
        RBCnonEmptyGstin    : Not $$Isempty:$PartyGSTIN ; To reduce the search
    ;----------------------------------------------------------------------------
    
    
    
    [Variable    :sv2ARecoPartyName]
        Type    : String
        Set Always    : Yes
    ;Collections
    ;------------------------------------------------------------------------------
    [Collection    : Tally2A VchSource]
    
        Type    : Vouchers : Ledger
        Child Of: ##sv2ARecoPartyName
        Fetch    : Date, voucherTypeName, PartyLedgerName, PartyGSTIN, VoucherNumber, Amount
        Fetch    : LedgerEntries.*
    
    
    [Collection    : Tally2A_PartyBills]
    
    
        Source Collection: Tally2A VchSource
    
        By        : ctin     : if $$IsEmpty:$PartyGSTIN then $(Ledger, ##sv2ARecoPartyName).PartyGstin else $PartyGSTIN
        Compute    : cname :##sv2ARecoPartyName
        Compute : val     : $Amount
    
        By        : inum    : if $$IsEmpty:$Reference then $PARTYINVNO  else $Reference
        Compute    : idt    : if $$IsEmpty:$ReferenceDate then $PARTYINVDATE     else $ReferenceDate
       
        Walk    : LedgerEntries
    
        Compute    : rt    : if  (@@IsGSTDutyLed)then $BasicRateOfInvoiceTax else 0 ; use By if you want to show rate wise details also.
    
        Aggr Compute :txval : Sum :if  @@IsGSTPurcLedger then $Amount else 0 ; Condition for purchase ledger not yet appllied yet
        Aggr Compute :iamt     : Sum :if  @@IsIGSTDutyTaxLed then  $Amount else 0
        Aggr Compute :camt     : Sum :if  @@IsCGSTDutyTaxLed  then $Amount else 0
        Aggr Compute :samt    : Sum :if  @@IsSGSTDutyTaxLed  then $amount else 0
        Is ODBC Table    : Yes
    
        ;Filter        : cvgstinFilter
    
    [System    : Formulae]
        cvgstinFilter : $ctin = ##svctin
     
    Last edited: Mar 19, 2020
    Vashisth and Rajsrisrimal like this.


  2. garima

    garima Active Member


    Code has been updated, as it was skipping the import directory:

    Fixed Now;
     


  3. sattam

    sattam Active Member


    Thanks a lot Devendra Sir ji
    Now I have to implement this in my code
    Many many thanks again
     


  4. ASHOK

    ASHOK Member


    Sir ji namaskar please check gstr2a show but data not reflecting
     


  5. sattam

    sattam Active Member


    This is Demo version not complete code Mr. Ashok
     


  6. Rajsrisrimal

    Rajsrisrimal Member


    sir
    can we get updated TDL for the same
     


  7. garima

    garima Active Member


    It is already updated.. it is updated code
     
    Vashisth likes this.


Share This Page