[Home] [Help]
475: --enable_debug;
476:
477: -- Debug info.
478: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
479: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'validate_cust_account (+)',
480: p_msg_level=>fnd_log.level_procedure);
481: END IF;
482:
483:
508: --------------------------------------
509: -- validate cust_account_id
510: --------------------------------------
511: /****Logical APIs - validation not required****/
512: IF(HZ_UTILITY_V2PUB.G_CALLING_API IS NULL) THEN
513: IF p_create_update_flag = 'C' THEN
514:
515: -- If primary key value is passed, check for uniqueness.
516: -- If primary key value is not passed, it will be generated
533: NULL;
534: END;
535:
536: /*IF G_DEBUG THEN
537: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
538: 'cust_account_id is unique during creation if passed in. ' ||
539: 'x_return_status = ' || x_return_status, l_debug_prefix );
540: END IF;
541: */
539: 'x_return_status = ' || x_return_status, l_debug_prefix );
540: END IF;
541: */
542: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
543: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
544: p_message=>'cust_account_id is unique during creation if passed in. ' ||
545: 'x_return_status = ' || x_return_status,
546: p_msg_level=>fnd_log.level_statement);
547: END IF;
550:
551: END IF;
552:
553: /*IF G_DEBUG THEN
554: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
555: '(+) after validate cust_account_id ... ' ||
556: 'x_return_status = ' || x_return_status, l_debug_prefix );
557: END IF;
558: */
556: 'x_return_status = ' || x_return_status, l_debug_prefix );
557: END IF;
558: */
559: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
560: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'(+) after validate cust_account_id ... ' ||
561: 'x_return_status = ' || x_return_status,
562: p_msg_level=>fnd_log.level_statement);
563: END IF;
564: END IF;
582: x_return_status := FND_API.G_RET_STS_ERROR;
583: END ;
584:
585: /* IF G_DEBUG THEN
586: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
587: 'account_number autonumbering is ' || NVL( l_profile, 'N' ),
588: l_debug_prefix );
589: END IF;
590: */
588: l_debug_prefix );
589: END IF;
590: */
591: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
592: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'account_number autonumbering is ' || NVL( l_profile, 'N' ),
593: p_msg_level=>fnd_log.level_statement);
594: END IF;
595:
596: IF p_create_update_flag = 'C' THEN
610:
611: -- the account_number will be generated from sequence by table handler.
612:
613: /*IF G_DEBUG THEN
614: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
615: 'account_number cannot be passed in if autonumbering is on. ' ||
616: 'x_return_status = ' || x_return_status, l_debug_prefix );
617: END IF;
618: */
616: 'x_return_status = ' || x_return_status, l_debug_prefix );
617: END IF;
618: */
619: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
620: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
621: p_message=>'account_number cannot be passed in if autonumbering is on. ' ||
622: 'x_return_status = ' || x_return_status,
623: p_msg_level=>fnd_log.level_statement);
624: END IF;
634: x_return_status := FND_API.G_RET_STS_ERROR;
635: END IF;
636:
637: /*IF G_DEBUG THEN
638: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
639: 'account_number is mandatory if autonumbering is off. ' ||
640: 'x_return_status = ' || x_return_status, l_debug_prefix );
641: END IF;
642: */
640: 'x_return_status = ' || x_return_status, l_debug_prefix );
641: END IF;
642: */
643: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
644: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'account_number is mandatory if autonumbering is off. ' ||
645: 'x_return_status = ' || x_return_status,
646: p_msg_level=>fnd_log.level_statement);
647: END IF;
648:
655: p_column_value => p_cust_account_rec.account_number,
656: x_return_status => x_return_status );
657:
658: /*IF G_DEBUG THEN
659: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
660: 'account_number cannot be updated to null. ' ||
661: 'x_return_status = ' || x_return_status, l_debug_prefix );
662: END IF;
663: */
661: 'x_return_status = ' || x_return_status, l_debug_prefix );
662: END IF;
663: */
664: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
665: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'account_number cannot be updated to null. ' ||
666: 'x_return_status = ' || x_return_status,
667: p_msg_level=>fnd_log.level_statement);
668: END IF;
669:
685: p_old_column_value => l_account_number,
686: x_return_status => x_return_status );
687:
688: /*IF G_DEBUG THEN
689: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
690: 'account_number is non-updateable. ' ||
691: 'x_return_status = ' || x_return_status, l_debug_prefix );
692: END IF;
693: */
691: 'x_return_status = ' || x_return_status, l_debug_prefix );
692: END IF;
693: */
694: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
695: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'account_number is non-updateable. ' ||
696: 'x_return_status = ' || x_return_status,
697: p_msg_level=>fnd_log.level_statement);
698: END IF;
699:
725: NULL;
726: END;
727:
728: /*IF G_DEBUG THEN
729: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
730: 'account_number is unique. ' ||
731: 'x_return_status = ' || x_return_status, l_debug_prefix );
732: END IF;
733: */
731: 'x_return_status = ' || x_return_status, l_debug_prefix );
732: END IF;
733: */
734: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
735: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'account_number is unique. ' ||
736: 'x_return_status = ' || x_return_status,
737: p_msg_level=>fnd_log.level_statement);
738: END IF;
739:
742:
743:
744:
745: /*IF G_DEBUG THEN
746: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
747: '(+) after validate account_number ... ' ||
748: 'x_return_status = ' || x_return_status, l_debug_prefix );
749: END IF;
750: */
749: END IF;
750: */
751:
752: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
753: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'(+) after validate account_number ... ' ||
754: 'x_return_status = ' || x_return_status,
755: p_msg_level=>fnd_log.level_statement);
756: END IF;
757:
759: --------------------------------------
760: -- validate orig_system_reference
761: --------------------------------------
762: /****Logical APIs - validation not required****/
763: IF(HZ_UTILITY_V2PUB.G_CALLING_API IS NULL) THEN
764: -- orig_system_reference is unique. Since orig_system_refence is defaulting to
765: -- primary key, we only need to check the uniqueness if user passes some value.
766: -- database constraints can catch unique error when we defaulting.
767: -- orig_system_reference is non-updateable, we only need to check uniqueness
785: NULL;
786: END;
787:
788: /*IF G_DEBUG THEN
789: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
790: 'orig_system_reference is unique. ' ||
791: 'x_return_status = ' || x_return_status, l_debug_prefix );
792: END IF;
793: */
791: 'x_return_status = ' || x_return_status, l_debug_prefix );
792: END IF;
793: */
794: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
795: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'orig_system_reference is unique. ' ||
796: 'x_return_status = ' || x_return_status,
797: p_msg_level=>fnd_log.level_statement);
798: END IF;
799:
849: p_old_column_value => l_orig_system_reference,
850: x_return_status => x_return_status );
851:
852: /*IF G_DEBUG THEN
853: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
854: 'orig_system_reference is non-updateable. ' ||
855: 'x_return_status = ' || x_return_status, l_debug_prefix );
856: END IF;
857: */
855: 'x_return_status = ' || x_return_status, l_debug_prefix );
856: END IF;
857: */
858: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
859: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'orig_system_reference is non-updateable. ' ||
860: 'x_return_status = ' || x_return_status,
861: p_msg_level=>fnd_log.level_statement);
862: END IF;
863:
863:
864: END IF;
865:
866: /*IF G_DEBUG THEN
867: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
868: '(+) after validate orig_system_reference ... ' ||
869: 'x_return_status = ' || x_return_status, l_debug_prefix );
870: END IF;
871: */
869: 'x_return_status = ' || x_return_status, l_debug_prefix );
870: END IF;
871: */
872: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
873: hz_utility_v2pub.debug(p_message=>'(+) after validate orig_system_reference ... ' ||
874: 'x_return_status = ' || x_return_status,
875: p_prefix =>l_debug_prefix,
876: p_msg_level=>fnd_log.level_statement);
877: END IF;
892: p_column_value => p_cust_account_rec.status,
893: x_return_status => x_return_status );
894:
895: /*IF G_DEBUG THEN
896: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
897: 'status cannot be updated to null. ' ||
898: 'x_return_status = ' || x_return_status, l_debug_prefix );
899: END IF;
900: */
898: 'x_return_status = ' || x_return_status, l_debug_prefix );
899: END IF;
900: */
901: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
902: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'status cannot be updated to null. ' ||
903: 'x_return_status = ' || x_return_status,
904: p_msg_level=>fnd_log.level_statement);
905: END IF;
906:
906:
907: END IF;
908:
909: /****Logical APIs - validation not required****/
910: IF(HZ_UTILITY_V2PUB.G_CALLING_API IS NULL) THEN
911: -- status is lookup code in lookup type CODE_STATUS
912: IF p_cust_account_rec.status IS NOT NULL AND
913: p_cust_account_rec.status <> FND_API.G_MISS_CHAR AND
914: ( p_create_update_flag = 'C' OR
921: p_column_value => p_cust_account_rec.status,
922: x_return_status => x_return_status );
923:
924: /*IF G_DEBUG THEN
925: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
926: 'status is lookup code in lookup type CODE_STATUS. ' ||
927: 'x_return_status = ' || x_return_status, l_debug_prefix );
928: END IF;
929: */
928: END IF;
929: */
930:
931: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
932: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'status is lookup code in lookup type CODE_STATUS. ' ||
933: 'x_return_status = ' || x_return_status,
934: p_msg_level=>fnd_log.level_statement);
935: END IF;
936:
937: END IF;
938: END IF;
939:
940: /*IF G_DEBUG THEN
941: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
942: '(+) after validate status ... ' ||
943: 'x_return_status = ' || x_return_status, l_debug_prefix );
944: END IF;
945: */
944: END IF;
945: */
946:
947: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
948: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'(+) after validate status ... ' ||
949: 'x_return_status = ' || x_return_status,
950: p_msg_level=>fnd_log.level_statement);
951: END IF;
952:
968: p_column_value => p_cust_account_rec.customer_type,
969: x_return_status => x_return_status );
970:
971: /*IF G_DEBUG THEN
972: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
973: 'customer_type is lookup code in lookup type CUSTOMER_TYPE. ' ||
974: 'x_return_status = ' || x_return_status, l_debug_prefix );
975: END IF;
976: */
974: 'x_return_status = ' || x_return_status, l_debug_prefix );
975: END IF;
976: */
977: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
978: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'customer_type is lookup code in lookup type CUSTOMER_TYPE. ' ||
979: 'x_return_status = ' || x_return_status,
980: p_msg_level=>fnd_log.level_statement);
981: END IF;
982:
982:
983: END IF;
984:
985: /*IF G_DEBUG THEN
986: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
987: '(+) after validate customer_type ... ' ||
988: 'x_return_status = ' || x_return_status, l_debug_prefix );
989: END IF;
990: */
988: 'x_return_status = ' || x_return_status, l_debug_prefix );
989: END IF;
990: */
991: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
992: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'(+) after validate customer_type ... ' ||
993: 'x_return_status = ' || x_return_status,
994: p_msg_level=>fnd_log.level_statement);
995: END IF;
996:
1013: p_column_value => p_cust_account_rec.sales_channel_code,
1014: x_return_status => x_return_status );
1015:
1016: /*IF G_DEBUG THEN
1017: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
1018: 'sales_channel_code is lookup code in lookup type SALES_CHANNEL in so_lookups. ' ||
1019: 'x_return_status = ' || x_return_status, l_debug_prefix );
1020: END IF;
1021: */
1019: 'x_return_status = ' || x_return_status, l_debug_prefix );
1020: END IF;
1021: */
1022: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
1023: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'sales_channel_code is lookup code in lookup type SALES_CHANNEL in so_lookups. ' ||
1024: 'x_return_status = ' || x_return_status,
1025: p_msg_level=>fnd_log.level_statement);
1026: END IF;
1027:
1027:
1028: END IF;
1029:
1030: /*IF G_DEBUG THEN
1031: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
1032: '(+) after validate sales_channel_code ... ' ||
1033: 'x_return_status = ' || x_return_status, l_debug_prefix );
1034: END IF;
1035: */
1033: 'x_return_status = ' || x_return_status, l_debug_prefix );
1034: END IF;
1035: */
1036: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
1037: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'(+) after validate sales_channel_code ... ' ||
1038: 'x_return_status = ' || x_return_status,
1039: p_msg_level=>fnd_log.level_statement);
1040: END IF;
1041:
1058: p_column_value => p_cust_account_rec.freight_term,
1059: x_return_status => x_return_status );
1060:
1061: /*IF G_DEBUG THEN
1062: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
1063: 'freight_term is lookup code in lookup type FREIGHT_TERMS in so_lookups. ' ||
1064: 'x_return_status = ' || x_return_status, l_debug_prefix );
1065: END IF;
1066: */
1064: 'x_return_status = ' || x_return_status, l_debug_prefix );
1065: END IF;
1066: */
1067: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
1068: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'freight_term is lookup code in lookup type FREIGHT_TERMS in so_lookups. ' ||
1069: 'x_return_status = ' || x_return_status,
1070: p_msg_level=>fnd_log.level_statement);
1071: END IF;
1072:
1073:
1074: END IF;
1075:
1076: /*IF G_DEBUG THEN
1077: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
1078: '(+) after validate freight_term ... ' ||
1079: 'x_return_status = ' || x_return_status, l_debug_prefix );
1080: END IF;
1081: */
1079: 'x_return_status = ' || x_return_status, l_debug_prefix );
1080: END IF;
1081: */
1082: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
1083: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'(+) after validate freight_term ... ' ||
1084: 'x_return_status = ' || x_return_status,
1085: p_msg_level=>fnd_log.level_statement);
1086: END IF;
1087:
1089: --------------------------------------
1090: -- validate tax_header_level_flag
1091: --------------------------------------
1092: /****Logical APIs - validation not required****/
1093: IF(HZ_UTILITY_V2PUB.G_CALLING_API IS NULL) THEN
1094: -- tax_header_level_flag is lookup code in lookup type YES/NO
1095: IF p_cust_account_rec.tax_header_level_flag IS NOT NULL AND
1096: p_cust_account_rec.tax_header_level_flag <> FND_API.G_MISS_CHAR
1097: THEN
1101: p_column_value => p_cust_account_rec.tax_header_level_flag,
1102: x_return_status => x_return_status );
1103:
1104: /*IF G_DEBUG THEN
1105: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
1106: 'tax_header_level_flag is lookup code in lookup type YES/NO. ' ||
1107: 'x_return_status = ' || x_return_status, l_debug_prefix );
1108: END IF;
1109: */
1108: END IF;
1109: */
1110:
1111: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
1112: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'tax_header_level_flag is lookup code in lookup type YES/NO. ' ||
1113: 'x_return_status = ' || x_return_status,
1114: p_msg_level=>fnd_log.level_statement);
1115: END IF;
1116:
1116:
1117: END IF;
1118:
1119: /*IF G_DEBUG THEN
1120: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
1121: '(+) after validate tax_header_level_flag ... ' ||
1122: 'x_return_status = ' || x_return_status, l_debug_prefix );
1123: END IF;
1124: */
1122: 'x_return_status = ' || x_return_status, l_debug_prefix );
1123: END IF;
1124: */
1125: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
1126: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'(+) after validate tax_header_level_flag ... ' ||
1127: 'x_return_status = ' || x_return_status,
1128: p_msg_level=>fnd_log.level_statement);
1129: END IF;
1130: END IF;
1158: p_called_from => 'validate_cust_account',
1159: x_return_status => x_return_status );
1160:
1161: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
1162: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'Tax_code should be a valid value defined in view zx_output_classifications_v. '||
1163: 'x_return_status = ' || x_return_status,
1164: p_msg_level=>fnd_log.level_statement);
1165: END IF;
1166:
1165: END IF;
1166:
1167: END IF;
1168: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
1169: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'(+) after validate tax_code..' ||
1170: 'x_return_status = ' || x_return_status,
1171: p_msg_level=>fnd_log.level_statement);
1172: END IF;
1173:
1202: | p_column_value => p_cust_account_rec.order_type_id,
1203: | x_return_status => x_return_status );
1204: |
1205: | /*IF G_DEBUG THEN
1206: | hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
1207: | 'order_type_id should be a valid value defined in OE_ORDER_TYPES_V..' ||
1208: | 'x_return_status = ' || x_return_status, l_debug_prefix);
1209: | END IF;
1210: | *//*
1208: | 'x_return_status = ' || x_return_status, l_debug_prefix);
1209: | END IF;
1210: | *//*
1211: | IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
1212: | | hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'order_type_id should be a valid value defined in OE_ORDER_TYPES_V..' ||
1213: | 'x_return_status = ' || x_return_status,
1214: | p_msg_level=>fnd_log.level_statement);
1215: | END IF;
1216: |
1215: | END IF;
1216: |
1217: | END IF;
1218: | /*IF G_DEBUG THEN
1219: | hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
1220: | '(+) after validate order_type_id..' ||
1221: | 'x_return_status = ' || x_return_status, l_debug_prefix );
1222: | END IF;
1223: | *//*
1221: | 'x_return_status = ' || x_return_status, l_debug_prefix );
1222: | END IF;
1223: | *//*
1224: | IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
1225: | hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'(+) after validate order_type_id..' ||
1226: | 'x_return_status = ' || x_return_status,
1227: | p_msg_level=>fnd_log.level_statement);
1228: | END IF;
1229: */
1257: | p_column_value => p_cust_account_rec.primary_salesrep_id,
1258: | x_return_status => x_return_status );
1259: |
1260: | /*IF G_DEBUG THEN
1261: | hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
1262: | 'Primary_salesrep_id should be a valid value defined in RA_SALESREPS. '||
1263: | 'x_return_status = ' || x_return_status, l_debug_prefix);
1264: | | END IF;
1265: | | *//*
1263: | 'x_return_status = ' || x_return_status, l_debug_prefix);
1264: | | END IF;
1265: | | *//*
1266: | IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
1267: | hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'Primary_salesrep_id should be a valid value defined in RA_SALESREPS. '||
1268: | 'x_return_status = ' || x_return_status,
1269: | p_msg_level=>fnd_log.level_statement);
1270: | END IF;
1271: |
1270: | END IF;
1271: |
1272: | END IF;
1273: | /*IF G_DEBUG THEN
1274: | hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
1275: | '(+) after validate primary_salesrep_id..' ||
1276: | 'x_return_status = ' || x_return_status, l_debug_prefix );
1277: | END IF;
1278: | *//*
1276: | 'x_return_status = ' || x_return_status, l_debug_prefix );
1277: | END IF;
1278: | *//*
1279: | IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
1280: | hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'(+) after validate primary_salesrep_id..' ||
1281: | 'x_return_status = ' || x_return_status,
1282: | p_msg_level=>fnd_log.level_statement);
1283: | END IF;
1284: */
1302: p_column_value => p_cust_account_rec.ship_partial,
1303: x_return_status => x_return_status );
1304:
1305: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
1306: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'ship_partial is a lookup code in lookup type YES/NO. ' ||
1307: 'x_return_status = ' || x_return_status,
1308: p_msg_level=>fnd_log.level_statement);
1309: END IF;
1310:
1310:
1311: END IF;
1312:
1313: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
1314: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'(+) after validate ship_partial ... ' ||
1315: 'x_return_status = ' || x_return_status,
1316: p_msg_level=>fnd_log.level_statement);
1317: END IF;
1318:
1335: p_column_value =>p_cust_account_rec.tax_rounding_rule,
1336: x_return_status =>x_return_status );
1337:
1338: /*IF G_DEBUG THEN
1339: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
1340: 'tax_rounding_rule is lookup_code in lookup type TAX_ROUNDING_RULE. '||
1341: 'x_return_status = ' || x_return_status, l_debug_prefix);
1342: END IF;
1343: */
1342: END IF;
1343: */
1344:
1345: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
1346: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'tax_rounding_rule is lookup_code in lookup type TAX_ROUNDING_RULE. '||
1347: 'x_return_status = ' || x_return_status,
1348: p_msg_level=>fnd_log.level_statement);
1349: END IF;
1350:
1349: END IF;
1350:
1351: END IF;
1352: /*IF G_DEBUG THEN
1353: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
1354: '(+) after validate tax_rounding_rule..' ||
1355: 'x_return_status = ' || x_return_status, l_debug_prefix );
1356: END IF;
1357: */
1355: 'x_return_status = ' || x_return_status, l_debug_prefix );
1356: END IF;
1357: */
1358: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
1359: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'(+) after validate tax_rounding_rule..' ||
1360: 'x_return_status = ' || x_return_status,
1361: p_msg_level=>fnd_log.level_statement);
1362: END IF;
1363:
1378: p_lookup_type =>'CUSTOMER CLASS',
1379: p_column_value =>p_cust_account_rec.customer_class_code,
1380: x_return_status =>x_return_status );
1381: /*IF G_DEBUG THEN
1382: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
1383: 'Customer_class_code is lookup_code in lookup type CUSTOMER_CLASS. '||
1384: 'x_return_status = ' || x_return_status, l_debug_prefix);
1385: END IF;
1386: */
1384: 'x_return_status = ' || x_return_status, l_debug_prefix);
1385: END IF;
1386: */
1387: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
1388: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'Customer_class_code is lookup_code in lookup type CUSTOMER_CLASS. '||
1389: 'x_return_status = ' || x_return_status,
1390: p_msg_level=>fnd_log.level_statement);
1391: END IF;
1392:
1391: END IF;
1392:
1393: END IF;
1394: /*IF G_DEBUG THEN
1395: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
1396: '(+) after validate CUSTOMER_CLASS_CODE..' ||
1397: 'x_return_status = ' || x_return_status, l_debug_prefix );
1398: END IF;
1399: */
1397: 'x_return_status = ' || x_return_status, l_debug_prefix );
1398: END IF;
1399: */
1400: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
1401: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'(+) after validate CUSTOMER_CLASS_CODE..' ||
1402: 'x_return_status = ' || x_return_status,
1403: p_msg_level=>fnd_log.level_statement);
1404: END IF;
1405:
1422: p_column_value =>p_cust_account_rec.invoice_quantity_rule,
1423: x_return_status =>x_return_status );
1424:
1425: /*IF G_DEBUG THEN
1426: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
1427: 'Invoice_quantity_rule is lookup_code in lookup type INVOICE_BASIS. '||
1428: 'x_return_status = ' || x_return_status, l_debug_prefix);
1429: END IF;
1430: */
1428: 'x_return_status = ' || x_return_status, l_debug_prefix);
1429: END IF;
1430: */
1431: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
1432: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=> 'Invoice_quantity_rule is lookup_code in lookup type INVOICE_BASIS. '||
1433: 'x_return_status = ' || x_return_status,
1434: p_msg_level=>fnd_log.level_statement);
1435: END IF;
1436:
1435: END IF;
1436:
1437: END IF;
1438: /*IF G_DEBUG THEN
1439: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
1440: '(+) after validate invoice_quantity_rule..' ||
1441: 'x_return_status = ' || x_return_status, l_debug_prefix );
1442: END IF;
1443: */
1442: END IF;
1443: */
1444:
1445: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
1446: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'(+) after validate invoice_quantity_rule..' ||
1447: 'x_return_status = ' || x_return_status,
1448: p_msg_level=>fnd_log.level_statement);
1449: END IF;
1450:
1464: p_column => 'price_list_id',
1465: p_column_value => p_cust_account_rec.price_list_id,
1466: x_return_status => x_return_status );
1467: /*IF G_DEBUG THEN
1468: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
1469: 'price_list_id should be a valid value defined in SO_PRICE_LISTS. '||
1470: 'x_return_status = ' || x_return_status, l_debug_prefix);
1471: END IF;
1472: */
1470: 'x_return_status = ' || x_return_status, l_debug_prefix);
1471: END IF;
1472: */
1473: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
1474: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'price_list_id should be a valid value defined in SO_PRICE_LISTS. '||
1475: 'x_return_status = ' || x_return_status,
1476: p_msg_level=>fnd_log.level_statement);
1477: END IF;
1478:
1477: END IF;
1478:
1479: END IF;
1480: /*IF G_DEBUG THEN
1481: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
1482: '(+) after validate price_list_id..' ||
1483: 'x_return_status = ' || x_return_status, l_debug_prefix );
1484: END IF;
1485: */
1483: 'x_return_status = ' || x_return_status, l_debug_prefix );
1484: END IF;
1485: */
1486: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
1487: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'(+) after validate price_list_id..' ||
1488: 'x_return_status = ' || x_return_status,
1489: p_msg_level=>fnd_log.level_statement);
1490: END IF;
1491:
1507: p_column_value =>p_cust_account_rec.fob_point,
1508: x_return_status =>x_return_status );
1509:
1510: /*IF G_DEBUG THEN
1511: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
1512: 'fob_point is lookup_code in lookup type FOB. '||
1513: 'x_return_status = ' || x_return_status, l_debug_prefix);
1514: END IF;
1515: */
1513: 'x_return_status = ' || x_return_status, l_debug_prefix);
1514: END IF;
1515: */
1516: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
1517: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'fob_point is lookup_code in lookup type FOB. '||
1518: 'x_return_status = ' || x_return_status,
1519: p_msg_level=>fnd_log.level_statement);
1520: END IF;
1521:
1521:
1522:
1523: END IF;
1524: /*IF G_DEBUG THEN
1525: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
1526: '(+) after validate fob_point..' ||
1527: 'x_return_status = ' || x_return_status, l_debug_prefix );
1528: END IF;
1529: */
1527: 'x_return_status = ' || x_return_status, l_debug_prefix );
1528: END IF;
1529: */
1530: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
1531: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'(+) after validate fob_point..' ||
1532: 'x_return_status = ' || x_return_status,
1533: p_msg_level=>fnd_log.level_statement);
1534: END IF;
1535:
1551: p_column_value => p_cust_account_rec.item_cross_ref_pref,
1552: x_return_status => x_return_status );
1553:
1554: /*IF G_DEBUG THEN
1555: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
1556: 'item_cross_ref_pref should be a value defined in MTL_CROSS_REFERENCE_TYPES or should be INT or CUST . '||
1557: 'x_return_status = ' || x_return_status, l_debug_prefix);
1558: END IF;
1559: */
1557: 'x_return_status = ' || x_return_status, l_debug_prefix);
1558: END IF;
1559: */
1560: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
1561: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'item_cross_ref_pref should be a value defined in MTL_CROSS_REFERENCE_TYPES or should be INT or CUST . '||
1562: 'x_return_status = ' || x_return_status,
1563: p_msg_level=>fnd_log.level_statement);
1564: END IF;
1565:
1565:
1566: END IF;
1567: END IF;
1568: /*IF G_DEBUG THEN
1569: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
1570: '(+) after validate item_cross_ref_pref..' ||
1571: 'x_return_status = ' || x_return_status, l_debug_prefix );
1572: END IF;
1573: */
1571: 'x_return_status = ' || x_return_status, l_debug_prefix );
1572: END IF;
1573: */
1574: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
1575: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'(+) after validate item_cross_ref_pref..' ||
1576: 'x_return_status = ' || x_return_status,
1577: p_msg_level=>fnd_log.level_statement);
1578: END IF;
1579:
1593: p_column => 'warehouse_id',
1594: p_column_value => p_cust_account_rec.warehouse_id,
1595: x_return_status => x_return_status );
1596: /*IF G_DEBUG THEN
1597: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
1598: 'warehouse_id should be a value defined in ORG_ORGANIZATION_DEFINITIONS . '||
1599: 'x_return_status = ' || x_return_status, l_debug_prefix);
1600: END IF;
1601: */
1600: END IF;
1601: */
1602:
1603: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
1604: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'warehouse_id should be a value defined in ORG_ORGANIZATION_DEFINITIONS . '||
1605: 'x_return_status = ' || x_return_status,
1606: p_msg_level=>fnd_log.level_statement);
1607: END IF;
1608:
1607: END IF;
1608:
1609: END IF;
1610: /*IF G_DEBUG THEN
1611: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
1612: '(+) after validate warehouse_id..' ||
1613: 'x_return_status = ' || x_return_status, l_debug_prefix );
1614: END IF;
1615: */
1614: END IF;
1615: */
1616:
1617: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
1618: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'(+) after validate warehouse_id..' ||
1619: 'x_return_status = ' || x_return_status,
1620: p_msg_level=>fnd_log.level_statement);
1621: END IF;
1622:
1638: p_lookup_type =>'REQUEST_DATE_TYPE',
1639: p_column_value =>p_cust_account_rec.date_type_preference,
1640: x_return_status =>x_return_status );
1641: /*IF G_DEBUG THEN
1642: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
1643: 'date_type_preference is a lookup_code in lookup_type REQUEST_DATE_TYPE in oe_lookups. '||
1644: 'x_return_status = ' || x_return_status, l_debug_prefix);
1645: END IF;
1646: */
1644: 'x_return_status = ' || x_return_status, l_debug_prefix);
1645: END IF;
1646: */
1647: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
1648: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'date_type_preference is a lookup_code in lookup_type REQUEST_DATE_TYPE in oe_lookups. '||
1649: 'x_return_status = ' || x_return_status,
1650: p_msg_level=>fnd_log.level_statement);
1651: END IF;
1652:
1651: END IF;
1652:
1653: END IF;
1654: /*IF G_DEBUG THEN
1655: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
1656: '(+) after validate date_type_preference..' ||
1657: 'x_return_status = ' || x_return_status, l_debug_prefix );
1658: END IF;
1659: */
1657: 'x_return_status = ' || x_return_status, l_debug_prefix );
1658: END IF;
1659: */
1660: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
1661: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'(+) after validate date_type_preference..' ||
1662: 'x_return_status = ' || x_return_status,
1663: p_msg_level=>fnd_log.level_statement);
1664: END IF;
1665:
1677: p_column_value => p_cust_account_rec.primary_specialist_id,
1678: x_return_status => x_return_status );
1679:
1680: /*IF G_DEBUG THEN
1681: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
1682: 'primary_specialist_id is foreign key to per_all_people_f. ' ||
1683: 'x_return_status = ' || x_return_status, l_debug_prefix );
1684: END IF;
1685: */
1683: 'x_return_status = ' || x_return_status, l_debug_prefix );
1684: END IF;
1685: */
1686: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
1687: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'primary_specialist_id is foreign key to per_all_people_f. ' ||
1688: 'x_return_status = ' || x_return_status,
1689: p_msg_level=>fnd_log.level_statement);
1690: END IF;
1691:
1692:
1693: END IF;
1694:
1695: /*IF G_DEBUG THEN
1696: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
1697: '(+) after validate primary_specialist_id ... ' ||
1698: 'x_return_status = ' || x_return_status, l_debug_prefix );
1699: END IF;
1700: */
1698: 'x_return_status = ' || x_return_status, l_debug_prefix );
1699: END IF;
1700: */
1701: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
1702: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'(+) after validate primary_specialist_id ... ' ||
1703: 'x_return_status = ' || x_return_status,
1704: p_msg_level=>fnd_log.level_statement);
1705: END IF;
1706:
1718: p_column_value => p_cust_account_rec.secondary_specialist_id,
1719: x_return_status => x_return_status );
1720:
1721: /*IF G_DEBUG THEN
1722: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
1723: 'secondary_specialist_id is foreign key to per_all_people_f. ' ||
1724: 'x_return_status = ' || x_return_status, l_debug_prefix );
1725: END IF;
1726: */
1724: 'x_return_status = ' || x_return_status, l_debug_prefix );
1725: END IF;
1726: */
1727: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
1728: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'secondary_specialist_id is foreign key to per_all_people_f. ' ||
1729: 'x_return_status = ' || x_return_status,
1730: p_msg_level=>fnd_log.level_statement);
1731: END IF;
1732:
1732:
1733: END IF;
1734:
1735: /*IF G_DEBUG THEN
1736: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
1737: '(+) after validate secondary_specialist_id ... ' ||
1738: 'x_return_status = ' || x_return_status, l_debug_prefix );
1739: END IF;
1740: */
1738: 'x_return_status = ' || x_return_status, l_debug_prefix );
1739: END IF;
1740: */
1741: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
1742: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'(+) after validate secondary_specialist_id ... ' ||
1743: 'x_return_status = ' || x_return_status,
1744: p_msg_level=>fnd_log.level_statement);
1745: END IF;
1746:
1748:
1749: --------------------------------------
1750: -- validate account_liable_flag
1751: --------------------------------------
1752: IF(HZ_UTILITY_V2PUB.G_CALLING_API IS NULL) THEN
1753: -- account_liable_flag is lookup code in lookup type YES/NO
1754: IF p_cust_account_rec.account_liable_flag IS NOT NULL AND
1755: p_cust_account_rec.account_liable_flag <> FND_API.G_MISS_CHAR
1756: THEN
1760: p_column_value => p_cust_account_rec.account_liable_flag,
1761: x_return_status => x_return_status );
1762:
1763: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
1764: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'account_liable_flag is lookup code in lookup type YES/NO. ' ||
1765: 'x_return_status = ' || x_return_status,
1766: p_msg_level=>fnd_log.level_statement);
1767: END IF;
1768:
1768:
1769: END IF;
1770:
1771: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
1772: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'(+) after validate account_liable_flag ... ' ||
1773: 'x_return_status = ' || x_return_status,
1774: p_msg_level=>fnd_log.level_statement);
1775: END IF;
1776: END IF;
1779: --------------------------------------
1780: -- validate hold_bill_flag
1781: --------------------------------------
1782: /****Logical APIs - validation not required****/
1783: IF(HZ_UTILITY_V2PUB.G_CALLING_API IS NULL) THEN
1784: -- hold_bill_flag is lookup code in lookup type YES/NO
1785: IF p_cust_account_rec.hold_bill_flag IS NOT NULL AND
1786: p_cust_account_rec.hold_bill_flag <> FND_API.G_MISS_CHAR
1787: THEN
1791: p_column_value => p_cust_account_rec.hold_bill_flag,
1792: x_return_status => x_return_status );
1793:
1794: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
1795: hz_utility_v2pub.debug(p_message=>'hold_bill_flag is lookup code in lookup type YES/NO. ' ||
1796: 'x_return_status = ' || x_return_status,
1797: p_prefix=>l_debug_prefix,
1798: p_msg_level=>fnd_log.level_statement);
1799: END IF;
1800:
1801: END IF;
1802:
1803: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
1804: hz_utility_v2pub.debug(p_message=>'(+) after validate hold_bill_flag ... ' ||
1805: 'x_return_status = ' || x_return_status,
1806: p_prefix=>l_debug_prefix,
1807: p_msg_level=>fnd_log.level_statement);
1808: END IF;
1812:
1813: --------------------------------------
1814: -- validate dormant_account_flag
1815: --------------------------------------
1816: IF(HZ_UTILITY_V2PUB.G_CALLING_API IS NULL) THEN
1817: -- dormant_account_flag is lookup code in lookup type YES/NO
1818: IF p_cust_account_rec.dormant_account_flag IS NOT NULL AND
1819: p_cust_account_rec.dormant_account_flag <> FND_API.G_MISS_CHAR
1820: THEN
1824: p_column_value => p_cust_account_rec.dormant_account_flag,
1825: x_return_status => x_return_status );
1826:
1827: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
1828: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'dormant_account_flag is lookup code in lookup type YES/NO. ' ||
1829: 'x_return_status = ' || x_return_status,
1830: p_msg_level=>fnd_log.level_statement);
1831: END IF;
1832:
1832:
1833: END IF;
1834:
1835: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
1836: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'(+) after validate dormant_account_flag ... ' ||
1837: 'x_return_status = ' || x_return_status,
1838: p_msg_level=>fnd_log.level_statement);
1839: END IF;
1840: END IF;
1843: --------------------------------------
1844: -- validate ship_sets_include_lines_flag
1845: --------------------------------------
1846: /****Logical APIs - validation not required****/
1847: IF(HZ_UTILITY_V2PUB.G_CALLING_API IS NULL) THEN
1848: -- ship_sets_include_lines_flag is lookup code in lookup type YES/NO
1849: IF p_cust_account_rec.ship_sets_include_lines_flag IS NOT NULL AND
1850: p_cust_account_rec.ship_sets_include_lines_flag <> FND_API.G_MISS_CHAR
1851: AND ( p_create_update_flag = 'C' OR
1858: p_column_value => p_cust_account_rec.ship_sets_include_lines_flag,
1859: x_return_status => x_return_status );
1860:
1861: /*IF G_DEBUG THEN
1862: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
1863: 'ship_sets_include_lines_flag is lookup code in lookup type YES/NO. ' ||
1864: 'x_return_status = ' || x_return_status, l_debug_prefix );
1865: END IF;
1866: */
1864: 'x_return_status = ' || x_return_status, l_debug_prefix );
1865: END IF;
1866: */
1867: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
1868: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'ship_sets_include_lines_flag is lookup code in lookup type YES/NO. ' ||
1869: 'x_return_status = ' || x_return_status,
1870: p_msg_level=>fnd_log.level_statement);
1871: END IF;
1872:
1901: END ;
1902: END IF;
1903: END IF;
1904: /*IF G_DEBUG THEN
1905: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
1906: 'If ship_sets_include_lines_flag is set to Y then arrivalsets_include_lines_flag is always set to N. '||
1907: 'x_return_status = ' || x_return_status, l_debug_prefix);
1908: END IF;
1909: */
1907: 'x_return_status = ' || x_return_status, l_debug_prefix);
1908: END IF;
1909: */
1910: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
1911: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'If ship_sets_include_lines_flag is set to Y then arrivalsets_include_lines_flag is always set to N. '||
1912: 'x_return_status = ' || x_return_status,
1913: p_msg_level=>fnd_log.level_statement);
1914: END IF;
1915:
1915:
1916:
1917:
1918: /*IF G_DEBUG THEN
1919: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
1920: '(+) after validate arrivalsets_include_lines_flag ... ' ||
1921: 'x_return_status = ' || x_return_status, l_debug_prefix );
1922: END IF;
1923: */
1921: 'x_return_status = ' || x_return_status, l_debug_prefix );
1922: END IF;
1923: */
1924: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
1925: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'(+) after validate arrivalsets_include_lines_flag ... ' ||
1926: 'x_return_status = ' || x_return_status,
1927: p_msg_level=>fnd_log.level_statement);
1928: END IF;
1929:
1931: --------------------------------------
1932: -- validate arrivalsets_include_lines_flag
1933: --------------------------------------
1934: /****Logical APIs - validation not required****/
1935: IF(HZ_UTILITY_V2PUB.G_CALLING_API IS NULL) THEN
1936: -- arrivalsets_include_lines_flag is lookup code in lookup type YES/NO
1937: IF p_cust_account_rec.arrivalsets_include_lines_flag IS NOT NULL AND
1938: p_cust_account_rec.arrivalsets_include_lines_flag <> FND_API.G_MISS_CHAR
1939: AND ( p_create_update_flag = 'C' OR
1946: p_column_value => p_cust_account_rec.arrivalsets_include_lines_flag,
1947: x_return_status => x_return_status );
1948:
1949: /*IF G_DEBUG THEN
1950: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
1951: 'arrivalsets_include_lines_flag is lookup code in lookup type YES/NO. ' ||
1952: 'x_return_status = ' || x_return_status, l_debug_prefix );
1953: END IF;
1954: */
1952: 'x_return_status = ' || x_return_status, l_debug_prefix );
1953: END IF;
1954: */
1955: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
1956: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'arrivalsets_include_lines_flag is lookup code in lookup type YES/NO. ' ||
1957: 'x_return_status = ' || x_return_status,
1958: p_msg_level=>fnd_log.level_statement);
1959: END IF;
1960:
1990: END ;
1991: END IF;
1992: END IF;
1993: /*IF G_DEBUG THEN
1994: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
1995: 'If arrivalsets_include_lines_flag is set to Y then ship_sets_include_lines_flag is always set to N. ' ||
1996: 'x_return_status = ' || x_return_status, l_debug_prefix );
1997: END IF;
1998: */
1996: 'x_return_status = ' || x_return_status, l_debug_prefix );
1997: END IF;
1998: */
1999: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
2000: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'If arrivalsets_include_lines_flag is set to Y then ship_sets_include_lines_flag is always set to N. ' ||
2001: 'x_return_status = ' || x_return_status,
2002: p_msg_level=>fnd_log.level_statement);
2003: END IF;
2004:
2003: END IF;
2004:
2005:
2006: /*IF G_DEBUG THEN
2007: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
2008: '(+) after validate arrivalsets_include_lines_flag ... ' ||
2009: 'x_return_status = ' || x_return_status, l_debug_prefix );
2010: END IF;
2011: */
2009: 'x_return_status = ' || x_return_status, l_debug_prefix );
2010: END IF;
2011: */
2012: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
2013: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'(+) after validate arrivalsets_include_lines_flag ... ' ||
2014: 'x_return_status = ' || x_return_status,
2015: p_msg_level=>fnd_log.level_statement);
2016: END IF;
2017:
2019: --------------------------------------
2020: -- validate sched_date_push_flag
2021: --------------------------------------
2022: /****Logical APIs - validation not required****/
2023: IF(HZ_UTILITY_V2PUB.G_CALLING_API IS NULL) THEN
2024: -- sched_date_push_flag is lookup code in lookup type YES/NO
2025: IF p_cust_account_rec.sched_date_push_flag IS NOT NULL AND
2026: p_cust_account_rec.sched_date_push_flag <> FND_API.G_MISS_CHAR
2027: THEN
2031: p_column_value => p_cust_account_rec.sched_date_push_flag,
2032: x_return_status => x_return_status );
2033:
2034: /*IF G_DEBUG THEN
2035: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
2036: 'sched_date_push_flag is lookup code in lookup type YES/NO. ' ||
2037: 'x_return_status = ' || x_return_status, l_debug_prefix );
2038: END IF;
2039: */
2037: 'x_return_status = ' || x_return_status, l_debug_prefix );
2038: END IF;
2039: */
2040: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
2041: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'sched_date_push_flag is lookup code in lookup type YES/NO. ' ||
2042: 'x_return_status = ' || x_return_status,
2043: p_msg_level=>fnd_log.level_statement);
2044: END IF;
2045:
2045:
2046: END IF;
2047:
2048: /*IF G_DEBUG THEN
2049: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
2050: '(+) after validate sched_date_push_flag ... ' ||
2051: 'x_return_status = ' || x_return_status, l_debug_prefix );
2052: END IF;
2053: */
2051: 'x_return_status = ' || x_return_status, l_debug_prefix );
2052: END IF;
2053: */
2054: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
2055: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'(+) after validate sched_date_push_flag ... ' ||
2056: 'x_return_status = ' || x_return_status,
2057: p_msg_level=>fnd_log.level_statement);
2058: END IF;
2059: END IF;
2077: p_old_end_date => l_account_termination_date,
2078: x_return_status => x_return_status );
2079:
2080: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
2081: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'account_termination_date should be greater than account_established_date. ' ||
2082: 'x_return_status = ' || x_return_status,
2083: p_msg_level=>fnd_log.level_statement);
2084: END IF;
2085:
2098: p_old_end_date => l_account_activation_date,
2099: x_return_status => x_return_status );
2100:
2101: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
2102: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'account_activation_date should be greater than account_established_date. ' ||
2103: 'x_return_status = ' || x_return_status,
2104: p_msg_level=>fnd_log.level_statement);
2105: END IF;
2106:
2120: p_old_end_date => l_account_termination_date,
2121: x_return_status => x_return_status );
2122:
2123: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
2124: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'account_termination_date should be greater than account_activation_date. ' ||
2125: 'x_return_status = ' || x_return_status,
2126: p_msg_level=>fnd_log.level_statement);
2127: END IF;
2128: */
2130: --------------------------------------
2131: -- validate autopay_flag
2132: --------------------------------------
2133: /****Logical APIs - validation not required****/
2134: IF(HZ_UTILITY_V2PUB.G_CALLING_API IS NULL) THEN
2135: -- autopay_flag is lookup code in lookup type YES/NO
2136: IF p_cust_account_rec.autopay_flag IS NOT NULL AND
2137: p_cust_account_rec.autopay_flag <> FND_API.G_MISS_CHAR
2138: THEN
2142: p_column_value => p_cust_account_rec.autopay_flag,
2143: x_return_status => x_return_status );
2144:
2145: /*IF G_DEBUG THEN
2146: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
2147: 'autopay_flag is lookup code in lookup type YES/NO. ' ||
2148: 'x_return_status = ' || x_return_status, l_debug_prefix );
2149: END IF;
2150: */
2148: 'x_return_status = ' || x_return_status, l_debug_prefix );
2149: END IF;
2150: */
2151: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
2152: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'autopay_flag is lookup code in lookup type YES/NO. ' ||
2153: 'x_return_status = ' || x_return_status,
2154: p_msg_level=>fnd_log.level_statement);
2155: END IF;
2156:
2156:
2157: END IF;
2158:
2159: /*IF G_DEBUG THEN
2160: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
2161: '(+) after validate autopay_flag ... ' ||
2162: 'x_return_status = ' || x_return_status, l_debug_prefix );
2163: END IF;
2164: */
2162: 'x_return_status = ' || x_return_status, l_debug_prefix );
2163: END IF;
2164: */
2165: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
2166: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'(+) after validate autopay_flag ... ' ||
2167: 'x_return_status = ' || x_return_status,
2168: p_msg_level=>fnd_log.level_statement);
2169: END IF;
2170: END IF;
2173:
2174: --------------------------------------
2175: -- validate notify_flag
2176: --------------------------------------
2177: IF(HZ_UTILITY_V2PUB.G_CALLING_API IS NULL) THEN
2178: -- notify_flag is lookup code in lookup type YES/NO
2179: IF p_cust_account_rec.notify_flag IS NOT NULL AND
2180: p_cust_account_rec.notify_flag <> FND_API.G_MISS_CHAR
2181: THEN
2185: p_column_value => p_cust_account_rec.notify_flag,
2186: x_return_status => x_return_status );
2187:
2188: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
2189: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'notify_flag is lookup code in lookup type YES/NO. ' ||
2190: 'x_return_status = ' || x_return_status,
2191: p_msg_level=>fnd_log.level_statement);
2192: END IF;
2193:
2193:
2194: END IF;
2195:
2196: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
2197: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'(+) after validate notify_flag ... ' ||
2198: 'x_return_status = ' || x_return_status,
2199: p_msg_level=>fnd_log.level_statement);
2200: END IF;
2201: END IF;
2219: p_column_value => p_cust_account_rec.ship_via,
2220: x_return_status => x_return_status );
2221:
2222: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
2223: hz_utility_v2pub.debug(p_message=>'ship_via is foreign key to oe_ship_methods_v and can be used only in single org case. ' ||
2224: 'x_return_status = ' || x_return_status,
2225: p_prefix=>l_debug_prefix,
2226: p_msg_level=>fnd_log.level_statement);
2227: END IF;
2228:
2229: END IF;
2230:
2231: /*IF G_DEBUG THEN
2232: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
2233: '(+) after validate ship_via ... ' ||
2234: 'x_return_status = ' || x_return_status, l_debug_prefix );
2235: END IF;
2236: */
2234: 'x_return_status = ' || x_return_status, l_debug_prefix );
2235: END IF;
2236: */
2237: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
2238: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'(+) after validate ship_via ... ' ||
2239: 'x_return_status = ' || x_return_status,
2240: p_msg_level=>fnd_log.level_statement);
2241: END IF;
2242:
2254: p_column_value => p_cust_account_rec.selling_party_id,
2255: x_return_status => x_return_status );
2256:
2257: /*IF G_DEBUG THEN
2258: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
2259: 'selling_party_id is foreign key of hz_parties. ' ||
2260: 'x_return_status = ' || x_return_status, l_debug_prefix );
2261: END IF;
2262: */
2260: 'x_return_status = ' || x_return_status, l_debug_prefix );
2261: END IF;
2262: */
2263: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
2264: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'selling_party_id is foreign key of hz_parties. ' ||
2265: 'x_return_status = ' || x_return_status,
2266: p_msg_level=>fnd_log.level_statement);
2267: END IF;
2268:
2268:
2269: END IF;
2270:
2271: /*IF G_DEBUG THEN
2272: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
2273: '(+) after validate selling_party_id ... ' ||
2274: 'x_return_status = ' || x_return_status, l_debug_prefix );
2275: END IF;
2276: */
2274: 'x_return_status = ' || x_return_status, l_debug_prefix );
2275: END IF;
2276: */
2277: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
2278: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'(+) after validate selling_party_id ... ' ||
2279: 'x_return_status = ' || x_return_status,
2280: p_msg_level=>fnd_log.level_statement);
2281: END IF;
2282:
2301: p_old_application_id => l_application_id,
2302: x_return_status => x_return_status);
2303:
2304: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
2305: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'validate_cust_account (-)',
2306: p_msg_level=>fnd_log.level_procedure);
2307: END IF;
2308:
2309: END validate_cust_account;
2366:
2367: -- Debug info.
2368:
2369: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
2370: hz_utility_v2pub.debug(p_message=>'validate_cust_acct_relate (+)',
2371: p_prefix=>l_debug_prefix,
2372: p_msg_level=>fnd_log.level_procedure);
2373: END IF;
2374:
2386: --------------------------------------
2387: -- validate cust_account_id
2388: --------------------------------------
2389: /****Logical APIs - validation not required****/
2390: IF(HZ_UTILITY_V2PUB.G_CALLING_API IS NULL) THEN
2391: -- cust_account_id is mandatory field
2392: IF (p_create_update_flag <> 'U') OR
2393: (p_cust_acct_relate_rec.cust_acct_relate_id is NULL) -- Bug 4529413
2394: THEN
2399: p_restricted => 'Y',
2400: x_return_status => x_return_status );
2401:
2402: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
2403: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'cust_account_id is mandatory. ' ||
2404: 'x_return_status = ' || x_return_status,
2405: p_msg_level=>fnd_log.level_statement);
2406: END IF;
2407: END IF;
2419: p_column_value => p_cust_acct_relate_rec.cust_account_id,
2420: x_return_status => x_return_status );
2421:
2422: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
2423: hz_utility_v2pub.debug(p_message=>'cust_account_id is foreign key of hz_cust_accounts. ' ||
2424: 'x_return_status = ' || x_return_status,
2425: p_prefix=>l_debug_prefix,
2426: p_msg_level=>fnd_log.level_statement);
2427: END IF;
2427: END IF;
2428: END IF;
2429:
2430: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
2431: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'(+) after validate cust_account_id ... ' ||
2432: 'x_return_status = ' || x_return_status,
2433: p_msg_level=>fnd_log.level_statement);
2434: END IF;
2435: END IF;
2437: --------------------------------------
2438: -- validate related_cust_account_id
2439: --------------------------------------
2440: /****Logical APIs - validation not required****/
2441: IF(HZ_UTILITY_V2PUB.G_CALLING_API IS NULL) THEN
2442: -- related_cust_account_id is mandatory field
2443: IF (p_create_update_flag <> 'U') OR
2444: (p_cust_acct_relate_rec.cust_acct_relate_id is NULL) -- Bug 4529413
2445: THEN
2450: p_restricted => 'Y',
2451: x_return_status => x_return_status );
2452:
2453: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
2454: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'related_cust_account_id is mandatory. ' ||
2455: 'x_return_status = ' || x_return_status,
2456: p_msg_level=>fnd_log.level_statement);
2457: END IF;
2458: END IF;
2470: p_column_value => p_cust_acct_relate_rec.related_cust_account_id,
2471: x_return_status => x_return_status );
2472:
2473: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
2474: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,p_message=>'related_cust_account_id is foreign key of hz_cust_accounts. ' ||
2475: 'x_return_status = ' || x_return_status,
2476: p_msg_level=>fnd_log.level_statement);
2477: END IF;
2478:
2501: NULL;
2502: END;
2503:
2504: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
2505: hz_utility_v2pub.debug(p_message=>'combination of cust_account_id and related_cust_account_id should be unique. ' ||
2506: 'x_return_status = ' || x_return_status,
2507: p_prefix =>l_debug_prefix,
2508: p_msg_level=>fnd_log.level_statement);
2509: END IF;
2509: END IF;
2510: END IF;
2511:
2512: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
2513: hz_utility_v2pub.debug(p_message=>'(+) after validate related_cust_account_id ... ' ||
2514: 'x_return_status = ' || x_return_status,
2515: p_prefix =>l_debug_prefix,
2516: p_msg_level=>fnd_log.level_statement);
2517: END IF;
2520: -- validate customer_reciprocal_flag
2521: --------------------------------------
2522:
2523: /****Logical APIs - validation not required****/
2524: IF(HZ_UTILITY_V2PUB.G_CALLING_API IS NULL) THEN
2525: -- donot need to check customer_reciprocal_flag mandatory
2526: -- because customer_reciprocal_flag is non-updateable and it is defaulted
2527: -- to 'N' during insert
2528:
2536: p_old_column_value => l_customer_reciprocal_flag,
2537: x_return_status => x_return_status );
2538:
2539: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
2540: hz_utility_v2pub.debug(p_message=>'customer_reciprocal_flag is non-updateable. ' ||
2541: 'x_return_status = ' || x_return_status,
2542: p_prefix =>l_debug_prefix,
2543: p_msg_level=>fnd_log.level_statement);
2544: END IF;
2560: x_return_status => x_return_status );
2561:
2562:
2563: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
2564: hz_utility_v2pub.debug(p_message=>'customer_reciprocal_flag is lookup code in lookup type YES/NO. ' ||
2565: 'x_return_status = ' || x_return_status,
2566: p_prefix =>l_debug_prefix,
2567: p_msg_level=>fnd_log.level_statement);
2568: END IF;
2569: END IF;
2570:
2571:
2572: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
2573: hz_utility_v2pub.debug(p_message=>'(+) after validate customer_reciprocal_flag ... ' ||
2574: 'x_return_status = ' || x_return_status,
2575: p_prefix =>l_debug_prefix,
2576: p_msg_level=>fnd_log.level_statement);
2577: END IF;
2594: x_return_status => x_return_status );
2595:
2596:
2597: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
2598: hz_utility_v2pub.debug(p_message=>'relationship_type is lookup code in lookup type RELATIONSHIP_TYPE. ' ||
2599: 'x_return_status = ' || x_return_status,
2600: p_prefix =>l_debug_prefix,
2601: p_msg_level=>fnd_log.level_statement);
2602: END IF;
2603: END IF;
2604:
2605:
2606: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
2607: hz_utility_v2pub.debug(p_message=>'(+) after validate relationship_type ... ' ||
2608: 'x_return_status = ' || x_return_status,
2609: p_prefix =>l_debug_prefix,
2610: p_msg_level=>fnd_log.level_statement);
2611: END IF;
2622: p_column_value => p_cust_acct_relate_rec.status,
2623: x_return_status => x_return_status );
2624:
2625: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
2626: hz_utility_v2pub.debug(p_message=>'status cannot be updated to null. ' ||
2627: 'x_return_status = ' || x_return_status,
2628: p_prefix =>l_debug_prefix,
2629: p_msg_level=>fnd_log.level_statement);
2630: END IF;
2630: END IF;
2631: END IF;
2632:
2633: /****Logical APIs - validation not required****/
2634: IF(HZ_UTILITY_V2PUB.G_CALLING_API IS NULL) THEN
2635: -- status is lookup code in lookup type CODE_STATUS
2636: IF p_cust_acct_relate_rec.status IS NOT NULL AND
2637: p_cust_acct_relate_rec.status <> FND_API.G_MISS_CHAR AND
2638: ( p_create_update_flag = 'C' OR
2646: x_return_status => x_return_status );
2647:
2648:
2649: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
2650: hz_utility_v2pub.debug(p_message=>'status is lookup code in lookup type CODE_STATUS. ' ||
2651: 'x_return_status = ' || x_return_status,
2652: p_prefix =>l_debug_prefix,
2653: p_msg_level=>fnd_log.level_statement);
2654: END IF;
2655: END IF;
2656: END IF;
2657:
2658: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
2659: hz_utility_v2pub.debug(p_message=>'(+) after validate status ... ' ||
2660: 'x_return_status = ' || x_return_status,
2661: p_prefix =>l_debug_prefix,
2662: p_msg_level=>fnd_log.level_statement);
2663: END IF;
2683:
2684: -- Debug info.
2685:
2686: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
2687: hz_utility_v2pub.debug(p_message=>' validate_cust_acct_relate (-)',
2688: p_prefix=>l_debug_prefix,
2689: p_msg_level=>fnd_log.level_procedure);
2690: END IF;
2691:
2819:
2820: -- Debug info.
2821:
2822: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
2823: hz_utility_v2pub.debug(p_message=> 'validate_customer_profile (+)',
2824: p_prefix=>l_debug_prefix,
2825: p_msg_level=>fnd_log.level_procedure);
2826: END IF;
2827: -- Select fields for later use during update.
2865: --------------------------------------
2866: -- validate cust_account_profile_id
2867: --------------------------------------
2868: /****Logical APIs - validation not required****/
2869: IF(HZ_UTILITY_V2PUB.G_CALLING_API IS NULL) THEN
2870: IF p_create_update_flag = 'C' THEN
2871:
2872: -- If primary key value is passed, check for uniqueness.
2873: -- If primary key value is not passed, it will be generated
2890: NULL;
2891: END;
2892:
2893: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
2894: hz_utility_v2pub.debug(p_message=>'cust_account_profile_id is unique during creation if passed in. ' ||
2895: 'x_return_status = ' || x_return_status,
2896: p_prefix =>l_debug_prefix,
2897: p_msg_level=>fnd_log.level_statement);
2898: END IF;
2900: END IF;
2901: END IF;
2902:
2903: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
2904: hz_utility_v2pub.debug(p_message=>'(+) after validate cust_account_profile_id ... ' ||
2905: 'x_return_status = ' || x_return_status,
2906: p_prefix =>l_debug_prefix,
2907: p_msg_level=>fnd_log.level_statement);
2908: END IF;
2911: ----------------------------------------------
2912: -- validate cust_account_id
2913: ----------------------------------------------
2914: /****Logical APIs - validation not required****/
2915: IF(HZ_UTILITY_V2PUB.G_CALLING_API IS NULL) THEN
2916: -- cust_account_id is mandatory field
2917: -- Since cust_account_id is non-updateable, we only need to check mandatory
2918: -- during creation.
2919: --
2922: --
2923:
2924:
2925: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
2926: hz_utility_v2pub.debug(p_message=>'cust_account_id = ' || p_customer_profile_rec.cust_account_id || ' ' ||
2927: 'x_return_status = ' || x_return_status,
2928: p_prefix =>l_debug_prefix,
2929: p_msg_level=>fnd_log.level_statement);
2930: END IF;
2937: p_column_value => p_customer_profile_rec.cust_account_id,
2938: x_return_status => x_return_status );
2939:
2940: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
2941: hz_utility_v2pub.debug(p_message=>'cust_account_id is mandatory. ' ||
2942: 'x_return_status = ' || x_return_status,
2943: p_prefix =>l_debug_prefix,
2944: p_msg_level=>fnd_log.level_statement);
2945: END IF;
2955: p_column_value => p_customer_profile_rec.party_id,
2956: x_return_status => x_return_status );
2957:
2958: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
2959: hz_utility_v2pub.debug(p_message=>'party_id is mandatory. ' ||
2960: 'x_return_status = ' || x_return_status,
2961: p_prefix =>l_debug_prefix,
2962: p_msg_level=>fnd_log.level_statement);
2963: END IF;
2974: p_old_column_value => l_cust_account_id,
2975: x_return_status => x_return_status );
2976:
2977: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
2978: hz_utility_v2pub.debug(p_message=>'cust_account_id is non-updateable. ' ||
2979: 'x_return_status = ' || x_return_status,
2980: p_prefix =>l_debug_prefix,
2981: p_msg_level=>fnd_log.level_statement);
2982: END IF;
2995: p_old_column_value => l_party_id,
2996: x_return_status => x_return_status );
2997:
2998: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
2999: hz_utility_v2pub.debug(p_message=>'cust_account_id is non-updateable. ' ||
3000: 'x_return_status = ' || x_return_status,
3001: p_prefix =>l_debug_prefix,
3002: p_msg_level=>fnd_log.level_statement);
3003: END IF;
3019: x_return_status => x_return_status );
3020:
3021:
3022: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
3023: hz_utility_v2pub.debug(p_message=>'cust_account_id is foreign key to hz_cust_accounts. ' ||
3024: 'x_return_status = ' || x_return_status,
3025: p_prefix =>l_debug_prefix,
3026: p_msg_level=>fnd_log.level_statement);
3027: END IF;
3059: END;
3060:
3061:
3062: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
3063: hz_utility_v2pub.debug(p_message=>'only one customer profile for one account. ' ||
3064: 'x_return_status = ' || x_return_status,
3065: p_prefix =>l_debug_prefix,
3066: p_msg_level=>fnd_log.level_statement);
3067: END IF;
3091: END;
3092:
3093:
3094: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
3095: hz_utility_v2pub.debug(p_message=>'only one customer profile for one party at party level. ' ||
3096: 'x_return_status = ' || x_return_status,
3097: p_prefix =>l_debug_prefix,
3098: p_msg_level=>fnd_log.level_statement);
3099: END IF;
3102: END IF;
3103:
3104:
3105: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
3106: hz_utility_v2pub.debug(p_message=>'(+) after validate cust_account_id ... ' ||
3107: 'x_return_status = ' || x_return_status,
3108: p_prefix =>l_debug_prefix,
3109: p_msg_level=>fnd_log.level_statement);
3110: END IF;
3130: p_column_value => p_customer_profile_rec.review_cycle,
3131: x_return_status => x_return_status );
3132:
3133: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
3134: hz_utility_v2pub.debug(p_message=>'review_cycle is lookup code in lookup type PERIODIC_REVIEW_CYCLE in ar_lookups. ' ||
3135: 'x_return_status = ' || x_return_status,
3136: p_prefix =>l_debug_prefix,
3137: p_msg_level=>fnd_log.level_statement);
3138: END IF;
3158: x_return_status => x_return_status );
3159:
3160:
3161: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
3162: hz_utility_v2pub.debug(p_message=>'collector_id is mandatory : it can be null but not G_MISS. ' ||
3163: 'x_return_status = ' || x_return_status,
3164: p_prefix =>l_debug_prefix,
3165: p_msg_level=>fnd_log.level_statement);
3166: END IF;
3175: x_return_status => x_return_status );
3176:
3177:
3178: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
3179: hz_utility_v2pub.debug(p_message=>'collector_id is foreign key to ar_collectors. ' ||
3180: 'x_return_status = ' || x_return_status,
3181: p_prefix =>l_debug_prefix,
3182: p_msg_level=>fnd_log.level_statement);
3183: END IF;
3184:
3185: END IF;
3186:
3187: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
3188: hz_utility_v2pub.debug(p_message=>'(+) after validate collector_id ... ' ||
3189: 'x_return_status = ' || x_return_status,
3190: p_prefix =>l_debug_prefix,
3191: p_msg_level=>fnd_log.level_statement);
3192: END IF;
3208: x_return_status => x_return_status );
3209:
3210:
3211: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
3212: hz_utility_v2pub.debug(p_message=>'credit_checking is mandatory : it can be null but not G_MISS. ' ||
3213: 'x_return_status = ' || x_return_status,
3214: p_prefix =>l_debug_prefix,
3215: p_msg_level=>fnd_log.level_statement);
3216: END IF;
3226: p_column_value => p_customer_profile_rec.credit_checking,
3227: x_return_status => x_return_status );
3228:
3229: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
3230: hz_utility_v2pub.debug(p_message=>'credit_checking is lookup code in lookup type YES/NO. ' ||
3231: 'x_return_status = ' || x_return_status,
3232: p_prefix =>l_debug_prefix,
3233: p_msg_level=>fnd_log.level_statement);
3234: END IF;
3235:
3236: END IF;
3237:
3238: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
3239: hz_utility_v2pub.debug(p_message=>'(+) after validate credit_checking ... ' ||
3240: 'x_return_status = ' || x_return_status,
3241: p_prefix =>l_debug_prefix,
3242: p_msg_level=>fnd_log.level_statement);
3243: END IF;
3259: p_column_value => p_customer_profile_rec.discount_terms,
3260: x_return_status => x_return_status );
3261:
3262: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
3263: hz_utility_v2pub.debug(p_message=>'discount_terms is mandatory : it can be null but not G_MISS. ' ||
3264: 'x_return_status = ' || x_return_status,
3265: p_prefix =>l_debug_prefix,
3266: p_msg_level=>fnd_log.level_statement);
3267: END IF;
3267: END IF;
3268:
3269:
3270: /****Logical APIs - validation not required****/
3271: IF(HZ_UTILITY_V2PUB.G_CALLING_API IS NULL) THEN
3272: -- discount_terms is lookup code in lookup type YES/NO
3273: IF p_customer_profile_rec.discount_terms IS NOT NULL AND
3274: p_customer_profile_rec.discount_terms <> FND_API.G_MISS_CHAR
3275: AND ( p_create_update_flag = 'C' OR
3283: x_return_status => x_return_status );
3284:
3285:
3286: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
3287: hz_utility_v2pub.debug(p_message=>'discount_terms is lookup code in lookup type YES/NO. ' ||
3288: 'x_return_status = ' || x_return_status,
3289: p_prefix =>l_debug_prefix,
3290: p_msg_level=>fnd_log.level_statement);
3291: END IF;
3293: END IF;
3294: END IF;
3295:
3296: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
3297: hz_utility_v2pub.debug(p_message=>'(+) after validate discount_terms ... ' ||
3298: 'x_return_status = ' || x_return_status,
3299: p_prefix =>l_debug_prefix,
3300: p_msg_level=>fnd_log.level_statement);
3301: END IF;
3317: x_return_status => x_return_status );
3318:
3319:
3320: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
3321: hz_utility_v2pub.debug(p_message=>'tolerance is mandatory : it can be null but not G_MISS. ' ||
3322: 'x_return_status = ' || x_return_status,
3323: p_prefix =>l_debug_prefix,
3324: p_msg_level=>fnd_log.level_statement);
3325: END IF;
3360: END;
3361: END IF;
3362:
3363: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
3364: hz_utility_v2pub.debug(p_message=>'profile_class_id should be positive, foreign key of hz_cust_profile_classes and point to an active profile class. ' ||
3365: 'x_return_status = ' || x_return_status,
3366: p_prefix =>l_debug_prefix,
3367: p_msg_level=>fnd_log.level_statement);
3368: END IF;
3379: x_return_status => x_return_status );
3380:
3381:
3382: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
3383: hz_utility_v2pub.debug(p_message=>'profile_class_id cannot be updated to null. ' ||
3384: 'x_return_status = ' || x_return_status,
3385: p_prefix =>l_debug_prefix,
3386: p_msg_level=>fnd_log.level_statement);
3387: END IF;
3389: END IF;
3390:
3391:
3392: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
3393: hz_utility_v2pub.debug(p_message=>'(+) after validate profile_class_id ... ' ||
3394: 'x_return_status = ' || x_return_status,
3395: p_prefix =>l_debug_prefix,
3396: p_msg_level=>fnd_log.level_statement);
3397: END IF;
3411: x_return_status => x_return_status );
3412:
3413:
3414: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
3415: hz_utility_v2pub.debug(p_message=>'site_use_id is non-updateable. ' ||
3416: 'x_return_status = ' || x_return_status,
3417: p_prefix =>l_debug_prefix,
3418: p_msg_level=>fnd_log.level_statement);
3419: END IF;
3464: x_return_status := FND_API.G_RET_STS_ERROR;
3465: END IF;
3466:
3467: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
3468: hz_utility_v2pub.debug(p_message=>'cust_account_id should be same as cust_account_id site_use_id belongs to. ' ||
3469: 'x_return_status = ' || x_return_status,
3470: p_prefix =>l_debug_prefix,
3471: p_msg_level=>fnd_log.level_statement);
3472: END IF;
3481: x_return_status := FND_API.G_RET_STS_ERROR;
3482: END;
3483:
3484: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
3485: hz_utility_v2pub.debug(p_message=>'site_use_id is foreign key to hz_cust_site_uses. ' ||
3486: 'x_return_status = ' || x_return_status,
3487: p_prefix =>l_debug_prefix,
3488: p_msg_level=>fnd_log.level_statement);
3489: END IF;
3506: END;
3507:
3508:
3509: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
3510: hz_utility_v2pub.debug(p_message=>'one site use can only have one profile. ' ||
3511: 'x_return_status = ' || x_return_status,
3512: p_prefix =>l_debug_prefix,
3513: p_msg_level=>fnd_log.level_statement);
3514: END IF;
3527: x_return_status := FND_API.G_RET_STS_ERROR;
3528:
3529:
3530: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
3531: hz_utility_v2pub.debug(p_message=>'profile at party level cannot be assign to a site. ' ||
3532: 'x_return_status = ' || x_return_status,
3533: p_prefix =>l_debug_prefix,
3534: p_msg_level=>fnd_log.level_statement);
3535: END IF;
3538: END IF;
3539:
3540:
3541: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
3542: hz_utility_v2pub.debug(p_message=>'(+) after validate site_use_id ... ' ||
3543: 'x_return_status = ' || x_return_status,
3544: p_prefix =>l_debug_prefix,
3545: p_msg_level=>fnd_log.level_statement);
3546: END IF;
3545: p_msg_level=>fnd_log.level_statement);
3546: END IF;
3547:
3548: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
3549: hz_utility_v2pub.debug(p_message=>'(+) after validate site_use_id ... ' ||
3550: 'x_return_status = ' || x_return_status,
3551: p_prefix =>l_debug_prefix,
3552: p_msg_level=>fnd_log.level_statement);
3553: END IF;
3570: p_column_value => p_customer_profile_rec.credit_rating,
3571: x_return_status => x_return_status );
3572:
3573: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
3574: hz_utility_v2pub.debug(p_message=>'credit_rating is lookup code in lookup type CREDIT_RATING. ' ||
3575: 'x_return_status = ' || x_return_status,
3576: p_prefix =>l_debug_prefix,
3577: p_msg_level=>fnd_log.level_statement);
3578: END IF;
3580: END IF;
3581:
3582:
3583: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
3584: hz_utility_v2pub.debug(p_message=>'(+) after validate credit_rating ... ' ||
3585: 'x_return_status = ' || x_return_status,
3586: p_prefix =>l_debug_prefix,
3587: p_msg_level=>fnd_log.level_statement);
3588: END IF;
3605: p_column_value => p_customer_profile_rec.risk_code,
3606: x_return_status => x_return_status );
3607:
3608: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
3609: hz_utility_v2pub.debug(p_message=>'risk_code is lookup code in lookup type RISK_CODE. ' ||
3610: 'x_return_status = ' || x_return_status,
3611: p_prefix =>l_debug_prefix,
3612: p_msg_level=>fnd_log.level_statement);
3613: END IF;
3614:
3615: END IF;
3616:
3617: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
3618: hz_utility_v2pub.debug(p_message=>'(+) after validate risk_code ... ' ||
3619: 'x_return_status = ' || x_return_status,
3620: p_prefix =>l_debug_prefix,
3621: p_msg_level=>fnd_log.level_statement);
3622: END IF;
3638: p_column_value => p_customer_profile_rec.auto_rec_incl_disputed_flag,
3639: x_return_status => x_return_status );
3640:
3641: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
3642: hz_utility_v2pub.debug(p_message=>'auto_rec_incl_disputed_flag is mandatory : it can be null but not G_MISS. ' ||
3643: 'x_return_status = ' || x_return_status,
3644: p_prefix =>l_debug_prefix,
3645: p_msg_level=>fnd_log.level_statement);
3646: END IF;
3657: x_return_status => x_return_status );
3658:
3659:
3660: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
3661: hz_utility_v2pub.debug(p_message=>'auto_rec_incl_disputed_flag is lookup code in lookup type YES/NO. ' ||
3662: 'x_return_status = ' || x_return_status,
3663: p_prefix =>l_debug_prefix,
3664: p_msg_level=>fnd_log.level_statement);
3665: END IF;
3667: END IF;
3668:
3669:
3670: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
3671: hz_utility_v2pub.debug(p_message=>'(+) after validate auto_rec_incl_disputed_flag ... ' ||
3672: 'x_return_status = ' || x_return_status,
3673: p_prefix =>l_debug_prefix,
3674: p_msg_level=>fnd_log.level_statement);
3675: END IF;
3678: ----------------------------------------------
3679: -- validate charge_on_finance_charge_flag
3680: ----------------------------------------------
3681: /****Logical APIs - validation not required****/
3682: IF(HZ_UTILITY_V2PUB.G_CALLING_API IS NULL) THEN
3683: -- charge_on_finance_charge_flag is lookup code in lookup type YES/NO
3684: -- As a part of late charge policy project changing the lookup type to AR_FORMULAE (bug # 5065436)
3685: IF p_customer_profile_rec.charge_on_finance_charge_flag IS NOT NULL AND
3686: p_customer_profile_rec.charge_on_finance_charge_flag <> FND_API.G_MISS_CHAR
3691: p_column_value => p_customer_profile_rec.charge_on_finance_charge_flag,
3692: x_return_status => x_return_status );
3693:
3694: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
3695: hz_utility_v2pub.debug(p_message=>'charge_on_finance_charge_flag is lookup code in lookup type AR_FORMULAE. ' ||
3696: 'x_return_status = ' || x_return_status,
3697: p_prefix =>l_debug_prefix,
3698: p_msg_level=>fnd_log.level_statement);
3699: END IF;
3700:
3701: END IF;
3702:
3703: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
3704: hz_utility_v2pub.debug(p_message=>'(+) after charge_on_finance_charge_flag ... ' ||
3705: 'x_return_status = ' || x_return_status,
3706: p_prefix =>l_debug_prefix,
3707: p_msg_level=>fnd_log.level_statement);
3708: END IF;
3711: ----------------------------------------------
3712: -- validate cons_inv_flag
3713: ----------------------------------------------
3714: /****Logical APIs - validation not required****/
3715: IF(HZ_UTILITY_V2PUB.G_CALLING_API IS NULL) THEN
3716: -- cons_inv_flag is lookup code in lookup type YES/NO
3717: IF p_customer_profile_rec.cons_inv_flag IS NOT NULL AND
3718: p_customer_profile_rec.cons_inv_flag <> FND_API.G_MISS_CHAR
3719: THEN
3724: x_return_status => x_return_status );
3725:
3726:
3727: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
3728: hz_utility_v2pub.debug(p_message=>'cons_inv_flag is lookup code in lookup type YES/NO. ' ||
3729: 'x_return_status = ' || x_return_status,
3730: p_prefix =>l_debug_prefix,
3731: p_msg_level=>fnd_log.level_statement);
3732: END IF;
3734: END IF;
3735:
3736:
3737: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
3738: hz_utility_v2pub.debug(p_message=>'(+) after cons_inv_flag ... ' ||
3739: 'x_return_status = ' || x_return_status,
3740: p_prefix =>l_debug_prefix,
3741: p_msg_level=>fnd_log.level_statement);
3742: END IF;
3745: ----------------------------------------------
3746: -- validate cons_bill_level
3747: ----------------------------------------------
3748: /****Logical APIs - validation not required****/
3749: IF(HZ_UTILITY_V2PUB.G_CALLING_API IS NULL) THEN
3750:
3751: validate_bill_level (
3752: p_create_update_flag => p_create_update_flag,
3753: p_customer_profile_rec => p_customer_profile_rec,
3753: p_customer_profile_rec => p_customer_profile_rec,
3754: x_return_status => x_return_status );
3755:
3756: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
3757: hz_utility_v2pub.debug(p_message=>'(+) after cons_bill_level ... ' ||
3758: 'x_return_status = ' || x_return_status,
3759: p_prefix =>l_debug_prefix,
3760: p_msg_level=>fnd_log.level_statement);
3761: END IF;
3774: p_column_value => p_customer_profile_rec.status,
3775: x_return_status => x_return_status );
3776:
3777: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
3778: hz_utility_v2pub.debug(p_message=>'status cannot be updated to null. ' ||
3779: 'x_return_status = ' || x_return_status,
3780: p_prefix =>l_debug_prefix,
3781: p_msg_level=>fnd_log.level_statement);
3782: END IF;
3783:
3784: END IF;
3785:
3786: /****Logical APIs - validation not required****/
3787: IF(HZ_UTILITY_V2PUB.G_CALLING_API IS NULL) THEN
3788: -- status is lookup code in lookup type CODE_STATUS
3789: IF p_customer_profile_rec.status IS NOT NULL AND
3790: p_customer_profile_rec.status <> FND_API.G_MISS_CHAR AND
3791: ( p_create_update_flag = 'C' OR
3798: p_column_value => p_customer_profile_rec.status,
3799: x_return_status => x_return_status );
3800:
3801: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
3802: hz_utility_v2pub.debug(p_message=>'status is lookup code in lookup type CODE_STATUS. ' ||
3803: 'x_return_status = ' || x_return_status,
3804: p_prefix =>l_debug_prefix,
3805: p_msg_level=>fnd_log.level_statement);
3806: END IF;
3808: END IF;
3809: END IF;
3810:
3811: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
3812: hz_utility_v2pub.debug(p_message=>'(+) after status ... ' ||
3813: 'x_return_status = ' || x_return_status,
3814: p_prefix =>l_debug_prefix,
3815: p_msg_level=>fnd_log.level_statement);
3816: END IF;
3832: p_column_value => p_customer_profile_rec.dunning_letters,
3833: x_return_status => x_return_status );
3834:
3835: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
3836: hz_utility_v2pub.debug(p_message=>'dunning_letters is mandatory : it can be null but not G_MISS. ' ||
3837: 'x_return_status = ' || x_return_status,
3838: p_prefix =>l_debug_prefix,
3839: p_msg_level=>fnd_log.level_statement);
3840: END IF;
3853: p_column_value => p_customer_profile_rec.dunning_letters,
3854: x_return_status => x_return_status );
3855:
3856: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
3857: hz_utility_v2pub.debug(p_message=>'dunning_letters is lookup code in lookup type YES/NO. ' ||
3858: 'x_return_status = ' || x_return_status,
3859: p_prefix =>l_debug_prefix,
3860: p_msg_level=>fnd_log.level_statement);
3861: END IF;
3862:
3863: END IF;
3864:
3865: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
3866: hz_utility_v2pub.debug(p_message=>'(+) after dunning_letters ... ' ||
3867: 'x_return_status = ' || x_return_status,
3868: p_prefix =>l_debug_prefix,
3869: p_msg_level=>fnd_log.level_statement);
3870: END IF;
3886: p_column_value => p_customer_profile_rec.interest_charges,
3887: x_return_status => x_return_status );
3888:
3889: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
3890: hz_utility_v2pub.debug(p_message=>'interest_charges is mandatory : it can be null but not G_MISS. ' ||
3891: 'x_return_status = ' || x_return_status,
3892: p_prefix =>l_debug_prefix,
3893: p_msg_level=>fnd_log.level_statement);
3894: END IF;
3893: p_msg_level=>fnd_log.level_statement);
3894: END IF;
3895:
3896: /****Logical APIs - validation not required****/
3897: IF(HZ_UTILITY_V2PUB.G_CALLING_API IS NULL) THEN
3898: -- interest_charges is lookup code in lookup type YES/NO
3899: IF p_customer_profile_rec.interest_charges IS NOT NULL AND
3900: p_customer_profile_rec.interest_charges <> FND_API.G_MISS_CHAR
3901: AND ( p_create_update_flag = 'C' OR
3908: p_column_value => p_customer_profile_rec.interest_charges,
3909: x_return_status => x_return_status );
3910:
3911: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
3912: hz_utility_v2pub.debug(p_message=>'interest_charges is lookup code in lookup type YES/NO. ' ||
3913: 'x_return_status = ' || x_return_status,
3914: p_prefix =>l_debug_prefix,
3915: p_msg_level=>fnd_log.level_statement);
3916: END IF;
3918: END IF;
3919: END IF;
3920:
3921: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
3922: hz_utility_v2pub.debug(p_message=>'(+) after interest_charges ... ' ||
3923: 'x_return_status = ' || x_return_status,
3924: p_prefix =>l_debug_prefix,
3925: p_msg_level=>fnd_log.level_statement);
3926: END IF;
3942: p_column_value => p_customer_profile_rec.send_statements,
3943: x_return_status => x_return_status );
3944:
3945: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
3946: hz_utility_v2pub.debug(p_message=>'send_statements is mandatory : it can be null but not G_MISS. ' ||
3947: 'x_return_status = ' || x_return_status,
3948: p_prefix =>l_debug_prefix,
3949: p_msg_level=>fnd_log.level_statement);
3950: END IF;
3950: END IF;
3951:
3952:
3953: /****Logical APIs - validation not required****/
3954: IF(HZ_UTILITY_V2PUB.G_CALLING_API IS NULL) THEN
3955: -- send_statements is lookup code in lookup type YES/NO
3956: IF p_customer_profile_rec.send_statements IS NOT NULL AND
3957: p_customer_profile_rec.send_statements <> FND_API.G_MISS_CHAR
3958: AND ( p_create_update_flag = 'C' OR
3965: p_column_value => p_customer_profile_rec.send_statements,
3966: x_return_status => x_return_status );
3967:
3968: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
3969: hz_utility_v2pub.debug(p_message=>'send_statements is lookup code in lookup type YES/NO. ' ||
3970: 'x_return_status = ' || x_return_status,
3971: p_prefix =>l_debug_prefix,
3972: p_msg_level=>fnd_log.level_statement);
3973: END IF;
3975: END IF;
3976: END IF;
3977:
3978: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
3979: hz_utility_v2pub.debug(p_message=>'(+) after send_statements ... ' ||
3980: 'x_return_status = ' || x_return_status,
3981: p_prefix =>l_debug_prefix,
3982: p_msg_level=>fnd_log.level_statement);
3983: END IF;
4000: x_return_status => x_return_status );
4001:
4002:
4003: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
4004: hz_utility_v2pub.debug(p_message=>'credit_balance_statements is mandatory : it can be null but not G_MISS. ' ||
4005: 'x_return_status = ' || x_return_status,
4006: p_prefix =>l_debug_prefix,
4007: p_msg_level=>fnd_log.level_statement);
4008: END IF;
4008: END IF;
4009:
4010:
4011: /****Logical APIs - validation not required****/
4012: IF(HZ_UTILITY_V2PUB.G_CALLING_API IS NULL) THEN
4013: -- credit_balance_statements is lookup code in lookup type YES/NO
4014: IF p_customer_profile_rec.credit_balance_statements IS NOT NULL AND
4015: p_customer_profile_rec.credit_balance_statements <> FND_API.G_MISS_CHAR
4016: THEN
4020: p_column_value => p_customer_profile_rec.credit_balance_statements,
4021: x_return_status => x_return_status );
4022:
4023: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
4024: hz_utility_v2pub.debug(p_message=>'credit_balance_statements is lookup code in lookup type YES/NO. ' ||
4025: 'x_return_status = ' || x_return_status,
4026: p_prefix =>l_debug_prefix,
4027: p_msg_level=>fnd_log.level_statement);
4028: END IF;
4030: END IF;
4031: END IF;
4032:
4033: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
4034: hz_utility_v2pub.debug(p_message=>'(+) after credit_balance_statements ... ' ||
4035: 'x_return_status = ' || x_return_status,
4036: p_prefix =>l_debug_prefix,
4037: p_msg_level=>fnd_log.level_statement);
4038: END IF;
4054: p_column_value => p_customer_profile_rec.credit_hold,
4055: x_return_status => x_return_status );
4056:
4057: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
4058: hz_utility_v2pub.debug(p_message=>'credit_hold is mandatory : it can be null but not G_MISS. ' ||
4059: 'x_return_status = ' || x_return_status,
4060: p_prefix =>l_debug_prefix,
4061: p_msg_level=>fnd_log.level_statement);
4062: END IF;
4062: END IF;
4063:
4064:
4065: /****Logical APIs - validation not required****/
4066: IF(HZ_UTILITY_V2PUB.G_CALLING_API IS NULL) THEN
4067: -- credit_hold is lookup code in lookup type YES/NO
4068: IF p_customer_profile_rec.credit_hold IS NOT NULL AND
4069: p_customer_profile_rec.credit_hold <> FND_API.G_MISS_CHAR
4070: THEN
4074: p_column_value => p_customer_profile_rec.credit_hold,
4075: x_return_status => x_return_status );
4076:
4077: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
4078: hz_utility_v2pub.debug(p_message=>'credit_hold is lookup code in lookup type YES/NO. ' ||
4079: 'x_return_status = ' || x_return_status,
4080: p_prefix =>l_debug_prefix,
4081: p_msg_level=>fnd_log.level_statement);
4082: END IF;
4084: END IF;
4085: END IF;
4086:
4087: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
4088: hz_utility_v2pub.debug(p_message=>'(+) after credit_hold ... ' ||
4089: 'x_return_status = ' || x_return_status,
4090: p_prefix =>l_debug_prefix,
4091: p_msg_level=>fnd_log.level_statement);
4092: END IF;
4140: p_column_value => p_customer_profile_rec.account_status,
4141: x_return_status => x_return_status );
4142:
4143: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
4144: hz_utility_v2pub.debug(p_message=>'account_status is lookup code in lookup type ACCOUNT_STATUS.' ||
4145: 'x_return_status = ' || x_return_status,
4146: p_prefix =>l_debug_prefix,
4147: p_msg_level=>fnd_log.level_statement);
4148: END IF;
4149:
4150: END IF;
4151:
4152: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
4153: hz_utility_v2pub.debug(p_message=>'(+) after validate account_status ... ' ||
4154: 'x_return_status = ' || x_return_status,
4155: p_prefix =>l_debug_prefix,
4156: p_msg_level=>fnd_log.level_statement);
4157: END IF;
4175: FND_MESSAGE.SET_TOKEN( 'VALUE2', '100' );
4176: FND_MSG_PUB.ADD;
4177: x_return_status := FND_API.G_RET_STS_ERROR;
4178: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
4179: hz_utility_v2pub.debug(p_message=>'Tolerance should be between -100 and 100 .' ||
4180: 'x_return_status = ' || x_return_status,
4181: p_prefix =>l_debug_prefix,
4182: p_msg_level=>fnd_log.level_statement);
4183: END IF;
4185: END IF;
4186: END IF;
4187:
4188: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
4189: hz_utility_v2pub.debug(p_message=>'(+) after validate tolerance ... ' ||
4190: 'x_return_status = ' || x_return_status,
4191: p_prefix =>l_debug_prefix,
4192: p_msg_level=>fnd_log.level_statement);
4193: END IF;
4212: FND_MSG_PUB.ADD;
4213: x_return_status := FND_API.G_RET_STS_ERROR;
4214:
4215: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
4216: hz_utility_v2pub.debug(p_message=>'Percent_Collectable should be between 0 and 100 .' ||
4217: 'x_return_status = ' || x_return_status,
4218: p_prefix =>l_debug_prefix,
4219: p_msg_level=>fnd_log.level_statement);
4220: END IF;
4222: END IF;
4223: END IF;
4224:
4225: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
4226: hz_utility_v2pub.debug(p_message=>'(+) after validate percent_collectable ... ' ||
4227: 'x_return_status = ' || x_return_status,
4228: p_prefix =>l_debug_prefix,
4229: p_msg_level=>fnd_log.level_statement);
4230: END IF;
4247: x_return_status => x_return_status );
4248:
4249:
4250: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
4251: hz_utility_v2pub.debug(p_message=>'override_terms is lookup code in lookup type YES/NO. ' ||
4252: 'x_return_status = ' || x_return_status,
4253: p_prefix =>l_debug_prefix,
4254: p_msg_level=>fnd_log.level_statement);
4255: END IF;
4256:
4257: END IF;
4258:
4259: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
4260: hz_utility_v2pub.debug(p_message=>'(+) after override_terms ... ' ||
4261: 'x_return_status = ' || x_return_status,
4262: p_prefix =>l_debug_prefix,
4263: p_msg_level=>fnd_log.level_statement);
4264: END IF;
4279: p_column_value => p_customer_profile_rec.lockbox_matching_option,
4280: x_return_status => x_return_status );
4281:
4282: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
4283: hz_utility_v2pub.debug(p_message=>'lockbox_matching_option is lookup code in lookup type
4284: ARLPLB_MATCHING_OPTION.' ||'x_return_status = ' ||
4285: x_return_status,
4286: p_prefix =>l_debug_prefix,
4287: p_msg_level=>fnd_log.level_statement);
4289:
4290: END IF;
4291:
4292: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
4293: hz_utility_v2pub.debug(p_message=>'(+) after validate lockbox_matching_option ... ' ||
4294: 'x_return_status = ' || x_return_status,
4295: p_prefix =>l_debug_prefix,
4296: p_msg_level=>fnd_log.level_statement);
4297: END IF;
4311: p_column_value => p_customer_profile_rec.autocash_hierarchy_id,
4312: x_return_status => x_return_status );
4313:
4314: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
4315: hz_utility_v2pub.debug(p_message=>'autocash_hierarchy_id is foreign key to
4316: ar_autocash_hierarchies. ' || 'x_return_status = ' ||
4317: x_return_status,
4318: p_prefix =>l_debug_prefix,
4319: p_msg_level=>fnd_log.level_statement);
4321:
4322: END IF;
4323:
4324: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
4325: hz_utility_v2pub.debug(p_message=>'(+) after validate autocash_hierarchy_id ... ' ||
4326: 'x_return_status = ' || x_return_status,
4327: p_prefix =>l_debug_prefix,
4328: p_msg_level=>fnd_log.level_statement);
4329: END IF;
4343: p_column_value => p_customer_profile_rec.autocash_hierarchy_id_for_adr,
4344: x_return_status=> x_return_status );
4345:
4346: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
4347: hz_utility_v2pub.debug(p_message=>'autocash_hierarchy_id_for_adr is foreign key to
4348: ar_autocash_hierarchies . ' || 'x_return_status = ' ||
4349: x_return_status,
4350: p_prefix =>l_debug_prefix,
4351: p_msg_level=>fnd_log.level_statement);
4353:
4354: END IF;
4355:
4356: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
4357: hz_utility_v2pub.debug(p_message=>'(+) after validate autocash_hierarchy_id_for_adr ... ' ||
4358: 'x_return_status = ' || x_return_status,
4359: p_prefix =>l_debug_prefix,
4360: p_msg_level=>fnd_log.level_statement);
4361: END IF;
4374: p_column_value => p_customer_profile_rec.statement_cycle_id,
4375: x_return_status => x_return_status );
4376:
4377: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
4378: hz_utility_v2pub.debug(p_message=>'statement_cycle_id is foreign key to
4379: ar_statement_cycles . ' || 'x_return_status = ' ||
4380: x_return_status,
4381: p_prefix =>l_debug_prefix,
4382: p_msg_level=>fnd_log.level_statement);
4384:
4385: END IF;
4386:
4387: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
4388: hz_utility_v2pub.debug(p_message=>'(+) after validate statement_cycle_id ... ' ||
4389: 'x_return_status = ' || x_return_status,
4390: p_prefix =>l_debug_prefix,
4391: p_msg_level=>fnd_log.level_statement);
4392: END IF;
4407: p_column_value => p_customer_profile_rec.clearing_days,
4408: x_return_status => x_return_status );
4409:
4410: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
4411: hz_utility_v2pub.debug(p_message=>'clearing_days should be > 0.' ||'x_return_status = ' ||
4412: x_return_status,
4413: p_prefix =>l_debug_prefix,
4414: p_msg_level=>fnd_log.level_statement);
4415: END IF;
4416:
4417:
4418: END IF;
4419: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
4420: hz_utility_v2pub.debug(p_message=>'(+) after validate clearing_days... ' ||
4421: 'x_return_status = ' || x_return_status,
4422: p_prefix =>l_debug_prefix,
4423: p_msg_level=>fnd_log.level_statement);
4424: END IF;
4437: p_column_value => p_customer_profile_rec.payment_grace_days,
4438: x_return_status => x_return_status );
4439:
4440: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
4441: hz_utility_v2pub.debug(p_message=>'payment_grace_days should be > 0.' ||'x_return_status = ' ||
4442: x_return_status,
4443: p_prefix =>l_debug_prefix,
4444: p_msg_level=>fnd_log.level_statement);
4445: END IF;
4446:
4447: END IF;
4448:
4449: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
4450: hz_utility_v2pub.debug(p_message=>'(+) after validate payment_grace_days... ' ||
4451: 'x_return_status = ' || x_return_status,
4452: p_prefix =>l_debug_prefix,
4453: p_msg_level=>fnd_log.level_statement);
4454: END IF;
4465: p_column_value => p_customer_profile_rec.interest_period_days,
4466: x_return_status => x_return_status );
4467:
4468: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
4469: hz_utility_v2pub.debug(p_message=>'interest_period_days should be > 0.' ||'x_return_status = ' ||
4470: x_return_status,
4471: p_prefix =>l_debug_prefix,
4472: p_msg_level=>fnd_log.level_statement);
4473: END IF;
4474:
4475: END IF;
4476:
4477: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
4478: hz_utility_v2pub.debug(p_message=>'(+) after validate interest_period_days... ' ||
4479: 'x_return_status = ' || x_return_status,
4480: p_prefix =>l_debug_prefix,
4481: p_msg_level=>fnd_log.level_statement);
4482: END IF;
4497: p_column_value => p_customer_profile_rec.dunning_letter_set_id,
4498: x_return_status => x_return_status );
4499:
4500: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
4501: hz_utility_v2pub.debug(p_message=>'dunning_letter_set_id is foreign key to
4502: ar_dunning_letter_sets . ' || 'x_return_status = ' ||
4503: x_return_status,
4504: p_prefix =>l_debug_prefix,
4505: p_msg_level=>fnd_log.level_statement);
4514:
4515: END IF;
4516:
4517: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
4518: hz_utility_v2pub.debug(p_message=>'(+) after validate dunning_letter_set_id ... ' ||
4519: 'x_return_status = ' || x_return_status,
4520: p_prefix =>l_debug_prefix,
4521: p_msg_level=>fnd_log.level_statement);
4522: END IF;
4536: p_column_value => p_customer_profile_rec.tax_printing_option,
4537: x_return_status => x_return_status );
4538:
4539: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
4540: hz_utility_v2pub.debug(p_message=>'tax_printing_option is lookup code in lookup type
4541: TAX_PRINTING_OPTION.' ||'x_return_status = ' ||
4542: x_return_status,
4543: p_prefix =>l_debug_prefix,
4544: p_msg_level=>fnd_log.level_statement);
4546:
4547: END IF;
4548:
4549: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
4550: hz_utility_v2pub.debug(p_message=>'(+) after validate tax_printing_option ... ' ||
4551: 'x_return_status = ' || x_return_status,
4552: p_prefix =>l_debug_prefix,
4553: p_msg_level=>fnd_log.level_statement);
4554: END IF;
4622: p_ckeck_acc_bfb_enabled => l_ckeck_acc_bfb_enabled,
4623: x_return_status => x_return_status );
4624:
4625: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
4626: hz_utility_v2pub.debug(p_message=>'standard_terms is foreign key to ra_terms . ' ||
4627: 'x_return_status = ' || x_return_status,
4628: p_prefix =>l_debug_prefix,
4629: p_msg_level=>fnd_log.level_statement);
4630: END IF;
4631:
4632: END IF;
4633:
4634: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
4635: hz_utility_v2pub.debug(p_message=>'(+) after validate standard_terms ... ' ||
4636: 'x_return_status = ' || x_return_status,
4637: p_prefix =>l_debug_prefix,
4638: p_msg_level=>fnd_log.level_statement);
4639: END IF;
4654: p_column_value => p_customer_profile_rec.grouping_rule_id,
4655: x_return_status => x_return_status );
4656:
4657: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
4658: hz_utility_v2pub.debug(p_message=>'grouping_rule_id is foreign key to ra_grouping_rules . ' ||
4659: 'x_return_status = ' || x_return_status,
4660: p_prefix =>l_debug_prefix,
4661: p_msg_level=>fnd_log.level_statement);
4662: END IF;
4663:
4664: END IF;
4665:
4666: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
4667: hz_utility_v2pub.debug(p_message=>'(+) after validate grouping_rule_id ... ' ||
4668: 'x_return_status = ' || x_return_status,
4669: p_prefix =>l_debug_prefix,
4670: p_msg_level=>fnd_log.level_statement);
4671: END IF;
4684: p_column_value => v_customer_profile_rec.discount_grace_days,
4685: x_return_status => x_return_status );
4686:
4687: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
4688: hz_utility_v2pub.debug(p_message=>'discount_grace_days should be > 0.' ||'x_return_status = ' ||
4689: x_return_status,
4690: p_prefix =>l_debug_prefix,
4691: p_msg_level=>fnd_log.level_statement);
4692: END IF;
4739: FND_MSG_PUB.ADD;
4740: x_return_status := FND_API.G_RET_STS_ERROR;
4741:
4742: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
4743: hz_utility_v2pub.debug(p_message=>'discount_grace_days should be null when discount_terms is N.' ||
4744: 'x_return_status = ' || x_return_status,
4745: p_prefix =>l_debug_prefix,
4746: p_msg_level=>fnd_log.level_statement);
4747: END IF;
4749: END IF;
4750: END IF;
4751:
4752: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
4753: hz_utility_v2pub.debug(p_message=>'(+) after validate discount_terms ... ' ||
4754: 'x_return_status = ' || x_return_status,
4755: p_prefix =>l_debug_prefix,
4756: p_msg_level=>fnd_log.level_statement);
4757: END IF;
4806: FND_MSG_PUB.ADD;
4807: x_return_status := FND_API.G_RET_STS_ERROR;
4808:
4809: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
4810: hz_utility_v2pub.debug(p_message=>'dunning_letter_set_id cannot be NULL when dunning_letters is Y.' ||
4811: 'x_return_status = ' || x_return_status,
4812: p_prefix =>l_debug_prefix,
4813: p_msg_level=>fnd_log.level_statement);
4814: END IF;
4830: FND_MSG_PUB.ADD;
4831: x_return_status := FND_API.G_RET_STS_ERROR;
4832:
4833: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
4834: hz_utility_v2pub.debug(p_message=>'dunning_letter_set_id should be NULL when dunning_letters is N.' ||
4835: 'x_return_status = ' || x_return_status,
4836: p_prefix =>l_debug_prefix,
4837: p_msg_level=>fnd_log.level_statement);
4838: END IF;
4839:
4840: END IF;
4841: END IF;*/
4842: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
4843: hz_utility_v2pub.debug(p_message=>'(+) after validate duning_letters ... ' ||
4844: 'x_return_status = ' || x_return_status,
4845: p_prefix =>l_debug_prefix,
4846: p_msg_level=>fnd_log.level_statement);
4847: END IF;
4907: FND_MSG_PUB.ADD;
4908: x_return_status := FND_API.G_RET_STS_ERROR;
4909:
4910: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
4911: hz_utility_v2pub.debug(p_message=>'statement_cycle_id cannot be NULL when send_statements
4912: is Y.' || 'x_return_status = ' || x_return_status,
4913: p_prefix =>l_debug_prefix,
4914: p_msg_level=>fnd_log.level_statement);
4915: END IF;
4923: FND_MSG_PUB.ADD;
4924: x_return_status := FND_API.G_RET_STS_ERROR;
4925:
4926: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
4927: hz_utility_v2pub.debug(p_message=>'credit_balance_statements cannot be NULL when
4928: send_statements is Y .' || 'x_return_status = ' ||
4929: x_return_status,
4930: p_prefix =>l_debug_prefix,
4931: p_msg_level=>fnd_log.level_statement);
4948: FND_MSG_PUB.ADD;
4949: x_return_status := FND_API.G_RET_STS_ERROR;
4950:
4951: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
4952: hz_utility_v2pub.debug(p_message=>'statement_cycle_id should be NULL when send_statements
4953: is N .' || 'x_return_status = ' || x_return_status,
4954: p_prefix =>l_debug_prefix,
4955: p_msg_level=>fnd_log.level_statement);
4956: END IF;
4967: FND_MSG_PUB.ADD;
4968: x_return_status := FND_API.G_RET_STS_ERROR;
4969:
4970: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
4971: hz_utility_v2pub.debug(p_message=>'credit_balance_statements should be N when send_statements
4972: is N .' || 'x_return_status = ' || x_return_status,
4973: p_prefix =>l_debug_prefix,
4974: p_msg_level=>fnd_log.level_statement);
4975: END IF;
4977: END IF;
4978: END IF;
4979:
4980: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
4981: hz_utility_v2pub.debug(p_message=>'(+) after validate send_statements ... ' ||
4982: 'x_return_status = ' || x_return_status,
4983: p_prefix =>l_debug_prefix,
4984: p_msg_level=>fnd_log.level_statement);
4985: END IF;
5052: FND_MESSAGE.SET_NAME( 'AR', 'HZ_API_VAL_INT_CHARGES_Y' );
5053: FND_MSG_PUB.ADD;
5054: x_return_status := FND_API.G_RET_STS_ERROR;
5055: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
5056: hz_utility_v2pub.debug(p_message=>'interest_period_days cannot be NULL when interest_charges is Y.' || 'x_return_status = ' || x_return_status,
5057: p_prefix =>l_debug_prefix,
5058: p_msg_level=>fnd_log.level_statement);
5059: END IF;
5060:
5068: x_return_status => x_return_status );
5069:
5070:
5071: IF G_DEBUG THEN
5072: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
5073: 'charge_on_finance_charge_flag is mandatory. ' ||
5074: 'x_return_status = ' || x_return_status, l_debug_prefix );
5075: END IF;
5076: */
5093: FND_MSG_PUB.ADD;
5094: x_return_status := FND_API.G_RET_STS_ERROR;
5095:
5096: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
5097: hz_utility_v2pub.debug(p_message=>'Interest_period_days should be NULL when interest_charges
5098: is N .' || 'x_return_status = ' || x_return_status,
5099: p_prefix =>l_debug_prefix,
5100: p_msg_level=>fnd_log.level_statement);
5101: END IF;
5111: FND_MSG_PUB.ADD;
5112: x_return_status := FND_API.G_RET_STS_ERROR;
5113:
5114: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
5115: hz_utility_v2pub.debug(p_message=>'charge_on_finance_charge_flag cannot be Y when
5116: interest_charges is N .' || 'x_return_status ='
5117: || x_return_status,
5118: p_prefix =>l_debug_prefix,
5119: p_msg_level=>fnd_log.level_statement);
5122: END IF;
5123: END IF;
5124: */
5125: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
5126: hz_utility_v2pub.debug(p_message=>'(+) after validate interest_charges ... ' ||
5127: 'x_return_status = ' || x_return_status,
5128: p_prefix =>l_debug_prefix,
5129: p_msg_level=>fnd_log.level_statement);
5130: END IF;
5146: p_column_value => p_customer_profile_rec.credit_classification,
5147: x_return_status => x_return_status );
5148:
5149: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
5150: hz_utility_v2pub.debug(p_message=>'credit_classification is lookup code in lookup type AR_CMGT_CREDIT_CLASSIFICATION in ar_lookups. ' ||
5151: 'x_return_status = ' || x_return_status,
5152: p_prefix =>l_debug_prefix,
5153: p_msg_level=>fnd_log.level_statement);
5154: END IF;
5159:
5160: -- Debug info.
5161:
5162: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
5163: hz_utility_v2pub.debug(p_message=>'validate_customer_profile (-)',
5164: p_prefix=>l_debug_prefix,
5165: p_msg_level=>fnd_log.level_procedure);
5166: END IF;
5167:
5183: p_column_value => p_customer_profile_rec.late_charge_calculation_trx,
5184: x_return_status => x_return_status );
5185:
5186: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
5187: hz_utility_v2pub.debug(p_message=>'late_charge_calculation_trx is lookup code in lookup type AR_MANDATORY_LATE_CHARGES. ' ||
5188: 'x_return_status = ' || x_return_status,
5189: p_prefix =>l_debug_prefix,
5190: p_msg_level=>fnd_log.level_statement);
5191: END IF;
5192:
5193: END IF;
5194:
5195: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
5196: hz_utility_v2pub.debug(p_message=>'(+) after validate late_charge_calculation_trx ... ' ||
5197: 'x_return_status = ' || x_return_status,
5198: p_prefix =>l_debug_prefix,
5199: p_msg_level=>fnd_log.level_statement);
5200: END IF;
5217: x_return_status => x_return_status );
5218:
5219:
5220: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
5221: hz_utility_v2pub.debug(p_message=>'credit_items_flag is lookup code in lookup type YES/NO. ' ||
5222: 'x_return_status = ' || x_return_status,
5223: p_prefix =>l_debug_prefix,
5224: p_msg_level=>fnd_log.level_statement);
5225: END IF;
5226:
5227: END IF;
5228:
5229: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
5230: hz_utility_v2pub.debug(p_message=>'(+) after validate credit_items_flag ... ' ||
5231: 'x_return_status = ' || x_return_status,
5232: p_prefix =>l_debug_prefix,
5233: p_msg_level=>fnd_log.level_statement);
5234: END IF;
5251: x_return_status => x_return_status );
5252:
5253:
5254: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
5255: hz_utility_v2pub.debug(p_message=>'disputed_transactions_flag is lookup code in lookup type YES/NO. ' ||
5256: 'x_return_status = ' || x_return_status,
5257: p_prefix =>l_debug_prefix,
5258: p_msg_level=>fnd_log.level_statement);
5259: END IF;
5260:
5261: END IF;
5262:
5263: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
5264: hz_utility_v2pub.debug(p_message=>'(+) after validate disputed_transactions_flag ... ' ||
5265: 'x_return_status = ' || x_return_status,
5266: p_prefix =>l_debug_prefix,
5267: p_msg_level=>fnd_log.level_statement);
5268: END IF;
5284: p_column_value => p_customer_profile_rec.late_charge_type,
5285: x_return_status => x_return_status );
5286:
5287: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
5288: hz_utility_v2pub.debug(p_message=>'late_charge_type is lookup code in lookup type AR_LATE_CHARGE_TYPE. ' ||
5289: 'x_return_status = ' || x_return_status,
5290: p_prefix =>l_debug_prefix,
5291: p_msg_level=>fnd_log.level_statement);
5292: END IF;
5293:
5294: END IF;
5295:
5296: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
5297: hz_utility_v2pub.debug(p_message=>'(+) after validate late_charge_type ... ' ||
5298: 'x_return_status = ' || x_return_status,
5299: p_prefix =>l_debug_prefix,
5300: p_msg_level=>fnd_log.level_statement);
5301: END IF;
5317: p_column_value => p_customer_profile_rec.interest_calculation_period,
5318: x_return_status => x_return_status );
5319:
5320: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
5321: hz_utility_v2pub.debug(p_message=>'interest_calculation_period is lookup code in lookup type AR_CALCULATION_PERIOD. ' ||
5322: 'x_return_status = ' || x_return_status,
5323: p_prefix =>l_debug_prefix,
5324: p_msg_level=>fnd_log.level_statement);
5325: END IF;
5326:
5327: END IF;
5328:
5329: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
5330: hz_utility_v2pub.debug(p_message=>'(+) after validate interest_calculation_period ... ' ||
5331: 'x_return_status = ' || x_return_status,
5332: p_prefix =>l_debug_prefix,
5333: p_msg_level=>fnd_log.level_statement);
5334: END IF;
5351: x_return_status => x_return_status );
5352:
5353:
5354: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
5355: hz_utility_v2pub.debug(p_message=>'hold_charged_invoices_flag is lookup code in lookup type YES/NO. ' ||
5356: 'x_return_status = ' || x_return_status,
5357: p_prefix =>l_debug_prefix,
5358: p_msg_level=>fnd_log.level_statement);
5359: END IF;
5360:
5361: END IF;
5362:
5363: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
5364: hz_utility_v2pub.debug(p_message=>'(+) after validate hold_charged_invoices_flag ... ' ||
5365: 'x_return_status = ' || x_return_status,
5366: p_prefix =>l_debug_prefix,
5367: p_msg_level=>fnd_log.level_statement);
5368: END IF;
5385: x_return_status => x_return_status );
5386:
5387:
5388: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
5389: hz_utility_v2pub.debug(p_message=>'multiple_interest_rates_flag is lookup code in lookup type YES/NO. ' ||
5390: 'x_return_status = ' || x_return_status,
5391: p_prefix =>l_debug_prefix,
5392: p_msg_level=>fnd_log.level_statement);
5393: END IF;
5394:
5395: END IF;
5396:
5397: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
5398: hz_utility_v2pub.debug(p_message=>'(+) after validate multiple_interest_rates_flag ... ' ||
5399: 'x_return_status = ' || x_return_status,
5400: p_prefix =>l_debug_prefix,
5401: p_msg_level=>fnd_log.level_statement);
5402: END IF;
5431: p_cons_inv_flag => p_customer_profile_rec.cons_inv_flag,
5432: x_return_status => x_return_status );
5433:
5434: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
5435: hz_utility_v2pub.debug(p_message=>'late_charge_term_id should be a valid value defined in RA_TERMS. '||
5436: 'x_return_status = ' || x_return_status,
5437: p_prefix =>l_debug_prefix,
5438: p_msg_level=>fnd_log.level_statement);
5439: END IF;
5440:
5441: END IF;
5442:
5443: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
5444: hz_utility_v2pub.debug(p_message=>'(+) after validate late_charge_term_id..' ||
5445: 'x_return_status = ' || x_return_status,
5446: p_prefix =>l_debug_prefix,
5447: p_msg_level=>fnd_log.level_statement);
5448: END IF;
5474: p_column_value => p_customer_profile_rec.message_text_id,
5475: x_return_status => x_return_status );
5476:
5477: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
5478: hz_utility_v2pub.debug(p_message=>'message_text_id should be a valid value defined in AR_STANDARD_TEXT. '||
5479: 'x_return_status = ' || x_return_status,
5480: p_prefix =>l_debug_prefix,
5481: p_msg_level=>fnd_log.level_statement);
5482: END IF;
5483:
5484: END IF;
5485:
5486: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
5487: hz_utility_v2pub.debug(p_message=>'(+) after validate message_text_id..' ||
5488: 'x_return_status = ' || x_return_status,
5489: p_prefix =>l_debug_prefix,
5490: p_msg_level=>fnd_log.level_statement);
5491: END IF;
5580:
5581: -- Debug info.
5582:
5583: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
5584: hz_utility_v2pub.debug(p_message=>'validate_cust_profile_amt (+)',
5585: p_prefix=>l_debug_prefix,
5586: p_msg_level=>fnd_log.level_procedure);
5587: END IF;
5588:
5617: --------------------------------------
5618: -- validate cust_acct_profile_amt_id
5619: --------------------------------------
5620: /****Logical APIs - validation not required****/
5621: IF(HZ_UTILITY_V2PUB.G_CALLING_API IS NULL) THEN
5622: IF p_create_update_flag = 'C' THEN
5623:
5624: -- If primary key value is passed, check for uniqueness.
5625: -- If primary key value is not passed, it will be generated
5642: NULL;
5643: END;
5644:
5645: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
5646: hz_utility_v2pub.debug(p_message=>'cust_acct_profile_amt_id is unique during creation if passed in. ' ||
5647: 'x_return_status = ' || x_return_status,
5648: p_prefix =>l_debug_prefix,
5649: p_msg_level=>fnd_log.level_statement);
5650: END IF;
5651: END IF;
5652: END IF;
5653:
5654: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
5655: hz_utility_v2pub.debug(p_message=>'(+) after validate cust_acct_profile_amt_id ... ' ||
5656: 'x_return_status = ' || x_return_status,
5657: p_prefix =>l_debug_prefix,
5658: p_msg_level=>fnd_log.level_statement);
5659: END IF;
5662: ----------------------------------------------
5663: -- validate cust_account_profile_id
5664: ----------------------------------------------
5665: /****Logical APIs - validation not required****/
5666: IF(HZ_UTILITY_V2PUB.G_CALLING_API IS NULL) THEN
5667: -- cust_account_profile_id is mandatory field
5668: -- Since cust_account_profile_id is non-updateable, we only need to check mandatory
5669: -- during creation.
5670:
5675: p_column_value => p_cust_profile_amt_rec.cust_account_profile_id,
5676: x_return_status => x_return_status );
5677:
5678: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
5679: hz_utility_v2pub.debug(p_message=>'cust_account_profile_id is mandatory. ' ||
5680: 'x_return_status = ' || x_return_status,
5681: p_prefix =>l_debug_prefix,
5682: p_msg_level=>fnd_log.level_statement);
5683: END IF;
5693: p_old_column_value => l_cust_account_profile_id,
5694: x_return_status => x_return_status );
5695:
5696: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
5697: hz_utility_v2pub.debug(p_message=>'cust_account_profile_id is non-updateable. ' ||
5698: 'x_return_status = ' || x_return_status,
5699: p_prefix =>l_debug_prefix,
5700: p_msg_level=>fnd_log.level_statement);
5701: END IF;
5706: -- we only need to check FK during creation.
5707:
5708:
5709: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
5710: hz_utility_v2pub.debug(p_message=>'cust_account_profile_id = ' || p_cust_profile_amt_rec.cust_account_profile_id || ' ' ||
5711: 'x_return_status = ' || x_return_status,
5712: p_prefix =>l_debug_prefix,
5713: p_msg_level=>fnd_log.level_statement);
5714: END IF;
5737: x_return_status := FND_API.G_RET_STS_ERROR;
5738: END;
5739:
5740: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
5741: hz_utility_v2pub.debug(p_message=>'cust_account_profile_id is foreign key to hz_customer_profiles. ' ||
5742: 'x_return_status = ' || x_return_status,
5743: p_prefix =>l_debug_prefix,
5744: p_msg_level=>fnd_log.level_statement);
5745: END IF;
5746:
5747: END IF;
5748:
5749: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
5750: hz_utility_v2pub.debug(p_message=>'(+) after validate cust_account_profile_id ... ' ||
5751: 'x_return_status = ' || x_return_status,
5752: p_prefix =>l_debug_prefix,
5753: p_msg_level=>fnd_log.level_statement);
5754: END IF;
5757: ----------------------------------------------
5758: -- validate cust_account_id
5759: ----------------------------------------------
5760: /****Logical APIs - validation not required****/
5761: IF(HZ_UTILITY_V2PUB.G_CALLING_API IS NULL) THEN
5762: -- cust_account_id is mandatory field
5763: -- Since cust_account_id is non-updateable, we only need to check mandatory
5764: -- during creation.
5765:
5770: p_column_value => p_cust_profile_amt_rec.cust_account_id,
5771: x_return_status => x_return_status );
5772:
5773: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
5774: hz_utility_v2pub.debug(p_message=>'cust_account_id is mandatory. ' ||
5775: 'x_return_status = ' || x_return_status,
5776: p_prefix =>l_debug_prefix,
5777: p_msg_level=>fnd_log.level_statement);
5778: END IF;
5788: p_old_column_value => l_cust_account_id,
5789: x_return_status => x_return_status );
5790:
5791: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
5792: hz_utility_v2pub.debug(p_message=>'cust_account_id is non-updateable. ' ||
5793: 'x_return_status = ' || x_return_status,
5794: p_prefix =>l_debug_prefix,
5795: p_msg_level=>fnd_log.level_statement);
5796: END IF;
5800: -- Since cust_account_id is mandatory and non-updateable,
5801: -- we only need to check FK during creation.
5802:
5803: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
5804: hz_utility_v2pub.debug(p_message=>'cust_account_id = ' || p_cust_profile_amt_rec.cust_account_id || ' ' ||
5805: 'x_return_status = ' || x_return_status,
5806: p_prefix =>l_debug_prefix,
5807: p_msg_level=>fnd_log.level_statement);
5808: END IF;
5817: p_column_value => p_cust_profile_amt_rec.cust_account_id,
5818: x_return_status => x_return_status );
5819:
5820: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
5821: hz_utility_v2pub.debug(p_message=>'cust_account_id is foreign key to hz_cust_accounts. ' ||
5822: 'x_return_status = ' || x_return_status,
5823: p_prefix =>l_debug_prefix,
5824: p_msg_level=>fnd_log.level_statement);
5825: END IF;
5833: x_return_status := FND_API.G_RET_STS_ERROR;
5834: END IF;
5835:
5836: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
5837: hz_utility_v2pub.debug(p_message=>'cust_account_id should be the same as cust_account_id in corresponding customer profile. ' ||
5838: 'x_return_status = ' || x_return_status,
5839: p_prefix =>l_debug_prefix,
5840: p_msg_level=>fnd_log.level_statement);
5841: END IF;
5842:
5843: END IF;
5844:
5845: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
5846: hz_utility_v2pub.debug(p_message=>'(+) after validate cust_account_id ... ' ||
5847: 'x_return_status = ' || x_return_status,
5848: p_prefix =>l_debug_prefix,
5849: p_msg_level=>fnd_log.level_statement);
5850: END IF;
5865: p_column_value => p_cust_profile_amt_rec.currency_code,
5866: x_return_status => x_return_status );
5867:
5868: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
5869: hz_utility_v2pub.debug(p_message=>'currency_code is mandatory. ' ||
5870: 'x_return_status = ' || x_return_status,
5871: p_prefix =>l_debug_prefix,
5872: p_msg_level=>fnd_log.level_statement);
5873: END IF;
5883: p_old_column_value => l_currency_code,
5884: x_return_status => x_return_status );
5885:
5886: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
5887: hz_utility_v2pub.debug(p_message=>'currency_code is non-updateable. ' ||
5888: 'x_return_status = ' || x_return_status,
5889: p_prefix =>l_debug_prefix,
5890: p_msg_level=>fnd_log.level_statement);
5891: END IF;
5904: p_column_value => p_cust_profile_amt_rec.currency_code,
5905: x_return_status => x_return_status );
5906:
5907: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
5908: hz_utility_v2pub.debug(p_message=>'currency_code is foreign key to fnd_currencies. ' ||
5909: 'x_return_status = ' || x_return_status,
5910: p_prefix =>l_debug_prefix,
5911: p_msg_level=>fnd_log.level_statement);
5912: END IF;
5935: NULL;
5936: END;
5937:
5938: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
5939: hz_utility_v2pub.debug(p_message=>'for a given cust_account_profile_id and currency_code, only one record of the profile amount is allowed. ' ||
5940: 'x_return_status = ' || x_return_status,
5941: p_prefix =>l_debug_prefix,
5942: p_msg_level=>fnd_log.level_statement);
5943: END IF;
5943: END IF;
5944: END IF;
5945:
5946: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
5947: hz_utility_v2pub.debug(p_message=>'(+) after validate currency_code ... ' ||
5948: 'x_return_status = ' || x_return_status,
5949: p_prefix =>l_debug_prefix,
5950: p_msg_level=>fnd_log.level_statement);
5951: END IF;
5953: ----------------------------------------------
5954: -- validate site_use_id
5955: ----------------------------------------------
5956: /****Logical APIs - validation not required****/
5957: IF(HZ_UTILITY_V2PUB.G_CALLING_API IS NULL) THEN
5958: -- site_use_id is non-updateable field
5959: IF p_create_update_flag = 'U' AND
5960: p_cust_profile_amt_rec.site_use_id IS NOT NULL
5961: THEN
5965: p_old_column_value => l_site_use_id,
5966: x_return_status => x_return_status );
5967:
5968: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
5969: hz_utility_v2pub.debug(p_message=>'site_use_id is non-updateable. ' ||
5970: 'x_return_status = ' || x_return_status,
5971: p_prefix =>l_debug_prefix,
5972: p_msg_level=>fnd_log.level_statement);
5973: END IF;
5988: p_column_value => p_cust_profile_amt_rec.site_use_id,
5989: x_return_status => x_return_status );
5990:
5991: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
5992: hz_utility_v2pub.debug(p_message=>'site_use_id is foreign key to hz_cust_site_uses. ' ||
5993: 'x_return_status = ' || x_return_status,
5994: p_prefix =>l_debug_prefix,
5995: p_msg_level=>fnd_log.level_statement);
5996: END IF;
6012: x_return_status := FND_API.G_RET_STS_ERROR;
6013: END IF;
6014:
6015: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
6016: hz_utility_v2pub.debug(p_message=>'site_use_id should be the same as site_use_id site_use_id in corresponding customer profile. ' ||
6017: 'x_return_status = ' || x_return_status,
6018: p_prefix =>l_debug_prefix,
6019: p_msg_level=>fnd_log.level_statement);
6020: END IF;
6020: END IF;
6021: END IF;
6022:
6023: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
6024: hz_utility_v2pub.debug(p_message=>'(+) after validate site_use_id ... ' ||
6025: 'x_return_status = ' || x_return_status,
6026: p_prefix =>l_debug_prefix,
6027: p_msg_level=>fnd_log.level_statement);
6028: END IF;
6086: FND_MSG_PUB.ADD;
6087: x_return_status := FND_API.G_RET_STS_ERROR;
6088:
6089: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
6090: hz_utility_v2pub.debug(p_message=>'overall_credit_limit should be greater than the trx_credit_limit. ' ||
6091: 'x_return_status = ' || x_return_status,
6092: p_prefix =>l_debug_prefix,
6093: p_msg_level=>fnd_log.level_statement);
6094: END IF;
6097: END IF;
6098: END IF;
6099:
6100: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
6101: hz_utility_v2pub.debug(p_message=>'Credit Limit Validation failure. Please check the overall_credit_limit and trx_credit_limit ' || 'x_return_status = ' || x_return_status,
6102: p_prefix =>l_debug_prefix,
6103: p_msg_level=>fnd_log.level_statement);
6104: END IF;
6105:
6121: p_column_value => p_cust_profile_amt_rec.min_fc_invoice_overdue_type,
6122: x_return_status => x_return_status );
6123:
6124: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
6125: hz_utility_v2pub.debug(p_message=>'min_fc_invoice_overdue_type is lookup code in lookup type AR_AMOUNT_PERCENT. ' ||
6126: 'x_return_status = ' || x_return_status,
6127: p_prefix =>l_debug_prefix,
6128: p_msg_level=>fnd_log.level_statement);
6129: END IF;
6130:
6131: END IF;
6132:
6133: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
6134: hz_utility_v2pub.debug(p_message=>'(+) after validate min_fc_invoice_overdue_type ... ' ||
6135: 'x_return_status = ' || x_return_status,
6136: p_prefix =>l_debug_prefix,
6137: p_msg_level=>fnd_log.level_statement);
6138: END IF;
6155: p_column_value => p_cust_profile_amt_rec.min_fc_balance_overdue_type,
6156: x_return_status => x_return_status );
6157:
6158: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
6159: hz_utility_v2pub.debug(p_message=>'min_fc_balance_overdue_type is lookup code in lookup type AR_AMOUNT_PERCENT. ' ||
6160: 'x_return_status = ' || x_return_status,
6161: p_prefix =>l_debug_prefix,
6162: p_msg_level=>fnd_log.level_statement);
6163: END IF;
6164:
6165: END IF;
6166:
6167: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
6168: hz_utility_v2pub.debug(p_message=>'(+) after validate min_fc_balance_overdue_type ... ' ||
6169: 'x_return_status = ' || x_return_status,
6170: p_prefix =>l_debug_prefix,
6171: p_msg_level=>fnd_log.level_statement);
6172: END IF;
6189: p_column_value => p_cust_profile_amt_rec.interest_type,
6190: x_return_status => x_return_status );
6191:
6192: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
6193: hz_utility_v2pub.debug(p_message=>'interest_type is lookup code in lookup type AR_INTEREST_PENALTY_TYPE. ' ||
6194: 'x_return_status = ' || x_return_status,
6195: p_prefix =>l_debug_prefix,
6196: p_msg_level=>fnd_log.level_statement);
6197: END IF;
6198:
6199: END IF;
6200:
6201: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
6202: hz_utility_v2pub.debug(p_message=>'(+) after validate interest_type ... ' ||
6203: 'x_return_status = ' || x_return_status,
6204: p_prefix =>l_debug_prefix,
6205: p_msg_level=>fnd_log.level_statement);
6206: END IF;
6223: p_column_value => p_cust_profile_amt_rec.penalty_type,
6224: x_return_status => x_return_status );
6225:
6226: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
6227: hz_utility_v2pub.debug(p_message=>'penalty_type is lookup code in lookup type AR_INTEREST_PENALTY_TYPE. ' ||
6228: 'x_return_status = ' || x_return_status,
6229: p_prefix =>l_debug_prefix,
6230: p_msg_level=>fnd_log.level_statement);
6231: END IF;
6232:
6233: END IF;
6234:
6235: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
6236: hz_utility_v2pub.debug(p_message=>'(+) after validate penalty_type ... ' ||
6237: 'x_return_status = ' || x_return_status,
6238: p_prefix =>l_debug_prefix,
6239: p_msg_level=>fnd_log.level_statement);
6240: END IF;
6241:
6242: -- Debug info.
6243:
6244: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
6245: hz_utility_v2pub.debug(p_message=> 'validate_cust_profile_amt (-)',
6246: p_prefix=>l_debug_prefix,
6247: p_msg_level=>fnd_log.level_procedure);
6248: END IF;
6249:
6265: p_column_value => p_cust_profile_amt_rec.exchange_rate_type,
6266: x_return_status => x_return_status );
6267:
6268: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
6269: hz_utility_v2pub.debug(p_message=>'exchange_rate_type should be a valid value defined in GL_DAILY_CONVERSION_TYPES. '||
6270: 'x_return_status = ' || x_return_status,
6271: p_prefix =>l_debug_prefix,
6272: p_msg_level=>fnd_log.level_statement);
6273: END IF;
6274:
6275: END IF;
6276:
6277: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
6278: hz_utility_v2pub.debug(p_message=>'(+) after validate exchange_rate_type..' ||
6279: 'x_return_status = ' || x_return_status,
6280: p_prefix =>l_debug_prefix,
6281: p_msg_level=>fnd_log.level_statement);
6282: END IF;
6339: p_column_value => v_cust_profile_amt_rec.min_fc_invoice_percent,
6340: x_return_status => x_return_status );
6341:
6342: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
6343: hz_utility_v2pub.debug(p_message=>'min_fc_invoice_percent should be < 100.' ||'x_return_status = ' ||
6344: x_return_status,
6345: p_prefix =>l_debug_prefix,
6346: p_msg_level=>fnd_log.level_statement);
6347: END IF;
6355: END IF;
6356: END IF;
6357:
6358: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
6359: hz_utility_v2pub.debug(p_message=>' after validate min_fc_invoice_amount and min_fc_invoice_percent..' ||
6360: 'x_return_status = ' || x_return_status,
6361: p_prefix =>l_debug_prefix,
6362: p_msg_level=>fnd_log.level_statement);
6363: END IF;
6420: p_column_value => v_cust_profile_amt_rec.min_fc_balance_percent,
6421: x_return_status => x_return_status );
6422:
6423: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
6424: hz_utility_v2pub.debug(p_message=>'min_fc_balance_percent should be < 100.' ||'x_return_status = ' ||
6425: x_return_status,
6426: p_prefix =>l_debug_prefix,
6427: p_msg_level=>fnd_log.level_statement);
6428: END IF;
6436: END IF;
6437: END IF;
6438:
6439: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
6440: hz_utility_v2pub.debug(p_message=>' after validate min_fc_balance_amount and min_fc_balance_percent..' ||
6441: 'x_return_status = ' || x_return_status,
6442: p_prefix =>l_debug_prefix,
6443: p_msg_level=>fnd_log.level_statement);
6444: END IF;
6502: p_column_value => v_cust_profile_amt_rec.interest_rate,
6503: x_return_status => x_return_status );
6504:
6505: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
6506: hz_utility_v2pub.debug(p_message=>'interest_rate should be < 100.' ||'x_return_status = ' ||
6507: x_return_status,
6508: p_prefix =>l_debug_prefix,
6509: p_msg_level=>fnd_log.level_statement);
6510: END IF;
6531: p_column_value => v_cust_profile_amt_rec.interest_schedule_id,
6532: x_return_status => x_return_status );
6533:
6534: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
6535: hz_utility_v2pub.debug(p_message=>'interest_schedule_id should be a valid value defined in ar_charge_schedules' ||'x_return_status = ' ||
6536: x_return_status,
6537: p_prefix =>l_debug_prefix,
6538: p_msg_level=>fnd_log.level_statement);
6539: END IF;
6548: END IF;
6549: END IF;
6550:
6551: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
6552: hz_utility_v2pub.debug(p_message=>' after validate interest_rate, interest_fixed_amount and interest_schedule_id.' ||
6553: 'x_return_status = ' || x_return_status,
6554: p_prefix =>l_debug_prefix,
6555: p_msg_level=>fnd_log.level_statement);
6556: END IF;
6614: p_column_value => v_cust_profile_amt_rec.penalty_rate,
6615: x_return_status => x_return_status );
6616:
6617: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
6618: hz_utility_v2pub.debug(p_message=>'penalty_rate should be < 100.' ||'x_return_status = ' ||
6619: x_return_status,
6620: p_prefix =>l_debug_prefix,
6621: p_msg_level=>fnd_log.level_statement);
6622: END IF;
6643: p_column_value => v_cust_profile_amt_rec.penalty_schedule_id,
6644: x_return_status => x_return_status );
6645:
6646: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
6647: hz_utility_v2pub.debug(p_message=>'penalty_schedule_id should be a valid value defined in ar_charge_schedules' ||'x_return_status = ' ||
6648: x_return_status,
6649: p_prefix =>l_debug_prefix,
6650: p_msg_level=>fnd_log.level_statement);
6651: END IF;
6660: END IF;
6661: END IF;
6662:
6663: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
6664: hz_utility_v2pub.debug(p_message=>' after validate penalty_rate, penalty_fixed_amount and penalty_schedule_id.' ||
6665: 'x_return_status = ' || x_return_status,
6666: p_prefix =>l_debug_prefix,
6667: p_msg_level=>fnd_log.level_statement);
6668: END IF;
6739:
6740: -- Debug info.
6741:
6742: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
6743: hz_utility_v2pub.debug(p_message=>'validate_cust_acct_site (+)',
6744: p_prefix=>l_debug_prefix,
6745: p_msg_level=>fnd_log.level_procedure);
6746: END IF;
6747:
6759: --------------------------------------
6760: -- validate cust_acct_site_id
6761: --------------------------------------
6762: /****Logical APIs - validation not required****/
6763: IF(HZ_UTILITY_V2PUB.G_CALLING_API IS NULL) THEN
6764: IF p_create_update_flag = 'C' THEN
6765:
6766: -- If primary key value is passed, check for uniqueness.
6767: -- If primary key value is not passed, it will be generated
6786:
6787: -- Debug info.
6788:
6789: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
6790: hz_utility_v2pub.debug(p_message=>'cust_acct_site_id is unique during creation if passed in. ' ||
6791: 'x_return_status = ' || x_return_status,
6792: p_prefix =>l_debug_prefix,
6793: p_msg_level=>fnd_log.level_statement);
6794: END IF;
6795: END IF;
6796: END IF;
6797:
6798: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
6799: hz_utility_v2pub.debug(p_message=>'(+) after validate cust_acct_site_id ... ' ||
6800: 'x_return_status = ' || x_return_status,
6801: p_prefix =>l_debug_prefix,
6802: p_msg_level=>fnd_log.level_statement);
6803: END IF;
6806: ----------------------------------------------
6807: -- validate cust_account_id
6808: ----------------------------------------------
6809: /****Logical APIs - validation not required****/
6810: IF(HZ_UTILITY_V2PUB.G_CALLING_API IS NULL) THEN
6811: -- cust_account_id is mandatory field
6812: -- Since cust_account_id is non-updateable filed, we only need to check mandatory
6813: -- during creation.
6814:
6821:
6822: -- Debug info.
6823:
6824: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
6825: hz_utility_v2pub.debug(p_message=>'cust_account_id is mandatory. ' ||
6826: 'x_return_status = ' || x_return_status,
6827: p_prefix =>l_debug_prefix,
6828: p_msg_level=>fnd_log.level_statement);
6829: END IF;
6841:
6842: -- Debug info.
6843:
6844: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
6845: hz_utility_v2pub.debug(p_message=>'cust_account_id is non-updateable. ' ||
6846: 'x_return_status = ' || x_return_status,
6847: p_prefix =>l_debug_prefix,
6848: p_msg_level=>fnd_log.level_statement);
6849: END IF;
6864:
6865: -- Debug info.
6866:
6867: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
6868: hz_utility_v2pub.debug(p_message=>'cust_account_id is foreign key of hz_cust_accounts. ' ||
6869: 'x_return_status = ' || x_return_status,
6870: p_prefix =>l_debug_prefix,
6871: p_msg_level=>fnd_log.level_statement);
6872: END IF;
6873: END IF;
6874: END IF;
6875:
6876: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
6877: hz_utility_v2pub.debug(p_message=>'(+) after validate cust_account_id ... ' ||
6878: 'x_return_status = ' || x_return_status,
6879: p_prefix =>l_debug_prefix,
6880: p_msg_level=>fnd_log.level_statement);
6881: END IF;
6884: ----------------------------------------------
6885: -- validate party_site_id
6886: ----------------------------------------------
6887: /****Logical APIs - validation not required****/
6888: IF(HZ_UTILITY_V2PUB.G_CALLING_API IS NULL) THEN
6889: -- party_site_id is mandatory field
6890: -- Since party_site_id is non-updateable filed, we only need to check mandatory
6891: -- during creation.
6892:
6899:
6900: -- Debug info.
6901:
6902: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
6903: hz_utility_v2pub.debug(p_message=>'party_site_id is mandatory. ' ||
6904: 'x_return_status = ' || x_return_status,
6905: p_prefix =>l_debug_prefix,
6906: p_msg_level=>fnd_log.level_statement);
6907: END IF;
6919:
6920: -- Debug info.
6921:
6922: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
6923: hz_utility_v2pub.debug(p_message=>'party_site_id is non-updateable. ' ||
6924: 'x_return_status = ' || x_return_status,
6925: p_prefix =>l_debug_prefix,
6926: p_msg_level=>fnd_log.level_statement);
6927: END IF;
6941:
6942: -- Debug info.
6943:
6944: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
6945: hz_utility_v2pub.debug(p_message=>'party_site_id is foreign key of hz_party_sites. ' ||
6946: 'x_return_status = ' || x_return_status,
6947: p_prefix =>l_debug_prefix,
6948: p_msg_level=>fnd_log.level_statement);
6949: END IF;
6974: END;
6975:
6976: -- Debug info.
6977: IF G_DEBUG THEN
6978: hz_utility_v2pub.debug(p_prefix=>l_debug_prefix,
6979: 'party_site_id must link to a USER_ENTERED location. ' ||
6980: 'x_return_status = ' || x_return_status, l_debug_prefix );
6981: END IF;
6982:
7004:
7005: -- Debug info.
7006:
7007: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
7008: hz_utility_v2pub.debug(p_message=>'cust_account_id and party_site_id together should be unique. ' ||
7009: 'x_return_status = ' || x_return_status,
7010: p_prefix =>l_debug_prefix,
7011: p_msg_level=>fnd_log.level_statement);
7012: END IF;
7012: END IF;
7013: END IF;
7014:
7015: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
7016: hz_utility_v2pub.debug(p_message=>'(+) after validate party_site_id ... ' ||
7017: 'x_return_status = ' || x_return_status,
7018: p_prefix =>l_debug_prefix,
7019: p_msg_level=>fnd_log.level_statement);
7020: END IF;
7023: ----------------------------------------------
7024: -- validate orig_system_reference
7025: ----------------------------------------------
7026: /****Logical APIs - validation not required****/
7027: IF(HZ_UTILITY_V2PUB.G_CALLING_API IS NULL) THEN
7028: -- orig_system_reference is unique. Since orig_system_refence is defaulting to
7029: -- primary key, we only need to check the uniqueness if user passes some value.
7030: -- database constraints can catch unique error when we defaulting.
7031: -- orig_system_reference is non-updateable, we only need to check uniqueness
7053:
7054: -- Debug info.
7055:
7056: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
7057: hz_utility_v2pub.debug(p_message=>'orig_system_reference is unique if passed in. ' ||
7058: 'x_return_status = ' || x_return_status,
7059: p_prefix =>l_debug_prefix,
7060: p_msg_level=>fnd_log.level_statement);
7061: END IF;
7114:
7115: -- Debug info.
7116:
7117: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
7118: hz_utility_v2pub.debug(p_message=>'orig_system_reference is non-updateable. ' ||
7119: 'x_return_status = ' || x_return_status,
7120: p_prefix =>l_debug_prefix,
7121: p_msg_level=>fnd_log.level_statement);
7122: END IF;
7122: END IF;
7123: END IF;
7124:
7125: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
7126: hz_utility_v2pub.debug(p_message=>'(+) after validate orig_system_reference ... ' ||
7127: 'x_return_status = ' || x_return_status,
7128: p_prefix =>l_debug_prefix,
7129: p_msg_level=>fnd_log.level_statement);
7130: END IF;
7158: NULL;
7159: END;
7160:
7161: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
7162: hz_utility_v2pub.debug(p_message=>'tp_header_id is unique if passed in. ' ||
7163: 'x_return_status = ' || x_return_status,
7164: p_prefix =>l_debug_prefix,
7165: p_msg_level=>fnd_log.level_statement);
7166: END IF;
7167:
7168: END IF;
7169:
7170: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
7171: hz_utility_v2pub.debug(p_message=>'(+) after validate tp_header_id ... ' ||
7172: 'x_return_status = ' || x_return_status,
7173: p_prefix =>l_debug_prefix,
7174: p_msg_level=>fnd_log.level_statement);
7175: END IF;
7187: p_column_value => p_cust_acct_site_rec.status,
7188: x_return_status => x_return_status );
7189:
7190: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
7191: hz_utility_v2pub.debug(p_message=>'status cannot be updated to null. ' ||
7192: 'x_return_status = ' || x_return_status,
7193: p_prefix =>l_debug_prefix,
7194: p_msg_level=>fnd_log.level_statement);
7195: END IF;
7195: END IF;
7196: END IF;
7197:
7198: /****Logical APIs - validation not required****/
7199: IF(HZ_UTILITY_V2PUB.G_CALLING_API IS NULL) THEN
7200: -- status is lookup code in lookup type CODE_STATUS
7201: IF p_cust_acct_site_rec.status IS NOT NULL AND
7202: p_cust_acct_site_rec.status <> FND_API.G_MISS_CHAR AND
7203: ( p_create_update_flag = 'C' OR
7210: p_column_value => p_cust_acct_site_rec.status,
7211: x_return_status => x_return_status );
7212:
7213: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
7214: hz_utility_v2pub.debug(p_message=>'status is lookup code in lookup type CODE_STATUS. ' ||
7215: 'x_return_status = ' || x_return_status,
7216: p_prefix =>l_debug_prefix,
7217: p_msg_level=>fnd_log.level_statement);
7218: END IF;
7219:
7220: END IF;
7221:
7222: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
7223: hz_utility_v2pub.debug(p_message=>'(+) after validate status ... ' ||
7224: 'x_return_status = ' || x_return_status,
7225: p_prefix =>l_debug_prefix,
7226: p_msg_level=>fnd_log.level_statement);
7227: END IF;
7244: p_column_value => p_cust_acct_site_rec.customer_category_code,
7245: x_return_status => x_return_status );
7246:
7247: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
7248: hz_utility_v2pub.debug(p_message=>'customer_category_code is lookup code in lookup type ADDRESS_CATEGORY. ' ||
7249: 'x_return_status = ' || x_return_status,
7250: p_prefix =>l_debug_prefix,
7251: p_msg_level=>fnd_log.level_statement);
7252: END IF;
7252: END IF;
7253: END IF;
7254:
7255: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
7256: hz_utility_v2pub.debug(p_message=>'(+) after validate customer_category_code ... ' ||
7257: 'x_return_status = ' || x_return_status,
7258: p_prefix =>l_debug_prefix,
7259: p_msg_level=>fnd_log.level_statement);
7260: END IF;
7284: x_return_status := FND_API.G_RET_STS_ERROR;
7285: END;
7286:
7287: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
7288: hz_utility_v2pub.debug(p_message=>'language is foreign key of fnd installed languages. ' ||
7289: 'x_return_status = ' || x_return_status,
7290: p_prefix =>l_debug_prefix,
7291: p_msg_level=>fnd_log.level_statement);
7292: END IF;
7293:
7294: END IF;
7295:
7296: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
7297: hz_utility_v2pub.debug(p_message=>'(+) after validate language ... ' ||
7298: 'x_return_status = ' || x_return_status,
7299: p_prefix =>l_debug_prefix,
7300: p_msg_level=>fnd_log.level_statement);
7301: END IF;
7314: p_column_value => p_cust_acct_site_rec.primary_specialist_id,
7315: x_return_status => x_return_status );
7316:
7317: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
7318: hz_utility_v2pub.debug(p_message=>'primary_specialist_id is foreign key to per_all_people_f. ' ||
7319: 'x_return_status = ' || x_return_status,
7320: p_prefix =>l_debug_prefix,
7321: p_msg_level=>fnd_log.level_statement);
7322: END IF;
7322: END IF;
7323: END IF;
7324:
7325: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
7326: hz_utility_v2pub.debug(p_message=>'(+) after validate primary_specialist_id ... ' ||
7327: 'x_return_status = ' || x_return_status,
7328: p_prefix =>l_debug_prefix,
7329: p_msg_level=>fnd_log.level_statement);
7330: END IF;
7346: p_column_value => p_cust_acct_site_rec.secondary_specialist_id,
7347: x_return_status => x_return_status );
7348:
7349: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
7350: hz_utility_v2pub.debug(p_message=>'secondary_specialist_id is foreign key to per_all_people_f. ' ||
7351: 'x_return_status = ' || x_return_status,
7352: p_prefix =>l_debug_prefix,
7353: p_msg_level=>fnd_log.level_statement);
7354: END IF;
7354: END IF;
7355: END IF;
7356:
7357: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
7358: hz_utility_v2pub.debug(p_message=>'(+) after validate secondary_specialist_id ... ' ||
7359: 'x_return_status = ' || x_return_status,
7360: p_prefix =>l_debug_prefix,
7361: p_msg_level=>fnd_log.level_statement);
7362: END IF;
7426: END IF;
7427: END IF;
7428:
7429: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
7430: hz_utility_v2pub.debug(p_message=>'The ece_tp_location_code should be unique for a customer ' ||
7431: 'x_return_status = ' || x_return_status,
7432: p_prefix =>l_debug_prefix,
7433: p_msg_level=>fnd_log.level_statement);
7434: END IF;
7435:
7436: -- Debug info.
7437:
7438: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
7439: hz_utility_v2pub.debug(p_message=>'validate_cust_acct_site (-)',
7440: p_prefix=>l_debug_prefix,
7441: p_msg_level=>fnd_log.level_procedure);
7442: END IF;
7443:
7554: --enable_debug;
7555: -- Debug info.
7556:
7557: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
7558: hz_utility_v2pub.debug(p_message=>'validate_cust_site_use (+)',
7559: p_prefix=>l_debug_prefix,
7560: p_msg_level=>fnd_log.level_procedure);
7561: END IF;
7562:
7582: --------------------------------------
7583: -- validate site_use_id
7584: --------------------------------------
7585: /****Logical APIs - validation not required****/
7586: IF(HZ_UTILITY_V2PUB.G_CALLING_API IS NULL) THEN
7587: IF p_create_update_flag = 'C' THEN
7588:
7589: -- If primary key value is passed, check for uniqueness.
7590: -- If primary key value is not passed, it will be generated
7611:
7612: -- Debug info.
7613:
7614: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
7615: hz_utility_v2pub.debug(p_message=>'site_use_id is unique during creation if passed in. ' ||
7616: 'x_return_status = ' || x_return_status,
7617: p_prefix =>l_debug_prefix,
7618: p_msg_level=>fnd_log.level_statement);
7619: END IF;
7621: END IF;
7622: END IF;
7623:
7624: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
7625: hz_utility_v2pub.debug(p_message=>'(+) after validate site_use_id ... ' ||
7626: 'x_return_status = ' || x_return_status,
7627: p_prefix =>l_debug_prefix,
7628: p_msg_level=>fnd_log.level_statement);
7629: END IF;
7632: ----------------------------------------------
7633: -- validate cust_acct_site_id
7634: ----------------------------------------------
7635: /****Logical APIs - validation not required****/
7636: IF(HZ_UTILITY_V2PUB.G_CALLING_API IS NULL) THEN
7637: -- cust_acct_site_id is mandatory field
7638: -- Since cust_acct_site_id is non-updateable, we only need to check mandatory
7639: -- during creation.
7640:
7648: -- for later use. It is selected from database during update.
7649: l_cust_acct_site_id := p_cust_site_use_rec.cust_acct_site_id;
7650:
7651: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
7652: hz_utility_v2pub.debug(p_message=>'cust_acct_site_id is mandatory. ' ||
7653: 'x_return_status = ' || x_return_status,
7654: p_prefix =>l_debug_prefix,
7655: p_msg_level=>fnd_log.level_statement);
7656: END IF;
7666: p_old_column_value => l_cust_acct_site_id,
7667: x_return_status => x_return_status );
7668:
7669: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
7670: hz_utility_v2pub.debug(p_message=>'cust_acct_site_id is non-updateable. ' ||
7671: 'x_return_status = ' || x_return_status,
7672: p_prefix =>l_debug_prefix,
7673: p_msg_level=>fnd_log.level_statement);
7674: END IF;
7688: p_org_id => p_cust_site_use_rec.org_id, -- Bug 3456489
7689: x_return_status => x_return_status );
7690:
7691: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
7692: hz_utility_v2pub.debug(p_message=>'cust_acct_site_id is foreign key to hz_cust_acct_sites. ' ||
7693: 'x_return_status = ' || x_return_status,
7694: p_prefix =>l_debug_prefix,
7695: p_msg_level=>fnd_log.level_statement);
7696: END IF;
7703: FROM HZ_CUST_ACCT_SITES_ALL -- Bug 3456489
7704: WHERE CUST_ACCT_SITE_ID = l_cust_acct_site_id;
7705:
7706: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
7707: hz_utility_v2pub.debug(p_message=>'(+) after validate cust_acct_site_id ... ' ||
7708: 'x_return_status = ' || x_return_status,
7709: p_prefix =>l_debug_prefix,
7710: p_msg_level=>fnd_log.level_statement);
7711: END IF;
7724: p_column_value => p_cust_site_use_rec.status,
7725: x_return_status => x_return_status );
7726:
7727: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
7728: hz_utility_v2pub.debug(p_message=>'status cannot be updated to null. ' ||
7729: 'x_return_status = ' || x_return_status,
7730: p_prefix =>l_debug_prefix,
7731: p_msg_level=>fnd_log.level_statement);
7732: END IF;
7732: END IF;
7733: END IF;
7734:
7735: /****Logical APIs - validation not required****/
7736: IF(HZ_UTILITY_V2PUB.G_CALLING_API IS NULL) THEN
7737: -- status is lookup code in lookup type CODE_STATUS
7738: IF p_cust_site_use_rec.status IS NOT NULL AND
7739: p_cust_site_use_rec.status <> FND_API.G_MISS_CHAR AND
7740: ( p_create_update_flag = 'C' OR
7747: p_column_value => p_cust_site_use_rec.status,
7748: x_return_status => x_return_status );
7749:
7750: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
7751: hz_utility_v2pub.debug(p_message=>'status is lookup code in lookup type CODE_STATUS. ' ||
7752: 'x_return_status = ' || x_return_status,
7753: p_prefix =>l_debug_prefix,
7754: p_msg_level=>fnd_log.level_statement);
7755: END IF;
7756: END IF;
7757: END IF;
7758:
7759: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
7760: hz_utility_v2pub.debug(p_message=>'(+) after validate status ... ' ||
7761: 'x_return_status = ' || x_return_status,
7762: p_prefix =>l_debug_prefix,
7763: p_msg_level=>fnd_log.level_statement);
7764: END IF;
7781: -- for later use. It is selected from database during update.
7782: l_site_use_code := p_cust_site_use_rec.site_use_code;
7783:
7784: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
7785: hz_utility_v2pub.debug(p_message=>'site_use_code is mandatory. ' ||
7786: 'x_return_status = ' || x_return_status,
7787: p_prefix =>l_debug_prefix,
7788: p_msg_level=>fnd_log.level_statement);
7789: END IF;
7799: p_old_column_value => l_site_use_code,
7800: x_return_status => x_return_status );
7801:
7802: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
7803: hz_utility_v2pub.debug(p_message=>'site_use_code is non-updateable. ' ||
7804: 'x_return_status = ' || x_return_status,
7805: p_prefix =>l_debug_prefix,
7806: p_msg_level=>fnd_log.level_statement);
7807: END IF;
7821: p_column_value => p_cust_site_use_rec.site_use_code,
7822: x_return_status => x_return_status );
7823:
7824: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
7825: hz_utility_v2pub.debug(p_message=>'site_use_code is lookup code in lookup type SITE_USE_CODE. ' ||
7826: 'x_return_status = ' || x_return_status,
7827: p_prefix =>l_debug_prefix,
7828: p_msg_level=>fnd_log.level_statement);
7829: END IF;
7874: END;
7875: END IF;
7876:
7877: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
7878: hz_utility_v2pub.debug(p_message=>'A customer can have only one active DUN, STMTS, LEGAL site use. ' ||
7879: 'x_return_status = ' || x_return_status,
7880: p_prefix =>l_debug_prefix,
7881: p_msg_level=>fnd_log.level_statement);
7882: END IF;
7904: NULL;
7905: END;
7906:
7907: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
7908: hz_utility_v2pub.debug(p_message=>'cust_acct_site_id and site_use_code together should be unique. ' ||
7909: 'x_return_status = ' || x_return_status,
7910: p_prefix =>l_debug_prefix,
7911: p_msg_level=>fnd_log.level_statement);
7912: END IF;
7912: END IF;
7913:
7914:
7915: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
7916: hz_utility_v2pub.debug(p_message=>'(+) after validate site_use_code ... ' ||
7917: 'x_return_status = ' || x_return_status,
7918: p_prefix =>l_debug_prefix,
7919: p_msg_level=>fnd_log.level_statement);
7920: END IF;
7952: x_return_status := FND_API.G_RET_STS_ERROR;
7953: END IF;
7954:
7955: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
7956: hz_utility_v2pub.debug(p_message=>'location is mandatory if autonumbering is set to N. ' ||
7957: 'x_return_status = ' || x_return_status,
7958: p_prefix =>l_debug_prefix,
7959: p_msg_level=>fnd_log.level_statement);
7960: END IF;
7969: p_column_value => p_cust_site_use_rec.location,
7970: x_return_status => x_return_status );
7971:
7972: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
7973: hz_utility_v2pub.debug(p_message=>'location cannot be updated to null. ' ||
7974: 'x_return_status = ' || x_return_status,
7975: p_prefix =>l_debug_prefix,
7976: p_msg_level=>fnd_log.level_statement);
7977: END IF;
8011: NULL;
8012: END;
8013:
8014: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
8015: hz_utility_v2pub.debug(p_message=>'location must be unique within a customer account/site_use_type. ' ||
8016: 'x_return_status = ' || x_return_status,
8017: p_prefix =>l_debug_prefix,
8018: p_msg_level=>fnd_log.level_statement);
8019: END IF;
8020:
8021: END IF;
8022:
8023: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
8024: hz_utility_v2pub.debug(p_message=>'(+) after validate location ... ' ||
8025: 'x_return_status = ' || x_return_status,
8026: p_prefix =>l_debug_prefix,
8027: p_msg_level=>fnd_log.level_statement);
8028: END IF;
8039: p_customer_id => l_cust_account_id,
8040: x_return_status => x_return_status );
8041:
8042: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
8043: hz_utility_v2pub.debug(p_message=>'contact_id is foreign key to hz_cust_account_roles. ' ||
8044: 'x_return_status = ' || x_return_status,
8045: p_prefix =>l_debug_prefix,
8046: p_msg_level=>fnd_log.level_statement);
8047: END IF;
8085: x_return_status := FND_API.G_RET_STS_ERROR;
8086: END;
8087:
8088: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
8089: hz_utility_v2pub.debug(p_message=>'For SHIP_TO site use, bill_to_site_use_id should be a valid BILL_TO site use of this account and its related account. ' ||
8090: 'x_return_status = ' || x_return_status,
8091: p_prefix =>l_debug_prefix,
8092: p_msg_level=>fnd_log.level_statement);
8093: END IF;
8123: FND_MSG_PUB.ADD;
8124: x_return_status := FND_API.G_RET_STS_ERROR;
8125:
8126: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
8127: hz_utility_v2pub.debug(p_message=>'For BILL_TO site use, inactivation not allowed if a SHIP_TO address uses this BILL_TO address ' ||
8128: 'x_return_status = ' || x_return_status,
8129: p_prefix =>l_debug_prefix,
8130: p_msg_level=>fnd_log.level_statement);
8131: END IF;
8135: END;
8136: END IF;
8137:
8138: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
8139: hz_utility_v2pub.debug(p_message=>'(+) after validate bill_to_site_use_id ... ' ||
8140: 'x_return_status = ' || x_return_status,
8141: p_prefix =>l_debug_prefix,
8142: p_msg_level=>fnd_log.level_statement);
8143: END IF;
8148: ----------------------------------------------
8149: -- validate orig_system_reference
8150: ----------------------------------------------
8151: /****Logical APIs - validation not required****/
8152: IF(HZ_UTILITY_V2PUB.G_CALLING_API IS NULL) THEN
8153: IF (p_cust_site_use_rec.orig_system is not null and p_cust_site_use_rec.orig_system <>fnd_api.g_miss_char)
8154: and (p_cust_site_use_rec.orig_system_reference is not null and p_cust_site_use_rec.orig_system_reference <>fnd_api.g_miss_char)
8155: and p_create_update_flag = 'U'
8156: THEN
8188: p_old_column_value => l_orig_system_reference,
8189: x_return_status => x_return_status );
8190:
8191: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
8192: hz_utility_v2pub.debug(p_message=>'orig_system_reference is non-updateable. ' ||
8193: 'x_return_status = ' || x_return_status,
8194: p_prefix =>l_debug_prefix,
8195: p_msg_level=>fnd_log.level_statement);
8196: END IF;
8196: END IF;
8197:
8198: END IF;
8199: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
8200: hz_utility_v2pub.debug(p_message=>'(+) after validate orig_system_reference ... ' ||
8201: 'x_return_status = ' || x_return_status,
8202: p_prefix =>l_debug_prefix,
8203: p_msg_level=>fnd_log.level_statement);
8204: END IF;
8222: p_column_value => p_cust_site_use_rec.freight_term,
8223: x_return_status => x_return_status );
8224:
8225: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
8226: hz_utility_v2pub.debug(p_message=>'freight_term is lookup code in lookup type FREIGHT_TERMS in so_lookups. ' ||
8227: 'x_return_status = ' || x_return_status,
8228: p_prefix =>l_debug_prefix,
8229: p_msg_level=>fnd_log.level_statement);
8230: END IF;
8230: END IF;
8231: END IF;
8232:
8233: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
8234: hz_utility_v2pub.debug(p_message=>'(+) after validate freight_term ... ' ||
8235: 'x_return_status = ' || x_return_status,
8236: p_prefix =>l_debug_prefix,
8237: p_msg_level=>fnd_log.level_statement);
8238: END IF;
8250: p_column_value => p_cust_site_use_rec.primary_flag,
8251: x_return_status => x_return_status );
8252:
8253: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
8254: hz_utility_v2pub.debug(p_message=>'primary_flag cannot be updated to NULL. ' ||
8255: 'x_return_status = ' || x_return_status,
8256: p_prefix =>l_debug_prefix,
8257: p_msg_level=>fnd_log.level_statement);
8258: END IF;
8259:
8260: END IF;
8261:
8262: /****Logical APIs - validation not required****/
8263: IF(HZ_UTILITY_V2PUB.G_CALLING_API IS NULL) THEN
8264: -- primary_flag is lookup code in lookup type YES/NO
8265: IF p_cust_site_use_rec.primary_flag IS NOT NULL AND
8266: p_cust_site_use_rec.primary_flag <> FND_API.G_MISS_CHAR
8267: THEN
8271: p_column_value => p_cust_site_use_rec.primary_flag,
8272: x_return_status => x_return_status );
8273:
8274: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
8275: hz_utility_v2pub.debug(p_message=>'primary_flag is lookup code in lookup type YES/NO. ' ||
8276: 'x_return_status = ' || x_return_status,
8277: p_prefix =>l_debug_prefix,
8278: p_msg_level=>fnd_log.level_statement);
8279: END IF;
8313: NULL;
8314: END;
8315:
8316: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
8317: hz_utility_v2pub.debug(p_message=>'only one primary is allowed for one site use type per account. ' ||
8318: 'x_return_status = ' || x_return_status,
8319: p_prefix =>l_debug_prefix,
8320: p_msg_level=>fnd_log.level_statement);
8321: END IF;
8367: l_error := FALSE;
8368: END IF;
8369:
8370: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
8371: hz_utility_v2pub.debug(p_message=>'an inactive site use is never marked as primary. ' ||
8372: 'x_return_status = ' || x_return_status,
8373: p_prefix =>l_debug_prefix,
8374: p_msg_level=>fnd_log.level_statement);
8375: END IF;
8375: END IF;
8376:
8377:
8378: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
8379: hz_utility_v2pub.debug(p_message=>'(+) after validate primary_flag ... ' ||
8380: 'x_return_status = ' || x_return_status,
8381: p_prefix =>l_debug_prefix,
8382: p_msg_level=>fnd_log.level_statement);
8383: END IF;
8399: p_column_value => p_cust_site_use_rec.ship_partial,
8400: x_return_status => x_return_status );
8401:
8402: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
8403: hz_utility_v2pub.debug(p_message=>'ship_partial is lookup code in lookup type YES/NO. ' ||
8404: 'x_return_status = ' || x_return_status,
8405: p_prefix =>l_debug_prefix,
8406: p_msg_level=>fnd_log.level_statement);
8407: END IF;
8408:
8409: END IF;
8410:
8411: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
8412: hz_utility_v2pub.debug(p_message=>'(+) after validate ship_partial ... ' ||
8413: 'x_return_status = ' || x_return_status,
8414: p_prefix =>l_debug_prefix,
8415: p_msg_level=>fnd_log.level_statement);
8416: END IF;
8419: ----------------------------------------------
8420: -- validate ship_sets_include_lines_flag
8421: ----------------------------------------------
8422: /****Logical APIs - validation not required****/
8423: IF(HZ_UTILITY_V2PUB.G_CALLING_API IS NULL) THEN
8424: -- ship_sets_include_lines_flag is lookup code in lookup type YES/NO
8425: IF p_cust_site_use_rec.ship_sets_include_lines_flag IS NOT NULL AND
8426: p_cust_site_use_rec.ship_sets_include_lines_flag <> FND_API.G_MISS_CHAR
8427: THEN
8431: p_column_value => p_cust_site_use_rec.ship_sets_include_lines_flag,
8432: x_return_status => x_return_status );
8433:
8434: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
8435: hz_utility_v2pub.debug(p_message=>'ship_sets_include_lines_flag is lookup code in lookup type YES/NO. ' ||
8436: 'x_return_status = ' || x_return_status,
8437: p_prefix =>l_debug_prefix,
8438: p_msg_level=>fnd_log.level_statement);
8439: END IF;
8470: END IF;
8471: END IF;
8472:
8473: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
8474: hz_utility_v2pub.debug(p_message=>'If ship_sets_include_lines_flag is set to Y then arrivalsets_include_lines_flag is always set to N. '||
8475: 'x_return_status = ' || x_return_status,
8476: p_prefix =>l_debug_prefix,
8477: p_msg_level=>fnd_log.level_statement);
8478: END IF;
8477: p_msg_level=>fnd_log.level_statement);
8478: END IF;
8479:
8480: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
8481: hz_utility_v2pub.debug(p_message=>'(+) after validate ship_sets_include_lines_flag ... ' ||
8482: 'x_return_status = ' || x_return_status,
8483: p_prefix =>l_debug_prefix,
8484: p_msg_level=>fnd_log.level_statement);
8485: END IF;
8487: ----------------------------------------------
8488: -- validate arrivalsets_include_lines_flag
8489: ----------------------------------------------
8490: /****Logical APIs - validation not required****/
8491: IF(HZ_UTILITY_V2PUB.G_CALLING_API IS NULL) THEN
8492: -- arrivalsets_include_lines_flag is lookup code in lookup type YES/NO
8493: IF p_cust_site_use_rec.arrivalsets_include_lines_flag IS NOT NULL AND
8494: p_cust_site_use_rec.arrivalsets_include_lines_flag <> FND_API.G_MISS_CHAR
8495: THEN
8499: p_column_value => p_cust_site_use_rec.arrivalsets_include_lines_flag,
8500: x_return_status => x_return_status );
8501:
8502: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
8503: hz_utility_v2pub.debug(p_message=>'arrivalsets_include_lines_flag is lookup code in lookup type YES/NO. ' ||
8504: 'x_return_status = ' || x_return_status,
8505: p_prefix =>l_debug_prefix,
8506: p_msg_level=>fnd_log.level_statement);
8507: END IF;
8539: END IF;
8540: END IF;
8541:
8542: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
8543: hz_utility_v2pub.debug(p_message=>'If arrivalsets_include_lines_flag is set to Y then ship_sets_include_lines_flag is always setto N. ' ||
8544: 'x_return_status = ' || x_return_status,
8545: p_prefix =>l_debug_prefix,
8546: p_msg_level=>fnd_log.level_statement);
8547: END IF;
8546: p_msg_level=>fnd_log.level_statement);
8547: END IF;
8548:
8549: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
8550: hz_utility_v2pub.debug(p_message=>'(+) after validate arrivalsets_include_lines_flag ... ' ||
8551: 'x_return_status = ' || x_return_status,
8552: p_prefix =>l_debug_prefix,
8553: p_msg_level=>fnd_log.level_statement);
8554: END IF;
8572: p_called_from => 'validate_cust_site_use',
8573: x_return_status => x_return_status );
8574:
8575: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
8576: hz_utility_v2pub.debug(p_message=>'Tax_code should be a valid value defined in view zx_output_classifications_v. '||
8577: 'x_return_status = ' || x_return_status,
8578: p_prefix =>l_debug_prefix,
8579: p_msg_level=>fnd_log.level_statement);
8580: END IF;
8581:
8582: END IF;
8583:
8584: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
8585: hz_utility_v2pub.debug(p_message=>'(+) after validate tax_code..' ||
8586: 'x_return_status = ' || x_return_status,
8587: p_prefix =>l_debug_prefix,
8588: p_msg_level=>fnd_log.level_statement);
8589: END IF;
8603: p_column_value => p_cust_site_use_rec.payment_term_id,
8604: x_return_status => x_return_status );
8605:
8606: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
8607: hz_utility_v2pub.debug(p_message=>'Payment_term_id should be a valid value defined in RA_TERMS. '||
8608: 'x_return_status = ' || x_return_status,
8609: p_prefix =>l_debug_prefix,
8610: p_msg_level=>fnd_log.level_statement);
8611: END IF;
8612:
8613: END IF;
8614:
8615: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
8616: hz_utility_v2pub.debug(p_message=>'(+) after validate payment_term_id..' ||
8617: 'x_return_status = ' || x_return_status,
8618: p_prefix =>l_debug_prefix,
8619: p_msg_level=>fnd_log.level_statement);
8620: END IF;
8635: p_lookup_type =>'DEMAND_CLASS',
8636: p_column_value =>p_cust_site_use_rec.demand_class_code,
8637: x_return_status =>x_return_status );
8638: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
8639: hz_utility_v2pub.debug(p_message=>'Demand_class_code is lookup_code in lookup_type DEMAND_CLASS in fnd_common_lookups. '||
8640: 'x_return_status = ' || x_return_status,
8641: p_prefix =>l_debug_prefix,
8642: p_msg_level=>fnd_log.level_statement);
8643: END IF;
8643: END IF;
8644: END IF;
8645:
8646: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
8647: hz_utility_v2pub.debug(p_message=>'(+) after validate demand_class_code..' ||
8648: 'x_return_status = ' || x_return_status,
8649: p_prefix =>l_debug_prefix,
8650: p_msg_level=>fnd_log.level_statement);
8651: END IF;
8667: p_org_id => p_cust_site_use_rec.org_id, -- Bug 3456489
8668: x_return_status => x_return_status );
8669:
8670: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
8671: hz_utility_v2pub.debug(p_message=>'Primary_salesrep_id should be a valid value defined in RA_SALESREPS. '||
8672: 'x_return_status = ' || x_return_status,
8673: p_prefix =>l_debug_prefix,
8674: p_msg_level=>fnd_log.level_statement);
8675: END IF;
8675: END IF;
8676:
8677: END IF;
8678: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
8679: hz_utility_v2pub.debug(p_message=>'(+) after validate primary_salesrep_id..' ||
8680: 'x_return_status = ' || x_return_status,
8681: p_prefix =>l_debug_prefix,
8682: p_msg_level=>fnd_log.level_statement);
8683: END IF;
8697: p_org_id => p_cust_site_use_rec.org_id, -- Bug 3456489
8698: x_return_status => x_return_status );
8699:
8700: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
8701: hz_utility_v2pub.debug(p_message=>'finchrg_receivables_trx_id should be a valid value defined in AR_RECEIVABLES_TRX. '||
8702: 'x_return_status = ' || x_return_status,
8703: p_prefix =>l_debug_prefix,
8704: p_msg_level=>fnd_log.level_statement);
8705: END IF;
8707:
8708: END IF;
8709:
8710: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
8711: hz_utility_v2pub.debug(p_message=>'(+) after validate finchrg_receivables_trx_id..' ||
8712: 'x_return_status = ' || x_return_status,
8713: p_prefix =>l_debug_prefix,
8714: p_msg_level=>fnd_log.level_statement);
8715: END IF;
8733: p_org_id => p_cust_site_use_rec.org_id, -- Bug 3456489
8734: x_return_status => x_return_status );
8735:
8736: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
8737: hz_utility_v2pub.debug(p_message=>'order_type_id should be a valid value defined in OE_ORDER_TYPES_V. '||
8738: 'x_return_status = ' || x_return_status,
8739: p_prefix =>l_debug_prefix,
8740: p_msg_level=>fnd_log.level_statement);
8741: END IF;
8742:
8743: END IF;
8744:
8745: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
8746: hz_utility_v2pub.debug(p_message=>'(+) after validate order_type_id..' ||
8747: 'x_return_status = ' || x_return_status,
8748: p_prefix =>l_debug_prefix,
8749: p_msg_level=>fnd_log.level_statement);
8750: END IF;
8766: p_column_value => p_cust_site_use_rec.price_list_id,
8767: x_return_status => x_return_status );
8768:
8769: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
8770: hz_utility_v2pub.debug(p_message=>'price_list_id should be a valid value defined in SO_PRICE_LISTS. '||
8771: 'x_return_status = ' || x_return_status,
8772: p_prefix =>l_debug_prefix,
8773: p_msg_level=>fnd_log.level_statement);
8774: END IF;
8775:
8776: END IF;
8777:
8778: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
8779: hz_utility_v2pub.debug(p_message=>'(+) after validate price_list_id..' ||
8780: 'x_return_status = ' || x_return_status,
8781: p_prefix =>l_debug_prefix,
8782: p_msg_level=>fnd_log.level_statement);
8783: END IF;
8801: p_column_value => p_cust_site_use_rec.item_cross_ref_pref,
8802: x_return_status => x_return_status );
8803:
8804: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
8805: hz_utility_v2pub.debug(p_message=>'item_cross_ref_pref should be a value defined in MTL_CROSS_REFERENCE_TYPES or should be INT or CUST . ' ||
8806: 'x_return_status = ' || x_return_status,
8807: p_prefix =>l_debug_prefix,
8808: p_msg_level=>fnd_log.level_statement);
8809: END IF;
8811: END IF;
8812: END IF;
8813:
8814: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
8815: hz_utility_v2pub.debug(p_message=>'(+) after validate item_cross_ref_pref..' ||
8816: 'x_return_status = ' || x_return_status,
8817: p_prefix =>l_debug_prefix,
8818: p_msg_level=>fnd_log.level_statement);
8819: END IF;
8834: p_column_value => p_cust_site_use_rec.warehouse_id,
8835: x_return_status => x_return_status );
8836:
8837: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
8838: hz_utility_v2pub.debug(p_message=>'warehouse_id should be a value defined in ORG_ORGANIZATION_DEFINITIONS . '||
8839: 'x_return_status = ' || x_return_status,
8840: p_prefix =>l_debug_prefix,
8841: p_msg_level=>fnd_log.level_statement);
8842: END IF;
8843:
8844: END IF;
8845:
8846: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
8847: hz_utility_v2pub.debug(p_message=>'(+) after validate warehouse_id..' ||
8848: 'x_return_status = ' || x_return_status,
8849: p_prefix =>l_debug_prefix,
8850: p_msg_level=>fnd_log.level_statement);
8851: END IF;
8869: p_column_value =>p_cust_site_use_rec.fob_point,
8870: x_return_status =>x_return_status );
8871:
8872: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
8873: hz_utility_v2pub.debug(p_message=>'fob_point is lookup_code in lookup type FOB. '||
8874: 'x_return_status = ' || x_return_status,
8875: p_prefix =>l_debug_prefix,
8876: p_msg_level=>fnd_log.level_statement);
8877: END IF;
8878:
8879: END IF;
8880:
8881: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
8882: hz_utility_v2pub.debug(p_message=>'(+) after validate fob_point..' ||
8883: 'x_return_status = ' || x_return_status,
8884: p_prefix =>l_debug_prefix,
8885: p_msg_level=>fnd_log.level_statement);
8886: END IF;
8905: p_column_value =>p_cust_site_use_rec.date_type_preference,
8906: x_return_status =>x_return_status );
8907:
8908: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
8909: hz_utility_v2pub.debug(p_message=>'date_type_preference is a lookup_code in lookup_type REQUEST_DATE_TYPE in oe_lookups. '||
8910: 'x_return_status = ' || x_return_status,
8911: p_prefix =>l_debug_prefix,
8912: p_msg_level=>fnd_log.level_statement);
8913: END IF;
8914:
8915: END IF;
8916:
8917: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
8918: hz_utility_v2pub.debug(p_message=>'(+) after validate date_type_preference..' ||
8919: 'x_return_status = ' || x_return_status,
8920: p_prefix =>l_debug_prefix,
8921: p_msg_level=>fnd_log.level_statement);
8922: END IF;
8940: p_column_value => p_cust_site_use_rec.ship_partial,
8941: x_return_status => x_return_status );
8942:
8943: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
8944: hz_utility_v2pub.debug(p_message=>'ship_partial is lookup code in lookup type YES/NO. ' ||
8945: 'x_return_status = ' || x_return_status,
8946: p_prefix =>l_debug_prefix,
8947: p_msg_level=>fnd_log.level_statement);
8948: END IF;
8949:
8950: END IF;
8951:
8952: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
8953: hz_utility_v2pub.debug(p_message=>'(+) after validate ship_partial ... ' ||
8954: 'x_return_status = ' || x_return_status,
8955: p_prefix =>l_debug_prefix,
8956: p_msg_level=>fnd_log.level_statement);
8957: END IF;
8960: ----------------------------------------------
8961: -- validate sched_date_push_flag
8962: ----------------------------------------------
8963: /****Logical APIs - validation not required****/
8964: IF(HZ_UTILITY_V2PUB.G_CALLING_API IS NULL) THEN
8965: -- sched_date_push_flag is lookup code in lookup type YES/NO
8966: IF p_cust_site_use_rec.sched_date_push_flag IS NOT NULL AND
8967: p_cust_site_use_rec.sched_date_push_flag <> FND_API.G_MISS_CHAR
8968: THEN
8972: p_column_value => p_cust_site_use_rec.sched_date_push_flag,
8973: x_return_status => x_return_status );
8974:
8975: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
8976: hz_utility_v2pub.debug(p_message=>'sched_date_push_flag is lookup code in lookup type YES/NO. ' ||
8977: 'x_return_status = ' || x_return_status,
8978: p_prefix =>l_debug_prefix,
8979: p_msg_level=>fnd_log.level_statement);
8980: END IF;
8981:
8982: END IF;
8983:
8984: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
8985: hz_utility_v2pub.debug(p_message=>'(+) after validate sched_date_push_flag ... ' ||
8986: 'x_return_status = ' || x_return_status,
8987: p_prefix =>l_debug_prefix,
8988: p_msg_level=>fnd_log.level_statement);
8989: END IF;
8992: ----------------------------------------------
8993: -- validate gsa_indicator
8994: ----------------------------------------------
8995: /****Logical APIs - validation not required****/
8996: IF(HZ_UTILITY_V2PUB.G_CALLING_API IS NULL) THEN
8997: -- gsa_indicator is lookup code in lookup type YES/NO
8998: IF p_cust_site_use_rec.gsa_indicator IS NOT NULL AND
8999: p_cust_site_use_rec.gsa_indicator <> FND_API.G_MISS_CHAR
9000: THEN
9004: p_column_value => p_cust_site_use_rec.gsa_indicator,
9005: x_return_status => x_return_status );
9006:
9007: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
9008: hz_utility_v2pub.debug(p_message=>'gsa_indicator is lookup code in lookup type YES/NO. ' ||
9009: 'x_return_status = ' || x_return_status,
9010: p_prefix =>l_debug_prefix,
9011: p_msg_level=>fnd_log.level_statement);
9012: END IF;
9013:
9014: END IF;
9015:
9016: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
9017: hz_utility_v2pub.debug(p_message=>'(+) after validate gsa_indicator ... ' ||
9018: 'x_return_status = ' || x_return_status,
9019: p_prefix =>l_debug_prefix,
9020: p_msg_level=>fnd_log.level_statement);
9021: END IF;
9049: x_return_status := FND_API.G_RET_STS_ERROR;
9050: END IF;
9051:
9052: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
9053: hz_utility_v2pub.debug(p_message=>'If site_use_code is not BILL_TO, then Revenue, Tax, Freight, Clearing, ' ||
9054: 'Unbilled Receivable and Unearned Revenue fields should not be populated. ' ||
9055: 'x_return_status = ' || x_return_status,
9056: p_prefix =>l_debug_prefix,
9057: p_msg_level=>fnd_log.level_statement);
9077: x_return_status := FND_API.G_RET_STS_ERROR;
9078: END IF;
9079:
9080: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
9081: hz_utility_v2pub.debug(p_message=>'If site_use_code is not DRAWEE, then Unpaid Bills Receivables, ' ||
9082: 'Remitted Bills Receivables and Factored Bills Receivables fields should not be populated. ' ||
9083: 'x_return_status = ' || x_return_status,
9084: p_prefix =>l_debug_prefix,
9085: p_msg_level=>fnd_log.level_statement);
9100: x_return_status := FND_API.G_RET_STS_ERROR;
9101: END IF;
9102:
9103: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
9104: hz_utility_v2pub.debug(p_message=>'If site_use_code is not BILL_TO OR DRAWEE, then Bills Receivables field should not be populated. ' ||
9105: 'x_return_status = ' || x_return_status,
9106: p_prefix =>l_debug_prefix,
9107: p_msg_level=>fnd_log.level_statement);
9108: END IF;
9137: p_coa_id => l_coa_id, -- Bug 3456489
9138: x_return_status => x_return_status );
9139:
9140: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
9141: hz_utility_v2pub.debug(p_message=>'gl_id_rec is validate gl field. ' ||
9142: 'x_return_status = ' || x_return_status,
9143: p_prefix =>l_debug_prefix,
9144: p_msg_level=>fnd_log.level_statement);
9145: END IF;
9160: p_coa_id => l_coa_id, -- Bug 3456489
9161: x_return_status => x_return_status );
9162:
9163: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
9164: hz_utility_v2pub.debug(p_message=>'gl_id_rev is validate gl field. ' ||
9165: 'x_return_status = ' || x_return_status,
9166: p_prefix =>l_debug_prefix,
9167: p_msg_level=>fnd_log.level_statement);
9168: END IF;
9183: p_coa_id => l_coa_id, -- Bug 3456489
9184: x_return_status => x_return_status );
9185:
9186: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
9187: hz_utility_v2pub.debug(p_message=>'gl_id_tax is validate gl field. ' ||
9188: 'x_return_status = ' || x_return_status,
9189: p_prefix =>l_debug_prefix,
9190: p_msg_level=>fnd_log.level_statement);
9191: END IF;
9206: p_coa_id => l_coa_id, -- Bug 3456489
9207: x_return_status => x_return_status );
9208:
9209: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
9210: hz_utility_v2pub.debug(p_message=>'gl_id_freight is validate gl field. ' ||
9211: 'x_return_status = ' || x_return_status,
9212: p_prefix =>l_debug_prefix,
9213: p_msg_level=>fnd_log.level_statement);
9214: END IF;
9229: p_coa_id => l_coa_id, -- Bug 3456489
9230: x_return_status => x_return_status );
9231:
9232: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
9233: hz_utility_v2pub.debug(p_message=>'gl_id_clearing is validate gl field. ' ||
9234: 'x_return_status = ' || x_return_status,
9235: p_prefix =>l_debug_prefix,
9236: p_msg_level=>fnd_log.level_statement);
9237: END IF;
9252: p_coa_id => l_coa_id, -- Bug 3456489
9253: x_return_status => x_return_status );
9254:
9255: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
9256: hz_utility_v2pub.debug(p_message=>'gl_id_unbilled is validate gl field. ' ||
9257: 'x_return_status = ' || x_return_status,
9258: p_prefix =>l_debug_prefix,
9259: p_msg_level=>fnd_log.level_statement);
9260: END IF;
9275: p_coa_id => l_coa_id, -- Bug 3456489
9276: x_return_status => x_return_status );
9277:
9278: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
9279: hz_utility_v2pub.debug(p_message=>'gl_id_unearned is validate gl field. ' ||
9280: 'x_return_status = ' || x_return_status,
9281: p_prefix =>l_debug_prefix,
9282: p_msg_level=>fnd_log.level_statement);
9283: END IF;
9298: p_coa_id => l_coa_id, -- Bug 3456489
9299: x_return_status => x_return_status );
9300:
9301: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
9302: hz_utility_v2pub.debug(p_message=>'gl_id_unpaid_rec is validate gl field. ' ||
9303: 'x_return_status = ' || x_return_status,
9304: p_prefix =>l_debug_prefix,
9305: p_msg_level=>fnd_log.level_statement);
9306: END IF;
9321: p_coa_id => l_coa_id, -- Bug 3456489
9322: x_return_status => x_return_status );
9323:
9324: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
9325: hz_utility_v2pub.debug(p_message=>'gl_id_remittance is validate gl field. ' ||
9326: 'x_return_status = ' || x_return_status,
9327: p_prefix =>l_debug_prefix,
9328: p_msg_level=>fnd_log.level_statement);
9329: END IF;
9344: p_coa_id => l_coa_id, -- Bug 3456489
9345: x_return_status => x_return_status );
9346:
9347: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
9348: hz_utility_v2pub.debug(p_message=>'gl_id_factor is validate gl field. ' ||
9349: 'x_return_status = ' || x_return_status,
9350: p_prefix =>l_debug_prefix,
9351: p_msg_level=>fnd_log.level_statement);
9352: END IF;
9353:
9354: END IF;
9355:
9356: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
9357: hz_utility_v2pub.debug(p_message=>'(+) after validate gl_xxx ... ' ||
9358: 'x_return_status = ' || x_return_status,
9359: p_prefix =>l_debug_prefix,
9360: p_msg_level=>fnd_log.level_statement);
9361: END IF;
9379: p_column_value => p_cust_site_use_rec.ship_via,
9380: x_return_status => x_return_status );
9381:
9382: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
9383: hz_utility_v2pub.debug(p_message=>'ship_via is foreign key to oe_ship_methods_v. ' ||
9384: 'x_return_status = ' || x_return_status,
9385: p_prefix =>l_debug_prefix,
9386: p_msg_level=>fnd_log.level_statement);
9387: END IF;
9388:
9389: END IF;
9390:
9391: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
9392: hz_utility_v2pub.debug(p_message=>'(+) after validate ship_via ... ' ||
9393: 'x_return_status = ' || x_return_status,
9394: p_prefix =>l_debug_prefix,
9395: p_msg_level=>fnd_log.level_statement);
9396: END IF;
9418:
9419: -- Debug info.
9420:
9421: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
9422: hz_utility_v2pub.debug(p_message=>'validate_cust_site_use (-)',
9423: p_prefix=>l_debug_prefix,
9424: p_msg_level=>fnd_log.level_procedure);
9425: END IF;
9426:
9492:
9493: -- Debug info.
9494:
9495: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
9496: hz_utility_v2pub.debug(p_message=>'validate_cust_account_role (+)',
9497: p_prefix=>l_debug_prefix,
9498: p_msg_level=>fnd_log.level_procedure);
9499: END IF;
9500:
9514: --------------------------------------
9515: -- validate cust_account_role_id
9516: --------------------------------------
9517: /****Logical APIs - validation not required****/
9518: IF(HZ_UTILITY_V2PUB.G_CALLING_API IS NULL) THEN
9519: IF p_create_update_flag = 'C' THEN
9520:
9521: -- If primary key value is passed, check for uniqueness.
9522: -- If primary key value is not passed, it will be generated
9539: NULL;
9540: END;
9541:
9542: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
9543: hz_utility_v2pub.debug(p_message=>'cust_account_role_id is unique during creation if passed in. ' ||
9544: 'x_return_status = ' || x_return_status,
9545: p_prefix =>l_debug_prefix,
9546: p_msg_level=>fnd_log.level_statement);
9547: END IF;
9550:
9551: END IF;
9552:
9553: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
9554: hz_utility_v2pub.debug(p_message=>'(+) after validate cust_account_role_id ... ' ||
9555: 'x_return_status = ' || x_return_status,
9556: p_prefix =>l_debug_prefix,
9557: p_msg_level=>fnd_log.level_statement);
9558: END IF;
9561: ----------------------------------------------
9562: -- validate party_id
9563: ----------------------------------------------
9564: /****Logical APIs - validation not required****/
9565: IF(HZ_UTILITY_V2PUB.G_CALLING_API IS NULL) THEN
9566: -- party_id is mandatory field
9567: -- Since party_id is non-updateable, we only need to check mandatory
9568: -- during creation.
9569:
9574: p_column_value => p_cust_account_role_rec.party_id,
9575: x_return_status => x_return_status );
9576:
9577: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
9578: hz_utility_v2pub.debug(p_message=>'party_id is mandatory. ' ||
9579: 'x_return_status = ' || x_return_status,
9580: p_prefix =>l_debug_prefix,
9581: p_msg_level=>fnd_log.level_statement);
9582: END IF;
9593: p_old_column_value => l_party_id,
9594: x_return_status => x_return_status );
9595:
9596: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
9597: hz_utility_v2pub.debug(p_message=>'party_id is non-updateable. ' ||
9598: 'x_return_status = ' || x_return_status,
9599: p_prefix =>l_debug_prefix,
9600: p_msg_level=>fnd_log.level_statement);
9601: END IF;
9621: p_column_value => p_cust_account_role_rec.party_id,
9622: x_return_status => x_return_status );
9623:
9624: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
9625: hz_utility_v2pub.debug(p_message=>'party_id is foreign key to hz_parties. ' ||
9626: 'x_return_status = ' || x_return_status,
9627: p_prefix =>l_debug_prefix,
9628: p_msg_level=>fnd_log.level_statement);
9629: END IF;
9630:
9631: END IF;
9632:
9633: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
9634: hz_utility_v2pub.debug(p_message=>'(+) after validate party_id ... ' ||
9635: 'x_return_status = ' || x_return_status,
9636: p_prefix =>l_debug_prefix,
9637: p_msg_level=>fnd_log.level_statement);
9638: END IF;
9641: ----------------------------------------------
9642: -- validate cust_account_id
9643: ----------------------------------------------
9644: /****Logical APIs - validation not required****/
9645: IF(HZ_UTILITY_V2PUB.G_CALLING_API IS NULL) THEN
9646: -- cust_account_id is mandatory field
9647: -- Since cust_account_id is non-updateable, we only need to check mandatory
9648: -- during creation.
9649:
9654: p_column_value => p_cust_account_role_rec.cust_account_id,
9655: x_return_status => x_return_status );
9656:
9657: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
9658: hz_utility_v2pub.debug(p_message=>'cust_account_id is mandatory. ' ||
9659: 'x_return_status = ' || x_return_status,
9660: p_prefix =>l_debug_prefix,
9661: p_msg_level=>fnd_log.level_statement);
9662: END IF;
9673: p_old_column_value => l_cust_account_id,
9674: x_return_status => x_return_status );
9675:
9676: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
9677: hz_utility_v2pub.debug(p_message=>'cust_account_id is non-updateable. ' ||
9678: 'x_return_status = ' || x_return_status,
9679: p_prefix =>l_debug_prefix,
9680: p_msg_level=>fnd_log.level_statement);
9681: END IF;
9695: p_column_value => p_cust_account_role_rec.cust_account_id,
9696: x_return_status => x_return_status );
9697:
9698: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
9699: hz_utility_v2pub.debug(p_message=>'cust_account_id is foreign key to hz_cust_accounts. ' ||
9700: 'x_return_status = ' || x_return_status,
9701: p_prefix =>l_debug_prefix,
9702: p_msg_level=>fnd_log.level_statement);
9703: END IF;
9704:
9705: END IF;
9706:
9707: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
9708: hz_utility_v2pub.debug(p_message=>'(+) after validate cust_account_id ... ' ||
9709: 'x_return_status = ' || x_return_status,
9710: p_prefix =>l_debug_prefix,
9711: p_msg_level=>fnd_log.level_statement);
9712: END IF;
9715: ----------------------------------------------
9716: -- validate cust_acct_site_id
9717: ----------------------------------------------
9718: /****Logical APIs - validation not required****/
9719: IF(HZ_UTILITY_V2PUB.G_CALLING_API IS NULL) THEN
9720: -- cust_acct_site_id is non-updateable field
9721: IF p_create_update_flag = 'U' AND
9722: p_cust_account_role_rec.cust_acct_site_id IS NOT NULL
9723: THEN
9727: p_old_column_value => l_cust_acct_site_id,
9728: x_return_status => x_return_status );
9729:
9730: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
9731: hz_utility_v2pub.debug(p_message=>'cust_acct_site_id is non-updateable. ' ||
9732: 'x_return_status = ' || x_return_status,
9733: p_prefix =>l_debug_prefix,
9734: p_msg_level=>fnd_log.level_statement);
9735: END IF;
9778: x_return_status := FND_API.G_RET_STS_ERROR;
9779: END;
9780:
9781: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
9782: hz_utility_v2pub.debug(p_message=>'cust_acct_site_id is foreign key to hz_cust_acct_sites and cust_account_id in hz_cust_acct_sites should be same as we put in cust_account_id in hz_cust_account_roles.' ||
9783: 'x_return_status = ' || x_return_status,
9784: p_prefix =>l_debug_prefix,
9785: p_msg_level=>fnd_log.level_statement);
9786: END IF;
9787:
9788: END IF;
9789:
9790: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
9791: hz_utility_v2pub.debug(p_message=>'(+) after validate cust_acct_site_id ... ' ||
9792: 'x_return_status = ' || x_return_status,
9793: p_prefix =>l_debug_prefix,
9794: p_msg_level=>fnd_log.level_statement);
9795: END IF;
9810: p_column_value => p_cust_account_role_rec.role_type,
9811: x_return_status => x_return_status );
9812:
9813: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
9814: hz_utility_v2pub.debug(p_message=>'role_type is mandatory. ' ||
9815: 'x_return_status = ' || x_return_status,
9816: p_prefix =>l_debug_prefix,
9817: p_msg_level=>fnd_log.level_statement);
9818: END IF;
9829: p_old_column_value => l_role_type,
9830: x_return_status => x_return_status );
9831:
9832: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
9833: hz_utility_v2pub.debug(p_message=>'role_type is non-updateable. ' ||
9834: 'x_return_status = ' || x_return_status,
9835: p_prefix =>l_debug_prefix,
9836: p_msg_level=>fnd_log.level_statement);
9837: END IF;
9852: p_column_value => p_cust_account_role_rec.role_type,
9853: x_return_status => x_return_status );
9854:
9855: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
9856: hz_utility_v2pub.debug(p_message=>'role_type is lookup code in lookup type ACCT_ROLE_TYPE. ' ||
9857: 'x_return_status = ' || x_return_status,
9858: p_prefix =>l_debug_prefix,
9859: p_msg_level=>fnd_log.level_statement);
9860: END IF;
9889: NULL;
9890: END;
9891:
9892: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
9893: hz_utility_v2pub.debug(p_message=>'the combination of cust_account_id, party_id, role_type should be unique. ' ||
9894: 'x_return_status = ' || x_return_status,
9895: p_prefix =>l_debug_prefix,
9896: p_msg_level=>fnd_log.level_statement);
9897: END IF;
9915: NULL;
9916: END;
9917:
9918: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
9919: hz_utility_v2pub.debug(p_message=>'the combination of cust_acct_site_id, party_id, role_type should be unique. ' ||
9920: 'x_return_status = ' || x_return_status,
9921: p_prefix =>l_debug_prefix,
9922: p_msg_level=>fnd_log.level_statement);
9923: END IF;
9950: NULL;
9951: END;
9952:
9953: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
9954: hz_utility_v2pub.debug(p_message=>'the combination of cust_acct_site_id, party_id, role_type should be unique. ' ||
9955: 'x_return_status = ' || x_return_status,
9956: p_prefix =>l_debug_prefix,
9957: p_msg_level=>fnd_log.level_statement);
9958: END IF;
9979: NULL;
9980: END;
9981:
9982: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
9983: hz_utility_v2pub.debug(p_message=>'the combination of cust_account_id, party_id, role_type should be unique. ' ||
9984: 'x_return_status = ' || x_return_status,
9985: p_prefix =>l_debug_prefix,
9986: p_msg_level=>fnd_log.level_statement);
9987: END IF;
9990: END IF;
9991: END IF;
9992:
9993: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
9994: hz_utility_v2pub.debug(p_message=>'(+) after validate role_type ... ' ||
9995: 'x_return_status = ' || x_return_status,
9996: p_prefix =>l_debug_prefix,
9997: p_msg_level=>fnd_log.level_statement);
9998: END IF;
10001: ----------------------------------------------
10002: -- validate orig_system_reference
10003: ----------------------------------------------
10004: /****Logical APIs - validation not required****/
10005: IF(HZ_UTILITY_V2PUB.G_CALLING_API IS NULL) THEN
10006: IF (p_cust_account_role_rec.orig_system is not null and p_cust_account_role_rec.orig_system <>fnd_api.g_miss_char)
10007: and (p_cust_account_role_rec.orig_system_reference is not null and p_cust_account_role_rec.orig_system_reference <>fnd_api.g_miss_char)
10008: and p_create_update_flag = 'U'
10009: then
10040: p_old_column_value => l_orig_system_reference,
10041: x_return_status => x_return_status );
10042:
10043: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
10044: hz_utility_v2pub.debug(p_message=>'orig_system_reference is non-updateable. ' ||
10045: 'x_return_status = ' || x_return_status,
10046: p_prefix =>l_debug_prefix,
10047: p_msg_level=>fnd_log.level_statement);
10048: END IF;
10049:
10050: END IF;
10051:
10052: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
10053: hz_utility_v2pub.debug(p_message=>'(+) after validate orig_system_reference ... ' ||
10054: 'x_return_status = ' || x_return_status,
10055: p_prefix =>l_debug_prefix,
10056: p_msg_level=>fnd_log.level_statement);
10057: END IF;
10060: ----------------------------------------------
10061: -- validate primary_flag
10062: ----------------------------------------------
10063: /****Logical APIs - validation not required****/
10064: IF(HZ_UTILITY_V2PUB.G_CALLING_API IS NULL) THEN
10065:
10066: -- primary_flag is lookup code in lookup type YES/NO
10067: IF p_cust_account_role_rec.primary_flag IS NOT NULL AND
10068: p_cust_account_role_rec.primary_flag <> FND_API.G_MISS_CHAR
10073: p_column_value => p_cust_account_role_rec.primary_flag,
10074: x_return_status => x_return_status );
10075:
10076: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
10077: hz_utility_v2pub.debug(p_message=>'primary_flag is lookup code in lookup type YES/NO. ' ||
10078: 'x_return_status = ' || x_return_status,
10079: p_prefix =>l_debug_prefix,
10080: p_msg_level=>fnd_log.level_statement);
10081: END IF;
10113: NULL;
10114: END;
10115:
10116: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
10117: hz_utility_v2pub.debug(p_message=>'primary_flag is unique per cust_account_id. ' ||
10118: 'x_return_status = ' || x_return_status,
10119: p_prefix =>l_debug_prefix,
10120: p_msg_level=>fnd_log.level_statement);
10121: END IF;
10140: NULL;
10141: END;
10142:
10143: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
10144: hz_utility_v2pub.debug(p_message=>'primary_flag is unique per cust_acct_site_id. ' ||
10145: 'x_return_status = ' || x_return_status,
10146: p_prefix =>l_debug_prefix,
10147: p_msg_level=>fnd_log.level_statement);
10148: END IF;
10150: END IF;
10151: END IF;
10152:
10153: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
10154: hz_utility_v2pub.debug(p_message=>'(+) after validate primary_flag ... ' ||
10155: 'x_return_status = ' || x_return_status,
10156: p_prefix =>l_debug_prefix,
10157: p_msg_level=>fnd_log.level_statement);
10158: END IF;
10171: p_column_value => p_cust_account_role_rec.status,
10172: x_return_status => x_return_status );
10173:
10174: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
10175: hz_utility_v2pub.debug(p_message=>'status cannot be updated to null. ' ||
10176: 'x_return_status = ' || x_return_status,
10177: p_prefix =>l_debug_prefix,
10178: p_msg_level=>fnd_log.level_statement);
10179: END IF;
10180:
10181: END IF;
10182:
10183: /****Logical APIs - validation not required****/
10184: IF(HZ_UTILITY_V2PUB.G_CALLING_API IS NULL) THEN
10185: -- status is lookup code in lookup type REGISTRY_STATUS because
10186: -- the status is used in party merge.
10187: IF p_cust_account_role_rec.status IS NOT NULL AND
10188: p_cust_account_role_rec.status <> FND_API.G_MISS_CHAR AND
10196: p_column_value => p_cust_account_role_rec.status,
10197: x_return_status => x_return_status );
10198:
10199: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
10200: hz_utility_v2pub.debug(p_message=>'status is lookup code in lookup type REGISTRY_STATUS. ' ||
10201: 'x_return_status = ' || x_return_status,
10202: p_prefix =>l_debug_prefix,
10203: p_msg_level=>fnd_log.level_statement);
10204: END IF;
10206: END IF;
10207: END IF;
10208:
10209: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
10210: hz_utility_v2pub.debug(p_message=>'(+) after validate status ... ' ||
10211: 'x_return_status = ' || x_return_status,
10212: p_prefix =>l_debug_prefix,
10213: p_msg_level=>fnd_log.level_statement);
10214: END IF;
10235: x_return_status => x_return_status);
10236:
10237: -- Debug info.
10238: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
10239: hz_utility_v2pub.debug(p_message=>'validate_cust_account_role (-)',
10240: p_prefix=>l_debug_prefix,
10241: p_msg_level=>fnd_log.level_procedure);
10242: END IF;
10243:
10299: --enable_debug;
10300:
10301: -- Debug info.
10302: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
10303: hz_utility_v2pub.debug(p_message=>'validate_role_responsibility (+)',
10304: p_prefix=>l_debug_prefix,
10305: p_msg_level=>fnd_log.level_procedure);
10306: END IF;
10307:
10318: --------------------------------------
10319: -- validate responsibility_id
10320: --------------------------------------
10321: /****Logical APIs - validation not required****/
10322: IF(HZ_UTILITY_V2PUB.G_CALLING_API IS NULL) THEN
10323: IF p_create_update_flag = 'C' THEN
10324:
10325: -- If primary key value is passed, check for uniqueness.
10326: -- If primary key value is not passed, it will be generated
10343: NULL;
10344: END;
10345:
10346: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
10347: hz_utility_v2pub.debug(p_message=>'responsibility_id is unique during creation if passed in. ' ||
10348: 'x_return_status = ' || x_return_status,
10349: p_prefix =>l_debug_prefix,
10350: p_msg_level=>fnd_log.level_statement);
10351: END IF;
10354: END IF;
10355: END IF;
10356:
10357: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
10358: hz_utility_v2pub.debug(p_message=>'(+) after validate responsibility_id ... ' ||
10359: 'x_return_status = ' || x_return_status,
10360: p_prefix =>l_debug_prefix,
10361: p_msg_level=>fnd_log.level_statement);
10362: END IF;
10374: p_column_value => p_role_responsibility_rec.responsibility_type,
10375: x_return_status => x_return_status );
10376:
10377: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
10378: hz_utility_v2pub.debug(p_message=>'responsibility_type is mandatory. ' ||
10379: 'x_return_status = ' || x_return_status,
10380: p_prefix =>l_debug_prefix,
10381: p_msg_level=>fnd_log.level_statement);
10382: END IF;
10396: p_column_value => p_role_responsibility_rec.responsibility_type,
10397: x_return_status => x_return_status );
10398:
10399: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
10400: hz_utility_v2pub.debug(p_message=>'responsibility_type is lookup code in lookup type SITE_USE_CODE. ' ||
10401: 'x_return_status = ' || x_return_status,
10402: p_prefix =>l_debug_prefix,
10403: p_msg_level=>fnd_log.level_statement);
10404: END IF;
10407: l_responsibility_type := p_role_responsibility_rec.responsibility_type;
10408: END IF;
10409:
10410: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
10411: hz_utility_v2pub.debug(p_message=>'(+) after validate responsibility_type ... ' ||
10412: 'x_return_status = ' || x_return_status,
10413: p_prefix =>l_debug_prefix,
10414: p_msg_level=>fnd_log.level_statement);
10415: END IF;
10418: ----------------------------------------------
10419: -- validate cust_account_role_id
10420: ----------------------------------------------
10421: /****Logical APIs - validation not required****/
10422: IF(HZ_UTILITY_V2PUB.G_CALLING_API IS NULL) THEN
10423: -- cust_account_role_id is mandatory field
10424: -- Since cust_account_role_id is non-updateable, we only need to check mandatory
10425: -- during creation.
10426:
10433:
10434: l_cust_account_role_id := p_role_responsibility_rec.cust_account_role_id;
10435:
10436: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
10437: hz_utility_v2pub.debug(p_message=>'cust_account_role_id is mandatory. ' ||
10438: 'x_return_status = ' || x_return_status,
10439: p_prefix =>l_debug_prefix,
10440: p_msg_level=>fnd_log.level_statement);
10441: END IF;
10451: p_old_column_value => l_cust_account_role_id,
10452: x_return_status => x_return_status );
10453:
10454: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
10455: hz_utility_v2pub.debug(p_message=>'cust_account_role_id is non-updateable. ' ||
10456: 'x_return_status = ' || x_return_status,
10457: p_prefix =>l_debug_prefix,
10458: p_msg_level=>fnd_log.level_statement);
10459: END IF;
10473: p_column_value => p_role_responsibility_rec.cust_account_role_id,
10474: x_return_status => x_return_status );
10475:
10476: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
10477: hz_utility_v2pub.debug(p_message=>'cust_account_role_id is foreign key to hz_cust_account_roles. ' ||
10478: 'x_return_status = ' || x_return_status,
10479: p_prefix =>l_debug_prefix,
10480: p_msg_level=>fnd_log.level_statement);
10481: END IF;
10485: -- The combination of cust_account_role_id and responsibility_type
10486: -- should be unique.
10487:
10488: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
10489: hz_utility_v2pub.debug(p_message=>'cust_account_role_id = ' || l_cust_account_role_id || ' ' ||
10490: 'role_responsibility_id = ' || l_responsibility_type || ' ' ||
10491: 'create_update_flag = ' || p_create_update_flag || ' ' ||
10492: 'p_rowid = ' || p_rowid || ' ' ||
10493: 'x_return_status = ' || x_return_status,
10514: NULL;
10515: END;
10516:
10517: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
10518: hz_utility_v2pub.debug(p_message=>'combination of cust_account_role_id and responsibility_type should be unique. ' ||
10519: 'x_return_status = ' || x_return_status,
10520: p_prefix =>l_debug_prefix,
10521: p_msg_level=>fnd_log.level_statement);
10522: END IF;
10521: p_msg_level=>fnd_log.level_statement);
10522: END IF;
10523:
10524: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
10525: hz_utility_v2pub.debug(p_message=>'(+) after validate cust_account_role_id ... ' ||
10526: 'x_return_status = ' || x_return_status,
10527: p_prefix =>l_debug_prefix,
10528: p_msg_level=>fnd_log.level_statement);
10529: END IF;
10532: ----------------------------------------------
10533: -- validate orig_system_reference
10534: ----------------------------------------------
10535: /****Logical APIs - validation not required****/
10536: IF(HZ_UTILITY_V2PUB.G_CALLING_API IS NULL) THEN
10537: -- orig_system_reference is non-updateable field
10538: IF p_create_update_flag = 'U' AND
10539: p_role_responsibility_rec.orig_system_reference IS NOT NULL
10540: THEN
10544: p_old_column_value => l_orig_system_reference,
10545: x_return_status => x_return_status );
10546:
10547: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
10548: hz_utility_v2pub.debug(p_message=>'orig_system_reference is non-updateable. ' ||
10549: 'x_return_status = ' || x_return_status,
10550: p_prefix =>l_debug_prefix,
10551: p_msg_level=>fnd_log.level_statement);
10552: END IF;
10554:
10555: END IF;
10556:
10557: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
10558: hz_utility_v2pub.debug(p_message=>'(+) after validate orig_system_reference ... ' ||
10559: 'x_return_status = ' || x_return_status,
10560: p_prefix =>l_debug_prefix,
10561: p_msg_level=>fnd_log.level_statement);
10562: END IF;
10565: ----------------------------------------------
10566: -- validate primary_flag
10567: ----------------------------------------------
10568: /****Logical APIs - validation not required****/
10569: IF(HZ_UTILITY_V2PUB.G_CALLING_API IS NULL) THEN
10570: -- primary_flag is lookup code in lookup type YES/NO
10571: IF p_role_responsibility_rec.primary_flag IS NOT NULL AND
10572: p_role_responsibility_rec.primary_flag <> FND_API.G_MISS_CHAR
10573: THEN
10577: p_column_value => p_role_responsibility_rec.primary_flag,
10578: x_return_status => x_return_status );
10579:
10580: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
10581: hz_utility_v2pub.debug(p_message=>'primary_flag is lookup code in lookup type YES/NO. ' ||
10582: 'x_return_status = ' || x_return_status,
10583: p_prefix =>l_debug_prefix,
10584: p_msg_level=>fnd_log.level_statement);
10585: END IF;
10610: NULL;
10611: END;
10612:
10613: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
10614: hz_utility_v2pub.debug(p_message=>'primary_flag is unique per cust_account_role_id. ' ||
10615: 'x_return_status = ' || x_return_status,
10616: p_prefix =>l_debug_prefix,
10617: p_msg_level=>fnd_log.level_statement);
10618: END IF;
10619:
10620: END IF;
10621:
10622: IF fnd_log.level_statement>=fnd_log.g_current_runtime_level THEN
10623: hz_utility_v2pub.debug(p_message=>'(+) after validate primary_flag ... ' ||
10624: 'x_return_status = ' || x_return_status,
10625: p_prefix =>l_debug_prefix,
10626: p_msg_level=>fnd_log.level_statement);
10627: END IF;
10649:
10650: -- Debug info.
10651:
10652: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
10653: hz_utility_v2pub.debug(p_message=>'validate_role_responsibility (-)',
10654: p_prefix=>l_debug_prefix,
10655: p_msg_level=>fnd_log.level_procedure);
10656: END IF;
10657:
11682: * DESCRIPTION
11683: * Turn on debug mode.
11684: *
11685: * EXTERNAL PROCEDURES/FUNCTIONS ACCESSED
11686: * HZ_UTILITY_V2PUB.enable_debug
11687: *
11688: * MODIFICATION HISTORY
11689: *
11690: * 07-23-2001 Jianying Huang o Created.
11700: IF G_DEBUG_COUNT = 1 THEN
11701: IF FND_PROFILE.value( 'HZ_API_FILE_DEBUG_ON' ) = 'Y' OR
11702: FND_PROFILE.value( 'HZ_API_DBMS_DEBUG_ON' ) = 'Y'
11703: THEN
11704: HZ_UTILITY_V2PUB.enable_debug;
11705: G_DEBUG := TRUE;
11706: END IF;
11707: END IF;
11708:
11716: * DESCRIPTION
11717: * Turn off debug mode.
11718: *
11719: * EXTERNAL PROCEDURES/FUNCTIONS ACCESSED
11720: * HZ_UTILITY_V2PUB.disable_debug
11721: *
11722: * MODIFICATION HISTORY
11723: *
11724: * 07-23-2001 Jianying Huang o Created.
11732: IF G_DEBUG THEN
11733: G_DEBUG_COUNT := G_DEBUG_COUNT - 1;
11734:
11735: IF G_DEBUG_COUNT = 0 THEN
11736: HZ_UTILITY_V2PUB.disable_debug;
11737: G_DEBUG := FALSE;
11738: END IF;
11739: END IF;
11740:
12418:
12419: BEGIN
12420:
12421: -- skip mandatory and non-updateable check from logical API
12422: IF HZ_UTILITY_V2PUB.G_CALLING_API IS NULL THEN
12423: -- created_by_module is mandatory field
12424: -- Since created_by_module is non-updateable, we only need to check mandatory
12425: -- during creation.
12426:
12431: p_column_value => p_created_by_module,
12432: x_return_status => x_return_status);
12433:
12434: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level THEN
12435: hz_utility_v2pub.debug(
12436: p_prefix => '',
12437: p_message => l_column || ' is mandatory. ' ||
12438: 'x_return_status = ' || x_return_status,
12439: p_msg_level => fnd_log.level_statement);
12453: p_restricted => 'N',
12454: x_return_status => x_return_status);
12455:
12456: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level THEN
12457: hz_utility_v2pub.debug(
12458: p_prefix => '',
12459: p_message => l_column || ' is non-updateable. It can be updated from NULL to a value. ' ||
12460: 'x_return_status = ' || x_return_status,
12461: p_msg_level => fnd_log.level_statement);
12477: p_column_value => p_created_by_module,
12478: x_return_status => x_return_status);
12479:
12480: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level THEN
12481: hz_utility_v2pub.debug(
12482: p_prefix => '',
12483: p_message => l_column || ' is lookup code in lookup type HZ_CREATED_BY_MODULES. ' ||
12484: 'x_return_status = ' || x_return_status,
12485: p_msg_level => fnd_log.level_statement);
12486: END IF;
12487: END IF;
12488:
12489: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level THEN
12490: hz_utility_v2pub.debug(
12491: p_prefix => '',
12492: p_message => 'after validate ' || l_column || ' ... ' ||
12493: 'x_return_status = ' || x_return_status,
12494: p_msg_level => fnd_log.level_statement);
12521:
12522: BEGIN
12523:
12524: -- skip non-updateable check from logical API
12525: IF HZ_UTILITY_V2PUB.G_CALLING_API IS NULL THEN
12526: -- application_id is non-updateable field. But it can be updated from NULL
12527: -- to some value.
12528:
12529: IF p_create_update_flag = 'U' AND
12536: p_restricted => 'N',
12537: x_return_status => x_return_status);
12538:
12539: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level THEN
12540: hz_utility_v2pub.debug(
12541: p_prefix => '',
12542: p_message => l_column || ' is non-updateable. It can be updated from NULL to a value. ' ||
12543: 'x_return_status = ' || x_return_status,
12544: p_msg_level => fnd_log.level_statement);
12546: END IF;
12547: END IF;
12548:
12549: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level THEN
12550: hz_utility_v2pub.debug(
12551: p_prefix => '',
12552: p_message => 'after validate ' || l_column || ' ... ' ||
12553: 'x_return_status = ' || x_return_status,
12554: p_msg_level => fnd_log.level_statement);