99: END IF;
100: END LOOP;
101: IF not code_exist THEN
102:
103: FND_MESSAGE.set_NAME('FV','FV_CCR_TYPE_INEXISTS');
104: FND_MESSAGE.set_TOKEN('TYPE','Business Type');
105: FND_MESSAGE.SET_TOKEN('CODE',p_lookup(i).code);
106: message_text := FND_MESSAGE.get;
107:
100: END LOOP;
101: IF not code_exist THEN
102:
103: FND_MESSAGE.set_NAME('FV','FV_CCR_TYPE_INEXISTS');
104: FND_MESSAGE.set_TOKEN('TYPE','Business Type');
105: FND_MESSAGE.SET_TOKEN('CODE',p_lookup(i).code);
106: message_text := FND_MESSAGE.get;
107:
108: FND_MESSAGE.set_NAME('FV','FV_CCR_ACTION5');
101: IF not code_exist THEN
102:
103: FND_MESSAGE.set_NAME('FV','FV_CCR_TYPE_INEXISTS');
104: FND_MESSAGE.set_TOKEN('TYPE','Business Type');
105: FND_MESSAGE.SET_TOKEN('CODE',p_lookup(i).code);
106: message_text := FND_MESSAGE.get;
107:
108: FND_MESSAGE.set_NAME('FV','FV_CCR_ACTION5');
109: FND_MESSAGE.set_token('TYPE',p_lookup(i).code);
102:
103: FND_MESSAGE.set_NAME('FV','FV_CCR_TYPE_INEXISTS');
104: FND_MESSAGE.set_TOKEN('TYPE','Business Type');
105: FND_MESSAGE.SET_TOKEN('CODE',p_lookup(i).code);
106: message_text := FND_MESSAGE.get;
107:
108: FND_MESSAGE.set_NAME('FV','FV_CCR_ACTION5');
109: FND_MESSAGE.set_token('TYPE',p_lookup(i).code);
110:
104: FND_MESSAGE.set_TOKEN('TYPE','Business Type');
105: FND_MESSAGE.SET_TOKEN('CODE',p_lookup(i).code);
106: message_text := FND_MESSAGE.get;
107:
108: FND_MESSAGE.set_NAME('FV','FV_CCR_ACTION5');
109: FND_MESSAGE.set_token('TYPE',p_lookup(i).code);
110:
111: message_action := FND_MESSAGE.get;
112:
105: FND_MESSAGE.SET_TOKEN('CODE',p_lookup(i).code);
106: message_text := FND_MESSAGE.get;
107:
108: FND_MESSAGE.set_NAME('FV','FV_CCR_ACTION5');
109: FND_MESSAGE.set_token('TYPE',p_lookup(i).code);
110:
111: message_action := FND_MESSAGE.get;
112:
113: l_errbuf :=p_lookup(i).code||' -> Code does not exist' ;
107:
108: FND_MESSAGE.set_NAME('FV','FV_CCR_ACTION5');
109: FND_MESSAGE.set_token('TYPE',p_lookup(i).code);
110:
111: message_action := FND_MESSAGE.get;
112:
113: l_errbuf :=p_lookup(i).code||' -> Code does not exist' ;
114: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_STATEMENT, 'find_code',l_errbuf);
115: insert_temp_data(3,null,message_text ,message_action,'ORACLE',null,null);
129: END IF;
130: END LOOP;
131: IF not code_exist THEN
132:
133: FND_MESSAGE.set_NAME('FV','FV_CCR_TYPE_INEXISTS');
134: FND_MESSAGE.set_TOKEN('TYPE','SIC Code');
135: FND_MESSAGE.SET_TOKEN('CODE',p_lookup(i).code);
136:
137: message_text := FND_MESSAGE.get;
130: END LOOP;
131: IF not code_exist THEN
132:
133: FND_MESSAGE.set_NAME('FV','FV_CCR_TYPE_INEXISTS');
134: FND_MESSAGE.set_TOKEN('TYPE','SIC Code');
135: FND_MESSAGE.SET_TOKEN('CODE',p_lookup(i).code);
136:
137: message_text := FND_MESSAGE.get;
138:
131: IF not code_exist THEN
132:
133: FND_MESSAGE.set_NAME('FV','FV_CCR_TYPE_INEXISTS');
134: FND_MESSAGE.set_TOKEN('TYPE','SIC Code');
135: FND_MESSAGE.SET_TOKEN('CODE',p_lookup(i).code);
136:
137: message_text := FND_MESSAGE.get;
138:
139: FND_MESSAGE.set_NAME('FV','FV_CCR_ACTION5');
133: FND_MESSAGE.set_NAME('FV','FV_CCR_TYPE_INEXISTS');
134: FND_MESSAGE.set_TOKEN('TYPE','SIC Code');
135: FND_MESSAGE.SET_TOKEN('CODE',p_lookup(i).code);
136:
137: message_text := FND_MESSAGE.get;
138:
139: FND_MESSAGE.set_NAME('FV','FV_CCR_ACTION5');
140: FND_MESSAGE.set_token('TYPE',p_lookup(i).code);
141:
135: FND_MESSAGE.SET_TOKEN('CODE',p_lookup(i).code);
136:
137: message_text := FND_MESSAGE.get;
138:
139: FND_MESSAGE.set_NAME('FV','FV_CCR_ACTION5');
140: FND_MESSAGE.set_token('TYPE',p_lookup(i).code);
141:
142: message_action := FND_MESSAGE.get;
143:
136:
137: message_text := FND_MESSAGE.get;
138:
139: FND_MESSAGE.set_NAME('FV','FV_CCR_ACTION5');
140: FND_MESSAGE.set_token('TYPE',p_lookup(i).code);
141:
142: message_action := FND_MESSAGE.get;
143:
144: l_errbuf :=p_lookup(i).code||' -> Code does not exist' ;
138:
139: FND_MESSAGE.set_NAME('FV','FV_CCR_ACTION5');
140: FND_MESSAGE.set_token('TYPE',p_lookup(i).code);
141:
142: message_action := FND_MESSAGE.get;
143:
144: l_errbuf :=p_lookup(i).code||' -> Code does not exist' ;
145: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_STATEMENT, 'find_code',l_errbuf);
146: insert_temp_data(3,null,message_text ,message_action,'ORACLE',null,null);
157: END IF;
158: END LOOP;
159: IF not code_exist THEN
160:
161: FND_MESSAGE.set_NAME('FV','FV_CCR_TYPE_INEXISTS');
162: FND_MESSAGE.set_TOKEN('TYPE','NAICS Code');
163: FND_MESSAGE.SET_TOKEN('CODE',p_lookup(i).code);
164: message_text := FND_MESSAGE.get;
165:
158: END LOOP;
159: IF not code_exist THEN
160:
161: FND_MESSAGE.set_NAME('FV','FV_CCR_TYPE_INEXISTS');
162: FND_MESSAGE.set_TOKEN('TYPE','NAICS Code');
163: FND_MESSAGE.SET_TOKEN('CODE',p_lookup(i).code);
164: message_text := FND_MESSAGE.get;
165:
166: FND_MESSAGE.set_NAME('FV','FV_CCR_ACTION5');
159: IF not code_exist THEN
160:
161: FND_MESSAGE.set_NAME('FV','FV_CCR_TYPE_INEXISTS');
162: FND_MESSAGE.set_TOKEN('TYPE','NAICS Code');
163: FND_MESSAGE.SET_TOKEN('CODE',p_lookup(i).code);
164: message_text := FND_MESSAGE.get;
165:
166: FND_MESSAGE.set_NAME('FV','FV_CCR_ACTION5');
167: FND_MESSAGE.set_token('TYPE',p_lookup(i).code);
160:
161: FND_MESSAGE.set_NAME('FV','FV_CCR_TYPE_INEXISTS');
162: FND_MESSAGE.set_TOKEN('TYPE','NAICS Code');
163: FND_MESSAGE.SET_TOKEN('CODE',p_lookup(i).code);
164: message_text := FND_MESSAGE.get;
165:
166: FND_MESSAGE.set_NAME('FV','FV_CCR_ACTION5');
167: FND_MESSAGE.set_token('TYPE',p_lookup(i).code);
168:
162: FND_MESSAGE.set_TOKEN('TYPE','NAICS Code');
163: FND_MESSAGE.SET_TOKEN('CODE',p_lookup(i).code);
164: message_text := FND_MESSAGE.get;
165:
166: FND_MESSAGE.set_NAME('FV','FV_CCR_ACTION5');
167: FND_MESSAGE.set_token('TYPE',p_lookup(i).code);
168:
169: message_action := FND_MESSAGE.get;
170:
163: FND_MESSAGE.SET_TOKEN('CODE',p_lookup(i).code);
164: message_text := FND_MESSAGE.get;
165:
166: FND_MESSAGE.set_NAME('FV','FV_CCR_ACTION5');
167: FND_MESSAGE.set_token('TYPE',p_lookup(i).code);
168:
169: message_action := FND_MESSAGE.get;
170:
171: l_errbuf :=p_lookup(i).code||' -> Code does not exist' ;
165:
166: FND_MESSAGE.set_NAME('FV','FV_CCR_ACTION5');
167: FND_MESSAGE.set_token('TYPE',p_lookup(i).code);
168:
169: message_action := FND_MESSAGE.get;
170:
171: l_errbuf :=p_lookup(i).code||' -> Code does not exist' ;
172: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_STATEMENT, 'find_code',l_errbuf);
173: insert_temp_data(3,null,message_text ,message_action,'ORACLE',null,null);
184: END IF;
185: END LOOP;
186: IF not code_exist THEN
187:
188: FND_MESSAGE.set_NAME('FV','FV_CCR_TYPE_INEXISTS');
189: FND_MESSAGE.set_TOKEN('TYPE','FSC code');
190: FND_MESSAGE.SET_TOKEN('CODE',p_lookup(i).code);
191:
192: message_text := FND_MESSAGE.get;
185: END LOOP;
186: IF not code_exist THEN
187:
188: FND_MESSAGE.set_NAME('FV','FV_CCR_TYPE_INEXISTS');
189: FND_MESSAGE.set_TOKEN('TYPE','FSC code');
190: FND_MESSAGE.SET_TOKEN('CODE',p_lookup(i).code);
191:
192: message_text := FND_MESSAGE.get;
193:
186: IF not code_exist THEN
187:
188: FND_MESSAGE.set_NAME('FV','FV_CCR_TYPE_INEXISTS');
189: FND_MESSAGE.set_TOKEN('TYPE','FSC code');
190: FND_MESSAGE.SET_TOKEN('CODE',p_lookup(i).code);
191:
192: message_text := FND_MESSAGE.get;
193:
194: FND_MESSAGE.set_NAME('FV','FV_CCR_ACTION5');
188: FND_MESSAGE.set_NAME('FV','FV_CCR_TYPE_INEXISTS');
189: FND_MESSAGE.set_TOKEN('TYPE','FSC code');
190: FND_MESSAGE.SET_TOKEN('CODE',p_lookup(i).code);
191:
192: message_text := FND_MESSAGE.get;
193:
194: FND_MESSAGE.set_NAME('FV','FV_CCR_ACTION5');
195: FND_MESSAGE.set_token('TYPE',p_lookup(i).code);
196:
190: FND_MESSAGE.SET_TOKEN('CODE',p_lookup(i).code);
191:
192: message_text := FND_MESSAGE.get;
193:
194: FND_MESSAGE.set_NAME('FV','FV_CCR_ACTION5');
195: FND_MESSAGE.set_token('TYPE',p_lookup(i).code);
196:
197: message_action := FND_MESSAGE.get;
198:
191:
192: message_text := FND_MESSAGE.get;
193:
194: FND_MESSAGE.set_NAME('FV','FV_CCR_ACTION5');
195: FND_MESSAGE.set_token('TYPE',p_lookup(i).code);
196:
197: message_action := FND_MESSAGE.get;
198:
199: l_errbuf :=p_lookup(i).code||' -> Code does not exist' ;
193:
194: FND_MESSAGE.set_NAME('FV','FV_CCR_ACTION5');
195: FND_MESSAGE.set_token('TYPE',p_lookup(i).code);
196:
197: message_action := FND_MESSAGE.get;
198:
199: l_errbuf :=p_lookup(i).code||' -> Code does not exist' ;
200: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_STATEMENT, 'find_code',l_errbuf);
201: insert_temp_data(3,null,message_text ,message_action,'ORACLE',null,null);
212: END IF;
213: END LOOP;
214: IF not code_exist THEN
215:
216: FND_MESSAGE.set_NAME('FV','FV_CCR_TYPE_INEXISTS');
217: FND_MESSAGE.set_TOKEN('TYPE','PSC Code');
218: FND_MESSAGE.SET_TOKEN('CODE',p_lookup(i).code);
219:
220: message_text := FND_MESSAGE.get;
213: END LOOP;
214: IF not code_exist THEN
215:
216: FND_MESSAGE.set_NAME('FV','FV_CCR_TYPE_INEXISTS');
217: FND_MESSAGE.set_TOKEN('TYPE','PSC Code');
218: FND_MESSAGE.SET_TOKEN('CODE',p_lookup(i).code);
219:
220: message_text := FND_MESSAGE.get;
221:
214: IF not code_exist THEN
215:
216: FND_MESSAGE.set_NAME('FV','FV_CCR_TYPE_INEXISTS');
217: FND_MESSAGE.set_TOKEN('TYPE','PSC Code');
218: FND_MESSAGE.SET_TOKEN('CODE',p_lookup(i).code);
219:
220: message_text := FND_MESSAGE.get;
221:
222: FND_MESSAGE.set_NAME('FV','FV_CCR_ACTION5');
216: FND_MESSAGE.set_NAME('FV','FV_CCR_TYPE_INEXISTS');
217: FND_MESSAGE.set_TOKEN('TYPE','PSC Code');
218: FND_MESSAGE.SET_TOKEN('CODE',p_lookup(i).code);
219:
220: message_text := FND_MESSAGE.get;
221:
222: FND_MESSAGE.set_NAME('FV','FV_CCR_ACTION5');
223: FND_MESSAGE.set_token('TYPE',p_lookup(i).code);
224:
218: FND_MESSAGE.SET_TOKEN('CODE',p_lookup(i).code);
219:
220: message_text := FND_MESSAGE.get;
221:
222: FND_MESSAGE.set_NAME('FV','FV_CCR_ACTION5');
223: FND_MESSAGE.set_token('TYPE',p_lookup(i).code);
224:
225: message_action := FND_MESSAGE.get;
226:
219:
220: message_text := FND_MESSAGE.get;
221:
222: FND_MESSAGE.set_NAME('FV','FV_CCR_ACTION5');
223: FND_MESSAGE.set_token('TYPE',p_lookup(i).code);
224:
225: message_action := FND_MESSAGE.get;
226:
227: l_errbuf :=p_lookup(i).code||' -> Code does not exist' ;
221:
222: FND_MESSAGE.set_NAME('FV','FV_CCR_ACTION5');
223: FND_MESSAGE.set_token('TYPE',p_lookup(i).code);
224:
225: message_action := FND_MESSAGE.get;
226:
227: l_errbuf :=p_lookup(i).code||' -> Code does not exist' ;
228: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_STATEMENT, 'find_code',l_errbuf);
229: insert_temp_data(3,null,message_text ,message_action,'ORACLE',null,null);
239: END IF;
240: CLOSE c_lookup_info;
241: IF not code_exist THEN
242:
243: FND_MESSAGE.set_NAME('FV','FV_CCR_TYPE_INEXISTS');
244: FND_MESSAGE.set_TOKEN('TYPE','Organization Type');
245: FND_MESSAGE.SET_TOKEN('CODE',p_lookup(i).code);
246: message_text := FND_MESSAGE.get;
247:
240: CLOSE c_lookup_info;
241: IF not code_exist THEN
242:
243: FND_MESSAGE.set_NAME('FV','FV_CCR_TYPE_INEXISTS');
244: FND_MESSAGE.set_TOKEN('TYPE','Organization Type');
245: FND_MESSAGE.SET_TOKEN('CODE',p_lookup(i).code);
246: message_text := FND_MESSAGE.get;
247:
248: FND_MESSAGE.set_NAME('FV','FV_CCR_ACTION5');
241: IF not code_exist THEN
242:
243: FND_MESSAGE.set_NAME('FV','FV_CCR_TYPE_INEXISTS');
244: FND_MESSAGE.set_TOKEN('TYPE','Organization Type');
245: FND_MESSAGE.SET_TOKEN('CODE',p_lookup(i).code);
246: message_text := FND_MESSAGE.get;
247:
248: FND_MESSAGE.set_NAME('FV','FV_CCR_ACTION5');
249: FND_MESSAGE.set_token('TYPE',p_lookup(i).code);
242:
243: FND_MESSAGE.set_NAME('FV','FV_CCR_TYPE_INEXISTS');
244: FND_MESSAGE.set_TOKEN('TYPE','Organization Type');
245: FND_MESSAGE.SET_TOKEN('CODE',p_lookup(i).code);
246: message_text := FND_MESSAGE.get;
247:
248: FND_MESSAGE.set_NAME('FV','FV_CCR_ACTION5');
249: FND_MESSAGE.set_token('TYPE',p_lookup(i).code);
250:
244: FND_MESSAGE.set_TOKEN('TYPE','Organization Type');
245: FND_MESSAGE.SET_TOKEN('CODE',p_lookup(i).code);
246: message_text := FND_MESSAGE.get;
247:
248: FND_MESSAGE.set_NAME('FV','FV_CCR_ACTION5');
249: FND_MESSAGE.set_token('TYPE',p_lookup(i).code);
250:
251: message_action := FND_MESSAGE.get;
252:
245: FND_MESSAGE.SET_TOKEN('CODE',p_lookup(i).code);
246: message_text := FND_MESSAGE.get;
247:
248: FND_MESSAGE.set_NAME('FV','FV_CCR_ACTION5');
249: FND_MESSAGE.set_token('TYPE',p_lookup(i).code);
250:
251: message_action := FND_MESSAGE.get;
252:
253: l_errbuf :=p_lookup(i).code||' -> Code does not exist' ;
247:
248: FND_MESSAGE.set_NAME('FV','FV_CCR_ACTION5');
249: FND_MESSAGE.set_token('TYPE',p_lookup(i).code);
250:
251: message_action := FND_MESSAGE.get;
252:
253: l_errbuf :=p_lookup(i).code||' -> Code does not exist' ;
254: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_STATEMENT, 'find_code',l_errbuf);
255: insert_temp_data(3,null,message_text ,message_action,'ORACLE',null,null);
264: END IF;
265: CLOSE c_lookup_info;
266: IF not code_exist THEN
267:
268: FND_MESSAGE.set_NAME('FV','FV_CCR_TYPE_INEXISTS');
269: FND_MESSAGE.set_TOKEN('TYPE','Correspondence Type');
270: FND_MESSAGE.SET_TOKEN('CODE',p_lookup(i).code);
271: message_text := FND_MESSAGE.get;
272:
265: CLOSE c_lookup_info;
266: IF not code_exist THEN
267:
268: FND_MESSAGE.set_NAME('FV','FV_CCR_TYPE_INEXISTS');
269: FND_MESSAGE.set_TOKEN('TYPE','Correspondence Type');
270: FND_MESSAGE.SET_TOKEN('CODE',p_lookup(i).code);
271: message_text := FND_MESSAGE.get;
272:
273: FND_MESSAGE.set_NAME('FV','FV_CCR_ACTION5');
266: IF not code_exist THEN
267:
268: FND_MESSAGE.set_NAME('FV','FV_CCR_TYPE_INEXISTS');
269: FND_MESSAGE.set_TOKEN('TYPE','Correspondence Type');
270: FND_MESSAGE.SET_TOKEN('CODE',p_lookup(i).code);
271: message_text := FND_MESSAGE.get;
272:
273: FND_MESSAGE.set_NAME('FV','FV_CCR_ACTION5');
274: FND_MESSAGE.set_token('TYPE',p_lookup(i).code);
267:
268: FND_MESSAGE.set_NAME('FV','FV_CCR_TYPE_INEXISTS');
269: FND_MESSAGE.set_TOKEN('TYPE','Correspondence Type');
270: FND_MESSAGE.SET_TOKEN('CODE',p_lookup(i).code);
271: message_text := FND_MESSAGE.get;
272:
273: FND_MESSAGE.set_NAME('FV','FV_CCR_ACTION5');
274: FND_MESSAGE.set_token('TYPE',p_lookup(i).code);
275:
269: FND_MESSAGE.set_TOKEN('TYPE','Correspondence Type');
270: FND_MESSAGE.SET_TOKEN('CODE',p_lookup(i).code);
271: message_text := FND_MESSAGE.get;
272:
273: FND_MESSAGE.set_NAME('FV','FV_CCR_ACTION5');
274: FND_MESSAGE.set_token('TYPE',p_lookup(i).code);
275:
276: message_action := FND_MESSAGE.get;
277:
270: FND_MESSAGE.SET_TOKEN('CODE',p_lookup(i).code);
271: message_text := FND_MESSAGE.get;
272:
273: FND_MESSAGE.set_NAME('FV','FV_CCR_ACTION5');
274: FND_MESSAGE.set_token('TYPE',p_lookup(i).code);
275:
276: message_action := FND_MESSAGE.get;
277:
278: l_errbuf :=p_lookup(i).code||' -> Code does not exist' ;
272:
273: FND_MESSAGE.set_NAME('FV','FV_CCR_ACTION5');
274: FND_MESSAGE.set_token('TYPE',p_lookup(i).code);
275:
276: message_action := FND_MESSAGE.get;
277:
278: l_errbuf :=p_lookup(i).code||' -> Code does not exist' ;
279: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_STATEMENT, 'find_code',l_errbuf);
280: insert_temp_data(3,null,message_text ,message_action,'ORACLE',null,null);
294:
295: select decode(p_lookup(i).code,'CS','Corporate Security Code', 'Employee Security Code') into l_token
296: from dual;
297:
298: FND_MESSAGE.set_NAME('FV','FV_CCR_TYPE_INEXISTS');
299: FND_MESSAGE.set_TOKEN('TYPE',p_lookup(i).rec_type);
300: FND_MESSAGE.SET_TOKEN('CODE',l_token);
301: message_text := FND_MESSAGE.get;
302:
295: select decode(p_lookup(i).code,'CS','Corporate Security Code', 'Employee Security Code') into l_token
296: from dual;
297:
298: FND_MESSAGE.set_NAME('FV','FV_CCR_TYPE_INEXISTS');
299: FND_MESSAGE.set_TOKEN('TYPE',p_lookup(i).rec_type);
300: FND_MESSAGE.SET_TOKEN('CODE',l_token);
301: message_text := FND_MESSAGE.get;
302:
303: FND_MESSAGE.set_NAME('FV','FV_CCR_ACTION5');
296: from dual;
297:
298: FND_MESSAGE.set_NAME('FV','FV_CCR_TYPE_INEXISTS');
299: FND_MESSAGE.set_TOKEN('TYPE',p_lookup(i).rec_type);
300: FND_MESSAGE.SET_TOKEN('CODE',l_token);
301: message_text := FND_MESSAGE.get;
302:
303: FND_MESSAGE.set_NAME('FV','FV_CCR_ACTION5');
304: FND_MESSAGE.set_token('TYPE',p_lookup(i).code);
297:
298: FND_MESSAGE.set_NAME('FV','FV_CCR_TYPE_INEXISTS');
299: FND_MESSAGE.set_TOKEN('TYPE',p_lookup(i).rec_type);
300: FND_MESSAGE.SET_TOKEN('CODE',l_token);
301: message_text := FND_MESSAGE.get;
302:
303: FND_MESSAGE.set_NAME('FV','FV_CCR_ACTION5');
304: FND_MESSAGE.set_token('TYPE',p_lookup(i).code);
305:
299: FND_MESSAGE.set_TOKEN('TYPE',p_lookup(i).rec_type);
300: FND_MESSAGE.SET_TOKEN('CODE',l_token);
301: message_text := FND_MESSAGE.get;
302:
303: FND_MESSAGE.set_NAME('FV','FV_CCR_ACTION5');
304: FND_MESSAGE.set_token('TYPE',p_lookup(i).code);
305:
306: message_action := FND_MESSAGE.get;
307:
300: FND_MESSAGE.SET_TOKEN('CODE',l_token);
301: message_text := FND_MESSAGE.get;
302:
303: FND_MESSAGE.set_NAME('FV','FV_CCR_ACTION5');
304: FND_MESSAGE.set_token('TYPE',p_lookup(i).code);
305:
306: message_action := FND_MESSAGE.get;
307:
308: l_errbuf :=p_lookup(i).code||' -> Code does not exist' ;
302:
303: FND_MESSAGE.set_NAME('FV','FV_CCR_ACTION5');
304: FND_MESSAGE.set_token('TYPE',p_lookup(i).code);
305:
306: message_action := FND_MESSAGE.get;
307:
308: l_errbuf :=p_lookup(i).code||' -> Code does not exist' ;
309: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_STATEMENT, 'find_code',l_errbuf);
310: insert_temp_data(3,null,message_text ,message_action,'ORACLE',null,null);
467: -- construct the file name from the file location and name
468: -- file name ( '\\' --> for WINDOWS NT , '/' --> UNIX )
469:
470:
471: FND_MESSAGE.SET_NAME('FV','FV_CCR_ACTION1');
472: l_message_action1 := FND_MESSAGE.GET;
473:
474: FND_MESSAGE.SET_NAME('FV','FV_CCR_ACTION2');
475: l_message_action2 := FND_MESSAGE.GET;
468: -- file name ( '\\' --> for WINDOWS NT , '/' --> UNIX )
469:
470:
471: FND_MESSAGE.SET_NAME('FV','FV_CCR_ACTION1');
472: l_message_action1 := FND_MESSAGE.GET;
473:
474: FND_MESSAGE.SET_NAME('FV','FV_CCR_ACTION2');
475: l_message_action2 := FND_MESSAGE.GET;
476:
470:
471: FND_MESSAGE.SET_NAME('FV','FV_CCR_ACTION1');
472: l_message_action1 := FND_MESSAGE.GET;
473:
474: FND_MESSAGE.SET_NAME('FV','FV_CCR_ACTION2');
475: l_message_action2 := FND_MESSAGE.GET;
476:
477: FND_MESSAGE.SET_NAME('FV','FV_CCR_ACTION3');
478: l_message_action3 := FND_MESSAGE.GET;
471: FND_MESSAGE.SET_NAME('FV','FV_CCR_ACTION1');
472: l_message_action1 := FND_MESSAGE.GET;
473:
474: FND_MESSAGE.SET_NAME('FV','FV_CCR_ACTION2');
475: l_message_action2 := FND_MESSAGE.GET;
476:
477: FND_MESSAGE.SET_NAME('FV','FV_CCR_ACTION3');
478: l_message_action3 := FND_MESSAGE.GET;
479:
473:
474: FND_MESSAGE.SET_NAME('FV','FV_CCR_ACTION2');
475: l_message_action2 := FND_MESSAGE.GET;
476:
477: FND_MESSAGE.SET_NAME('FV','FV_CCR_ACTION3');
478: l_message_action3 := FND_MESSAGE.GET;
479:
480: FND_MESSAGE.SET_NAME('FV','FV_CCR_ACTION4');
481: l_message_action4 := FND_MESSAGE.GET;
474: FND_MESSAGE.SET_NAME('FV','FV_CCR_ACTION2');
475: l_message_action2 := FND_MESSAGE.GET;
476:
477: FND_MESSAGE.SET_NAME('FV','FV_CCR_ACTION3');
478: l_message_action3 := FND_MESSAGE.GET;
479:
480: FND_MESSAGE.SET_NAME('FV','FV_CCR_ACTION4');
481: l_message_action4 := FND_MESSAGE.GET;
482:
476:
477: FND_MESSAGE.SET_NAME('FV','FV_CCR_ACTION3');
478: l_message_action3 := FND_MESSAGE.GET;
479:
480: FND_MESSAGE.SET_NAME('FV','FV_CCR_ACTION4');
481: l_message_action4 := FND_MESSAGE.GET;
482:
483: FND_MESSAGE.SET_NAME('FV','FV_CCR_NO_DUNS');
484: l_msg_no_duns := FND_MESSAGE.GET;
477: FND_MESSAGE.SET_NAME('FV','FV_CCR_ACTION3');
478: l_message_action3 := FND_MESSAGE.GET;
479:
480: FND_MESSAGE.SET_NAME('FV','FV_CCR_ACTION4');
481: l_message_action4 := FND_MESSAGE.GET;
482:
483: FND_MESSAGE.SET_NAME('FV','FV_CCR_NO_DUNS');
484: l_msg_no_duns := FND_MESSAGE.GET;
485:
479:
480: FND_MESSAGE.SET_NAME('FV','FV_CCR_ACTION4');
481: l_message_action4 := FND_MESSAGE.GET;
482:
483: FND_MESSAGE.SET_NAME('FV','FV_CCR_NO_DUNS');
484: l_msg_no_duns := FND_MESSAGE.GET;
485:
486: -- need to perform file name validations only if we are intending to call direct
487: IF p_xml_import <> 'Y' THEN
480: FND_MESSAGE.SET_NAME('FV','FV_CCR_ACTION4');
481: l_message_action4 := FND_MESSAGE.GET;
482:
483: FND_MESSAGE.SET_NAME('FV','FV_CCR_NO_DUNS');
484: l_msg_no_duns := FND_MESSAGE.GET;
485:
486: -- need to perform file name validations only if we are intending to call direct
487: IF p_xml_import <> 'Y' THEN
488:
507: l_invalid_file_name := TRUE;
508: l_errbuf := 'Error in Position#1 of filename';
509: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,l_errbuf);
510:
511: FND_MESSAGE.SET_NAME('FV','FV_CCR_INVALID_FILE_NAME');
512: FND_MESSAGE.SET_TOKEN('FILE',p_file_name);
513: l_msg_inv_file_name := FND_MESSAGE.GET;
514:
515: insert_temp_data(3,null,l_msg_inv_file_name,l_message_action1,null,null,null);
508: l_errbuf := 'Error in Position#1 of filename';
509: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,l_errbuf);
510:
511: FND_MESSAGE.SET_NAME('FV','FV_CCR_INVALID_FILE_NAME');
512: FND_MESSAGE.SET_TOKEN('FILE',p_file_name);
513: l_msg_inv_file_name := FND_MESSAGE.GET;
514:
515: insert_temp_data(3,null,l_msg_inv_file_name,l_message_action1,null,null,null);
516: END IF;
509: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,l_errbuf);
510:
511: FND_MESSAGE.SET_NAME('FV','FV_CCR_INVALID_FILE_NAME');
512: FND_MESSAGE.SET_TOKEN('FILE',p_file_name);
513: l_msg_inv_file_name := FND_MESSAGE.GET;
514:
515: insert_temp_data(3,null,l_msg_inv_file_name,l_message_action1,null,null,null);
516: END IF;
517:
522: l_invalid_file_name := TRUE;
523: l_errbuf := 'Error in Position#2-3 of filename';
524: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,l_errbuf);
525:
526: FND_MESSAGE.SET_NAME('FV','FV_CCR_INVALID_FILE_NAME');
527: FND_MESSAGE.SET_TOKEN('FILE',p_file_name);
528: l_msg_inv_file_name := FND_MESSAGE.GET;
529: insert_temp_data(3,null,l_msg_inv_file_name,l_message_action1,null,null,null);
530: END IF;
523: l_errbuf := 'Error in Position#2-3 of filename';
524: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,l_errbuf);
525:
526: FND_MESSAGE.SET_NAME('FV','FV_CCR_INVALID_FILE_NAME');
527: FND_MESSAGE.SET_TOKEN('FILE',p_file_name);
528: l_msg_inv_file_name := FND_MESSAGE.GET;
529: insert_temp_data(3,null,l_msg_inv_file_name,l_message_action1,null,null,null);
530: END IF;
531:
524: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,l_errbuf);
525:
526: FND_MESSAGE.SET_NAME('FV','FV_CCR_INVALID_FILE_NAME');
527: FND_MESSAGE.SET_TOKEN('FILE',p_file_name);
528: l_msg_inv_file_name := FND_MESSAGE.GET;
529: insert_temp_data(3,null,l_msg_inv_file_name,l_message_action1,null,null,null);
530: END IF;
531:
532: --find out if master/sensitive
540: l_invalid_file_name := TRUE;
541: l_errbuf := 'The file name does not match the file type';
542: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,l_errbuf);
543:
544: FND_MESSAGE.SET_NAME('FV','FV_CCR_INVALID_FILE_NAME');
545: FND_MESSAGE.SET_TOKEN('FILE',p_file_name);
546: l_msg_inv_file_name := FND_MESSAGE.GET;
547: insert_temp_data(3,null,l_msg_inv_file_name,l_message_action4,null,null,null);
548:
541: l_errbuf := 'The file name does not match the file type';
542: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,l_errbuf);
543:
544: FND_MESSAGE.SET_NAME('FV','FV_CCR_INVALID_FILE_NAME');
545: FND_MESSAGE.SET_TOKEN('FILE',p_file_name);
546: l_msg_inv_file_name := FND_MESSAGE.GET;
547: insert_temp_data(3,null,l_msg_inv_file_name,l_message_action4,null,null,null);
548:
549: END IF;*/
542: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,l_errbuf);
543:
544: FND_MESSAGE.SET_NAME('FV','FV_CCR_INVALID_FILE_NAME');
545: FND_MESSAGE.SET_TOKEN('FILE',p_file_name);
546: l_msg_inv_file_name := FND_MESSAGE.GET;
547: insert_temp_data(3,null,l_msg_inv_file_name,l_message_action4,null,null,null);
548:
549: END IF;*/
550:
563: retcode :=-1;
564: l_errbuf := SQLERRM;
565: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,l_errbuf);
566:
567: FND_MESSAGE.SET_NAME('FV','FV_CCR_INVALID_FILE_NAME');
568: FND_MESSAGE.SET_TOKEN('FILE',p_file_name);
569: l_msg_inv_file_name := FND_MESSAGE.GET;
570:
571: FND_MESSAGE.SET_NAME('FV','FV_CCR_JULIAN_DATE_ACTION');
564: l_errbuf := SQLERRM;
565: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,l_errbuf);
566:
567: FND_MESSAGE.SET_NAME('FV','FV_CCR_INVALID_FILE_NAME');
568: FND_MESSAGE.SET_TOKEN('FILE',p_file_name);
569: l_msg_inv_file_name := FND_MESSAGE.GET;
570:
571: FND_MESSAGE.SET_NAME('FV','FV_CCR_JULIAN_DATE_ACTION');
572: FND_MESSAGE.SET_TOKEN('DATE',l_juliandate);
565: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,l_errbuf);
566:
567: FND_MESSAGE.SET_NAME('FV','FV_CCR_INVALID_FILE_NAME');
568: FND_MESSAGE.SET_TOKEN('FILE',p_file_name);
569: l_msg_inv_file_name := FND_MESSAGE.GET;
570:
571: FND_MESSAGE.SET_NAME('FV','FV_CCR_JULIAN_DATE_ACTION');
572: FND_MESSAGE.SET_TOKEN('DATE',l_juliandate);
573: l_msg_julian_date := FND_MESSAGE.GET;
567: FND_MESSAGE.SET_NAME('FV','FV_CCR_INVALID_FILE_NAME');
568: FND_MESSAGE.SET_TOKEN('FILE',p_file_name);
569: l_msg_inv_file_name := FND_MESSAGE.GET;
570:
571: FND_MESSAGE.SET_NAME('FV','FV_CCR_JULIAN_DATE_ACTION');
572: FND_MESSAGE.SET_TOKEN('DATE',l_juliandate);
573: l_msg_julian_date := FND_MESSAGE.GET;
574:
575: insert_temp_data(3,null,l_msg_inv_file_name,l_msg_julian_date,null,null,null);
568: FND_MESSAGE.SET_TOKEN('FILE',p_file_name);
569: l_msg_inv_file_name := FND_MESSAGE.GET;
570:
571: FND_MESSAGE.SET_NAME('FV','FV_CCR_JULIAN_DATE_ACTION');
572: FND_MESSAGE.SET_TOKEN('DATE',l_juliandate);
573: l_msg_julian_date := FND_MESSAGE.GET;
574:
575: insert_temp_data(3,null,l_msg_inv_file_name,l_msg_julian_date,null,null,null);
576: RETURN;
569: l_msg_inv_file_name := FND_MESSAGE.GET;
570:
571: FND_MESSAGE.SET_NAME('FV','FV_CCR_JULIAN_DATE_ACTION');
572: FND_MESSAGE.SET_TOKEN('DATE',l_juliandate);
573: l_msg_julian_date := FND_MESSAGE.GET;
574:
575: insert_temp_data(3,null,l_msg_inv_file_name,l_msg_julian_date,null,null,null);
576: RETURN;
577: end; -- end of julian date check
699: retcode := -1;
700: l_errbuf := 'Not a valid Daily Refresh file';
701: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,l_errbuf);
702:
703: FND_MESSAGE.SET_NAME('FV','FV_CCR_INVALID_FILE_TYPE');
704: l_msg_inv_file_type := FND_MESSAGE.GET;
705: insert_temp_data(3,null,l_msg_inv_file_type,l_message_action2,null,null,null);
706: RETURN;
707: END IF; -- end of extract type check in 'S'
700: l_errbuf := 'Not a valid Daily Refresh file';
701: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,l_errbuf);
702:
703: FND_MESSAGE.SET_NAME('FV','FV_CCR_INVALID_FILE_TYPE');
704: l_msg_inv_file_type := FND_MESSAGE.GET;
705: insert_temp_data(3,null,l_msg_inv_file_type,l_message_action2,null,null,null);
706: RETURN;
707: END IF; -- end of extract type check in 'S'
708: END IF; -- end of file type validation
2619:
2620: l_errbuf := 'Processing CCR Data for a,2,3';
2621: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,l_errbuf);
2622:
2623: FND_MESSAGE.SET_NAME('FV','FV_CCR_ASSIGN_PAY_OBJ');
2624: l_msg_pay_obj := FND_MESSAGE.GET;
2625:
2626: FOR l_ccr_data IN c_ccr_data
2627: LOOP
2620: l_errbuf := 'Processing CCR Data for a,2,3';
2621: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,l_errbuf);
2622:
2623: FND_MESSAGE.SET_NAME('FV','FV_CCR_ASSIGN_PAY_OBJ');
2624: l_msg_pay_obj := FND_MESSAGE.GET;
2625:
2626: FOR l_ccr_data IN c_ccr_data
2627: LOOP
2628:
2632:
2633: l_valid_tin := nvl(l_ccr_data.taxpayer_id,l_ccr_data.social_security_number);
2634: IF((l_valid_tin IS NULL or length(l_valid_tin)<>9)
2635: AND l_ccr_data.country = 'USA') THEN
2636: FND_MESSAGE.set_NAME('FV','FV_CCR_INVALID_TAXPAYER_NUMBER');
2637: message_text := FND_MESSAGE.get;
2638: l_errbuf :='Invalid Taxpayer Number: '||nvl(l_valid_tin,'null');
2639: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_STATEMENT, 'main',l_errbuf);
2640: insert_temp_data(3,null,message_text ,null,l_ccr_data.duns||nvl(l_ccr_data.plus_four,''),null,null);
2633: l_valid_tin := nvl(l_ccr_data.taxpayer_id,l_ccr_data.social_security_number);
2634: IF((l_valid_tin IS NULL or length(l_valid_tin)<>9)
2635: AND l_ccr_data.country = 'USA') THEN
2636: FND_MESSAGE.set_NAME('FV','FV_CCR_INVALID_TAXPAYER_NUMBER');
2637: message_text := FND_MESSAGE.get;
2638: l_errbuf :='Invalid Taxpayer Number: '||nvl(l_valid_tin,'null');
2639: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_STATEMENT, 'main',l_errbuf);
2640: insert_temp_data(3,null,message_text ,null,l_ccr_data.duns||nvl(l_ccr_data.plus_four,''),null,null);
2641:
2866:
2867: -- BUG 3839843
2868: IF (l_lbe_change <> l_ccr_data.legal_bus_name) THEN
2869:
2870: FND_MESSAGE.set_NAME('FV','FV_CCR_LBE_CHANGED');
2871: message_text := FND_MESSAGE.get;
2872:
2873: l_errbuf :='Legal Bus Name changed from '||l_lbe_change||' -> '||l_ccr_data.legal_bus_name;
2874: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_STATEMENT, 'find_code',l_errbuf);
2867: -- BUG 3839843
2868: IF (l_lbe_change <> l_ccr_data.legal_bus_name) THEN
2869:
2870: FND_MESSAGE.set_NAME('FV','FV_CCR_LBE_CHANGED');
2871: message_text := FND_MESSAGE.get;
2872:
2873: l_errbuf :='Legal Bus Name changed from '||l_lbe_change||' -> '||l_ccr_data.legal_bus_name;
2874: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_STATEMENT, 'find_code',l_errbuf);
2875: insert_temp_data(3,null,message_text ,null,l_ccr_data.duns||l_ccr_data.plus_four,null,null);
3669:
3670: --BUG 3839843
3671: IF (l_lbe_change <> l_ccr_data.legal_bus_name) THEN
3672:
3673: FND_MESSAGE.set_NAME('FV','FV_CCR_LBE_CHANGED');
3674: message_text := FND_MESSAGE.get;
3675:
3676: l_errbuf :='Legal Bus Name changed from '||l_lbe_change||' -> '||l_ccr_data.legal_bus_name;
3677: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_STATEMENT, 'find_code',l_errbuf);
3670: --BUG 3839843
3671: IF (l_lbe_change <> l_ccr_data.legal_bus_name) THEN
3672:
3673: FND_MESSAGE.set_NAME('FV','FV_CCR_LBE_CHANGED');
3674: message_text := FND_MESSAGE.get;
3675:
3676: l_errbuf :='Legal Bus Name changed from '||l_lbe_change||' -> '||l_ccr_data.legal_bus_name;
3677: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_STATEMENT, 'find_code',l_errbuf);
3678: insert_temp_data(3,null,message_text ,null,l_ccr_data.duns||l_ccr_data.plus_four,null,null);
4503: OPEN c_vendor_info(l_taxpayer.vendor_id);
4504: FETCH c_vendor_info into l_vendor_id;
4505: CLOSE c_vendor_info;
4506:
4507: FND_MESSAGE.set_NAME('FV','FV_CCR_DUPLICATE_TAXPAYER_NUM');
4508: FND_MESSAGE.set_TOKEN('LISTDUNS',l_duns_list);
4509: FND_MESSAGE.SET_TOKEN('VENDOR', l_vendor_id);
4510: message_text := FND_MESSAGE.get;
4511:
4504: FETCH c_vendor_info into l_vendor_id;
4505: CLOSE c_vendor_info;
4506:
4507: FND_MESSAGE.set_NAME('FV','FV_CCR_DUPLICATE_TAXPAYER_NUM');
4508: FND_MESSAGE.set_TOKEN('LISTDUNS',l_duns_list);
4509: FND_MESSAGE.SET_TOKEN('VENDOR', l_vendor_id);
4510: message_text := FND_MESSAGE.get;
4511:
4512:
4505: CLOSE c_vendor_info;
4506:
4507: FND_MESSAGE.set_NAME('FV','FV_CCR_DUPLICATE_TAXPAYER_NUM');
4508: FND_MESSAGE.set_TOKEN('LISTDUNS',l_duns_list);
4509: FND_MESSAGE.SET_TOKEN('VENDOR', l_vendor_id);
4510: message_text := FND_MESSAGE.get;
4511:
4512:
4513: insert_temp_data(3,null,message_text ,null,'ORACLE',null,null);
4506:
4507: FND_MESSAGE.set_NAME('FV','FV_CCR_DUPLICATE_TAXPAYER_NUM');
4508: FND_MESSAGE.set_TOKEN('LISTDUNS',l_duns_list);
4509: FND_MESSAGE.SET_TOKEN('VENDOR', l_vendor_id);
4510: message_text := FND_MESSAGE.get;
4511:
4512:
4513: insert_temp_data(3,null,message_text ,null,'ORACLE',null,null);
4514: END LOOP;
4603: WHERE duns = fcpg.duns
4604: AND nvl(plus_four,'N') = nvl(fcpg.plus_four,'N')
4605: ))
4606: LOOP
4607: FND_MESSAGE.set_NAME('FV','FV_CCR_XML_INACTIVE_DUNS');
4608: message_text := FND_MESSAGE.get;
4609: l_errbuf :='Expired/inactive DUNS/DUNS+4: '||crec.duns||'-'||crec.plus_four;
4610: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_STATEMENT, 'main',l_errbuf);
4611: insert_temp_data(3,null,message_text ,null,crec.duns||crec.plus_four,null,null);
4604: AND nvl(plus_four,'N') = nvl(fcpg.plus_four,'N')
4605: ))
4606: LOOP
4607: FND_MESSAGE.set_NAME('FV','FV_CCR_XML_INACTIVE_DUNS');
4608: message_text := FND_MESSAGE.get;
4609: l_errbuf :='Expired/inactive DUNS/DUNS+4: '||crec.duns||'-'||crec.plus_four;
4610: FV_UTILITY.LOG_MESG(FND_LOG.LEVEL_STATEMENT, 'main',l_errbuf);
4611: insert_temp_data(3,null,message_text ,null,crec.duns||crec.plus_four,null,null);
4612: END LOOP;