[#Part:VCHTitle2Right]
option:LearnwellDate
[!Part:LearnwellDate]
Add:Lines:AtEnd:LWDDate,LWSalesMan
[Line:LWDDate]
Field:MediumPrompt,LWDateType
Local:Field:MediumPrompt:Info:”Delivery Date”
Local:Field:MediumPrompt:Width:8% Page
[Line:LWSalesMan]
Field:MediumPrompt,LWSalesMType
Local:Field:MediumPrompt:Info:”Sales Man”
Local:Field:MediumPrompt:Width:8% Page
[Field:LWDateType]
Use:Name Field
Storage:LearnWellStr1
Width:20
Set Always:Yes
Skip:$$InAlterMode
[Field:LWSalesMType]
Use:Name Field
Storage:LearnWellStr2
Width:20
Set Always:Yes
Skip:$$InAlterMode
[System:UDF]
LearnWellStr1:String:880
LearnWellStr2:String:890
[#Line:DSP VCHACCTitles]
Add:Right Fields:Before:DSP VCHTypeTitle:LWDTitle,LWSTitle
[Field:LWDTitle]
Use:Name Field
Set As:”Delivery Date”
Skip:Yes
Color:Blue
[Field:LWSTitle]
Use:Name Field
Set As:”Sales Man”
Skip:Yes
Color:Blue
[#Line:DSP VCHDetail]
Add:Right Fields:Before:DSP VCHType:LWDDetail,LWSDetail
[Field:LWDDetail]
Use:Name Field
Set As:$LearnWellUDF1
Skip:Yes
Color:Blue
[Field:LWSDetail]
Use:Name Field
Set As:$LearnWellUDF2
Skip:Yes
Color:Blue
[#Collection:Vouchers of Ledger]
Compute:LearnWellUDF1:$LearnWellStr1
Compute:LearnWellUDF2:$LearnWellStr2
[#Part:Expinv Terms]
Add:Lines:Expinv SubTitle,LWTermP
Local:Field:Expinv SubTitle:Info:”Other Sales Detail”
Local:Field:Expinv SubTitle:Border:Thin Bottom
Repeat:LWTermP:LWTermPP
Invisible:Not @@IsInvoice
[Line:LWTermP]
Field:NameField
Local:Field:NameField:Set As:$Name
Local:Field:NameField:Widht:45% page
[Collection:LWTermPP]
ListName:”Delivery Date :” + #LWDDetail
ListName:”Sales Man :” +#LWSDetail