1: PACKAGE BODY DPP_BPEL_SELCOVINV AS
2: /* $Header: dppvbsib.pls 120.2 2007/12/12 06:28:17 sdasan noship $ */
3: FUNCTION PL_TO_SQL1(aPlsqlItem DPP_COVEREDINVENTORY_PVT.DPP_INV_HDR_REC_TYPE)
4: RETURN DPP_COVEREDINVENTORY_PVT_DPP_ IS
5: aSqlItem DPP_COVEREDINVENTORY_PVT_DPP_;
6: BEGIN
7: -- initialize the object
1: PACKAGE BODY DPP_BPEL_SELCOVINV AS
2: /* $Header: dppvbsib.pls 120.2 2007/12/12 06:28:17 sdasan noship $ */
3: FUNCTION PL_TO_SQL1(aPlsqlItem DPP_COVEREDINVENTORY_PVT.DPP_INV_HDR_REC_TYPE)
4: RETURN DPP_COVEREDINVENTORY_PVT_DPP_ IS
5: aSqlItem DPP_COVEREDINVENTORY_PVT_DPP_;
6: BEGIN
7: -- initialize the object
8: aSqlItem := DPP_COVEREDINVENTORY_PVT_DPP_(NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL);
1: PACKAGE BODY DPP_BPEL_SELCOVINV AS
2: /* $Header: dppvbsib.pls 120.2 2007/12/12 06:28:17 sdasan noship $ */
3: FUNCTION PL_TO_SQL1(aPlsqlItem DPP_COVEREDINVENTORY_PVT.DPP_INV_HDR_REC_TYPE)
4: RETURN DPP_COVEREDINVENTORY_PVT_DPP_ IS
5: aSqlItem DPP_COVEREDINVENTORY_PVT_DPP_;
6: BEGIN
7: -- initialize the object
8: aSqlItem := DPP_COVEREDINVENTORY_PVT_DPP_(NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL);
9: aSqlItem.TRANSACTION_HEADER_ID := aPlsqlItem.TRANSACTION_HEADER_ID;
4: RETURN DPP_COVEREDINVENTORY_PVT_DPP_ IS
5: aSqlItem DPP_COVEREDINVENTORY_PVT_DPP_;
6: BEGIN
7: -- initialize the object
8: aSqlItem := DPP_COVEREDINVENTORY_PVT_DPP_(NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL);
9: aSqlItem.TRANSACTION_HEADER_ID := aPlsqlItem.TRANSACTION_HEADER_ID;
10: aSqlItem.EFFECTIVE_START_DATE := aPlsqlItem.EFFECTIVE_START_DATE;
11: aSqlItem.EFFECTIVE_END_DATE := aPlsqlItem.EFFECTIVE_END_DATE;
12: aSqlItem.ORG_ID := aPlsqlItem.ORG_ID;
16: aSqlItem.PROVIDER_PROCESS_INSTANCE_ID := aPlsqlItem.PROVIDER_PROCESS_INSTANCE_ID;
17: aSqlItem.LAST_UPDATED_BY := aPlsqlItem.LAST_UPDATED_BY;
18: RETURN aSqlItem;
19: END PL_TO_SQL1;
20: FUNCTION SQL_TO_PL0(aSqlItem DPP_COVEREDINVENTORY_PVT_DPP_)
21: RETURN DPP_COVEREDINVENTORY_PVT.DPP_INV_HDR_REC_TYPE IS
22: aPlsqlItem DPP_COVEREDINVENTORY_PVT.DPP_INV_HDR_REC_TYPE;
23: BEGIN
24: aPlsqlItem.TRANSACTION_HEADER_ID := aSqlItem.TRANSACTION_HEADER_ID;
17: aSqlItem.LAST_UPDATED_BY := aPlsqlItem.LAST_UPDATED_BY;
18: RETURN aSqlItem;
19: END PL_TO_SQL1;
20: FUNCTION SQL_TO_PL0(aSqlItem DPP_COVEREDINVENTORY_PVT_DPP_)
21: RETURN DPP_COVEREDINVENTORY_PVT.DPP_INV_HDR_REC_TYPE IS
22: aPlsqlItem DPP_COVEREDINVENTORY_PVT.DPP_INV_HDR_REC_TYPE;
23: BEGIN
24: aPlsqlItem.TRANSACTION_HEADER_ID := aSqlItem.TRANSACTION_HEADER_ID;
25: aPlsqlItem.EFFECTIVE_START_DATE := aSqlItem.EFFECTIVE_START_DATE;
18: RETURN aSqlItem;
19: END PL_TO_SQL1;
20: FUNCTION SQL_TO_PL0(aSqlItem DPP_COVEREDINVENTORY_PVT_DPP_)
21: RETURN DPP_COVEREDINVENTORY_PVT.DPP_INV_HDR_REC_TYPE IS
22: aPlsqlItem DPP_COVEREDINVENTORY_PVT.DPP_INV_HDR_REC_TYPE;
23: BEGIN
24: aPlsqlItem.TRANSACTION_HEADER_ID := aSqlItem.TRANSACTION_HEADER_ID;
25: aPlsqlItem.EFFECTIVE_START_DATE := aSqlItem.EFFECTIVE_START_DATE;
26: aPlsqlItem.EFFECTIVE_END_DATE := aSqlItem.EFFECTIVE_END_DATE;
31: aPlsqlItem.PROVIDER_PROCESS_INSTANCE_ID := aSqlItem.PROVIDER_PROCESS_INSTANCE_ID;
32: aPlsqlItem.LAST_UPDATED_BY := aSqlItem.LAST_UPDATED_BY;
33: RETURN aPlsqlItem;
34: END SQL_TO_PL0;
35: FUNCTION PL_TO_SQL2(aPlsqlItem DPP_COVEREDINVENTORY_PVT.DPP_INV_COV_RCT_REC_TYPE)
36: RETURN DPP_COVEREDINVENTORY_PVT_DPP6 IS
37: aSqlItem DPP_COVEREDINVENTORY_PVT_DPP6;
38: BEGIN
39: -- initialize the object
32: aPlsqlItem.LAST_UPDATED_BY := aSqlItem.LAST_UPDATED_BY;
33: RETURN aPlsqlItem;
34: END SQL_TO_PL0;
35: FUNCTION PL_TO_SQL2(aPlsqlItem DPP_COVEREDINVENTORY_PVT.DPP_INV_COV_RCT_REC_TYPE)
36: RETURN DPP_COVEREDINVENTORY_PVT_DPP6 IS
37: aSqlItem DPP_COVEREDINVENTORY_PVT_DPP6;
38: BEGIN
39: -- initialize the object
40: aSqlItem := DPP_COVEREDINVENTORY_PVT_DPP6(NULL, NULL);
33: RETURN aPlsqlItem;
34: END SQL_TO_PL0;
35: FUNCTION PL_TO_SQL2(aPlsqlItem DPP_COVEREDINVENTORY_PVT.DPP_INV_COV_RCT_REC_TYPE)
36: RETURN DPP_COVEREDINVENTORY_PVT_DPP6 IS
37: aSqlItem DPP_COVEREDINVENTORY_PVT_DPP6;
38: BEGIN
39: -- initialize the object
40: aSqlItem := DPP_COVEREDINVENTORY_PVT_DPP6(NULL, NULL);
41: aSqlItem.DATE_RECEIVED := aPlsqlItem.DATE_RECEIVED;
36: RETURN DPP_COVEREDINVENTORY_PVT_DPP6 IS
37: aSqlItem DPP_COVEREDINVENTORY_PVT_DPP6;
38: BEGIN
39: -- initialize the object
40: aSqlItem := DPP_COVEREDINVENTORY_PVT_DPP6(NULL, NULL);
41: aSqlItem.DATE_RECEIVED := aPlsqlItem.DATE_RECEIVED;
42: aSqlItem.ONHAND_QUANTITY := aPlsqlItem.ONHAND_QUANTITY;
43: RETURN aSqlItem;
44: END PL_TO_SQL2;
41: aSqlItem.DATE_RECEIVED := aPlsqlItem.DATE_RECEIVED;
42: aSqlItem.ONHAND_QUANTITY := aPlsqlItem.ONHAND_QUANTITY;
43: RETURN aSqlItem;
44: END PL_TO_SQL2;
45: FUNCTION SQL_TO_PL2(aSqlItem DPP_COVEREDINVENTORY_PVT_DPP6)
46: RETURN DPP_COVEREDINVENTORY_PVT.DPP_INV_COV_RCT_REC_TYPE IS
47: aPlsqlItem DPP_COVEREDINVENTORY_PVT.DPP_INV_COV_RCT_REC_TYPE;
48: BEGIN
49: aPlsqlItem.DATE_RECEIVED := aSqlItem.DATE_RECEIVED;
42: aSqlItem.ONHAND_QUANTITY := aPlsqlItem.ONHAND_QUANTITY;
43: RETURN aSqlItem;
44: END PL_TO_SQL2;
45: FUNCTION SQL_TO_PL2(aSqlItem DPP_COVEREDINVENTORY_PVT_DPP6)
46: RETURN DPP_COVEREDINVENTORY_PVT.DPP_INV_COV_RCT_REC_TYPE IS
47: aPlsqlItem DPP_COVEREDINVENTORY_PVT.DPP_INV_COV_RCT_REC_TYPE;
48: BEGIN
49: aPlsqlItem.DATE_RECEIVED := aSqlItem.DATE_RECEIVED;
50: aPlsqlItem.ONHAND_QUANTITY := aSqlItem.ONHAND_QUANTITY;
43: RETURN aSqlItem;
44: END PL_TO_SQL2;
45: FUNCTION SQL_TO_PL2(aSqlItem DPP_COVEREDINVENTORY_PVT_DPP6)
46: RETURN DPP_COVEREDINVENTORY_PVT.DPP_INV_COV_RCT_REC_TYPE IS
47: aPlsqlItem DPP_COVEREDINVENTORY_PVT.DPP_INV_COV_RCT_REC_TYPE;
48: BEGIN
49: aPlsqlItem.DATE_RECEIVED := aSqlItem.DATE_RECEIVED;
50: aPlsqlItem.ONHAND_QUANTITY := aSqlItem.ONHAND_QUANTITY;
51: RETURN aPlsqlItem;
49: aPlsqlItem.DATE_RECEIVED := aSqlItem.DATE_RECEIVED;
50: aPlsqlItem.ONHAND_QUANTITY := aSqlItem.ONHAND_QUANTITY;
51: RETURN aPlsqlItem;
52: END SQL_TO_PL2;
53: FUNCTION PL_TO_SQL3(aPlsqlItem DPP_COVEREDINVENTORY_PVT.DPP_INV_COV_RCT_TBL_TYPE)
54: RETURN DPPCOVEREDINVENTORYPVTDPP4_DP IS
55: aSqlItem DPPCOVEREDINVENTORYPVTDPP4_DP;
56: BEGIN
57: -- initialize the table
62: END LOOP;
63: RETURN aSqlItem;
64: END PL_TO_SQL3;
65: FUNCTION SQL_TO_PL3(aSqlItem DPPCOVEREDINVENTORYPVTDPP4_DP)
66: RETURN DPP_COVEREDINVENTORY_PVT.DPP_INV_COV_RCT_TBL_TYPE IS
67: aPlsqlItem DPP_COVEREDINVENTORY_PVT.DPP_INV_COV_RCT_TBL_TYPE;
68: BEGIN
69: FOR I IN 1..aSqlItem.COUNT LOOP
70: aPlsqlItem(I) := SQL_TO_PL2(aSqlItem(I));
63: RETURN aSqlItem;
64: END PL_TO_SQL3;
65: FUNCTION SQL_TO_PL3(aSqlItem DPPCOVEREDINVENTORYPVTDPP4_DP)
66: RETURN DPP_COVEREDINVENTORY_PVT.DPP_INV_COV_RCT_TBL_TYPE IS
67: aPlsqlItem DPP_COVEREDINVENTORY_PVT.DPP_INV_COV_RCT_TBL_TYPE;
68: BEGIN
69: FOR I IN 1..aSqlItem.COUNT LOOP
70: aPlsqlItem(I) := SQL_TO_PL2(aSqlItem(I));
71: END LOOP;
70: aPlsqlItem(I) := SQL_TO_PL2(aSqlItem(I));
71: END LOOP;
72: RETURN aPlsqlItem;
73: END SQL_TO_PL3;
74: FUNCTION PL_TO_SQL4(aPlsqlItem DPP_COVEREDINVENTORY_PVT.DPP_INV_COV_WH_REC_TYPE)
75: RETURN DPP_COVEREDINVENTORY_PVT_DPP4 IS
76: aSqlItem DPP_COVEREDINVENTORY_PVT_DPP4;
77: BEGIN
78: -- initialize the object
71: END LOOP;
72: RETURN aPlsqlItem;
73: END SQL_TO_PL3;
74: FUNCTION PL_TO_SQL4(aPlsqlItem DPP_COVEREDINVENTORY_PVT.DPP_INV_COV_WH_REC_TYPE)
75: RETURN DPP_COVEREDINVENTORY_PVT_DPP4 IS
76: aSqlItem DPP_COVEREDINVENTORY_PVT_DPP4;
77: BEGIN
78: -- initialize the object
79: aSqlItem := DPP_COVEREDINVENTORY_PVT_DPP4(NULL, NULL, NULL, NULL);
72: RETURN aPlsqlItem;
73: END SQL_TO_PL3;
74: FUNCTION PL_TO_SQL4(aPlsqlItem DPP_COVEREDINVENTORY_PVT.DPP_INV_COV_WH_REC_TYPE)
75: RETURN DPP_COVEREDINVENTORY_PVT_DPP4 IS
76: aSqlItem DPP_COVEREDINVENTORY_PVT_DPP4;
77: BEGIN
78: -- initialize the object
79: aSqlItem := DPP_COVEREDINVENTORY_PVT_DPP4(NULL, NULL, NULL, NULL);
80: aSqlItem.WAREHOUSE_ID := aPlsqlItem.WAREHOUSE_ID;
75: RETURN DPP_COVEREDINVENTORY_PVT_DPP4 IS
76: aSqlItem DPP_COVEREDINVENTORY_PVT_DPP4;
77: BEGIN
78: -- initialize the object
79: aSqlItem := DPP_COVEREDINVENTORY_PVT_DPP4(NULL, NULL, NULL, NULL);
80: aSqlItem.WAREHOUSE_ID := aPlsqlItem.WAREHOUSE_ID;
81: aSqlItem.WAREHOUSE_NAME := aPlsqlItem.WAREHOUSE_NAME;
82: aSqlItem.COVERED_QUANTITY := aPlsqlItem.COVERED_QUANTITY;
83: aSqlItem.RCT_LINE_TBL := PL_TO_SQL3(aPlsqlItem.RCT_LINE_TBL);
82: aSqlItem.COVERED_QUANTITY := aPlsqlItem.COVERED_QUANTITY;
83: aSqlItem.RCT_LINE_TBL := PL_TO_SQL3(aPlsqlItem.RCT_LINE_TBL);
84: RETURN aSqlItem;
85: END PL_TO_SQL4;
86: FUNCTION SQL_TO_PL4(aSqlItem DPP_COVEREDINVENTORY_PVT_DPP4)
87: RETURN DPP_COVEREDINVENTORY_PVT.DPP_INV_COV_WH_REC_TYPE IS
88: aPlsqlItem DPP_COVEREDINVENTORY_PVT.DPP_INV_COV_WH_REC_TYPE;
89: BEGIN
90: aPlsqlItem.WAREHOUSE_ID := aSqlItem.WAREHOUSE_ID;
83: aSqlItem.RCT_LINE_TBL := PL_TO_SQL3(aPlsqlItem.RCT_LINE_TBL);
84: RETURN aSqlItem;
85: END PL_TO_SQL4;
86: FUNCTION SQL_TO_PL4(aSqlItem DPP_COVEREDINVENTORY_PVT_DPP4)
87: RETURN DPP_COVEREDINVENTORY_PVT.DPP_INV_COV_WH_REC_TYPE IS
88: aPlsqlItem DPP_COVEREDINVENTORY_PVT.DPP_INV_COV_WH_REC_TYPE;
89: BEGIN
90: aPlsqlItem.WAREHOUSE_ID := aSqlItem.WAREHOUSE_ID;
91: aPlsqlItem.WAREHOUSE_NAME := aSqlItem.WAREHOUSE_NAME;
84: RETURN aSqlItem;
85: END PL_TO_SQL4;
86: FUNCTION SQL_TO_PL4(aSqlItem DPP_COVEREDINVENTORY_PVT_DPP4)
87: RETURN DPP_COVEREDINVENTORY_PVT.DPP_INV_COV_WH_REC_TYPE IS
88: aPlsqlItem DPP_COVEREDINVENTORY_PVT.DPP_INV_COV_WH_REC_TYPE;
89: BEGIN
90: aPlsqlItem.WAREHOUSE_ID := aSqlItem.WAREHOUSE_ID;
91: aPlsqlItem.WAREHOUSE_NAME := aSqlItem.WAREHOUSE_NAME;
92: aPlsqlItem.COVERED_QUANTITY := aSqlItem.COVERED_QUANTITY;
92: aPlsqlItem.COVERED_QUANTITY := aSqlItem.COVERED_QUANTITY;
93: aPlsqlItem.RCT_LINE_TBL := SQL_TO_PL3(aSqlItem.RCT_LINE_TBL);
94: RETURN aPlsqlItem;
95: END SQL_TO_PL4;
96: FUNCTION PL_TO_SQL5(aPlsqlItem DPP_COVEREDINVENTORY_PVT.DPP_INV_COV_WH_TBL_TYPE)
97: RETURN DPPCOVEREDINVENTORYPVTDPP2_DP IS
98: aSqlItem DPPCOVEREDINVENTORYPVTDPP2_DP;
99: BEGIN
100: -- initialize the table
105: END LOOP;
106: RETURN aSqlItem;
107: END PL_TO_SQL5;
108: FUNCTION SQL_TO_PL5(aSqlItem DPPCOVEREDINVENTORYPVTDPP2_DP)
109: RETURN DPP_COVEREDINVENTORY_PVT.DPP_INV_COV_WH_TBL_TYPE IS
110: aPlsqlItem DPP_COVEREDINVENTORY_PVT.DPP_INV_COV_WH_TBL_TYPE;
111: BEGIN
112: FOR I IN 1..aSqlItem.COUNT LOOP
113: aPlsqlItem(I) := SQL_TO_PL4(aSqlItem(I));
106: RETURN aSqlItem;
107: END PL_TO_SQL5;
108: FUNCTION SQL_TO_PL5(aSqlItem DPPCOVEREDINVENTORYPVTDPP2_DP)
109: RETURN DPP_COVEREDINVENTORY_PVT.DPP_INV_COV_WH_TBL_TYPE IS
110: aPlsqlItem DPP_COVEREDINVENTORY_PVT.DPP_INV_COV_WH_TBL_TYPE;
111: BEGIN
112: FOR I IN 1..aSqlItem.COUNT LOOP
113: aPlsqlItem(I) := SQL_TO_PL4(aSqlItem(I));
114: END LOOP;
113: aPlsqlItem(I) := SQL_TO_PL4(aSqlItem(I));
114: END LOOP;
115: RETURN aPlsqlItem;
116: END SQL_TO_PL5;
117: FUNCTION PL_TO_SQL6(aPlsqlItem DPP_COVEREDINVENTORY_PVT.DPP_INV_COV_REC_TYPE)
118: RETURN DPP_COVEREDINVENTORY_PVT_DPP2 IS
119: aSqlItem DPP_COVEREDINVENTORY_PVT_DPP2;
120: BEGIN
121: -- initialize the object
114: END LOOP;
115: RETURN aPlsqlItem;
116: END SQL_TO_PL5;
117: FUNCTION PL_TO_SQL6(aPlsqlItem DPP_COVEREDINVENTORY_PVT.DPP_INV_COV_REC_TYPE)
118: RETURN DPP_COVEREDINVENTORY_PVT_DPP2 IS
119: aSqlItem DPP_COVEREDINVENTORY_PVT_DPP2;
120: BEGIN
121: -- initialize the object
122: aSqlItem := DPP_COVEREDINVENTORY_PVT_DPP2(NULL, NULL, NULL, NULL, NULL, NULL);
115: RETURN aPlsqlItem;
116: END SQL_TO_PL5;
117: FUNCTION PL_TO_SQL6(aPlsqlItem DPP_COVEREDINVENTORY_PVT.DPP_INV_COV_REC_TYPE)
118: RETURN DPP_COVEREDINVENTORY_PVT_DPP2 IS
119: aSqlItem DPP_COVEREDINVENTORY_PVT_DPP2;
120: BEGIN
121: -- initialize the object
122: aSqlItem := DPP_COVEREDINVENTORY_PVT_DPP2(NULL, NULL, NULL, NULL, NULL, NULL);
123: aSqlItem.TRANSACTION_LINE_ID := aPlsqlItem.TRANSACTION_LINE_ID;
118: RETURN DPP_COVEREDINVENTORY_PVT_DPP2 IS
119: aSqlItem DPP_COVEREDINVENTORY_PVT_DPP2;
120: BEGIN
121: -- initialize the object
122: aSqlItem := DPP_COVEREDINVENTORY_PVT_DPP2(NULL, NULL, NULL, NULL, NULL, NULL);
123: aSqlItem.TRANSACTION_LINE_ID := aPlsqlItem.TRANSACTION_LINE_ID;
124: aSqlItem.INVENTORY_ITEM_ID := aPlsqlItem.INVENTORY_ITEM_ID;
125: aSqlItem.UOM_CODE := aPlsqlItem.UOM_CODE;
126: aSqlItem.ONHAND_QUANTITY := aPlsqlItem.ONHAND_QUANTITY;
127: aSqlItem.COVERED_QUANTITY := aPlsqlItem.COVERED_QUANTITY;
128: aSqlItem.WH_LINE_TBL := PL_TO_SQL5(aPlsqlItem.WH_LINE_TBL);
129: RETURN aSqlItem;
130: END PL_TO_SQL6;
131: FUNCTION SQL_TO_PL6(aSqlItem DPP_COVEREDINVENTORY_PVT_DPP2)
132: RETURN DPP_COVEREDINVENTORY_PVT.DPP_INV_COV_REC_TYPE IS
133: aPlsqlItem DPP_COVEREDINVENTORY_PVT.DPP_INV_COV_REC_TYPE;
134: BEGIN
135: aPlsqlItem.TRANSACTION_LINE_ID := aSqlItem.TRANSACTION_LINE_ID;
128: aSqlItem.WH_LINE_TBL := PL_TO_SQL5(aPlsqlItem.WH_LINE_TBL);
129: RETURN aSqlItem;
130: END PL_TO_SQL6;
131: FUNCTION SQL_TO_PL6(aSqlItem DPP_COVEREDINVENTORY_PVT_DPP2)
132: RETURN DPP_COVEREDINVENTORY_PVT.DPP_INV_COV_REC_TYPE IS
133: aPlsqlItem DPP_COVEREDINVENTORY_PVT.DPP_INV_COV_REC_TYPE;
134: BEGIN
135: aPlsqlItem.TRANSACTION_LINE_ID := aSqlItem.TRANSACTION_LINE_ID;
136: aPlsqlItem.INVENTORY_ITEM_ID := aSqlItem.INVENTORY_ITEM_ID;
129: RETURN aSqlItem;
130: END PL_TO_SQL6;
131: FUNCTION SQL_TO_PL6(aSqlItem DPP_COVEREDINVENTORY_PVT_DPP2)
132: RETURN DPP_COVEREDINVENTORY_PVT.DPP_INV_COV_REC_TYPE IS
133: aPlsqlItem DPP_COVEREDINVENTORY_PVT.DPP_INV_COV_REC_TYPE;
134: BEGIN
135: aPlsqlItem.TRANSACTION_LINE_ID := aSqlItem.TRANSACTION_LINE_ID;
136: aPlsqlItem.INVENTORY_ITEM_ID := aSqlItem.INVENTORY_ITEM_ID;
137: aPlsqlItem.UOM_CODE := aSqlItem.UOM_CODE;
139: aPlsqlItem.COVERED_QUANTITY := aSqlItem.COVERED_QUANTITY;
140: aPlsqlItem.WH_LINE_TBL := SQL_TO_PL5(aSqlItem.WH_LINE_TBL);
141: RETURN aPlsqlItem;
142: END SQL_TO_PL6;
143: FUNCTION PL_TO_SQL0(aPlsqlItem DPP_COVEREDINVENTORY_PVT.DPP_INV_COV_TBL_TYPE)
144: RETURN DPP_COVEREDINVENTORY_PVT_DPP1 IS
145: aSqlItem DPP_COVEREDINVENTORY_PVT_DPP1;
146: BEGIN
147: -- initialize the table
140: aPlsqlItem.WH_LINE_TBL := SQL_TO_PL5(aSqlItem.WH_LINE_TBL);
141: RETURN aPlsqlItem;
142: END SQL_TO_PL6;
143: FUNCTION PL_TO_SQL0(aPlsqlItem DPP_COVEREDINVENTORY_PVT.DPP_INV_COV_TBL_TYPE)
144: RETURN DPP_COVEREDINVENTORY_PVT_DPP1 IS
145: aSqlItem DPP_COVEREDINVENTORY_PVT_DPP1;
146: BEGIN
147: -- initialize the table
148: aSqlItem := DPP_COVEREDINVENTORY_PVT_DPP1();
141: RETURN aPlsqlItem;
142: END SQL_TO_PL6;
143: FUNCTION PL_TO_SQL0(aPlsqlItem DPP_COVEREDINVENTORY_PVT.DPP_INV_COV_TBL_TYPE)
144: RETURN DPP_COVEREDINVENTORY_PVT_DPP1 IS
145: aSqlItem DPP_COVEREDINVENTORY_PVT_DPP1;
146: BEGIN
147: -- initialize the table
148: aSqlItem := DPP_COVEREDINVENTORY_PVT_DPP1();
149: aSqlItem.EXTEND(aPlsqlItem.COUNT);
144: RETURN DPP_COVEREDINVENTORY_PVT_DPP1 IS
145: aSqlItem DPP_COVEREDINVENTORY_PVT_DPP1;
146: BEGIN
147: -- initialize the table
148: aSqlItem := DPP_COVEREDINVENTORY_PVT_DPP1();
149: aSqlItem.EXTEND(aPlsqlItem.COUNT);
150: FOR I IN aPlsqlItem.FIRST..aPlsqlItem.LAST LOOP
151: aSqlItem(I + 1 - aPlsqlItem.FIRST) := PL_TO_SQL6(aPlsqlItem(I));
152: END LOOP;
151: aSqlItem(I + 1 - aPlsqlItem.FIRST) := PL_TO_SQL6(aPlsqlItem(I));
152: END LOOP;
153: RETURN aSqlItem;
154: END PL_TO_SQL0;
155: FUNCTION SQL_TO_PL1(aSqlItem DPP_COVEREDINVENTORY_PVT_DPP1)
156: RETURN DPP_COVEREDINVENTORY_PVT.DPP_INV_COV_TBL_TYPE IS
157: aPlsqlItem DPP_COVEREDINVENTORY_PVT.DPP_INV_COV_TBL_TYPE;
158: BEGIN
159: FOR I IN 1..aSqlItem.COUNT LOOP
152: END LOOP;
153: RETURN aSqlItem;
154: END PL_TO_SQL0;
155: FUNCTION SQL_TO_PL1(aSqlItem DPP_COVEREDINVENTORY_PVT_DPP1)
156: RETURN DPP_COVEREDINVENTORY_PVT.DPP_INV_COV_TBL_TYPE IS
157: aPlsqlItem DPP_COVEREDINVENTORY_PVT.DPP_INV_COV_TBL_TYPE;
158: BEGIN
159: FOR I IN 1..aSqlItem.COUNT LOOP
160: aPlsqlItem(I) := SQL_TO_PL6(aSqlItem(I));
153: RETURN aSqlItem;
154: END PL_TO_SQL0;
155: FUNCTION SQL_TO_PL1(aSqlItem DPP_COVEREDINVENTORY_PVT_DPP1)
156: RETURN DPP_COVEREDINVENTORY_PVT.DPP_INV_COV_TBL_TYPE IS
157: aPlsqlItem DPP_COVEREDINVENTORY_PVT.DPP_INV_COV_TBL_TYPE;
158: BEGIN
159: FOR I IN 1..aSqlItem.COUNT LOOP
160: aPlsqlItem(I) := SQL_TO_PL6(aSqlItem(I));
161: END LOOP;
161: END LOOP;
162: RETURN aPlsqlItem;
163: END SQL_TO_PL1;
164:
165: PROCEDURE DPP_COVEREDINVENTORY_PVT$SELE (P_API_VERSION NUMBER,P_INIT_MSG_LIST VARCHAR2,P_COMMIT VARCHAR2,P_VALIDATION_LEVEL NUMBER,
166: X_RETURN_STATUS OUT NOCOPY VARCHAR2,X_MSG_COUNT OUT NOCOPY NUMBER,X_MSG_DATA OUT NOCOPY VARCHAR2,
167: P_INV_HDR_REC DPP_COVEREDINVENTORY_PVT_DPP_,P_COVERED_INV_TBL IN OUT NOCOPY DPP_COVEREDINVENTORY_PVT_DPP1) IS
168: P_INV_HDR_REC_ APPS.DPP_COVEREDINVENTORY_PVT.DPP_INV_HDR_REC_TYPE;
169: P_COVERED_INV_TBL_ APPS.DPP_COVEREDINVENTORY_PVT.DPP_INV_COV_TBL_TYPE;
163: END SQL_TO_PL1;
164:
165: PROCEDURE DPP_COVEREDINVENTORY_PVT$SELE (P_API_VERSION NUMBER,P_INIT_MSG_LIST VARCHAR2,P_COMMIT VARCHAR2,P_VALIDATION_LEVEL NUMBER,
166: X_RETURN_STATUS OUT NOCOPY VARCHAR2,X_MSG_COUNT OUT NOCOPY NUMBER,X_MSG_DATA OUT NOCOPY VARCHAR2,
167: P_INV_HDR_REC DPP_COVEREDINVENTORY_PVT_DPP_,P_COVERED_INV_TBL IN OUT NOCOPY DPP_COVEREDINVENTORY_PVT_DPP1) IS
168: P_INV_HDR_REC_ APPS.DPP_COVEREDINVENTORY_PVT.DPP_INV_HDR_REC_TYPE;
169: P_COVERED_INV_TBL_ APPS.DPP_COVEREDINVENTORY_PVT.DPP_INV_COV_TBL_TYPE;
170: BEGIN
171: P_INV_HDR_REC_ := DPP_BPEL_SELCOVINV.SQL_TO_PL0(P_INV_HDR_REC);
164:
165: PROCEDURE DPP_COVEREDINVENTORY_PVT$SELE (P_API_VERSION NUMBER,P_INIT_MSG_LIST VARCHAR2,P_COMMIT VARCHAR2,P_VALIDATION_LEVEL NUMBER,
166: X_RETURN_STATUS OUT NOCOPY VARCHAR2,X_MSG_COUNT OUT NOCOPY NUMBER,X_MSG_DATA OUT NOCOPY VARCHAR2,
167: P_INV_HDR_REC DPP_COVEREDINVENTORY_PVT_DPP_,P_COVERED_INV_TBL IN OUT NOCOPY DPP_COVEREDINVENTORY_PVT_DPP1) IS
168: P_INV_HDR_REC_ APPS.DPP_COVEREDINVENTORY_PVT.DPP_INV_HDR_REC_TYPE;
169: P_COVERED_INV_TBL_ APPS.DPP_COVEREDINVENTORY_PVT.DPP_INV_COV_TBL_TYPE;
170: BEGIN
171: P_INV_HDR_REC_ := DPP_BPEL_SELCOVINV.SQL_TO_PL0(P_INV_HDR_REC);
172: P_COVERED_INV_TBL_ := DPP_BPEL_SELCOVINV.SQL_TO_PL1(P_COVERED_INV_TBL);
165: PROCEDURE DPP_COVEREDINVENTORY_PVT$SELE (P_API_VERSION NUMBER,P_INIT_MSG_LIST VARCHAR2,P_COMMIT VARCHAR2,P_VALIDATION_LEVEL NUMBER,
166: X_RETURN_STATUS OUT NOCOPY VARCHAR2,X_MSG_COUNT OUT NOCOPY NUMBER,X_MSG_DATA OUT NOCOPY VARCHAR2,
167: P_INV_HDR_REC DPP_COVEREDINVENTORY_PVT_DPP_,P_COVERED_INV_TBL IN OUT NOCOPY DPP_COVEREDINVENTORY_PVT_DPP1) IS
168: P_INV_HDR_REC_ APPS.DPP_COVEREDINVENTORY_PVT.DPP_INV_HDR_REC_TYPE;
169: P_COVERED_INV_TBL_ APPS.DPP_COVEREDINVENTORY_PVT.DPP_INV_COV_TBL_TYPE;
170: BEGIN
171: P_INV_HDR_REC_ := DPP_BPEL_SELCOVINV.SQL_TO_PL0(P_INV_HDR_REC);
172: P_COVERED_INV_TBL_ := DPP_BPEL_SELCOVINV.SQL_TO_PL1(P_COVERED_INV_TBL);
173: APPS.DPP_COVEREDINVENTORY_PVT.SELECT_COVEREDINVENTORY(P_API_VERSION,P_INIT_MSG_LIST,P_COMMIT,P_VALIDATION_LEVEL,X_RETURN_STATUS,X_MSG_COUNT,X_MSG_DATA,P_INV_HDR_REC_,P_COVERED_INV_TBL_);
169: P_COVERED_INV_TBL_ APPS.DPP_COVEREDINVENTORY_PVT.DPP_INV_COV_TBL_TYPE;
170: BEGIN
171: P_INV_HDR_REC_ := DPP_BPEL_SELCOVINV.SQL_TO_PL0(P_INV_HDR_REC);
172: P_COVERED_INV_TBL_ := DPP_BPEL_SELCOVINV.SQL_TO_PL1(P_COVERED_INV_TBL);
173: APPS.DPP_COVEREDINVENTORY_PVT.SELECT_COVEREDINVENTORY(P_API_VERSION,P_INIT_MSG_LIST,P_COMMIT,P_VALIDATION_LEVEL,X_RETURN_STATUS,X_MSG_COUNT,X_MSG_DATA,P_INV_HDR_REC_,P_COVERED_INV_TBL_);
174: P_COVERED_INV_TBL := DPP_BPEL_SELCOVINV.PL_TO_SQL0(P_COVERED_INV_TBL_);
175: END DPP_COVEREDINVENTORY_PVT$SELE;
176:
177: END DPP_BPEL_SELCOVINV;
171: P_INV_HDR_REC_ := DPP_BPEL_SELCOVINV.SQL_TO_PL0(P_INV_HDR_REC);
172: P_COVERED_INV_TBL_ := DPP_BPEL_SELCOVINV.SQL_TO_PL1(P_COVERED_INV_TBL);
173: APPS.DPP_COVEREDINVENTORY_PVT.SELECT_COVEREDINVENTORY(P_API_VERSION,P_INIT_MSG_LIST,P_COMMIT,P_VALIDATION_LEVEL,X_RETURN_STATUS,X_MSG_COUNT,X_MSG_DATA,P_INV_HDR_REC_,P_COVERED_INV_TBL_);
174: P_COVERED_INV_TBL := DPP_BPEL_SELCOVINV.PL_TO_SQL0(P_COVERED_INV_TBL_);
175: END DPP_COVEREDINVENTORY_PVT$SELE;
176:
177: END DPP_BPEL_SELCOVINV;