DBA Data[Home] [Help]

APPS.PO_SOURCING_RULES_SV dependencies on PO_DEBUG

Line 146: PO_DEBUG.put_line(' Creating sourcing rule for the item ...');

142:
143: --Setting of this flag is now done before the call to the procedure.
144: --X_header_processable_flag := 'Y'; --
145: IF (g_po_pdoi_write_to_file = 'Y') THEN
146: PO_DEBUG.put_line(' Creating sourcing rule for the item ...');
147: END IF;
148:
149:
150: ----

Line 187: PO_DEBUG.put_line(' Creating call rule for the item ...');

183: IF ((X_header_processable_flag = 'Y') and
184: ((p_create_update_code = 'CREATE')
185: OR (p_create_update_code ='CREATE_UPDATE'))) THEN
186: IF (g_po_pdoi_write_to_file = 'Y') THEN
187: PO_DEBUG.put_line(' Creating call rule for the item ...');
188: END IF;
189: PO_SOURCING_RULES_SV.create_sourcing_rule(
190: x_interface_header_id =>p_interface_header_id,
191: x_interface_line_id =>p_interface_line_id,

Line 394: PO_DEBUG.put_line(' Vendor Site from doc: ' || to_char (x_vendor_site_id));

390:
391: --
392:
393: IF (g_po_pdoi_write_to_file = 'Y') THEN
394: PO_DEBUG.put_line(' Vendor Site from doc: ' || to_char (x_vendor_site_id));
395: END IF;
396:
397:
398: -- Check to see if there is an item level assignment for

Line 455: PO_DEBUG.put_line(' Inserting Record in Mrp Sourcing Rules');

451:
452: X_progress := '030';
453: IF (x_sourcing_rule_id is NULL) THEN
454: IF (g_po_pdoi_write_to_file = 'Y') THEN
455: PO_DEBUG.put_line(' Inserting Record in Mrp Sourcing Rules');
456: END IF;
457:
458: SELECT MRP_SOURCING_RULES_S.NEXTVAL
459: INTO x_sourcing_rule_id

Line 489: PO_DEBUG.put_line(' Inserting Record in Mrp Sr Receipt Org');

485: 1 -- planning_active (1=ACTIVE)
486: );
487:
488: IF (g_po_pdoi_write_to_file = 'Y') THEN
489: PO_DEBUG.put_line(' Inserting Record in Mrp Sr Receipt Org');
490: END IF;
491:
492: SELECT MRP_SR_RECEIPT_ORG_S.NEXTVAL
493: INTO x_sr_receipt_id

Line 523: PO_DEBUG.put_line(' Inserting Record in Mrp Sr Source Org');

519: l_organization_id----
520: );
521:
522: IF (g_po_pdoi_write_to_file = 'Y') THEN
523: PO_DEBUG.put_line(' Inserting Record in Mrp Sr Source Org');
524: END IF;
525:
526: X_progress := '050';
527: SELECT MRP_SR_SOURCE_ORG_S.NEXTVAL

Line 561: PO_DEBUG.put_line(' Assigning Sourcing Rule at Item level');

557: x_last_update_login
558: );
559:
560: IF (g_po_pdoi_write_to_file = 'Y') THEN
561: PO_DEBUG.put_line(' Assigning Sourcing Rule at Item level');
562: END IF;
563:
564: X_progress := '060';
565: -- Assign at Item level

Line 584: PO_DEBUG.put_line('Cannot create ASL entry; item not defined in inv org. Insert warning msg');

580:
581: EXCEPTION
582: WHEN NO_DATA_FOUND THEN
583: IF (g_po_pdoi_write_to_file = 'Y') THEN
584: PO_DEBUG.put_line('Cannot create ASL entry; item not defined in inv org. Insert warning msg');
585: END IF;
586: PO_INTERFACE_ERRORS_SV1.handle_interface_errors
587: ( x_interface_type => 'PO_DOCS_OPEN_INTERFACE'
588: , x_error_type => 'WARNING'

Line 667: PO_DEBUG.put_line(v_error_msg);

663: --
664: v_error_code := SQLCODE;
665: v_error_msg := SUBSTR (SQLERRM, 1, 2000);
666: IF (g_po_pdoi_write_to_file = 'Y') THEN
667: PO_DEBUG.put_line(v_error_msg);
668: PO_DEBUG.put_line(v_error_code);
669: END IF;
670: --
671:

Line 668: PO_DEBUG.put_line(v_error_code);

664: v_error_code := SQLCODE;
665: v_error_msg := SUBSTR (SQLERRM, 1, 2000);
666: IF (g_po_pdoi_write_to_file = 'Y') THEN
667: PO_DEBUG.put_line(v_error_msg);
668: PO_DEBUG.put_line(v_error_code);
669: END IF;
670: --
671:
672: --dbms_output.put_line('...2');

Line 869: PO_DEBUG.put_line(' Vendor Site: ' || to_char (x_vendor_site_id));

865:
866: --
867:
868: IF (g_po_pdoi_write_to_file = 'Y') THEN
869: PO_DEBUG.put_line(' Vendor Site: ' || to_char (x_vendor_site_id));
870: END IF;
871: SELECT count(*) into x_within_vendor_cnt
872: FROM
873: mrp_sr_receipt_org msro,

Line 886: PO_DEBUG.put_line(' x_within_vendor_cnt: ' || to_char (x_within_vendor_cnt));

882: AND (msso.vendor_site_id = x_vendor_site_id or
883: (msso.vendor_site_id is NULL and x_vendor_site_id is null));
884:
885: IF (g_po_pdoi_write_to_file = 'Y') THEN
886: PO_DEBUG.put_line(' x_within_vendor_cnt: ' || to_char (x_within_vendor_cnt));
887: END IF;
888:
889: SELECT count(*)
890: INTO x_assignment_count

Line 895: PO_DEBUG.put_line(' x_assignment_count: ' || to_char(x_assignment_count));

891: FROM mrp_sr_assignments
892: WHERE sourcing_rule_id = x_sourcing_rule_id;
893:
894: IF (g_po_pdoi_write_to_file = 'Y') THEN
895: PO_DEBUG.put_line(' x_assignment_count: ' || to_char(x_assignment_count));
896: END IF;
897:
898: SELECT count(*)
899: INTO x_item_assignment_count

Line 907: PO_DEBUG.put_line(' x_item_assignment_count: ' || to_char (x_item_assignment_count));

903: AND inventory_item_id = X_item_id
904: AND assignment_set_id = X_assignment_set_id ;
905:
906: IF (g_po_pdoi_write_to_file = 'Y') THEN
907: PO_DEBUG.put_line(' x_item_assignment_count: ' || to_char (x_item_assignment_count));
908: END IF;
909:
910: /* If x_within_vendor_cnt is 0, then it means that there is no
911: * sourcing rule with the same encompassing effective dates and

Line 936: PO_DEBUG.put_line(' The existing sourcing rule is assgned elsewhere and does not

932:
933: -- insert into po interface errors
934:
935: IF (g_po_pdoi_write_to_file = 'Y') THEN
936: PO_DEBUG.put_line(' The existing sourcing rule is assgned elsewhere and does not
937: match with the vendor provided in the blanket');
938: END IF;
939:
940: X_process_flag := 'N';

Line 967: PO_DEBUG.put_line(' Startdate' || to_char(x_start_date,'dd-mon-yy'));

963: OPEN C2;
964: FETCH C2 INTO x_sr_receipt_id, x_effective_date, x_disable_date;
965:
966: IF (g_po_pdoi_write_to_file = 'Y') THEN
967: PO_DEBUG.put_line(' Startdate' || to_char(x_start_date,'dd-mon-yy'));
968: PO_DEBUG.put_line(' End date' || to_char (x_end_date,'dd-mon-yy'));
969: END IF;
970:
971:

Line 968: PO_DEBUG.put_line(' End date' || to_char (x_end_date,'dd-mon-yy'));

964: FETCH C2 INTO x_sr_receipt_id, x_effective_date, x_disable_date;
965:
966: IF (g_po_pdoi_write_to_file = 'Y') THEN
967: PO_DEBUG.put_line(' Startdate' || to_char(x_start_date,'dd-mon-yy'));
968: PO_DEBUG.put_line(' End date' || to_char (x_end_date,'dd-mon-yy'));
969: END IF;
970:
971:
972: IF C2%FOUND THEN

Line 980: PO_DEBUG.put_line(' The effectivity dates do not match');

976:
977: -- insert into po interface errors
978:
979: IF (g_po_pdoi_write_to_file = 'Y') THEN
980: PO_DEBUG.put_line(' The effectivity dates do not match');
981: END IF;
982:
983: X_process_flag := 'N';
984: po_interface_errors_sv1.handle_interface_errors(

Line 1182: PO_DEBUG.put_line(' Check to see if the effectivity dates of new sourcing rule falls within the existing sourcing rules effectivity dates');

1178: If it does then dont do anything and proceed further else
1179: insert into mrp_sr_receipt_org */
1180:
1181: IF (g_po_pdoi_write_to_file = 'Y') THEN
1182: PO_DEBUG.put_line(' Check to see if the effectivity dates of new sourcing rule falls within the existing sourcing rules effectivity dates');
1183: END IF;
1184:
1185:
1186: IF (g_po_pdoi_write_to_file = 'Y') THEN

Line 1187: PO_DEBUG.put_line(' Inserting Record MSRO for existing rule');

1183: END IF;
1184:
1185:
1186: IF (g_po_pdoi_write_to_file = 'Y') THEN
1187: PO_DEBUG.put_line(' Inserting Record MSRO for existing rule');
1188: END IF;
1189:
1190: X_progress := '080';
1191: SELECT count(*) into x_sourcing_rule_within

Line 1243: PO_DEBUG.put_line(' Vendor Rank' || to_char(x_vendor_rank));

1239: FROM MRP_SR_SOURCE_ORG MSSO
1240: WHERE sr_receipt_id = x_sr_receipt_id;
1241:
1242: IF (g_po_pdoi_write_to_file = 'Y') THEN
1243: PO_DEBUG.put_line(' Vendor Rank' || to_char(x_vendor_rank));
1244: PO_DEBUG.put_line(' Inserting Record MSSO for existing rule');
1245: END IF;
1246:
1247: INSERT INTO MRP_SR_SOURCE_ORG(

Line 1244: PO_DEBUG.put_line(' Inserting Record MSSO for existing rule');

1240: WHERE sr_receipt_id = x_sr_receipt_id;
1241:
1242: IF (g_po_pdoi_write_to_file = 'Y') THEN
1243: PO_DEBUG.put_line(' Vendor Rank' || to_char(x_vendor_rank));
1244: PO_DEBUG.put_line(' Inserting Record MSSO for existing rule');
1245: END IF;
1246:
1247: INSERT INTO MRP_SR_SOURCE_ORG(
1248: sr_source_id,

Line 1282: PO_DEBUG.put_line(' New Vendor Rank ' || to_char(x_vendor_rank));

1278: END IF; -- C2%FOUND
1279:
1280: ELSE -- if c1%notfound
1281: IF (g_po_pdoi_write_to_file = 'Y') THEN
1282: PO_DEBUG.put_line(' New Vendor Rank ' || to_char(x_vendor_rank));
1283: END IF;
1284: X_progress := '090';
1285:
1286: -- Check to see if the item already has a sourcing rule with the same

Line 1306: PO_DEBUG.put_line(' The sourcing rule for this effectivity date already has this vendor');

1302:
1303: IF x_vendor_count_on_sr > 0 THEN
1304:
1305: IF (g_po_pdoi_write_to_file = 'Y') THEN
1306: PO_DEBUG.put_line(' The sourcing rule for this effectivity date already has this vendor');
1307: END IF;
1308:
1309: -- It is Not an error as we may still need to add the
1310: -- document to the ASL.

Line 1327: PO_DEBUG.put_line(' New Vendor Rank ' || to_char(x_vendor_rank));

1323: FROM MRP_SR_SOURCE_ORG MSSO
1324: WHERE sr_receipt_id = x_sr_receipt_id;
1325:
1326: IF (g_po_pdoi_write_to_file = 'Y') THEN
1327: PO_DEBUG.put_line(' New Vendor Rank ' || to_char(x_vendor_rank));
1328: END IF;
1329:
1330: INSERT INTO MRP_SR_SOURCE_ORG(
1331: sr_source_id,

Line 1369: PO_DEBUG.put_line('Assigning Sourcing Rule at Item level');

1365: item to the assignment set below. */
1366: if ((X_temp_sourcing_rule_id is not null) and
1367: (X_header_processable_flag = 'Y')) then
1368: IF (g_po_pdoi_write_to_file = 'Y') THEN
1369: PO_DEBUG.put_line('Assigning Sourcing Rule at Item level');
1370: END IF;
1371:
1372: X_progress := '110';
1373: /* FPH. In the where claue below we used to check

Line 1399: PO_DEBUG.put_line('Cannot create ASL entry; item not defined in inv org. Insert warning msg');

1395:
1396: EXCEPTION
1397: WHEN NO_DATA_FOUND THEN
1398: IF (g_po_pdoi_write_to_file = 'Y') THEN
1399: PO_DEBUG.put_line('Cannot create ASL entry; item not defined in inv org. Insert warning msg');
1400: END IF;
1401: PO_INTERFACE_ERRORS_SV1.handle_interface_errors
1402: ( x_interface_type => 'PO_DOCS_OPEN_INTERFACE'
1403: , x_error_type => 'WARNING'

Line 1472: PO_DEBUG.put_line(v_error_msg);

1468: WHEN OTHERS THEN
1469: v_error_code := SQLCODE;
1470: v_error_msg := SUBSTR (SQLERRM, 1, 2000);
1471: IF (g_po_pdoi_write_to_file = 'Y') THEN
1472: PO_DEBUG.put_line(v_error_msg);
1473: PO_DEBUG.put_line(v_error_code);
1474: END IF;
1475: x_running_status := 'N';
1476: x_header_processable_flag := 'N';

Line 1473: PO_DEBUG.put_line(v_error_code);

1469: v_error_code := SQLCODE;
1470: v_error_msg := SUBSTR (SQLERRM, 1, 2000);
1471: IF (g_po_pdoi_write_to_file = 'Y') THEN
1472: PO_DEBUG.put_line(v_error_msg);
1473: PO_DEBUG.put_line(v_error_code);
1474: END IF;
1475: x_running_status := 'N';
1476: x_header_processable_flag := 'N';
1477: po_message_s.sql_error('update_sourcing_rule', x_progress, sqlcode);

Line 1499: PO_DEBUG.put_line(' Validating sourcing rule Inputs ...');

1495: x_asl_status_id number := null;
1496: X_progress VARCHAR2(3) := NULL;
1497: begin
1498: IF (g_po_pdoi_write_to_file = 'Y') THEN
1499: PO_DEBUG.put_line(' Validating sourcing rule Inputs ...');
1500: END IF;
1501:
1502: X_progress := '020';
1503: IF (X_start_date is not null) AND (X_end_date is not null) THEN

Line 1607: PO_DEBUG.put_line(' ** ERROR: Please set the following site level profile option');

1603:
1604: ----
1605: IF x_assignment_set_id IS NULL THEN
1606: IF (g_po_pdoi_write_to_file = 'Y') THEN
1607: PO_DEBUG.put_line(' ** ERROR: Please set the following site level profile option');
1608: PO_DEBUG.put_line(' ** before proceeding with this upgrade: ');
1609: PO_DEBUG.put_line(' ** MRP: Default Sourcing Assignment Set');
1610: END IF;
1611: X_process_flag := 'N';

Line 1608: PO_DEBUG.put_line(' ** before proceeding with this upgrade: ');

1604: ----
1605: IF x_assignment_set_id IS NULL THEN
1606: IF (g_po_pdoi_write_to_file = 'Y') THEN
1607: PO_DEBUG.put_line(' ** ERROR: Please set the following site level profile option');
1608: PO_DEBUG.put_line(' ** before proceeding with this upgrade: ');
1609: PO_DEBUG.put_line(' ** MRP: Default Sourcing Assignment Set');
1610: END IF;
1611: X_process_flag := 'N';
1612: po_interface_errors_sv1.handle_interface_errors(

Line 1609: PO_DEBUG.put_line(' ** MRP: Default Sourcing Assignment Set');

1605: IF x_assignment_set_id IS NULL THEN
1606: IF (g_po_pdoi_write_to_file = 'Y') THEN
1607: PO_DEBUG.put_line(' ** ERROR: Please set the following site level profile option');
1608: PO_DEBUG.put_line(' ** before proceeding with this upgrade: ');
1609: PO_DEBUG.put_line(' ** MRP: Default Sourcing Assignment Set');
1610: END IF;
1611: X_process_flag := 'N';
1612: po_interface_errors_sv1.handle_interface_errors(
1613: X_po_interface_error_code,