DBA Data[Home] [Help]

APPS.GR_LABEL_CLASSES_TL_PKG dependencies on GR_LABEL_CLASSES_TL

Line 1: PACKAGE BODY GR_LABEL_CLASSES_TL_PKG AS

1: PACKAGE BODY GR_LABEL_CLASSES_TL_PKG AS
2: /*$Header: GRHILCTB.pls 120.1 2006/06/16 21:39:53 pbamb noship $*/
3: PROCEDURE Insert_Row
4: (p_commit IN VARCHAR2,
5: p_called_by_form IN VARCHAR2,

Line 76: INSERT INTO gr_label_classes_tl

72: IF FND_API.To_Boolean(l_key_exists) THEN
73: RAISE Item_Exists_Error;
74: END IF;
75:
76: INSERT INTO gr_label_classes_tl
77: (label_class_code,
78: language,
79: label_class_description,
80: source_lang,

Line 243: UPDATE gr_label_classes_tl

239:
240: IF l_return_status <> 'S' THEN
241: RAISE Foreign_Key_Error;
242: ELSE
243: UPDATE gr_label_classes_tl
244: SET label_class_code = p_label_class_code,
245: language = p_language,
246: label_class_description = p_label_class_description,
247: source_lang = p_source_lang,

Line 330: L_BASE_DESC GR_LABEL_CLASSES_TL.label_class_description%TYPE;

326:
327: L_RETURN_STATUS VARCHAR2(1) := 'S';
328: L_MSG_DATA VARCHAR2(2000);
329: L_MSG_TOKEN VARCHAR2(100);
330: L_BASE_DESC GR_LABEL_CLASSES_TL.label_class_description%TYPE;
331: L_LANGUAGE VARCHAR2(4);
332: L_CREATION_DATE DATE;
333: L_LAST_UPDATE_DATE DATE;
334: /*

Line 356: FROM gr_label_classes_tl lct

352: lct.creation_date,
353: lct.last_updated_by,
354: lct.last_update_date,
355: lct.last_update_login
356: FROM gr_label_classes_tl lct
357: WHERE lct.label_class_code = p_label_class_code
358: AND lct.language = l_language;
359: LabelClassRecord c_get_label_class%ROWTYPE;
360:

Line 381: delete from GR_LABEL_CLASSES_TL T

377: l_msg_token := p_label_class_code || ' ' || p_language;
378:
379: /* Remove translations with no base row */
380:
381: delete from GR_LABEL_CLASSES_TL T
382: where not exists
383: (select NULL
384: from GR_LABEL_CLASSES_B B
385: where B.LABEL_CLASS_CODE = T.LABEL_CLASS_CODE

Line 390: update gr_label_classes_tl t set (

386: );
387:
388: /* Redefault translations from the source language */
389:
390: update gr_label_classes_tl t set (
391: label_class_description ) =
392: ( select
393: B.LABEL_CLASS_DESCRIPTION
394: from GR_LABEL_CLASSES_TL B

Line 394: from GR_LABEL_CLASSES_TL B

390: update gr_label_classes_tl t set (
391: label_class_description ) =
392: ( select
393: B.LABEL_CLASS_DESCRIPTION
394: from GR_LABEL_CLASSES_TL B
395: where B.LABEL_CLASS_CODE = T.LABEL_CLASS_CODE
396: and B.LANGUAGE = T.SOURCE_LANG)
397: where (
398: T.LABEL_CLASS_CODE,

Line 403: from GR_LABEL_CLASSES_TL SUBB, GR_LABEL_CLASSES_TL SUBT

399: T.LANGUAGE
400: ) in (select
401: SUBT.LABEL_CLASS_CODE,
402: SUBT.LANGUAGE
403: from GR_LABEL_CLASSES_TL SUBB, GR_LABEL_CLASSES_TL SUBT
404: where SUBB.LABEL_CLASS_CODE = SUBT.LABEL_CLASS_CODE
405: and SUBB.LANGUAGE = SUBT.SOURCE_LANG
406: and (SUBB.LABEL_CLASS_DESCRIPTION <> SUBT.LABEL_CLASS_DESCRIPTION
407: or (SUBB.LABEL_CLASS_DESCRIPTION is null and SUBT.LABEL_CLASS_DESCRIPTION is not null)

Line 445: INSERT INTO gr_label_classes_tl

441: OPEN c_get_label_class;
442: FETCH c_get_label_class INTO LabelClassRecord;
443: IF c_get_label_class%NOTFOUND THEN
444: CLOSE c_get_label_class;
445: INSERT INTO gr_label_classes_tl
446: (label_class_code,
447: language,
448: label_class_description,
449: source_lang,

Line 552: FROM gr_label_classes_tl

548:
549: CURSOR c_lock_label_classes_tl
550: IS
551: SELECT *
552: FROM gr_label_classes_tl
553: WHERE rowid = p_rowid
554: FOR UPDATE NOWAIT;
555: LockLabelClassRcd c_lock_label_classes_tl%ROWTYPE;
556:

Line 691: DELETE FROM gr_label_classes_tl

687: IF l_return_status <> 'S' THEN
688: RAISE Check_Integrity_Error;
689: END IF;
690:
691: DELETE FROM gr_label_classes_tl
692: WHERE rowid = p_rowid;
693:
694: /* Check the commit flag and if set, then commit the work. */
695:

Line 776: DELETE FROM gr_label_classes_tl

772: x_oracle_error := 0;
773: x_msg_data := NULL;
774: l_msg_token := p_label_class_code;
775:
776: DELETE FROM gr_label_classes_tl
777: WHERE label_class_code = p_label_class_code;
778:
779: IF FND_API.To_Boolean(p_commit) THEN
780: COMMIT WORK;

Line 1009: FROM gr_label_classes_tl lct

1005:
1006: CURSOR c_get_label_class_tl_rowid
1007: IS
1008: SELECT lct.rowid
1009: FROM gr_label_classes_tl lct
1010: WHERE lct.label_class_code = p_label_class_code
1011: AND lct.language = p_language;
1012: ClassTLRecord c_get_label_class_tl_rowid%ROWTYPE;
1013:

Line 1051: UPDATE GR_LABEL_CLASSES_TL SET

1047: ,X_LABEL_CLASS_DESCRIPTION IN VARCHAR2
1048: ,X_SOURCE_LANG IN VARCHAR2
1049: ) IS
1050: BEGIN
1051: UPDATE GR_LABEL_CLASSES_TL SET
1052: LABEL_CLASS_DESCRIPTION = X_LABEL_CLASS_DESCRIPTION,
1053: SOURCE_LANG = USERENV('LANG'),
1054: LAST_UPDATE_DATE = sysdate,
1055: LAST_UPDATED_BY = 0,

Line 1068: UPDATE GR_LABEL_CLASSES_TL SET

1064: ,X_LABEL_CLASS_DESCRIPTION IN VARCHAR2
1065: ,X_OWNER IN VARCHAR2
1066: ) IS
1067: BEGIN
1068: UPDATE GR_LABEL_CLASSES_TL SET
1069: LABEL_CLASS_DESCRIPTION = X_LABEL_CLASS_DESCRIPTION,
1070: SOURCE_LANG = USERENV('LANG'),
1071: LAST_UPDATE_DATE = sysdate,
1072: LAST_UPDATED_BY = Decode(X_OWNER, 'SEED', 1, 0),

Line 1087: FROM GR_LABEL_CLASSES_TL

1083: ,X_SOURCE_LANG IN VARCHAR2
1084: ) IS
1085: CURSOR Cur_rowid IS
1086: SELECT rowid
1087: FROM GR_LABEL_CLASSES_TL
1088: WHERE (LABEL_CLASS_CODE = X_LABEL_CLASS_CODE)
1089: AND (LANGUAGE = X_LANGUAGE);
1090: l_user_id NUMBER DEFAULT 1;
1091: l_row_id VARCHAR2(64);

Line 1099: GR_LABEL_CLASSES_TL_PKG.UPDATE_ROW(

1095: BEGIN
1096: OPEN Cur_rowid;
1097: FETCH Cur_rowid INTO l_row_id;
1098: IF Cur_rowid%FOUND THEN
1099: GR_LABEL_CLASSES_TL_PKG.UPDATE_ROW(
1100: P_COMMIT => 'T'
1101: ,P_CALLED_BY_FORM => 'F'
1102: ,P_ROWID => l_row_id
1103: ,P_LABEL_CLASS_CODE => X_LABEL_CLASS_CODE

Line 1116: GR_LABEL_CLASSES_TL_PKG.INSERT_ROW(

1112: ,X_RETURN_STATUS => l_return_status
1113: ,X_ORACLE_ERROR => l_oracle_error
1114: ,X_MSG_DATA => l_msg_data);
1115: ELSE
1116: GR_LABEL_CLASSES_TL_PKG.INSERT_ROW(
1117: P_COMMIT => 'T'
1118: ,P_CALLED_BY_FORM => 'F'
1119: ,P_LABEL_CLASS_CODE => X_LABEL_CLASS_CODE
1120: ,P_LANGUAGE => X_LANGUAGE

Line 1143: FROM GR_LABEL_CLASSES_TL

1139: ,X_LABEL_CLASS_DESCRIPTION IN VARCHAR2
1140: ,X_OWNER IN VARCHAR2) IS
1141: CURSOR Cur_rowid IS
1142: SELECT rowid
1143: FROM GR_LABEL_CLASSES_TL
1144: WHERE (LABEL_CLASS_CODE = X_LABEL_CLASS_CODE)
1145: AND USERENV('LANG') in (LANGUAGE,SOURCE_LANG);
1146: l_user_id NUMBER DEFAULT 0;
1147: l_row_id VARCHAR2(64);

Line 1162: UPDATE GR_LABEL_CLASSES_TL SET

1158:
1159: OPEN Cur_rowid;
1160: FETCH Cur_rowid INTO l_row_id;
1161: IF Cur_rowid%FOUND THEN
1162: UPDATE GR_LABEL_CLASSES_TL SET
1163: LABEL_CLASS_DESCRIPTION = X_LABEL_CLASS_DESCRIPTION,
1164: LAST_UPDATE_DATE = l_sysdate,
1165: LAST_UPDATED_BY = l_user_id,
1166: LAST_UPDATE_LOGIN = 0,

Line 1171: insert into GR_LABEL_CLASSES_TL (

1167: SOURCE_LANG = userenv('LANG')
1168: WHERE (LABEL_CLASS_CODE = X_LABEL_CLASS_CODE)
1169: AND userenv('LANG') in (LANGUAGE,SOURCE_LANG);
1170: ELSE
1171: insert into GR_LABEL_CLASSES_TL (
1172: LABEL_CLASS_CODE,
1173: LABEL_CLASS_DESCRIPTION,
1174: CREATED_BY,
1175: CREATION_DATE,

Line 1195: from GR_LABEL_CLASSES_TL T

1191: from FND_LANGUAGES L
1192: where L.INSTALLED_FLAG in ('I', 'B')
1193: and not exists
1194: (select NULL
1195: from GR_LABEL_CLASSES_TL T
1196: where T.LABEL_CLASS_CODE = X_LABEL_CLASS_CODE
1197: and T.LANGUAGE = L.LANGUAGE_CODE);
1198: END IF;
1199: CLOSE Cur_rowid;

Line 1212: delete from GR_LABEL_CLASSES_TL T

1208:
1209: procedure NEW_LANGUAGE
1210: is
1211: begin
1212: delete from GR_LABEL_CLASSES_TL T
1213: where not exists
1214: (select NULL
1215: from GR_LABEL_CLASSES_B B
1216: where B.LABEL_CLASS_CODE = T.LABEL_CLASS_CODE

Line 1219: update GR_LABEL_CLASSES_TL T set (

1215: from GR_LABEL_CLASSES_B B
1216: where B.LABEL_CLASS_CODE = T.LABEL_CLASS_CODE
1217: );
1218:
1219: update GR_LABEL_CLASSES_TL T set (
1220: LABEL_CLASS_DESCRIPTION
1221: ) = (select
1222: B.LABEL_CLASS_DESCRIPTION
1223: from GR_LABEL_CLASSES_TL B

Line 1223: from GR_LABEL_CLASSES_TL B

1219: update GR_LABEL_CLASSES_TL T set (
1220: LABEL_CLASS_DESCRIPTION
1221: ) = (select
1222: B.LABEL_CLASS_DESCRIPTION
1223: from GR_LABEL_CLASSES_TL B
1224: where B.LABEL_CLASS_CODE = T.LABEL_CLASS_CODE
1225: and B.LANGUAGE = T.SOURCE_LANG)
1226: where (
1227: T.LABEL_CLASS_CODE,

Line 1232: from GR_LABEL_CLASSES_TL SUBB, GR_LABEL_CLASSES_TL SUBT

1228: T.LANGUAGE
1229: ) in (select
1230: SUBT.LABEL_CLASS_CODE,
1231: SUBT.LANGUAGE
1232: from GR_LABEL_CLASSES_TL SUBB, GR_LABEL_CLASSES_TL SUBT
1233: where SUBB.LABEL_CLASS_CODE = SUBT.LABEL_CLASS_CODE
1234: and SUBB.LANGUAGE = SUBT.SOURCE_LANG
1235: and (SUBB.LABEL_CLASS_DESCRIPTION <> SUBT.LABEL_CLASS_DESCRIPTION
1236: ));

Line 1238: insert into GR_LABEL_CLASSES_TL (

1234: and SUBB.LANGUAGE = SUBT.SOURCE_LANG
1235: and (SUBB.LABEL_CLASS_DESCRIPTION <> SUBT.LABEL_CLASS_DESCRIPTION
1236: ));
1237:
1238: insert into GR_LABEL_CLASSES_TL (
1239: LABEL_CLASS_CODE,
1240: LABEL_CLASS_DESCRIPTION,
1241: CREATED_BY,
1242: CREATION_DATE,

Line 1258: from GR_LABEL_CLASSES_TL B, FND_LANGUAGES L

1254: B.LAST_UPDATE_DATE,
1255: B.LAST_UPDATE_LOGIN,
1256: L.LANGUAGE_CODE,
1257: B.SOURCE_LANG
1258: from GR_LABEL_CLASSES_TL B, FND_LANGUAGES L
1259: where L.INSTALLED_FLAG in ('I', 'B')
1260: and B.LANGUAGE = userenv('LANG')
1261: and not exists
1262: (select NULL

Line 1263: from GR_LABEL_CLASSES_TL T

1259: where L.INSTALLED_FLAG in ('I', 'B')
1260: and B.LANGUAGE = userenv('LANG')
1261: and not exists
1262: (select NULL
1263: from GR_LABEL_CLASSES_TL T
1264: where T.LABEL_CLASS_CODE = B.LABEL_CLASS_CODE
1265: and T.LANGUAGE = L.LANGUAGE_CODE);
1266:
1267: end NEW_LANGUAGE;

Line 1269: END GR_LABEL_CLASSES_TL_PKG;

1265: and T.LANGUAGE = L.LANGUAGE_CODE);
1266:
1267: end NEW_LANGUAGE;
1268:
1269: END GR_LABEL_CLASSES_TL_PKG;