I want to create additional field in sales register

Could not able to understand your question.
Do you want to add a Driver Mobile Number is Sales Voucher and Get that in Sales Register?

 

Code:

[#Part: VCHTitle2Left]
    Option    : TDLeXperts VCHDriverMobileNo    :@@IsSales
 
[!Part    :TDLeXperts VCHDriverMobileNo]
 
    Add    : Line:AtEnd:TDLeXperts VCHDriverMobileNo
 
    [Line    : TDLeXperts VCHDriverMobileNo]
 
    Field    : Medium Prompt,TDLeXperts VCHDriverMobileNo
 
        Local    : Field:Medium Prompt:Info:"Driver Mobile No:"
        Local    : Field:Medium Prompt:Width: 8% Page
   
        [Field    : TDLeXperts VCHDriverMobileNo]
            Use        : Name Field
            Set as    : $TDLeXpertsVCHDriverMobNo
            Storage    : TDLeXpertsVCHDriverMobNo
            Style    : Normal
            Width    : 10% Page
   
 
[System    : UDF]
    TDLeXpertsVCHDriverMobNo    :String    :365
 
[#Part: CMP COLBasics]
    Add        : Line:AtEnd: JVVShow RefDate
 
    [Line    : JVVShow RefDate]
        Fields      : Medium Prompt,JVVShow RefDate
        Local      : Field : Medium Prompt : Info      : $$LocaleString:"Show Driver Mobile No ?"        ;;; String displayed Columnar Register Configuration
 
        [Field: JVVShow RefDate]
            Use    : Logical Field
            Modifies: TDLeXpertsShowDriverNo
   
[Variable: TDLeXpertsShowDriverNo]
 
    Type        : Logical
    Persistent  : Yes
 
[System    : Variable]
    TDLeXpertsShowDriverNo:""
 
 
[#Line    : DSP ColVchTitle]
 
 
    Add    : Fields    : After : DBC VchNo    : TDLeXperts DriverMobNo
 
    Local    : Field    : Default : Style    : Small Italic
 
    Local    : Field    : TDLeXperts DriverMobNo    : Set As    : "Driver Mobile"
 
[#Line    : DSP ColVchDetail]
 
    Add    : Field    : After    : DBC VchNo: TDLeXperts DriverMobNo
 
        [Field    : TDLeXperts DriverMobNo]
   
            Use        : Name Field
            SetAs    : $TDLeXpertsVCHDriverMobNo
            Width    : 13% Page
            Border    : Thin Left
            Style    : Small
            Invisible  : NOT ##TDLeXpertsShowDriverNo
 
 
[#Line    : DSP ColVchTotal]
    Add        : Field    : After    : DBC VchNo    : TDLeXperts SalesEmpty
    Local    : Field    : TDLeXperts DriverMobNo    : Invisible    : Yes
 
    [Field    : TDLeXperts SalesEmpty]
        Use        : Name Field
        SetAs    : ""
        Width    : 13% Page
 
[#Collection    : Columnar Filtered Vouchers of Company]
    Fetch    : TDLeXpertsVCHDriverMobNo
 
[#Collection: Columnar Vouchers of Ledgers]
    Fetch    : TDLeXpertsVCHDriverMobNo
 
 

 

Hope u will enjoy

 

Could not get your question

 

Please follow the same procedure..