326: aPlsqlItem.PARTY_SITE_ID := aSqlItem.PARTY_SITE_ID;
327: RETURN aPlsqlItem;
328: END SQL_TO_PL1;
329:
330: FUNCTION PL_TO_SQL0(aPlsqlItem MSC_ATP_BPEL.ATP_REC_TABLE_TYP)
331: RETURN MSC_ATP_BPEL_ATP_REC_TABLE_TY IS
332: aSqlItem MSC_ATP_BPEL_ATP_REC_TABLE_TY;
333: BEGIN
334: -- initialize the table
327: RETURN aPlsqlItem;
328: END SQL_TO_PL1;
329:
330: FUNCTION PL_TO_SQL0(aPlsqlItem MSC_ATP_BPEL.ATP_REC_TABLE_TYP)
331: RETURN MSC_ATP_BPEL_ATP_REC_TABLE_TY IS
332: aSqlItem MSC_ATP_BPEL_ATP_REC_TABLE_TY;
333: BEGIN
334: -- initialize the table
335: aSqlItem := MSC_ATP_BPEL_ATP_REC_TABLE_TY();
328: END SQL_TO_PL1;
329:
330: FUNCTION PL_TO_SQL0(aPlsqlItem MSC_ATP_BPEL.ATP_REC_TABLE_TYP)
331: RETURN MSC_ATP_BPEL_ATP_REC_TABLE_TY IS
332: aSqlItem MSC_ATP_BPEL_ATP_REC_TABLE_TY;
333: BEGIN
334: -- initialize the table
335: aSqlItem := MSC_ATP_BPEL_ATP_REC_TABLE_TY();
336: aSqlItem.EXTEND(aPlsqlItem.COUNT);
331: RETURN MSC_ATP_BPEL_ATP_REC_TABLE_TY IS
332: aSqlItem MSC_ATP_BPEL_ATP_REC_TABLE_TY;
333: BEGIN
334: -- initialize the table
335: aSqlItem := MSC_ATP_BPEL_ATP_REC_TABLE_TY();
336: aSqlItem.EXTEND(aPlsqlItem.COUNT);
337: FOR I IN aPlsqlItem.FIRST..aPlsqlItem.LAST LOOP
338: aSqlItem(I + 1 - aPlsqlItem.FIRST) := PL_TO_SQL1(aPlsqlItem(I));
339: END LOOP;
339: END LOOP;
340: RETURN aSqlItem;
341: END PL_TO_SQL0;
342:
343: FUNCTION SQL_TO_PL0(aSqlItem MSC_ATP_BPEL_ATP_REC_TABLE_TY)
344: RETURN MSC_ATP_BPEL.ATP_REC_TABLE_TYP IS
345: aPlsqlItem MSC_ATP_BPEL.ATP_REC_TABLE_TYP;
346: BEGIN
347: FOR I IN 1..aSqlItem.COUNT LOOP
340: RETURN aSqlItem;
341: END PL_TO_SQL0;
342:
343: FUNCTION SQL_TO_PL0(aSqlItem MSC_ATP_BPEL_ATP_REC_TABLE_TY)
344: RETURN MSC_ATP_BPEL.ATP_REC_TABLE_TYP IS
345: aPlsqlItem MSC_ATP_BPEL.ATP_REC_TABLE_TYP;
346: BEGIN
347: FOR I IN 1..aSqlItem.COUNT LOOP
348: aPlsqlItem(I) := SQL_TO_PL1(aSqlItem(I));
341: END PL_TO_SQL0;
342:
343: FUNCTION SQL_TO_PL0(aSqlItem MSC_ATP_BPEL_ATP_REC_TABLE_TY)
344: RETURN MSC_ATP_BPEL.ATP_REC_TABLE_TYP IS
345: aPlsqlItem MSC_ATP_BPEL.ATP_REC_TABLE_TYP;
346: BEGIN
347: FOR I IN 1..aSqlItem.COUNT LOOP
348: aPlsqlItem(I) := SQL_TO_PL1(aSqlItem(I));
349: END LOOP;
350: RETURN aPlsqlItem;
351: END SQL_TO_PL0;
352:
353: PROCEDURE MSC_ATP_BPEL$CALL_ATP_BPEL (P_SESSION_ID IN OUT NOCOPY NUMBER,P_ATP_TAB
354: MSC_ATP_BPEL_ATP_REC_TABLE_TY,X_ATP_TAB OUT NOCOPY
355: MSC_ATP_BPEL_ATP_REC_TABLE_TY,X_RETURN_STATUS OUT NOCOPY VARCHAR2,X_MSG_DATA OUT
356: NOCOPY VARCHAR2,X_MSG_COUNT OUT NOCOPY NUMBER) IS
357: P_ATP_TAB_ APPS.MSC_ATP_BPEL.ATP_REC_TABLE_TYP;
358: X_ATP_TAB_ APPS.MSC_ATP_BPEL.ATP_REC_TABLE_TYP;
351: END SQL_TO_PL0;
352:
353: PROCEDURE MSC_ATP_BPEL$CALL_ATP_BPEL (P_SESSION_ID IN OUT NOCOPY NUMBER,P_ATP_TAB
354: MSC_ATP_BPEL_ATP_REC_TABLE_TY,X_ATP_TAB OUT NOCOPY
355: MSC_ATP_BPEL_ATP_REC_TABLE_TY,X_RETURN_STATUS OUT NOCOPY VARCHAR2,X_MSG_DATA OUT
356: NOCOPY VARCHAR2,X_MSG_COUNT OUT NOCOPY NUMBER) IS
357: P_ATP_TAB_ APPS.MSC_ATP_BPEL.ATP_REC_TABLE_TYP;
358: X_ATP_TAB_ APPS.MSC_ATP_BPEL.ATP_REC_TABLE_TYP;
359: BEGIN
353: PROCEDURE MSC_ATP_BPEL$CALL_ATP_BPEL (P_SESSION_ID IN OUT NOCOPY NUMBER,P_ATP_TAB
354: MSC_ATP_BPEL_ATP_REC_TABLE_TY,X_ATP_TAB OUT NOCOPY
355: MSC_ATP_BPEL_ATP_REC_TABLE_TY,X_RETURN_STATUS OUT NOCOPY VARCHAR2,X_MSG_DATA OUT
356: NOCOPY VARCHAR2,X_MSG_COUNT OUT NOCOPY NUMBER) IS
357: P_ATP_TAB_ APPS.MSC_ATP_BPEL.ATP_REC_TABLE_TYP;
358: X_ATP_TAB_ APPS.MSC_ATP_BPEL.ATP_REC_TABLE_TYP;
359: BEGIN
360: P_ATP_TAB_ := XX_BPEL_EBS11I10ATPCHECK.SQL_TO_PL0(P_ATP_TAB);
361:
354: MSC_ATP_BPEL_ATP_REC_TABLE_TY,X_ATP_TAB OUT NOCOPY
355: MSC_ATP_BPEL_ATP_REC_TABLE_TY,X_RETURN_STATUS OUT NOCOPY VARCHAR2,X_MSG_DATA OUT
356: NOCOPY VARCHAR2,X_MSG_COUNT OUT NOCOPY NUMBER) IS
357: P_ATP_TAB_ APPS.MSC_ATP_BPEL.ATP_REC_TABLE_TYP;
358: X_ATP_TAB_ APPS.MSC_ATP_BPEL.ATP_REC_TABLE_TYP;
359: BEGIN
360: P_ATP_TAB_ := XX_BPEL_EBS11I10ATPCHECK.SQL_TO_PL0(P_ATP_TAB);
361:
362: APPS.MSC_ATP_BPEL.CALL_ATP_BPEL(P_SESSION_ID,P_ATP_TAB_,X_ATP_TAB_,X_RETURN_STATUS,X_MSG_DATA,X_MSG_COUNT);