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.

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 938: fnd_file.put_line

934: x_order_error => l_order_error,
935: x_return_status => l_return_status,
936: x_header_rec => l_k_header_rec
937: );
938: fnd_file.put_line
939: (fnd_file.LOG,
940: 'OC INTERFACE :- get_contract_header_info status '
941: || l_return_status
942: );

Line 939: (fnd_file.LOG,

935: x_return_status => l_return_status,
936: x_header_rec => l_k_header_rec
937: );
938: fnd_file.put_line
939: (fnd_file.LOG,
940: 'OC INTERFACE :- get_contract_header_info status '
941: || l_return_status
942: );
943:

Line 960: fnd_file.put_line (fnd_file.LOG,

956: );
957: l_order_error := l_order_error || l_msg_data || '#';
958: fnd_message.set_encoded (l_msg_data);
959: l_msg_data := fnd_message.get;
960: fnd_file.put_line (fnd_file.LOG,
961: 'GET CONTRACT HDR FAILURE ' || l_msg_data
962: );
963: END LOOP;
964: END IF;

Line 983: fnd_file.put_line (fnd_file.LOG,

979: x_order_error => l_order_error,
980: x_return_status => l_return_status,
981: x_line_rec => l_k_line_rec
982: );
983: fnd_file.put_line (fnd_file.LOG,
984: 'OC INTERFACE :- get_k_service_line status '
985: || l_return_status
986: );
987:

Line 1004: fnd_file.put_line (fnd_file.LOG,

1000: );
1001: l_order_error := l_order_error || l_msg_data || '#';
1002: fnd_message.set_encoded (l_msg_data);
1003: l_msg_data := fnd_message.get;
1004: fnd_file.put_line (fnd_file.LOG,
1005: 'GET ORDER LINE FAILURE ' || l_msg_data
1006: );
1007: END LOOP;
1008: END IF;

Line 1030: fnd_file.put_line (fnd_file.LOG,

1026: p_date => SYSDATE,
1027: p_rnrl_rec => NULL,
1028: x_rnrl_rec => l_rnrl_rec_out
1029: );
1030: fnd_file.put_line (fnd_file.LOG,
1031: 'OC INTERFACE :- get_renew_rules status '
1032: || l_return_status
1033: );
1034:

Line 1044: fnd_file.put_line (fnd_file.LOG,

1040: p_encoded => 'F',
1041: p_data => l_msg_data,
1042: p_msg_index_out => l_index
1043: );
1044: fnd_file.put_line (fnd_file.LOG,
1045: 'RENEWAL RULE FAILURE ' || l_msg_data
1046: );
1047: END LOOP;
1048:

Line 1058: fnd_file.put_line (fnd_file.LOG,

1054: x_return_status => l_return_status,
1055: x_msg_count => l_msg_count,
1056: x_msg_data => l_msg_data
1057: );
1058: fnd_file.put_line (fnd_file.LOG,
1059: 'OC INTERFACE :- get_K_order_details status '
1060: || l_return_status
1061: );
1062:

Line 1072: fnd_file.put_line (fnd_file.LOG,

1068: p_encoded => 'F',
1069: p_data => l_msg_data,
1070: p_msg_index_out => l_index
1071: );
1072: fnd_file.put_line (fnd_file.LOG,
1073: 'ORDER DETAIL FAILURE ' || l_msg_data
1074: );
1075: END LOOP;
1076:

Line 1105: fnd_file.put_line (fnd_file.LOG,

1101: --Period type will be picked up from GCD and not hard coded
1102: --l_period_type := 'FIXED';
1103: END IF;
1104:
1105: fnd_file.put_line (fnd_file.LOG,
1106: 'OC INTERFACE :- get_period_defaults '
1107: || l_return_status
1108: );
1109: fnd_file.put_line

Line 1109: fnd_file.put_line

1105: fnd_file.put_line (fnd_file.LOG,
1106: 'OC INTERFACE :- get_period_defaults '
1107: || l_return_status
1108: );
1109: fnd_file.put_line
1110: (fnd_file.LOG,
1111: 'OC INTERFACE :- get_period_defaults l_period_start '
1112: || l_period_start
1113: );

Line 1110: (fnd_file.LOG,

1106: 'OC INTERFACE :- get_period_defaults '
1107: || l_return_status
1108: );
1109: fnd_file.put_line
1110: (fnd_file.LOG,
1111: 'OC INTERFACE :- get_period_defaults l_period_start '
1112: || l_period_start
1113: );
1114: fnd_file.put_line

Line 1114: fnd_file.put_line

1110: (fnd_file.LOG,
1111: 'OC INTERFACE :- get_period_defaults l_period_start '
1112: || l_period_start
1113: );
1114: fnd_file.put_line
1115: (fnd_file.LOG,
1116: 'OC INTERFACE :- get_period_defaults l_period_type '
1117: || l_period_type
1118: );

Line 1115: (fnd_file.LOG,

1111: 'OC INTERFACE :- get_period_defaults l_period_start '
1112: || l_period_start
1113: );
1114: fnd_file.put_line
1115: (fnd_file.LOG,
1116: 'OC INTERFACE :- get_period_defaults l_period_type '
1117: || l_period_type
1118: );
1119:

Line 1129: fnd_file.put_line (fnd_file.LOG,

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

Line 1149: fnd_file.put_line (fnd_file.LOG,

1145: l_hdr_rec.merge_type := 'NEW';
1146: l_hdr_rec.merge_object_id := NULL;
1147: END IF;
1148:
1149: fnd_file.put_line (fnd_file.LOG,
1150: 'OC INTERFACE :- Create K Hdr status '
1151: || l_return_status
1152: );
1153:

Line 1161: fnd_file.put_line (fnd_file.LOG,

1157: INTO l_party_name;
1158:
1159: CLOSE l_party_csr;
1160:
1161: fnd_file.put_line (fnd_file.LOG,
1162: 'OC INTERFACE :- party name ' || l_party_name
1163: );
1164:
1165: IF fnd_profile.VALUE ('OKS_CONTRACT_CATEGORY') = 'SERVICE'

Line 1254: fnd_file.put_line (fnd_file.LOG,

1250: (p_order_hdr_id => p_reproc_line_rec.order_id,
1251: x_salescredit_tbl => l_salescredit_tbl_in,
1252: x_return_status => l_return_status
1253: );
1254: fnd_file.put_line (fnd_file.LOG,
1255: 'OC INTERFACE :- SalesCredit at Header '
1256: || l_return_status
1257: );
1258:

Line 1268: fnd_file.put_line (fnd_file.LOG,

1264: p_encoded => 'F',
1265: p_data => l_msg_data,
1266: p_msg_index_out => l_index
1267: );
1268: fnd_file.put_line (fnd_file.LOG,
1269: 'READ SALES CREDIT ERROR IN HEADER'
1270: || l_msg_data
1271: );
1272: END LOOP;

Line 1386: fnd_file.put_line (fnd_file.LOG,

1382: x_return_status => l_return_status,
1383: x_msg_count => l_msg_count,
1384: x_msg_data => l_msg_data
1385: );
1386: fnd_file.put_line (fnd_file.LOG,
1387: 'OC INTERFACE :- Create K Hdr ID = '
1388: || TO_CHAR (l_chrid)
1389: );
1390: fnd_file.put_line (fnd_file.LOG,

Line 1390: fnd_file.put_line (fnd_file.LOG,

1386: fnd_file.put_line (fnd_file.LOG,
1387: 'OC INTERFACE :- Create K Hdr ID = '
1388: || TO_CHAR (l_chrid)
1389: );
1390: fnd_file.put_line (fnd_file.LOG,
1391: 'OC INTERFACE :- Create K Hdr status '
1392: || l_return_status
1393: );
1394:

Line 1411: fnd_file.put_line (fnd_file.LOG,

1407: );
1408: l_order_error := l_order_error || l_msg_data || '#';
1409: fnd_message.set_encoded (l_msg_data);
1410: l_msg_data := fnd_message.get;
1411: fnd_file.put_line (fnd_file.LOG,
1412: 'Create_k_hdr FAILURE ' || l_msg_data
1413: );
1414: END LOOP;
1415: END IF;

Line 1458: fnd_file.put_line

1454: );
1455: END IF;
1456:
1457: --OKS_RENEW_PVT.DEBUG_LOG( '(OKS_EXTWARPRGM_PVT).okc_oc_int_pub.create_k_relationships '|| l_return_status);
1458: fnd_file.put_line
1459: (fnd_file.LOG,
1460: '(OKS_EXTWARPRGM_PVT).okc_oc_int_pub.create_k_relationships '
1461: || l_return_status
1462: );

Line 1459: (fnd_file.LOG,

1455: END IF;
1456:
1457: --OKS_RENEW_PVT.DEBUG_LOG( '(OKS_EXTWARPRGM_PVT).okc_oc_int_pub.create_k_relationships '|| l_return_status);
1458: fnd_file.put_line
1459: (fnd_file.LOG,
1460: '(OKS_EXTWARPRGM_PVT).okc_oc_int_pub.create_k_relationships '
1461: || l_return_status
1462: );
1463:

Line 1473: fnd_file.put_line (fnd_file.LOG,

1469: p_encoded => 'F',
1470: p_data => l_msg_data,
1471: p_msg_index_out => l_index
1472: );
1473: fnd_file.put_line (fnd_file.LOG,
1474: 'K HDR CREATION ERROR ' || l_msg_data
1475: );
1476: END LOOP;
1477:

Line 1487: fnd_file.put_line (fnd_file.LOG,

1483: (p_order_line_id => p_reproc_line_rec.order_line_id,
1484: x_salescredit_tbl => l_salescredit_tbl_in,
1485: x_return_status => l_return_status
1486: );
1487: fnd_file.put_line (fnd_file.LOG,
1488: 'OC INTERFACE :- SalesCredit ' || l_return_status
1489: );
1490:
1491: IF NOT (l_return_status = fnd_api.g_ret_sts_success)

Line 1500: fnd_file.put_line (fnd_file.LOG,

1496: p_encoded => 'F',
1497: p_data => l_msg_data,
1498: p_msg_index_out => l_index
1499: );
1500: fnd_file.put_line (fnd_file.LOG,
1501: 'READ SALES CREDIT ERROR ' || l_msg_data
1502: );
1503: END LOOP;
1504:

Line 1518: fnd_file.put_line (fnd_file.LOG,

1514: (p_order_hdr_id => p_reproc_line_rec.order_id,
1515: x_salescredit_tbl => l_salescredit_tbl_in,
1516: x_return_status => l_return_status
1517: );
1518: fnd_file.put_line (fnd_file.LOG,
1519: 'OC INTERFACE :- SalesCredit at Header - defaulting for order line id = '||p_reproc_line_rec.order_id
1520: || l_return_status
1521: );
1522:

Line 1532: fnd_file.put_line (fnd_file.LOG,

1528: p_encoded => 'F',
1529: p_data => l_msg_data,
1530: p_msg_index_out => l_index
1531: );
1532: fnd_file.put_line (fnd_file.LOG,
1533: 'READ SALES CREDIT ERROR IN HEADER'
1534: || l_msg_data
1535: );
1536: END LOOP;

Line 1542: fnd_file.put_line (fnd_file.LOG,

1538: RAISE g_exception_halt_validation;
1539: END IF;
1540: END IF;
1541:
1542: fnd_file.put_line (fnd_file.LOG,
1543: 'OC_INT ...... Cov Temp Id = '
1544: || NVL (l_k_line_rec.coverage_schd_id, -12345)
1545: );
1546: l_line_rec.k_id := l_chrid;

Line 1613: fnd_file.put_line (fnd_file.LOG,

1609: x_return_status => l_return_status,
1610: x_msg_count => l_msg_count,
1611: x_msg_data => l_msg_data
1612: );
1613: fnd_file.put_line (fnd_file.LOG,
1614: 'OC INTERFACE :- Create K Line ID = '
1615: || NVL (l_lineid, -1234)
1616: );
1617: fnd_file.put_line (fnd_file.LOG,

Line 1617: fnd_file.put_line (fnd_file.LOG,

1613: fnd_file.put_line (fnd_file.LOG,
1614: 'OC INTERFACE :- Create K Line ID = '
1615: || NVL (l_lineid, -1234)
1616: );
1617: fnd_file.put_line (fnd_file.LOG,
1618: 'OC INTERFACE :- Create K Line status '
1619: || l_return_status
1620: );
1621:

Line 1638: fnd_file.put_line (fnd_file.LOG,

1634: );
1635: l_order_error := l_order_error || l_msg_data || '#';
1636: fnd_message.set_encoded (l_msg_data);
1637: l_msg_data := fnd_message.get;
1638: fnd_file.put_line (fnd_file.LOG,
1639: 'Create_k_service_line FAILURE '
1640: || l_msg_data
1641: );
1642: END LOOP;

Line 1649: fnd_file.put_line (fnd_file.LOG,

1645: x_upd_tbl (1).ERROR_TEXT := l_order_error;
1646: x_upd_tbl (1).success_flag := 'E';
1647: x_upd_tbl (1).order_line_id := p_reproc_line_rec.order_line_id;
1648: x_upd_tbl (1).ID := p_reproc_line_rec.ID;
1649: fnd_file.put_line (fnd_file.LOG,
1650: 'Inserting error msg ...'
1651: || x_upd_tbl (1).ERROR_TEXT
1652: );
1653: RAISE g_exception_halt_validation;

Line 1687: fnd_file.put_line (fnd_file.LOG,

1683: p_encoded => 'F',
1684: p_data => l_msg_data,
1685: p_msg_index_out => l_index
1686: );
1687: fnd_file.put_line (fnd_file.LOG,
1688: 'READ PRICING ATTRIBS ERROR '
1689: || l_msg_data
1690: );
1691: END LOOP;

Line 1815: fnd_file.put_line

1811: );
1812:
1813: -- Added for fix of bug# 5165947
1814:
1815: fnd_file.put_line
1816: (fnd_file.LOG,
1817: 'l_BOM_instance_flag = '|| l_BOM_instance_flag
1818: );
1819:

Line 1816: (fnd_file.LOG,

1812:
1813: -- Added for fix of bug# 5165947
1814:
1815: fnd_file.put_line
1816: (fnd_file.LOG,
1817: 'l_BOM_instance_flag = '|| l_BOM_instance_flag
1818: );
1819:
1820: IF l_BOM_instance_flag = 'Y' THEN

Line 1823: fnd_file.put_line

1819:
1820: IF l_BOM_instance_flag = 'Y' THEN
1821: l_BOM_instance_id := l_covlvl_id;
1822:
1823: fnd_file.put_line
1824: (fnd_file.LOG,
1825: 'l_BOM_CovLvl_id = '|| TO_CHAR (l_BOM_instance_id)
1826: );
1827:

Line 1824: (fnd_file.LOG,

1820: IF l_BOM_instance_flag = 'Y' THEN
1821: l_BOM_instance_id := l_covlvl_id;
1822:
1823: fnd_file.put_line
1824: (fnd_file.LOG,
1825: 'l_BOM_CovLvl_id = '|| TO_CHAR (l_BOM_instance_id)
1826: );
1827:
1828: END IF;

Line 1833: fnd_file.put_line

1829:
1830: IF l_update_line = 'Y' THEN
1831: l_eff_line_upd_flag := 'Y';
1832:
1833: fnd_file.put_line
1834: (fnd_file.LOG,
1835: 'l_eff_line_upd_flag = '|| l_eff_line_upd_flag
1836: );
1837:

Line 1834: (fnd_file.LOG,

1830: IF l_update_line = 'Y' THEN
1831: l_eff_line_upd_flag := 'Y';
1832:
1833: fnd_file.put_line
1834: (fnd_file.LOG,
1835: 'l_eff_line_upd_flag = '|| l_eff_line_upd_flag
1836: );
1837:
1838: END IF;

Line 1842: fnd_file.put_line

1838: END IF;
1839:
1840: -- Added for fix of bug# 5165947
1841:
1842: fnd_file.put_line
1843: (fnd_file.LOG,
1844: 'OC INTERFACE :- Create K Covd Line Subline ID = '
1845: || TO_CHAR (l_covlvl_id)
1846: );

Line 1843: (fnd_file.LOG,

1839:
1840: -- Added for fix of bug# 5165947
1841:
1842: fnd_file.put_line
1843: (fnd_file.LOG,
1844: 'OC INTERFACE :- Create K Covd Line Subline ID = '
1845: || TO_CHAR (l_covlvl_id)
1846: );
1847: fnd_file.put_line

Line 1847: fnd_file.put_line

1843: (fnd_file.LOG,
1844: 'OC INTERFACE :- Create K Covd Line Subline ID = '
1845: || TO_CHAR (l_covlvl_id)
1846: );
1847: fnd_file.put_line
1848: (fnd_file.LOG,
1849: 'OC INTERFACE :- Create K Covd Line status '
1850: || l_return_status
1851: );

Line 1848: (fnd_file.LOG,

1844: 'OC INTERFACE :- Create K Covd Line Subline ID = '
1845: || TO_CHAR (l_covlvl_id)
1846: );
1847: fnd_file.put_line
1848: (fnd_file.LOG,
1849: 'OC INTERFACE :- Create K Covd Line status '
1850: || l_return_status
1851: );
1852:

Line 1869: fnd_file.put_line

1865: );
1866: l_order_error := l_order_error || l_msg_data || '#';
1867: fnd_message.set_encoded (l_msg_data);
1868: l_msg_data := fnd_message.get;
1869: fnd_file.put_line
1870: (fnd_file.LOG,
1871: 'Create_K_Covered_levels FAILURE '
1872: || l_msg_data
1873: );

Line 1870: (fnd_file.LOG,

1866: l_order_error := l_order_error || l_msg_data || '#';
1867: fnd_message.set_encoded (l_msg_data);
1868: l_msg_data := fnd_message.get;
1869: fnd_file.put_line
1870: (fnd_file.LOG,
1871: 'Create_K_Covered_levels FAILURE '
1872: || l_msg_data
1873: );
1874: END LOOP;

Line 1923: fnd_file.put_line (fnd_file.LOG,

1919: x_msg_data => l_msg_data,
1920: p_insv_rec => l_insthist_rec,
1921: x_insv_rec => x_insthist_rec
1922: );
1923: fnd_file.put_line (fnd_file.LOG,
1924: ' instance history Status : '
1925: || l_return_status
1926: );
1927: x_return_status := l_return_status;

Line 1965: fnd_file.put_line (fnd_file.LOG,

1961: x_msg_data => l_msg_data,
1962: p_ihdv_rec => l_inst_dtls_rec,
1963: x_ihdv_rec => x_inst_dtls_rec
1964: );
1965: fnd_file.put_line (fnd_file.LOG,
1966: ' instance history details Status : '
1967: || l_return_status
1968: );
1969: x_return_status := l_return_status;

Line 1983: fnd_file.put_line (fnd_file.LOG,

1979: END LOOP;
1980:
1981: --Added for fix of bug# 5165947
1982:
1983: fnd_file.put_line (fnd_file.LOG,
1984: 'l_eff_line_upd_flag : '||l_eff_line_upd_flag
1985: );
1986:
1987: IF l_eff_line_upd_flag = 'Y' THEN

Line 1994: fnd_file.put_line (fnd_file.LOG,

1990: open c_line_ammt_ckeck(c_line_id => l_lineid);
1991: fetch c_line_ammt_ckeck into l_prev_line_amt;
1992: close c_line_ammt_ckeck;
1993:
1994: fnd_file.put_line (fnd_file.LOG,
1995: 'l_prev_line_amt : '||to_char(l_prev_line_amt)
1996: );
1997: END IF;
1998:

Line 2107: fnd_file.put_line

2103: p_invoice_rule_id => l_line_rec.invoicing_rule_id,
2104: x_bil_sch_out_tbl => l_bil_sch_out,
2105: x_return_status => l_return_status
2106: );
2107: fnd_file.put_line
2108: (fnd_file.LOG,
2109: 'OKS_BILL_SCH.Create_Bill_Sch_Rules(Return status = '
2110: || l_return_status
2111: || ')'

Line 2108: (fnd_file.LOG,

2104: x_bil_sch_out_tbl => l_bil_sch_out,
2105: x_return_status => l_return_status
2106: );
2107: fnd_file.put_line
2108: (fnd_file.LOG,
2109: 'OKS_BILL_SCH.Create_Bill_Sch_Rules(Return status = '
2110: || l_return_status
2111: || ')'
2112: );

Line 2140: fnd_file.put_line (fnd_file.LOG,

2136: oks_bill_util_pub.create_bcl_for_om
2137: (p_line_id => l_lineid,
2138: x_return_status => l_return_status
2139: );
2140: fnd_file.put_line (fnd_file.LOG,
2141: 'Create_Contract :- CREATE_BCL_FOR_OM '
2142: || l_return_status
2143: );
2144:

Line 2167: fnd_file.put_line (fnd_file.LOG,

2163: THEN
2164:
2165: --Added for fix of bug# 5165947
2166:
2167: fnd_file.put_line (fnd_file.LOG,
2168: 'l_eff_line_upd_flag : '||l_eff_line_upd_flag
2169: );
2170:
2171: IF l_eff_line_upd_flag = 'Y' THEN

Line 2178: fnd_file.put_line (fnd_file.LOG,

2174: open c_line_ammt_ckeck(c_line_id => l_lineid);
2175: fetch c_line_ammt_ckeck into l_curr_line_amt;
2176: close c_line_ammt_ckeck;
2177:
2178: fnd_file.put_line (fnd_file.LOG,
2179: 'l_curr_line_amt : '||to_char(l_curr_line_amt)
2180: );
2181:
2182: if nvl(l_curr_line_amt,0) <> nvl(l_prev_line_amt,0) THEN

Line 2185: fnd_file.put_line (fnd_file.LOG,

2181:
2182: if nvl(l_curr_line_amt,0) <> nvl(l_prev_line_amt,0) THEN
2183: l_eff_line_upd_flag := 'Y';
2184:
2185: fnd_file.put_line (fnd_file.LOG,
2186: 'l_eff_line_upd_flag (final) : '||l_eff_line_upd_flag
2187: );
2188:
2189: end if;

Line 2206: fnd_file.put_line (fnd_file.LOG,

2202: x_return_status => l_return_status,
2203: x_msg_count => x_msg_count,
2204: x_msg_data => x_msg_data
2205: );
2206: fnd_file.put_line (fnd_file.LOG,
2207: 'IBNEW :- Update_OM_SLL_Date '
2208: || l_return_status
2209: );
2210:

Line 2238: fnd_file.put_line

2234: x_return_status => l_return_status,
2235: x_msg_count => x_msg_count,
2236: x_msg_data => x_msg_data
2237: );
2238: fnd_file.put_line
2239: (fnd_file.LOG,
2240: 'Create_Contract :- Create_Bill_Sch_CP '
2241: || l_return_status
2242: );

Line 2239: (fnd_file.LOG,

2235: x_msg_count => x_msg_count,
2236: x_msg_data => x_msg_data
2237: );
2238: fnd_file.put_line
2239: (fnd_file.LOG,
2240: 'Create_Contract :- Create_Bill_Sch_CP '
2241: || l_return_status
2242: );
2243:

Line 2274: fnd_file.put_line (fnd_file.LOG,

2270: oks_bill_util_pub.create_bcl_for_om
2271: (p_line_id => l_lineid,
2272: x_return_status => l_return_status
2273: );
2274: fnd_file.put_line (fnd_file.LOG,
2275: 'Create_Contract :- CREATE_BCL_FOR_OM '
2276: || l_return_status
2277: );
2278:

Line 2363: fnd_file.put_line (fnd_file.LOG,

2359: END IF;
2360: IF c_extwar_hdr_amount%ISOPEN THEN
2361: CLOSE c_extwar_hdr_amount;
2362: END IF;
2363: fnd_file.put_line (fnd_file.LOG,
2364: 'Oracle Error Code is -' || TO_CHAR (SQLCODE)
2365: );
2366: fnd_file.put_line (fnd_file.LOG,
2367: 'Oracle Error Message is -'

Line 2366: fnd_file.put_line (fnd_file.LOG,

2362: END IF;
2363: fnd_file.put_line (fnd_file.LOG,
2364: 'Oracle Error Code is -' || TO_CHAR (SQLCODE)
2365: );
2366: fnd_file.put_line (fnd_file.LOG,
2367: 'Oracle Error Message is -'
2368: || SUBSTR (SQLERRM, 1, 512)
2369: );
2370: END create_contract;

Line 2464: fnd_file.put_line (fnd_file.LOG,

2460: l_msg_data VARCHAR2 (2000);
2461: l_repv_rec oks_rep_pvt.repv_rec_type;
2462: l_out_repv_rec oks_rep_pvt.repv_rec_type;
2463: BEGIN
2464: fnd_file.put_line (fnd_file.LOG,
2465: 'Inside procedure Get Order Lines'
2466: );
2467: l_first_order_line := NULL;
2468: l_ptr1 := 0;

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

2467: l_first_order_line := NULL;
2468: l_ptr1 := 0;
2469:
2470: -- mmadhavi commenting for MOAC
2471: --FND_FILE.PUT_LINE (FND_FILE.LOG, ' Okc_context = ' || nvl(okc_context.get_okc_org_id,-999));
2472: OPEN get_order_lines_csr (p_ord_num);
2473:
2474: LOOP
2475: FETCH get_order_lines_csr

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

2487: CLOSE check_duplicate_csr;
2488:
2489: IF (l_exists <> 'x')
2490: THEN
2491: fnd_file.put_line (fnd_file.LOG, 'No duplicate line..');
2492:
2493: /*
2494: Open get_ordlines_dtls_csr(l_ord_line_id);
2495: Fetch get_ordlines_dtls_csr into l_fulfilled_qty,serv_ref_type, serv_ref_id;

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

2499: ('CUSTOMER_PRODUCT', 'ORDER')
2500: AND serv_ref_id IS NOT NULL
2501: )
2502: THEN
2503: fnd_file.put_line (fnd_file.LOG, 'Valid line...');
2504:
2505: IF (p_source_flag = 'ASO')
2506: THEN
2507: IF (l_fulfilled_qty > 0)

Line 2510: fnd_file.put_line (fnd_file.LOG,

2506: THEN
2507: IF (l_fulfilled_qty > 0)
2508: THEN
2509: l_ptr1 := l_ptr1 + 1;
2510: fnd_file.put_line (fnd_file.LOG,
2511: 'From ASO ..Fulfilled..'
2512: );
2513:
2514: IF (l_ptr1 = 1)

Line 2517: fnd_file.put_line (fnd_file.LOG,

2513:
2514: IF (l_ptr1 = 1)
2515: THEN
2516: l_first_order_line := l_ord_line_id;
2517: fnd_file.put_line (fnd_file.LOG,
2518: 'First Order line..'
2519: );
2520: ELSE
2521: fnd_file.put_line (fnd_file.LOG,

Line 2521: fnd_file.put_line (fnd_file.LOG,

2517: fnd_file.put_line (fnd_file.LOG,
2518: 'First Order line..'
2519: );
2520: ELSE
2521: fnd_file.put_line (fnd_file.LOG,
2522: 'More lines ..Inserting..'
2523: );
2524: l_repv_rec.order_id := p_order_id;
2525: l_repv_rec.order_line_id := l_ord_line_id;

Line 2539: fnd_file.put_line (fnd_file.LOG,

2535: x_msg_data => l_msg_data,
2536: p_repv_rec => l_repv_rec,
2537: x_repv_rec => l_out_repv_rec
2538: );
2539: fnd_file.put_line (fnd_file.LOG,
2540: 'Return status = '
2541: || l_return_status
2542: );
2543:

Line 2550: fnd_file.put_line (fnd_file.LOG,

2546: x_return_status := l_return_status;
2547: RAISE g_exception_halt_validation;
2548: END IF;
2549:
2550: fnd_file.put_line (fnd_file.LOG,
2551: 'Insert status = '
2552: || l_return_status
2553: );
2554: x_repv_tbl (l_ptr1).ID := l_out_repv_rec.ID;

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

2564: l_out_repv_rec.order_number;
2565: END IF;
2566: END IF;
2567: ELSE
2568: fnd_file.put_line (fnd_file.LOG, 'Source = MANUAL');
2569: l_ptr1 := l_ptr1 + 1;
2570:
2571: IF (l_ptr1 = 1)
2572: THEN

Line 2574: fnd_file.put_line (fnd_file.LOG,

2570:
2571: IF (l_ptr1 = 1)
2572: THEN
2573: l_first_order_line := l_ord_line_id;
2574: fnd_file.put_line (fnd_file.LOG,
2575: 'First Order Line...'
2576: );
2577: ELSE
2578: fnd_file.put_line (fnd_file.LOG,

Line 2578: fnd_file.put_line (fnd_file.LOG,

2574: fnd_file.put_line (fnd_file.LOG,
2575: 'First Order Line...'
2576: );
2577: ELSE
2578: fnd_file.put_line (fnd_file.LOG,
2579: 'Next Order lines...'
2580: );
2581: l_repv_rec.order_id := p_order_id;
2582: l_repv_rec.order_line_id := l_ord_line_id;

Line 2596: fnd_file.put_line

2592: x_msg_data => l_msg_data,
2593: p_repv_rec => l_repv_rec,
2594: x_repv_rec => l_out_repv_rec
2595: );
2596: fnd_file.put_line
2597: (fnd_file.LOG,
2598: 'oks_rep_pub.insert_row : return status => '
2599: || l_return_status
2600: );

Line 2597: (fnd_file.LOG,

2593: p_repv_rec => l_repv_rec,
2594: x_repv_rec => l_out_repv_rec
2595: );
2596: fnd_file.put_line
2597: (fnd_file.LOG,
2598: 'oks_rep_pub.insert_row : return status => '
2599: || l_return_status
2600: );
2601:

Line 2608: fnd_file.put_line (fnd_file.LOG,

2604: x_return_status := l_return_status;
2605: RAISE g_exception_halt_validation;
2606: END IF;
2607:
2608: fnd_file.put_line (fnd_file.LOG,
2609: 'Insert status ...'
2610: || l_return_status
2611: );
2612: x_repv_tbl (l_ptr1).ID := l_out_repv_rec.ID;

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

2625: END IF; -- Service line
2626: END IF; -- duplicate line
2627: END LOOP;
2628:
2629: fnd_file.put_line (fnd_file.LOG, 'End of Loop...');
2630:
2631: IF (l_first_order_line IS NOT NULL)
2632: THEN
2633: x_repv_tbl (1).ID := p_id;

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

2637: x_repv_tbl (1).source_flag := p_source_flag;
2638: x_repv_tbl (1).order_number := p_ord_num;
2639: END IF;
2640:
2641: fnd_file.put_line (fnd_file.LOG, 'Exiting Get Order lines');
2642: EXCEPTION
2643: WHEN g_exception_halt_validation
2644: THEN
2645: fnd_file.put_line (fnd_file.LOG,

Line 2645: fnd_file.put_line (fnd_file.LOG,

2641: fnd_file.put_line (fnd_file.LOG, 'Exiting Get Order lines');
2642: EXCEPTION
2643: WHEN g_exception_halt_validation
2644: THEN
2645: fnd_file.put_line (fnd_file.LOG,
2646: ' Error in Get_Order_lines : '
2647: || SQLCODE
2648: || ':'
2649: || SQLERRM

Line 2661: fnd_file.put_line (fnd_file.LOG,

2657: );
2658: WHEN OTHERS
2659: THEN
2660: x_return_status := okc_api.g_ret_sts_unexp_error;
2661: fnd_file.put_line (fnd_file.LOG,
2662: ' Error in Get_Order_lines : '
2663: || SQLCODE
2664: || ':'
2665: || SQLERRM

Line 2676: fnd_file.put_line (fnd_file.LOG,

2672: SQLERRM
2673: );
2674: END get_order_lines;
2675: BEGIN
2676: fnd_file.put_line (fnd_file.LOG,
2677: 'Inside procedure Get Order Details'
2678: );
2679: l_source := NVL (p_source, 'Auto');
2680:

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

2790: END IF;
2791: END LOOP;
2792: END IF;
2793: ELSE
2794: fnd_file.put_line (fnd_file.LOG, 'Choice - Submitted');
2795: l_ptr := 0;
2796:
2797: FOR l_ordline_rec IN l_order_line_sub_csr
2798: LOOP

Line 2803: fnd_file.put_line (fnd_file.LOG,

2799: l_ptr := l_ptr + 1;
2800:
2801: IF (l_ordline_rec.order_line_id IS NULL)
2802: THEN
2803: fnd_file.put_line (fnd_file.LOG,
2804: 'Calling get_order_lines...'
2805: );
2806: get_order_lines
2807: (p_id => l_ordline_rec.ID,

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

2849: END LOOP;
2850: END IF;
2851:
2852: x_return_status := l_return_status;
2853: fnd_file.put_line (fnd_file.LOG, 'Exiting Get Order Details');
2854: EXCEPTION
2855: WHEN g_exception_halt_validation
2856: THEN
2857: fnd_file.put_line (fnd_file.LOG,

Line 2857: fnd_file.put_line (fnd_file.LOG,

2853: fnd_file.put_line (fnd_file.LOG, 'Exiting Get Order Details');
2854: EXCEPTION
2855: WHEN g_exception_halt_validation
2856: THEN
2857: fnd_file.put_line (fnd_file.LOG,
2858: ' Error in Get_Order_details : '
2859: || SQLCODE
2860: || ':'
2861: || SQLERRM

Line 2873: fnd_file.put_line (fnd_file.LOG,

2869: );
2870: WHEN OTHERS
2871: THEN
2872: x_return_status := okc_api.g_ret_sts_unexp_error;
2873: fnd_file.put_line (fnd_file.LOG,
2874: ' Error in Get_Order_Details : '
2875: || SQLCODE
2876: || ':'
2877: || SQLERRM

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

2887: BEGIN
2888: --Okc_context.set_okc_org_context (l_order_rec.org_id, NULL ); --mmadhavi commenting for MOAC
2889: l_prog_id := fnd_global.conc_program_id;
2890: l_req_id := fnd_global.conc_request_id;
2891: fnd_file.put_line (fnd_file.LOG, 'conc_prog_id = ' || l_prog_id);
2892: fnd_file.put_line (fnd_file.LOG, 'conc_req_id = ' || l_req_id);
2893: fnd_file.put_line (fnd_file.LOG, 'Source = ' || NVL (p_source, 'Auto'));
2894: SAVEPOINT oks_reprocessing;
2895: fnd_file.put_line (fnd_file.LOG, 'Start of Reprocessing.....');

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

2888: --Okc_context.set_okc_org_context (l_order_rec.org_id, NULL ); --mmadhavi commenting for MOAC
2889: l_prog_id := fnd_global.conc_program_id;
2890: l_req_id := fnd_global.conc_request_id;
2891: fnd_file.put_line (fnd_file.LOG, 'conc_prog_id = ' || l_prog_id);
2892: fnd_file.put_line (fnd_file.LOG, 'conc_req_id = ' || l_req_id);
2893: fnd_file.put_line (fnd_file.LOG, 'Source = ' || NVL (p_source, 'Auto'));
2894: SAVEPOINT oks_reprocessing;
2895: fnd_file.put_line (fnd_file.LOG, 'Start of Reprocessing.....');
2896: fnd_file.put_line (fnd_file.LOG,

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

2889: l_prog_id := fnd_global.conc_program_id;
2890: l_req_id := fnd_global.conc_request_id;
2891: fnd_file.put_line (fnd_file.LOG, 'conc_prog_id = ' || l_prog_id);
2892: fnd_file.put_line (fnd_file.LOG, 'conc_req_id = ' || l_req_id);
2893: fnd_file.put_line (fnd_file.LOG, 'Source = ' || NVL (p_source, 'Auto'));
2894: SAVEPOINT oks_reprocessing;
2895: fnd_file.put_line (fnd_file.LOG, 'Start of Reprocessing.....');
2896: fnd_file.put_line (fnd_file.LOG,
2897: 'The parameter value is ..' || p_option

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

2891: fnd_file.put_line (fnd_file.LOG, 'conc_prog_id = ' || l_prog_id);
2892: fnd_file.put_line (fnd_file.LOG, 'conc_req_id = ' || l_req_id);
2893: fnd_file.put_line (fnd_file.LOG, 'Source = ' || NVL (p_source, 'Auto'));
2894: SAVEPOINT oks_reprocessing;
2895: fnd_file.put_line (fnd_file.LOG, 'Start of Reprocessing.....');
2896: fnd_file.put_line (fnd_file.LOG,
2897: 'The parameter value is ..' || p_option
2898: );
2899: fnd_file.put_line (fnd_file.LOG, 'Calling Get Order Details....');

Line 2896: fnd_file.put_line (fnd_file.LOG,

2892: fnd_file.put_line (fnd_file.LOG, 'conc_req_id = ' || l_req_id);
2893: fnd_file.put_line (fnd_file.LOG, 'Source = ' || NVL (p_source, 'Auto'));
2894: SAVEPOINT oks_reprocessing;
2895: fnd_file.put_line (fnd_file.LOG, 'Start of Reprocessing.....');
2896: fnd_file.put_line (fnd_file.LOG,
2897: 'The parameter value is ..' || p_option
2898: );
2899: fnd_file.put_line (fnd_file.LOG, 'Calling Get Order Details....');
2900: get_order_details (p_option => p_option,

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

2895: fnd_file.put_line (fnd_file.LOG, 'Start of Reprocessing.....');
2896: fnd_file.put_line (fnd_file.LOG,
2897: 'The parameter value is ..' || p_option
2898: );
2899: fnd_file.put_line (fnd_file.LOG, 'Calling Get Order Details....');
2900: get_order_details (p_option => p_option,
2901: p_source => p_source,
2902: x_return_status => l_return_status,
2903: x_repv_tbl => l_repv_tbl

Line 2905: fnd_file.put_line (fnd_file.LOG,

2901: p_source => p_source,
2902: x_return_status => l_return_status,
2903: x_repv_tbl => l_repv_tbl
2904: );
2905: fnd_file.put_line (fnd_file.LOG,
2906: 'Get Order Details : l_return_status = '
2907: || l_return_status
2908: );
2909: l_line_count := l_repv_tbl.COUNT;

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

2909: l_line_count := l_repv_tbl.COUNT;
2910:
2911: IF (l_line_count <= 0)
2912: THEN
2913: fnd_file.put_line (fnd_file.LOG, 'No lines to Reprocess..');
2914: ELSE
2915: fnd_file.put_line (fnd_file.LOG,
2916: 'ReProcessing Order Lines... Line count = '
2917: || l_line_count

Line 2915: fnd_file.put_line (fnd_file.LOG,

2911: IF (l_line_count <= 0)
2912: THEN
2913: fnd_file.put_line (fnd_file.LOG, 'No lines to Reprocess..');
2914: ELSE
2915: fnd_file.put_line (fnd_file.LOG,
2916: 'ReProcessing Order Lines... Line count = '
2917: || l_line_count
2918: );
2919:

Line 2980: fnd_file.put_line (fnd_file.LOG,

2976: l_upd_tbl.DELETE;
2977: l_conc_rec.conc_request_id := l_req_id;
2978: l_conc_rec.order_line_id := l_repv_tbl (l_count).order_line_id;
2979: l_conc_rec.ID := l_repv_tbl (l_count).ID;
2980: fnd_file.put_line (fnd_file.LOG,
2981: 'Updating record with Conc req id'
2982: );
2983: handle_order_error (x_return_status => l_return_status,
2984: p_upd_rec => l_conc_rec

Line 2986: fnd_file.put_line (fnd_file.LOG,

2982: );
2983: handle_order_error (x_return_status => l_return_status,
2984: p_upd_rec => l_conc_rec
2985: );
2986: fnd_file.put_line (fnd_file.LOG,
2987: 'l_return_status = ' || l_return_status
2988: );
2989:
2990: IF NOT (l_return_status = fnd_api.g_ret_sts_success)

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

3003: INTO l_order_rec;
3004:
3005: IF l_order_csr%NOTFOUND
3006: THEN
3007: fnd_file.put_line (fnd_file.LOG, 'l_order_csr not found ');
3008: l_order_rec.fqty := 0;
3009: END IF;
3010:
3011: CLOSE l_order_csr;

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

3011: CLOSE l_order_csr;
3012:
3013: okc_context.set_okc_org_context (l_order_rec.org_id, NULL);
3014:
3015: --FND_FILE.PUT_LINE (FND_FILE.LOG, 'success_flag = '||NVL(l_repv_tbl(l_count).success_flag,'S'));
3016: IF (NVL (l_repv_tbl (l_count).source_flag, 'S') = 'MANUAL')
3017: THEN
3018: fnd_file.put_line (fnd_file.LOG,
3019: 'Order line entered from Reprocesing UI'

Line 3018: fnd_file.put_line (fnd_file.LOG,

3014:
3015: --FND_FILE.PUT_LINE (FND_FILE.LOG, 'success_flag = '||NVL(l_repv_tbl(l_count).success_flag,'S'));
3016: IF (NVL (l_repv_tbl (l_count).source_flag, 'S') = 'MANUAL')
3017: THEN
3018: fnd_file.put_line (fnd_file.LOG,
3019: 'Order line entered from Reprocesing UI'
3020: );
3021:
3022: IF (l_order_rec.fqty <= 0)

Line 3024: fnd_file.put_line (fnd_file.LOG,

3020: );
3021:
3022: IF (l_order_rec.fqty <= 0)
3023: THEN
3024: fnd_file.put_line (fnd_file.LOG,
3025: 'Order line '
3026: || l_repv_tbl (l_count).order_line_id
3027: || ' not fulfilled'
3028: );

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

3057: END IF;
3058:
3059: IF (l_fulfill <> 'N')
3060: THEN
3061: fnd_file.put_line (fnd_file.LOG, 'Order line fulfilled..');
3062:
3063: OPEN l_serv_ref_csr (l_repv_tbl (l_count).order_line_id);
3064:
3065: FETCH l_serv_ref_csr

Line 3070: fnd_file.put_line (fnd_file.LOG,

3066: INTO l_serv_ref_rec;
3067:
3068: CLOSE l_serv_ref_csr;
3069:
3070: fnd_file.put_line (fnd_file.LOG,
3071: 'Processing Order Line '
3072: || l_repv_tbl (l_count).order_line_id
3073: );
3074: fnd_file.put_line (fnd_file.LOG,

Line 3074: fnd_file.put_line (fnd_file.LOG,

3070: fnd_file.put_line (fnd_file.LOG,
3071: 'Processing Order Line '
3072: || l_repv_tbl (l_count).order_line_id
3073: );
3074: fnd_file.put_line (fnd_file.LOG,
3075: 'Service Ref Type Code '
3076: || l_serv_ref_rec.service_reference_type_code
3077: );
3078: fnd_file.put_line (fnd_file.LOG,

Line 3078: fnd_file.put_line (fnd_file.LOG,

3074: fnd_file.put_line (fnd_file.LOG,
3075: 'Service Ref Type Code '
3076: || l_serv_ref_rec.service_reference_type_code
3077: );
3078: fnd_file.put_line (fnd_file.LOG,
3079: 'Service line Id '
3080: || l_serv_ref_rec.service_reference_line_id
3081: );
3082: --FND_FILE.PUT_LINE (FND_FILE.LOG, 'Profile option value ' || Fnd_Profile.Value('OKS_CONTRACTS_VALIDATION_SOURCE') );

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

3078: fnd_file.put_line (fnd_file.LOG,
3079: 'Service line Id '
3080: || l_serv_ref_rec.service_reference_line_id
3081: );
3082: --FND_FILE.PUT_LINE (FND_FILE.LOG, 'Profile option value ' || Fnd_Profile.Value('OKS_CONTRACTS_VALIDATION_SOURCE') );
3083:
3084: /*
3085: If Fnd_Profile.Value('OKS_CONTRACTS_VALIDATION_SOURCE') IN ('IB', 'MO') OR
3086: Fnd_Profile.Value('OKS_CONTRACTS_VALIDATION_SOURCE') Is NULL Then

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

3122: END IF;
3123:
3124: CLOSE l_order_csr;
3125:
3126: fnd_file.put_line (fnd_file.LOG, 'ORDER : L_ORDER_CSR ');
3127:
3128: IF l_order_rec.header_id = l_ref_order_rec.header_id
3129: THEN -----ORDER HEADER ID EQLS
3130: fnd_file.put_line

Line 3130: fnd_file.put_line

3126: fnd_file.put_line (fnd_file.LOG, 'ORDER : L_ORDER_CSR ');
3127:
3128: IF l_order_rec.header_id = l_ref_order_rec.header_id
3129: THEN -----ORDER HEADER ID EQLS
3130: fnd_file.put_line
3131: (fnd_file.LOG,
3132: 'ORDER HEADER ID EQLS : L_PROCESS TRUE '
3133: );
3134: l_process := TRUE;

Line 3131: (fnd_file.LOG,

3127:
3128: IF l_order_rec.header_id = l_ref_order_rec.header_id
3129: THEN -----ORDER HEADER ID EQLS
3130: fnd_file.put_line
3131: (fnd_file.LOG,
3132: 'ORDER HEADER ID EQLS : L_PROCESS TRUE '
3133: );
3134: l_process := TRUE;
3135: l_cp_ctr := 1;

Line 3142: fnd_file.put_line (fnd_file.LOG,

3138: FOR rec IN
3139: l_custprod_csr
3140: (l_serv_ref_rec.service_reference_line_id, okc_context.get_okc_organization_id)
3141: LOOP
3142: fnd_file.put_line (fnd_file.LOG,
3143: 'L_CP_TBL CP ID '
3144: || rec.cp_id
3145: || ' Cnt '
3146: || l_cp_ctr

Line 3158: fnd_file.put_line

3154: l_process := FALSE;
3155: END IF;
3156: ELSE
3157: l_process := TRUE;
3158: fnd_file.put_line
3159: (fnd_file.LOG,
3160: 'ORDER HEADER ID NOT EQLS : L_CUSTPROD '
3161: );
3162: l_cp_ctr := 1;

Line 3159: (fnd_file.LOG,

3155: END IF;
3156: ELSE
3157: l_process := TRUE;
3158: fnd_file.put_line
3159: (fnd_file.LOG,
3160: 'ORDER HEADER ID NOT EQLS : L_CUSTPROD '
3161: );
3162: l_cp_ctr := 1;
3163:

Line 3169: fnd_file.put_line (fnd_file.LOG,

3165: FOR rec IN
3166: l_custprod_csr
3167: (l_serv_ref_rec.service_reference_line_id, okc_context.get_okc_organization_id)
3168: LOOP
3169: fnd_file.put_line (fnd_file.LOG,
3170: 'L_CP_TBL CP ID '
3171: || rec.cp_id
3172: || ' Cnt '
3173: || l_cp_ctr

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

3181: l_process := FALSE;
3182: END IF;
3183: END IF; -----ORDER HEADER ID EQLS
3184: ELSE ------REF TYPE CUST PROD
3185: fnd_file.put_line (fnd_file.LOG, 'ElSE L_PROCESS TRUE ');
3186: l_cp_tbl (1).cp_id :=
3187: l_serv_ref_rec.service_reference_line_id;
3188: l_process := TRUE;
3189: END IF; ------REF TYPE ORDER

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

3201:
3202: */
3203: IF NOT l_process
3204: THEN
3205: fnd_file.put_line (fnd_file.LOG, 'Cannot process line ...');
3206: l_upd_tbl (1).ID := l_repv_tbl (l_count).ID;
3207: l_upd_tbl (1).ERROR_TEXT := '#';
3208: fnd_message.set_name ('OKS', 'OKS_REQUEST');
3209: fnd_message.set_token (token => 'ID', VALUE => l_req_id);

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

3241: FETCH l_contract_csr
3242: INTO l_upd_tbl (l_ctr1).subline_id,
3243: l_upd_tbl (l_ctr1).contract_id;
3244:
3245: --FND_FILE.PUT_LINE (FND_FILE.LOG, 'cov_id = '||l_upd_tbl(l_ctr1).subline_id);
3246: EXIT WHEN l_contract_csr%NOTFOUND;
3247: END LOOP;
3248:
3249: CLOSE l_contract_csr;

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

3247: END LOOP;
3248:
3249: CLOSE l_contract_csr;
3250:
3251: fnd_file.put_line (fnd_file.LOG, 'l_ctr1 = ' || l_ctr1);
3252: fnd_file.put_line (fnd_file.LOG,
3253: 'DUPLICATE CHECK l_K_LINE_ID '
3254: || NVL (l_upd_tbl (1).subline_id, -12345)
3255: );

Line 3252: fnd_file.put_line (fnd_file.LOG,

3248:
3249: CLOSE l_contract_csr;
3250:
3251: fnd_file.put_line (fnd_file.LOG, 'l_ctr1 = ' || l_ctr1);
3252: fnd_file.put_line (fnd_file.LOG,
3253: 'DUPLICATE CHECK l_K_LINE_ID '
3254: || NVL (l_upd_tbl (1).subline_id, -12345)
3255: );
3256:

Line 3265: fnd_file.put_line (fnd_file.LOG,

3261: create_contract (p_reproc_line_rec => l_reproc_line_rec,
3262: x_upd_tbl => l_upd_tbl,
3263: x_return_status => l_return_status
3264: );
3265: fnd_file.put_line (fnd_file.LOG,
3266: 'Create_Contract status ::'
3267: || l_return_status
3268: );
3269:

Line 3284: fnd_file.put_line (fnd_file.LOG,

3280: );
3281: l_error_msg := l_error_msg || l_msg_data || '#';
3282: fnd_message.set_encoded (l_msg_data);
3283: l_msg_data := fnd_message.get;
3284: fnd_file.put_line (fnd_file.LOG,
3285: 'GET ORDER LINE FAILURE '
3286: || l_msg_data
3287: );
3288: END LOOP;

Line 3439: fnd_file.put_line (fnd_file.LOG,

3435: p_repv_rec => l_upd_tbl
3436: (i),
3437: x_repv_rec => l_out_repv_rec
3438: );
3439: fnd_file.put_line (fnd_file.LOG,
3440: 'L_return_status :'
3441: || l_return_status
3442: );
3443:

Line 3454: fnd_file.put_line

3450: p_encoded => 'F',
3451: p_data => l_msg_data,
3452: p_msg_index_out => l_index
3453: );
3454: fnd_file.put_line
3455: (fnd_file.LOG,
3456: 'ORDER_REPROCESS.Insert_row'
3457: || l_msg_data
3458: );

Line 3455: (fnd_file.LOG,

3451: p_data => l_msg_data,
3452: p_msg_index_out => l_index
3453: );
3454: fnd_file.put_line
3455: (fnd_file.LOG,
3456: 'ORDER_REPROCESS.Insert_row'
3457: || l_msg_data
3458: );
3459: END LOOP;

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

3494: THEN
3495: RAISE g_exception_halt_validation;
3496: END IF;
3497:
3498: --FND_FILE.PUT_LINE (FND_FILE.LOG, 'l_ctr1 = '||l_ctr1);
3499: IF (l_ctr1 > 1)
3500: THEN
3501: FOR i IN 2 .. l_ctr1
3502: LOOP

Line 3538: fnd_file.put_line (fnd_file.LOG,

3534: p_repv_rec => l_upd_tbl
3535: (i),
3536: x_repv_rec => l_out_repv_rec
3537: );
3538: fnd_file.put_line (fnd_file.LOG,
3539: 'L_return_status :'
3540: || l_return_status
3541: );
3542:

Line 3553: fnd_file.put_line

3549: p_encoded => 'F',
3550: p_data => l_msg_data,
3551: p_msg_index_out => l_index
3552: );
3553: fnd_file.put_line
3554: (fnd_file.LOG,
3555: 'ORDER_REPROCESS.Insert_row'
3556: || l_msg_data
3557: );

Line 3554: (fnd_file.LOG,

3550: p_data => l_msg_data,
3551: p_msg_index_out => l_index
3552: );
3553: fnd_file.put_line
3554: (fnd_file.LOG,
3555: 'ORDER_REPROCESS.Insert_row'
3556: || l_msg_data
3557: );
3558: END LOOP;

Line 3624: fnd_file.put_line

3620: EXCEPTION
3621: WHEN g_exception_halt_validation
3622: THEN
3623: x_return_status := l_return_status;
3624: fnd_file.put_line
3625: (fnd_file.LOG,
3626: ' Error in Order Reprocess - l_return_status = '
3627: || l_return_status
3628: );

Line 3625: (fnd_file.LOG,

3621: WHEN g_exception_halt_validation
3622: THEN
3623: x_return_status := l_return_status;
3624: fnd_file.put_line
3625: (fnd_file.LOG,
3626: ' Error in Order Reprocess - l_return_status = '
3627: || l_return_status
3628: );
3629: WHEN OTHERS

Line 3631: fnd_file.put_line (fnd_file.LOG,

3627: || l_return_status
3628: );
3629: WHEN OTHERS
3630: THEN
3631: fnd_file.put_line (fnd_file.LOG,
3632: 'In OTHERS Exception of Order_Reprocess'
3633: );
3634: x_return_status := okc_api.g_ret_sts_unexp_error;
3635: fnd_file.put_line (fnd_file.LOG,

Line 3635: fnd_file.put_line (fnd_file.LOG,

3631: fnd_file.put_line (fnd_file.LOG,
3632: 'In OTHERS Exception of Order_Reprocess'
3633: );
3634: x_return_status := okc_api.g_ret_sts_unexp_error;
3635: fnd_file.put_line (fnd_file.LOG,
3636: ' Error in Order Reprocess : '
3637: || SQLCODE
3638: || ':'
3639: || SQLERRM

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

3680: l_return_status VARCHAR2 (1) := okc_api.g_ret_sts_success;
3681: l_ordline_rec oks_rep_pvt.repv_rec_type;
3682: l_ptr NUMBER;
3683: BEGIN
3684: fnd_file.put_line (fnd_file.LOG, 'Inside procedure Get Order lines');
3685: l_ptr := 0;
3686:
3687: FOR l_ordline_rec IN l_order_line_csr
3688: LOOP

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

3691: --X_Repv_tbl(l_ptr).order_line_id := l_ordline_rec.order_line_id;
3692: END LOOP;
3693:
3694: x_return_status := l_return_status;
3695: fnd_file.put_line (fnd_file.LOG, 'Exiting Get Order Details');
3696: EXCEPTION
3697: WHEN OTHERS
3698: THEN
3699: x_return_status := okc_api.g_ret_sts_unexp_error;

Line 3700: fnd_file.put_line (fnd_file.LOG,

3696: EXCEPTION
3697: WHEN OTHERS
3698: THEN
3699: x_return_status := okc_api.g_ret_sts_unexp_error;
3700: fnd_file.put_line (fnd_file.LOG,
3701: ' Error in Get_Order_Details : '
3702: || SQLCODE
3703: || ':'
3704: || SQLERRM

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

3711: SQLERRM
3712: );
3713: END get_order_lines;
3714: BEGIN
3715: fnd_file.put_line (fnd_file.LOG, 'Start of OKS_ORDER_PURGE_PVT...');
3716: l_user_id := fnd_global.user_id;
3717: fnd_file.put_line (fnd_file.LOG, 'User Id : ' || TO_CHAR (l_user_id));
3718: get_order_lines (x_return_status => l_return_status,
3719: x_msg_count => l_msg_count,

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

3713: END get_order_lines;
3714: BEGIN
3715: fnd_file.put_line (fnd_file.LOG, 'Start of OKS_ORDER_PURGE_PVT...');
3716: l_user_id := fnd_global.user_id;
3717: fnd_file.put_line (fnd_file.LOG, 'User Id : ' || TO_CHAR (l_user_id));
3718: get_order_lines (x_return_status => l_return_status,
3719: x_msg_count => l_msg_count,
3720: x_msg_data => l_msg_data,
3721: x_repv_tbl => l_repv_tbl

Line 3723: fnd_file.put_line (fnd_file.LOG,

3719: x_msg_count => l_msg_count,
3720: x_msg_data => l_msg_data,
3721: x_repv_tbl => l_repv_tbl
3722: );
3723: fnd_file.put_line (fnd_file.LOG,
3724: 'Get Order Lines: l_return_status = '
3725: || l_return_status
3726: );
3727:

Line 3737: fnd_file.put_line (fnd_file.LOG,

3733: p_encoded => 'F',
3734: p_data => l_msg_data,
3735: p_msg_index_out => l_index
3736: );
3737: fnd_file.put_line (fnd_file.LOG,
3738: 'GET ORDER LINES: ' || l_msg_data);
3739: END LOOP;
3740:
3741: RAISE g_exception_halt_validation;

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

3744: l_line_count := l_repv_tbl.COUNT;
3745:
3746: IF (l_line_count <= 0)
3747: THEN
3748: fnd_file.put_line (fnd_file.LOG, 'No lines to Purge..');
3749: ELSE
3750: fnd_file.put_line (fnd_file.LOG,
3751: 'Purging Order Lines... Line count = '
3752: || l_line_count

Line 3750: fnd_file.put_line (fnd_file.LOG,

3746: IF (l_line_count <= 0)
3747: THEN
3748: fnd_file.put_line (fnd_file.LOG, 'No lines to Purge..');
3749: ELSE
3750: fnd_file.put_line (fnd_file.LOG,
3751: 'Purging Order Lines... Line count = '
3752: || l_line_count
3753: );
3754:

Line 3777: fnd_file.put_line (fnd_file.LOG,

3773: ROLLBACK;
3774: -- Retrieve error message into errbuf
3775: errbuf := SQLERRM;
3776: retcode := 2;
3777: fnd_file.put_line (fnd_file.LOG,
3778: 'Oracle Error Code is -' || TO_CHAR (SQLCODE)
3779: );
3780: fnd_file.put_line (fnd_file.LOG,
3781: 'Oracle Error Message is -'

Line 3780: fnd_file.put_line (fnd_file.LOG,

3776: retcode := 2;
3777: fnd_file.put_line (fnd_file.LOG,
3778: 'Oracle Error Code is -' || TO_CHAR (SQLCODE)
3779: );
3780: fnd_file.put_line (fnd_file.LOG,
3781: 'Oracle Error Message is -'
3782: || SUBSTR (SQLERRM, 1, 512)
3783: );
3784: END oks_order_purge;

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

3886: aso_handle_exception EXCEPTION;
3887: aso_handle_normal EXCEPTION;
3888: BEGIN
3889: SAVEPOINT oks_migrate_aso_queue;
3890: fnd_file.put_line (fnd_file.LOG, 'Start of OC_interface...');
3891: l_user_id := fnd_global.user_id;
3892: fnd_file.put_line (fnd_file.LOG, 'User Id : ' || TO_CHAR (l_user_id));
3893: -- Set policy context to ALL
3894: mo_global.set_policy_context ('B', NULL);

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

3888: BEGIN
3889: SAVEPOINT oks_migrate_aso_queue;
3890: fnd_file.put_line (fnd_file.LOG, 'Start of OC_interface...');
3891: l_user_id := fnd_global.user_id;
3892: fnd_file.put_line (fnd_file.LOG, 'User Id : ' || TO_CHAR (l_user_id));
3893: -- Set policy context to ALL
3894: mo_global.set_policy_context ('B', NULL);
3895:
3896: LOOP

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

3943: p_encoded => 'F',
3944: p_data => l_msg_data,
3945: p_msg_index_out => l_index
3946: );
3947: fnd_file.put_line (fnd_file.LOG, l_msg_data);
3948: END LOOP;
3949:
3950: ROLLBACK TO oks_migrate_aso_queue;
3951: RETURN;

Line 3955: fnd_file.put_line (fnd_file.LOG,

3951: RETURN;
3952: END IF;
3953:
3954: l_newline_count := l_line_tbl.COUNT;
3955: fnd_file.put_line (fnd_file.LOG,
3956: 'Lines to process = ' || l_newline_count
3957: );
3958: EXIT WHEN l_no_more_messages = fnd_api.g_true;
3959:

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

3958: EXIT WHEN l_no_more_messages = fnd_api.g_true;
3959:
3960: IF l_newline_count <= 0
3961: THEN --Order Line Record Found
3962: fnd_file.put_line (fnd_file.LOG, 'No lines to insert');
3963: ELSE
3964: fnd_file.put_line (fnd_file.LOG,
3965: 'Processing the order lines... line count='
3966: || TO_CHAR (l_newline_count)

Line 3964: fnd_file.put_line (fnd_file.LOG,

3960: IF l_newline_count <= 0
3961: THEN --Order Line Record Found
3962: fnd_file.put_line (fnd_file.LOG, 'No lines to insert');
3963: ELSE
3964: fnd_file.put_line (fnd_file.LOG,
3965: 'Processing the order lines... line count='
3966: || TO_CHAR (l_newline_count)
3967: );
3968:

Line 3972: fnd_file.put_line (fnd_file.LOG,

3968:
3969: FOR l_count IN 1 .. l_newline_count
3970: LOOP
3971: l_exists := 'y';
3972: fnd_file.put_line (fnd_file.LOG,
3973: 'Processing Order Line '
3974: || l_line_tbl (l_count).line_id
3975: );
3976: fnd_file.put_line

Line 3976: fnd_file.put_line

3972: fnd_file.put_line (fnd_file.LOG,
3973: 'Processing Order Line '
3974: || l_line_tbl (l_count).line_id
3975: );
3976: fnd_file.put_line
3977: (fnd_file.LOG,
3978: 'Service Ref Type Code '
3979: || l_line_tbl (l_count).service_reference_type_code
3980: );

Line 3977: (fnd_file.LOG,

3973: 'Processing Order Line '
3974: || l_line_tbl (l_count).line_id
3975: );
3976: fnd_file.put_line
3977: (fnd_file.LOG,
3978: 'Service Ref Type Code '
3979: || l_line_tbl (l_count).service_reference_type_code
3980: );
3981: fnd_file.put_line

Line 3981: fnd_file.put_line

3977: (fnd_file.LOG,
3978: 'Service Ref Type Code '
3979: || l_line_tbl (l_count).service_reference_type_code
3980: );
3981: fnd_file.put_line
3982: (fnd_file.LOG,
3983: 'Service line Id '
3984: || l_line_tbl (l_count).service_reference_line_id
3985: );

Line 3982: (fnd_file.LOG,

3978: 'Service Ref Type Code '
3979: || l_line_tbl (l_count).service_reference_type_code
3980: );
3981: fnd_file.put_line
3982: (fnd_file.LOG,
3983: 'Service line Id '
3984: || l_line_tbl (l_count).service_reference_line_id
3985: );
3986: fnd_file.put_line

Line 3986: fnd_file.put_line

3982: (fnd_file.LOG,
3983: 'Service line Id '
3984: || l_line_tbl (l_count).service_reference_line_id
3985: );
3986: fnd_file.put_line
3987: (fnd_file.LOG,
3988: 'Profile option value '
3989: || fnd_profile.VALUE
3990: ('OKS_CONTRACTS_VALIDATION_SOURCE')

Line 3987: (fnd_file.LOG,

3983: 'Service line Id '
3984: || l_line_tbl (l_count).service_reference_line_id
3985: );
3986: fnd_file.put_line
3987: (fnd_file.LOG,
3988: 'Profile option value '
3989: || fnd_profile.VALUE
3990: ('OKS_CONTRACTS_VALIDATION_SOURCE')
3991: );

Line 4008: fnd_file.put_line (fnd_file.LOG,

4004:
4005: --Check Delayed Service
4006: IF (l_exists <> 'x')
4007: THEN
4008: fnd_file.put_line (fnd_file.LOG,
4009: 'Order line not present already...'
4010: );
4011:
4012: IF NVL (l_line_tbl (l_count).service_reference_type_code,

Line 4034: fnd_file.put_line (fnd_file.LOG,

4030: END IF;
4031:
4032: CLOSE l_order_csr;
4033:
4034: fnd_file.put_line (fnd_file.LOG,
4035: 'Fulfillment Quantity '
4036: || l_order_rec.fqty
4037: );
4038: fnd_file.put_line (fnd_file.LOG,

Line 4038: fnd_file.put_line (fnd_file.LOG,

4034: fnd_file.put_line (fnd_file.LOG,
4035: 'Fulfillment Quantity '
4036: || l_order_rec.fqty
4037: );
4038: fnd_file.put_line (fnd_file.LOG,
4039: 'Order Org Id '
4040: || l_order_rec.org_id
4041: );
4042: fnd_file.put_line (fnd_file.LOG,

Line 4042: fnd_file.put_line (fnd_file.LOG,

4038: fnd_file.put_line (fnd_file.LOG,
4039: 'Order Org Id '
4040: || l_order_rec.org_id
4041: );
4042: fnd_file.put_line (fnd_file.LOG,
4043: 'Order Organization Id '
4044: || l_order_rec.ship_from_org_id
4045: );
4046: fnd_file.put_line (fnd_file.LOG,

Line 4046: fnd_file.put_line (fnd_file.LOG,

4042: fnd_file.put_line (fnd_file.LOG,
4043: 'Order Organization Id '
4044: || l_order_rec.ship_from_org_id
4045: );
4046: fnd_file.put_line (fnd_file.LOG,
4047: 'Sold from Org Id '
4048: || l_order_rec.sold_from_org_id
4049: );
4050: okc_context.set_okc_org_context (l_order_rec.org_id,

Line 4052: fnd_file.put_line (fnd_file.LOG,

4048: || l_order_rec.sold_from_org_id
4049: );
4050: okc_context.set_okc_org_context (l_order_rec.org_id,
4051: NULL);
4052: fnd_file.put_line (fnd_file.LOG,
4053: 'org_context - '
4054: || TO_CHAR (okc_context.get_okc_org_id)
4055: );
4056: fnd_file.put_line

Line 4056: fnd_file.put_line

4052: fnd_file.put_line (fnd_file.LOG,
4053: 'org_context - '
4054: || TO_CHAR (okc_context.get_okc_org_id)
4055: );
4056: fnd_file.put_line
4057: (fnd_file.LOG,
4058: 'organization_context - '
4059: || TO_CHAR
4060: (okc_context.get_okc_organization_id)

Line 4057: (fnd_file.LOG,

4053: 'org_context - '
4054: || TO_CHAR (okc_context.get_okc_org_id)
4055: );
4056: fnd_file.put_line
4057: (fnd_file.LOG,
4058: 'organization_context - '
4059: || TO_CHAR
4060: (okc_context.get_okc_organization_id)
4061: );

Line 4092: fnd_file.put_line (fnd_file.LOG,

4088: INTO l_hdrid, l_ord_num;
4089:
4090: IF l_order_hdr_csr%NOTFOUND
4091: THEN
4092: fnd_file.put_line (fnd_file.LOG,
4093: ' Invalid Order line ID'
4094: );
4095:
4096: CLOSE l_order_hdr_csr;

Line 4100: fnd_file.put_line (fnd_file.LOG,

4096: CLOSE l_order_hdr_csr;
4097: ELSE
4098: CLOSE l_order_hdr_csr;
4099:
4100: fnd_file.put_line (fnd_file.LOG,
4101: 'Order Header ID ' || l_hdrid
4102: );
4103: l_repv_rec.order_id := l_hdrid;
4104: l_repv_rec.order_line_id :=

Line 4120: fnd_file.put_line

4116: x_msg_data => l_msg_data,
4117: p_repv_rec => l_repv_rec,
4118: x_repv_rec => l_out_repv_rec
4119: );
4120: fnd_file.put_line
4121: (fnd_file.LOG,
4122: 'OKS_REP_PUB - RETURN STATUS : '
4123: || l_return_status
4124: );

Line 4121: (fnd_file.LOG,

4117: p_repv_rec => l_repv_rec,
4118: x_repv_rec => l_out_repv_rec
4119: );
4120: fnd_file.put_line
4121: (fnd_file.LOG,
4122: 'OKS_REP_PUB - RETURN STATUS : '
4123: || l_return_status
4124: );
4125:

Line 4153: fnd_file.put_line

4149: dup_val := 'Y';
4150: EXIT;
4151: END IF;
4152:
4153: fnd_file.put_line
4154: (fnd_file.LOG,
4155: 'oks_rep_pub.insert_row: '
4156: || l_msg_data
4157: );

Line 4154: (fnd_file.LOG,

4150: EXIT;
4151: END IF;
4152:
4153: fnd_file.put_line
4154: (fnd_file.LOG,
4155: 'oks_rep_pub.insert_row: '
4156: || l_msg_data
4157: );
4158: END LOOP;

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

4168: END IF;
4169: END IF;
4170: END IF;
4171: ELSE
4172: fnd_file.put_line (fnd_file.LOG, 'Duplicate Order Line');
4173: END IF;
4174: END LOOP;
4175: END IF;
4176: END LOOP;

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

4177:
4178: errbuf := '';
4179: retcode := 0;
4180: COMMIT WORK;
4181: fnd_file.put_line (fnd_file.LOG, 'Order Capture INT Program finished.');
4182: EXCEPTION
4183: WHEN g_exception_halt_validation
4184: THEN
4185: ROLLBACK TO before_insert;

Line 4192: fnd_file.put_line (fnd_file.LOG,

4188: ROLLBACK TO before_insert;
4189: -- Retrieve error message into errbuf
4190: errbuf := SQLERRM;
4191: retcode := 2;
4192: fnd_file.put_line (fnd_file.LOG,
4193: 'Oracle Error Code is -' || TO_CHAR (SQLCODE)
4194: );
4195: fnd_file.put_line (fnd_file.LOG,
4196: 'Oracle Error Message is -'

Line 4195: fnd_file.put_line (fnd_file.LOG,

4191: retcode := 2;
4192: fnd_file.put_line (fnd_file.LOG,
4193: 'Oracle Error Code is -' || TO_CHAR (SQLCODE)
4194: );
4195: fnd_file.put_line (fnd_file.LOG,
4196: 'Oracle Error Message is -'
4197: || SUBSTR (SQLERRM, 1, 512)
4198: );
4199: END migrate_aso_queue;