Tally Chapter 188 TDL for PRINT Batch details in Invoice By Rajiv Mishra Computer Class

 

Few lines of this code is missing.

Pls Watch the full video to get full coding.

Option : TAXINCLU : @@IsSales Or @@IsPurchase

[!Line : TAXINCLU]

Add : Left Fields : After : EXPINV DescTitle : TAXINC

Local : Field : TAXINC : Info : "Batch"

Local : Field : TAXINC : Width : 4

Local : Field : TAXINC : Align : Center

[#Line: EXPINV InvDetails]

Option : EB EXPINV InvDetails : @@IsSales 

[!Line : EB EXPINV InvDetails]

Add : Left Fields : After : EXPINV Desc : TAXINC

[Field : TAXINC]

Use : Simple Field

Align : Right

Set as : $BatchName

Border : Thin Left

Width : 4.5

Skip : YES

Option : TAXINCLUD : @@IsSales

[!Line : TAXINCLUD]

Add : Left Fields : After : EXPINV DescTitle : TAXINCL

Local : Field : TAXINCL : Info : "Exp"

Local : Field : TAXINCL : Width : 4.5

Local : Field : TAXINCL : Align : Center

[#Line: EXPINV InvDetails]

Option : WEB EXPINV InvDetails : @@IsSales

[!Line : WEB EXPINV InvDetails]

Add : Left Fields : After : EXPINV Desc : TAXINCL

[Field : TAXINCL]

Use : Simple Field

Align : Right

Set as : $Expiryperiod

Border : Thin Left

Width : 4.5

Skip : YES

Option : TAXINCLUDE : @@IsSales

[!Line : TAXINCLUDE]

Add : Left Fields : After : EXPINV DescTitle : TAXINCL

Local : Field : TAXINCU : Set As : "Mfg"

Local : Field : TAXINCU : Width : 4

Local : Field : TAXINCU : Align : Center

[#Line: EXPINV InvDetails]

Option : WEBS EXPINV InvDetails : @@IsSales

[!Line : WEBS EXPINV InvDetails]

Add : Left Fields : After : EXPINV Desc : TAXINCU

[Field : TAXINCU]

Use : Simple Field

Align : Right

Set as :$MfDon

Border : Thin Left

Width : 4

Skip : YES

;;-------------- Expity-----------

[#Line: EI ColumnOne]

Option : TlyErp EI ColumnOne : Yes

[#Line: EI ColumnTwo]

Option : TlyErp EI ColumnOne : Yes

[#Line: EI ColumnOneRate]

Option : TlyErp EI ColumnOne : Yes

[!Line : TlyErp EI ColumnOne]

Add : Right Fields : Before : VCH QtyTitle : TlyErp VCH BatchTitle, TlyErp VCH MfgTitle, TlyErp VCH ExpTitle

[Field: TlyErp VCH BatchTitle]

Set as : $$LocaleString:"Batch No"

Style : Small Bold

Align : Centre

;Border : Double Sub Column Titles : If @@IsJobOrdersOn OR @@IsExciseSupplementaryInv Then No Else $DiffActualQty AND NOT @@IsPhysStock AND NOT @@IsStockJrnl

Skip : Yes

Fixed : Yes

;Width : if (@@HasMfgDateSet OR @@IsPhysStock) then 9 else @@VCHBatchNameWidth

Inactive : NOT @@HasBatchWise

[Field: TlyErp VCH MfgTitle]

Set as : $$LocaleString:"Mfg. Date"

Style : Small Bold

Align : Centre

;Border : Double Sub Column Titles : If @@IsJobOrdersOn OR @@IsExciseSupplementaryInv Then No Else $DiffActualQty AND NOT @@IsPhysStock AND NOT @@IsStockJrnl

Skip : Yes

Fixed : Yes

;Width : if (@@HasExpiryDate OR @@IsPhysStock) then 9 else @@VCHBatchNameWidth

Inactive : NOT @@HasBatchWise

[Field: TlyErp VCH ExpTitle]

Set as : $$LocaleString:"Exp. Date"

Style : Small Bold

Align : Centre

;Border : Double Sub Column Titles : If @@IsJobOrdersOn OR @@IsExciseSupplementaryInv Then No Else $DiffActualQty AND NOT @@IsPhysStock AND NOT @@IsStockJrnl

Skip : Yes

Fixed : Yes

;Width : if (@@HasMfgDateSet OR @@IsPhysStock) then 9 else @@VCHBatchNameWidth

Inactive : NOT @@HasBatchWise

;; ------------------------------------------------------------- ;;

[#Line: EI InvInfo]

Option : TlyErp EI InvInfo : @@issales

[#Line: CI InvInfo]

Option : TlyErp EI InvInfo : @@issales

[!Line : TlyErp EI InvInfo]

Add : Right Fields : Before : VCH BilledQty : TlyErp VCH BatchName, TlyErp VCH MfgDate, TlyErp VCH ExpDate

[Field : TlyErp VCH BatchName]

Use : Batch Name Field

Align : Centre

Style : Small

Set as : $BatchName

;Width : if (@@HasMfgDateSet OR @@IsPhysStock) then 9 else @@VCHBatchNameWidth

Inactive : NOT @@HasBatchWise

Color : @@SV_VCHCOLOR

Background : Black

[Field : TlyErp VCH MfgDate]

Use : Short Date Field

Align : Centre

Style : Small

Set as : $MfdOn

;Width : if (@@HasMfgDateSet OR @@IsPhysStock) then 9 else @@VCHBatchNameWidth

Inactive : NOT @@HasBatchWise

Color : @@SV_VCHCOLOR

Background : Black

[Field : TlyErp VCH ExpDate]

Use : Due Date Field

Align : Centre

Style : Small

Set as : $ExpiryPeriod

;Width : if (@@HasMfgDateSet OR @@IsPhysStock) then 9 else @@VCHBatchNameWidth

Inactive : NOT @@HasBatchWise

Color : @@SV_VCHCOLOR

Background :  Black

Tally Chapter 185 TDL for Multiple Company Data Path By Rajiv Mishra Computer Class | TALLY TDL Code

 

Few lines are missing here.

Pls watch the video for full  coding.

[#Form: CMP Action Form]

    Add:Button:AutoPath

[Button:AutoPath]

    title: if ##AutoPath then "Manual Path" else "Auto Path"

    Key: Alt + U

    Action:call :AutoPathfunc

[Function:AutoPathfunc]

      10:Set:AutoPath : not ##AutoPath

      100:Return

[#Field    : CMP Directory]

    table        : TlyTrng ListofData Path : ##AutoPath

    Show Table    : Always

    Key:AutoPath

[Collection    : TlyTrng ListofData Path]

    Title        : "List of Data Path"

    Type        : DATA    : App INI Config

    Child Of    : "AppINIConfig"

    Fetch        : DATA

    Format        : $DATA

Tally Chapter 184 TDL to Remove Stock Item Alias Ledger Alias By Rajiv Mishra Computer Class | TDL

 

Few lines are missing here.

Pls watch the full video first to get the full coding

   

 

[Function : DSD Remove Alias Of Maters]

   

    001 : CALL : DSD Remove Alias of Ledger

    002 : CALL : DSD Remove Alias of StockItem

   

 

[Function : DSD Remove Alias of Ledger]

   

    01 : WALK COLLECTION            : LEDGER

   

    02    : Modifyobject : (Ledger,$Name).LanguageName[1].Name[2].Name    :""

 

    03 : END WALK

   

[Function : DSD Remove Alias of StockItem]

   

    01 : WALK COLLECTION            : StockItem

   

    02    : Modifyobject : (StockItem,$Name).LanguageName[1].Name[2].Name    :""

 

    03 : END WALK

Tally Chapter 182 TDL for Total of Selected Lines By Rajiv Mishra Computer Class

 

Few Lines are Missing Here.

Watch the full video to get the full coding

[Line : Daybook cr]

    Add : left Field : LineselectedTotal1,LineselectedTotalD,LineselectedTotalC

    Right Field : Daybook dr, Daybook cr

[Field : Daybook dr]

    Use : Amount Forex Field

    Set as : $$Total:DSPDBDrAmt

    Invisible          :  ##IsVoucherregister

[Field : Daybook cr]

    Use : Amount Forex Field

    Set as : $$Total:DSPDBcrAmt

    Invisible          :  ##IsVoucherregister

[#Part: DB Body]

    Total: DSPDBDrAmt,DSP DBCrAmt

[#Line : DSP VchDetail]

    Option        : SelectedLinesRajtSKRTotalOnFocus1

    Option        : SelectedLinesRajtSKRTotalOnFocusd

    Option        : SelectedLinesRajtSKRTotalOnFocusc

[!Line: SelectedLinesRajtSKRTotalOnFocus1] ;Line to Call Selected BillsTotal Function

            On        : Focus    : Yes    : Call    : SelectedLinesRajtSKRTotal1

    On        : Focus    : Yes    : Call    : SelectedLinesRajtSKRTotalD

       On        : Focus    : Yes    : Call    : SelectedLinesRajtSKRTotalC

  

[Function: SelectedLinesRajtSKRTotal1]

      

          0010    : Set    : IsLineselected1             : (NOT $$IsEmpty:##SelectedLinesRajtSKRTotal1)

    0020    : Set    : SelectedLinesRajtSKRTotal1        : ($$CollAmtTotal:SelectedLinesColl1:$Amount)

[Function: SelectedLinesRajtSKRTotalD]

                0010    : Set    : IsLineselected1             : (NOT $$IsEmpty:##SelectedLinesRajtSKRTotal1)

    0030    : Set    : SelectedLinesRajtSKRTotalD        : ($$CollAmtTotal:SelectedLinesCollD:$Amount)

[Function: SelectedLinesRajtSKRTotalC]

                0010    : Set    : IsLineselected1             : (NOT $$IsEmpty:##SelectedLinesRajtSKRTotal1)

           0040    : Set    : SelectedLinesRajtSKRTotalC        : ($$CollAmtTotal:SelectedLinesCollC:$Amount)

     

 

[Field: LineselectedTotal1]

         

                Use                : Name Field         

                Set as            : if ##IsLineselected1 AND NOT $$IsEmpty:($$ReportObject:$$CollAmtTotal:SelectedLinesColl1:$Amount) Then $$String:@SelectedTotal1 + $$String:@SelectedTotalVal1 Else ""

                Width            : 30

                Align            : Centre

                SelectedTotal1    : $$LocaleString:"Net Selection : "

                SelectedTotalVal1: $$String:##SelectedLinesRajtSKRTotal1:"DrCr"

    Background           : if ##IsLineselected1 AND NOT $$IsEmpty:($$ReportObject:$$CollAmtTotal:SelectedLinesColl1:$Amount) Then "Rosy Brown"  Else @@SV_DAYBOOK

    Invisible          :   ##IsLedgerReport

[Field: LineselectedTotalD]

         

                Use                : Name Field         

                Set as            : if ##IsLineselected1 AND NOT $$IsEmpty:($$ReportObject:$$CollAmtTotal:SelectedLinesCollD:$Amount) Then $$String:@SelectedTotalD + $$String:@SelectedTotalValD Else ""

                Width            : 30

                Align            : Centre

                SelectedTotalD    : $$LocaleString:"Dr Side : "

                SelectedTotalValD: $$String:##SelectedLinesRajtSKRTotalD:"DrCr"

    Background           : if ##IsLineselected1 AND NOT $$IsEmpty:($$ReportObject:$$CollAmtTotal:SelectedLinesCollD:$Amount) Then "Rosy Brown"  Else @@SV_DAYBOOK

   Invisible          :   ##IsLedgerReport

[Field: LineselectedTotalC]

         

                Use                : Name Field         

                Set as            : if ##IsLineselected1 AND NOT $$IsEmpty:($$ReportObject:$$CollAmtTotal:SelectedLinesCollC:$Amount) Then $$String:@SelectedTotalC + $$String:@SelectedTotalValC Else ""

                Width            : 30

                Align            : Centre

                SelectedTotalC    : $$LocaleString:"Cr Side : "

                SelectedTotalValC: $$String:##SelectedLinesRajtSKRTotalC:"DrCr"

    Background           : if ##IsLineselected1 AND NOT $$IsEmpty:($$ReportObject:$$CollAmtTotal:SelectedLinesCollC:$Amount) Then "Rosy Brown"  Else @@SV_DAYBOOK

    Invisible          :   ##IsLedgerReport

[System: Variables]

        SelectedLinesRajtSKRTotal1 : 0

    SelectedLinesRajtSKRTotalD : 0

    SelectedLinesRajtSKRTotalC : 0

       IsLineselected1     : NO

 

[Variable: SelectedLinesRajtSKRTotal1]

        Type    : Amount

       Persistent : Yes

[Variable: SelectedLinesRajtSKRTotalD]

        Type    : Amount

       Persistent : Yes

[Variable: SelectedLinesRajtSKRTotalC]

        Type    : Amount

       Persistent : Yes

[Variable: IsLineselected1]

        Type    : Logical

[Collection:SelectedLinesColl1]

        Data Source    : Report    : Selected

        Fetch        : Amount

        Client Only    : Yes

[Collection:SelectedLinesCollD]

     Data Source    : Report    : Selected

        Fetch        : Amount

       Fetch        : AllLedgerEntries.LedgerName, AllLedgerEntries.Amount

        Fetch        : AllLedgerEntries.BankAllocations.*

        Client Only    : Yes

    Filter : onlydrdb

[Collection:SelectedLinesCollC]

     Data Source    : Report    : Selected

       Fetch        : Amount

    Fetch        : AllLedgerEntries.LedgerName, AllLedgerEntries.Amount

        Fetch        : AllLedgerEntries.BankAllocations.*

        Client Only    : Yes

    Filter : onlycrdb

[System : Formulae]

      

    onlycrdb : NOT $$isDr:$Amount

[System : Formulae]

        onlydrdb :$$IsDr:$Amount

[Color:Rosy Brown]

    RGB:188,143,143

[Color:MARON]

    RGB:123,17,19

;;===================================================CODE FOR Group Vouchers=================================================

[#Line : DSP VchClAmt]

   

    Add : Left Field :  NetAmtG, LineselectedTotalDrG, LineselectedTotalCrG

[#Line : DSP VchDetail]

    Option : SelectedLinesRajtSKRTotalOnFocusG 

  

[!Line : SelectedLinesRajtSKRTotalOnFocusG]                    

        On : Focus : Yes : Call : SelectedLinesRajtSKRTotalDrG

    On : Focus : Yes : Call : SelectedLinesRajtSKRTotalCrG

    On        : Focus    : Yes    : Call    : SelectedLinesRajtSKRTotalnetG

[Function : SelectedLinesRajtSKRTotalDrG]

    0010 : Set : SelectedLinesRajtSKRTotalDrG : ($$CollAmtTotal:SelectedLinesCollDjG:$TotalGrpDrVchAmt)

    0011 : Set : IsLineselectedDrG     : (NOT $$IsEmpty:##SelectedLinesRajtSKRTotalDrG)

  

[Function : SelectedLinesRajtSKRTotalCrG]

    0010 : Set : SelectedLinesRajtSKRTotalCrG : ($$CollAmtTotal:SelectedLinesCollCjG:$TotalGrpCrVchAmt)

    0011 : Set : IsLineselectedCrG     : (NOT $$IsEmpty:##SelectedLinesRajtSKRTotalCrG)   

[Function : SelectedLinesRajtSKRTotalnetG]

   0010 : Set : SelectedLinesRajtSKRTotalnetG : ($$CollAmtTotal:SelectedLinesCollnetG:$TotalGrpVchAmt)

    0011 : Set : IsLineselectednetG     : (NOT $$IsEmpty:##SelectedLinesRajtSKRTotalnetG)   

[Field : LineselectedTotalDrG]

    Use                : Name Field

    Set as             : if ##IsLineselectedDrG AND NOT $$IsEmpty:($$ReportObject:$$CollAmtTotal:SelectedLinesCollDjG:$TotalGrpDrVchAmt) Then $$String:@SelectedTotalDrG + $$String:@SelectedTotalValDrG Else ""

    Width              : 30

    Align              : Centre

    Background           : if ##IsLineselectedDrG AND NOT $$IsEmpty:($$ReportObject:$$CollAmtTotal:SelectedLinesCollDjG:$TotalGrpDrVchAmt) Then  "Released Blue" Else "RELEASED GREEN"

   Invisible           :   ##IsLedgerReport

    SelectedTotalDrG    : $$LocaleString:"Dr Total : "

    SelectedTotalValDrG : $$String:##SelectedLinesRajtSKRTotalDrG:"DrCr"

[Field : LineselectedTotalCrG]

    Use                : Name Field

    Set as             : if ##IsLineselectedCrG AND NOT $$IsEmpty:($$ReportObject:$$CollAmtTotal:SelectedLinesCollCjG:$TotalGrpCrVchAmt) Then $$String:@SelectedTotalCrG + $$String:@SelectedTotalValCrG Else ""

    Width              : 30

    Align              : Centre

    Background           : if ##IsLineselectedCrG AND NOT $$IsEmpty:($$ReportObject:$$CollAmtTotal:SelectedLinesCollCjG:$TotalGrpCrVchAmt) Then "CandyAppleGreen" Else "RELEASED GREEN"

  Invisible           :   ##IsLedgerReport

    SelectedTotalCrG    : $$LocaleString:"Cr Total : "

    SelectedTotalValCrG : $$String:##SelectedLinesRajtSKRTotalCrG:"DrCr"

[Field : NetAmtG]

    Use                 : Name Field

    Set as              :  if ##IsLineselectednetG AND NOT $$IsEmpty:($$ReportObject:$$CollAmtTotal:SelectedLinesCollnetG:$TotalGrpVchAmt) Then $$String:@SelectedTotalnetG + $$String:@SelectedTotalValnetG Else ""

    Width               : 30

    Align               : Centre

    Background            : if ##IsLineselectednetG AND NOT $$IsEmpty:($$ReportObject:$$CollAmtTotal:SelectedLinesCollNetG:$TotalGrpVchAmt) Then "Rosy Brown" Else "Released Green"

    Format                : "DrCr"

   Invisible           :   ##IsLedgerReport

    SelectedTotalNetG    : $$LocaleString:"Net Selection : "

    SelectedTotalValNetG : $$String:##SelectedLinesRajtSKRTotalnetG:"DrCr"

[System : Variables]

       SelectedLinesRajtSKRTotalDrG : 0

    SelectedLinesRajtSKRTotalCrG : 0

    SelectedLinesRajtSKRTotalNetG : 0

       

    IsLineselectedDrG     : NO

        IsLineselectedCrG     : NO

    IsLineselectednetG   : NO

  

[Variable : SelectedLinesRajtSKRTotalDrG]

    Type : Amount

Persistent : Yes

[Variable : SelectedLinesRajtSKRTotalCrG]

    Type : Amount

Persistent : Yes

[Variable : SelectedLinesRajtSKRTotalnetG]

    Type : Amount

    Persistent : Yes

[Variable : IsLineselectedDrG]

    Type : Logical

[Variable : IsLineselectedCrG]

    Type : Logical

[Variable : IsLineselectednetG]

    Type : Logical

[Collection : SelectedLinesCollnetG]

        Data Source : Report : Selected

        Fetch       : Name, TotalGrpVchAmt

        Client Only : Yes

[Collection:SelectedLinesCollDjG]

   

    Data Source    : Report    : Selected

       Fetch       : Name, TotalGrpDrVchAmt

    Filter : onlydrG

   

   

[Collection:SelectedLinesCollCjG]

   

    Data Source    : Report    : Selected

       Fetch       : Name, TotalGrpCrVchAmt

    Client Only    : Yes

    Filter : onlycrG

   

[System : Formulae]

      

    onlycrG : NOT $$isDr:$TotalGrpVchAmt

[System : Formulae]

    onlydrG : $$IsDr:$TotalGrpVchAmt

   

  

[Color: CandyAppleGreen]

RGB:0,204,153

[Color: AmericanRose]

RGB: 255,3,62

;;===================================================CODE FOR LEDGER=================================================

[#Line : DSP VchClAmt]

   

    Add : Left Field :  NetAmt, LineselectedTotalDr, LineselectedTotalCr

[#Line : DSP VchDetail]

    Option : SelectedLinesRajtSKRTotalOnFocus : ##IsLedgerReport

  

[!Line : SelectedLinesRajtSKRTotalOnFocus]                     ;; Line to Call Selected BillsTotal Function

        On : Focus : Yes : Call : SelectedLinesRajtSKRTotalDr

    On : Focus : Yes : Call : SelectedLinesRajtSKRTotalCr

    On        : Focus    : Yes    : Call    : SelectedLinesRajtSKRTotalnet

[Function : SelectedLinesRajtSKRTotalDr]

    0010 : Set : SelectedLinesRajtSKRTotalDr : ($$CollAmtTotal:SelectedLinesCollDj:$TotalLedDrVchAmt)

    0011 : Set : IsLineselectedDr     : (NOT $$IsEmpty:##SelectedLinesRajtSKRTotalDr)

  

[Function : SelectedLinesRajtSKRTotalCr]

    0010 : Set : SelectedLinesRajtSKRTotalCr : ($$CollAmtTotal:SelectedLinesCollCj:$TotalLedCrVchAmt)

    0011 : Set : IsLineselectedCr     : (NOT $$IsEmpty:##SelectedLinesRajtSKRTotalCr)   

[Function : SelectedLinesRajtSKRTotalnet]

   0010 : Set : SelectedLinesRajtSKRTotalnet : ($$CollAmtTotal:SelectedLinesCollnet:$TotalLedVchAmt)

    0011 : Set : IsLineselectednet     : (NOT $$IsEmpty:##SelectedLinesRajtSKRTotalnet)   

[Field : LineselectedTotalDr]

    Use                : Name Field

    Set as             : if ##IsLineselectedDr AND NOT $$IsEmpty:($$ReportObject:$$CollAmtTotal:SelectedLinesCollDj:$TotalLedDrVchAmt) Then $$String:@SelectedTotalDr + $$String:@SelectedTotalValDr Else ""

    Width              : 30

    Align              : Centre

    Background           : if ##IsLineselectedDr AND NOT $$IsEmpty:($$ReportObject:$$CollAmtTotal:SelectedLinesCollDj:$TotalLedDrVchAmt) Then  "Released Blue" Else "RELEASED GREEN"

    Invisible          : NOT  ##IsLedgerReport OR NOT $$InDisplayMode

    SelectedTotalDr    : $$LocaleString:"Dr Total : "

    SelectedTotalValDr : $$String:##SelectedLinesRajtSKRTotalDr:"DrCr"

[Field : LineselectedTotalCr]

    Use                : Name Field

    Set as             : if ##IsLineselectedCr AND NOT $$IsEmpty:($$ReportObject:$$CollAmtTotal:SelectedLinesCollCj:$TotalLedCrVchAmt) Then $$String:@SelectedTotalCr + $$String:@SelectedTotalValCr Else ""

    Width              : 30

    Align              : Centre

    Background           : if ##IsLineselectedCr AND NOT $$IsEmpty:($$ReportObject:$$CollAmtTotal:SelectedLinesCollCj:$TotalLedcrVchAmt) Then "CandyAppleGreen" Else "RELEASED GREEN"

   Invisible          : NOT  ##IsLedgerReport OR NOT $$InDisplayMode

    SelectedTotalCr    : $$LocaleString:"Cr Total : "

    SelectedTotalValCr : $$String:##SelectedLinesRajtSKRTotalCr:"DrCr"

[Field : NetAmt]

    Use                 : Name Field

    Set as              :  if ##IsLineselectednet AND NOT $$IsEmpty:($$ReportObject:$$CollAmtTotal:SelectedLinesCollnet:$TotalLedVchAmt) Then $$String:@SelectedTotalnet + $$String:@SelectedTotalValnet Else ""

    Width               : 30

    Align               : Centre

    Background            : if ##IsLineselectednet AND NOT $$IsEmpty:($$ReportObject:$$CollAmtTotal:SelectedLinesCollNet:$TotalLedVchAmt) Then "Rosy Brown" Else "Released Green"

    Format                : "DrCr"

    Invisible           : NOT  ##IsLedgerReport OR NOT $$InDisplayMode

    SelectedTotalNet    : $$LocaleString:"Net Selection : "

    SelectedTotalValNet : $$String:##SelectedLinesRajtSKRTotalnet:"DrCr"

[System : Variables]

       SelectedLinesRajtSKRTotalDr : 0

    SelectedLinesRajtSKRTotalCr : 0

    SelectedLinesRajtSKRTotalNet : 0

       

    IsLineselectedDr     : NO

        IsLineselectedCr     : NO

    IsLineselectednet   : NO

  

[Variable : SelectedLinesRajtSKRTotalDr]

    Type : Amount

Persistent : Yes

[Variable : SelectedLinesRajtSKRTotalCr]

    Type : Amount

Persistent : Yes

[Variable : SelectedLinesRajtSKRTotalnet]

    Type : Amount

    Persistent : Yes

[Variable : IsLineselectedDr]

    Type : Logical

[Variable : IsLineselectedCr]

    Type : Logical

[Variable : IsLineselectednet]

    Type : Logical

[Collection : SelectedLinesCollnet]

    Data Source : Report : Selected

    Fetch       : Name, TotalLedVchAmt

    Client Only : Yes

[Collection:SelectedLinesCollDj]

     Data Source    : Report    : Selected

  Fetch       : Name,TotalLedDrVchAmt

        Client Only    : Yes

    Filter : onlydr

[Collection:SelectedLinesCollCj]

     Data Source    : Report    : Selected

    Fetch       : Name, TotalLedCrVchAmt

        Client Only    : Yes

    Filter : onlycr

[System : Formulae]

      

    onlycr : NOT $$isDr:$TotalLedVchAmt

[System : Formulae]

        onlydr :$$IsDr:$TotalLedVchAmt

;;==============================================Code For Group Ledgers==========================================

[#Form: Group Summary]

    Add : Bottom Part : At End : Selected Total for Group Ledgers

    Add: Key: BottomToolBarBtn12

[Part : Selected Total for Group Ledgers]

        Line : Selected Total for Group Ledgers

[Line : Selected Total for Group Ledgers]

        Add : left Field :RajTSKRNettAmt,RajTSKRLineselectedTotalDebit,RajTSKRLineselectedTotalCredit

[#Line: DSP AccLine]

        Option : RajTSKRSelectedLinesTotalOnFocus

  

[!Line : RajTSKRSelectedLinesTotalOnFocus]                     ;; Line to Call Selected BillsTotal Function

    On : Focus : Yes : Call : RajTSKRSelectedLinesTotalDebit

    On : Focus : Yes : Call : RajTSKRSelectedLinesTotalCredit

    On : Focus : Yes : Call : RajTSKRSelectedLinesTotalNett

[Function : RajTSKRSelectedLinesTotalDebit]

    0010 : Set : RajTSKRSelectedLinesTotalDebit : ($$CollAmtTotal:RajTSKRSelectedLinesCollDebit:$Closingbalance)

    0011 : Set : RajTSKRIsLineselectedDebit     : (NOT $$IsEmpty:##RajTSKRSelectedLinesTotalDebit)

  

[Function : RajTSKRSelectedLinesTotalCredit]

    0010 : Set : RajTSKRSelectedLinesTotalCredit : ($$CollAmtTotal:RajTSKRSelectedLinesCollCredit:$Closingbalance)

    0011 : Set : RajTSKRIsLineselectedCredit     : (NOT $$IsEmpty:##RajTSKRSelectedLinesTotalCredit)

[Function : RajTSKRSelectedLinesTotalNett]

    0010 : Set : RajTSKRSelectedLinesTotalNett : ($$CollAmtTotal:RajTSKRSelectedLinesCollNett:$Closingbalance)

    0011 : Set : RajTSKRIsLineselectedNett     : (NOT $$IsEmpty:##RajTSKRSelectedLinesTotalNett)   

  

[Field : RajTSKRLineselectedTotalDebit]

    Use                : Name Field

    Set as             : if ##RajTSKRIsLineselectedDebit AND NOT $$IsEmpty:($$ReportObject:$$CollAmtTotal:RajTSKRSelectedLinesCollDebit:$Closingbalance) Then $$String:@SelectedTotalDebit + $$String:@SelectedTotalValDebit Else ""

    Width              : 30

    Align              : Centre

     Background           : if ##RajTSKRIsLineselectedDebit AND NOT $$IsEmpty:($$ReportObject:$$CollAmtTotal:RajTSKRSelectedLinesCollDebit:$Closingbalance) Then "Released Blue" Else @@SV_Groupsummary

   ; Invisible          : NOT  ##IsLedgerReport OR NOT $$InDisplayMode

    SelectedTotalDebit    : $$LocaleString:"Dr Total : "

    SelectedTotalValDebit : $$String:##RajTSKRSelectedLinesTotalDebit:"DrCr"

[Field : RajTSKRLineselectedTotalCredit]

    Use                : Name Field

    Set as             : if ##RajTSKRIsLineselectedCredit AND NOT $$IsEmpty:($$ReportObject:$$CollAmtTotal:RajTSKRSelectedLinesCollCredit:$Closingbalance) Then $$String:@SelectedTotalCredit + $$String:@SelectedTotalValCredit Else ""

    Width              : 30

    Align              : Centre

   Background           : if ##RajTSKRIsLineselectedCredit AND NOT $$IsEmpty:($$ReportObject:$$CollAmtTotal:RajTSKRSelectedLinesCollCredit:$Closingbalance) Then "CandyAppleGreen" Else @@SV_Groupsummary

    ;Invisible          : NOT  ##IsLedgerReport OR NOT $$InDisplayMode

    SelectedTotalCredit    : $$LocaleString:"Cr Total : "

    SelectedTotalValCredit : $$String:##RajTSKRSelectedLinesTotalCredit:"DrCr"

[Field : RajTSKRNettAmt]

    Use                 : Name Field

    Set as              :  if ##RajTSKRIsLineselectedNett AND NOT $$IsEmpty:($$ReportObject:$$CollAmtTotal:RajTSKRSelectedLinesCollNett:$Closingbalance) Then $$String:@SelectedTotalNett + $$String:@SelectedTotalValNett Else ""

    Width               : 30

    Align               : Centre

    Background            : if ##RajTSKRIsLineselectedNett AND NOT $$IsEmpty:($$ReportObject:$$CollAmtTotal:RajTSKRSelectedLinesCollNett:$Closingbalance) Then "Rosy Brown" Else @@SV_Groupsummary

    Format                : "DrCr"

    ;Invisible           : NOT  ##IsLedgerReport OR NOT $$InDisplayMode

    SelectedTotalNett   : $$LocaleString:"Net Selection : "

    SelectedTotalValNett : $$String:##RajTSKRSelectedLinesTotalNett:"DrCr"

[System : Variables]

        RajTSKRSelectedLinesTotalDebit : 0

    RajTSKRSelectedLinesTotalCredit : 0

    RajTSKRSelectedLinesTotalNett : 0

        RajTSKRIsLineselectedDebit     : NO

        RajTSKRIsLineselectedCredit     : NO

    RajTSKRIsLineselectedNett     : NO

  

[Variable : RajTSKRSelectedLinesTotalDebit]

    Type : Amount

[Variable : RajTSKRSelectedLinesTotalCredit]

    Type : Amount

  

[Variable : RajTSKRSelectedLinesTotalNett]

    Type : Amount

[Variable : RajTSKRIsLineselectedDebit]

    Type : Logical

[Variable : RajTSKRIsLineselectedCredit]

    Type : Logical

  

[Variable : RajTSKRIsLineselectedNett]

    Type : Logical

[System : Formulae]

      

    OnlyCrside : NOT $$isDr:$Closingbalance

    Onlydrside :$$IsDr:$Closingbalance

      

[Collection : RajTSKRSelectedLinesCollDebit]

       Data Source : Report : Selected

       Fetch       : Name,Closingbalance

       Client Only : Yes

    Filter : Onlydrside

[Collection : RajTSKRSelectedLinesCollCredit]

       Data Source : Report : Selected

       Fetch       : Name,Closingbalance

       Client Only : Yes

    Filter : OnlyCrside

[Collection : RajTSKRSelectedLinesCollNEtt]

       Data Source : Report : Selected

       Fetch       : Name,Closingbalance

       Client Only : Yes

[#Collection: Daybook Vouchers of Company]

    Fetch        : Allledgerentries.*,*.*

[#Collection : Filtered Vouchers of Company ]

    Fetch        : Allledgerentries.*,*.*

[#Collection : Specific Vouchers of Company]

    Fetch        : Allledgerentries.*,*.*

[#Collection: Vouchers of Ledger]

    Fetch        : Allledgerentries.*,*.*

[#Collection: Vouchers Of Group]

    Fetch        : Allledgerentries.*,*.*

Tally Chapter 181 TDL for Bulk Voucher Amount Change By Rajiv Mishra Computer Class

 

Few lines are missing here.

Pls Watch the full video first.

[#Form: Ledger Vouchers]

Add: Button: InputNewVchRajivamt1

[#Form: Day Book]

Add: Button: InputNewVchRajivamt1

[Button: InputNewVchRajivamt1]

Title: "Set Fix Vch Amt"

Key: CTRL+F7

Action List : InputVchRajivamt1, ModifyVchRajivamt 1

[Button: InputVchRajivamt1]

Key:CTRL+F7

Action: Alter: Rpt InputVchRajivamt1

[Button: ModifyVchRajivamt1]

Key: CTRL+F7

Action: Call : FuncEdit4

[Function: FuncEdit4]

Variable : MSTID : String

100 : WALK COLLECTION : SELRajivVouchers4

120 : SET : MSTID : "ID:"+ $$String:$MasterID

130 : NEW OBJECT : Voucher : ##MSTID

140 : SET TARGET : LedgerEntries[1]

160 : SET VALUE : Amount : #NvVchRajivamt

170 : SET TARGET : ..

172 : SET TARGET : LedgerEntries[2]

175 : SET VALUE : Amount : #NvVchRajivamt

177 : SET TARGET : ..

180 : SET TARGET : ..

190 : ACCEPT ALTER

200 : END WALK

[Collection: SELRajivVouchers4]

Data Source : Report : Selected

Fetch : All Ledger Entries

[Report: Rpt InputVchRajivamt1]

Title : "Set Vch Amount"

Form : Input VchRajivamt1

Auto : Yes

[Form: Input VchRajivamt1]

Part : Input VchRajivamt1

Width: 25% Screen

Height: 8% Screen

[Part: Input VchRajivamt1]

Line: New VchRajivamt1

[Line: New VchRajivamt1]

Field : Long Prompt , NewvchRajivamt

Local : Field: Long Prompt : Set As: "New Vch Amount"

[Field : NewvchRajivamt]

Use : Short Name Field

Modifies : NvVchRajivamt

Border : Thin Box

Width : 15

[System : Variable]

NvvchRajivamt : " "

Tally Chapter 179 TDL to Print Gross Qty Net Qty in Invoice By Rajiv Mishra Computer Class

 

Few Lines are missing here.

Watch the full video to get full coding.

Width : @@VCHQtyWidth

Setas : $$LocaleString:"Gross Wt."

Style : Small

Align : Centre

Border : Thin Right

Invisible : If @@IsJobOrdersOn OR @@IsExciseSupplementaryInv Then Yes Else NOT $DiffActualQty OR $$IsPhysStock:##SVVoucherType OR $$IsStockJrnl:##SVVoucherType

Skip : Yes

Fixed : Yes

[#Field: VCH BilledQtyTitle]

Width : @@VCHQtyWidth

Setas : $$LocaleString:"Net Wt."

Style : Small

Align : Centre

Inactive : If @@IsJobOrdersOn Then Yes Else NOT $DiffActualQty OR $$IsPhysStock:##SVVoucherType OR $$IsStockJrnl:##SVVoucherType

Skip : Yes

Fixed : Yes

[#Field: EXPINV ActualQtyTitle]

Use : QtyTitleField

Set as : if @@IsOrderVch then $$LocaleString:"To Ship" else $$LocaleString:"Gross Wt."

Align : Centre

Style : Small

Invisible : @@IsJobWorkVouchers OR NOT @@InvWithQty OR NOT @@InvWithActQty OR NOT $$InPixelMode

[#Field: EXPINV BilledQtyTitle]

Use : QtyTitleField

Set as : if @@IsOrderVch then $$LocaleString:"To Bill" else $$LocaleString:"Net Wt."

Border : Thin Left

Align : Centre

Style : Small

Inactive : @@IsJobWorkVouchers OR NOT @@InvWithActQty OR NOT $$InPixelMode

Invisible : NOT @@InvWithQty

Tally Chapter 178 TDL for Print Description Column By Rajiv Mishra Computer Class

 

Few lines are missing here.

Pls watch the full video first.

[#Line: EXPSMP Column1]

     Add:  Field      : After : EXPINV DescTitle  :RBCSMP AddlDescTitle; : @@RBCAddlDescDetails

     Add    : Right Field    :  Before : EXPINV QtyTitle : EXPINV PackagesTitle1

     Local          : Field : EXPINV PackagesTitle1    :  Border: Thin Left

     Local          : Field : EXPINV PackagesTitle1    :  Info: "Package"

     Local          : Field : EXPINV DescTitle    :  Align : Left

      

[#Line: EXPSMP Column2]

    Add:  Field     : After :EXPINV DiscTitle: RBCSMP Column2; :  @@RBCAddlDescDetails

    Add    : Right Field    :  Before : EXPINV ActualQtyTitle : EXPINV PackagesTitle2

    Local          : Field : EXPINV PackagesTitle2    :  Border: Thin Left

    Local          : Field : EXPINV PackagesTitle2    :  Info: ""  

[#Line: EXPSMP InvDetails]

    Add:  Field     : After :EXPINV Desc :RBCSMP AddlDesc InvDetails

    Add    : Field    :  Before : EXPINV ActualQty : EXPINV Packages

  

[Field:  RBCSMP AddlDescTitle]

    Use         : ShortName Field

    Info        : $$LocaleString:"Colour"

    Border      : Thin Left

    Align       : Left

    Style       : Small

    Cells       : If (@@InvWithActQty AND (NOT @@IsJobWorkVouchers)) Then 2 Else 1

    Width        : @@NameWidth - 15

    Invisible    : NOT @@RBCAddlDescDetails

  

[Field:  RBCSMP Column2]

    Use         : ShortName Field

    Set as      : ""

    Align       : Centre

    Style       : Small

    Width        : @@NameWidth - 15

    Invisible    : NOT @@RBCAddlDescDetails

  

[Field: RBCSMP AddlDesc InvDetails]

    Use         : Name Title Field

    Width        : @@NameWidth - 15

    Set as      : @@RBCColourName

    Align       : Left

    Style       : Small

    Border      : Thin Left

    Invisible    : NOT @@RBCAddlDescDetails

  

  

[#Line: EXPINV Column1]

    Add    : Left Field   : After : EXPINV DescTitle: RbcEXPINV AddlDescTitle

    Delete: Field    :    EXPINV PackagesTitle1  

    Add    : Right Field    :  Before : EXPINV QtyTitle : EXPINV PackagesTitle1  

    Local          : Field : EXPINV PackagesTitle1    :  Border: Thin Left

    Local          : Field : EXPINV PackagesTitle1    :  Info: "Package"

    Local          : Field : EXPINV DescTitle    :  Align : Left

[#Line: EXPINV Column2]

  

     Add:  Field     : After : EXPINV DescTitle: RbcEXPINV AddlDescTitle2

     Delete: Field    :    EXPINV PackagesTitle2  

     Add    : Right Field    :  Before : EXPINV ActualQtyTitle : EXPINV PackagesTitle2

    Local          : Field : EXPINV PackagesTitle2    :  Border: Thin Left

    Local          : Field : EXPINV PackagesTitle2    :  Info: ""  

[#Line: EXPINV InvDetails]

  

    Add:  Field      : After :  EXPINV Desc: RBCEXPAddlDescDetails

    Delete: Field    :    EXPINV Packages  

    Add    : Right Field    :  Before : EXPINV ActualQty : EXPINV Packages

    Local          : Field : EXPINV Packages    :  Border: Thin Left

    Local          : Field : EXPINV Packages    :  Style: Tiny

    Local          : Field : EXPINV Packages    :  Align: Justified

  

[#Line: EXPINV Totals]

    Delete: Field    :    EXPINV PackagesTitle1

    Add    : Right Field    :  Before : EXPINV ActualQtyTotal : EXPINV PackagesTitle1

    Local       : Field : EXPINV PackagesTitle1 : Info        : ""

    Local          : Field : EXPINV PackagesTitle1    :  Border: Thin Left

  

[Field:  RbcEXPINV AddlDescTitle]

    Use         : ShortName Field

    Info        : $$LocaleString:"Warrenty"

    Border      : Thin Left

    Align       : Left

    Style       : Small

    Cells       : If (@@InvWithActQty AND (NOT @@IsJobWorkVouchers)) Then 2 Else 1

    Width        : @@TrackingWidth

    Invisible    : NOT @@RBCAddlDescDetails

  

      

  

[Field:  RbcEXPINV AddlDescTitle2]

    Use         : ShortName Field

    Set as      : ""

    Align       : Centre

    Style       : Small

    Width        : @@TrackingWidth

    Cells       : If (@@InvWithActQty AND (NOT @@IsJobWorkVouchers)) Then 2 Else 1

    Invisible    : NOT @@RBCAddlDescDetails

  

[Field: RBCEXPAddlDescDetails ]

    Use         : ShortName Field

    Set as      : @@RBCColourName

    Style       : Small

    Align       : Left

    Border      : Thin Left

    Cells        : If (@@InvWithActQty AND (NOT @@IsJobWorkVouchers)) Then 2 Else 1

    Width        : @@TrackingWidth

    Invisible    : NOT @@RBCAddlDescDetails

  

  

  

[#Line: EXPINV AccDetails]

  

    Add    : Field: After: EXPINV AccDesc :RBCAccAddlDescDetails

    Delete: Field    :    EXPINV AccPackages

    Add    : Right Field    :  Before : EXPINV AccActualQty : EXPINV AccPackages

    Local          : Field : EXPINV AccPackages    :  Border: Thin Left

    [Field: RBCAccAddlDescDetails ]

        Use         : ShortName Field

        Border      : Thin Left

        Style       : Small

        Align       : Left

        Width        : @@TrackingWidth

        Set as      : @@RBCColourName

        Invisible    : NOT @@RBCAddlDescDetails

[Variable: RBCTraderAddlDesc]

    Type        : Logical

    Persistent    : Yes

  

[System: Variables]

RBCTraderAddlDesc : No

[#Part: VchF12PrnSTDConfig SalesInvoiceLeft]

  

Add : Line : Before : SATraderAddlDesc : RBCAddlDescColumn

  

[Line: RBCAddlDescColumn]

      

            Field        : Medium Prompt, Logical Field  

            Local        : Field : Medium Prompt    : Info        : $$LocaleString:"Print Additional Description in separate Column?"        ;;; To Display Print Additional Description(s) for Item Name in Print F12 Config

            Local        : Field : Logical Field    : Modifies  : RBCTraderAddlDesc

            ;Invisible   : NOT (@@IsExciseTraderOn AND @@IsSalesConfig AND ##IsExciseVoucher AND NOT @@IsTraderSVCommercialInvoice)

      

[System:Formulae]

RBCColourName :  @@VATBuyerDescription

Tally Chapter 177 TDL for Multiple Discount By Rajiv Mishra Computer Class

 

Few lines are missing here.

Pls watch the full video first.

[#Line : EI ColumnOne]

Option : Global EI ColumnOne

[!Line: Global EI ColumnOne]

Add : Right Fields : After : VCH DiscTitle : SchemeAmtTL,SchemeAmtTL1,SchemeAmtTL2

Info : "Dis-1"

Align : Centre

Width : 5

Style : Small

Border : Thin Left Right

Background : Red

[Field : SchemeAmtTL1]

Info : "Dis-2"

Align : Centre

Width : 5

Style : Small

Border : Thin Left Right

Background : Green

[Field : SchemeAmtTL2]

Info : "Dis-3"

Align : Centre

Width : 5

Style : Small

Border : Thin Left Right

Background : Blue

[#Line : EI ColumnTwo]

Option : Global EI ColumnTwo

[!Line: Global EI ColumnTwo]

Add : Right Fields : After : VCH DiscTitle : SchemeAmtTL ,SchemeAmtTL1,SchemeAmtTL2

Local : Field : SchemeAmtTL : Info : " "

[#Line : EI InvInfo]

Option : Global EI InvInfo

[#Line : CI InvInfo]

Option : Global EI InvInfo

[!Line: Global EI InvInfo]

Add : Right Fields : After : VCH Discount : SchemeAmt,SchemeAmt1,SchemeAmt2

[Field : SchemeAmt]

Use : Number Field

Width : 5

Set Always : Yes

Storage : SchemeAmt

Format : "Zero, Percentage"

Align : Right

[Field : SchemeAmt1]

Use : Number Field

Width : 5

Set Always : Yes

Storage : SchemeAmt1

Format : "Zero, Percentage"

Align : Right

[Field : SchemeAmt2]

Use : Number Field

Width : 5

Set Always : Yes

Storage : SchemeAmt2

Format : "Zero, Percentage"

Align : Right

[System:UDF]

SchemeAmt : Number : 2345

SchemeAmt1 : Number : 2346

SchemeAmt2 : Number : 2347

[#Field: VCH NrmlValue]

Delete : Set as

Add : Set as :($Rate * $BilledQty) * (100 - $SchemeAmt) / 100 *  (100 - $SchemeAmt1) / 100 *(100 - $SchemeAmt2) / 100

Tally Chapter 175 TDL for Auto Save as PDF By Rajiv Mishra Computer class

 

Few Lines are Missing Here.

Pls Watch the video to get full coding.

On : Form Accept : $$InAlterMode : CALL : SALES Export Report

On : Form Accept : $$InCreateMode : CALL : SALES Export Report

;; Function Definition begins

[Function: SALES Export Report]

10: SET : SVExportLocation : "C:\users\user\desktop\daily"

20: SET : SVExportFormat : $$SysName:pDF

30: Set : SVPrintFileName : $$String:$Vouchertypename+"_"+$$String:$vouchernumber

40: SET : SVPrintFileName : $$MakeExportName:##SVPrintFileName:##SVExportFormat

50: Set : SVPrintFileName :##SVExportLocation+"\"+#SVPrintFileName

60: EXPORT REPORT : . : TRUE

;; End of File

Tally Chapter 176 TDL for Batch MFG Expiry Columns in Voucher By Rajiv Mishra Computer Class

 

Few Lines are missing here.

Pls watch the video first to get the full coding/

[#Line: EI ColumnOne]

Option : TlyErp EI ColumnOne : 

[#Line: EI ColumnTwo]

Option : TlyErp EI ColumnOne : 

[#Line: EI ColumnOneRate]

Option : TlyErp EI ColumnOne : 

[!Line : TlyErp EI ColumnOne]

Add : Right Fields : Before : VCH QtyTitle : TlyErp VCH BatchTitle, TlyErp VCH MfgTitle, TlyErp VCH ExpTitle

[Field: TlyErp VCH BatchTitle]

Set as : $$LocaleString:"Batch No"

Style : Small Bold

Align : Centre

;Border : Double Sub Column Titles : If @@IsJobOrdersOn OR @@IsExciseSupplementaryInv Then No Else $DiffActualQty AND NOT @@IsPhysStock AND NOT @@IsStockJrnl

Skip : Yes

Fixed : Yes

;Width : if (@@HasMfgDateSet OR @@IsPhysStock) then 9 else @@VCHBatchNameWidth

Inactive : NOT @@HasBatchWise

[Field: TlyErp VCH MfgTitle]

Set as : $$LocaleString:"Mfg. Date"

Style : Small Bold

Align : Centre

;Border : Double Sub Column Titles : If @@IsJobOrdersOn OR @@IsExciseSupplementaryInv Then No Else $DiffActualQty AND NOT @@IsPhysStock AND NOT @@IsStockJrnl

Skip : Yes

Fixed : Yes

;Width : if (@@HasExpiryDate OR @@IsPhysStock) then 9 else @@VCHBatchNameWidth

Inactive : NOT @@HasBatchWise

[Field: TlyErp VCH ExpTitle]

Set as : $$LocaleString:"Exp. Date"

Style : Small Bold

Align : Centre

;Border : Double Sub Column Titles : If @@IsJobOrdersOn OR @@IsExciseSupplementaryInv Then No Else $DiffActualQty AND NOT @@IsPhysStock AND NOT @@IsStockJrnl

Skip : Yes

Fixed : Yes

;Width : if (@@HasMfgDateSet OR @@IsPhysStock) then 9 else @@VCHBatchNameWidth

Inactive : NOT @@HasBatchWise

;; ------------------------------------------------------------- ;;

[#Line: EI InvInfo]

Option : TlyErp EI InvInfo : 

[#Line: CI InvInfo]

Option : TlyErp EI InvInfo : 

[!Line : TlyErp EI InvInfo]

Add : Right Fields : Before : VCH BilledQty : TlyErp VCH BatchName, TlyErp VCH MfgDate, TlyErp VCH ExpDate

[Field : TlyErp VCH BatchName]

Use : Batch Name Field

Align : Centre

Style : Small

Set as : $BatchName

;Width : if (@@HasMfgDateSet OR @@IsPhysStock) then 9 else @@VCHBatchNameWidth

Inactive : NOT @@HasBatchWise

Color : @@SV_VCHCOLOR

Background : @@SV_VCHTYPE

[Field : TlyErp VCH MfgDate]

Use : Short Date Field

Align : Centre

Style : Small

Set as : $MfdOn

;Width : if (@@HasMfgDateSet OR @@IsPhysStock) then 9 else @@VCHBatchNameWidth

Inactive : NOT @@HasBatchWise

Color : @@SV_VCHCOLOR

Background : @@SV_VCHTYPE

[Field : TlyErp VCH ExpDate]

Use : Due Date Field

Align : Centre

Style : Small

Set as : $ExpiryPeriod

;Width : if (@@HasMfgDateSet OR @@IsPhysStock) then 9 else @@VCHBatchNameWidth

Inactive : NOT @@HasBatchWise

Color : @@SV_VCHCOLOR

Background : Green

Tally Chapter 174 TDL for Party Wise Last selling Price Column By Rajiv Mishra Computer Class

 

Few lines are missing here.

Pls watch the Full video first.

[#Line: EI ColumnOne] ;; Invoice Column Headings1 without class

Option : Global EI ColumnOne : @@IsSales

[#Line: EI ColumnOne]

Add : Right Fields : Before: VCH Qtytitle : PrevRate

Local : Field : Default : Align : Left

Local : Field : PrevRate : Info : "Prev. Rate"

[Field: PrevRate]

Use : Short Name Field

Width : 8

Align : Center

Invisible : NOT ##VrVarC1

Skip on : $$IsEnd:$StockItemName

[#Line: EI InvInfo]

Add : Right Fields : Before: VCH BilledQty : PrevRate1

Local : Field : Default : Align : Left

; Local: Field: default : Set as: $Prevrate1

[Collection: VCHSourceColl]

Type : Vouchers : VoucherType

Child of : $$VCHTypeSales

[Collection: VCH Summary Collection]

Source Collection : VCHSourceColl

Walk : Inventory Entries

By : Partyled : $PartyLedgerName

By : ItemName : $StockItemName

By : VoucherNo : $$Owner:$VoucherNumber

By : MasterId : $MasterId

Aggr Compute : RateValue : Sum : $Rate

Sort : Default : -$MasterId

[Field: PrevRate1]

Set as : $$FilterValue:$RateValue:VCHSummaryCollection:1:partyItemCheck

Width:20 mms

PartyItemCheck : $Partyled=$$ReqObject:($$Owner:$PartyLedgername) and $ItemName=#VCHStockItem

 

Tally Chapter 172 TDL for Custom Invoice Scrap Invoice By Rajiv Mishra Computer Class

 

Few Lines are missing here.

Watch the video first.

BottomParts : EXPINV Totals , EXPINV SignOff , EXPINV Customer, EXPINV Jurisdiction, EXPINV InvoiceCompGen

; Width : @@InvWidth Inch

; Height : @@InvHeight Inch

; Space Top : @@InvSpace inch

; Space Right : 0.5 inch

; Space Left : @@InvSpaceLeft inch

; Space Bottom: 0.25 inch

Page Break : EXPINV ClPageBreak, EXPINV OpPageBreak

Option : STX Comprehensive Invoice : @@IsIndianServiceTax AND $$STXCanUpdateDutyLed

Option : Invoice Bank Info Fetch : ##SABankInfo AND NOT $$IsSysName:##SABankName

;; When Sales Bill is made in Voucher mode, while printing sales ledger is also getting printed

Set Always : SVViewName : $$SysName:InvVchView

Delete :parts : STDInvoiceTop, EXPINV OpPageBreak, EXPINV Details

Delete :BottomParts : EXPINV Totals , EXPINV SignOff , EXPINV Customer, EXPINV Jurisdiction, EXPINV InvoiceCompGen

Add: Top Parts : INV;,EXPSMPtitle1

Height : 100% Page

Width : 100% Page

Space Top : 0.25 inch

Space Right : 0.25 inch

Space Left : 0.5 inch

Space Bottom: 0.5 inch

[part : INV]

;Line :RMCmpName,INVS, TRWK,RMCmpAdd, MIComPhone,MIVATTINNumber

Line :RMCmpName,INVS, TRWK,RMCmpAdd,MIVATTINNumber,CSTN

Repeat : RMCmpAdd:Company Address

Line : MI VCHDate,MI PartyName;, MI ColumnTitles

Add: Line: MIQuantity

Add: Line: MI rate

Add: Line: IE Amount , MI AmtInWords

Add: Line: Global ForCmp1

Add: Line: INCDetails

Border: MyBorder

;

[Border: MyBorder]

Top : Flush, Thin, Full Length

Bottom : Flush, thin, full length

Left : Thin

Right : Flush, Thin, Full Length

[Border: MyBorder1]

;Top : Flush, Thin, Full Length

Bottom : Flush, thin, full length

;Left : Thin

;Right : Flush, Thin, Full Length

[Line :INVS]

Field: INVS

[Field: INVS]

Set as : "Custome Title"

Style : newSTY2

Align : Center

FullWidth : Yes

[Line :TRWK]

Field: TRWK

[Field: TRWK]

Set as : "Rajiv Custom Invoice Title"

Style : newSTY2

Align : Center

FullWidth : Yes

[Line: RM CmpName]

Fields : RMcmpname

[Field : RMCmpName]

Set as :"Custom Other Info"

Align : Center

FullWidth : Yes

Style : newSTY1

[Line : RMCmpAdd]

Fields : RMCmpAdd

[Field : RMCmpAdd]

Set as : $Address

Align : Center

FullWidth : Yes

Style : newSTY1

/*

[Line: MI ComPhone]

Field : MI ComPhone

[Field: MI ComPhone]

Use : Name Field

Set as : $phonenumber:Company:##SvCurrentCompany

Indent : 10

*/

[Line: MI VATTINNumber]

Left Fields: Short Prompt, MI VATTINNumber

;Right Fields: Short Prompt, CSTN

Local : Field : Short Prompt : Set as : "FSSI No:"

;Local : Field : Short Prompt : Set as : "GST : "

[Field : MI VATTINNumber]

Use : Name Field

Set as : $VATTINNUMBER:Company:##SvCurrentCompany

;FullWidth : yes

Style : pp6

Align : Center

[Line: CSTN]

Right Fields: Short Prompt, CSTN

Local : Field : Short Prompt : Set as : "CST.N : "

[Field : CSTN]

Use : Name Field

Set as : $InterstateStnumber:Company:##SvCurrentCompany

;FullWidth : yes

Style : pp6

Align : Center

[Line: MI VCHDate]

Field : Simple Prompt, MI VCHNo

Right Field : Short Prompt, MI VCHDate

Local : Field : Short Prompt : Set as : "Voucher Date : "

Local : Field : Simple Prompt : Set as : " Voucher No : "

Border: MyBorder1

[Field: MI VCHDate]

Use : Short Date Field

Set as : $Date

[Field: MI VCHNo]

Use : Short Name Field

Set as : $VoucherNumber

[Line: MI PartyName]

Space Top: 1

Field : Short Prompt, MI PartyNAme

Local : Field : Short Prompt : Set as : "Purchaser: (Name & Vehical No: "

[Field: MI PartyName]

Use : Name Field

Set as : $PartyLedgerName

;Set as: $BuyerName

[Line: MIQuantity]

Space Top: 1

Field : Short Prompt, IE Qty

Local : Field : Short Prompt : Set as : "Quantity: "

[Field: MIQuantity]

Use : Qty Primary Field ;Number Field ;;

Use : Qty Primary Field

Set as : $BasicQty

Format : "NoSymbol,Primary"

[Field : IE Qty]

Use: Number Field

Set as : $$CollectionField:$BilledQty:1:InventoryEntries

[Line: MI rate]

Space Top: 1

Field : Short Prompt, MI rate

Local : Field : Short Prompt : Set as : "Unit Price: "

;Explode : Item Desc : $$NumItems:UserDescription > 0

[Field : MI rate]

Use : Rate Field

;Border : Thin Left

Rate Units Field

Use : Rate Price Field

Set as :$$CollectionField:$Rate:1:InventoryEntries

[Line: IE Amount]

Space Top: 1

Field : Short Prompt, IE Amount

Local : Field : Short Prompt : Set as : "Amount: "

[Field : IE Amount]

Use : Amount Field

Set as : $Amount

;Border : Thin Left Right

Format : "NoComma,NoZero"

;FullWidth : yes

[Line: MI AmtInWords]

Space Top: 1

Field : Short Prompt, MI AmtInWords

Local : Field : Short Prompt : Set as : "Rs: "

[Field : MI AmtInWords]

Use : Name Field

Set as : $$InWords:$Amount

FullWidth : yes

Style : Small

[Line: Global ForCmp1]

Space Top: 2

Right Fields: Global ForCmp1

Space Bottom: 2

[Field: Global ForCmp1]

Use : Name Field

Set as : "For " + @@CMPMailNAme

Align : Right

Width : 0

[Line: INCDetails]

Space Top: 1

Field : INCDetails

;Local : Field : Short Prompt : Set as : "All  taxes Shall be paid by the Buyer"

[Field: INCDetails]

Style : Normal1

Set as: "All taxes Shall be paid by the buyer"

/*[Collection:VCHCollection]

Type: Stock Item

*/

[System: Formula]

LargeSize : 14

SmallerSize : 6

;******************** Cardinal styles ********************;

[Style: Normal1]

;; for linux face name is changed

Font : if $$SysInfo:IsWindows then "Arial" else "Helvetica"

Bold: Yes

Height : @@LargeSize

Tally Chapter 170 Monthly Income Report By Rajiv Mishra Computer Class

 

Few lines of this code is Missing here.

Pls Watch the full video for  Full coding.

आप में से कई साथियों को Month wise Income रिपोर्ट बनानी होती है जिसमे काफी समय लगता है. आज की कोडन आपके समय को बचाएगी और बिलकुल Professional Monthly Yearly Income  रिपोर्ट दिखाएगी। 

Tally TDL की कुछ Lines आपको वीडियो में से लेनी है बाकि कोड नीचे दिया गया है। 

अब हम इसे इस्तेमाल करना समझेंगे।  वैसे तो यह बड़ा आसान तरीका है पर इसमें आपको अपने Voucher Entry की Date को ध्यान रखना है क्यूंकि यह रिपोर्ट Voucher Date के अनुसार उसी महीने की Income रिपोर्ट दिखती है।  आप रिपोर्ट में जा कर Period Change कर के Monthly And Yearly रिपोर्ट देख सकते है। 

बाकि पूरी जानकारी के लिए आपको इसकी वीडियो जरूर देखनी चाहिए। 

: Before : @@locQuit  : "Month Wise Income Report" : R : Display : Income

[Report:Income]

Use : DSP Template

Title  : "Month Wise Income Summary"

Repeat : IncomeStatement

Form : Income

        Variable : FilterIncomeStatementEBINCOME : String

Set     : FilterIncomeStatementEBINCOME : ""

                    Set      : SVFromDate          : $$MonthStart:##SVFromDate

Set      : SVToDate                 : $$MonthEnd:##SVCurrentDate       

Variable : SVFromDate, SVToDate

[Form:Income]

Button : PrintButton, ExportButton

Button : ExplodeFlag,ChangePeriod,BtnIncomeStatementFilter

Bottom Toolbar Buttons : Enter To Edit EBINCOME,BottomToolBarBtn8,BottomToolBarBtn9,BottomToolBarBtn10

Part : EBINCOMETitle,EBINCOMEPeriod,EBINCOMEDetails

                    Bottom Part : EBINCOMETotals

Width : 100% Page

Space Left : 2 mms

Space Right : 2 mms

                     

[Key: Enter To Edit EBINCOME]

    Key         : Enter

    Title       : $$LocaleString:"Explode"

    Type        : BottomToolBarBtn2    

    Action      : Explode

[Part:EBINCOMETitle]

Line : EBINCOMETitle

Horizontal Align : Center

[Part:EBINCOMEPeriod]

Line : EBINCOMEPeriod

[Line:EBINCOMETitle]

Field : Simple Field

Local : Field : Simple Field : Style : Large 

Local : Field : Simple Field : Info : "Month Wise Income Summary"

Local : Field : Simple Field : Border: Thin Bottom

Local : Field : Simple Field : Align : Center

[Line:EBINCOMEPeriod]

Right Field : Name Field

Left Field : Short Prompt,EBINCOMEfilterRpt

Local : Field : Name Field : Info : @@DSPDateStr

Local : Field : Name Field : Width : 60

Local : Field : Name Field : Align : Right

 

[Field:EBINCOMEfilterRpt] 

Use : Simple Field

Style : Normal Bold

Set as : @EBINCOMEIncomeStatement

Set Always : Yes

EBINCOMEIncomeStatement                     : If $$IsEndOfList:##FilterIncomeStatementEBINCOME or ##FilterIncomeStatementEBINCOME="" Then "" Else ##FilterIncomeStatementEBINCOME

[Line:EBINCOMEHead]

Use : EBINCOMEDetails

Border : Column Titles

Local : Field : Default : Type : String

Local : Field : Default : Align : Center

Local : Field : Default : Border : Thin Left

Local : Field : Default : Style : Large

Local : Field : EBINCOMESno : Set as : "S.No."

Local : Field : EBINCOMESno : Border : Thin Left Right

Local : Field : EBINCOMEIncomeStatement : Set as : "Name of the Income"

Local : Field : EBINCOMEIncomeStatement : Align : Center

Local : Field : EBINCOMEAprQty : Set as : "Apr"

  Local : Field : EBINCOMEMayQty : Set as : "May"

Local : Field : EBINCOMEQtyJunEBINCOME : Set as : "Jun"

Local : Field : EBINCOMEJulQty : Set as : "Jul"

Local : Field : EBINCOMEAugQty : Set as : "Aug"

Local : Field : EBINCOMESepQty : Set as : "Sep"

Local : Field : EBINCOMEOctQty : Set as : "Oct"

Local : Field : EBINCOMEnovQty : Set as : "Nov"

Local : Field : EBINCOMEdecQty : Set as : "Dec"

Local : Field : EBINCOMEjanQty : Set as : "Jan"

Local : Field : EBINCOMEfebQty : Set as : "Feb"

Local : Field : EBINCOMEmarQty : Set as : "Mar"

Local : Field : EBINCOMETotal : Set as : "Total"

Local : Field : EBINCOMETotal : Border : Thin Left Right

Space Top : 1.5 mms

Space Bottom: 1.5 mms

                   

[Part:EBINCOMEDetails]

Line : EBINCOMEHead,EBINCOMEDetails

Repeat : EBINCOMEDetails:EBINCOMEPartyWise

Scroll : Vertical

Total : EBINCOMEAprQty,EBINCOMEMayQty,EBINCOMEQtyJunEBINCOME, EBINCOMEJulQty, EBINCOMEAugQty, EBINCOMESepQty,EBINCOMEOctQty,EBINCOMEnovQty,EBINCOMEdecQty,EBINCOMEjanQty,EBINCOMEfebQty,EBINCOMEmarQty,EBINCOMETotal

Common Border : Yes

[Line:EBINCOMEDetails]

Field : EBINCOMESno,EBINCOMEIncomeStatement

Right Field : EBINCOMEAprQty,EBINCOMEMayQty,EBINCOMEQtyJunEBINCOME, EBINCOMEJulQty, EBINCOMEAugQty, EBINCOMESepQty,EBINCOMEOctQty,EBINCOMEnovQty,EBINCOMEdecQty,EBINCOMEjanQty,EBINCOMEfebQty,EBINCOMEmarQty,EBINCOMETotal

Option : AlterOnEnter : $$IsVoucher 

Space Bottom: 0.5 mms

Space Top : 0.5 mms

Border : Thin Top

[Field:EBINCOMEDefault]

Use : Name Field

Style : Normal 

[Field:EBINCOMESno]

Use : EBINCOMEDefault

Set as : $$Line

Width : if $$inprintmode then 3 else 4

Align : Center

Border : Thin Left Right

[Field:EBINCOMEIncomeStatement]

Use : EBINCOMEDefault

Set as : $IncomeStatement

Width : if $$inprintmode then 20 else 30

Quick Search: Yes

[Field:EBINCOMEAprQty]

Use : Qty Field

Type : Number

Set as : $QtyAprEBINCOME 

Width : if $$inprintmode then 7 else 8

Border : Thin Left Right

[Field:EBINCOMEMayQty]

Use : Qty Field

                    Type : Number

Set as : $QtyMayEBINCOME

Width : if $$inprintmode then 7 else 8

Border : Thin Right

[Field: EBINCOMEQtyJunEBINCOME] 

Use : Qty Field

                    Type : Number

Set As : $QtyJunEBINCOME

Border : Thin Right

Style : Normal Bold

Width : if $$inprintmode then 7 else 8

[Field: EBINCOMEJulQty] 

Use : Qty Field

                    Type : Number

Set As : $QtyJulEBINCOME

Border : Thin Right

Style : Normal Bold

Width : if $$inprintmode then 7 else 8

[Field: EBINCOMEAugQty] 

Use : Qty Field

                    Type : Number

Set As : $QtyAugEBINCOME

Border : Thin Right

Style : Normal Bold

Width : if $$inprintmode then 7 else 8

[Field: EBINCOMESepQty]  

Use : Qty Field

                    Type : Number

Set As : $QtySepEBINCOME

Border : Thin Right

Style : Normal Bold

Width : if $$inprintmode then 7 else 8

[Field: EBINCOMEOctQty] 

Use : Qty Field

                    Type : Number

Set As : $EBINCOMEOctQty

Border : Thin Right

Style : Normal Bold

Width : if $$inprintmode then 7 else 8

[Field: EBINCOMEnovQty] 

Use : Qty Field

                    Type : Number

Set As : $EBINCOMEnovQty

Border : Thin Right

Style : Normal Bold

Width : if $$inprintmode then 7 else 8

[Field: EBINCOMEdecQty] 

Use : Qty Field

                    Type : Number

Set As : $EBINCOMEdecQty

Border : Thin Right

Style : Normal Bold

Width : if $$inprintmode then 7 else 8

[Field: EBINCOMEjanQty] 

Use : Qty Field

                    Type : Number

Set As : $EBINCOMEjanQty

Border : Thin Right

Style : Normal Bold

Width : if $$inprintmode then 7 else 8

[Field: EBINCOMEfebQty] 

Use : Qty Field

                    Type : Number

Set As : $EBINCOMEfebQty

Border : Thin Right

Style : Normal Bold

Width : if $$inprintmode then 7 else 8

[Field: EBINCOMEmarQty] 

Use : Qty Field

                    Type : Number

Set As : $EBINCOMEmarQty

Border : Thin Right

Style : Normal Bold

Width : if $$inprintmode then 7 else 8

[Field:EBINCOMETotal]

Use : Qty Field

Set as : $TotAmount

                   Type : Number

Width : if $$inprintmode then 7 else 8

Border : Thin Right

 

[Part:EBINCOMETotals]

Line : EBINCOMETotal

[Line:EBINCOMETotal]

Border : Totals

Use : EBINCOMEDetails

Local : Field : Default : Type : String

Local : Field : Default : Align : Right

Local : Field : Default : Style : Large Bold

Local : Field : Default : Border : Thin Left

             

Local : Field : EBINCOMESno : Set as : ""

Local : Field : EBINCOMEIncomeStatement : Set as : "Grand Total"

                    Local : Field : EBINCOMEIncomeStatement : Align : Center

Local : Field : EBINCOMEAprQty : Set as : $$Total:EBINCOMEAprQty

Local : Field : EBINCOMEMayQty : Set as : $$Total:EBINCOMEMayQty

Local : Field : EBINCOMEQtyJunEBINCOME : Set as : $$Total:EBINCOMEQtyJunEBINCOME

Local : Field : EBINCOMEJulQty : Set as : $$Total:EBINCOMEJulQty

Local : Field : EBINCOMEAugQty : Set as : $$Total:EBINCOMEAugQty

Local : Field : EBINCOMESepQty : Set as :$$Total:EBINCOMESepQty

Local : Field : EBINCOMEOctQty : Set as : $$Total:EBINCOMEOctQty

Local : Field : EBINCOMEnovQty : Set as : $$Total:EBINCOMEnovQty

Local : Field : EBINCOMEdecQty : Set as : $$Total:EBINCOMEdecQty

Local : Field : EBINCOMEjanQty : Set as : $$Total:EBINCOMEjanQty

Local : Field : EBINCOMEfebQty : Set as :$$Total:EBINCOMEfebQty

Local : Field : EBINCOMEmarQty : Set as : $$Total:EBINCOMEmarQty

Local : Field : EBINCOMETotal : Set as : $$Total:EBINCOMETotal

Local : Field : EBINCOMETotal : Border : Thin Left Right

Local : Field : EBINCOMETotal : Align : Right

[Part:EBINCOMEExplode]

Line : EBINCOMEExplode

Repeat : EBINCOMEExplode:EBINCOMEPartyExplode

Border : Thin Bottom

[Line:EBINCOMEExplode]

Use : EBINCOMEDetails

Delete : Border

Local : Field : EBINCOMESno : Set as : "" ;$$Line

Local : Field : Default : Style : Normal

Local : Field : Default : Color : Blue

Local : Field : EBINCOMEIncomeStatement : Set as : $ItemNamencome

Local : Field : EBINCOMEIncomeStatement : Align : Justified

 

Local : Field : EBINCOMEAprQty : Set as : $itemQtyAprEBINCOME

Local : Field : EBINCOMEMayQty : Set as : $itemQtyMayEBINCOME

Local : Field : EBINCOMEQtyJunEBINCOME : Set as : $ItemQtyJunEBINCOME

Local : Field : EBINCOMEJulQty : Set as :$ItemQtyJulEBINCOME

Local : Field : EBINCOMEAugQty : Set as : $ItemQtyAugEBINCOME

Local : Field : EBINCOMESepQty : Set as :$ItemQtySepEBINCOME

Local : Field : EBINCOMEOctQty : Set as : $ItemEBINCOMEOctQty

Local : Field : EBINCOMEnovQty : Set as : $ItemEBINCOMEnovQty

Local : Field : EBINCOMEdecQty : Set as : $ItemEBINCOMEdecQty

Local : Field : EBINCOMEjanQty : Set as : $ItemEBINCOMEjanQty

Local : Field : EBINCOMEfebQty : Set as :$ItemEBINCOMEfebQty

Local : Field : EBINCOMEmarQty : Set as : $ItemEBINCOMEmarQty

Local : Field : EBINCOMETotal : Set as : $itemEBINCOMETotalQty

 

     

[Button:BtnIncomeStatementFilter]

Key : F2

Action : Execute : IncomeWise

Title : Select Income

[Report:IncomeWise]

Form : IncomeWise

[Form:IncomeWise]

Part         : IncomeWise

Space Left : 2 mms

Space Right     : 2 mms

[Part:IncomeWise]

Line : IncomeWise 

[Line:IncomeWise]

Field : Medium Prompt,IncomeWise

Local : Field : Medium Prompt : Set as : "Select Income Name:"

Space Bottom : 2 mms

[Field:IncomeWise]

Table : filterledgerEBINCOME,EndOfList

ShowTable : Always

Use : Name Field

Width : 20

Border : Thin Box

Variable : FilterIncomeStatementEBINCOME

Modifies : FilterIncomeStatementEBINCOME

 

[Collection: filterledgerEBINCOME]

    Type: Ledger

    

    BelongsTo: Yes

FILTER : INCOMELEDGER

[System:formula]

INCOMELEDGER : $$IsBelongsTo:$$GroupDirectIncomes OR + $$IsBelongsTo:$$GroupIndirectIncomes

  

[System:Formula]

EBINCOMEFilter : $IncomeStatement=@@PartyLedgerWiseEBINCOME or $$IsSysName:##FilterIncomeStatementEBINCOME

PartyLedgerWiseEBINCOME : If $$IsEndOfList:##FilterIncomeStatementEBINCOME or ##FilterIncomeStatementEBINCOME="" Then $LedgerName Else ##FilterIncomeStatementEBINCOME

EBINCOMEExplodeFilter                        : $IncomeStatement=#EBINCOMEIncomeStatement

     EBINCOMEExplodeFilterB                        : $IncomeStatement=#EBINCOMEIncomeStatement

 

[Collection: EBINCOME Voucher]

Type    : Vouchers ;: VoucherType

Belongs to   : Yes

Fetch            : date,VoucherTypeName,PartyLedgerName,Amount,PAYHEADNAME,Allledger Entries,Voucher Number,VoucherNumber,Reference,ledgername,amount,allledger Entries

[Collection:EBINCOMEPartyWise]

Source Collection : EBINCOME Voucher

Walk : allledger Entries

By : IncomeStatement      : $LedgerName

Aggr Compute : QtyAprEBINCOME : Sum : If @@EBINCOMEmonthFilterapr Then $Amount Else 0 

Aggr Compute : QtyMayEBINCOME : Sum : If @@EBINCOMEmonthFiltermay Then $Amount Else 0 

Aggr Compute : QtyJunEBINCOME : Sum : If @@EBINCOMEmonthFilterjun Then $Amount Else 0

Aggr Compute : QtyJulEBINCOME : Sum : If @@EBINCOMEmonthFilterjul Then $Amount Else 0

Aggr Compute : QtyAugEBINCOME : Sum : If @@EBINCOMEmonthFilteraug Then $Amount Else 0

Aggr Compute : QtySepEBINCOME : Sum : If @@VoucherFilterExpEBINCOME and    @@EBINCOMEmonthFiltersep Then $Amount Else 0

Aggr Compute : EBINCOMEOctQty : Sum : If @@VoucherFilterExpEBINCOME and    @@EBINCOMEmonthFilteroct Then $Amount Else 0

Aggr Compute : EBINCOMEnovQty : Sum : If @@VoucherFilterExpEBINCOME and    @@EBINCOMEmonthFilternov Then $Amount Else 0

Aggr Compute : EBINCOMEdecQty : Sum : If @@VoucherFilterExpEBINCOME and    @@EBINCOMEmonthFilterdec Then $Amount Else 0

Aggr Compute : EBINCOMEjanQty : Sum : If @@VoucherFilterExpEBINCOME and    @@EBINCOMEmonthFilterjan Then $Amount Else 0

Aggr Compute : EBINCOMEfebQty : Sum : If @@VoucherFilterExpEBINCOME and    @@EBINCOMEmonthFilterfeb Then $Amount Else 0

Aggr Compute : EBINCOMEmarQty : Sum : If @@VoucherFilterExpEBINCOME and    @@EBINCOMEmonthFiltermar Then $Amount Else 0

Aggr Compute : TotAmount      : Sum  : If @@VoucherFilterExpEBINCOME Then $Amount Else 0 

Sort : Default : $IncomeStatement

Filter: iexpEBINCOME

Filter          : EBINCOMEFilter

[Collection:EBINCOMEPartyExplode]

Source Collection : EBINCOME Voucher

Walk : ledger Entries

By : IncomeStatement : $LedgerName

By : ItemNamencome : $vouchernumber

Aggr Compute : itemQtyAprEBINCOME  : Sum : If    @@EBINCOMEmonthFilterapr Then $Amount Else 0 

Aggr Compute : itemQtyMayEBINCOME : Sum : If    @@EBINCOMEmonthFiltermay Then $Amount Else 0

Aggr Compute : itemQtyJunEBINCOME : Sum : If    @@EBINCOMEmonthFilterjun Then $Amount Else 0

Aggr Compute : itemQtyJulEBINCOME : Sum : If    @@EBINCOMEmonthFilterjul Then $Amount Else 0

Aggr Compute : itemQtyAugEBINCOME : Sum : If    @@EBINCOMEmonthFilteraug Then $Amount Else 0

Aggr Compute : itemQtySepEBINCOME : Sum : If @@VoucherFilterExpEBINCOME and    @@EBINCOMEmonthFiltersep Then $Amount Else 0

Aggr Compute : itemEBINCOMEOctQty : Sum : If @@VoucherFilterExpEBINCOME and    @@EBINCOMEmonthFilteroct Then $Amount Else 0

Aggr Compute : itemEBINCOMEnovQty : Sum : If @@VoucherFilterExpEBINCOME and    @@EBINCOMEmonthFilternov Then $Amount Else 0

Aggr Compute : itemEBINCOMEdecQty : Sum : If @@VoucherFilterExpEBINCOME and    @@EBINCOMEmonthFilterdec Then $Amount Else 0

Aggr Compute : itemEBINCOMEjanQty : Sum : If @@VoucherFilterExpEBINCOME and    @@EBINCOMEmonthFilterjan Then $Amount Else 0

Aggr Compute : itemEBINCOMEfebQty : Sum : If @@VoucherFilterExpEBINCOME and    @@EBINCOMEmonthFilterfeb Then $Amount Else 0

Aggr Compute : itemEBINCOMEmarQty : Sum : If @@VoucherFilterExpEBINCOME and    @@EBINCOMEmonthFiltermar Then $Amount Else 0

Aggr Compute : itemEBINCOMETotalQty : Sum : If @@VoucherFilterExpEBINCOME Then $Amount Else 0

Filter : EBINCOMEExplodeFilter

Sort : Default : $ItemNamencome

[System : Formula]

iexpEBINCOME  : $$IsLedOfGrp:$IncomeStatement:$$GroupDirectIncomes or $$IsLedOfGrp:$IncomeStatement:$$GroupIndirectIncomes

 

iexpEBINCOMEl : $$IsLedOfGrp:$name:$$GroupIndirectIncomes or $$IsLedOfGrp:$name:$$GroupDirectIncomes

 

VoucherFilterExpEBINCOME : $$IsPayment:$VoucherTypeName or $$IsPurchase:$VoucherTypeName or $$IsSales:$VoucherTypeName or $$IsReceipt:$VoucherTypeName or $$IsJournal:$VoucherTypeName

EBINCOMEmonthFilterapr : $$MonthOfDate:$Date>=4 and $$MonthOfDate:$Date<=4 

EBINCOMEmonthFiltermay : $$MonthOfDate:$Date>=5 and $$MonthOfDate:$Date<=5

EBINCOMEmonthFilterjun : $$MonthOfDate:$Date>=6 and $$MonthOfDate:$Date<=6

EBINCOMEmonthFilterjul  : $$MonthOfDate:$Date>=7 and $$MonthOfDate:$Date<=7

EBINCOMEmonthFilteraug  : $$MonthOfDate:$Date>=8 and $$MonthOfDate:$Date<=8

EBINCOMEmonthFiltersep  : $$MonthOfDate:$Date>=9 and $$MonthOfDate:$Date<=9

 EBINCOMEmonthFilteroct : $$MonthOfDate:$Date>=10 and $$MonthOfDate:$Date<=10

EBINCOMEmonthFilternov  : $$MonthOfDate:$Date>=11 and $$MonthOfDate:$Date<=11

EBINCOMEmonthFilterdec  : $$MonthOfDate:$Date>=12 and $$MonthOfDate:$Date<=12

EBINCOMEmonthFilterjan  : $$MonthOfDate:$Date>=1 and $$MonthOfDate:$Date<=1

EBINCOMEmonthFilterfeb  : $$MonthOfDate:$Date>=2 and $$MonthOfDate:$Date<=2

EBINCOMEmonthFiltermar  : $$MonthOfDate:$Date>=3 and $$MonthOfDate:$Date<=3

[Variable: IncomeStatement]

Type : String

Repeat : ##DSPRepeatCollection

[Variable:FilterIncomeStatementEBINCOME]

Type : String

[System:Variables]

FilterIncomeStatementEBINCOME : ""

 

;*******