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 551: gmd_debug.put_line(m_pkg_name||'.'||l_api_name

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

894: WHERE inventory_item_id = l_old_vr_rec.inventory_item_id
895: and organization_id = nvl(l_old_vr_rec.organization_id, l_organization_id); -- Bug 14690148 pal need to stripe with org
896:
897: IF (l_debug = 'Y') THEN
898: gmd_debug.put_line(m_pkg_name||'.'||l_api_name
899: ||': Val 4: About to calc inv min/max qty '
900: ||'The min qty, max qty = '
901: ||l_old_vr_rec.min_qty||' - '||l_old_vr_rec.max_qty);
902: END IF;

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

915: END IF;
916: END IF;
917:
918: IF (l_debug = 'Y') THEN
919: gmd_debug.put_line(m_pkg_name||'.'||l_api_name||': About to calc process loss '
920: ||'The min qty, max qty and std qty = '
921: ||l_old_vr_rec.min_qty||' - '||l_old_vr_rec.max_qty
922: ||' - '||l_old_vr_rec.std_qty);
923: END IF;

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

936: END IF;
937: END IF;*/
938:
939: IF (l_debug = 'Y') THEN
940: gmd_debug.put_line(m_pkg_name||'.'||l_api_name||': About to check for duplicates ');
941: END IF;
942:
943: IF (l_debug = 'Y') THEN
944: gmd_debug.put_line(m_pkg_name||'.'||l_api_name||': Val 6: About to check for duplicates '

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

940: gmd_debug.put_line(m_pkg_name||'.'||l_api_name||': About to check for duplicates ');
941: END IF;
942:
943: IF (l_debug = 'Y') THEN
944: gmd_debug.put_line(m_pkg_name||'.'||l_api_name||': Val 6: About to check for duplicates '
945: ||'The min qty, max qty and std qty = '
946: ||l_old_vr_rec.min_qty||' - '||l_old_vr_rec.max_qty
947: ||' - '||l_old_vr_rec.std_qty);
948: END IF;

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

974: RAISE vr_update_failure;
975: END IF;
976:
977: IF (l_debug = 'Y') THEN
978: gmd_debug.put_line(m_pkg_name||'.'||l_api_name
979: ||': Before Final update : About to Update Val Rules '
980: ||'The min qty, max qty and std qty = '
981: ||l_old_vr_rec.min_qty||' - '||l_old_vr_rec.max_qty
982: ||' - '||l_old_vr_rec.std_qty);

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

1016:
1017: -- Bug 5024092 Kapil M
1018: -- Moved the stnd qty and min max qty check out of above loop.
1019: IF (l_debug = 'Y') THEN
1020: gmd_debug.put_line(m_pkg_name||'.'||l_api_name||': Val 3 '||
1021: 'Checking if min qty < std qty < max qty ');
1022: END IF;
1023: -- Checks if std_qty is between min and max qty
1024:

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

1032: RAISE vr_update_failure;
1033: END IF;
1034:
1035: IF (l_debug = 'Y') THEN
1036: gmd_debug.put_line(m_pkg_name||'.'||l_api_name||': About to validate max qty '
1037: ||'The min qty, max qty = '
1038: ||l_old_vr_rec.min_qty||' - '||l_old_vr_rec.max_qty);
1039: END IF;
1040:

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

1118: RAISE vr_update_failure;
1119: END IF;
1120:
1121: IF (l_debug = 'Y') THEN
1122: gmd_debug.put_line(m_pkg_name||'.'||l_api_name||': After Update of Val Rules ');
1123: END IF;
1124:
1125: /* Check if work was done */
1126: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN

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

1133: ,p_encoded => FND_API.g_false
1134: ,p_data => x_message_list);
1135:
1136: IF (l_debug = 'Y') THEN
1137: gmd_debug.put_line(m_pkg_name||'.'||l_api_name
1138: ||' Completed '||l_api_name
1139: ||' at '||to_char(sysdate,'MM/DD/YYYY HH24:MI:SS'));
1140: END IF;
1141: EXCEPTION

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

1140: END IF;
1141: EXCEPTION
1142: WHEN vr_update_failure OR invalid_version THEN
1143: IF (l_debug = 'Y') THEN
1144: gmd_debug.put_line (m_pkg_name||'.'||l_api_name||':'||'API not complete');
1145: END IF;
1146: x_return_status := FND_API.G_RET_STS_ERROR;
1147: fnd_msg_pub.count_and_get (
1148: p_count => x_message_count

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

1163: ,p_encoded => FND_API.g_false
1164: ,p_data => x_message_list);
1165: WHEN OTHERS THEN
1166: IF (l_debug = 'Y') THEN
1167: gmd_debug.put_line (m_pkg_name||'.'||l_api_name||':'||'When others exception:'||SQLERRM);
1168: END IF;
1169: fnd_msg_pub.add_exc_msg (m_pkg_name, l_api_name);
1170: x_return_status := FND_API.g_ret_sts_unexp_error;
1171: fnd_msg_pub.count_and_get (