Tally Chapter 250 TDL For GST to PAN number update By Rajiv Mishra Computer Class

 

Few Lines are Missing here.

Pls watch the full video to get full coding.

[System: Formula]

locRpt067 : $$LocaleString:"GST TO PAN "

[#Menu: Rajiv Mishra]

Add: Key Item : @@locRpt067 : U : Alter Collection : C067Main : NOT $$IsEmpty:$$SelectedCmps

[Collection: C067Main]

<unitgroup:multiled>

Use : Multi Ledger

Delete : Report

Add : Report: R067Main

[Report: R067Main]

<unitgroup:multiled>

Use : Multi Master Report

Family : $$Translate:"Accounts Masters"

Title : $$SPrintf:mad:@MultiLedgerCreateModeFormat:mad:@ModeName:mad:@SubModeName

Variables : MGroup

Set : SVAccounts : Yes

Set : SVInventory : No

Set : SVStatutory : No

Set : SVTallyShop : No

Multi Objects : Ledger Under MGroup

Delete: Form

Add: Form: A067Main

Variable: v067AddByGST : Logical: No

Variable: v067ClearPAN : Logical: No

[Form: A067Main]

Use : Multi Master Form

Normal Color : @@SV_COSTCATEGORY

Parts : P067MLEDBody ;, MLED Body,MLEDDefault,

Space Bottom : 0

Button : Btn067GstToPan,Btn067ClearPAN

[Button : Btn067GstToPan]

Title : GST To PAN

Key : F10

Action : Set : v067AddByGST : NOT ##v067AddByGST

[Button : Btn067ClearPAN]

Title : Clear All PAN

Key : F11

Action : Set : v067ClearPAN : NOT ##v067ClearPAN

[Part : P067MLEDBody]

Lines : L067MLEDTitle,L067MLEDBody

Scrolled: Vertical

Repeat : L067MLEDBody : LedgerUnderMGroup

Break On : $$IsEmpty:$Name

[Line: L067MLEDTitle]

Field: MultiSNo Title, Multi Master Name Title, Multi Master Parent Title, MLED Opening Title,MLED OpeningDr Title, MSTSortPosTitle

Local: Field : Multi Master Name Title : Info : $$LocaleString:"Name of Ledger"

Local: Field : Multi Master Name Title : Width: 40% Screen

Local: Field : MLED Opening Title : Info : $$LocaleString:"GST Reg. Type"

Local: Field : MLED OpeningDr Title : Info : $$LocaleString:"GSTIN/UIN"

Local: Field : MSTSortPosTitle : Info : $$LocaleString:"PAN/IT No."

Local: Field : MLED Opening Title : Width : 15

Local: Field : MLED OpeningDr Title : Width : 18

Local: Field : MSTSortPosTitle : Width : 12

Local: Field : Default : Style : Normal Bold

Local: Field : Default : Align : Center

[Line: L067MLED Body ]

Field: F067SrNo,F067Name,F067Parent,F067GSTDType,F067GSTNo, F067PANNo

Local: Field: MMParentOption : Skip : YES

Local: Field: Default : Style : Normal

[Field: F067SrNo]

Use: MultiSNo

[Field: F067Name]

Use: Multi MST Name;Name Field

Local: Field: Multi Master Name : Skip: YES

Local: Field: Multi Master Name : Width: 40% Screen

[Field: F067Parent]

Use : Name Field

Inactive: $$IsEmpty:$Name

Set as : $Parent

Skip : YES

Align : Center

Border : Thin Left

[Field: F067GSTDType]

Use : LED GSTDealerType

Inactive: $$IsEmpty:$Name

Border : Thin Left

[Field: F067GSTNo]

Use : LED GSTIN

Delete : Invisible: ##MVInMultiMode

Inactive: $$IsEmpty:$Name

Width : 18

Border : Thin Left

[Field: F067PANNo]

Use : LED IT No

Delete : Invisible : ##MVInMultiMode

Inactive: $$IsEmpty:$Name

Width : 12

Border : Thin Left

Set By Condition: @myCondiGSTToPAN : @myGSTToPAN

Set By Condition: @myCondiPANClear : ""

myCondiGSTToPAN : ##v067AddByGST And $$IsEmpty:$$Value And Not $$isEmpty:#F067GSTNo

myCondiPANClear : ##v067ClearPAN And Not $$IsEmpty:$$Value

myGSTTOPAN : $$StringPart:#F067GSTNo:10:10

Set Always : YES

[#Line: L067MLEDTitle]

Local: Field : MSTSortPosTitle : Delete: Invisible