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.

[Home] [Help]

APPS.OKS_OCINT_PUB dependencies on FND_FILE

Line 201: fnd_file.put_line (fnd_file.LOG, 'Start of OC_interface...');

197: aso_handle_exception EXCEPTION;
198: aso_handle_normal EXCEPTION;
199: BEGIN
200: SAVEPOINT oks_ocinterface_pub;
201: fnd_file.put_line (fnd_file.LOG, 'Start of OC_interface...');
202: l_user_id := fnd_global.user_id;
203: fnd_file.put_line (fnd_file.LOG, 'User Id : ' || TO_CHAR (l_user_id));
204:
205: LOOP

Line 203: fnd_file.put_line (fnd_file.LOG, 'User Id : ' || TO_CHAR (l_user_id));

199: BEGIN
200: SAVEPOINT oks_ocinterface_pub;
201: fnd_file.put_line (fnd_file.LOG, 'Start of OC_interface...');
202: l_user_id := fnd_global.user_id;
203: fnd_file.put_line (fnd_file.LOG, 'User Id : ' || TO_CHAR (l_user_id));
204:
205: LOOP
206: l_oldline_count := 0;
207: l_newline_count := 0;

Line 256: fnd_file.put_line (fnd_file.LOG, l_msg_data);

252: p_encoded => 'F',
253: p_data => l_msg_data,
254: p_msg_index_out => l_index
255: );
256: fnd_file.put_line (fnd_file.LOG, l_msg_data);
257: END LOOP;
258:
259: ROLLBACK TO oks_ocinterface_pub;
260: RETURN;

Line 264: fnd_file.put_line (fnd_file.LOG,

260: RETURN;
261: END IF;
262:
263: l_newline_count := l_line_tbl.COUNT;
264: fnd_file.put_line (fnd_file.LOG,
265: 'Lines to process = ' || l_newline_count
266: );
267: EXIT WHEN l_no_more_messages = fnd_api.g_true;
268:

Line 271: fnd_file.put_line (fnd_file.LOG, 'No lines to insert');

267: EXIT WHEN l_no_more_messages = fnd_api.g_true;
268:
269: IF l_newline_count <= 0
270: THEN --Order Line Record Found
271: fnd_file.put_line (fnd_file.LOG, 'No lines to insert');
272: ELSE
273: fnd_file.put_line (fnd_file.LOG,
274: 'Processing the order lines... line count='
275: || TO_CHAR (l_newline_count)

Line 273: fnd_file.put_line (fnd_file.LOG,

269: IF l_newline_count <= 0
270: THEN --Order Line Record Found
271: fnd_file.put_line (fnd_file.LOG, 'No lines to insert');
272: ELSE
273: fnd_file.put_line (fnd_file.LOG,
274: 'Processing the order lines... line count='
275: || TO_CHAR (l_newline_count)
276: );
277:

Line 281: fnd_file.put_line (fnd_file.LOG,

277:
278: FOR l_count IN 1 .. l_newline_count
279: LOOP
280: l_exists := 'y';
281: fnd_file.put_line (fnd_file.LOG,
282: 'Processing Order Line '
283: || l_line_tbl (l_count).line_id
284: );
285: fnd_file.put_line

Line 285: fnd_file.put_line

281: fnd_file.put_line (fnd_file.LOG,
282: 'Processing Order Line '
283: || l_line_tbl (l_count).line_id
284: );
285: fnd_file.put_line
286: (fnd_file.LOG,
287: 'Service Ref Type Code '
288: || l_line_tbl (l_count).service_reference_type_code
289: );

Line 286: (fnd_file.LOG,

282: 'Processing Order Line '
283: || l_line_tbl (l_count).line_id
284: );
285: fnd_file.put_line
286: (fnd_file.LOG,
287: 'Service Ref Type Code '
288: || l_line_tbl (l_count).service_reference_type_code
289: );
290: fnd_file.put_line

Line 290: fnd_file.put_line

286: (fnd_file.LOG,
287: 'Service Ref Type Code '
288: || l_line_tbl (l_count).service_reference_type_code
289: );
290: fnd_file.put_line
291: (fnd_file.LOG,
292: 'Service line Id '
293: || l_line_tbl (l_count).service_reference_line_id
294: );

Line 291: (fnd_file.LOG,

287: 'Service Ref Type Code '
288: || l_line_tbl (l_count).service_reference_type_code
289: );
290: fnd_file.put_line
291: (fnd_file.LOG,
292: 'Service line Id '
293: || l_line_tbl (l_count).service_reference_line_id
294: );
295: fnd_file.put_line

Line 295: fnd_file.put_line

291: (fnd_file.LOG,
292: 'Service line Id '
293: || l_line_tbl (l_count).service_reference_line_id
294: );
295: fnd_file.put_line
296: (fnd_file.LOG,
297: 'Profile option value '
298: || fnd_profile.VALUE
299: ('OKS_CONTRACTS_VALIDATION_SOURCE')

Line 296: (fnd_file.LOG,

292: 'Service line Id '
293: || l_line_tbl (l_count).service_reference_line_id
294: );
295: fnd_file.put_line
296: (fnd_file.LOG,
297: 'Profile option value '
298: || fnd_profile.VALUE
299: ('OKS_CONTRACTS_VALIDATION_SOURCE')
300: );

Line 317: fnd_file.put_line (fnd_file.LOG,

313:
314: --Check Delayed Service
315: IF (l_exists <> 'x')
316: THEN
317: fnd_file.put_line (fnd_file.LOG,
318: 'Order line not present already...'
319: );
320:
321: IF NVL (l_line_tbl (l_count).service_reference_type_code,

Line 343: fnd_file.put_line (fnd_file.LOG,

339: END IF;
340:
341: CLOSE l_order_csr;
342:
343: fnd_file.put_line (fnd_file.LOG,
344: 'Fulfillment Quantity '
345: || l_order_rec.fqty
346: );
347: fnd_file.put_line (fnd_file.LOG,

Line 347: fnd_file.put_line (fnd_file.LOG,

343: fnd_file.put_line (fnd_file.LOG,
344: 'Fulfillment Quantity '
345: || l_order_rec.fqty
346: );
347: fnd_file.put_line (fnd_file.LOG,
348: 'Order Org Id '
349: || l_order_rec.org_id
350: );
351: fnd_file.put_line (fnd_file.LOG,

Line 351: fnd_file.put_line (fnd_file.LOG,

347: fnd_file.put_line (fnd_file.LOG,
348: 'Order Org Id '
349: || l_order_rec.org_id
350: );
351: fnd_file.put_line (fnd_file.LOG,
352: 'Order Organization Id '
353: || l_order_rec.ship_from_org_id
354: );
355: fnd_file.put_line (fnd_file.LOG,

Line 355: fnd_file.put_line (fnd_file.LOG,

351: fnd_file.put_line (fnd_file.LOG,
352: 'Order Organization Id '
353: || l_order_rec.ship_from_org_id
354: );
355: fnd_file.put_line (fnd_file.LOG,
356: 'Sold from Org Id '
357: || l_order_rec.sold_from_org_id
358: );
359: okc_context.set_okc_org_context (l_order_rec.org_id,

Line 361: fnd_file.put_line (fnd_file.LOG,

357: || l_order_rec.sold_from_org_id
358: );
359: okc_context.set_okc_org_context (l_order_rec.org_id,
360: NULL);
361: fnd_file.put_line (fnd_file.LOG,
362: 'org_context - '
363: || TO_CHAR (okc_context.get_okc_org_id)
364: );
365: fnd_file.put_line

Line 365: fnd_file.put_line

361: fnd_file.put_line (fnd_file.LOG,
362: 'org_context - '
363: || TO_CHAR (okc_context.get_okc_org_id)
364: );
365: fnd_file.put_line
366: (fnd_file.LOG,
367: 'organization_context - '
368: || TO_CHAR
369: (okc_context.get_okc_organization_id)

Line 366: (fnd_file.LOG,

362: 'org_context - '
363: || TO_CHAR (okc_context.get_okc_org_id)
364: );
365: fnd_file.put_line
366: (fnd_file.LOG,
367: 'organization_context - '
368: || TO_CHAR
369: (okc_context.get_okc_organization_id)
370: );

Line 407: fnd_file.put_line (fnd_file.LOG,

403: INTO l_hdrid, l_ord_num;
404:
405: IF l_order_hdr_csr%NOTFOUND
406: THEN
407: fnd_file.put_line (fnd_file.LOG,
408: ' Invalid Order line ID'
409: );
410:
411: CLOSE l_order_hdr_csr;

Line 415: fnd_file.put_line (fnd_file.LOG,

411: CLOSE l_order_hdr_csr;
412: ELSE
413: CLOSE l_order_hdr_csr;
414:
415: fnd_file.put_line (fnd_file.LOG,
416: 'Order Header ID ' || l_hdrid
417: );
418: l_repv_rec.order_id := l_hdrid;
419: l_repv_rec.order_line_id :=

Line 435: fnd_file.put_line

431: x_msg_data => l_msg_data,
432: p_repv_rec => l_repv_rec,
433: x_repv_rec => l_out_repv_rec
434: );
435: fnd_file.put_line
436: (fnd_file.LOG,
437: 'OKS_REP_PUB - RETURN STATUS : '
438: || l_return_status
439: );

Line 436: (fnd_file.LOG,

432: p_repv_rec => l_repv_rec,
433: x_repv_rec => l_out_repv_rec
434: );
435: fnd_file.put_line
436: (fnd_file.LOG,
437: 'OKS_REP_PUB - RETURN STATUS : '
438: || l_return_status
439: );
440:

Line 468: fnd_file.put_line

464: dup_val := 'Y';
465: EXIT;
466: END IF;
467:
468: fnd_file.put_line
469: (fnd_file.LOG,
470: 'oks_rep_pub.insert_row: '
471: || l_msg_data
472: );

Line 469: (fnd_file.LOG,

465: EXIT;
466: END IF;
467:
468: fnd_file.put_line
469: (fnd_file.LOG,
470: 'oks_rep_pub.insert_row: '
471: || l_msg_data
472: );
473: END LOOP;

Line 487: fnd_file.put_line (fnd_file.LOG, 'Duplicate Order Line');

483: END IF;
484: END IF;
485: END IF;
486: ELSE
487: fnd_file.put_line (fnd_file.LOG, 'Duplicate Order Line');
488: END IF;
489: END LOOP;
490: END IF;
491: END LOOP;

Line 498: fnd_file.put_line (fnd_file.LOG, 'Order Capture INT Program finished.');

494: retcode := 0;
495: --Modified for 12.0 ASO Queue Replacement Project (JVARGHES)
496: COMMIT WORK;
497: --
498: fnd_file.put_line (fnd_file.LOG, 'Order Capture INT Program finished.');
499: --Modified for 12.0 ASO Queue Replacement Project (JVARGHES)
500: --
501: --l_request_id := FND_REQUEST.SUBMIT_REQUEST('OKS','OKSREPROC','','',FALSE,'SEL','');
502: --if (l_request_id > 0) then

Line 505: --FND_FILE.PUT_LINE (FND_FILE.LOG, 'Firing Order Reprocess concurrent program');

501: --l_request_id := FND_REQUEST.SUBMIT_REQUEST('OKS','OKSREPROC','','',FALSE,'SEL','');
502: --if (l_request_id > 0) then
503: -- COMMIT WORK;
504: --end if;
505: --FND_FILE.PUT_LINE (FND_FILE.LOG, 'Firing Order Reprocess concurrent program');
506: --FND_FILE.PUT_LINE (FND_FILE.LOG, 'Request Id - '||to_char(l_request_id));
507: --
508: --
509: EXCEPTION

Line 506: --FND_FILE.PUT_LINE (FND_FILE.LOG, 'Request Id - '||to_char(l_request_id));

502: --if (l_request_id > 0) then
503: -- COMMIT WORK;
504: --end if;
505: --FND_FILE.PUT_LINE (FND_FILE.LOG, 'Firing Order Reprocess concurrent program');
506: --FND_FILE.PUT_LINE (FND_FILE.LOG, 'Request Id - '||to_char(l_request_id));
507: --
508: --
509: EXCEPTION
510: WHEN g_exception_halt_validation

Line 519: fnd_file.put_line (fnd_file.LOG,

515: ROLLBACK TO before_insert;
516: -- Retrieve error message into errbuf
517: errbuf := SQLERRM;
518: retcode := 2;
519: fnd_file.put_line (fnd_file.LOG,
520: 'Oracle Error Code is -' || TO_CHAR (SQLCODE)
521: );
522: fnd_file.put_line (fnd_file.LOG,
523: 'Oracle Error Message is -'

Line 522: fnd_file.put_line (fnd_file.LOG,

518: retcode := 2;
519: fnd_file.put_line (fnd_file.LOG,
520: 'Oracle Error Code is -' || TO_CHAR (SQLCODE)
521: );
522: fnd_file.put_line (fnd_file.LOG,
523: 'Oracle Error Message is -'
524: || SUBSTR (SQLERRM, 1, 512)
525: );
526: END oc_interface;

Line 580: fnd_file.put_line (fnd_file.LOG,

576: x_msg_data => l_msg_data,
577: p_repv_rec => l_repv_rec,
578: x_repv_rec => l_new_repv_rec
579: );
580: fnd_file.put_line (fnd_file.LOG,
581: 'Update Row : Return Status = ' || l_return_status
582: );
583:
584: IF NOT (l_return_status = fnd_api.g_ret_sts_success)

Line 593: fnd_file.put_line (fnd_file.LOG,

589: p_encoded => 'F',
590: p_data => l_msg_data,
591: p_msg_index_out => l_index
592: );
593: fnd_file.put_line (fnd_file.LOG,
594: 'Update Row Error : ' || l_msg_data
595: );
596: END LOOP;
597:

Line 603: fnd_file.put_line

599: END IF;
600: EXCEPTION
601: WHEN g_exception_halt_validation
602: THEN
603: fnd_file.put_line
604: (fnd_file.LOG,
605: 'Error in Handle Order Error : Oracle Error Code is -'
606: || TO_CHAR (SQLCODE)
607: );

Line 604: (fnd_file.LOG,

600: EXCEPTION
601: WHEN g_exception_halt_validation
602: THEN
603: fnd_file.put_line
604: (fnd_file.LOG,
605: 'Error in Handle Order Error : Oracle Error Code is -'
606: || TO_CHAR (SQLCODE)
607: );
608: fnd_file.put_line

Line 608: fnd_file.put_line

604: (fnd_file.LOG,
605: 'Error in Handle Order Error : Oracle Error Code is -'
606: || TO_CHAR (SQLCODE)
607: );
608: fnd_file.put_line
609: (fnd_file.LOG,
610: 'Error in Handle Order Error : Oracle Error Message is -'
611: || SUBSTR (SQLERRM, 1, 512)
612: );

Line 609: (fnd_file.LOG,

605: 'Error in Handle Order Error : Oracle Error Code is -'
606: || TO_CHAR (SQLCODE)
607: );
608: fnd_file.put_line
609: (fnd_file.LOG,
610: 'Error in Handle Order Error : Oracle Error Message is -'
611: || SUBSTR (SQLERRM, 1, 512)
612: );
613: x_return_status := l_return_status;

Line 617: fnd_file.put_line (fnd_file.LOG,

613: x_return_status := l_return_status;
614: WHEN OTHERS
615: THEN
616: x_return_status := okc_api.g_ret_sts_unexp_error;
617: fnd_file.put_line (fnd_file.LOG,
618: 'Oracle Error Code is -' || TO_CHAR (SQLCODE)
619: );
620: fnd_file.put_line (fnd_file.LOG,
621: 'Oracle Error Message is -'

Line 620: fnd_file.put_line (fnd_file.LOG,

616: x_return_status := okc_api.g_ret_sts_unexp_error;
617: fnd_file.put_line (fnd_file.LOG,
618: 'Oracle Error Code is -' || TO_CHAR (SQLCODE)
619: );
620: fnd_file.put_line (fnd_file.LOG,
621: 'Oracle Error Message is -'
622: || SUBSTR (SQLERRM, 1, 512)
623: );
624: END handle_order_error;

Line 1024: fnd_file.put_line

1020: x_order_error => l_order_error,
1021: x_return_status => l_return_status,
1022: x_header_rec => l_k_header_rec
1023: );
1024: fnd_file.put_line
1025: (fnd_file.LOG,
1026: 'OC INTERFACE :- get_contract_header_info status '
1027: || l_return_status
1028: );

Line 1025: (fnd_file.LOG,

1021: x_return_status => l_return_status,
1022: x_header_rec => l_k_header_rec
1023: );
1024: fnd_file.put_line
1025: (fnd_file.LOG,
1026: 'OC INTERFACE :- get_contract_header_info status '
1027: || l_return_status
1028: );
1029:

Line 1046: fnd_file.put_line (fnd_file.LOG,

1042: );
1043: l_order_error := l_order_error || l_msg_data || '#';
1044: fnd_message.set_encoded (l_msg_data);
1045: l_msg_data := fnd_message.get;
1046: fnd_file.put_line (fnd_file.LOG,
1047: 'GET CONTRACT HDR FAILURE ' || l_msg_data
1048: );
1049: END LOOP;
1050: END IF;

Line 1069: fnd_file.put_line (fnd_file.LOG,

1065: x_order_error => l_order_error,
1066: x_return_status => l_return_status,
1067: x_line_rec => l_k_line_rec
1068: );
1069: fnd_file.put_line (fnd_file.LOG,
1070: 'OC INTERFACE :- get_k_service_line status '
1071: || l_return_status
1072: );
1073:

Line 1090: fnd_file.put_line (fnd_file.LOG,

1086: );
1087: l_order_error := l_order_error || l_msg_data || '#';
1088: fnd_message.set_encoded (l_msg_data);
1089: l_msg_data := fnd_message.get;
1090: fnd_file.put_line (fnd_file.LOG,
1091: 'GET ORDER LINE FAILURE ' || l_msg_data
1092: );
1093: END LOOP;
1094: END IF;

Line 1116: fnd_file.put_line (fnd_file.LOG,

1112: p_date => SYSDATE,
1113: p_rnrl_rec => NULL,
1114: x_rnrl_rec => l_rnrl_rec_out
1115: );
1116: fnd_file.put_line (fnd_file.LOG,
1117: 'OC INTERFACE :- get_renew_rules status '
1118: || l_return_status
1119: );
1120:

Line 1130: fnd_file.put_line (fnd_file.LOG,

1126: p_encoded => 'F',
1127: p_data => l_msg_data,
1128: p_msg_index_out => l_index
1129: );
1130: fnd_file.put_line (fnd_file.LOG,
1131: 'RENEWAL RULE FAILURE ' || l_msg_data
1132: );
1133: END LOOP;
1134:

Line 1144: fnd_file.put_line (fnd_file.LOG,

1140: x_return_status => l_return_status,
1141: x_msg_count => l_msg_count,
1142: x_msg_data => l_msg_data
1143: );
1144: fnd_file.put_line (fnd_file.LOG,
1145: 'OC INTERFACE :- get_K_order_details status '
1146: || l_return_status
1147: );
1148:

Line 1158: fnd_file.put_line (fnd_file.LOG,

1154: p_encoded => 'F',
1155: p_data => l_msg_data,
1156: p_msg_index_out => l_index
1157: );
1158: fnd_file.put_line (fnd_file.LOG,
1159: 'ORDER DETAIL FAILURE ' || l_msg_data
1160: );
1161: END LOOP;
1162:

Line 1191: fnd_file.put_line (fnd_file.LOG,

1187: --Period type will be picked up from GCD and not hard coded
1188: --l_period_type := 'FIXED';
1189: END IF;
1190:
1191: fnd_file.put_line (fnd_file.LOG,
1192: 'OC INTERFACE :- get_period_defaults '
1193: || l_return_status
1194: );
1195: fnd_file.put_line

Line 1195: fnd_file.put_line

1191: fnd_file.put_line (fnd_file.LOG,
1192: 'OC INTERFACE :- get_period_defaults '
1193: || l_return_status
1194: );
1195: fnd_file.put_line
1196: (fnd_file.LOG,
1197: 'OC INTERFACE :- get_period_defaults l_period_start '
1198: || l_period_start
1199: );

Line 1196: (fnd_file.LOG,

1192: 'OC INTERFACE :- get_period_defaults '
1193: || l_return_status
1194: );
1195: fnd_file.put_line
1196: (fnd_file.LOG,
1197: 'OC INTERFACE :- get_period_defaults l_period_start '
1198: || l_period_start
1199: );
1200: fnd_file.put_line

Line 1200: fnd_file.put_line

1196: (fnd_file.LOG,
1197: 'OC INTERFACE :- get_period_defaults l_period_start '
1198: || l_period_start
1199: );
1200: fnd_file.put_line
1201: (fnd_file.LOG,
1202: 'OC INTERFACE :- get_period_defaults l_period_type '
1203: || l_period_type
1204: );

Line 1201: (fnd_file.LOG,

1197: 'OC INTERFACE :- get_period_defaults l_period_start '
1198: || l_period_start
1199: );
1200: fnd_file.put_line
1201: (fnd_file.LOG,
1202: 'OC INTERFACE :- get_period_defaults l_period_type '
1203: || l_period_type
1204: );
1205:

Line 1215: fnd_file.put_line (fnd_file.LOG,

1211: p_encoded => 'F',
1212: p_data => l_msg_data,
1213: p_msg_index_out => l_index
1214: );
1215: fnd_file.put_line (fnd_file.LOG,
1216: 'get_period_defaults FAILURE ' || l_msg_data
1217: );
1218: END LOOP;
1219:

Line 1223: fnd_file.put_line (fnd_file.LOG,

1219:
1220: RAISE g_exception_halt_validation;
1221: END IF;
1222:
1223: fnd_file.put_line (fnd_file.LOG,
1224: 'OC INTERFACE :- Create K Hdr status '
1225: || l_return_status
1226: );
1227:

Line 1235: fnd_file.put_line (fnd_file.LOG,

1231: INTO l_party_name;
1232:
1233: CLOSE l_party_csr;
1234:
1235: fnd_file.put_line (fnd_file.LOG,
1236: 'OC INTERFACE :- party name ' || l_party_name
1237: );
1238: /*Modified for ER 16039680 */
1239: IF l_k_line_rec.coverage_schd_id IS NOT NULL THEN

Line 1324: fnd_file.put_line (fnd_file.LOG,

1320: END IF;
1321:
1322: /*Modified for CLOUD ER 16039680*/
1323:
1324: fnd_file.put_line (fnd_file.LOG,
1325: 'OC INTERFACE :- l_hdr_rec.merge_object_id '
1326: || l_hdr_rec.merge_object_id
1327: );
1328:

Line 1329: fnd_file.put_line (fnd_file.LOG,

1325: 'OC INTERFACE :- l_hdr_rec.merge_object_id '
1326: || l_hdr_rec.merge_object_id
1327: );
1328:
1329: fnd_file.put_line (fnd_file.LOG,
1330: 'OC INTERFACE :- l_hdr_rec.merge_object_id '
1331: || l_hdr_rec.merge_type
1332: );
1333:

Line 1373: FND_FILE.PUT_LINE (FND_FILE.LOG, 'OC INTERFACE :- Error: Trying to add service line to a contract in Hold Status:'||l_return_status);

1369: l_return_status := OKC_API.G_RET_STS_ERROR;
1370: fnd_message.set_name('OKS','OKS_INVALID_STS');
1371: fnd_message.set_token(token => 'Token',value => l_k_number);
1372: l_order_error := '#'||fnd_message.get_encoded||'#';
1373: FND_FILE.PUT_LINE (FND_FILE.LOG, 'OC INTERFACE :- Error: Trying to add service line to a contract in Hold Status:'||l_return_status);
1374: x_upd_tbl(1).error_text := l_order_error;
1375: x_upd_tbl(1).success_flag := 'E';
1376: x_upd_tbl(1).order_line_id := p_reproc_line_rec.order_line_id;
1377: x_upd_tbl(1).id := p_reproc_line_rec.id;

Line 1420: fnd_file.put_line (fnd_file.LOG,

1416: (p_order_hdr_id => p_reproc_line_rec.order_id,
1417: x_salescredit_tbl => l_salescredit_tbl_in,
1418: x_return_status => l_return_status
1419: );
1420: fnd_file.put_line (fnd_file.LOG,
1421: 'OC INTERFACE :- SalesCredit at Header '
1422: || l_return_status
1423: );
1424:

Line 1434: fnd_file.put_line (fnd_file.LOG,

1430: p_encoded => 'F',
1431: p_data => l_msg_data,
1432: p_msg_index_out => l_index
1433: );
1434: fnd_file.put_line (fnd_file.LOG,
1435: 'READ SALES CREDIT ERROR IN HEADER'
1436: || l_msg_data
1437: );
1438: END LOOP;

Line 1560: fnd_file.put_line (fnd_file.LOG,

1556: x_return_status => l_return_status,
1557: x_msg_count => l_msg_count,
1558: x_msg_data => l_msg_data
1559: );
1560: fnd_file.put_line (fnd_file.LOG,
1561: 'OC INTERFACE :- Create K Hdr ID = '
1562: || TO_CHAR (l_chrid)
1563: );
1564: fnd_file.put_line (fnd_file.LOG,

Line 1564: fnd_file.put_line (fnd_file.LOG,

1560: fnd_file.put_line (fnd_file.LOG,
1561: 'OC INTERFACE :- Create K Hdr ID = '
1562: || TO_CHAR (l_chrid)
1563: );
1564: fnd_file.put_line (fnd_file.LOG,
1565: 'OC INTERFACE :- Create K Hdr status '
1566: || l_return_status
1567: );
1568:

Line 1585: fnd_file.put_line (fnd_file.LOG,

1581: );
1582: l_order_error := l_order_error || l_msg_data || '#';
1583: fnd_message.set_encoded (l_msg_data);
1584: l_msg_data := fnd_message.get;
1585: fnd_file.put_line (fnd_file.LOG,
1586: 'Create_k_hdr FAILURE ' || l_msg_data
1587: );
1588: END LOOP;
1589: END IF;

Line 1632: fnd_file.put_line

1628: );
1629: END IF;
1630:
1631: --OKS_RENEW_PVT.DEBUG_LOG( '(OKS_EXTWARPRGM_PVT).okc_oc_int_pub.create_k_relationships '|| l_return_status);
1632: fnd_file.put_line
1633: (fnd_file.LOG,
1634: '(OKS_EXTWARPRGM_PVT).okc_oc_int_pub.create_k_relationships '
1635: || l_return_status
1636: );

Line 1633: (fnd_file.LOG,

1629: END IF;
1630:
1631: --OKS_RENEW_PVT.DEBUG_LOG( '(OKS_EXTWARPRGM_PVT).okc_oc_int_pub.create_k_relationships '|| l_return_status);
1632: fnd_file.put_line
1633: (fnd_file.LOG,
1634: '(OKS_EXTWARPRGM_PVT).okc_oc_int_pub.create_k_relationships '
1635: || l_return_status
1636: );
1637:

Line 1647: fnd_file.put_line (fnd_file.LOG,

1643: p_encoded => 'F',
1644: p_data => l_msg_data,
1645: p_msg_index_out => l_index
1646: );
1647: fnd_file.put_line (fnd_file.LOG,
1648: 'K HDR CREATION ERROR ' || l_msg_data
1649: );
1650: END LOOP;
1651:

Line 1661: fnd_file.put_line (fnd_file.LOG,

1657: (p_order_line_id => p_reproc_line_rec.order_line_id,
1658: x_salescredit_tbl => l_salescredit_tbl_in,
1659: x_return_status => l_return_status
1660: );
1661: fnd_file.put_line (fnd_file.LOG,
1662: 'OC INTERFACE :- SalesCredit ' || l_return_status
1663: );
1664:
1665: IF NOT (l_return_status = fnd_api.g_ret_sts_success)

Line 1674: fnd_file.put_line (fnd_file.LOG,

1670: p_encoded => 'F',
1671: p_data => l_msg_data,
1672: p_msg_index_out => l_index
1673: );
1674: fnd_file.put_line (fnd_file.LOG,
1675: 'READ SALES CREDIT ERROR ' || l_msg_data
1676: );
1677: END LOOP;
1678:

Line 1692: fnd_file.put_line (fnd_file.LOG,

1688: (p_order_hdr_id => p_reproc_line_rec.order_id,
1689: x_salescredit_tbl => l_salescredit_tbl_in,
1690: x_return_status => l_return_status
1691: );
1692: fnd_file.put_line (fnd_file.LOG,
1693: 'OC INTERFACE :- SalesCredit at Header - defaulting for order line id = '||p_reproc_line_rec.order_id
1694: || l_return_status
1695: );
1696:

Line 1706: fnd_file.put_line (fnd_file.LOG,

1702: p_encoded => 'F',
1703: p_data => l_msg_data,
1704: p_msg_index_out => l_index
1705: );
1706: fnd_file.put_line (fnd_file.LOG,
1707: 'READ SALES CREDIT ERROR IN HEADER'
1708: || l_msg_data
1709: );
1710: END LOOP;

Line 1716: fnd_file.put_line (fnd_file.LOG,

1712: RAISE g_exception_halt_validation;
1713: END IF;
1714: END IF;
1715:
1716: fnd_file.put_line (fnd_file.LOG,
1717: 'OC_INT ...... Cov Temp Id = '
1718: || NVL (l_k_line_rec.coverage_schd_id, -12345)
1719: );
1720: l_line_rec.k_id := l_chrid;

Line 1800: fnd_file.put_line (fnd_file.LOG,

1796: x_return_status => l_return_status,
1797: x_msg_count => l_msg_count,
1798: x_msg_data => l_msg_data
1799: );
1800: fnd_file.put_line (fnd_file.LOG,
1801: 'OC INTERFACE :- Create K Line ID = '
1802: || NVL (l_lineid, -1234)
1803: );
1804: fnd_file.put_line (fnd_file.LOG,

Line 1804: fnd_file.put_line (fnd_file.LOG,

1800: fnd_file.put_line (fnd_file.LOG,
1801: 'OC INTERFACE :- Create K Line ID = '
1802: || NVL (l_lineid, -1234)
1803: );
1804: fnd_file.put_line (fnd_file.LOG,
1805: 'OC INTERFACE :- Create K Line status '
1806: || l_return_status
1807: );
1808:

Line 1825: fnd_file.put_line (fnd_file.LOG,

1821: );
1822: l_order_error := l_order_error || l_msg_data || '#';
1823: fnd_message.set_encoded (l_msg_data);
1824: l_msg_data := fnd_message.get;
1825: fnd_file.put_line (fnd_file.LOG,
1826: 'Create_k_service_line FAILURE '
1827: || l_msg_data
1828: );
1829: END LOOP;

Line 1836: fnd_file.put_line (fnd_file.LOG,

1832: x_upd_tbl (1).ERROR_TEXT := l_order_error;
1833: x_upd_tbl (1).success_flag := 'E';
1834: x_upd_tbl (1).order_line_id := p_reproc_line_rec.order_line_id;
1835: x_upd_tbl (1).ID := p_reproc_line_rec.ID;
1836: fnd_file.put_line (fnd_file.LOG,
1837: 'Inserting error msg ...'
1838: || x_upd_tbl (1).ERROR_TEXT
1839: );
1840: RAISE g_exception_halt_validation;

Line 1874: fnd_file.put_line (fnd_file.LOG,

1870: p_encoded => 'F',
1871: p_data => l_msg_data,
1872: p_msg_index_out => l_index
1873: );
1874: fnd_file.put_line (fnd_file.LOG,
1875: 'READ PRICING ATTRIBS ERROR '
1876: || l_msg_data
1877: );
1878: END LOOP;

Line 2025: fnd_file.put_line

2021: );
2022:
2023: -- Added for fix of bug# 5165947
2024:
2025: fnd_file.put_line
2026: (fnd_file.LOG,
2027: 'l_BOM_instance_flag = '|| l_BOM_instance_flag
2028: );
2029:

Line 2026: (fnd_file.LOG,

2022:
2023: -- Added for fix of bug# 5165947
2024:
2025: fnd_file.put_line
2026: (fnd_file.LOG,
2027: 'l_BOM_instance_flag = '|| l_BOM_instance_flag
2028: );
2029:
2030: IF l_BOM_instance_flag = 'Y' THEN

Line 2033: fnd_file.put_line

2029:
2030: IF l_BOM_instance_flag = 'Y' THEN
2031: l_BOM_instance_id := l_covlvl_id;
2032:
2033: fnd_file.put_line
2034: (fnd_file.LOG,
2035: 'l_BOM_CovLvl_id = '|| TO_CHAR (l_BOM_instance_id)
2036: );
2037:

Line 2034: (fnd_file.LOG,

2030: IF l_BOM_instance_flag = 'Y' THEN
2031: l_BOM_instance_id := l_covlvl_id;
2032:
2033: fnd_file.put_line
2034: (fnd_file.LOG,
2035: 'l_BOM_CovLvl_id = '|| TO_CHAR (l_BOM_instance_id)
2036: );
2037:
2038: END IF;

Line 2043: fnd_file.put_line

2039:
2040: IF l_update_line = 'Y' THEN
2041: l_eff_line_upd_flag := 'Y';
2042:
2043: fnd_file.put_line
2044: (fnd_file.LOG,
2045: 'l_eff_line_upd_flag = '|| l_eff_line_upd_flag
2046: );
2047:

Line 2044: (fnd_file.LOG,

2040: IF l_update_line = 'Y' THEN
2041: l_eff_line_upd_flag := 'Y';
2042:
2043: fnd_file.put_line
2044: (fnd_file.LOG,
2045: 'l_eff_line_upd_flag = '|| l_eff_line_upd_flag
2046: );
2047:
2048: END IF;

Line 2052: fnd_file.put_line

2048: END IF;
2049:
2050: -- Added for fix of bug# 5165947
2051:
2052: fnd_file.put_line
2053: (fnd_file.LOG,
2054: 'OC INTERFACE :- Create K Covd Line Subline ID = '
2055: || TO_CHAR (l_covlvl_id)
2056: );

Line 2053: (fnd_file.LOG,

2049:
2050: -- Added for fix of bug# 5165947
2051:
2052: fnd_file.put_line
2053: (fnd_file.LOG,
2054: 'OC INTERFACE :- Create K Covd Line Subline ID = '
2055: || TO_CHAR (l_covlvl_id)
2056: );
2057: fnd_file.put_line

Line 2057: fnd_file.put_line

2053: (fnd_file.LOG,
2054: 'OC INTERFACE :- Create K Covd Line Subline ID = '
2055: || TO_CHAR (l_covlvl_id)
2056: );
2057: fnd_file.put_line
2058: (fnd_file.LOG,
2059: 'OC INTERFACE :- Create K Covd Line status '
2060: || l_return_status
2061: );

Line 2058: (fnd_file.LOG,

2054: 'OC INTERFACE :- Create K Covd Line Subline ID = '
2055: || TO_CHAR (l_covlvl_id)
2056: );
2057: fnd_file.put_line
2058: (fnd_file.LOG,
2059: 'OC INTERFACE :- Create K Covd Line status '
2060: || l_return_status
2061: );
2062:

Line 2079: fnd_file.put_line

2075: );
2076: l_order_error := l_order_error || l_msg_data || '#';
2077: fnd_message.set_encoded (l_msg_data);
2078: l_msg_data := fnd_message.get;
2079: fnd_file.put_line
2080: (fnd_file.LOG,
2081: 'Create_K_Covered_levels FAILURE '
2082: || l_msg_data
2083: );

Line 2080: (fnd_file.LOG,

2076: l_order_error := l_order_error || l_msg_data || '#';
2077: fnd_message.set_encoded (l_msg_data);
2078: l_msg_data := fnd_message.get;
2079: fnd_file.put_line
2080: (fnd_file.LOG,
2081: 'Create_K_Covered_levels FAILURE '
2082: || l_msg_data
2083: );
2084: END LOOP;

Line 2133: fnd_file.put_line (fnd_file.LOG,

2129: x_msg_data => l_msg_data,
2130: p_insv_rec => l_insthist_rec,
2131: x_insv_rec => x_insthist_rec
2132: );
2133: fnd_file.put_line (fnd_file.LOG,
2134: ' instance history Status : '
2135: || l_return_status
2136: );
2137: x_return_status := l_return_status;

Line 2175: fnd_file.put_line (fnd_file.LOG,

2171: x_msg_data => l_msg_data,
2172: p_ihdv_rec => l_inst_dtls_rec,
2173: x_ihdv_rec => x_inst_dtls_rec
2174: );
2175: fnd_file.put_line (fnd_file.LOG,
2176: ' instance history details Status : '
2177: || l_return_status
2178: );
2179: x_return_status := l_return_status;

Line 2270: fnd_file.put_line (fnd_file.LOG,

2266: p_encoded => 'F',
2267: p_data => l_msg_data,
2268: p_msg_index_out => l_index
2269: );
2270: fnd_file.put_line (fnd_file.LOG,
2271: 'READ PRICING ATTRIBS ERROR '
2272: || l_msg_data
2273: );
2274: END LOOP;

Line 2523: fnd_file.put_line (fnd_file.LOG,

2519:
2520: END IF;
2521: /*Added for CLOUD ER 16039680*/
2522:
2523: fnd_file.put_line (fnd_file.LOG,
2524: 'l_eff_line_upd_flag : '||l_eff_line_upd_flag
2525: );
2526:
2527: IF l_eff_line_upd_flag = 'Y' THEN

Line 2534: fnd_file.put_line (fnd_file.LOG,

2530: open c_line_ammt_ckeck(c_line_id => l_lineid);
2531: fetch c_line_ammt_ckeck into l_prev_line_amt;
2532: close c_line_ammt_ckeck;
2533:
2534: fnd_file.put_line (fnd_file.LOG,
2535: 'l_prev_line_amt : '||to_char(l_prev_line_amt)
2536: );
2537: END IF;
2538:

Line 2734: fnd_file.put_line

2730: p_invoice_rule_id => l_line_rec.invoicing_rule_id,
2731: x_bil_sch_out_tbl => l_bil_sch_out,
2732: x_return_status => l_return_status
2733: );
2734: fnd_file.put_line
2735: (fnd_file.LOG,
2736: 'OKS_BILL_SCH.Create_Bill_Sch_Rules(Return status = '
2737: || l_return_status
2738: || ')'

Line 2735: (fnd_file.LOG,

2731: x_bil_sch_out_tbl => l_bil_sch_out,
2732: x_return_status => l_return_status
2733: );
2734: fnd_file.put_line
2735: (fnd_file.LOG,
2736: 'OKS_BILL_SCH.Create_Bill_Sch_Rules(Return status = '
2737: || l_return_status
2738: || ')'
2739: );

Line 2773: fnd_file.put_line (fnd_file.LOG,

2769: (p_line_id => l_lineid,
2770: p_date_to => l_date_end,
2771: x_return_status => l_return_status
2772: );
2773: fnd_file.put_line (fnd_file.LOG,
2774: 'Create_Contract :- CREATE_BCL_FOR_OM_OKS_BILLING '
2775: || l_return_status
2776: );
2777: ELSIF l_bill_option ='FBOM' THEN

Line 2783: fnd_file.put_line (fnd_file.LOG,

2779: oks_bill_util_pub.create_bcl_for_om
2780: (p_line_id => l_lineid,
2781: x_return_status => l_return_status
2782: );
2783: fnd_file.put_line (fnd_file.LOG,
2784: 'Create_Contract :- CREATE_BCL_FOR_OM '
2785: || l_return_status
2786: );
2787: END IF;/*Added for ER 16039680*/

Line 2811: fnd_file.put_line (fnd_file.LOG,

2807: THEN
2808:
2809: --Added for fix of bug# 5165947
2810:
2811: fnd_file.put_line (fnd_file.LOG,
2812: 'l_eff_line_upd_flag : '||l_eff_line_upd_flag
2813: );
2814:
2815: IF l_eff_line_upd_flag = 'Y' THEN

Line 2822: fnd_file.put_line (fnd_file.LOG,

2818: open c_line_ammt_ckeck(c_line_id => l_lineid);
2819: fetch c_line_ammt_ckeck into l_curr_line_amt;
2820: close c_line_ammt_ckeck;
2821:
2822: fnd_file.put_line (fnd_file.LOG,
2823: 'l_curr_line_amt : '||to_char(l_curr_line_amt)
2824: );
2825:
2826: if nvl(l_curr_line_amt,0) <> nvl(l_prev_line_amt,0) THEN

Line 2829: fnd_file.put_line (fnd_file.LOG,

2825:
2826: if nvl(l_curr_line_amt,0) <> nvl(l_prev_line_amt,0) THEN
2827: l_eff_line_upd_flag := 'Y';
2828:
2829: fnd_file.put_line (fnd_file.LOG,
2830: 'l_eff_line_upd_flag (final) : '||l_eff_line_upd_flag
2831: );
2832:
2833: end if;

Line 2850: fnd_file.put_line (fnd_file.LOG,

2846: x_return_status => l_return_status,
2847: x_msg_count => x_msg_count,
2848: x_msg_data => x_msg_data
2849: );
2850: fnd_file.put_line (fnd_file.LOG,
2851: 'IBNEW :- Update_OM_SLL_Date '
2852: || l_return_status
2853: );
2854:

Line 2882: fnd_file.put_line

2878: x_return_status => l_return_status,
2879: x_msg_count => x_msg_count,
2880: x_msg_data => x_msg_data
2881: );
2882: fnd_file.put_line
2883: (fnd_file.LOG,
2884: 'Create_Contract :- Create_Bill_Sch_CP '
2885: || l_return_status
2886: );

Line 2883: (fnd_file.LOG,

2879: x_msg_count => x_msg_count,
2880: x_msg_data => x_msg_data
2881: );
2882: fnd_file.put_line
2883: (fnd_file.LOG,
2884: 'Create_Contract :- Create_Bill_Sch_CP '
2885: || l_return_status
2886: );
2887:

Line 2918: fnd_file.put_line (fnd_file.LOG,

2914: oks_bill_util_pub.create_bcl_for_om
2915: (p_line_id => l_lineid,
2916: x_return_status => l_return_status
2917: );
2918: fnd_file.put_line (fnd_file.LOG,
2919: 'Create_Contract :- CREATE_BCL_FOR_OM '
2920: || l_return_status
2921: );
2922:

Line 3007: fnd_file.put_line (fnd_file.LOG,

3003: END IF;
3004: IF c_extwar_hdr_amount%ISOPEN THEN
3005: CLOSE c_extwar_hdr_amount;
3006: END IF;
3007: fnd_file.put_line (fnd_file.LOG,
3008: 'Oracle Error Code is -' || TO_CHAR (SQLCODE)
3009: );
3010: fnd_file.put_line (fnd_file.LOG,
3011: 'Oracle Error Message is -'

Line 3010: fnd_file.put_line (fnd_file.LOG,

3006: END IF;
3007: fnd_file.put_line (fnd_file.LOG,
3008: 'Oracle Error Code is -' || TO_CHAR (SQLCODE)
3009: );
3010: fnd_file.put_line (fnd_file.LOG,
3011: 'Oracle Error Message is -'
3012: || SUBSTR (SQLERRM, 1, 512)
3013: );
3014: END create_contract;

Line 3108: fnd_file.put_line (fnd_file.LOG,

3104: l_msg_data VARCHAR2 (2000);
3105: l_repv_rec oks_rep_pvt.repv_rec_type;
3106: l_out_repv_rec oks_rep_pvt.repv_rec_type;
3107: BEGIN
3108: fnd_file.put_line (fnd_file.LOG,
3109: 'Inside procedure Get Order Lines'
3110: );
3111: l_first_order_line := NULL;
3112: l_ptr1 := 0;

Line 3115: --FND_FILE.PUT_LINE (FND_FILE.LOG, ' Okc_context = ' || nvl(okc_context.get_okc_org_id,-999));

3111: l_first_order_line := NULL;
3112: l_ptr1 := 0;
3113:
3114: -- mmadhavi commenting for MOAC
3115: --FND_FILE.PUT_LINE (FND_FILE.LOG, ' Okc_context = ' || nvl(okc_context.get_okc_org_id,-999));
3116: OPEN get_order_lines_csr (p_ord_num);
3117:
3118: LOOP
3119: FETCH get_order_lines_csr

Line 3135: fnd_file.put_line (fnd_file.LOG, 'No duplicate line..');

3131: CLOSE check_duplicate_csr;
3132:
3133: IF (l_exists <> 'x')
3134: THEN
3135: fnd_file.put_line (fnd_file.LOG, 'No duplicate line..');
3136:
3137: /*
3138: Open get_ordlines_dtls_csr(l_ord_line_id);
3139: Fetch get_ordlines_dtls_csr into l_fulfilled_qty,serv_ref_type, serv_ref_id;

Line 3147: fnd_file.put_line (fnd_file.LOG, 'Valid line...');

3143: ('CUSTOMER_PRODUCT', 'ORDER')
3144: AND serv_ref_id IS NOT NULL
3145: )
3146: THEN
3147: fnd_file.put_line (fnd_file.LOG, 'Valid line...');
3148:
3149: IF (p_source_flag = 'ASO')
3150: THEN
3151: IF (l_fulfilled_qty > 0)

Line 3154: fnd_file.put_line (fnd_file.LOG,

3150: THEN
3151: IF (l_fulfilled_qty > 0)
3152: THEN
3153: l_ptr1 := l_ptr1 + 1;
3154: fnd_file.put_line (fnd_file.LOG,
3155: 'From ASO ..Fulfilled..'
3156: );
3157:
3158: IF (l_ptr1 = 1)

Line 3161: fnd_file.put_line (fnd_file.LOG,

3157:
3158: IF (l_ptr1 = 1)
3159: THEN
3160: l_first_order_line := l_ord_line_id;
3161: fnd_file.put_line (fnd_file.LOG,
3162: 'First Order line..'
3163: );
3164: ELSE
3165: fnd_file.put_line (fnd_file.LOG,

Line 3165: fnd_file.put_line (fnd_file.LOG,

3161: fnd_file.put_line (fnd_file.LOG,
3162: 'First Order line..'
3163: );
3164: ELSE
3165: fnd_file.put_line (fnd_file.LOG,
3166: 'More lines ..Inserting..'
3167: );
3168: l_repv_rec.order_id := p_order_id;
3169: l_repv_rec.order_line_id := l_ord_line_id;

Line 3183: fnd_file.put_line (fnd_file.LOG,

3179: x_msg_data => l_msg_data,
3180: p_repv_rec => l_repv_rec,
3181: x_repv_rec => l_out_repv_rec
3182: );
3183: fnd_file.put_line (fnd_file.LOG,
3184: 'Return status = '
3185: || l_return_status
3186: );
3187:

Line 3194: fnd_file.put_line (fnd_file.LOG,

3190: x_return_status := l_return_status;
3191: RAISE g_exception_halt_validation;
3192: END IF;
3193:
3194: fnd_file.put_line (fnd_file.LOG,
3195: 'Insert status = '
3196: || l_return_status
3197: );
3198: x_repv_tbl (l_ptr1).ID := l_out_repv_rec.ID;

Line 3212: fnd_file.put_line (fnd_file.LOG, 'Source = MANUAL');

3208: l_out_repv_rec.order_number;
3209: END IF;
3210: END IF;
3211: ELSE
3212: fnd_file.put_line (fnd_file.LOG, 'Source = MANUAL');
3213: l_ptr1 := l_ptr1 + 1;
3214:
3215: IF (l_ptr1 = 1)
3216: THEN

Line 3218: fnd_file.put_line (fnd_file.LOG,

3214:
3215: IF (l_ptr1 = 1)
3216: THEN
3217: l_first_order_line := l_ord_line_id;
3218: fnd_file.put_line (fnd_file.LOG,
3219: 'First Order Line...'
3220: );
3221: ELSE
3222: fnd_file.put_line (fnd_file.LOG,

Line 3222: fnd_file.put_line (fnd_file.LOG,

3218: fnd_file.put_line (fnd_file.LOG,
3219: 'First Order Line...'
3220: );
3221: ELSE
3222: fnd_file.put_line (fnd_file.LOG,
3223: 'Next Order lines...'
3224: );
3225: l_repv_rec.order_id := p_order_id;
3226: l_repv_rec.order_line_id := l_ord_line_id;

Line 3240: fnd_file.put_line

3236: x_msg_data => l_msg_data,
3237: p_repv_rec => l_repv_rec,
3238: x_repv_rec => l_out_repv_rec
3239: );
3240: fnd_file.put_line
3241: (fnd_file.LOG,
3242: 'oks_rep_pub.insert_row : return status => '
3243: || l_return_status
3244: );

Line 3241: (fnd_file.LOG,

3237: p_repv_rec => l_repv_rec,
3238: x_repv_rec => l_out_repv_rec
3239: );
3240: fnd_file.put_line
3241: (fnd_file.LOG,
3242: 'oks_rep_pub.insert_row : return status => '
3243: || l_return_status
3244: );
3245:

Line 3252: fnd_file.put_line (fnd_file.LOG,

3248: x_return_status := l_return_status;
3249: RAISE g_exception_halt_validation;
3250: END IF;
3251:
3252: fnd_file.put_line (fnd_file.LOG,
3253: 'Insert status ...'
3254: || l_return_status
3255: );
3256: x_repv_tbl (l_ptr1).ID := l_out_repv_rec.ID;

Line 3273: fnd_file.put_line (fnd_file.LOG, 'End of Loop...');

3269: END IF; -- Service line
3270: END IF; -- duplicate line
3271: END LOOP;
3272:
3273: fnd_file.put_line (fnd_file.LOG, 'End of Loop...');
3274:
3275: IF (l_first_order_line IS NOT NULL)
3276: THEN
3277: x_repv_tbl (1).ID := p_id;

Line 3285: fnd_file.put_line (fnd_file.LOG, 'Exiting Get Order lines');

3281: x_repv_tbl (1).source_flag := p_source_flag;
3282: x_repv_tbl (1).order_number := p_ord_num;
3283: END IF;
3284:
3285: fnd_file.put_line (fnd_file.LOG, 'Exiting Get Order lines');
3286: EXCEPTION
3287: WHEN g_exception_halt_validation
3288: THEN
3289: fnd_file.put_line (fnd_file.LOG,

Line 3289: fnd_file.put_line (fnd_file.LOG,

3285: fnd_file.put_line (fnd_file.LOG, 'Exiting Get Order lines');
3286: EXCEPTION
3287: WHEN g_exception_halt_validation
3288: THEN
3289: fnd_file.put_line (fnd_file.LOG,
3290: ' Error in Get_Order_lines : '
3291: || SQLCODE
3292: || ':'
3293: || SQLERRM

Line 3305: fnd_file.put_line (fnd_file.LOG,

3301: );
3302: WHEN OTHERS
3303: THEN
3304: x_return_status := okc_api.g_ret_sts_unexp_error;
3305: fnd_file.put_line (fnd_file.LOG,
3306: ' Error in Get_Order_lines : '
3307: || SQLCODE
3308: || ':'
3309: || SQLERRM

Line 3320: fnd_file.put_line (fnd_file.LOG,

3316: SQLERRM
3317: );
3318: END get_order_lines;
3319: BEGIN
3320: fnd_file.put_line (fnd_file.LOG,
3321: 'Inside procedure Get Order Details'
3322: );
3323: l_source := NVL (p_source, 'Auto');
3324:

Line 3438: fnd_file.put_line (fnd_file.LOG, 'Choice - Submitted');

3434: END IF;
3435: END LOOP;
3436: END IF;
3437: ELSE
3438: fnd_file.put_line (fnd_file.LOG, 'Choice - Submitted');
3439: l_ptr := 0;
3440:
3441: FOR l_ordline_rec IN l_order_line_sub_csr
3442: LOOP

Line 3447: fnd_file.put_line (fnd_file.LOG,

3443: l_ptr := l_ptr + 1;
3444:
3445: IF (l_ordline_rec.order_line_id IS NULL)
3446: THEN
3447: fnd_file.put_line (fnd_file.LOG,
3448: 'Calling get_order_lines...'
3449: );
3450: get_order_lines
3451: (p_id => l_ordline_rec.ID,

Line 3497: fnd_file.put_line (fnd_file.LOG, 'Exiting Get Order Details');

3493: END LOOP;
3494: END IF;
3495:
3496: x_return_status := l_return_status;
3497: fnd_file.put_line (fnd_file.LOG, 'Exiting Get Order Details');
3498: EXCEPTION
3499: WHEN g_exception_halt_validation
3500: THEN
3501: fnd_file.put_line (fnd_file.LOG,

Line 3501: fnd_file.put_line (fnd_file.LOG,

3497: fnd_file.put_line (fnd_file.LOG, 'Exiting Get Order Details');
3498: EXCEPTION
3499: WHEN g_exception_halt_validation
3500: THEN
3501: fnd_file.put_line (fnd_file.LOG,
3502: ' Error in Get_Order_details : '
3503: || SQLCODE
3504: || ':'
3505: || SQLERRM

Line 3517: fnd_file.put_line (fnd_file.LOG,

3513: );
3514: WHEN OTHERS
3515: THEN
3516: x_return_status := okc_api.g_ret_sts_unexp_error;
3517: fnd_file.put_line (fnd_file.LOG,
3518: ' Error in Get_Order_Details : '
3519: || SQLCODE
3520: || ':'
3521: || SQLERRM

Line 3535: fnd_file.put_line (fnd_file.LOG, 'conc_prog_id = ' || l_prog_id);

3531: BEGIN
3532: --Okc_context.set_okc_org_context (l_order_rec.org_id, NULL ); --mmadhavi commenting for MOAC
3533: l_prog_id := fnd_global.conc_program_id;
3534: l_req_id := fnd_global.conc_request_id;
3535: fnd_file.put_line (fnd_file.LOG, 'conc_prog_id = ' || l_prog_id);
3536: fnd_file.put_line (fnd_file.LOG, 'conc_req_id = ' || l_req_id);
3537: fnd_file.put_line (fnd_file.LOG, 'Source = ' || NVL (p_source, 'Auto'));
3538: SAVEPOINT oks_reprocessing;
3539: fnd_file.put_line (fnd_file.LOG, 'Start of Reprocessing.....');

Line 3536: fnd_file.put_line (fnd_file.LOG, 'conc_req_id = ' || l_req_id);

3532: --Okc_context.set_okc_org_context (l_order_rec.org_id, NULL ); --mmadhavi commenting for MOAC
3533: l_prog_id := fnd_global.conc_program_id;
3534: l_req_id := fnd_global.conc_request_id;
3535: fnd_file.put_line (fnd_file.LOG, 'conc_prog_id = ' || l_prog_id);
3536: fnd_file.put_line (fnd_file.LOG, 'conc_req_id = ' || l_req_id);
3537: fnd_file.put_line (fnd_file.LOG, 'Source = ' || NVL (p_source, 'Auto'));
3538: SAVEPOINT oks_reprocessing;
3539: fnd_file.put_line (fnd_file.LOG, 'Start of Reprocessing.....');
3540: fnd_file.put_line (fnd_file.LOG,

Line 3537: fnd_file.put_line (fnd_file.LOG, 'Source = ' || NVL (p_source, 'Auto'));

3533: l_prog_id := fnd_global.conc_program_id;
3534: l_req_id := fnd_global.conc_request_id;
3535: fnd_file.put_line (fnd_file.LOG, 'conc_prog_id = ' || l_prog_id);
3536: fnd_file.put_line (fnd_file.LOG, 'conc_req_id = ' || l_req_id);
3537: fnd_file.put_line (fnd_file.LOG, 'Source = ' || NVL (p_source, 'Auto'));
3538: SAVEPOINT oks_reprocessing;
3539: fnd_file.put_line (fnd_file.LOG, 'Start of Reprocessing.....');
3540: fnd_file.put_line (fnd_file.LOG,
3541: 'The parameter value is ..' || p_option

Line 3539: fnd_file.put_line (fnd_file.LOG, 'Start of Reprocessing.....');

3535: fnd_file.put_line (fnd_file.LOG, 'conc_prog_id = ' || l_prog_id);
3536: fnd_file.put_line (fnd_file.LOG, 'conc_req_id = ' || l_req_id);
3537: fnd_file.put_line (fnd_file.LOG, 'Source = ' || NVL (p_source, 'Auto'));
3538: SAVEPOINT oks_reprocessing;
3539: fnd_file.put_line (fnd_file.LOG, 'Start of Reprocessing.....');
3540: fnd_file.put_line (fnd_file.LOG,
3541: 'The parameter value is ..' || p_option
3542: );
3543: fnd_file.put_line (fnd_file.LOG, 'Calling Get Order Details....');

Line 3540: fnd_file.put_line (fnd_file.LOG,

3536: fnd_file.put_line (fnd_file.LOG, 'conc_req_id = ' || l_req_id);
3537: fnd_file.put_line (fnd_file.LOG, 'Source = ' || NVL (p_source, 'Auto'));
3538: SAVEPOINT oks_reprocessing;
3539: fnd_file.put_line (fnd_file.LOG, 'Start of Reprocessing.....');
3540: fnd_file.put_line (fnd_file.LOG,
3541: 'The parameter value is ..' || p_option
3542: );
3543: fnd_file.put_line (fnd_file.LOG, 'Calling Get Order Details....');
3544: get_order_details (p_option => p_option,

Line 3543: fnd_file.put_line (fnd_file.LOG, 'Calling Get Order Details....');

3539: fnd_file.put_line (fnd_file.LOG, 'Start of Reprocessing.....');
3540: fnd_file.put_line (fnd_file.LOG,
3541: 'The parameter value is ..' || p_option
3542: );
3543: fnd_file.put_line (fnd_file.LOG, 'Calling Get Order Details....');
3544: get_order_details (p_option => p_option,
3545: p_source => p_source,
3546: x_return_status => l_return_status,
3547: x_repv_tbl => l_repv_tbl

Line 3549: fnd_file.put_line (fnd_file.LOG,

3545: p_source => p_source,
3546: x_return_status => l_return_status,
3547: x_repv_tbl => l_repv_tbl
3548: );
3549: fnd_file.put_line (fnd_file.LOG,
3550: 'Get Order Details : l_return_status = '
3551: || l_return_status
3552: );
3553: l_line_count := l_repv_tbl.COUNT;

Line 3557: fnd_file.put_line (fnd_file.LOG, 'No lines to Reprocess..');

3553: l_line_count := l_repv_tbl.COUNT;
3554:
3555: IF (l_line_count <= 0)
3556: THEN
3557: fnd_file.put_line (fnd_file.LOG, 'No lines to Reprocess..');
3558: ELSE
3559: fnd_file.put_line (fnd_file.LOG,
3560: 'ReProcessing Order Lines... Line count = '
3561: || l_line_count

Line 3559: fnd_file.put_line (fnd_file.LOG,

3555: IF (l_line_count <= 0)
3556: THEN
3557: fnd_file.put_line (fnd_file.LOG, 'No lines to Reprocess..');
3558: ELSE
3559: fnd_file.put_line (fnd_file.LOG,
3560: 'ReProcessing Order Lines... Line count = '
3561: || l_line_count
3562: );
3563:

Line 3624: fnd_file.put_line (fnd_file.LOG,

3620: l_upd_tbl.DELETE;
3621: l_conc_rec.conc_request_id := l_req_id;
3622: l_conc_rec.order_line_id := l_repv_tbl (l_count).order_line_id;
3623: l_conc_rec.ID := l_repv_tbl (l_count).ID;
3624: fnd_file.put_line (fnd_file.LOG,
3625: 'Updating record with Conc req id'
3626: );
3627: handle_order_error (x_return_status => l_return_status,
3628: p_upd_rec => l_conc_rec

Line 3630: fnd_file.put_line (fnd_file.LOG,

3626: );
3627: handle_order_error (x_return_status => l_return_status,
3628: p_upd_rec => l_conc_rec
3629: );
3630: fnd_file.put_line (fnd_file.LOG,
3631: 'l_return_status = ' || l_return_status
3632: );
3633:
3634: IF NOT (l_return_status = fnd_api.g_ret_sts_success)

Line 3651: fnd_file.put_line (fnd_file.LOG, 'l_order_csr not found ');

3647: INTO l_order_rec;
3648:
3649: IF l_order_csr%NOTFOUND
3650: THEN
3651: fnd_file.put_line (fnd_file.LOG, 'l_order_csr not found ');
3652: l_order_rec.fqty := 0;
3653: END IF;
3654:
3655: CLOSE l_order_csr;

Line 3659: --FND_FILE.PUT_LINE (FND_FILE.LOG, 'success_flag = '||NVL(l_repv_tbl(l_count).success_flag,'S'));

3655: CLOSE l_order_csr;
3656:
3657: okc_context.set_okc_org_context (l_order_rec.org_id, NULL);
3658:
3659: --FND_FILE.PUT_LINE (FND_FILE.LOG, 'success_flag = '||NVL(l_repv_tbl(l_count).success_flag,'S'));
3660: IF (NVL (l_repv_tbl (l_count).source_flag, 'S') = 'MANUAL')
3661: THEN
3662: fnd_file.put_line (fnd_file.LOG,
3663: 'Order line entered from Reprocesing UI'

Line 3662: fnd_file.put_line (fnd_file.LOG,

3658:
3659: --FND_FILE.PUT_LINE (FND_FILE.LOG, 'success_flag = '||NVL(l_repv_tbl(l_count).success_flag,'S'));
3660: IF (NVL (l_repv_tbl (l_count).source_flag, 'S') = 'MANUAL')
3661: THEN
3662: fnd_file.put_line (fnd_file.LOG,
3663: 'Order line entered from Reprocesing UI'
3664: );
3665:
3666: IF (l_order_rec.fqty <= 0)

Line 3668: fnd_file.put_line (fnd_file.LOG,

3664: );
3665:
3666: IF (l_order_rec.fqty <= 0)
3667: THEN
3668: fnd_file.put_line (fnd_file.LOG,
3669: 'Order line '
3670: || l_repv_tbl (l_count).order_line_id
3671: || ' not fulfilled'
3672: );

Line 3705: fnd_file.put_line (fnd_file.LOG, 'Order line fulfilled..');

3701: END IF;
3702:
3703: IF (l_fulfill <> 'N')
3704: THEN
3705: fnd_file.put_line (fnd_file.LOG, 'Order line fulfilled..');
3706:
3707: OPEN l_serv_ref_csr (l_repv_tbl (l_count).order_line_id);
3708:
3709: FETCH l_serv_ref_csr

Line 3714: fnd_file.put_line (fnd_file.LOG,

3710: INTO l_serv_ref_rec;
3711:
3712: CLOSE l_serv_ref_csr;
3713:
3714: fnd_file.put_line (fnd_file.LOG,
3715: 'Processing Order Line '
3716: || l_repv_tbl (l_count).order_line_id
3717: );
3718: fnd_file.put_line (fnd_file.LOG,

Line 3718: fnd_file.put_line (fnd_file.LOG,

3714: fnd_file.put_line (fnd_file.LOG,
3715: 'Processing Order Line '
3716: || l_repv_tbl (l_count).order_line_id
3717: );
3718: fnd_file.put_line (fnd_file.LOG,
3719: 'Service Ref Type Code '
3720: || l_serv_ref_rec.service_reference_type_code
3721: );
3722: fnd_file.put_line (fnd_file.LOG,

Line 3722: fnd_file.put_line (fnd_file.LOG,

3718: fnd_file.put_line (fnd_file.LOG,
3719: 'Service Ref Type Code '
3720: || l_serv_ref_rec.service_reference_type_code
3721: );
3722: fnd_file.put_line (fnd_file.LOG,
3723: 'Service line Id '
3724: || l_serv_ref_rec.service_reference_line_id
3725: );
3726: --FND_FILE.PUT_LINE (FND_FILE.LOG, 'Profile option value ' || Fnd_Profile.Value('OKS_CONTRACTS_VALIDATION_SOURCE') );

Line 3726: --FND_FILE.PUT_LINE (FND_FILE.LOG, 'Profile option value ' || Fnd_Profile.Value('OKS_CONTRACTS_VALIDATION_SOURCE') );

3722: fnd_file.put_line (fnd_file.LOG,
3723: 'Service line Id '
3724: || l_serv_ref_rec.service_reference_line_id
3725: );
3726: --FND_FILE.PUT_LINE (FND_FILE.LOG, 'Profile option value ' || Fnd_Profile.Value('OKS_CONTRACTS_VALIDATION_SOURCE') );
3727:
3728: /*
3729: If Fnd_Profile.Value('OKS_CONTRACTS_VALIDATION_SOURCE') IN ('IB', 'MO') OR
3730: Fnd_Profile.Value('OKS_CONTRACTS_VALIDATION_SOURCE') Is NULL Then

Line 3770: fnd_file.put_line (fnd_file.LOG, 'ORDER : L_ORDER_CSR ');

3766: END IF;
3767:
3768: CLOSE l_order_csr;
3769:
3770: fnd_file.put_line (fnd_file.LOG, 'ORDER : L_ORDER_CSR ');
3771:
3772: IF l_order_rec.header_id = l_ref_order_rec.header_id
3773: THEN -----ORDER HEADER ID EQLS
3774: fnd_file.put_line

Line 3774: fnd_file.put_line

3770: fnd_file.put_line (fnd_file.LOG, 'ORDER : L_ORDER_CSR ');
3771:
3772: IF l_order_rec.header_id = l_ref_order_rec.header_id
3773: THEN -----ORDER HEADER ID EQLS
3774: fnd_file.put_line
3775: (fnd_file.LOG,
3776: 'ORDER HEADER ID EQLS : L_PROCESS TRUE '
3777: );
3778: l_process := TRUE;

Line 3775: (fnd_file.LOG,

3771:
3772: IF l_order_rec.header_id = l_ref_order_rec.header_id
3773: THEN -----ORDER HEADER ID EQLS
3774: fnd_file.put_line
3775: (fnd_file.LOG,
3776: 'ORDER HEADER ID EQLS : L_PROCESS TRUE '
3777: );
3778: l_process := TRUE;
3779: l_cp_ctr := 1;

Line 3786: fnd_file.put_line (fnd_file.LOG,

3782: FOR rec IN
3783: l_custprod_csr
3784: (l_serv_ref_rec.service_reference_line_id, okc_context.get_okc_organization_id)
3785: LOOP
3786: fnd_file.put_line (fnd_file.LOG,
3787: 'L_CP_TBL CP ID '
3788: || rec.cp_id
3789: || ' Cnt '
3790: || l_cp_ctr

Line 3802: fnd_file.put_line

3798: l_process := FALSE;
3799: END IF;
3800: ELSE
3801: l_process := TRUE;
3802: fnd_file.put_line
3803: (fnd_file.LOG,
3804: 'ORDER HEADER ID NOT EQLS : L_CUSTPROD '
3805: );
3806: l_cp_ctr := 1;

Line 3803: (fnd_file.LOG,

3799: END IF;
3800: ELSE
3801: l_process := TRUE;
3802: fnd_file.put_line
3803: (fnd_file.LOG,
3804: 'ORDER HEADER ID NOT EQLS : L_CUSTPROD '
3805: );
3806: l_cp_ctr := 1;
3807:

Line 3813: fnd_file.put_line (fnd_file.LOG,

3809: FOR rec IN
3810: l_custprod_csr
3811: (l_serv_ref_rec.service_reference_line_id, okc_context.get_okc_organization_id)
3812: LOOP
3813: fnd_file.put_line (fnd_file.LOG,
3814: 'L_CP_TBL CP ID '
3815: || rec.cp_id
3816: || ' Cnt '
3817: || l_cp_ctr

Line 3829: fnd_file.put_line (fnd_file.LOG, 'ElSE L_PROCESS TRUE ');

3825: l_process := FALSE;
3826: END IF;
3827: END IF; -----ORDER HEADER ID EQLS
3828: ELSE ------REF TYPE CUST PROD
3829: fnd_file.put_line (fnd_file.LOG, 'ElSE L_PROCESS TRUE ');
3830: l_cp_tbl (1).cp_id :=
3831: l_serv_ref_rec.service_reference_line_id;
3832: l_process := TRUE;
3833: END IF; ------REF TYPE ORDER

Line 3849: fnd_file.put_line (fnd_file.LOG, 'Cannot process line ...');

3845:
3846: */
3847: IF NOT l_process
3848: THEN
3849: fnd_file.put_line (fnd_file.LOG, 'Cannot process line ...');
3850: l_upd_tbl (1).ID := l_repv_tbl (l_count).ID;
3851: l_upd_tbl (1).ERROR_TEXT := '#';
3852: fnd_message.set_name ('OKS', 'OKS_REQUEST');
3853: fnd_message.set_token (token => 'ID', VALUE => l_req_id);

Line 3889: --FND_FILE.PUT_LINE (FND_FILE.LOG, 'cov_id = '||l_upd_tbl(l_ctr1).subline_id);

3885: FETCH l_contract_csr
3886: INTO l_upd_tbl (l_ctr1).subline_id,
3887: l_upd_tbl (l_ctr1).contract_id;
3888:
3889: --FND_FILE.PUT_LINE (FND_FILE.LOG, 'cov_id = '||l_upd_tbl(l_ctr1).subline_id);
3890: EXIT WHEN l_contract_csr%NOTFOUND;
3891: END LOOP;
3892:
3893: CLOSE l_contract_csr;

Line 3895: fnd_file.put_line (fnd_file.LOG, 'l_ctr1 = ' || l_ctr1);

3891: END LOOP;
3892:
3893: CLOSE l_contract_csr;
3894:
3895: fnd_file.put_line (fnd_file.LOG, 'l_ctr1 = ' || l_ctr1);
3896: fnd_file.put_line (fnd_file.LOG,
3897: 'DUPLICATE CHECK l_K_LINE_ID '
3898: || NVL (l_upd_tbl (1).subline_id, -12345)
3899: );

Line 3896: fnd_file.put_line (fnd_file.LOG,

3892:
3893: CLOSE l_contract_csr;
3894:
3895: fnd_file.put_line (fnd_file.LOG, 'l_ctr1 = ' || l_ctr1);
3896: fnd_file.put_line (fnd_file.LOG,
3897: 'DUPLICATE CHECK l_K_LINE_ID '
3898: || NVL (l_upd_tbl (1).subline_id, -12345)
3899: );
3900:

Line 3909: fnd_file.put_line (fnd_file.LOG,

3905: create_contract (p_reproc_line_rec => l_reproc_line_rec,
3906: x_upd_tbl => l_upd_tbl,
3907: x_return_status => l_return_status
3908: );
3909: fnd_file.put_line (fnd_file.LOG,
3910: 'Create_Contract status ::'
3911: || l_return_status
3912: );
3913:

Line 3928: fnd_file.put_line (fnd_file.LOG,

3924: );
3925: l_error_msg := l_error_msg || l_msg_data || '#';
3926: fnd_message.set_encoded (l_msg_data);
3927: l_msg_data := fnd_message.get;
3928: fnd_file.put_line (fnd_file.LOG,
3929: 'GET ORDER LINE FAILURE '
3930: || l_msg_data
3931: );
3932: END LOOP;

Line 4083: fnd_file.put_line (fnd_file.LOG,

4079: p_repv_rec => l_upd_tbl
4080: (i),
4081: x_repv_rec => l_out_repv_rec
4082: );
4083: fnd_file.put_line (fnd_file.LOG,
4084: 'L_return_status :'
4085: || l_return_status
4086: );
4087:

Line 4098: fnd_file.put_line

4094: p_encoded => 'F',
4095: p_data => l_msg_data,
4096: p_msg_index_out => l_index
4097: );
4098: fnd_file.put_line
4099: (fnd_file.LOG,
4100: 'ORDER_REPROCESS.Insert_row'
4101: || l_msg_data
4102: );

Line 4099: (fnd_file.LOG,

4095: p_data => l_msg_data,
4096: p_msg_index_out => l_index
4097: );
4098: fnd_file.put_line
4099: (fnd_file.LOG,
4100: 'ORDER_REPROCESS.Insert_row'
4101: || l_msg_data
4102: );
4103: END LOOP;

Line 4142: --FND_FILE.PUT_LINE (FND_FILE.LOG, 'l_ctr1 = '||l_ctr1);

4138: THEN
4139: RAISE g_exception_halt_validation;
4140: END IF;
4141:
4142: --FND_FILE.PUT_LINE (FND_FILE.LOG, 'l_ctr1 = '||l_ctr1);
4143: IF (l_ctr1 > 1)
4144: THEN
4145: FOR i IN 2 .. l_ctr1
4146: LOOP

Line 4182: fnd_file.put_line (fnd_file.LOG,

4178: p_repv_rec => l_upd_tbl
4179: (i),
4180: x_repv_rec => l_out_repv_rec
4181: );
4182: fnd_file.put_line (fnd_file.LOG,
4183: 'L_return_status :'
4184: || l_return_status
4185: );
4186:

Line 4197: fnd_file.put_line

4193: p_encoded => 'F',
4194: p_data => l_msg_data,
4195: p_msg_index_out => l_index
4196: );
4197: fnd_file.put_line
4198: (fnd_file.LOG,
4199: 'ORDER_REPROCESS.Insert_row'
4200: || l_msg_data
4201: );

Line 4198: (fnd_file.LOG,

4194: p_data => l_msg_data,
4195: p_msg_index_out => l_index
4196: );
4197: fnd_file.put_line
4198: (fnd_file.LOG,
4199: 'ORDER_REPROCESS.Insert_row'
4200: || l_msg_data
4201: );
4202: END LOOP;

Line 4268: fnd_file.put_line

4264: EXCEPTION
4265: WHEN g_exception_halt_validation
4266: THEN
4267: x_return_status := l_return_status;
4268: fnd_file.put_line
4269: (fnd_file.LOG,
4270: ' Error in Order Reprocess - l_return_status = '
4271: || l_return_status
4272: );

Line 4269: (fnd_file.LOG,

4265: WHEN g_exception_halt_validation
4266: THEN
4267: x_return_status := l_return_status;
4268: fnd_file.put_line
4269: (fnd_file.LOG,
4270: ' Error in Order Reprocess - l_return_status = '
4271: || l_return_status
4272: );
4273: WHEN OTHERS

Line 4275: fnd_file.put_line (fnd_file.LOG,

4271: || l_return_status
4272: );
4273: WHEN OTHERS
4274: THEN
4275: fnd_file.put_line (fnd_file.LOG,
4276: 'In OTHERS Exception of Order_Reprocess'
4277: );
4278: x_return_status := okc_api.g_ret_sts_unexp_error;
4279: fnd_file.put_line (fnd_file.LOG,

Line 4279: fnd_file.put_line (fnd_file.LOG,

4275: fnd_file.put_line (fnd_file.LOG,
4276: 'In OTHERS Exception of Order_Reprocess'
4277: );
4278: x_return_status := okc_api.g_ret_sts_unexp_error;
4279: fnd_file.put_line (fnd_file.LOG,
4280: ' Error in Order Reprocess : '
4281: || SQLCODE
4282: || ':'
4283: || SQLERRM

Line 4328: fnd_file.put_line (fnd_file.LOG, 'Inside procedure Get Order lines');

4324: l_return_status VARCHAR2 (1) := okc_api.g_ret_sts_success;
4325: l_ordline_rec oks_rep_pvt.repv_rec_type;
4326: l_ptr NUMBER;
4327: BEGIN
4328: fnd_file.put_line (fnd_file.LOG, 'Inside procedure Get Order lines');
4329: l_ptr := 0;
4330:
4331: FOR l_ordline_rec IN l_order_line_csr
4332: LOOP

Line 4339: fnd_file.put_line (fnd_file.LOG, 'Exiting Get Order Details');

4335: --X_Repv_tbl(l_ptr).order_line_id := l_ordline_rec.order_line_id;
4336: END LOOP;
4337:
4338: x_return_status := l_return_status;
4339: fnd_file.put_line (fnd_file.LOG, 'Exiting Get Order Details');
4340: EXCEPTION
4341: WHEN OTHERS
4342: THEN
4343: x_return_status := okc_api.g_ret_sts_unexp_error;

Line 4344: fnd_file.put_line (fnd_file.LOG,

4340: EXCEPTION
4341: WHEN OTHERS
4342: THEN
4343: x_return_status := okc_api.g_ret_sts_unexp_error;
4344: fnd_file.put_line (fnd_file.LOG,
4345: ' Error in Get_Order_Details : '
4346: || SQLCODE
4347: || ':'
4348: || SQLERRM

Line 4359: fnd_file.put_line (fnd_file.LOG, 'Start of OKS_ORDER_PURGE_PVT...');

4355: SQLERRM
4356: );
4357: END get_order_lines;
4358: BEGIN
4359: fnd_file.put_line (fnd_file.LOG, 'Start of OKS_ORDER_PURGE_PVT...');
4360: l_user_id := fnd_global.user_id;
4361: fnd_file.put_line (fnd_file.LOG, 'User Id : ' || TO_CHAR (l_user_id));
4362: get_order_lines (x_return_status => l_return_status,
4363: x_msg_count => l_msg_count,

Line 4361: fnd_file.put_line (fnd_file.LOG, 'User Id : ' || TO_CHAR (l_user_id));

4357: END get_order_lines;
4358: BEGIN
4359: fnd_file.put_line (fnd_file.LOG, 'Start of OKS_ORDER_PURGE_PVT...');
4360: l_user_id := fnd_global.user_id;
4361: fnd_file.put_line (fnd_file.LOG, 'User Id : ' || TO_CHAR (l_user_id));
4362: get_order_lines (x_return_status => l_return_status,
4363: x_msg_count => l_msg_count,
4364: x_msg_data => l_msg_data,
4365: x_repv_tbl => l_repv_tbl

Line 4367: fnd_file.put_line (fnd_file.LOG,

4363: x_msg_count => l_msg_count,
4364: x_msg_data => l_msg_data,
4365: x_repv_tbl => l_repv_tbl
4366: );
4367: fnd_file.put_line (fnd_file.LOG,
4368: 'Get Order Lines: l_return_status = '
4369: || l_return_status
4370: );
4371:

Line 4381: fnd_file.put_line (fnd_file.LOG,

4377: p_encoded => 'F',
4378: p_data => l_msg_data,
4379: p_msg_index_out => l_index
4380: );
4381: fnd_file.put_line (fnd_file.LOG,
4382: 'GET ORDER LINES: ' || l_msg_data);
4383: END LOOP;
4384:
4385: RAISE g_exception_halt_validation;

Line 4392: fnd_file.put_line (fnd_file.LOG, 'No lines to Purge..');

4388: l_line_count := l_repv_tbl.COUNT;
4389:
4390: IF (l_line_count <= 0)
4391: THEN
4392: fnd_file.put_line (fnd_file.LOG, 'No lines to Purge..');
4393: ELSE
4394: fnd_file.put_line (fnd_file.LOG,
4395: 'Purging Order Lines... Line count = '
4396: || l_line_count

Line 4394: fnd_file.put_line (fnd_file.LOG,

4390: IF (l_line_count <= 0)
4391: THEN
4392: fnd_file.put_line (fnd_file.LOG, 'No lines to Purge..');
4393: ELSE
4394: fnd_file.put_line (fnd_file.LOG,
4395: 'Purging Order Lines... Line count = '
4396: || l_line_count
4397: );
4398:

Line 4421: fnd_file.put_line (fnd_file.LOG,

4417: ROLLBACK;
4418: -- Retrieve error message into errbuf
4419: errbuf := SQLERRM;
4420: retcode := 2;
4421: fnd_file.put_line (fnd_file.LOG,
4422: 'Oracle Error Code is -' || TO_CHAR (SQLCODE)
4423: );
4424: fnd_file.put_line (fnd_file.LOG,
4425: 'Oracle Error Message is -'

Line 4424: fnd_file.put_line (fnd_file.LOG,

4420: retcode := 2;
4421: fnd_file.put_line (fnd_file.LOG,
4422: 'Oracle Error Code is -' || TO_CHAR (SQLCODE)
4423: );
4424: fnd_file.put_line (fnd_file.LOG,
4425: 'Oracle Error Message is -'
4426: || SUBSTR (SQLERRM, 1, 512)
4427: );
4428: END oks_order_purge;

Line 4534: fnd_file.put_line (fnd_file.LOG, 'Start of OC_interface...');

4530: aso_handle_exception EXCEPTION;
4531: aso_handle_normal EXCEPTION;
4532: BEGIN
4533: SAVEPOINT oks_migrate_aso_queue;
4534: fnd_file.put_line (fnd_file.LOG, 'Start of OC_interface...');
4535: l_user_id := fnd_global.user_id;
4536: fnd_file.put_line (fnd_file.LOG, 'User Id : ' || TO_CHAR (l_user_id));
4537: -- Set policy context to ALL
4538: mo_global.set_policy_context ('B', NULL);

Line 4536: fnd_file.put_line (fnd_file.LOG, 'User Id : ' || TO_CHAR (l_user_id));

4532: BEGIN
4533: SAVEPOINT oks_migrate_aso_queue;
4534: fnd_file.put_line (fnd_file.LOG, 'Start of OC_interface...');
4535: l_user_id := fnd_global.user_id;
4536: fnd_file.put_line (fnd_file.LOG, 'User Id : ' || TO_CHAR (l_user_id));
4537: -- Set policy context to ALL
4538: mo_global.set_policy_context ('B', NULL);
4539:
4540: LOOP

Line 4591: fnd_file.put_line (fnd_file.LOG, l_msg_data);

4587: p_encoded => 'F',
4588: p_data => l_msg_data,
4589: p_msg_index_out => l_index
4590: );
4591: fnd_file.put_line (fnd_file.LOG, l_msg_data);
4592: END LOOP;
4593:
4594: ROLLBACK TO oks_migrate_aso_queue;
4595: RETURN;

Line 4599: fnd_file.put_line (fnd_file.LOG,

4595: RETURN;
4596: END IF;
4597:
4598: l_newline_count := l_line_tbl.COUNT;
4599: fnd_file.put_line (fnd_file.LOG,
4600: 'Lines to process = ' || l_newline_count
4601: );
4602: EXIT WHEN l_no_more_messages = fnd_api.g_true;
4603:

Line 4606: fnd_file.put_line (fnd_file.LOG, 'No lines to insert');

4602: EXIT WHEN l_no_more_messages = fnd_api.g_true;
4603:
4604: IF l_newline_count <= 0
4605: THEN --Order Line Record Found
4606: fnd_file.put_line (fnd_file.LOG, 'No lines to insert');
4607: ELSE
4608: fnd_file.put_line (fnd_file.LOG,
4609: 'Processing the order lines... line count='
4610: || TO_CHAR (l_newline_count)

Line 4608: fnd_file.put_line (fnd_file.LOG,

4604: IF l_newline_count <= 0
4605: THEN --Order Line Record Found
4606: fnd_file.put_line (fnd_file.LOG, 'No lines to insert');
4607: ELSE
4608: fnd_file.put_line (fnd_file.LOG,
4609: 'Processing the order lines... line count='
4610: || TO_CHAR (l_newline_count)
4611: );
4612:

Line 4616: fnd_file.put_line (fnd_file.LOG,

4612:
4613: FOR l_count IN 1 .. l_newline_count
4614: LOOP
4615: l_exists := 'y';
4616: fnd_file.put_line (fnd_file.LOG,
4617: 'Processing Order Line '
4618: || l_line_tbl (l_count).line_id
4619: );
4620: fnd_file.put_line

Line 4620: fnd_file.put_line

4616: fnd_file.put_line (fnd_file.LOG,
4617: 'Processing Order Line '
4618: || l_line_tbl (l_count).line_id
4619: );
4620: fnd_file.put_line
4621: (fnd_file.LOG,
4622: 'Service Ref Type Code '
4623: || l_line_tbl (l_count).service_reference_type_code
4624: );

Line 4621: (fnd_file.LOG,

4617: 'Processing Order Line '
4618: || l_line_tbl (l_count).line_id
4619: );
4620: fnd_file.put_line
4621: (fnd_file.LOG,
4622: 'Service Ref Type Code '
4623: || l_line_tbl (l_count).service_reference_type_code
4624: );
4625: fnd_file.put_line

Line 4625: fnd_file.put_line

4621: (fnd_file.LOG,
4622: 'Service Ref Type Code '
4623: || l_line_tbl (l_count).service_reference_type_code
4624: );
4625: fnd_file.put_line
4626: (fnd_file.LOG,
4627: 'Service line Id '
4628: || l_line_tbl (l_count).service_reference_line_id
4629: );

Line 4626: (fnd_file.LOG,

4622: 'Service Ref Type Code '
4623: || l_line_tbl (l_count).service_reference_type_code
4624: );
4625: fnd_file.put_line
4626: (fnd_file.LOG,
4627: 'Service line Id '
4628: || l_line_tbl (l_count).service_reference_line_id
4629: );
4630: fnd_file.put_line

Line 4630: fnd_file.put_line

4626: (fnd_file.LOG,
4627: 'Service line Id '
4628: || l_line_tbl (l_count).service_reference_line_id
4629: );
4630: fnd_file.put_line
4631: (fnd_file.LOG,
4632: 'Profile option value '
4633: || fnd_profile.VALUE
4634: ('OKS_CONTRACTS_VALIDATION_SOURCE')

Line 4631: (fnd_file.LOG,

4627: 'Service line Id '
4628: || l_line_tbl (l_count).service_reference_line_id
4629: );
4630: fnd_file.put_line
4631: (fnd_file.LOG,
4632: 'Profile option value '
4633: || fnd_profile.VALUE
4634: ('OKS_CONTRACTS_VALIDATION_SOURCE')
4635: );

Line 4652: fnd_file.put_line (fnd_file.LOG,

4648:
4649: --Check Delayed Service
4650: IF (l_exists <> 'x')
4651: THEN
4652: fnd_file.put_line (fnd_file.LOG,
4653: 'Order line not present already...'
4654: );
4655:
4656: IF NVL (l_line_tbl (l_count).service_reference_type_code,

Line 4678: fnd_file.put_line (fnd_file.LOG,

4674: END IF;
4675:
4676: CLOSE l_order_csr;
4677:
4678: fnd_file.put_line (fnd_file.LOG,
4679: 'Fulfillment Quantity '
4680: || l_order_rec.fqty
4681: );
4682: fnd_file.put_line (fnd_file.LOG,

Line 4682: fnd_file.put_line (fnd_file.LOG,

4678: fnd_file.put_line (fnd_file.LOG,
4679: 'Fulfillment Quantity '
4680: || l_order_rec.fqty
4681: );
4682: fnd_file.put_line (fnd_file.LOG,
4683: 'Order Org Id '
4684: || l_order_rec.org_id
4685: );
4686: fnd_file.put_line (fnd_file.LOG,

Line 4686: fnd_file.put_line (fnd_file.LOG,

4682: fnd_file.put_line (fnd_file.LOG,
4683: 'Order Org Id '
4684: || l_order_rec.org_id
4685: );
4686: fnd_file.put_line (fnd_file.LOG,
4687: 'Order Organization Id '
4688: || l_order_rec.ship_from_org_id
4689: );
4690: fnd_file.put_line (fnd_file.LOG,

Line 4690: fnd_file.put_line (fnd_file.LOG,

4686: fnd_file.put_line (fnd_file.LOG,
4687: 'Order Organization Id '
4688: || l_order_rec.ship_from_org_id
4689: );
4690: fnd_file.put_line (fnd_file.LOG,
4691: 'Sold from Org Id '
4692: || l_order_rec.sold_from_org_id
4693: );
4694: okc_context.set_okc_org_context (l_order_rec.org_id,

Line 4696: fnd_file.put_line (fnd_file.LOG,

4692: || l_order_rec.sold_from_org_id
4693: );
4694: okc_context.set_okc_org_context (l_order_rec.org_id,
4695: NULL);
4696: fnd_file.put_line (fnd_file.LOG,
4697: 'org_context - '
4698: || TO_CHAR (okc_context.get_okc_org_id)
4699: );
4700: fnd_file.put_line

Line 4700: fnd_file.put_line

4696: fnd_file.put_line (fnd_file.LOG,
4697: 'org_context - '
4698: || TO_CHAR (okc_context.get_okc_org_id)
4699: );
4700: fnd_file.put_line
4701: (fnd_file.LOG,
4702: 'organization_context - '
4703: || TO_CHAR
4704: (okc_context.get_okc_organization_id)

Line 4701: (fnd_file.LOG,

4697: 'org_context - '
4698: || TO_CHAR (okc_context.get_okc_org_id)
4699: );
4700: fnd_file.put_line
4701: (fnd_file.LOG,
4702: 'organization_context - '
4703: || TO_CHAR
4704: (okc_context.get_okc_organization_id)
4705: );

Line 4736: fnd_file.put_line (fnd_file.LOG,

4732: INTO l_hdrid, l_ord_num;
4733:
4734: IF l_order_hdr_csr%NOTFOUND
4735: THEN
4736: fnd_file.put_line (fnd_file.LOG,
4737: ' Invalid Order line ID'
4738: );
4739:
4740: CLOSE l_order_hdr_csr;

Line 4744: fnd_file.put_line (fnd_file.LOG,

4740: CLOSE l_order_hdr_csr;
4741: ELSE
4742: CLOSE l_order_hdr_csr;
4743:
4744: fnd_file.put_line (fnd_file.LOG,
4745: 'Order Header ID ' || l_hdrid
4746: );
4747: l_repv_rec.order_id := l_hdrid;
4748: l_repv_rec.order_line_id :=

Line 4764: fnd_file.put_line

4760: x_msg_data => l_msg_data,
4761: p_repv_rec => l_repv_rec,
4762: x_repv_rec => l_out_repv_rec
4763: );
4764: fnd_file.put_line
4765: (fnd_file.LOG,
4766: 'OKS_REP_PUB - RETURN STATUS : '
4767: || l_return_status
4768: );

Line 4765: (fnd_file.LOG,

4761: p_repv_rec => l_repv_rec,
4762: x_repv_rec => l_out_repv_rec
4763: );
4764: fnd_file.put_line
4765: (fnd_file.LOG,
4766: 'OKS_REP_PUB - RETURN STATUS : '
4767: || l_return_status
4768: );
4769:

Line 4797: fnd_file.put_line

4793: dup_val := 'Y';
4794: EXIT;
4795: END IF;
4796:
4797: fnd_file.put_line
4798: (fnd_file.LOG,
4799: 'oks_rep_pub.insert_row: '
4800: || l_msg_data
4801: );

Line 4798: (fnd_file.LOG,

4794: EXIT;
4795: END IF;
4796:
4797: fnd_file.put_line
4798: (fnd_file.LOG,
4799: 'oks_rep_pub.insert_row: '
4800: || l_msg_data
4801: );
4802: END LOOP;

Line 4816: fnd_file.put_line (fnd_file.LOG, 'Duplicate Order Line');

4812: END IF;
4813: END IF;
4814: END IF;
4815: ELSE
4816: fnd_file.put_line (fnd_file.LOG, 'Duplicate Order Line');
4817: END IF;
4818: END LOOP;
4819: END IF;
4820: END LOOP;

Line 4825: fnd_file.put_line (fnd_file.LOG, 'Order Capture INT Program finished.');

4821:
4822: errbuf := '';
4823: retcode := 0;
4824: COMMIT WORK;
4825: fnd_file.put_line (fnd_file.LOG, 'Order Capture INT Program finished.');
4826: EXCEPTION
4827: WHEN g_exception_halt_validation
4828: THEN
4829: ROLLBACK TO before_insert;

Line 4836: fnd_file.put_line (fnd_file.LOG,

4832: ROLLBACK TO before_insert;
4833: -- Retrieve error message into errbuf
4834: errbuf := SQLERRM;
4835: retcode := 2;
4836: fnd_file.put_line (fnd_file.LOG,
4837: 'Oracle Error Code is -' || TO_CHAR (SQLCODE)
4838: );
4839: fnd_file.put_line (fnd_file.LOG,
4840: 'Oracle Error Message is -'

Line 4839: fnd_file.put_line (fnd_file.LOG,

4835: retcode := 2;
4836: fnd_file.put_line (fnd_file.LOG,
4837: 'Oracle Error Code is -' || TO_CHAR (SQLCODE)
4838: );
4839: fnd_file.put_line (fnd_file.LOG,
4840: 'Oracle Error Message is -'
4841: || SUBSTR (SQLERRM, 1, 512)
4842: );
4843: END migrate_aso_queue;