DBA Data[Home] [Help]

APPS.GMD_VALIDITY_RULES_PVT dependencies on GMD_DEBUG

Line 425: gmd_debug.put_line(m_pkg_name||'.'||l_api_name

421: BEGIN
422: x_return_status := 'S';
423: FOR VR_dup_rec IN Cur_check_dup_upd LOOP
424: IF (l_debug = 'Y') THEN
425: gmd_debug.put_line(m_pkg_name||'.'||l_api_name
426: ||': Duplicate VR id = '||VR_dup_rec.recipe_validity_rule_id);
427:
428: END IF;
429: FND_MESSAGE.SET_NAME('GMD','GMD_DUP_VR_EXIST');

Line 548: gmd_debug.put_line(m_pkg_name||'.'||l_api_name

544: /* Set the return status to success initially */
545: x_return_status := FND_API.G_RET_STS_SUCCESS;
546:
547: IF (l_debug = 'Y') THEN
548: gmd_debug.put_line(m_pkg_name||'.'||l_api_name
549: ||' : About to get the db VR record for VR id = '
550: ||p_validity_rule_id);
551: END IF;
552:

Line 569: gmd_debug.put_line(m_pkg_name||'.'||l_api_name||' : The column to be updated = '

565: assign or replace the old value with the table value */
566: FOR i IN 1 .. p_update_table.count LOOP
567:
568: IF (l_debug = 'Y') THEN
569: gmd_debug.put_line(m_pkg_name||'.'||l_api_name||' : The column to be updated = '
570: ||p_update_table(i).p_col_to_update||' and value = '
571: ||p_update_table(i).p_value);
572: END IF;
573:

Line 598: gmd_debug.put_line(m_pkg_name||'.'||l_api_name||

594: ELSIF (UPPER(p_update_table(i).p_col_to_update) = 'PREFERENCE') THEN
595: l_old_vr_rec.PREFERENCE := p_update_table(i).p_value;
596: ELSIF (UPPER(p_update_table(i).p_col_to_update) = 'START_DATE') THEN
597: IF (l_debug = 'Y') THEN
598: gmd_debug.put_line(m_pkg_name||'.'||l_api_name||
599: ' : Before conversion of Start date - '||
600: ' CharDT to Date Format ');
601: END IF;
602: l_old_vr_rec.START_DATE := FND_DATE.canonical_to_date(p_update_table(i).p_value);

Line 604: gmd_debug.put_line(m_pkg_name||'.'||l_api_name

600: ' CharDT to Date Format ');
601: END IF;
602: l_old_vr_rec.START_DATE := FND_DATE.canonical_to_date(p_update_table(i).p_value);
603: IF (l_debug = 'Y') THEN
604: gmd_debug.put_line(m_pkg_name||'.'||l_api_name
605: ||' : After conversion of CharDT to Date '||
606: ' Start Date = '||l_old_vr_rec.START_DATE);
607: END IF;
608: ELSIF (UPPER(p_update_table(i).p_col_to_update) = 'END_DATE') THEN

Line 610: gmd_debug.put_line(m_pkg_name||'.'||l_api_name

606: ' Start Date = '||l_old_vr_rec.START_DATE);
607: END IF;
608: ELSIF (UPPER(p_update_table(i).p_col_to_update) = 'END_DATE') THEN
609: IF (l_debug = 'Y') THEN
610: gmd_debug.put_line(m_pkg_name||'.'||l_api_name
611: ||' : Before conversion of end date - '
612: ||' CharDT to Date Format '||p_update_table(i).p_value);
613: END IF;
614: l_old_vr_rec.END_DATE := FND_DATE.canonical_to_date(p_update_table(i).p_value);

Line 616: gmd_debug.put_line(m_pkg_name||'.'||l_api_name

612: ||' CharDT to Date Format '||p_update_table(i).p_value);
613: END IF;
614: l_old_vr_rec.END_DATE := FND_DATE.canonical_to_date(p_update_table(i).p_value);
615: IF (l_debug = 'Y') THEN
616: gmd_debug.put_line(m_pkg_name||'.'||l_api_name
617: ||' : After conversion of CharDT to Date '||
618: ' End Date = '||l_old_vr_rec.END_DATE);
619: END IF;
620:

Line 716: gmd_debug.put_line(m_pkg_name||'.'||l_api_name||': '||

712: RAISE vr_update_failure;
713: END IF;
714:
715: IF (l_debug = 'Y') THEN
716: gmd_debug.put_line(m_pkg_name||'.'||l_api_name||': '||
717: 'Assigned all values - Now performing indv validations ');
718: END IF;
719:
720: /* Chcek if update is allowed */

Line 733: gmd_debug.put_line(m_pkg_name||'.'||l_api_name||': Val 1 '||

729: /* Compare Dates - if the last update date passed in via the API is less than
730: the last update in the db - it indicates someelse has updated this row after this
731: row was selected */
732: IF (l_debug = 'Y') THEN
733: gmd_debug.put_line(m_pkg_name||'.'||l_api_name||': Val 1 '||
734: 'Comparing last updates to check if there any locking issues ');
735: END IF;
736:
737: OPEN Get_db_last_update_date(p_Validity_rule_id);

Line 752: gmd_debug.put_line(m_pkg_name||'.'||l_api_name||': Val 2 '||

748: RAISE last_update_date_failure;
749: END IF;
750:
751: IF (l_debug = 'Y') THEN
752: gmd_debug.put_line(m_pkg_name||'.'||l_api_name||': Val 2 '||
753: 'Start and End Date validation '||l_old_vr_rec.start_date||
754: ' - '||l_old_vr_rec.end_date);
755: END IF;
756:

Line 772: gmd_debug.put_line(m_pkg_name||'.'||l_api_name||': Val 2c '||

768: IF (UPPER(p_update_table(i).p_col_to_update) IN ('START_DATE','END_DATE')) THEN
769:
770: -- Validity rule start and end date validation
771: IF (l_debug = 'Y') THEN
772: gmd_debug.put_line(m_pkg_name||'.'||l_api_name||': Val 2c '||
773: 'Checking if end date ( '||l_old_vr_rec.end_date||' ) '||
774: ' > '||' start date ( '||l_old_vr_rec.start_date||' ) ');
775: END IF;
776: -- Comparing Vr start and End dates

Line 787: gmd_debug.put_line(m_pkg_name||'.'||l_api_name||': Val 2a0 '||

783: END IF;
784:
785: -- Comparing Vr dates with Routing Dates
786: IF (l_debug = 'Y') THEN
787: gmd_debug.put_line(m_pkg_name||'.'||l_api_name||': Val 2a0 '||
788: 'Comparing Vr dates with Routing Dates ');
789: END IF;
790:
791: FOR get_routing_rec in Get_Routing_Details(p_validity_rule_id) LOOP

Line 794: gmd_debug.put_line(m_pkg_name||'.'||l_api_name

790:
791: FOR get_routing_rec in Get_Routing_Details(p_validity_rule_id) LOOP
792: -- Get the routing start date if applicable
793: IF (l_debug = 'Y') THEN
794: gmd_debug.put_line(m_pkg_name||'.'||l_api_name
795: ||': The vr start date = '||l_old_vr_rec.start_date
796: ||' rout start date = '||get_routing_rec.effective_start_date);
797: gmd_debug.put_line(m_pkg_name||'.'||l_api_name
798: ||': The Vr end date = '||l_old_vr_rec.end_date

Line 797: gmd_debug.put_line(m_pkg_name||'.'||l_api_name

793: IF (l_debug = 'Y') THEN
794: gmd_debug.put_line(m_pkg_name||'.'||l_api_name
795: ||': The vr start date = '||l_old_vr_rec.start_date
796: ||' rout start date = '||get_routing_rec.effective_start_date);
797: gmd_debug.put_line(m_pkg_name||'.'||l_api_name
798: ||': The Vr end date = '||l_old_vr_rec.end_date
799: ||' rout end date = '||get_routing_rec.effective_end_date);
800: END IF;
801:

Line 803: gmd_debug.put_line(m_pkg_name||'.'||l_api_name||': Val 2a '||

799: ||' rout end date = '||get_routing_rec.effective_end_date);
800: END IF;
801:
802: IF (l_debug = 'Y') THEN
803: gmd_debug.put_line(m_pkg_name||'.'||l_api_name||': Val 2a '||
804: 'Checking if VR start date > Routing start date ');
805: END IF;
806:
807: validate_start_date (P_disp_start_date => l_old_vr_rec.start_date,

Line 816: gmd_debug.put_line(m_pkg_name||'.'||l_api_name||': Val 2b '||

812: END IF;
813:
814: -- Get the routing start date if applicable
815: IF (l_debug = 'Y') THEN
816: gmd_debug.put_line(m_pkg_name||'.'||l_api_name||': Val 2b '||
817: 'Chceking if VR end date < Routing end date ');
818: END IF;
819: validate_end_date (P_end_date => l_old_vr_rec.end_date,
820: P_routing_end_date => get_routing_rec.effective_end_date,

Line 831: gmd_debug.put_line(m_pkg_name||'.'||l_api_name||': Val 3 '

827:
828: END IF; -- When start or end dates are updated
829:
830: IF (l_debug = 'Y') THEN
831: gmd_debug.put_line(m_pkg_name||'.'||l_api_name||': Val 3 '
832: ||' : About to validate std qty '
833: ||'The min qty < max qty < std qty = '
834: ||l_old_vr_rec.min_qty||' - '||l_old_vr_rec.max_qty
835: ||' - '||l_old_vr_rec.std_qty);

Line 844: gmd_debug.put_line(m_pkg_name||'.'||l_api_name||': Val 3 '||

840: IN ('STD_QTY','MIN_QTY','MAX_QTY')) THEN
841: -- Check if scale type at formula header is fixed, if yes then
842: -- the qty's fields cannot be updated
843: IF (l_debug = 'Y') THEN
844: gmd_debug.put_line(m_pkg_name||'.'||l_api_name||': Val 3 '||
845: 'Checking if formula hdr is fixed scaled ');
846: END IF;
847:
848: OPEN check_fmhdr_fixed_scale(l_old_vr_rec.Recipe_id);

Line 861: gmd_debug.put_line(m_pkg_name||'.'||l_api_name||': Val 3 '||

857:
858: -- Check if scale type at formula dtl for the VR product is fixed, if yes then
859: -- the qty's fields cannot be updated
860: IF (l_debug = 'Y') THEN
861: gmd_debug.put_line(m_pkg_name||'.'||l_api_name||': Val 3 '||
862: 'Checking if formula dtl is fixed scaled ');
863: END IF;
864:
865: OPEN check_fmdtl_fixed_scale(l_old_vr_rec.Recipe_id, l_old_vr_rec.inventory_item_id); -- NPD Conv.

Line 885: gmd_debug.put_line(m_pkg_name||'.'||l_api_name

881: FROM mtl_system_items
882: WHERE inventory_item_id = l_old_vr_rec.inventory_item_id;
883:
884: IF (l_debug = 'Y') THEN
885: gmd_debug.put_line(m_pkg_name||'.'||l_api_name
886: ||': Val 4: About to calc inv min/max qty '
887: ||'The min qty, max qty = '
888: ||l_old_vr_rec.min_qty||' - '||l_old_vr_rec.max_qty);
889: END IF;

Line 906: gmd_debug.put_line(m_pkg_name||'.'||l_api_name||': About to calc process loss '

902: END IF;
903: END IF;
904:
905: IF (l_debug = 'Y') THEN
906: gmd_debug.put_line(m_pkg_name||'.'||l_api_name||': About to calc process loss '
907: ||'The min qty, max qty and std qty = '
908: ||l_old_vr_rec.min_qty||' - '||l_old_vr_rec.max_qty
909: ||' - '||l_old_vr_rec.std_qty);
910: END IF;

Line 927: gmd_debug.put_line(m_pkg_name||'.'||l_api_name||': About to check for duplicates ');

923: END IF;
924: END IF;
925:
926: IF (l_debug = 'Y') THEN
927: gmd_debug.put_line(m_pkg_name||'.'||l_api_name||': About to check for duplicates ');
928: END IF;
929:
930: IF (l_debug = 'Y') THEN
931: gmd_debug.put_line(m_pkg_name||'.'||l_api_name||': Val 6: About to check for duplicates '

Line 931: gmd_debug.put_line(m_pkg_name||'.'||l_api_name||': Val 6: About to check for duplicates '

927: gmd_debug.put_line(m_pkg_name||'.'||l_api_name||': About to check for duplicates ');
928: END IF;
929:
930: IF (l_debug = 'Y') THEN
931: gmd_debug.put_line(m_pkg_name||'.'||l_api_name||': Val 6: About to check for duplicates '
932: ||'The min qty, max qty and std qty = '
933: ||l_old_vr_rec.min_qty||' - '||l_old_vr_rec.max_qty
934: ||' - '||l_old_vr_rec.std_qty);
935: END IF;

Line 965: gmd_debug.put_line(m_pkg_name||'.'||l_api_name

961: RAISE vr_update_failure;
962: END IF;
963:
964: IF (l_debug = 'Y') THEN
965: gmd_debug.put_line(m_pkg_name||'.'||l_api_name
966: ||': Before Final update : About to Update Val Rules '
967: ||'The min qty, max qty and std qty = '
968: ||l_old_vr_rec.min_qty||' - '||l_old_vr_rec.max_qty
969: ||' - '||l_old_vr_rec.std_qty);

Line 1007: gmd_debug.put_line(m_pkg_name||'.'||l_api_name||': Val 3 '||

1003:
1004: -- Bug 5024092 Kapil M
1005: -- Moved the stnd qty and min max qty check out of above loop.
1006: IF (l_debug = 'Y') THEN
1007: gmd_debug.put_line(m_pkg_name||'.'||l_api_name||': Val 3 '||
1008: 'Checking if min qty < std qty < max qty ');
1009: END IF;
1010: -- Checks if std_qty is between min and max qty
1011:

Line 1023: gmd_debug.put_line(m_pkg_name||'.'||l_api_name||': About to validate max qty '

1019: RAISE vr_update_failure;
1020: END IF;
1021:
1022: IF (l_debug = 'Y') THEN
1023: gmd_debug.put_line(m_pkg_name||'.'||l_api_name||': About to validate max qty '
1024: ||'The min qty, max qty = '
1025: ||l_old_vr_rec.min_qty||' - '||l_old_vr_rec.max_qty);
1026: END IF;
1027:

Line 1109: gmd_debug.put_line(m_pkg_name||'.'||l_api_name||': After Update of Val Rules ');

1105: RAISE vr_update_failure;
1106: END IF;
1107:
1108: IF (l_debug = 'Y') THEN
1109: gmd_debug.put_line(m_pkg_name||'.'||l_api_name||': After Update of Val Rules ');
1110: END IF;
1111:
1112: /* Check if work was done */
1113: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN

Line 1124: gmd_debug.put_line(m_pkg_name||'.'||l_api_name

1120: ,p_encoded => FND_API.g_false
1121: ,p_data => x_message_list);
1122:
1123: IF (l_debug = 'Y') THEN
1124: gmd_debug.put_line(m_pkg_name||'.'||l_api_name
1125: ||' Completed '||l_api_name
1126: ||' at '||to_char(sysdate,'MM/DD/YYYY HH24:MI:SS'));
1127: END IF;
1128: EXCEPTION

Line 1131: gmd_debug.put_line (m_pkg_name||'.'||l_api_name||':'||'API not complete');

1127: END IF;
1128: EXCEPTION
1129: WHEN vr_update_failure OR invalid_version THEN
1130: IF (l_debug = 'Y') THEN
1131: gmd_debug.put_line (m_pkg_name||'.'||l_api_name||':'||'API not complete');
1132: END IF;
1133: x_return_status := FND_API.G_RET_STS_ERROR;
1134: fnd_msg_pub.count_and_get (
1135: p_count => x_message_count

Line 1154: gmd_debug.put_line (m_pkg_name||'.'||l_api_name||':'||'When others exception:'||SQLERRM);

1150: ,p_encoded => FND_API.g_false
1151: ,p_data => x_message_list);
1152: WHEN OTHERS THEN
1153: IF (l_debug = 'Y') THEN
1154: gmd_debug.put_line (m_pkg_name||'.'||l_api_name||':'||'When others exception:'||SQLERRM);
1155: END IF;
1156: fnd_msg_pub.add_exc_msg (m_pkg_name, l_api_name);
1157: x_return_status := FND_API.g_ret_sts_unexp_error;
1158: fnd_msg_pub.count_and_get (