Correct Code Request : MRP Not Being Fetched

Hi,
So I compiled codes from a few locations and more or less got what I required. The only thing is that it is not fetching MRP and the Qty Field in coming in the higher Unit and not in the lower unit. Can someone help in correcting this code to fetch the MRP Correctly and Also for the Qty Field to display the lower unit.

It would be of immense help for me.

Attached 2 Files 1 - Display of the Code as it is below
2 - Is the actual Invoice Print - Ideally I would like all the fields to come as it is Like MRP, rate, Disc and Amout.

Here is the code

;; Sri Ganeshji : Sri Balaji : Sri Pitreshwarji : Sri Durgaji : Sri Venkateshwara

[#Form: SalesColor]

Add : Print : TSPL FFEInvoice

[Report: TSPL FFEInvoice]

Use : Printed Invoice
Delete : Form
Add : Form : TSPL FFEInvoice
PrintSet: Report Title : "Stock Group wise Inventory Total"

[Form: TSPL FFEInvoice]

Use : STDInvoiceDimensions
Part : TSPL FFEBodyPart
Space Top : 0 mms
Space Bottom : 0 mms
PageBreak : TSPL FFEClosingPageBreak,TSPL FFEOpeningPageBreak

FetchObject : Stock Item: @@InvEntryList : Parent


;;-------------------------------------------------------------------------------------------
[Part: TSPL FFEOpeningPageBreak]

Parts : TSPL FFEColHeads
Local : Part : TSPL FFEColHeads : Border : Thin Left Right
Vertical: Yes


[Part: TSPL FFEClosingPageBreak]

Use : TSPL FFEBottomPart

Local : Field : TSPL FFEAmtInWords : Set as : 'continued...'
Local : Field : TSPL FFEAmtInWords : Align : Right
Local : Field : TSPL FFEAmtInWords : Style : Normal

;;----------------------------------------------------------------------------

;---------------------- BODY PART -------------------------------------------------------------------

[Part: TSPL FFEBodyPart]

Parts : TSPL FFEcolchk
Vertical : Yes

[Part: TSPL FFEcolchk]

Parts : TSPL FFEColHeads, TSPL FFEInventoryPart
Vertical : Yes
Border : Thin Left Right

[Part: TSPL FFEColHeads]

Lines : TSPL FFEItemsDesHead, TSPL FFEItemsDesHead1

[Line: TSPL FFEItemsDesHead]

Fields : TSPL FFEItemMarks, TSPL FFEItemPackages, TSPL FFEItemDescription, TSPL FFEItemQty, TSPL MRP, TSPL FFEItemRate
Right Field : TSPL FFEItemAmount
PrePrinted : Yes

[Field: TSPL FFEItemMarks]

Set As : "Sl No"
Width : 23 mms
Align : Left
Style : Normal Bold

[Field: TSPL FFEItemPackages]

Set As : "Item Name"
Width : 34 mms
Align : Center
Style : Normal Bold

[Field: TSPL FFEItemDescription]

Set As : "Group Name"
Width : 59 mms
Align : Center
Style : Normal Bold

[Field: TSPL FFEItemQty]

Set As : "Quantity"
Width : 24 mms
Align : Center
Border : Thin Left
Style : Normal Bold

[Field: TSPL MRP]
Set As : "MRP"
Width : 23 mms
Border : Thin Left
Align : Center
Style : Normal Bold

[Field: TSPL FFEItemRate]

Set As : "Rate"
Width : 23 mms
Border : Thin Left
Align : Center
Style : Normal Bold

[Field: TSPL FFEItemAmount]

Set As : "Amount"
Width : 24 mms
Align : Center
Border : Thin Left
Style : Normal Bold

[Line: TSPL FFEItemsDesHead1]

Use : TSPL FFEItemsDesHead
Local : Field : Default : Set As : ""
PrePrinted : Yes
Border : Thin Bottom

[Part: TSPL FFEInventoryPart]

Parts : TSPL FFEItemsDes
Vertical : Yes
Scroll : Vertical
Common Border : Yes

[Part: TSPL FFEItemsDes]

Line : TSPL FFEStockGroup
Repeat : TSPL FFEStockGroup : TSPL FFE StkGrp Coll

[Line: TSPL FFEStockGroup]

Use : TSPL FFEItemsDesHead

Local : Field : TSPL FFEItemMarks : Set As : ""
Local : Field : TSPL FFEItemPackages : Set As : ""
Local : Field : TSPL FFEItemDescription : Set As : $Name
Local : Field : TSPL FFEItemQty : Set As : ""
Local : Field : TSPL MRP : Set As : ""
Local : Field : TSPL FFEItemRate : Set As : ""
Local : Field : TSPL FFEItemAmount : Set As : ""

Local : Field : TSPL FFEItemDescription : Style : Normal Bold

Local : Field : TSPL FFEItemDescription : Align : Centre

Local : Field : TSPL FFEItemDescription : SubTitle : Yes

Local : Field : TSPL FFEItemDescription : Border : Flush Thin Bottom


Explode : TSPL FFEStockItemsPart

[Part: TSPL FFEStockItemsPart]

Lines : TSPL FFEItemsDes,TSPL FFEItemTotal
Repeat : TSPL FFEItemsDes : TSPL FFE Inv Coll ;; TSP FFEInvCollection
Total : ItemAmount
Space Bottom: 2 mms

[Line: TSPL FFEItemsDes]

Fields : ItemMarks,ItemDescription,ItemQty,MRP,ItemRemarks
Right Field : ItemAmount
Empty If : #TSPLFFEItemDescription ! = $Name

[Field: ItemMarks]

Use : Name Field
Set As : $$Line
Width : 23 mms
Align : Left
Style : Normal

[Field: ItemDescription]

Type : String
Set As : $StockItemName
Width : 93 mms
Style : Normal
Align : Left

[Field: ItemQty]

Use : Qty Primary Field
Set As : $BilledQty
Width : 24 mms
Align : Right
Style : Normal Bold

[Field: MRP]

Use : Rate Field
;; setting MRP Rate from Item mater based on voucher date and party's statename
Set as : @MRPRateSetVal
;;as per new behaviour, MRP rate will not stoed under voucher
;Storage : MRPRate
Set Always : Yes
Width : 24 mms
Skip : Yes
MRPRateSetVal : If $$IsEnd:$StockItemName Then "" Else +
If NOT $$IsEmpty:$MRPRate Then $MRPRate +
Else If $$IsEmptylocPartyStateName OR $$IsSysNamelocPartyStateName Then $$GetEIStkItemMRP:$StockItemName:$Date Else +
$$GetEIStkItemMRP:$StockItemName:$DatelocPartyStateName
locPartyStateName: $$BaseOwner:$VATPartyLedState
Inactive : $$IsEnd:$StockItemName OR $$IsSysName:$BaseUnits:StockItem:$StockItemName OR $$IsEmptyMRPRateSetVal

[Field: ItemRemarks]

Set As : $Rate
Width : 23 mms
Align : Right

[Field: ItemAmount]

Use : Amount Base Field
Set As : $Amount
Width : 28 mms
Style : Normal Bold
Align : Right

[Line: TSPL FFEItemTotal]

Fields : TSPL FFETotalDescription,TSPL FFETotalQty,TSPL FFETotalRemarks
Right Field : TSPL FFETotalAmount
Space Bottom: 2 mms

[Field: TSPL FFETotalDescription]

Set As : "Total"
Width : 115 mms
Align : Right
Space Right : 2 mms

[Field: TSPL FFETotalQty]

Set As : " "
Width : 24 mms

[Field: TSPL FFETotalRemarks]

Set As : " "
Width : 23 mms

[Field: TSPL FFETotalAmount]

Set As : $$Total:ItemAmount
Width : 24 mms
Inactive : $$NumItems:LedgerEntries <= 1
Align : Right
Border : Totals

;-----------------------------------SYSTEM FORMULA-------------------------------------------
[System: Formula]

TSPL FFEPageNo : If $$PageNo = 1 Then "" Else (" (Page " + $$String:$$PageNo + ")")

;-----------------------------------COLLECTION CREATION-------------------------------------------



[Collection: TSPL FFE Inv Coll]

Source Collection : ..
Walk : Inventory Entries
Fetch : *.*
Compute : Name : $Parent:StockItem:$StockItemName

[Collection : TSPL FFE StkGrp Coll]

Source Collection : TSPL FFE Inv Coll
Fetch : *.*
By : Name : $Name
Aggr Compute : Amount : SUM : $Amount
Client Only : Yes

;; End of File

 

Looks like this is going to remain difficult to Crack ... I tried to copy the code from the default invoice but I guess I copied it incompletely .. Can someone help with getting the complete one ? Any help is appreciated ..