DBA Data[Home] [Help]

APPS.ENG_CHANGE_ROUTE_PEOPLE_UTIL dependencies on ENG_CHANGE_ROUTE_PEOPLE

Line 1: PACKAGE BODY Eng_Change_Route_People_Util AS

1: PACKAGE BODY Eng_Change_Route_People_Util AS
2: /* $Header: ENGURTPB.pls 120.1 2006/01/12 19:23:03 mkimizuk noship $ */
3:
4: G_PKG_NAME CONSTANT VARCHAR2(30):= 'Eng_Change_Route_People_Util' ;
5:

Line 4: G_PKG_NAME CONSTANT VARCHAR2(30):= 'Eng_Change_Route_People_Util' ;

1: PACKAGE BODY Eng_Change_Route_People_Util AS
2: /* $Header: ENGURTPB.pls 120.1 2006/01/12 19:23:03 mkimizuk noship $ */
3:
4: G_PKG_NAME CONSTANT VARCHAR2(30):= 'Eng_Change_Route_People_Util' ;
5:
6: -- For Debug
7: g_debug_file UTL_FILE.FILE_TYPE ;
8: g_debug_flag BOOLEAN := FALSE ; -- For TEST : FALSE ;

Line 14: g_orig_assignee_rec Eng_Change_Route_People_Util.Assignee_Rec_Type ;

10: g_debug_filename VARCHAR2(35) ;
11: g_debug_errmesg VARCHAR2(240);
12:
13: -- Global Assignee Rec
14: g_orig_assignee_rec Eng_Change_Route_People_Util.Assignee_Rec_Type ;
15: g_assignee_rec Eng_Change_Route_People_Util.Assignee_Rec_Type ;
16:
17:
18:

Line 15: g_assignee_rec Eng_Change_Route_People_Util.Assignee_Rec_Type ;

11: g_debug_errmesg VARCHAR2(240);
12:
13: -- Global Assignee Rec
14: g_orig_assignee_rec Eng_Change_Route_People_Util.Assignee_Rec_Type ;
15: g_assignee_rec Eng_Change_Route_People_Util.Assignee_Rec_Type ;
16:
17:
18:
19: /********************************************************************

Line 67: g_debug_filename := 'Eng_Change_Route_People_Util.log' ;

63: END IF;
64:
65: -- Set Default Debug Name
66: IF g_debug_filename IS NULL THEN
67: g_debug_filename := 'Eng_Change_Route_People_Util.log' ;
68: END IF ;
69:
70: g_debug_file := utl_file.fopen( g_output_dir
71: , g_debug_filename

Line 128: , x_assignee_rec OUT NOCOPY Eng_Change_Route_People_Util.Assignee_Rec_Type

124: PROCEDURE GetAssigneeRec
125: ( p_assignee_id IN NUMBER
126: , p_assignee_type_code IN VARCHAR2
127: , p_current_flag IN VARCHAR2 := NULL -- Y or NULL regarded as Current
128: , x_assignee_rec OUT NOCOPY Eng_Change_Route_People_Util.Assignee_Rec_Type
129: )
130: IS
131:
132: l_idx BINARY_INTEGER ;

Line 401: l_assignee_rec Eng_Change_Route_People_Util.Assignee_Rec_Type ;

397: )
398: RETURN VARCHAR2
399: IS
400:
401: l_assignee_rec Eng_Change_Route_People_Util.Assignee_Rec_Type ;
402:
403: BEGIN
404:
405: IF p_assignee_id IS NOT NULL AND p_assignee_type_code IS NOT NULL

Line 435: l_assignee_rec Eng_Change_Route_People_Util.Assignee_Rec_Type ;

431: )
432: RETURN VARCHAR2
433: IS
434:
435: l_assignee_rec Eng_Change_Route_People_Util.Assignee_Rec_Type ;
436:
437: BEGIN
438:
439: IF p_assignee_id IS NOT NULL AND p_assignee_type_code = 'PERSON'

Line 469: l_assignee_rec Eng_Change_Route_People_Util.Assignee_Rec_Type ;

465: )
466: RETURN VARCHAR2
467: IS
468:
469: l_assignee_rec Eng_Change_Route_People_Util.Assignee_Rec_Type ;
470:
471: BEGIN
472:
473: IF p_assignee_id IS NOT NULL AND p_assignee_type_code IS NOT NULL

Line 549: from ENG_CHANGE_ROUTE_PEOPLE_VL

545: ORIGINAL_ASSIGNEE_ID,
546: ORIGINAL_ASSIGNEE_TYPE_CODE,
547: RESPONSE_CONDITION_CODE,
548: RESPONSE_DESCRIPTION
549: from ENG_CHANGE_ROUTE_PEOPLE_VL
550: where STEP_ID = P_FROM_STEP_ID
551: and PARENT_ROUTE_PEOPLE_ID IS NULL
552: ;
553:

Line 593: SELECT ENG_CHANGE_ROUTE_PEOPLE_S.NEXTVAL into l_people_id

589:
590: for recinfo in c loop
591:
592: -- Get Next Sequence Value for STEP_ID
593: SELECT ENG_CHANGE_ROUTE_PEOPLE_S.NEXTVAL into l_people_id
594: FROM DUAL;
595:
596: INSERT_ROW (
597: X_ROWID => l_rowid,

Line 646: * ENG_CHANGE_ROUTE_PEOPLE_VL

642: /********************************************************************
643: * API Type : Private Table Hander APIs
644: * Purpose : Those APIs are private
645: * Table Hander for TL Entity Object:
646: * ENG_CHANGE_ROUTE_PEOPLE_VL
647: * PROCEDURE INSERT_ROW;
648: * PROCEDURE LOCK_ROW;
649: * PROCEDURE UPDATE_ROW;
650: * PROCEDURE DELETE_ROW;

Line 680: cursor C is select ROWID from ENG_CHANGE_ROUTE_PEOPLE

676: X_PARENT_ROUTE_PEOPLE_ID IN NUMBER
677: )
678: IS
679:
680: cursor C is select ROWID from ENG_CHANGE_ROUTE_PEOPLE
681: where ROUTE_PEOPLE_ID = X_ROUTE_PEOPLE_ID
682: ;
683:
684:

Line 687: insert into ENG_CHANGE_ROUTE_PEOPLE (

683:
684:
685: BEGIN
686:
687: insert into ENG_CHANGE_ROUTE_PEOPLE (
688: ROUTE_PEOPLE_ID,
689: STEP_ID,
690: ASSIGNEE_ID,
691: ASSIGNEE_TYPE_CODE,

Line 735: insert into ENG_CHANGE_ROUTE_PEOPLE_TL (

731: X_RESPONSE_CONDITION_CODE,
732: X_PARENT_ROUTE_PEOPLE_ID
733: );
734:
735: insert into ENG_CHANGE_ROUTE_PEOPLE_TL (
736: ROUTE_PEOPLE_ID,
737: CREATION_DATE,
738: CREATED_BY,
739: LAST_UPDATE_DATE,

Line 759: from ENG_CHANGE_ROUTE_PEOPLE_TL T

755: from FND_LANGUAGES L
756: where L.INSTALLED_FLAG in ('I', 'B')
757: and not exists
758: (select NULL
759: from ENG_CHANGE_ROUTE_PEOPLE_TL T
760: where T.ROUTE_PEOPLE_ID = X_ROUTE_PEOPLE_ID
761: and T.LANGUAGE = L.LANGUAGE_CODE);
762:
763: open c;

Line 812: from ENG_CHANGE_ROUTE_PEOPLE

808: ORIGINAL_ASSIGNEE_ID,
809: ORIGINAL_ASSIGNEE_TYPE_CODE,
810: RESPONSE_CONDITION_CODE,
811: PARENT_ROUTE_PEOPLE_ID
812: from ENG_CHANGE_ROUTE_PEOPLE
813: where ROUTE_PEOPLE_ID = X_ROUTE_PEOPLE_ID
814: for update of ROUTE_PEOPLE_ID nowait;
815: recinfo c%rowtype;
816:

Line 820: from ENG_CHANGE_ROUTE_PEOPLE_TL

816:
817: cursor c1 is select
818: RESPONSE_DESCRIPTION,
819: decode(LANGUAGE, userenv('LANG'), 'Y', 'N') BASELANG
820: from ENG_CHANGE_ROUTE_PEOPLE_TL
821: where ROUTE_PEOPLE_ID = X_ROUTE_PEOPLE_ID
822: and userenv('LANG') in (LANGUAGE, SOURCE_LANG)
823: for update of ROUTE_PEOPLE_ID nowait;
824:

Line 918: update ENG_CHANGE_ROUTE_PEOPLE set

914: IS
915:
916: BEGIN
917:
918: update ENG_CHANGE_ROUTE_PEOPLE set
919: STEP_ID = X_STEP_ID,
920: ASSIGNEE_ID = X_ASSIGNEE_ID,
921: ASSIGNEE_TYPE_CODE = X_ASSIGNEE_TYPE_CODE,
922: ADHOC_PEOPLE_FLAG = X_ADHOC_PEOPLE_FLAG,

Line 944: update ENG_CHANGE_ROUTE_PEOPLE_TL set

940: if (sql%notfound) then
941: raise no_data_found;
942: end if;
943:
944: update ENG_CHANGE_ROUTE_PEOPLE_TL set
945: RESPONSE_DESCRIPTION = X_RESPONSE_DESCRIPTION,
946: LAST_UPDATE_DATE = X_LAST_UPDATE_DATE,
947: LAST_UPDATED_BY = X_LAST_UPDATED_BY,
948: LAST_UPDATE_LOGIN = X_LAST_UPDATE_LOGIN,

Line 970: delete from ENG_CHANGE_ROUTE_PEOPLE_TL

966:
967: BEGIN
968:
969:
970: delete from ENG_CHANGE_ROUTE_PEOPLE_TL
971: where ROUTE_PEOPLE_ID = X_ROUTE_PEOPLE_ID;
972:
973: if (sql%notfound) then
974: raise no_data_found;

Line 977: delete from ENG_CHANGE_ROUTE_PEOPLE

973: if (sql%notfound) then
974: raise no_data_found;
975: end if;
976:
977: delete from ENG_CHANGE_ROUTE_PEOPLE
978: where ROUTE_PEOPLE_ID = X_ROUTE_PEOPLE_ID;
979:
980: if (sql%notfound) then
981: raise no_data_found;

Line 992: delete from ENG_CHANGE_ROUTE_PEOPLE_TL T

988: IS
989:
990: BEGIN
991:
992: delete from ENG_CHANGE_ROUTE_PEOPLE_TL T
993: where not exists
994: (select NULL
995: from ENG_CHANGE_ROUTE_PEOPLE B
996: where B.ROUTE_PEOPLE_ID = T.ROUTE_PEOPLE_ID

Line 995: from ENG_CHANGE_ROUTE_PEOPLE B

991:
992: delete from ENG_CHANGE_ROUTE_PEOPLE_TL T
993: where not exists
994: (select NULL
995: from ENG_CHANGE_ROUTE_PEOPLE B
996: where B.ROUTE_PEOPLE_ID = T.ROUTE_PEOPLE_ID
997: );
998:
999: update ENG_CHANGE_ROUTE_PEOPLE_TL T set (

Line 999: update ENG_CHANGE_ROUTE_PEOPLE_TL T set (

995: from ENG_CHANGE_ROUTE_PEOPLE B
996: where B.ROUTE_PEOPLE_ID = T.ROUTE_PEOPLE_ID
997: );
998:
999: update ENG_CHANGE_ROUTE_PEOPLE_TL T set (
1000: RESPONSE_DESCRIPTION
1001: ) = (select
1002: B.RESPONSE_DESCRIPTION
1003: from ENG_CHANGE_ROUTE_PEOPLE_TL B

Line 1003: from ENG_CHANGE_ROUTE_PEOPLE_TL B

999: update ENG_CHANGE_ROUTE_PEOPLE_TL T set (
1000: RESPONSE_DESCRIPTION
1001: ) = (select
1002: B.RESPONSE_DESCRIPTION
1003: from ENG_CHANGE_ROUTE_PEOPLE_TL B
1004: where B.ROUTE_PEOPLE_ID = T.ROUTE_PEOPLE_ID
1005: and B.LANGUAGE = T.SOURCE_LANG)
1006: where (
1007: T.ROUTE_PEOPLE_ID,

Line 1012: from ENG_CHANGE_ROUTE_PEOPLE_TL SUBB, ENG_CHANGE_ROUTE_PEOPLE_TL SUBT

1008: T.LANGUAGE
1009: ) in (select
1010: SUBT.ROUTE_PEOPLE_ID,
1011: SUBT.LANGUAGE
1012: from ENG_CHANGE_ROUTE_PEOPLE_TL SUBB, ENG_CHANGE_ROUTE_PEOPLE_TL SUBT
1013: where SUBB.ROUTE_PEOPLE_ID = SUBT.ROUTE_PEOPLE_ID
1014: and SUBB.LANGUAGE = SUBT.SOURCE_LANG
1015: and (SUBB.RESPONSE_DESCRIPTION <> SUBT.RESPONSE_DESCRIPTION
1016: or (SUBB.RESPONSE_DESCRIPTION is null and SUBT.RESPONSE_DESCRIPTION is not null)

Line 1020: insert into ENG_CHANGE_ROUTE_PEOPLE_TL (

1016: or (SUBB.RESPONSE_DESCRIPTION is null and SUBT.RESPONSE_DESCRIPTION is not null)
1017: or (SUBB.RESPONSE_DESCRIPTION is not null and SUBT.RESPONSE_DESCRIPTION is null)
1018: ));
1019:
1020: insert into ENG_CHANGE_ROUTE_PEOPLE_TL (
1021: ROUTE_PEOPLE_ID,
1022: CREATION_DATE,
1023: CREATED_BY,
1024: LAST_UPDATE_DATE,

Line 1040: from ENG_CHANGE_ROUTE_PEOPLE_TL B, FND_LANGUAGES L

1036: B.LAST_UPDATE_LOGIN,
1037: B.RESPONSE_DESCRIPTION,
1038: L.LANGUAGE_CODE,
1039: B.SOURCE_LANG
1040: from ENG_CHANGE_ROUTE_PEOPLE_TL B, FND_LANGUAGES L
1041: where L.INSTALLED_FLAG in ('I', 'B')
1042: and B.LANGUAGE = userenv('LANG')
1043: and not exists
1044: (select NULL

Line 1045: from ENG_CHANGE_ROUTE_PEOPLE_TL T

1041: where L.INSTALLED_FLAG in ('I', 'B')
1042: and B.LANGUAGE = userenv('LANG')
1043: and not exists
1044: (select NULL
1045: from ENG_CHANGE_ROUTE_PEOPLE_TL T
1046: where T.ROUTE_PEOPLE_ID = B.ROUTE_PEOPLE_ID
1047: and T.LANGUAGE = L.LANGUAGE_CODE);
1048:
1049: END ADD_LANGUAGE;

Line 1058: END Eng_Change_Route_People_Util ;

1054: * Purpose : Those APIs are public
1055: *********************************************************************/
1056:
1057:
1058: END Eng_Change_Route_People_Util ;