SELECT ROWID,TAX_PAYER_NO,TAX_TRANS_NO,DOC_NO,TRANS_DATE,
ENTER_DATE,AMOUNT,CHEQUE_NO,RECEIPT_NO,
PAYMENT_TYPE_NO,BANK_NO,PAYMENT_LOC_NO 
FROM TAX_TRANSACTION WHERE tax_payer_no = :1 
and payment_loc_no is not NULL  order by trans_date, enter_date, doc_no

SELECT PAY_LOC.PAYMENT_LOC_DESC
INTO :TAX_TRANSACTION.PAYMENT_LOC_DESC
FROM TAX_TRANSACTION TAX_TRANS, PAYMENT_LOC PAY_LOC
WHERE TAX_TRANS.PAYMENT_LOC_NO = PAY_LOC.PAYMENT_LOC_NO
AND TAX_TRANS.TAX_TRANS_NO = :TAX_TRANS_NO;

SELECT PAY_TYPE.PAYMENT_TYPE_DESC
INTO :TAX_TRANSACTION.PAYMENT_TYPE_DESC
FROM TAX_TRANSACTION TAX_TRANS, PAYMENT_TYPE PAY_TYPE
WHERE TAX_TRANS.PAYMENT_TYPE_NO = PAY_TYPE.PAYMENT_TYPE_NO
AND TAX_TRANS.TAX_TRANS_NO = :TAX_TRANS_NO;

SELECT TRANS_TYPE.TAX_TRANS_TYPE_DESC
INTO :TAX_TRANSACTION.TAX_TRANS_TYPE_DESC
FROM TAX_TRANSACTION TAX_TRANS, TAX_SUB_TRANS TAX_SUB, TAX_TRANS_TYPE TRANS_TYPE
WHERE TAX_TRANS.TAX_TRANS_NO = TAX_SUB.TAX_TRANS_NO 
AND TAX_SUB.TAX_TRANS_TYPE_NO = TRANS_TYPE.TAX_TRANS_TYPE_NO
AND TAX_SUB.TAX_TRANS_NO = :TAX_TRANS_NO;

IF :TAX_TRANSACTION.PAYMENT_TYPE_NO = 2 THEN
  SELECT BANK_NAME
  INTO :TAX_TRANSACTION.BANK_NAME
  FROM TAX_TRANSACTION TAX_TRANS, BANK BANK
  WHERE TAX_TRANS.BANK_NO = BANK.BANK_NO
  AND TAX_TRANS.TAX_TRANS_NO = :TAX_TRANS_NO;
END IF;

EXCEPTION
	when no_data_found then
 	null;
 	when others then 
 	null;