TDL code requested to add more fields in LEDGER

I want to add additional field in ledger for more phone nos. email ids etc. Please help for TDL Code. Screenshot attached in JPEG format. Thanks in advance.

 

modify this line and add fields as per u req. like this and create UDF to hold values of your fields

[#Line: LED PIN Code]
ADD : Fields : your field1 , your field2 , your field3 ;.........

[Field: your field1]
Use : Name Field
Storage : your field1
[Field: your field2]
Use : Name Field
Storage : your field1
[Field: your field3]
Use : Name Field
Storage : your field1

[System: UDF]
your field1 : string : 2001
your field2 : string : 2002
your field3 : string : 2003

 

;;;;;;;;;;;;;;;;;;;;ADDING LOCATION FIELD IN A/C MASTER - DISPLAY IN GROUP INFORMATION

[#Line: DSP AccLine]
Add : Fields : After : DSP AccName : Mlocation, MAccNo, MFavouring

[Field : Mlocation]
Use : Short Name Field
Set as : $ShipDocumentNo:Ledger@DSPAccName
Invisible : not ##Location
[Field : MAccNo]
Use : Short Name Field
Set as : $DueDateOfPymt:Ledger@DSPAccName
Invisible : not ##Location
[Field : MFavouring]
Use : Short Name Field
Set as : $TypeOfDuty:Ledger@DSPAccName
Invisible : not ##Location

[Button: Location]
Key : Ctrl+L
Title : "Location"
Action : Set : Location : NOT ##Location

[Variable : Location]
Type : Logical

[System : Variable]
Location : No

[#Form : Group summary]
Button : Location

[#Part: LED Other Details]
Option : MDFLED Other Details

[!Part : MDFLED Other Details]
Add : Lines : MDFLED Loc, MDFLED AccNo, MDFLED Favouring

[Line : MDFLED Loc]
Fields : Medium Prompt, MDFLED Loc
Local : Field : Medium Prompt : Set as : "Location :"

[Field : MDFLED Loc]
Use : Short Name Field
Storage : ShipDocumentNo
Set Always : Yes
Inactive : $$IsEmpty:#LEDMailingName

[Line : MDFLED AccNo]
Fields : Medium Prompt, MDFLED AccNo
Local : Field : Medium Prompt : Set as : "Bank Account No. :"

[Field : MDFLED AccNo]
Use : Short Name Field
Storage : DueDateOfPymt
Set Always : Yes
Inactive : $$IsEmpty:#LEDMailingName


[Line : MDFLED Favouring]
Fields : Medium Prompt, MDFLED Favouring
Local : Field : Medium Prompt : Set as : "In Favour of :"

[Field : MDFLED Favouring]
Use : Short Name Field
Storage : TypeOfDuty
Set Always : Yes
Inactive : $$IsEmpty:#LEDMailingName

 

Dear Manoj,
In Group summary the new fields are not Showing

 

It is showing by using Ctrl + L

 

Dear manoj please reply " " means

 

Dear Mr. Laxman,

Please download the TDL Reference Mannual and learn the basics of TDL.

 

how can i create a automatic create group company ledger,,exp ..... 5 sis. company in 1 group company, if i create 1 sis com. create ledger, then this ledger automatic create in all 5 sis company,,,,

 

Add Title Fields

 

please correct this code i want add supplier invoice no in ladger dispaly




[#Line : DSPVCHTitles]

Add : RightField : ATBeginning : AGSLVSupplierInvoiceNoT

[Field : AGSLVSupplierInvoiceNoT]

Use : NameField
Width : 15% screen
Set as : " Supplier Invoice No"
Background : yellow

[#Line : DSPVCHDetail]

Add : RightField : ATBeginning : AGSLVSupplierInvoiceNo

[Field : AGSLVSupplierInvoiceNo]

Use : NameField
Width : 15% screen
Set as : $Supplier Invoice No
Background : yellow

[#Collection : Voucher of Ledger]

Add : Fetch : Supplier Invoice No

 

Plz share code to add title field in group summary