Custom RMB on Quick Report Results with parameters

Here is an example of one parameters
(Testing result is quite good in IFS2004 Flux !)

step by step as below:

1.create a sql expression on quick report as below:

SELECT a.Contract ,a.Part_No,
IFSAPP.INVENTORY_PART_API.GET_DESCRIPTION(a.contract, a.part_no)"PART_DESC",
round(a.Latest_Purchase_Price,4) "Latest_Purchase_Price",
round(a.Average_Purchase_Price,4)"Average_Purchase_Price"
,b.inventory_value "inventory_value"
from IFSAPP.INVENTORY_PART_CONFIG a,IFSAPP.INVENTORY_PART_UNIT_COST b
where a.part_no like '&PART_NO'
and a.contract=b.contract and a.part_no = b.part_no
and (a.Latest_Purchase_Price >0 or a.Average_Purchase_Price >0)
order by a.contract,a.part_no

2.let QUICK_REPORT_ID is 30

(SELECT QUICK_REPORT_ID,DESCRIPTION
from QUICK_REPORT)

3.In Custom Menu:(new)
--Action Type:SAL code
--window:tbwPurchaseOrderLine

--parameter:
InfoService.QuickReportStart(SalNumberToStrX(30,0) II
'@PART_NO=' IItbwPurchaseOrderLine.colPartNo II'^')

4.Testing okay in IFS2004 Flux