[Home] [Help]
690: and actual_content_source = l_adapter_content_source
691: and location_id = l_location_id;
692:
693: -- check if the current location record has been validated
694: CURSOR is_standardized(l_location_id NUMBER) IS
695: SELECT 'X'
696: FROM hz_locations
697: WHERE location_id = l_location_id
698: AND date_validated IS NOT NULL
885:
886: l_allow_update_std := nvl(fnd_profile.value('HZ_UPDATE_STD_ADDRESS'), 'Y');
887: l_dummy := NULL;
888:
889: OPEN is_standardized(l_location_rec.location_id);
890: FETCH is_standardized INTO l_dummy;
891: CLOSE is_standardized;
892:
893: -- location has been validated before and profile is set to 'N'
886: l_allow_update_std := nvl(fnd_profile.value('HZ_UPDATE_STD_ADDRESS'), 'Y');
887: l_dummy := NULL;
888:
889: OPEN is_standardized(l_location_rec.location_id);
890: FETCH is_standardized INTO l_dummy;
891: CLOSE is_standardized;
892:
893: -- location has been validated before and profile is set to 'N'
894: -- only if validation_sst_flag is not passed
887: l_dummy := NULL;
888:
889: OPEN is_standardized(l_location_rec.location_id);
890: FETCH is_standardized INTO l_dummy;
891: CLOSE is_standardized;
892:
893: -- location has been validated before and profile is set to 'N'
894: -- only if validation_sst_flag is not passed
895: IF((l_allow_update_std = 'N') AND (l_dummy IS NOT NULL)) THEN
1083: log('SQLERRM: '||SQLERRM);
1084: rollback to get_validated_xml_pub;
1085: END;
1086:
1087: END IF; -- check allow update standardized address
1088: END IF; -- update location profiles
1089: END; -- begin tax if validation pass
1090: END IF; -- check return status of tax validation
1091:
1978: Log('Adapter_Id: '||l_adapter_id);
1979: Log('Overwrite_Threshold: '||l_overwrite_threshold);
1980: Log('Batch_Sequence: '||l_batch_sequence);
1981:
1982: ecx_standard.processXMLCover(
1983: i_map_code =>l_ecx_map_code,
1984: i_inpayload =>l_event_data,
1985: i_debug_level =>3
1986: );