eTRM uses javascript that opens and focuses a separate window to display reports. Your browser does not appear to support javascript. This should not prevent you from using eTRM but it does mean the window focus feature will not work. Please check the contents of other windows on your desktop if you click on a link that does not appear to do anything.
PACKAGE BODY: APPS.DPP_BPEL_UPDATECOST

Source


1 PACKAGE BODY DPP_BPEL_UPDATECOST AS
2 /* $Header: dppvbucb.pls 120.2 2011/07/14 10:01:04 rvkondur ship $ */
3 	FUNCTION PL_TO_SQL9(aPlsqlItem DPP_ITEMCOST_PVT.DPP_CST_HDR_REC_TYPE)
4  	RETURN DPP_ITEMCOST_PVT_DPP_CST_HDR_ IS
5 	aSqlItem DPP_ITEMCOST_PVT_DPP_CST_HDR_;
6 	BEGIN
7 		-- initialize the object
8 		aSqlItem := DPP_ITEMCOST_PVT_DPP_CST_HDR_(NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL,
9 		NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL);
10 		aSqlItem.TRANSACTION_HEADER_ID := aPlsqlItem.TRANSACTION_HEADER_ID;
11 		aSqlItem.TRANSACTION_NUMBER := aPlsqlItem.TRANSACTION_NUMBER;
12 		aSqlItem.ORG_ID := aPlsqlItem.ORG_ID;
13 		aSqlItem.EXECUTION_DETAIL_ID := aPlsqlItem.EXECUTION_DETAIL_ID;
14 		aSqlItem.PROVIDER_PROCESS_ID := aPlsqlItem.PROVIDER_PROCESS_ID;
15 		aSqlItem.PROVIDER_PROCESS_INSTANCE_ID := aPlsqlItem.PROVIDER_PROCESS_INSTANCE_ID;
16 		aSqlItem.LAST_UPDATED_BY := aPlsqlItem.LAST_UPDATED_BY;
17 		aSqlItem.COST_ADJUSTMENT_ACCOUNT := aPlsqlItem.COST_ADJUSTMENT_ACCOUNT;
18 		aSqlItem.ATTRIBUTE_CATEGORY := aPlsqlItem.ATTRIBUTE_CATEGORY;
19 		aSqlItem.ATTRIBUTE1 := aPlsqlItem.ATTRIBUTE1;
20 		aSqlItem.ATTRIBUTE2 := aPlsqlItem.ATTRIBUTE2;
21 		aSqlItem.ATTRIBUTE3 := aPlsqlItem.ATTRIBUTE3;
22 		aSqlItem.ATTRIBUTE4 := aPlsqlItem.ATTRIBUTE4;
23 		aSqlItem.ATTRIBUTE5 := aPlsqlItem.ATTRIBUTE5;
24 		aSqlItem.ATTRIBUTE6 := aPlsqlItem.ATTRIBUTE6;
25 		aSqlItem.ATTRIBUTE7 := aPlsqlItem.ATTRIBUTE7;
26 		aSqlItem.ATTRIBUTE8 := aPlsqlItem.ATTRIBUTE8;
27 		aSqlItem.ATTRIBUTE9 := aPlsqlItem.ATTRIBUTE9;
28 		aSqlItem.ATTRIBUTE10 := aPlsqlItem.ATTRIBUTE10;
29 		aSqlItem.ATTRIBUTE11 := aPlsqlItem.ATTRIBUTE11;
30 		aSqlItem.ATTRIBUTE12 := aPlsqlItem.ATTRIBUTE12;
31 		aSqlItem.ATTRIBUTE13 := aPlsqlItem.ATTRIBUTE13;
32 		aSqlItem.ATTRIBUTE14 := aPlsqlItem.ATTRIBUTE14;
33 		aSqlItem.ATTRIBUTE15 := aPlsqlItem.ATTRIBUTE15;
34 		RETURN aSqlItem;
35 	END PL_TO_SQL9;
36 	FUNCTION SQL_TO_PL9(aSqlItem DPP_ITEMCOST_PVT_DPP_CST_HDR_)
37 	RETURN DPP_ITEMCOST_PVT.DPP_CST_HDR_REC_TYPE IS
38 	aPlsqlItem DPP_ITEMCOST_PVT.DPP_CST_HDR_REC_TYPE;
39 	BEGIN
40 		aPlsqlItem.TRANSACTION_HEADER_ID := aSqlItem.TRANSACTION_HEADER_ID;
41 		aPlsqlItem.TRANSACTION_NUMBER := aSqlItem.TRANSACTION_NUMBER;
42 		aPlsqlItem.ORG_ID := aSqlItem.ORG_ID;
43 		aPlsqlItem.EXECUTION_DETAIL_ID := aSqlItem.EXECUTION_DETAIL_ID;
44 		aPlsqlItem.PROVIDER_PROCESS_ID := aSqlItem.PROVIDER_PROCESS_ID;
45 		aPlsqlItem.PROVIDER_PROCESS_INSTANCE_ID := aSqlItem.PROVIDER_PROCESS_INSTANCE_ID;
46 		aPlsqlItem.LAST_UPDATED_BY := aSqlItem.LAST_UPDATED_BY;
47 		aPlsqlItem.COST_ADJUSTMENT_ACCOUNT := aSqlItem.COST_ADJUSTMENT_ACCOUNT;
48 		aPlsqlItem.ATTRIBUTE_CATEGORY := aSqlItem.ATTRIBUTE_CATEGORY;
49 		aPlsqlItem.ATTRIBUTE1 := aSqlItem.ATTRIBUTE1;
50 		aPlsqlItem.ATTRIBUTE2 := aSqlItem.ATTRIBUTE2;
51 		aPlsqlItem.ATTRIBUTE3 := aSqlItem.ATTRIBUTE3;
52 		aPlsqlItem.ATTRIBUTE4 := aSqlItem.ATTRIBUTE4;
53 		aPlsqlItem.ATTRIBUTE5 := aSqlItem.ATTRIBUTE5;
54 		aPlsqlItem.ATTRIBUTE6 := aSqlItem.ATTRIBUTE6;
55 		aPlsqlItem.ATTRIBUTE7 := aSqlItem.ATTRIBUTE7;
56 		aPlsqlItem.ATTRIBUTE8 := aSqlItem.ATTRIBUTE8;
57 		aPlsqlItem.ATTRIBUTE9 := aSqlItem.ATTRIBUTE9;
58 		aPlsqlItem.ATTRIBUTE10 := aSqlItem.ATTRIBUTE10;
59 		aPlsqlItem.ATTRIBUTE11 := aSqlItem.ATTRIBUTE11;
60 		aPlsqlItem.ATTRIBUTE12 := aSqlItem.ATTRIBUTE12;
61 		aPlsqlItem.ATTRIBUTE13 := aSqlItem.ATTRIBUTE13;
62 		aPlsqlItem.ATTRIBUTE14 := aSqlItem.ATTRIBUTE14;
63 		aPlsqlItem.ATTRIBUTE15 := aSqlItem.ATTRIBUTE15;
64 		RETURN aPlsqlItem;
65 	END SQL_TO_PL9;
66 	FUNCTION PL_TO_SQL10(aPlsqlItem DPP_ITEMCOST_PVT.INV_ORG_DETAILS_REC_TYPE)
67  	RETURN DPP_ITEMCOST_PVT_INV_ORG_DETA IS
68 	aSqlItem DPP_ITEMCOST_PVT_INV_ORG_DETA;
69 	BEGIN
70 		-- initialize the object
71 		aSqlItem := DPP_ITEMCOST_PVT_INV_ORG_DETA(NULL, NULL);
72 		aSqlItem.INVENTORY_ORG_NAME := aPlsqlItem.INVENTORY_ORG_NAME;
73 		aSqlItem.PRIOR_COST := aPlsqlItem.PRIOR_COST;
74 		RETURN aSqlItem;
75 	END PL_TO_SQL10;
76 	FUNCTION SQL_TO_PL11(aSqlItem DPP_ITEMCOST_PVT_INV_ORG_DETA)
77 	RETURN DPP_ITEMCOST_PVT.INV_ORG_DETAILS_REC_TYPE IS
78 	aPlsqlItem DPP_ITEMCOST_PVT.INV_ORG_DETAILS_REC_TYPE;
79 	BEGIN
80 		aPlsqlItem.INVENTORY_ORG_NAME := aSqlItem.INVENTORY_ORG_NAME;
81 		aPlsqlItem.PRIOR_COST := aSqlItem.PRIOR_COST;
82 		RETURN aPlsqlItem;
83 	END SQL_TO_PL11;
84 	FUNCTION PL_TO_SQL11(aPlsqlItem DPP_ITEMCOST_PVT.INV_ORG_DETAILS_TBL_TYPE)
85  	RETURN DPPITEMCOSTPVTDPPTXNLIN7_INV_ IS
86 	aSqlItem DPPITEMCOSTPVTDPPTXNLIN7_INV_;
87 	BEGIN
88 		-- initialize the table
89 		aSqlItem := DPPITEMCOSTPVTDPPTXNLIN7_INV_();
90 		aSqlItem.EXTEND(aPlsqlItem.COUNT);
91 		FOR I IN aPlsqlItem.FIRST..aPlsqlItem.LAST LOOP
92 			aSqlItem(I + 1 - aPlsqlItem.FIRST) := PL_TO_SQL10(aPlsqlItem(I));
93 		END LOOP;
94 		RETURN aSqlItem;
95 	END PL_TO_SQL11;
96 	FUNCTION SQL_TO_PL12(aSqlItem DPPITEMCOSTPVTDPPTXNLIN7_INV_)
97 	RETURN DPP_ITEMCOST_PVT.INV_ORG_DETAILS_TBL_TYPE IS
98 	aPlsqlItem DPP_ITEMCOST_PVT.INV_ORG_DETAILS_TBL_TYPE;
99 	BEGIN
100 		FOR I IN 1..aSqlItem.COUNT LOOP
101 			aPlsqlItem(I) := SQL_TO_PL11(aSqlItem(I));
102 		END LOOP;
103 		RETURN aPlsqlItem;
104 	END SQL_TO_PL12;
105 	FUNCTION PL_TO_SQL12(aPlsqlItem DPP_ITEMCOST_PVT.DPP_TXN_LINE_REC_TYPE)
106  	RETURN DPP_ITEMCOST_PVT_DPP_TXN_LIN7 IS
107 	aSqlItem DPP_ITEMCOST_PVT_DPP_TXN_LIN7;
108 	BEGIN
109 		-- initialize the object
110 		aSqlItem := DPP_ITEMCOST_PVT_DPP_TXN_LIN7(NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL,
111 		NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL, NULL);
112 		aSqlItem.TRANSACTION_LINE_ID := aPlsqlItem.TRANSACTION_LINE_ID;
113 		aSqlItem.INVENTORY_ITEM_ID := aPlsqlItem.INVENTORY_ITEM_ID;
114 		aSqlItem.ITEM_NUMBER := aPlsqlItem.ITEM_NUMBER;
115 		aSqlItem.NEW_PRICE := aPlsqlItem.NEW_PRICE;
116 		aSqlItem.CURRENCY := aPlsqlItem.CURRENCY;
117 		aSqlItem.UOM := aPlsqlItem.UOM;
118 		aSqlItem.PRICE_CHANGE := aPlsqlItem.PRICE_CHANGE;
119 		aSqlItem.ATTRIBUTE_CATEGORY := aPlsqlItem.ATTRIBUTE_CATEGORY;
120 		aSqlItem.ATTRIBUTE1 := aPlsqlItem.ATTRIBUTE1;
121 		aSqlItem.ATTRIBUTE2 := aPlsqlItem.ATTRIBUTE2;
122 		aSqlItem.ATTRIBUTE3 := aPlsqlItem.ATTRIBUTE3;
123 		aSqlItem.ATTRIBUTE4 := aPlsqlItem.ATTRIBUTE4;
124 		aSqlItem.ATTRIBUTE5 := aPlsqlItem.ATTRIBUTE5;
125 		aSqlItem.ATTRIBUTE6 := aPlsqlItem.ATTRIBUTE6;
126 		aSqlItem.ATTRIBUTE7 := aPlsqlItem.ATTRIBUTE7;
127 		aSqlItem.ATTRIBUTE8 := aPlsqlItem.ATTRIBUTE8;
128 		aSqlItem.ATTRIBUTE9 := aPlsqlItem.ATTRIBUTE9;
129 		aSqlItem.ATTRIBUTE10 := aPlsqlItem.ATTRIBUTE10;
130 		aSqlItem.ATTRIBUTE11 := aPlsqlItem.ATTRIBUTE11;
131 		aSqlItem.ATTRIBUTE12 := aPlsqlItem.ATTRIBUTE12;
132 		aSqlItem.ATTRIBUTE13 := aPlsqlItem.ATTRIBUTE13;
133 		aSqlItem.ATTRIBUTE14 := aPlsqlItem.ATTRIBUTE14;
134 		aSqlItem.ATTRIBUTE15 := aPlsqlItem.ATTRIBUTE15;
135 		aSqlItem.UPDATE_STATUS := aPlsqlItem.UPDATE_STATUS;
136 		aSqlItem.REASON_FOR_FAILURE := aPlsqlItem.REASON_FOR_FAILURE;
137 		aSqlItem.INV_ORG_DETAILS_TBL := PL_TO_SQL11(aPlsqlItem.INV_ORG_DETAILS_TBL);
138 		RETURN aSqlItem;
139 	END PL_TO_SQL12;
140 	FUNCTION SQL_TO_PL13(aSqlItem DPP_ITEMCOST_PVT_DPP_TXN_LIN7)
141 	RETURN DPP_ITEMCOST_PVT.DPP_TXN_LINE_REC_TYPE IS
142 	aPlsqlItem DPP_ITEMCOST_PVT.DPP_TXN_LINE_REC_TYPE;
143 	BEGIN
144 		aPlsqlItem.TRANSACTION_LINE_ID := aSqlItem.TRANSACTION_LINE_ID;
145 		aPlsqlItem.INVENTORY_ITEM_ID := aSqlItem.INVENTORY_ITEM_ID;
146 		aPlsqlItem.ITEM_NUMBER := aSqlItem.ITEM_NUMBER;
147 		aPlsqlItem.NEW_PRICE := aSqlItem.NEW_PRICE;
148 		aPlsqlItem.CURRENCY := aSqlItem.CURRENCY;
149 		aPlsqlItem.UOM := aSqlItem.UOM;
150 		aPlsqlItem.PRICE_CHANGE := aSqlItem.PRICE_CHANGE;
151 		aPlsqlItem.ATTRIBUTE_CATEGORY := aSqlItem.ATTRIBUTE_CATEGORY;
152 		aPlsqlItem.ATTRIBUTE1 := aSqlItem.ATTRIBUTE1;
153 		aPlsqlItem.ATTRIBUTE2 := aSqlItem.ATTRIBUTE2;
154 		aPlsqlItem.ATTRIBUTE3 := aSqlItem.ATTRIBUTE3;
155 		aPlsqlItem.ATTRIBUTE4 := aSqlItem.ATTRIBUTE4;
156 		aPlsqlItem.ATTRIBUTE5 := aSqlItem.ATTRIBUTE5;
157 		aPlsqlItem.ATTRIBUTE6 := aSqlItem.ATTRIBUTE6;
158 		aPlsqlItem.ATTRIBUTE7 := aSqlItem.ATTRIBUTE7;
159 		aPlsqlItem.ATTRIBUTE8 := aSqlItem.ATTRIBUTE8;
160 		aPlsqlItem.ATTRIBUTE9 := aSqlItem.ATTRIBUTE9;
161 		aPlsqlItem.ATTRIBUTE10 := aSqlItem.ATTRIBUTE10;
162 		aPlsqlItem.ATTRIBUTE11 := aSqlItem.ATTRIBUTE11;
163 		aPlsqlItem.ATTRIBUTE12 := aSqlItem.ATTRIBUTE12;
164 		aPlsqlItem.ATTRIBUTE13 := aSqlItem.ATTRIBUTE13;
165 		aPlsqlItem.ATTRIBUTE14 := aSqlItem.ATTRIBUTE14;
166 		aPlsqlItem.ATTRIBUTE15 := aSqlItem.ATTRIBUTE15;
167 		aPlsqlItem.UPDATE_STATUS := aSqlItem.UPDATE_STATUS;
168 		aPlsqlItem.REASON_FOR_FAILURE := aSqlItem.REASON_FOR_FAILURE;
169 		aPlsqlItem.INV_ORG_DETAILS_TBL := SQL_TO_PL12(aSqlItem.INV_ORG_DETAILS_TBL);
170 		RETURN aPlsqlItem;
171 	END SQL_TO_PL13;
172 	FUNCTION PL_TO_SQL13(aPlsqlItem DPP_ITEMCOST_PVT.DPP_TXN_LINE_TBL_TYPE)
173  	RETURN DPP_ITEMCOST_PVT_DPP_TXN_LINE IS
174 	aSqlItem DPP_ITEMCOST_PVT_DPP_TXN_LINE;
175 	BEGIN
176 		-- initialize the table
177 		aSqlItem := DPP_ITEMCOST_PVT_DPP_TXN_LINE();
178 		aSqlItem.EXTEND(aPlsqlItem.COUNT);
179 		FOR I IN aPlsqlItem.FIRST..aPlsqlItem.LAST LOOP
180 			aSqlItem(I + 1 - aPlsqlItem.FIRST) := PL_TO_SQL12(aPlsqlItem(I));
181 		END LOOP;
182 		RETURN aSqlItem;
183 	END PL_TO_SQL13;
184 	FUNCTION SQL_TO_PL10(aSqlItem DPP_ITEMCOST_PVT_DPP_TXN_LINE)
185 	RETURN DPP_ITEMCOST_PVT.DPP_TXN_LINE_TBL_TYPE IS
186 	aPlsqlItem DPP_ITEMCOST_PVT.DPP_TXN_LINE_TBL_TYPE;
187 	BEGIN
188 		FOR I IN 1..aSqlItem.COUNT LOOP
189 			aPlsqlItem(I) := SQL_TO_PL13(aSqlItem(I));
190 		END LOOP;
191 		RETURN aPlsqlItem;
192 	END SQL_TO_PL10;
193 
194    PROCEDURE DPP_ITEMCOST_PVT$UPDATE_ITEMC (P_API_VERSION NUMBER,P_INIT_MSG_LIST VARCHAR2,P_COMMIT VARCHAR2,P_VALIDATION_LEVEL NUMBER,
195    X_RETURN_STATUS OUT NOCOPY VARCHAR2,X_MSG_COUNT OUT NOCOPY NUMBER,X_MSG_DATA OUT NOCOPY VARCHAR2,P_TXN_HDR_REC DPP_ITEMCOST_PVT_DPP_CST_HDR_,
196    P_ITEM_COST_TBL DPP_ITEMCOST_PVT_DPP_TXN_LINE) IS
197       P_TXN_HDR_REC_ DPP_ITEMCOST_PVT.DPP_CST_HDR_REC_TYPE;
198       P_ITEM_COST_TBL_ DPP_ITEMCOST_PVT.DPP_TXN_LINE_TBL_TYPE;
199    BEGIN
200       P_TXN_HDR_REC_ := DPP_BPEL_UPDATECOST.SQL_TO_PL9(P_TXN_HDR_REC);
201       P_ITEM_COST_TBL_ := DPP_BPEL_UPDATECOST.SQL_TO_PL10(P_ITEM_COST_TBL);
202       DPP_ITEMCOST_PVT.UPDATE_ITEMCOST(P_API_VERSION,P_INIT_MSG_LIST,P_COMMIT,P_VALIDATION_LEVEL,X_RETURN_STATUS,X_MSG_COUNT,X_MSG_DATA,P_TXN_HDR_REC_,P_ITEM_COST_TBL_);
203    END DPP_ITEMCOST_PVT$UPDATE_ITEMC;
204 
205 END DPP_BPEL_UPDATECOST;