34: SELECT
35: P_DPIS_THROUGH
36: INTO PA_DPIS_THRU_DATE
37: FROM
38: DUAL;
39: SELECT
40: P_CONC_REQUEST_ID
41: INTO P_CONC_REQUEST_ID
42: FROM
39: SELECT
40: P_CONC_REQUEST_ID
41: INTO P_CONC_REQUEST_ID
42: FROM
43: DUAL;
44: CURR_CODE := PA_CURRENCY.GET_CURRENCY_CODE;
45: IF (GET_COMPANY_NAME <> TRUE) THEN
46: RAISE INIT_FAILURE;
47: END IF;
61: SELECT
62: P_PA_THROUGH_DATE
63: INTO PA_THRU_DATE
64: FROM
65: DUAL;
66: SELECT
67: MAX(END_DATE)
68: INTO PA_PERIOD_END_DATE
69: FROM