query for the po print report

SELECT
DISTINCT(PHA.SEGMENT1) "PO Number",
PHA.REVISION_NUM "Revision",
PHA.AGENT_ID "Buyer ID",
PAPF.FULL_NAME "Buyer",
PV.SEGMENT1 "Vendor",
PVSA.ADDRESS_LINE1 || ',' ||PVSA.ADDRESS_LINE2 || ',' ||PVSA.ADDRESS_LINE3 || ',' ||PVSA.CITY || ',' ||PVSA.ZIP || ',' ||PVSA.COUNTRY "Vendor Address",
to_char(PHA.CREATION_DATE,'DD-MON-YYYY')"Creation Date",
to_char(SYSDATE,'DD-MON-YYYY')"Printed Date",
to_char(PHA.REVISED_DATE,'DD-MON-YYYY') "Revised Date",
DECODE(PHA.AUTHORIZATION_STATUS,'REQUIRES REAPPROVAL','DRAFT',
 'INCOMPLETE',    'DRAFT',
 'IN PROCESS',    'DRAFT',
 'PRE-APPROVED' ,'DREFT',
 '','DRAFT',
'APPROVED') "Status",
PHA.TYPE_LOOKUP_CODE "PO type",
PHA.CURRENCY_CODE "Currency",
PHA.USER_HOLD_FLAG "On Hold",
PHA.FREIGHT_TERMS_LOOKUP_CODE "Delivery Mode",
PHA.QUOTE_VENDOR_QUOTE_NUMBER "Supplier Quote Number",
PHA.ATTRIBUTE1 "Insurance",
APT.NAME "Payment Term" ,
PLA.LINE_NUM "Line Number",
PLA.ORDER_TYPE_LOOKUP_CODE "Line Type",
msib.SEGMENT1 "Item code",
PLA.ITEM_DESCRIPTION "Item Description",
PLA.VENDOR_PRODUCT_NUM "Vendor Item Code",
MCBK.CONCATENATED_SEGMENTS "Item Category",
PLA.QUANTITY "Quantity",
PLA.UNIT_MEAS_LOOKUP_CODE "Purchasing UOM",
PLA.UNIT_PRICE "Unit Price",
DECODE(PLA.QUANTITY,NULL,1*PLA.UNIT_PRICE,
 PLA.QUANTITY*PLA.UNIT_PRICE
 ) "Line Total",
--(PLA.QUANTITY*PLA.UNIT_PRICE) "Line Total",
PLLA.PROMISED_DATE "Promised date",
PRHA.SEGMENT1||'.'||PRLA.LINE_NUM "PR Ref",
HL.ADDRESS_LINE_1 || ',' || HL.ADDRESS_LINE_2 || ',' ||HL.ADDRESS_LINE_3 || ',' ||HL.TOWN_OR_CITY || ',' ||HL.POSTAL_CODE || ',' ||HL.COUNTRY "Ship to Location",
PLA.NOTE_TO_VENDOR "Line Comments",
xx_po_print_receipt_test(pha.po_header_id,pha.currency_code)"PO Total(QAR)",
xx_po_print_receipt_test_rates(PHA.CURRENCY_CODE,'USD',PHA.CREATION_DATE,PHA.PO_HEADER_ID) "PO Total (USD)",
PHA.COMMENTS "Comments"

FROM
PER_ALL_PEOPLE_F PAPF ,
PO_VENDORS PV,
PO_VENDOR_SITES_ALL PVSA,
AP_TERMS APT,
HR_LOCATIONS HL,
MTL_CATEGORIES_B_KFV MCBK,
MTL_SYSTEM_ITEMS_B MSIB,
ORG_ORGANIZATION_DEFINITIONS OOD,

PO_HEADERS_ALL PHA,
PO_LINES_ALL PLA,
PO_LINE_LOCATIONS_ALL PLLA,
PO_DISTRIBUTIONS_ALL PDA,
PO_REQ_DISTRIBUTIONS_ALL PRDA,
PO_REQUISITION_LINES_ALL PRLA,
PO_REQUISITION_HEADERS_ALL PRHA

WHERE PAPF.PERSON_ID=PHA.AGENT_ID
AND PV.VENDOR_ID =PHA.VENDOR_ID
AND PV.VENDOR_ID=PVSA.VENDOR_ID
AND PHA.VENDOR_SITE_ID=PVSA.VENDOR_SITE_ID
AND PHA.TERMS_ID=APT.TERM_ID
AND PLA.PO_HEADER_ID=PHA.PO_HEADER_ID
AND PLA.PO_LINE_ID=PLLA.PO_LINE_ID
AND PLLA.SHIP_TO_LOCATION_ID=HL.LOCATION_ID
AND MCBK.CATEGORY_ID=PLA.CATEGORY_ID
and MSIB.INVENTORY_ITEM_ID=PLA.ITEM_ID
AND PHA.PO_HEADER_ID=PLA.PO_HEADER_ID
AND PDA.PO_HEADER_ID=PLA.PO_HEADER_ID
AND PDA.PO_LINE_ID=PLA.PO_LINE_ID
AND PDA.REQ_DISTRIBUTION_ID=PRDA.DISTRIBUTION_ID
AND PRDA.REQUISITION_LINE_ID=PRLA.REQUISITION_LINE_ID
AND PRLA.REQUISITION_HEADER_ID=PRHA.REQUISITION_HEADER_ID
AND PV.SEGMENT1=NVL(:PV_SEG,PV.SEGMENT1)
AND  PHA.SEGMENT1=NVL(:PO_SEG,PHA.SEGMENT1)
AND PHA.CREATION_DATE BETWEEN :S AND :E
ORDER BY PHA.SEGMENT1;



function BeforeReport return boolean is
begin
 SRW.USER_EXIT('FND SRWINIT');
  return (TRUE);
end;



function AfterReport return boolean is
begin
  SRW.USER_EXIT('FND SRWEXIT');
  return (TRUE);
end;


date
RRRR/MM/DD HH24:MI:SS

P_CONC_REQUEST_ID
number
20