Tally Chapter 236 TDL for 2 Custom Columns PRINT By Rajiv Mishra computer Class

 

Few Lines are missing here.

Pls Watch the full video to get full coding.

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

Option : Global EI ColumnOne : @@IsSales

;; "Global" prefix is added for better readability of the code

[!Line: Global EI ColumnOne]

Add : Right Fields : At Beginning : Global VCH Marks, Global VCH NumPack

;;Need to mention Right Fields, since just Field means Left Field

;;and we need “NumPack” Column to the right of the screen at beginning

Local : Field : Default : Align : Center

Local : Field : Global VCH Marks : Info : "Weight"

Local : Field : Global VCH NumPack : Info : "No. of Packages"

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

Option : Global EI ColumnTwo : @@IsSales

[!Line: Global EI ColumnTwo]

Add : Right Fields : At Beginning : Global VCH Marks, Global VCH NumPack

Local : Field : Default : Align : Center

Local : Field : Global VCH Marks : Info : ""

Local : Field : Global VCH Marks : Width : 9

Local : Field : Global VCH NumPack : Info :""

[#Line: EI InvDetails]

Option : Global EI InvDetails : @@IsSales

[!Line: Global EI InvDetails]

Delete : Lines : EI Marks, EI NumPackages

[#Line: CI InvDetails]

Option : Global CI InvDetails : @@IsSales

[!Line: Global CI InvDetails]

Delete : Lines : CI MarksPackages

[#Line: EI InvInfo] ;; Invoice Inventory Entries without Class

Option : Global EI InvInfo : @@IsSales

[#Line: CI InvInfo] ;; Invoice Inventory Entries with Class

Option : Global EI InvInfo : @@IsSales

[!Line: Global EI InvInfo]

Add : Right Fields : At Beginning : Global VCH Marks, Global VCH NumPack

Local : Field : Global VCH Marks : Storage : BasicPackageMarks

Local : Field : Global VCH NumPack : Storage : BasicNumPackages

[Field: Global VCH Marks]

Use : Short Name Field

Width : 8

Align : Right

Border : Thin Left Right

Invisible : NOT ##VrVarC1

Skip on : $$IsEnd:$StockItemName

;; Inactive : $$IsEnd:$StockItemName

[Field: Global VCH NumPack]

Use : Short Name Field

Width : 12

Align : Right

Border : Thin Left Right

Invisible : NOT ##VrVarC1

Skip on : $$IsEnd:$StockItemName

;; Inactive : $$IsEnd:$StockItemName

[#Form: Export Invoice]

Option : Global Export Invoice NP : @@IsSales

[!Form : Global Export Invoice NP]

Local : Line : VCH NarrPrompt: Add : Right Fields : At Beginning : Global Total Marks, Global Total NumPack

[Field: Global Total Marks]

Use : Global VCH Marks

Border : Totals

Set as : $$String:mad:@NumPackMarksTotal

Set always : Yes

Skip : Yes

[Field: Global Total NumPack]

Use : Global VCH NumPack

Border : Totals

Set as : $$String:mad:@NumNumPackTotal

Skip : Yes

Set always : Yes

[System: Formula]

NumNumPack : $$Number:$BasicNumPackages

NumNumPackTotal : $$CollNumTotal:InventoryEntries:mad:@NumNumPack

NumPackMarks : $$Number:$BasicPackageMarks

NumPackMarksTotal : $$CollNumTotal:InventoryEntries:mad:@NumPackMarks

[#Line: EXPINV Column1]

Option : TAXINCLU : @@IsSales

[!Line : TAXINCLU]

Add : Left Fields : After : EXPINV DescTitle : TAXINC

Local : Field : TAXINC : Info : "No of Pack"

Local : Field : TAXINC : Width : 5.5

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 : Number Field

Width : 6

Set As :""

Align : Right

Border: Thin Left

Skip : YES

[#Line: EXPINV Column1]

Option : TAXINCLUd : @@IsSales

[!Line : TAXINCLUd]

Add : Left Fields : After : EXPINV DescTitle : TAXINCd

Local : Field : TAXINCd : Info : "Wt in KG"

Local : Field : TAXINCd : Width : 5.5

Local : Field : TAXINCd : Align : Center

[#Line: EXPINV InvDetails]

Option : dEB EXPINV InvDetails : @@IsSales

[!Line : dEB EXPINV InvDetails]

Add : Left Fields : After : EXPINV Desc : TAXINCd

[Field: TAXINCd]

Use : Text Field

Width : 6

Set As :""

Align : Right

Border: Thin Left

Skip : YES