91: l_count number;
92:
93:
94: BEGIN
95: FND_FILE.PUT_LINE(FND_FILE.LOG, '***** BEGIN contract_status_updater *****');
96:
97: FND_FILE.PUT_LINE(FND_FILE.LOG, 'p_status = ' || p_status);
98:
99: l_api_name := 'contract_status_updater';
93:
94: BEGIN
95: FND_FILE.PUT_LINE(FND_FILE.LOG, '***** BEGIN contract_status_updater *****');
96:
97: FND_FILE.PUT_LINE(FND_FILE.LOG, 'p_status = ' || p_status);
98:
99: l_api_name := 'contract_status_updater';
100: l_api_version := 1.0;
101: l_first_iteration := 'Y';
124: IF (l_first_iteration = 'Y') THEN
125:
126: l_first_iteration := 'N';
127:
128: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, '');
129: FND_FILE.PUT_LINE(FND_FILE.LOG, '');
130: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, OKC_TERMS_UTIL_PVT.get_message(G_APP_NAME, 'OKC_REP_SW_CONTRACT_DETAILS'));
131: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, '================');
132: FND_FILE.PUT_LINE(FND_FILE.LOG, OKC_TERMS_UTIL_PVT.get_message(G_APP_NAME, 'OKC_REP_SW_CONTRACT_DETAILS'));
125:
126: l_first_iteration := 'N';
127:
128: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, '');
129: FND_FILE.PUT_LINE(FND_FILE.LOG, '');
130: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, OKC_TERMS_UTIL_PVT.get_message(G_APP_NAME, 'OKC_REP_SW_CONTRACT_DETAILS'));
131: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, '================');
132: FND_FILE.PUT_LINE(FND_FILE.LOG, OKC_TERMS_UTIL_PVT.get_message(G_APP_NAME, 'OKC_REP_SW_CONTRACT_DETAILS'));
133: FND_FILE.PUT_LINE(FND_FILE.LOG, '================');
126: l_first_iteration := 'N';
127:
128: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, '');
129: FND_FILE.PUT_LINE(FND_FILE.LOG, '');
130: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, OKC_TERMS_UTIL_PVT.get_message(G_APP_NAME, 'OKC_REP_SW_CONTRACT_DETAILS'));
131: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, '================');
132: FND_FILE.PUT_LINE(FND_FILE.LOG, OKC_TERMS_UTIL_PVT.get_message(G_APP_NAME, 'OKC_REP_SW_CONTRACT_DETAILS'));
133: FND_FILE.PUT_LINE(FND_FILE.LOG, '================');
134:
127:
128: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, '');
129: FND_FILE.PUT_LINE(FND_FILE.LOG, '');
130: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, OKC_TERMS_UTIL_PVT.get_message(G_APP_NAME, 'OKC_REP_SW_CONTRACT_DETAILS'));
131: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, '================');
132: FND_FILE.PUT_LINE(FND_FILE.LOG, OKC_TERMS_UTIL_PVT.get_message(G_APP_NAME, 'OKC_REP_SW_CONTRACT_DETAILS'));
133: FND_FILE.PUT_LINE(FND_FILE.LOG, '================');
134:
135: END IF;
128: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, '');
129: FND_FILE.PUT_LINE(FND_FILE.LOG, '');
130: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, OKC_TERMS_UTIL_PVT.get_message(G_APP_NAME, 'OKC_REP_SW_CONTRACT_DETAILS'));
131: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, '================');
132: FND_FILE.PUT_LINE(FND_FILE.LOG, OKC_TERMS_UTIL_PVT.get_message(G_APP_NAME, 'OKC_REP_SW_CONTRACT_DETAILS'));
133: FND_FILE.PUT_LINE(FND_FILE.LOG, '================');
134:
135: END IF;
136:
129: FND_FILE.PUT_LINE(FND_FILE.LOG, '');
130: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, OKC_TERMS_UTIL_PVT.get_message(G_APP_NAME, 'OKC_REP_SW_CONTRACT_DETAILS'));
131: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, '================');
132: FND_FILE.PUT_LINE(FND_FILE.LOG, OKC_TERMS_UTIL_PVT.get_message(G_APP_NAME, 'OKC_REP_SW_CONTRACT_DETAILS'));
133: FND_FILE.PUT_LINE(FND_FILE.LOG, '================');
134:
135: END IF;
136:
137:
140:
141: -- Populate the current contract details into concurrent output and log files
142:
143: -- Add Contract Name
144: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, OKC_TERMS_UTIL_PVT.get_message(G_APP_NAME, 'OKC_REP_ATTR_CON_NAME') || ' : '|| selected_contracts(i).contract_name);
145: FND_FILE.PUT_LINE(FND_FILE.LOG, OKC_TERMS_UTIL_PVT.get_message(G_APP_NAME, 'OKC_REP_ATTR_CON_NAME') || ' : '|| selected_contracts(i).contract_name);
146:
147: -- Add Contract Number
148: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, OKC_TERMS_UTIL_PVT.get_message(G_APP_NAME, 'OKC_REP_SW_ATTR_CON_NUMBER') || ' : '|| selected_contracts(i).contract_number);
141: -- Populate the current contract details into concurrent output and log files
142:
143: -- Add Contract Name
144: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, OKC_TERMS_UTIL_PVT.get_message(G_APP_NAME, 'OKC_REP_ATTR_CON_NAME') || ' : '|| selected_contracts(i).contract_name);
145: FND_FILE.PUT_LINE(FND_FILE.LOG, OKC_TERMS_UTIL_PVT.get_message(G_APP_NAME, 'OKC_REP_ATTR_CON_NAME') || ' : '|| selected_contracts(i).contract_name);
146:
147: -- Add Contract Number
148: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, OKC_TERMS_UTIL_PVT.get_message(G_APP_NAME, 'OKC_REP_SW_ATTR_CON_NUMBER') || ' : '|| selected_contracts(i).contract_number);
149: FND_FILE.PUT_LINE(FND_FILE.LOG, OKC_TERMS_UTIL_PVT.get_message(G_APP_NAME, 'OKC_REP_SW_ATTR_CON_NUMBER') || ' : '|| selected_contracts(i).contract_number);
144: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, OKC_TERMS_UTIL_PVT.get_message(G_APP_NAME, 'OKC_REP_ATTR_CON_NAME') || ' : '|| selected_contracts(i).contract_name);
145: FND_FILE.PUT_LINE(FND_FILE.LOG, OKC_TERMS_UTIL_PVT.get_message(G_APP_NAME, 'OKC_REP_ATTR_CON_NAME') || ' : '|| selected_contracts(i).contract_name);
146:
147: -- Add Contract Number
148: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, OKC_TERMS_UTIL_PVT.get_message(G_APP_NAME, 'OKC_REP_SW_ATTR_CON_NUMBER') || ' : '|| selected_contracts(i).contract_number);
149: FND_FILE.PUT_LINE(FND_FILE.LOG, OKC_TERMS_UTIL_PVT.get_message(G_APP_NAME, 'OKC_REP_SW_ATTR_CON_NUMBER') || ' : '|| selected_contracts(i).contract_number);
150:
151: -- Add Contract Version Number
152: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, OKC_TERMS_UTIL_PVT.get_message(G_APP_NAME, 'OKC_REP_SW_ATTR_CON_VER_NUM') || ' : '|| selected_contracts(i).contract_version_num);
145: FND_FILE.PUT_LINE(FND_FILE.LOG, OKC_TERMS_UTIL_PVT.get_message(G_APP_NAME, 'OKC_REP_ATTR_CON_NAME') || ' : '|| selected_contracts(i).contract_name);
146:
147: -- Add Contract Number
148: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, OKC_TERMS_UTIL_PVT.get_message(G_APP_NAME, 'OKC_REP_SW_ATTR_CON_NUMBER') || ' : '|| selected_contracts(i).contract_number);
149: FND_FILE.PUT_LINE(FND_FILE.LOG, OKC_TERMS_UTIL_PVT.get_message(G_APP_NAME, 'OKC_REP_SW_ATTR_CON_NUMBER') || ' : '|| selected_contracts(i).contract_number);
150:
151: -- Add Contract Version Number
152: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, OKC_TERMS_UTIL_PVT.get_message(G_APP_NAME, 'OKC_REP_SW_ATTR_CON_VER_NUM') || ' : '|| selected_contracts(i).contract_version_num);
153: FND_FILE.PUT_LINE(FND_FILE.LOG, OKC_TERMS_UTIL_PVT.get_message(G_APP_NAME, 'OKC_REP_SW_ATTR_CON_VER_NUM') || ' : '|| selected_contracts(i).contract_version_num);
148: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, OKC_TERMS_UTIL_PVT.get_message(G_APP_NAME, 'OKC_REP_SW_ATTR_CON_NUMBER') || ' : '|| selected_contracts(i).contract_number);
149: FND_FILE.PUT_LINE(FND_FILE.LOG, OKC_TERMS_UTIL_PVT.get_message(G_APP_NAME, 'OKC_REP_SW_ATTR_CON_NUMBER') || ' : '|| selected_contracts(i).contract_number);
150:
151: -- Add Contract Version Number
152: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, OKC_TERMS_UTIL_PVT.get_message(G_APP_NAME, 'OKC_REP_SW_ATTR_CON_VER_NUM') || ' : '|| selected_contracts(i).contract_version_num);
153: FND_FILE.PUT_LINE(FND_FILE.LOG, OKC_TERMS_UTIL_PVT.get_message(G_APP_NAME, 'OKC_REP_SW_ATTR_CON_VER_NUM') || ' : '|| selected_contracts(i).contract_version_num);
154:
155: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, '');
156: FND_FILE.PUT_LINE(FND_FILE.LOG, '');
149: FND_FILE.PUT_LINE(FND_FILE.LOG, OKC_TERMS_UTIL_PVT.get_message(G_APP_NAME, 'OKC_REP_SW_ATTR_CON_NUMBER') || ' : '|| selected_contracts(i).contract_number);
150:
151: -- Add Contract Version Number
152: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, OKC_TERMS_UTIL_PVT.get_message(G_APP_NAME, 'OKC_REP_SW_ATTR_CON_VER_NUM') || ' : '|| selected_contracts(i).contract_version_num);
153: FND_FILE.PUT_LINE(FND_FILE.LOG, OKC_TERMS_UTIL_PVT.get_message(G_APP_NAME, 'OKC_REP_SW_ATTR_CON_VER_NUM') || ' : '|| selected_contracts(i).contract_version_num);
154:
155: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, '');
156: FND_FILE.PUT_LINE(FND_FILE.LOG, '');
157:
151: -- Add Contract Version Number
152: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, OKC_TERMS_UTIL_PVT.get_message(G_APP_NAME, 'OKC_REP_SW_ATTR_CON_VER_NUM') || ' : '|| selected_contracts(i).contract_version_num);
153: FND_FILE.PUT_LINE(FND_FILE.LOG, OKC_TERMS_UTIL_PVT.get_message(G_APP_NAME, 'OKC_REP_SW_ATTR_CON_VER_NUM') || ' : '|| selected_contracts(i).contract_version_num);
154:
155: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, '');
156: FND_FILE.PUT_LINE(FND_FILE.LOG, '');
157:
158: -- Prepare a number array of contract ids, this is required by the UPDATE
159: -- statement under FORALL as it will not take selected_contracts(i).contract_id in the WHERE clause
152: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, OKC_TERMS_UTIL_PVT.get_message(G_APP_NAME, 'OKC_REP_SW_ATTR_CON_VER_NUM') || ' : '|| selected_contracts(i).contract_version_num);
153: FND_FILE.PUT_LINE(FND_FILE.LOG, OKC_TERMS_UTIL_PVT.get_message(G_APP_NAME, 'OKC_REP_SW_ATTR_CON_VER_NUM') || ' : '|| selected_contracts(i).contract_version_num);
154:
155: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, '');
156: FND_FILE.PUT_LINE(FND_FILE.LOG, '');
157:
158: -- Prepare a number array of contract ids, this is required by the UPDATE
159: -- statement under FORALL as it will not take selected_contracts(i).contract_id in the WHERE clause
160: -- Getting the following compilation error
190: IF (l_first_iteration = 'Y') THEN
191:
192: l_first_iteration := 'N';
193:
194: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, '');
195: FND_FILE.PUT_LINE(FND_FILE.LOG, '');
196: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, OKC_TERMS_UTIL_PVT.get_message(G_APP_NAME, 'OKC_REP_SW_CONTRACT_DETAILS'));
197: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, '================');
198: FND_FILE.PUT_LINE(FND_FILE.LOG, OKC_TERMS_UTIL_PVT.get_message(G_APP_NAME, 'OKC_REP_SW_CONTRACT_DETAILS'));
191:
192: l_first_iteration := 'N';
193:
194: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, '');
195: FND_FILE.PUT_LINE(FND_FILE.LOG, '');
196: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, OKC_TERMS_UTIL_PVT.get_message(G_APP_NAME, 'OKC_REP_SW_CONTRACT_DETAILS'));
197: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, '================');
198: FND_FILE.PUT_LINE(FND_FILE.LOG, OKC_TERMS_UTIL_PVT.get_message(G_APP_NAME, 'OKC_REP_SW_CONTRACT_DETAILS'));
199: FND_FILE.PUT_LINE(FND_FILE.LOG, '================');
192: l_first_iteration := 'N';
193:
194: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, '');
195: FND_FILE.PUT_LINE(FND_FILE.LOG, '');
196: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, OKC_TERMS_UTIL_PVT.get_message(G_APP_NAME, 'OKC_REP_SW_CONTRACT_DETAILS'));
197: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, '================');
198: FND_FILE.PUT_LINE(FND_FILE.LOG, OKC_TERMS_UTIL_PVT.get_message(G_APP_NAME, 'OKC_REP_SW_CONTRACT_DETAILS'));
199: FND_FILE.PUT_LINE(FND_FILE.LOG, '================');
200:
193:
194: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, '');
195: FND_FILE.PUT_LINE(FND_FILE.LOG, '');
196: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, OKC_TERMS_UTIL_PVT.get_message(G_APP_NAME, 'OKC_REP_SW_CONTRACT_DETAILS'));
197: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, '================');
198: FND_FILE.PUT_LINE(FND_FILE.LOG, OKC_TERMS_UTIL_PVT.get_message(G_APP_NAME, 'OKC_REP_SW_CONTRACT_DETAILS'));
199: FND_FILE.PUT_LINE(FND_FILE.LOG, '================');
200:
201: END IF;
194: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, '');
195: FND_FILE.PUT_LINE(FND_FILE.LOG, '');
196: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, OKC_TERMS_UTIL_PVT.get_message(G_APP_NAME, 'OKC_REP_SW_CONTRACT_DETAILS'));
197: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, '================');
198: FND_FILE.PUT_LINE(FND_FILE.LOG, OKC_TERMS_UTIL_PVT.get_message(G_APP_NAME, 'OKC_REP_SW_CONTRACT_DETAILS'));
199: FND_FILE.PUT_LINE(FND_FILE.LOG, '================');
200:
201: END IF;
202:
195: FND_FILE.PUT_LINE(FND_FILE.LOG, '');
196: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, OKC_TERMS_UTIL_PVT.get_message(G_APP_NAME, 'OKC_REP_SW_CONTRACT_DETAILS'));
197: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, '================');
198: FND_FILE.PUT_LINE(FND_FILE.LOG, OKC_TERMS_UTIL_PVT.get_message(G_APP_NAME, 'OKC_REP_SW_CONTRACT_DETAILS'));
199: FND_FILE.PUT_LINE(FND_FILE.LOG, '================');
200:
201: END IF;
202:
203: FOR i IN 1..NVL(selected_vers_contracts.LAST, -1) LOOP
206:
207: -- Populate the current contract details into concurrent output and log files
208:
209: -- Add Contract Name
210: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, OKC_TERMS_UTIL_PVT.get_message(G_APP_NAME, 'OKC_REP_ATTR_CON_NAME') || ' : '|| selected_vers_contracts(i).contract_name);
211: FND_FILE.PUT_LINE(FND_FILE.LOG, OKC_TERMS_UTIL_PVT.get_message(G_APP_NAME, 'OKC_REP_ATTR_CON_NAME') || ' : '|| selected_vers_contracts(i).contract_name);
212:
213: -- Add Contract Number
214: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, OKC_TERMS_UTIL_PVT.get_message(G_APP_NAME, 'OKC_REP_SW_ATTR_CON_NUMBER') || ' : '|| selected_vers_contracts(i).contract_number);
207: -- Populate the current contract details into concurrent output and log files
208:
209: -- Add Contract Name
210: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, OKC_TERMS_UTIL_PVT.get_message(G_APP_NAME, 'OKC_REP_ATTR_CON_NAME') || ' : '|| selected_vers_contracts(i).contract_name);
211: FND_FILE.PUT_LINE(FND_FILE.LOG, OKC_TERMS_UTIL_PVT.get_message(G_APP_NAME, 'OKC_REP_ATTR_CON_NAME') || ' : '|| selected_vers_contracts(i).contract_name);
212:
213: -- Add Contract Number
214: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, OKC_TERMS_UTIL_PVT.get_message(G_APP_NAME, 'OKC_REP_SW_ATTR_CON_NUMBER') || ' : '|| selected_vers_contracts(i).contract_number);
215: FND_FILE.PUT_LINE(FND_FILE.LOG, OKC_TERMS_UTIL_PVT.get_message(G_APP_NAME, 'OKC_REP_SW_ATTR_CON_NUMBER') || ' : '|| selected_vers_contracts(i).contract_number);
210: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, OKC_TERMS_UTIL_PVT.get_message(G_APP_NAME, 'OKC_REP_ATTR_CON_NAME') || ' : '|| selected_vers_contracts(i).contract_name);
211: FND_FILE.PUT_LINE(FND_FILE.LOG, OKC_TERMS_UTIL_PVT.get_message(G_APP_NAME, 'OKC_REP_ATTR_CON_NAME') || ' : '|| selected_vers_contracts(i).contract_name);
212:
213: -- Add Contract Number
214: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, OKC_TERMS_UTIL_PVT.get_message(G_APP_NAME, 'OKC_REP_SW_ATTR_CON_NUMBER') || ' : '|| selected_vers_contracts(i).contract_number);
215: FND_FILE.PUT_LINE(FND_FILE.LOG, OKC_TERMS_UTIL_PVT.get_message(G_APP_NAME, 'OKC_REP_SW_ATTR_CON_NUMBER') || ' : '|| selected_vers_contracts(i).contract_number);
216:
217: -- Add Contract Version Number
218: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, OKC_TERMS_UTIL_PVT.get_message(G_APP_NAME, 'OKC_REP_SW_ATTR_CON_VER_NUM') || ' : '|| selected_vers_contracts(i).contract_version_num);
211: FND_FILE.PUT_LINE(FND_FILE.LOG, OKC_TERMS_UTIL_PVT.get_message(G_APP_NAME, 'OKC_REP_ATTR_CON_NAME') || ' : '|| selected_vers_contracts(i).contract_name);
212:
213: -- Add Contract Number
214: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, OKC_TERMS_UTIL_PVT.get_message(G_APP_NAME, 'OKC_REP_SW_ATTR_CON_NUMBER') || ' : '|| selected_vers_contracts(i).contract_number);
215: FND_FILE.PUT_LINE(FND_FILE.LOG, OKC_TERMS_UTIL_PVT.get_message(G_APP_NAME, 'OKC_REP_SW_ATTR_CON_NUMBER') || ' : '|| selected_vers_contracts(i).contract_number);
216:
217: -- Add Contract Version Number
218: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, OKC_TERMS_UTIL_PVT.get_message(G_APP_NAME, 'OKC_REP_SW_ATTR_CON_VER_NUM') || ' : '|| selected_vers_contracts(i).contract_version_num);
219: FND_FILE.PUT_LINE(FND_FILE.LOG, OKC_TERMS_UTIL_PVT.get_message(G_APP_NAME, 'OKC_REP_SW_ATTR_CON_VER_NUM') || ' : '|| selected_vers_contracts(i).contract_version_num);
214: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, OKC_TERMS_UTIL_PVT.get_message(G_APP_NAME, 'OKC_REP_SW_ATTR_CON_NUMBER') || ' : '|| selected_vers_contracts(i).contract_number);
215: FND_FILE.PUT_LINE(FND_FILE.LOG, OKC_TERMS_UTIL_PVT.get_message(G_APP_NAME, 'OKC_REP_SW_ATTR_CON_NUMBER') || ' : '|| selected_vers_contracts(i).contract_number);
216:
217: -- Add Contract Version Number
218: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, OKC_TERMS_UTIL_PVT.get_message(G_APP_NAME, 'OKC_REP_SW_ATTR_CON_VER_NUM') || ' : '|| selected_vers_contracts(i).contract_version_num);
219: FND_FILE.PUT_LINE(FND_FILE.LOG, OKC_TERMS_UTIL_PVT.get_message(G_APP_NAME, 'OKC_REP_SW_ATTR_CON_VER_NUM') || ' : '|| selected_vers_contracts(i).contract_version_num);
220:
221: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, '');
222: FND_FILE.PUT_LINE(FND_FILE.LOG, '');
215: FND_FILE.PUT_LINE(FND_FILE.LOG, OKC_TERMS_UTIL_PVT.get_message(G_APP_NAME, 'OKC_REP_SW_ATTR_CON_NUMBER') || ' : '|| selected_vers_contracts(i).contract_number);
216:
217: -- Add Contract Version Number
218: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, OKC_TERMS_UTIL_PVT.get_message(G_APP_NAME, 'OKC_REP_SW_ATTR_CON_VER_NUM') || ' : '|| selected_vers_contracts(i).contract_version_num);
219: FND_FILE.PUT_LINE(FND_FILE.LOG, OKC_TERMS_UTIL_PVT.get_message(G_APP_NAME, 'OKC_REP_SW_ATTR_CON_VER_NUM') || ' : '|| selected_vers_contracts(i).contract_version_num);
220:
221: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, '');
222: FND_FILE.PUT_LINE(FND_FILE.LOG, '');
223:
217: -- Add Contract Version Number
218: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, OKC_TERMS_UTIL_PVT.get_message(G_APP_NAME, 'OKC_REP_SW_ATTR_CON_VER_NUM') || ' : '|| selected_vers_contracts(i).contract_version_num);
219: FND_FILE.PUT_LINE(FND_FILE.LOG, OKC_TERMS_UTIL_PVT.get_message(G_APP_NAME, 'OKC_REP_SW_ATTR_CON_VER_NUM') || ' : '|| selected_vers_contracts(i).contract_version_num);
220:
221: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, '');
222: FND_FILE.PUT_LINE(FND_FILE.LOG, '');
223:
224: -- Prepare a number array of contract ids and version numbers, this is required by the UPDATE
225: -- statement under FORALL as it will not take selected_vers_contracts(i).contract_id in the WHERE clause
218: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, OKC_TERMS_UTIL_PVT.get_message(G_APP_NAME, 'OKC_REP_SW_ATTR_CON_VER_NUM') || ' : '|| selected_vers_contracts(i).contract_version_num);
219: FND_FILE.PUT_LINE(FND_FILE.LOG, OKC_TERMS_UTIL_PVT.get_message(G_APP_NAME, 'OKC_REP_SW_ATTR_CON_VER_NUM') || ' : '|| selected_vers_contracts(i).contract_version_num);
220:
221: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, '');
222: FND_FILE.PUT_LINE(FND_FILE.LOG, '');
223:
224: -- Prepare a number array of contract ids and version numbers, this is required by the UPDATE
225: -- statement under FORALL as it will not take selected_vers_contracts(i).contract_id in the WHERE clause
226: -- Getting the following compilation error
244: IF contract_vers_cur%ISOPEN THEN
245: CLOSE contract_vers_cur ;
246: END IF;
247:
248: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, OKC_TERMS_UTIL_PVT.get_message(G_APP_NAME, 'OKC_REP_UPD_STS_SUMMARY') || ' : ' || l_count);
249: FND_FILE.PUT_LINE(FND_FILE.LOG, OKC_TERMS_UTIL_PVT.get_message(G_APP_NAME, 'OKC_REP_UPD_STS_SUMMARY') || ' : ' || l_count);
250:
251: COMMIT;
252:
245: CLOSE contract_vers_cur ;
246: END IF;
247:
248: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, OKC_TERMS_UTIL_PVT.get_message(G_APP_NAME, 'OKC_REP_UPD_STS_SUMMARY') || ' : ' || l_count);
249: FND_FILE.PUT_LINE(FND_FILE.LOG, OKC_TERMS_UTIL_PVT.get_message(G_APP_NAME, 'OKC_REP_UPD_STS_SUMMARY') || ' : ' || l_count);
250:
251: COMMIT;
252:
253: EXCEPTION
252:
253: EXCEPTION
254: WHEN OTHERS THEN
255:
256: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, OKC_TERMS_UTIL_PVT.get_message(G_APP_NAME, 'OKC_REP_UPD_STS_ERROR'));
257: FND_FILE.PUT_LINE(FND_FILE.LOG, OKC_TERMS_UTIL_PVT.get_message(G_APP_NAME, 'OKC_REP_UPD_STS_ERROR'));
258:
259: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, OKC_TERMS_UTIL_PVT.get_message(G_APP_NAME, 'OKC_REP_UPD_STS_SYS_ERR') || ' ' || sqlerrm);
260: FND_FILE.PUT_LINE(FND_FILE.LOG, OKC_TERMS_UTIL_PVT.get_message(G_APP_NAME, 'OKC_REP_UPD_STS_SYS_ERR') || ' ' || sqlerrm);
253: EXCEPTION
254: WHEN OTHERS THEN
255:
256: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, OKC_TERMS_UTIL_PVT.get_message(G_APP_NAME, 'OKC_REP_UPD_STS_ERROR'));
257: FND_FILE.PUT_LINE(FND_FILE.LOG, OKC_TERMS_UTIL_PVT.get_message(G_APP_NAME, 'OKC_REP_UPD_STS_ERROR'));
258:
259: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, OKC_TERMS_UTIL_PVT.get_message(G_APP_NAME, 'OKC_REP_UPD_STS_SYS_ERR') || ' ' || sqlerrm);
260: FND_FILE.PUT_LINE(FND_FILE.LOG, OKC_TERMS_UTIL_PVT.get_message(G_APP_NAME, 'OKC_REP_UPD_STS_SYS_ERR') || ' ' || sqlerrm);
261:
255:
256: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, OKC_TERMS_UTIL_PVT.get_message(G_APP_NAME, 'OKC_REP_UPD_STS_ERROR'));
257: FND_FILE.PUT_LINE(FND_FILE.LOG, OKC_TERMS_UTIL_PVT.get_message(G_APP_NAME, 'OKC_REP_UPD_STS_ERROR'));
258:
259: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, OKC_TERMS_UTIL_PVT.get_message(G_APP_NAME, 'OKC_REP_UPD_STS_SYS_ERR') || ' ' || sqlerrm);
260: FND_FILE.PUT_LINE(FND_FILE.LOG, OKC_TERMS_UTIL_PVT.get_message(G_APP_NAME, 'OKC_REP_UPD_STS_SYS_ERR') || ' ' || sqlerrm);
261:
262: ROLLBACK;
263:
256: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, OKC_TERMS_UTIL_PVT.get_message(G_APP_NAME, 'OKC_REP_UPD_STS_ERROR'));
257: FND_FILE.PUT_LINE(FND_FILE.LOG, OKC_TERMS_UTIL_PVT.get_message(G_APP_NAME, 'OKC_REP_UPD_STS_ERROR'));
258:
259: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, OKC_TERMS_UTIL_PVT.get_message(G_APP_NAME, 'OKC_REP_UPD_STS_SYS_ERR') || ' ' || sqlerrm);
260: FND_FILE.PUT_LINE(FND_FILE.LOG, OKC_TERMS_UTIL_PVT.get_message(G_APP_NAME, 'OKC_REP_UPD_STS_SYS_ERR') || ' ' || sqlerrm);
261:
262: ROLLBACK;
263:
264: --close cursors
317: l_status VARCHAR2(32);
318:
319: BEGIN
320:
321: FND_FILE.PUT_LINE(FND_FILE.LOG, '***** BEGIN contract_status_update_manager *****');
322:
323: l_api_name := 'contract_status_update_manager';
324: l_api_version := 1.0;
325: l_init_msg_list := FND_API.G_FALSE;
324: l_api_version := 1.0;
325: l_init_msg_list := FND_API.G_FALSE;
326: l_status := 'NONE';
327:
328: FND_FILE.PUT_LINE(FND_FILE.LOG, 'p_status = (' || p_status || ')');
329: FND_FILE.PUT_LINE(FND_FILE.LOG, 'l_status = (' || l_status || ')');
330:
331: IF p_status IS NULL OR LENGTH(TRIM(p_status)) = 0 THEN
332: l_status := G_REP_CON_STATUS_TERMINATED;
325: l_init_msg_list := FND_API.G_FALSE;
326: l_status := 'NONE';
327:
328: FND_FILE.PUT_LINE(FND_FILE.LOG, 'p_status = (' || p_status || ')');
329: FND_FILE.PUT_LINE(FND_FILE.LOG, 'l_status = (' || l_status || ')');
330:
331: IF p_status IS NULL OR LENGTH(TRIM(p_status)) = 0 THEN
332: l_status := G_REP_CON_STATUS_TERMINATED;
333: END IF;
331: IF p_status IS NULL OR LENGTH(TRIM(p_status)) = 0 THEN
332: l_status := G_REP_CON_STATUS_TERMINATED;
333: END IF;
334:
335: FND_FILE.PUT_LINE(FND_FILE.LOG, 'l_status = (' || l_status || ')');
336:
337: contract_status_updater(
338: p_api_version => l_api_version,
339: p_init_msg_list => l_init_msg_list,
347: retcode := G_RETURN_CODE_ERROR;
348: errbuf := substr(FND_MSG_PUB.Get(), 1, 200);
349: END IF;
350:
351: FND_FILE.PUT_LINE(FND_FILE.LOG, '***** END contract_status_update_manager() *****');
352:
353: EXCEPTION
354: WHEN OTHERS THEN
355: FND_FILE.PUT_LINE(FND_FILE.LOG, '***** EXCEPTION OTHERS*****');
351: FND_FILE.PUT_LINE(FND_FILE.LOG, '***** END contract_status_update_manager() *****');
352:
353: EXCEPTION
354: WHEN OTHERS THEN
355: FND_FILE.PUT_LINE(FND_FILE.LOG, '***** EXCEPTION OTHERS*****');
356: FND_FILE.PUT_LINE(FND_FILE.LOG, SQLERRM);
357:
358: retcode := G_RETURN_CODE_ERROR;
359: errbuf := substr(SQLERRM, 1, 200);
352:
353: EXCEPTION
354: WHEN OTHERS THEN
355: FND_FILE.PUT_LINE(FND_FILE.LOG, '***** EXCEPTION OTHERS*****');
356: FND_FILE.PUT_LINE(FND_FILE.LOG, SQLERRM);
357:
358: retcode := G_RETURN_CODE_ERROR;
359: errbuf := substr(SQLERRM, 1, 200);
360: