please correct my code to fetch all stock items in a delivery note

[#Field: default]

Add:Tooltip:$$DescName

[#Menu: Gateway of Tally]

Add : Key Item : Before : @@locQuit : Delivery Note Report : L : Display elivery Note Report

[Report: delivery note Report]

Form : delivery note form
Use : DSP Template
Variables : SV CurrentCompany, SV FromDate, SV ToDate,
Variables : IsDayBook, IsItemReport, VoucherTypeName, FamilyVoucherFlag
Variables : IsLedgerReport


[Form:delivery note form]

Part : headerpart,delivery note part
Height : 100% page
Width : 100% page
Button : F2 TDS Change Periods
Use : Empty Right Buttons Template
Replace : Button : F3 InactiveButton : Change Company
Replace : Button : F2 InactiveButton : F2 Change Period





[part : headerpart]

line : cmp nameline, cmpaddressline,Stateline,country line,CmpGSTline,cmpEmailline,PHONEREVERSE, headerLine,
Repeat : cmpaddressline : cmpAddressColl
Height : 35% page
Space Bottom : 0.5
Space Top : 0.5



[Line:cmp nameline]

Field : cmpany namefield
Space Top : 0.3
Space Bottom : 0.3

[Field:cmpany namefield]

Set as : @@CMPmailname
Style : largebold
Color : blue
Space Left : 50% page


[Line: cmpaddressline]

Field : cmpadressfield

Space Bottom : 0.3
Space Top : 0.3

[Field:cmpadressfield]

Set as : $address
; Color : blue
Space Left : 50% page

;[Lineincodeline]
;
; Field : pincode
; Space Bottom : 0.3
; Space Top : 0.3
;
;
;[Fieldincode]
;
; Set as : "Pincode:" + $pincode:Company:##SVCurrentCompany
; Space Right : 40% page


[Line: CmpGSTline]

Field : CmpGSTfield
Right Field : cmpcinfield
Space Top : 0.3
Space Bottom : 0.3


[Field: CmpGSTfield]

Set as : "GSTIN/UIN :" +$GSTRegNumber:TaxUnit@CMPExcisePrimaryGodown +" "
Space Left : 40% page

[Field:cmpcinfield]

Set as : "CIN:"+ $CorporateIdentityNo:Company:##SVCurrentCompany
Space Right : 19% page


[Line:Stateline]

Field : Statefield,codefield,
;Right Field : codefield,
Space Top : 0.3
Space Bottom : 0.3

[Field: Statefield]

Set as : "State Name : "+$StateName:Company:##SVCurrentCompany+","
Space Left : 40% page

[Field : codefield]

Set as : " Code :"+$$getgststatecode:$StateName:Company:##SVCurrentCompany + +" "+ "Pincode:" + $pincode:Company:##SVCurrentCompany
Space Right : 22% page



[Line :country line]

Field : country field
Space Top : 0.3
Space Bottom : 0.3



[ Field : country field]

Set as : "Country :"+$countryname:Company:##SVCurrentCompany
Space Left : 40% page

[Line:cmpEmailline]

Field : cmpEmailfield,
Right Field : WebSiteLine
Space Top : 0.3
Space Bottom : 0.3



[Field: cmpEmailfield]

Set as : "E-mail :" +$Email:Company:##SVCurrentCompany
Space Left : 40% page


[Field:WebSiteLine]

Set as : "WebSite : "+@@CmpWebsite
Space Right : 23.5% page


[LineHONEREVERSE]

Field : PHONEREVERSEfield
Right Field : mobilefield
Space Bottom : 0.3
Space Top : 0.3


[FieldHONEREVERSEfield]

Set as : "Phone No :"+$phonenumber:Company:##SVCurrentCompany
Full Width : yes
Space Left : 40% page

[Field:mobilefield]

Set as : "Mobile No :"+$MobileNumbers:Company:##SVCurrentCompany
Space Right : 23.5% page


[line : headerLine]


Field : NameField, ShortPrompt, DSP MainDateTitle
Space Top : 0.3
Space Bottom : 0.3


local : field : NameField : Set as : "Delivery Note Register"
local : field : NameField : width : 42
local : field : NameField : style : NormalBold
local : field : NameField : color : blue
local : field : ShortPrompt : SET AS : $$LocaleString:"Period" + " : "
;local : field : DSP MainDateTitle : Space Left : 70% page
local : field : DSP MainDateTitle : width : 40
local : field : DSP MainDateTitle : align : left
local : field : DSP MainDateTitle : color : blue
local : field : NameField : Space Left : 40% page


[Part:delivery note part]

Line : deliverynote Titles,deliverynotedetails
Repeat : deliverynotedetails : VoucherCollection
Scroll : Vertical
Common Border : Yes
Width : 100% page
Height : 90% page

[Line : deliverynote Titles]

Field : vchnumbers,date,customername,stockitems
Height : 4% page
Space Bottom : 0.3
Space Top : 0.5


Local : Field : Default : Type : String
Local : Field : Default : Style : Normal Bold
Local : Field : Default : Border : thinright
Local : Field : Default : Align : Left
Local : Field : Default : Border : Column Titles


Local : Field : vchnumbers : info : $$LocaleString:"Voucher No"
Local : Field : date : info : $$LocaleString:"Date"
Local : Field : customername : info : $$LocaleString:"Customer Name"
Local : Field : stockitems : info : $$LocaleString:"Items Supplied"


[Field : vchnumbers ]

Width : 15% page

[Field : date ]

Width : 10% page

[Field : customername]


Full Width : Yes

[Field: stockitems ]


Width : 30% page


[Line:deliverynotedetails]

Field : vchnumbersdetail,datedetail,customernamedetail,stockitemsdetail
Space Top : 0.3
Space Bottom : 0.3


Local : Field : Default : Style : Normal Bold
Local : Field : Default : Border : thinright
Local : Field : Default : Align : Left



[Field:vchnumbersdetail]

Use : Short Name Field
Width : 15% page
Set as : $VoucherNumber

[Field:datedetail]

Use : Uni Date Field
Set as : $Date
Width : 10% page

[Field:customernamedetail]

Set as : $LedgerName
Full Width : Yes

[Field:stockitemsdetail]

Set as : $StockItemName
Width : 30% page

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;collection;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;

[Collection: cmpAddressColl]

Type : Address : Company
Child of : ##SVCurrentCompany

[Collection : VoucherCollection]

Type : Vouchers:VoucherType ;Voucher
Fetch : AllLedgerEntries,InventoryEntries,*.*
Belongs To : Yes
Child Of : 'Delivery Note'
Filter : deliverynote


;Compute : InventoryEntries : $$AllocIndentQty:$StockItemName


[System:Formula]

;deliverynote:Voucher Type= Delivery Note
deliverynote:$voucherTypeName="Delivery Note" ;$$IsDelNote=Yes

 

Yes sir am a fresher ....

 

Code:

[Collection : VoucherCollection]

Type : Vouchers:VoucherType ;Voucher
Fetch : AllLedgerEntries,InventoryEntries,*.*
Belongs To : Yes
Child Of : $$VchTypeDelNote

Walk : Inventory Entries

Compute : StockItemName : $StockItemName

You don't need to add that filter since you're using child of...

 

okay..how to get all the stockitems in a deliverynote

 

[Collection : VoucherCollection]

Type : Vouchers:VoucherType ;Voucher
Child Of : $$VchTypeDelNote
Belongs To : Yes
Fetch : AllLedgerEntries,InventoryEntries,*.*

[Collection: VchItemCollection]
Use : VoucherCollection

Walk : Inventory Entries

Compute : StockItemName : $StockItemName

;;repeat your line with this collection --> VchItemCollection

 

Okay sir

Ok sir tq