Help with this code

please help with this code
i want to fetch stock item name according to stock group name tried this but not working

Code:

;;-----------------------------------------------------------------------------------------------------------------------------
[#Line: EI ColumnOne]
    Add: Option:  grp groupselectiontitle:@@IsSales

[!Line :grp groupselectiontitle]
    Add: Field: Before:VCH ItemTitle:grpGrouptitField
   
[Field: grpGrouptitField]
    Width: 50 Mms
    Info: "Groups"
    Style: tiny bold
   
[#Field: VCH ItemTitle]
    Space Left: 15 mms
[#Line: Eiinvinfo]
    Add: Option: grp groupselection:@@IsSales

[#Line: CIInvInfo]
    Add: Option: grp groupselection:@@IsSales
   
[!Line: grp groupselection]
    Add: Field: Before:VCH StockItem:grpGroupField

[Field: grpGroupField]
    Use: Name Field
    Wdith : 50 mms
    Storage: grpvchGrP
    Table: grpgrpcoll
    Show Table : Always
    Modifies: MygrpName
    Set Always: yes
   
   
[#Field: VCH StockItem]
    Table : vchgrpitemcoll,End of List
[collection : vchgrpitemcoll]
    Title : $$Localestring:"List of Stock Items"
    Type : Stockitem
    Child Of:##MygrpName
    Fetch : Name, closingBalance
    Format : $Name, 40
    Format : $closingBalance:Base
    Full Height : yes
    Align : Right

[Variable: MygrpName]
    Type: String

[System: Variable]
    MygrpName:""

[Collection: grpgrpcoll]
    Type: stockgroup
   


[System: UDF]
    grpvchGrP : String: 2300

 

[#Line: EI ColumnOne]
Add: Option: grp groupselectiontitle@IsSales

[!Line :grp groupselectiontitle]
Add: Field: Before:VCH ItemTitle:grpGrouptitField

[Field: grpGrouptitField]
Width: 50 Mms
Info: "Groups"
Style: tiny bold

[#Field: VCH ItemTitle]
Space Left: 15 mms
[#Line: Eiinvinfo]
Add: Option: grp groupselection@IsSales

[#Line: CIInvInfo]
Add: Option: grp groupselection@IsSales

[!Line: grp groupselection]
Add: Field: Before:VCH StockItem:grpGroupField

[Field: grpGroupField]
Use: Name Field
Width : 50 mms
Storage: grpvchGrP
Table: grpgrpcoll
Show Table : Always
Modifies: MygrpName
Set Always: yes


[Collection: grpgrpcoll]
Type: stockgroup
; Use : List of StockGroups
Collection : Primary
Variable : Stock Group Name
Fetch : Name


[System: UDF]
grpvchGrP : String: 2300



[*Collection: Vch Stock Item Extract]
Use : ExtractAlias Collection
Source Collection : Stock Item Src
Collection : StockItem PartNo With Closing
Title : $$LocaleString:"List of Items"
Fetch : Name,parent,Category, VchStkItmBalance,LastSalePrice
Set as : $FirstName
Keep Source : ()...
Client Only : Yes
Filter : Mrinfo1
Format : $VchStkItmBalance : "Base"
Format : $LastSalePrice: "Base"
Add: With Alias : Yes


[System:formula]
Mrinfo1:$$IsEqual:$Parent:$$LocaleString:#grpGroupField

 

Saying vch stock item extract description not found

 

Just do this code will work
[#Collection: Vch Stock Item Extract]
filter:Mrinfo1
[System:formula]
Mrinfo1:$$IsEqual:$Parent:$$LocaleString:#grpGroupField

 

[#Collection : VCH Stock Item Extract]
Add : Subtitle : "CL. QTY AS ON VOUCHER DATE"
Add :Format : $VchStkItmBalance:$closingstock:$voucherdate,10


How to add item closing stock balnce as voucher date.
thank you for advance sir.