[Home] [Help]
1: PACKAGE BODY IBY_BPEL_EBSR121PAYMENTAUTH AS
2: /* $Header: IBYBPELPPADB.pls 120.1.12010000.2 2008/12/15 05:52:05 sgogula noship $ */
3:
4: FUNCTION PL_TO_SQL1(aPlsqlItem IBY_PAYMENT_ADAPTER_PUB.PAYEE_REC_TYPE)
5: RETURN IBY_PAYMENT_ADAPTER_PUB_PAYEE IS
6: aSqlItem IBY_PAYMENT_ADAPTER_PUB_PAYEE;
7: BEGIN
8: -- initialize the object
1: PACKAGE BODY IBY_BPEL_EBSR121PAYMENTAUTH AS
2: /* $Header: IBYBPELPPADB.pls 120.1.12010000.2 2008/12/15 05:52:05 sgogula noship $ */
3:
4: FUNCTION PL_TO_SQL1(aPlsqlItem IBY_PAYMENT_ADAPTER_PUB.PAYEE_REC_TYPE)
5: RETURN IBY_PAYMENT_ADAPTER_PUB_PAYEE IS
6: aSqlItem IBY_PAYMENT_ADAPTER_PUB_PAYEE;
7: BEGIN
8: -- initialize the object
9: aSqlItem := IBY_PAYMENT_ADAPTER_PUB_PAYEE(NULL);
2: /* $Header: IBYBPELPPADB.pls 120.1.12010000.2 2008/12/15 05:52:05 sgogula noship $ */
3:
4: FUNCTION PL_TO_SQL1(aPlsqlItem IBY_PAYMENT_ADAPTER_PUB.PAYEE_REC_TYPE)
5: RETURN IBY_PAYMENT_ADAPTER_PUB_PAYEE IS
6: aSqlItem IBY_PAYMENT_ADAPTER_PUB_PAYEE;
7: BEGIN
8: -- initialize the object
9: aSqlItem := IBY_PAYMENT_ADAPTER_PUB_PAYEE(NULL);
10: aSqlItem.PAYEE_ID := aPlsqlItem.PAYEE_ID;
5: RETURN IBY_PAYMENT_ADAPTER_PUB_PAYEE IS
6: aSqlItem IBY_PAYMENT_ADAPTER_PUB_PAYEE;
7: BEGIN
8: -- initialize the object
9: aSqlItem := IBY_PAYMENT_ADAPTER_PUB_PAYEE(NULL);
10: aSqlItem.PAYEE_ID := aPlsqlItem.PAYEE_ID;
11: RETURN aSqlItem;
12: END PL_TO_SQL1;
13:
10: aSqlItem.PAYEE_ID := aPlsqlItem.PAYEE_ID;
11: RETURN aSqlItem;
12: END PL_TO_SQL1;
13:
14: FUNCTION SQL_TO_PL0(aSqlItem IBY_PAYMENT_ADAPTER_PUB_PAYEE)
15: RETURN IBY_PAYMENT_ADAPTER_PUB.PAYEE_REC_TYPE IS
16: aPlsqlItem IBY_PAYMENT_ADAPTER_PUB.PAYEE_REC_TYPE;
17: BEGIN
18: aPlsqlItem.PAYEE_ID := aSqlItem.PAYEE_ID;
11: RETURN aSqlItem;
12: END PL_TO_SQL1;
13:
14: FUNCTION SQL_TO_PL0(aSqlItem IBY_PAYMENT_ADAPTER_PUB_PAYEE)
15: RETURN IBY_PAYMENT_ADAPTER_PUB.PAYEE_REC_TYPE IS
16: aPlsqlItem IBY_PAYMENT_ADAPTER_PUB.PAYEE_REC_TYPE;
17: BEGIN
18: aPlsqlItem.PAYEE_ID := aSqlItem.PAYEE_ID;
19: RETURN aPlsqlItem;
12: END PL_TO_SQL1;
13:
14: FUNCTION SQL_TO_PL0(aSqlItem IBY_PAYMENT_ADAPTER_PUB_PAYEE)
15: RETURN IBY_PAYMENT_ADAPTER_PUB.PAYEE_REC_TYPE IS
16: aPlsqlItem IBY_PAYMENT_ADAPTER_PUB.PAYEE_REC_TYPE;
17: BEGIN
18: aPlsqlItem.PAYEE_ID := aSqlItem.PAYEE_ID;
19: RETURN aPlsqlItem;
20: END SQL_TO_PL0;
450: aPlsqlItem.CUSTOMER_ACCT_NUM := aSqlItem.CUSTOMER_ACCT_NUM;
451: RETURN aPlsqlItem;
452: END SQL_TO_PL5;
453:
454: PROCEDURE IBY_PAYMENT_ADAPTER_PUB$ORAPM (P_API_VERSION NUMBER,P_INIT_MSG_LIST VARCHAR2,P_COMMIT VARCHAR2,P_VALIDATION_LEVEL NUMBER,P_ECAPP_ID NUMBER,P_PAYEE_REC IBY_PAYMENT_ADAPTER_PUB_PAYEE
455: ,P_PAYER_REC IBY_PAYMENT_ADAPTER_PUB_PAYER,P_PMTINSTR_REC IBY_PAYMENT_ADAPTER_PUB_PMTIN,P_TANGIBLE_REC IBY_PAYMENT_ADAPTER_PUB_TANGI
456: ,P_PMTREQTRXN_REC IBY_PAYMENT_ADAPTER_PUB_PMTRE,P_RISKINFO_REC IBY_PAYMENT_ADAPTER_PUB_RISKI,X_RETURN_STATUS OUT NOCOPY VARCHAR2,X_MSG_COUNT OUT NOCOPY NUMBER
457: ,X_MSG_DATA OUT NOCOPY VARCHAR2,X_REQRESP_REC OUT NOCOPY IBY_PAYMENT_ADAPTER_PUB_REQRE) IS
458: P_PAYEE_REC_ IBY_PAYMENT_ADAPTER_PUB.PAYEE_REC_TYPE;
454: PROCEDURE IBY_PAYMENT_ADAPTER_PUB$ORAPM (P_API_VERSION NUMBER,P_INIT_MSG_LIST VARCHAR2,P_COMMIT VARCHAR2,P_VALIDATION_LEVEL NUMBER,P_ECAPP_ID NUMBER,P_PAYEE_REC IBY_PAYMENT_ADAPTER_PUB_PAYEE
455: ,P_PAYER_REC IBY_PAYMENT_ADAPTER_PUB_PAYER,P_PMTINSTR_REC IBY_PAYMENT_ADAPTER_PUB_PMTIN,P_TANGIBLE_REC IBY_PAYMENT_ADAPTER_PUB_TANGI
456: ,P_PMTREQTRXN_REC IBY_PAYMENT_ADAPTER_PUB_PMTRE,P_RISKINFO_REC IBY_PAYMENT_ADAPTER_PUB_RISKI,X_RETURN_STATUS OUT NOCOPY VARCHAR2,X_MSG_COUNT OUT NOCOPY NUMBER
457: ,X_MSG_DATA OUT NOCOPY VARCHAR2,X_REQRESP_REC OUT NOCOPY IBY_PAYMENT_ADAPTER_PUB_REQRE) IS
458: P_PAYEE_REC_ IBY_PAYMENT_ADAPTER_PUB.PAYEE_REC_TYPE;
459: P_PAYER_REC_ IBY_PAYMENT_ADAPTER_PUB.PAYER_REC_TYPE;
460: P_PMTINSTR_REC_ IBY_PAYMENT_ADAPTER_PUB.PMTINSTR_REC_TYPE;
461: P_TANGIBLE_REC_ IBY_PAYMENT_ADAPTER_PUB.TANGIBLE_REC_TYPE;
462: P_PMTREQTRXN_REC_ IBY_PAYMENT_ADAPTER_PUB.PMTREQTRXN_REC_TYPE;