DBA Data[Home] [Help]

APPS.GR_PROPERTIES_TL_PKG dependencies on GR_PROPERTIES_TL

Line 1: PACKAGE BODY GR_PROPERTIES_TL_PKG AS

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

Line 76: INSERT INTO gr_properties_tl

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

Line 243: UPDATE gr_properties_tl

239:
240: IF l_return_status <> 'S' THEN
241: RAISE Foreign_Key_Error;
242: ELSE
243: UPDATE gr_properties_tl
244: SET property_id = p_property_id,
245: language = p_language,
246: source_lang = p_source_lang,
247: description = p_description,

Line 357: FROM gr_properties_tl prt

353: prt.creation_date,
354: prt.last_updated_by,
355: prt.last_update_date,
356: prt.last_update_login
357: FROM gr_properties_tl prt
358: WHERE prt.property_id = p_property_id
359: AND prt.language = l_language;
360: PropertyDesc c_get_descs%ROWTYPE;
361:

Line 382: delete from GR_PROPERTIES_TL T

378: l_msg_token := p_property_id || ' ' || p_language;
379:
380: /* Remove translations with no base row */
381:
382: delete from GR_PROPERTIES_TL T
383: where not exists
384: (select NULL
385: from GR_PROPERTIES_B B
386: where B.PROPERTY_ID = T.PROPERTY_ID

Line 391: update gr_properties_tl t set (

387: );
388:
389: /* Redefault translations from the source language */
390:
391: update gr_properties_tl t set (
392: description ) =
393: ( select
394: B.DESCRIPTION
395: from GR_PROPERTIES_TL B

Line 395: from GR_PROPERTIES_TL B

391: update gr_properties_tl t set (
392: description ) =
393: ( select
394: B.DESCRIPTION
395: from GR_PROPERTIES_TL B
396: where B.PROPERTY_ID = T.PROPERTY_ID
397: and B.LANGUAGE = T.SOURCE_LANG)
398: where (
399: T.PROPERTY_ID,

Line 404: from GR_PROPERTIES_TL SUBB, GR_PROPERTIES_TL SUBT

400: T.LANGUAGE
401: ) in (select
402: SUBT.PROPERTY_ID,
403: SUBT.LANGUAGE
404: from GR_PROPERTIES_TL SUBB, GR_PROPERTIES_TL SUBT
405: where SUBB.PROPERTY_ID = SUBT.PROPERTY_ID
406: and SUBB.LANGUAGE = SUBT.SOURCE_LANG
407: and (SUBB.DESCRIPTION <> SUBT.DESCRIPTION
408: or (SUBB.DESCRIPTION is null and SUBT.DESCRIPTION is not null)

Line 446: INSERT INTO gr_properties_tl

442: OPEN c_get_descs;
443: FETCH c_get_descs INTO PropertyDesc;
444: IF c_get_descs%NOTFOUND THEN
445: CLOSE c_get_descs;
446: INSERT INTO gr_properties_tl
447: (property_id,
448: language,
449: source_lang,
450: description,

Line 553: FROM gr_properties_tl

549:
550: CURSOR c_lock_properties_tl
551: IS
552: SELECT *
553: FROM gr_properties_tl
554: WHERE rowid = p_rowid
555: FOR UPDATE NOWAIT;
556: LockPropertyRcd c_lock_properties_tl%ROWTYPE;
557: BEGIN

Line 691: DELETE FROM gr_properties_tl

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

Line 777: DELETE FROM gr_properties_tl

773: x_oracle_error := 0;
774: x_msg_data := NULL;
775: l_msg_token := p_property_id;
776:
777: DELETE FROM gr_properties_tl
778: WHERE property_id = p_property_id;
779:
780: IF FND_API.To_Boolean(p_commit) THEN
781: COMMIT WORK;

Line 1010: FROM gr_properties_tl prt

1006:
1007: CURSOR c_get_properties_tl_rowid
1008: IS
1009: SELECT prt.rowid
1010: FROM gr_properties_tl prt
1011: WHERE prt.property_id = p_property_id
1012: AND prt.language = p_language;
1013: PropertyTLRecord c_get_properties_tl_rowid%ROWTYPE;
1014:

Line 1052: UPDATE GR_PROPERTIES_TL SET

1048: ,X_DESCRIPTION IN VARCHAR2
1049: ,X_SOURCE_LANG IN VARCHAR2
1050: ) IS
1051: BEGIN
1052: UPDATE GR_PROPERTIES_TL SET
1053: DESCRIPTION = X_DESCRIPTION,
1054: SOURCE_LANG = USERENV('LANG'),
1055: LAST_UPDATE_DATE = sysdate,
1056: LAST_UPDATED_BY = 0,

Line 1070: UPDATE GR_PROPERTIES_TL SET

1066: X_DESCRIPTION IN VARCHAR2,
1067: X_OWNER IN VARCHAR2
1068: ) IS
1069: BEGIN
1070: UPDATE GR_PROPERTIES_TL SET
1071: DESCRIPTION = X_DESCRIPTION,
1072: LAST_UPDATE_DATE = sysdate,
1073: LAST_UPDATED_BY = Decode(X_OWNER, 'SEED', 1, 0),
1074: LAST_UPDATE_LOGIN = 0,

Line 1089: FROM GR_PROPERTIES_TL

1085: ,X_SOURCE_LANG IN VARCHAR2
1086: ) IS
1087: CURSOR Cur_rowid IS
1088: SELECT rowid
1089: FROM GR_PROPERTIES_TL
1090: WHERE (PROPERTY_ID = X_PROPERTY_ID)
1091: AND (LANGUAGE = X_LANGUAGE);
1092: l_user_id NUMBER DEFAULT 1;
1093: l_row_id VARCHAR2(64);

Line 1101: GR_PROPERTIES_TL_PKG.UPDATE_ROW(

1097: BEGIN
1098: OPEN Cur_rowid;
1099: FETCH Cur_rowid INTO l_row_id;
1100: IF Cur_rowid%FOUND THEN
1101: GR_PROPERTIES_TL_PKG.UPDATE_ROW(
1102: P_COMMIT => 'T'
1103: ,P_CALLED_BY_FORM => 'F'
1104: ,P_ROWID => l_row_id
1105: ,P_PROPERTY_ID => X_PROPERTY_ID

Line 1118: GR_PROPERTIES_TL_PKG.INSERT_ROW(

1114: ,X_RETURN_STATUS => l_return_status
1115: ,X_ORACLE_ERROR => l_oracle_error
1116: ,X_MSG_DATA => l_msg_data);
1117: ELSE
1118: GR_PROPERTIES_TL_PKG.INSERT_ROW(
1119: P_COMMIT => 'T'
1120: ,P_CALLED_BY_FORM => 'F'
1121: ,P_PROPERTY_ID => X_PROPERTY_ID
1122: ,P_LANGUAGE => X_LANGUAGE

Line 1146: FROM GR_PROPERTIES_TL

1142: ,X_OWNER IN VARCHAR2
1143: ) IS
1144: CURSOR Cur_rowid IS
1145: SELECT rowid
1146: FROM GR_PROPERTIES_TL
1147: WHERE (PROPERTY_ID = X_PROPERTY_ID)
1148: AND USERENV('LANG') in (LANGUAGE,SOURCE_LANG);
1149:
1150: l_user_id NUMBER DEFAULT 0;

Line 1166: UPDATE GR_PROPERTIES_TL SET

1162:
1163: OPEN Cur_rowid;
1164: FETCH Cur_rowid INTO l_row_id;
1165: IF Cur_rowid%FOUND THEN
1166: UPDATE GR_PROPERTIES_TL SET
1167: DESCRIPTION = X_DESCRIPTION,
1168: LAST_UPDATE_DATE = l_sysdate,
1169: LAST_UPDATED_BY = l_user_id,
1170: LAST_UPDATE_LOGIN = 0,

Line 1176: insert into GR_PROPERTIES_TL (

1172: WHERE PROPERTY_ID = X_PROPERTY_ID
1173: AND userenv('LANG') in (LANGUAGE,SOURCE_LANG);
1174:
1175: ELSE
1176: insert into GR_PROPERTIES_TL (
1177: PROPERTY_ID,
1178: DESCRIPTION,
1179: CREATED_BY,
1180: CREATION_DATE,

Line 1200: from GR_PROPERTIES_TL T

1196: from FND_LANGUAGES L
1197: where L.INSTALLED_FLAG in ('I', 'B')
1198: and not exists
1199: (select NULL
1200: from GR_PROPERTIES_TL T
1201: where T.PROPERTY_ID = X_PROPERTY_ID
1202: and T.LANGUAGE = L.LANGUAGE_CODE);
1203: END IF;
1204: CLOSE Cur_rowid;

Line 1215: delete from GR_PROPERTIES_TL T

1211: */
1212: procedure NEW_LANGUAGE
1213: is
1214: begin
1215: delete from GR_PROPERTIES_TL T
1216: where not exists
1217: (select NULL
1218: from GR_PROPERTIES_B B
1219: where B.PROPERTY_ID = T.PROPERTY_ID

Line 1222: update GR_PROPERTIES_TL T set (

1218: from GR_PROPERTIES_B B
1219: where B.PROPERTY_ID = T.PROPERTY_ID
1220: );
1221:
1222: update GR_PROPERTIES_TL T set (
1223: DESCRIPTION
1224: ) = (select
1225: B.DESCRIPTION
1226: from GR_PROPERTIES_TL B

Line 1226: from GR_PROPERTIES_TL B

1222: update GR_PROPERTIES_TL T set (
1223: DESCRIPTION
1224: ) = (select
1225: B.DESCRIPTION
1226: from GR_PROPERTIES_TL B
1227: where B.PROPERTY_ID = T.PROPERTY_ID
1228: and B.LANGUAGE = T.SOURCE_LANG)
1229: where (
1230: T.PROPERTY_ID,

Line 1235: from GR_PROPERTIES_TL SUBB, GR_PROPERTIES_TL SUBT

1231: T.LANGUAGE
1232: ) in (select
1233: SUBT.PROPERTY_ID,
1234: SUBT.LANGUAGE
1235: from GR_PROPERTIES_TL SUBB, GR_PROPERTIES_TL SUBT
1236: where SUBB.PROPERTY_ID = SUBT.PROPERTY_ID
1237: and SUBB.LANGUAGE = SUBT.SOURCE_LANG
1238: and (SUBB.DESCRIPTION <> SUBT.DESCRIPTION
1239: ));

Line 1241: insert into GR_PROPERTIES_TL (

1237: and SUBB.LANGUAGE = SUBT.SOURCE_LANG
1238: and (SUBB.DESCRIPTION <> SUBT.DESCRIPTION
1239: ));
1240:
1241: insert into GR_PROPERTIES_TL (
1242: PROPERTY_ID,
1243: DESCRIPTION,
1244: CREATED_BY,
1245: CREATION_DATE,

Line 1261: from GR_PROPERTIES_TL B, FND_LANGUAGES L

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

Line 1266: from GR_PROPERTIES_TL T

1262: where L.INSTALLED_FLAG in ('I', 'B')
1263: and B.LANGUAGE = userenv('LANG')
1264: and not exists
1265: (select NULL
1266: from GR_PROPERTIES_TL T
1267: where T.PROPERTY_ID = B.PROPERTY_ID
1268: and T.LANGUAGE = L.LANGUAGE_CODE);
1269:
1270: end NEW_LANGUAGE;

Line 1273: END GR_PROPERTIES_TL_PKG;

1269:
1270: end NEW_LANGUAGE;
1271:
1272:
1273: END GR_PROPERTIES_TL_PKG;