Tally Chapter 154 TDL for Stock Group wise Item Selection in Invoice By Rajiv Mishra Computer Class.

Few Lines are Missing Here. Watch the full Video to get full code.

 

Option : Global EI ColumnOne1:(@@issales or @IsPurchase) and Not ##SVAcctsInvoice

[!Line : Global EI ColumnOne1]

add : fields: before:VCH ItemTitle : VCH Group

[field : vch Group]

use : name field

Info : "Stock Group"

Width : 24

style : Small bold

[#Line : EI InvInfo]

Option : Global EI ColumnOne2

[#Line : CI InvInfo]

Option : Global EI ColumnOne2:(@@issales or @IsPurchase) and Not ##SVAcctsInvoice

[!Line : Global EI ColumnOne2]

add : fields:before: VCH StockItem : vchgroup1

[field : vchgroup1]

Use : Create Stock Group

Table : Stock Group Extract, Primary, EndofList,Create Master

Show Table : Always

Key : Create Stock Group, Alter StkGrp

Variable : SV Stock Group

Set as : ""

Modifies : DEFStockGroupName

Common Table: No

Fetch Object : StockGroup : $$Value : BaseUnits, AdditionalUnits, Conversion, Denominator, +

IsBatchWiseOn, HasMfgDate, IsPerishableOn, CostingMethod, +

ValuationMethod, IgnorePhysicalDifference, IgnoreNegativeStock, TreatSalesAsManufactured, +

TreatPurchasesAsConsumed, TreatRejectsAsScrap, AllowUseOfExpiredItems

Width:24

Storage:vchgroup1

Dynamic: ""

[#Field:VCH StockItem]

Show Table:Always

Dynamic: ""

;[#Collection: Vch Stock Item Extract]

;Filter:vchGroup

;

;

[System:Formula]

vchGroup: $$IsBelongsTo:#vchgroup1;;$$IsEqual:$parent:#vchgroup1

[#Collection: Vch Stock Item Extract Server]

Use : Vch Stock Item

Filter:vchGroup

[#Collection: Vch Stock Item Extract Remote]

Title : $$LocaleString:"List of Stock Items"

Collection : VCH StockItemAlias Src, VCH StockItemPartNo Src

Set as : $FirstName

Client Only : Yes

Keep Source : ().

Full Height : Yes

Align : Right

Format : $Name, 25

Format : $VchStkItmBalance : "Base"

Filter:vchGroup

[System:UDF]

vchgroup1:String:1875