DBA Data[Home] [Help]

APPS.JTF_TERR_TRIGGER_HANDLERS dependencies on JTF_TERR_RSC

Line 12: -- JTF_TERR, JTF_TERR_VALUES, JTF_TERR_RSC, JTF_TERR_RSC_ACCESS, JTF_TERR_QTYPE_USGS

8: -- PURPOSE
9: -- Joint task force core territory manager private api's.
10: -- This package is defines Territory Trigger handlers.
11: -- Trigger handler API Spec for TABLES:
12: -- JTF_TERR, JTF_TERR_VALUES, JTF_TERR_RSC, JTF_TERR_RSC_ACCESS, JTF_TERR_QTYPE_USGS
13: -- CODE HAS BEEN OPTIMIZED
14: --
15: -- Procedures:
16: -- (see below for specification)

Line 22: -- in between EIHSU UPDATED to include JTF_TERR_RSC

18: -- NOTES
19: -- This package is available for use
20: -- HISTORY
21: -- 04/23/00 EIHSU Created
22: -- in between EIHSU UPDATED to include JTF_TERR_RSC
23: -- in between EIHSU UPDATED to include JTF_TERR_RSC_ACCESS, JTF_TERR_QTYPE_USGS
24: -- 09/07/00 EIHSU Optimized
25: -- 09/21/00 EIHSU BUG 1410995, also commented out qual_type_usg_id in update proc
26: -- 09/25/00 EIHSU EHN BUG 1410995 - changed_terr records deleted upon record deletion

Line 23: -- in between EIHSU UPDATED to include JTF_TERR_RSC_ACCESS, JTF_TERR_QTYPE_USGS

19: -- This package is available for use
20: -- HISTORY
21: -- 04/23/00 EIHSU Created
22: -- in between EIHSU UPDATED to include JTF_TERR_RSC
23: -- in between EIHSU UPDATED to include JTF_TERR_RSC_ACCESS, JTF_TERR_QTYPE_USGS
24: -- 09/07/00 EIHSU Optimized
25: -- 09/21/00 EIHSU BUG 1410995, also commented out qual_type_usg_id in update proc
26: -- 09/25/00 EIHSU EHN BUG 1410995 - changed_terr records deleted upon record deletion
27: -- add request_id is null to all sql's

Line 688: FND_MSG_PUB.Add_Exc_Msg( 'JTF_TERR_RSC_BIUD-Handler', 'Error testing for existing record: ' || sqlerrm);

684: When NO_DATA_FOUND then
685: exist_terr_rsc_id := NULL;
686: Terr_Rsc_Rec_Exists := 'False';
687: When OTHERS then
688: FND_MSG_PUB.Add_Exc_Msg( 'JTF_TERR_RSC_BIUD-Handler', 'Error testing for existing record: ' || sqlerrm);
689: End;
690:
691: If Trigger_Mode = 'ON-INSERT' then
692: If Terr_Rsc_Rec_Exists = 'True' then

Line 716: --dbms_output.put_line('JTF_TERR_RSC_BIUD-Handler Success: ON-INSERT, NEW_RECORD'|| sqlerrm);

712: o_FULL_ACCESS_FLAG, n_LAST_UPDATE_DATE, n_LAST_UPDATED_BY, n_CREATION_DATE,
713: n_CREATED_BY, n_LAST_UPDATE_LOGIN, n_RESOURCE_ID, n_GROUP_ID, n_RESOURCE_TYPE,
714: n_ROLE, n_PRIMARY_CONTACT_FLAG, n_START_DATE_ACTIVE,
715: n_END_DATE_ACTIVE, n_FULL_ACCESS_FLAG);
716: --dbms_output.put_line('JTF_TERR_RSC_BIUD-Handler Success: ON-INSERT, NEW_RECORD'|| sqlerrm);
717: EXCEPTION
718: WHEN OTHERS THEN
719: FND_MSG_PUB.Add_Exc_Msg( 'JTF_TERR_RSC_BIUD-Handler', 'Error inserting record for inserting terr rsc' || sqlerrm);
720: END;

Line 719: FND_MSG_PUB.Add_Exc_Msg( 'JTF_TERR_RSC_BIUD-Handler', 'Error inserting record for inserting terr rsc' || sqlerrm);

715: n_END_DATE_ACTIVE, n_FULL_ACCESS_FLAG);
716: --dbms_output.put_line('JTF_TERR_RSC_BIUD-Handler Success: ON-INSERT, NEW_RECORD'|| sqlerrm);
717: EXCEPTION
718: WHEN OTHERS THEN
719: FND_MSG_PUB.Add_Exc_Msg( 'JTF_TERR_RSC_BIUD-Handler', 'Error inserting record for inserting terr rsc' || sqlerrm);
720: END;
721: End if;
722: elsif Trigger_mode = 'ON-UPDATE' then
723: If Terr_Rsc_Rec_Exists = 'True' then

Line 765: FND_MSG_PUB.Add_Exc_Msg( 'JTF_TERR_RSC_BIUD-Handler', 'Error while updating record for updating terr rsc: ' || sqlerrm);

761: and terr_id = l_terr_id
762: and request_id is null;
763: EXCEPTION
764: WHEN OTHERS THEN
765: FND_MSG_PUB.Add_Exc_Msg( 'JTF_TERR_RSC_BIUD-Handler', 'Error while updating record for updating terr rsc: ' || sqlerrm);
766: END;
767: else
768: -- Changed_Terr_Value_Rec_Exists = 'False'
769: -- Insert record

Line 791: FND_MSG_PUB.Add_Exc_Msg( 'JTF_TERR_RSC_BIUD-Handler', 'Error while inserting record for updating terr rsc' || sqlerrm);

787: n_ROLE, n_PRIMARY_CONTACT_FLAG, n_START_DATE_ACTIVE, n_END_DATE_ACTIVE,
788: n_FULL_ACCESS_FLAG);
789: EXCEPTION
790: WHEN OTHERS THEN
791: FND_MSG_PUB.Add_Exc_Msg( 'JTF_TERR_RSC_BIUD-Handler', 'Error while inserting record for updating terr rsc' || sqlerrm);
792: END;
793: End if;
794: else -- Trigger_mode = 'ON-DELETE'
795: If Terr_Rsc_Rec_Exists = 'True' then

Line 831: FND_MSG_PUB.Add_Exc_Msg( 'JTF_TERR_RSC_BIUD-Handler', 'Error while inserting record for deleting terr rsc ' || sqlerrm);

827: n_RESOURCE_TYPE, n_ROLE, n_PRIMARY_CONTACT_FLAG, n_START_DATE_ACTIVE,
828: n_END_DATE_ACTIVE, n_FULL_ACCESS_FLAG);
829: EXCEPTION
830: WHEN OTHERS THEN
831: FND_MSG_PUB.Add_Exc_Msg( 'JTF_TERR_RSC_BIUD-Handler', 'Error while inserting record for deleting terr rsc ' || sqlerrm);
832: END;
833: End if;
834:
835: End if;

Line 840: FND_MSG_PUB.Add_Exc_Msg( 'JTF_TERR_RSC_BIUD-Handler', 'Problems: ' || sqlerrm);

836: EXCEPTION
837: When NOT_SALES_TERR_CHANGE then
838: null;
839: When OTHERS then
840: FND_MSG_PUB.Add_Exc_Msg( 'JTF_TERR_RSC_BIUD-Handler', 'Problems: ' || sqlerrm);
841: null;
842:
843: END Terr_Rsc_Trigger_Handler;
844:

Line 1086: from jtf_terr_rsc

1082: --dbms_output.put_line('Terr_RscAccess_Trigger_Handler: BEGIN');
1083: --Get the territory_id for this record
1084: BEGIN
1085: Select terr_id into l_terr_id
1086: from jtf_terr_rsc
1087: where terr_rsc_id = l_terr_rsc_id;
1088: EXCEPTION
1089: WHEN NO_DATA_FOUND then
1090: FND_MSG_PUB.Add_Exc_Msg( 'JTF_TERR_RSC_ACCESS_BIUD-Handler', 'terr_id does not exist for terr_rsc_access_id');

Line 1090: FND_MSG_PUB.Add_Exc_Msg( 'JTF_TERR_RSC_ACCESS_BIUD-Handler', 'terr_id does not exist for terr_rsc_access_id');

1086: from jtf_terr_rsc
1087: where terr_rsc_id = l_terr_rsc_id;
1088: EXCEPTION
1089: WHEN NO_DATA_FOUND then
1090: FND_MSG_PUB.Add_Exc_Msg( 'JTF_TERR_RSC_ACCESS_BIUD-Handler', 'terr_id does not exist for terr_rsc_access_id');
1091: WHEN OTHERS then
1092: FND_MSG_PUB.Add_Exc_Msg( 'JTF_TERR_RSC_ACCESS_BIUD-Handler', 'Error while fetching terr_id from terr_rsc_access_id: ' || sqlerrm);
1093: End;
1094:

Line 1092: FND_MSG_PUB.Add_Exc_Msg( 'JTF_TERR_RSC_ACCESS_BIUD-Handler', 'Error while fetching terr_id from terr_rsc_access_id: ' || sqlerrm);

1088: EXCEPTION
1089: WHEN NO_DATA_FOUND then
1090: FND_MSG_PUB.Add_Exc_Msg( 'JTF_TERR_RSC_ACCESS_BIUD-Handler', 'terr_id does not exist for terr_rsc_access_id');
1091: WHEN OTHERS then
1092: FND_MSG_PUB.Add_Exc_Msg( 'JTF_TERR_RSC_ACCESS_BIUD-Handler', 'Error while fetching terr_id from terr_rsc_access_id: ' || sqlerrm);
1093: End;
1094:
1095: -- check source of current territory
1096: -- only add / modify records in jtf_changed_terr all

Line 1131: FND_MSG_PUB.Add_Exc_Msg( 'JTF_TERR_RSC_ACCESS_BIUD-Handler', 'Error testing for existing record: ' || sqlerrm);

1127: --dbms_output.put_line('JTDT- no data found in table: ' || sqlerrm);
1128: When OTHERS then
1129: null;
1130: --dbms_output.put_line('JTDT- error while looking for existing records: ' || sqlerrm);
1131: FND_MSG_PUB.Add_Exc_Msg( 'JTF_TERR_RSC_ACCESS_BIUD-Handler', 'Error testing for existing record: ' || sqlerrm);
1132: End;
1133:
1134: -- Extract the terr_id for this terr_value_id
1135: If Trigger_Mode = 'ON-INSERT' then

Line 1156: FND_MSG_PUB.Add_Exc_Msg( 'JTF_TERR_RSC_ACCESS_BIUD-Handler', 'Error inserting record for inserting rsc access' || sqlerrm);

1152:
1153: EXCEPTION
1154: WHEN OTHERS THEN
1155: --dbms_output.put_line('Failed at ON-INSERT, NEW_RECORD'|| sqlerrm);
1156: FND_MSG_PUB.Add_Exc_Msg( 'JTF_TERR_RSC_ACCESS_BIUD-Handler', 'Error inserting record for inserting rsc access' || sqlerrm);
1157: END;
1158: End if;
1159: elsif Trigger_mode = 'ON-UPDATE' then
1160: If Changed_Terr_RscAcc_Rec_Exists = 'True' then

Line 1189: FND_MSG_PUB.Add_Exc_Msg( 'JTF_TERR_RSC_ACCESS_BIUD-Handler', 'Error while updating record for updating rsc access: ' || sqlerrm);

1185: and request_id is null;
1186: EXCEPTION
1187: WHEN OTHERS THEN
1188: --dbms_output.put_line('Failed at ON-UPDATE, UPDATED_RECORD'|| sqlerrm);
1189: FND_MSG_PUB.Add_Exc_Msg( 'JTF_TERR_RSC_ACCESS_BIUD-Handler', 'Error while updating record for updating rsc access: ' || sqlerrm);
1190: END;
1191: else
1192: -- Changed_Terr_RscAccess_Rec_Exists = 'False'
1193: -- Insert record

Line 1208: FND_MSG_PUB.Add_Exc_Msg( 'JTF_TERR_RSC_ACCESS_BIUD-Handler', 'Error while inserting record for updating rsc access' || sqlerrm);

1204: o_access_type, n_access_type);
1205: EXCEPTION
1206: WHEN OTHERS THEN
1207: --dbms_output.put_line('Failed at ON-UPDATE, NEW_RECORD'|| sqlerrm);
1208: FND_MSG_PUB.Add_Exc_Msg( 'JTF_TERR_RSC_ACCESS_BIUD-Handler', 'Error while inserting record for updating rsc access' || sqlerrm);
1209: END;
1210: End if;
1211: else
1212: -- Trigger_mode = 'ON-DELETE'

Line 1242: FND_MSG_PUB.Add_Exc_Msg( 'JTF_TERR_RSC_ACCESS_BIUD-Handler', 'Error while inserting record for deleting rsc access ' || sqlerrm);

1238: o_access_type, n_access_type);
1239: EXCEPTION
1240: WHEN OTHERS THEN
1241: --dbms_output.put_line('Failed at ON-DELETE, NEW_RECORD' || sqlerrm);
1242: FND_MSG_PUB.Add_Exc_Msg( 'JTF_TERR_RSC_ACCESS_BIUD-Handler', 'Error while inserting record for deleting rsc access ' || sqlerrm);
1243: END;
1244: End if;
1245: End if;
1246: EXCEPTION

Line 1250: FND_MSG_PUB.Add_Exc_Msg( 'JTF_TERR_RSC_ACCESS_BIUD-Handler', 'Problems: ' || sqlerrm);

1246: EXCEPTION
1247: When NOT_SALES_TERR_CHANGE then
1248: null;
1249: When OTHERS then
1250: FND_MSG_PUB.Add_Exc_Msg( 'JTF_TERR_RSC_ACCESS_BIUD-Handler', 'Problems: ' || sqlerrm);
1251: null;
1252: END Terr_RscAccess_Trigger_Handler;
1253:
1254: