1: PACKAGE BODY ZX_SIM_CONDITIONS1_PKG AS
2: /* $Header: zxrisimcondspkgb.pls 120.0 2004/06/16 17:44:33 opedrega ship $ */
3:
4: g_current_runtime_level NUMBER;
5: g_level_statement CONSTANT NUMBER := FND_LOG.LEVEL_STATEMENT;
6: g_level_procedure CONSTANT NUMBER := FND_LOG.LEVEL_PROCEDURE;
7: g_level_event CONSTANT NUMBER := FND_LOG.LEVEL_EVENT;
8: g_level_unexpected CONSTANT NUMBER := FND_LOG.LEVEL_UNEXPECTED;
9:
2: /* $Header: zxrisimcondspkgb.pls 120.0 2004/06/16 17:44:33 opedrega ship $ */
3:
4: g_current_runtime_level NUMBER;
5: g_level_statement CONSTANT NUMBER := FND_LOG.LEVEL_STATEMENT;
6: g_level_procedure CONSTANT NUMBER := FND_LOG.LEVEL_PROCEDURE;
7: g_level_event CONSTANT NUMBER := FND_LOG.LEVEL_EVENT;
8: g_level_unexpected CONSTANT NUMBER := FND_LOG.LEVEL_UNEXPECTED;
9:
10: PROCEDURE Insert_Row
3:
4: g_current_runtime_level NUMBER;
5: g_level_statement CONSTANT NUMBER := FND_LOG.LEVEL_STATEMENT;
6: g_level_procedure CONSTANT NUMBER := FND_LOG.LEVEL_PROCEDURE;
7: g_level_event CONSTANT NUMBER := FND_LOG.LEVEL_EVENT;
8: g_level_unexpected CONSTANT NUMBER := FND_LOG.LEVEL_UNEXPECTED;
9:
10: PROCEDURE Insert_Row
11: (p_sim_condition_id NUMBER,
4: g_current_runtime_level NUMBER;
5: g_level_statement CONSTANT NUMBER := FND_LOG.LEVEL_STATEMENT;
6: g_level_procedure CONSTANT NUMBER := FND_LOG.LEVEL_PROCEDURE;
7: g_level_event CONSTANT NUMBER := FND_LOG.LEVEL_EVENT;
8: g_level_unexpected CONSTANT NUMBER := FND_LOG.LEVEL_UNEXPECTED;
9:
10: PROCEDURE Insert_Row
11: (p_sim_condition_id NUMBER,
12: p_trx_id NUMBER,
42: l_msg_count NUMBER;
43: l_msg_data VARCHAR2(1000);
44:
45: BEGIN
46: g_current_runtime_level := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
47:
48: IF (g_level_procedure >= g_current_runtime_level ) THEN
49: FND_LOG.STRING(g_level_procedure,
50: 'ZX.PLSQL.ZX_SIM_RULES_PKG.Insert_Row.BEGIN',
45: BEGIN
46: g_current_runtime_level := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
47:
48: IF (g_level_procedure >= g_current_runtime_level ) THEN
49: FND_LOG.STRING(g_level_procedure,
50: 'ZX.PLSQL.ZX_SIM_RULES_PKG.Insert_Row.BEGIN',
51: 'ZX_SIM_RULES_PKG: Insert_Row (+)');
52: END IF;
53:
110: p_last_update_date,
111: p_last_update_login);
112:
113: IF (g_level_procedure >= g_current_runtime_level ) THEN
114: FND_LOG.STRING(g_level_procedure,
115: 'ZX.PLSQL.ZX_SIM_RULES_PKG.Insert_Row.BEGIN',
116: 'ZX_SIM_RULES_PKG: Insert_Row (-)');
117: END IF;
118: END Insert_Row;
152: l_msg_count NUMBER;
153: l_msg_data VARCHAR2(1000);
154:
155: BEGIN
156: g_current_runtime_level := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
157:
158: IF (g_level_procedure >= g_current_runtime_level ) THEN
159: FND_LOG.STRING(g_level_procedure,
160: 'ZX.PLSQL.ZX_SIM_RULES_PKG.Update_Row.BEGIN',
155: BEGIN
156: g_current_runtime_level := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
157:
158: IF (g_level_procedure >= g_current_runtime_level ) THEN
159: FND_LOG.STRING(g_level_procedure,
160: 'ZX.PLSQL.ZX_SIM_RULES_PKG.Update_Row.BEGIN',
161: 'ZX_SIM_RULES_PKG: Update_Row (+)');
162: END IF;
163:
195: AND TRX_ID = p_trx_id
196: AND TRX_LINE_ID = p_trx_line_id;
197:
198: IF (g_level_procedure >= g_current_runtime_level ) THEN
199: FND_LOG.STRING(g_level_procedure,
200: 'ZX.PLSQL.ZX_SIM_RULES_PKG.Update_Row.BEGIN',
201: 'ZX_SIM_RULES_PKG: Update_Row (-)');
202: END IF;
203: END Update_Row;
237: l_msg_count NUMBER;
238: l_msg_data VARCHAR2(1000);
239:
240: BEGIN
241: g_current_runtime_level := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
242:
243: IF (g_level_procedure >= g_current_runtime_level ) THEN
244: FND_LOG.STRING(g_level_procedure,
245: 'ZX.PLSQL.ZX_SIM_RULES_PKG.Insert_Row.BEGIN',
240: BEGIN
241: g_current_runtime_level := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
242:
243: IF (g_level_procedure >= g_current_runtime_level ) THEN
244: FND_LOG.STRING(g_level_procedure,
245: 'ZX.PLSQL.ZX_SIM_RULES_PKG.Insert_Row.BEGIN',
246: 'ZX_SIM_RULES_PKG: Delete_Row (+)');
247: END IF;
248:
246: 'ZX_SIM_RULES_PKG: Delete_Row (+)');
247: END IF;
248:
249: IF (g_level_procedure >= g_current_runtime_level ) THEN
250: FND_LOG.STRING(g_level_procedure,
251: 'ZX.PLSQL.ZX_SIM_RULES_PKG.Insert_Row.BEGIN',
252: 'ZX_SIM_RULES_PKG: Delete_Row (-)');
253: END IF;
254: END Delete_Row;
325:
326: Recinfo sim_conditions_csr%ROWTYPE;
327:
328: BEGIN
329: g_current_runtime_level := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
330:
331: IF (g_level_procedure >= g_current_runtime_level ) THEN
332: FND_LOG.STRING(g_level_procedure,
333: 'ZX.PLSQL.ZX_SIM_RULES_PKG.Insert_Row.BEGIN',
328: BEGIN
329: g_current_runtime_level := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
330:
331: IF (g_level_procedure >= g_current_runtime_level ) THEN
332: FND_LOG.STRING(g_level_procedure,
333: 'ZX.PLSQL.ZX_SIM_RULES_PKG.Insert_Row.BEGIN',
334: 'ZX_SIM_RULES_PKG: Lock_Row (+)');
335: END IF;
336:
413: APP_EXCEPTION.Raise_Exception;
414: END IF;
415:
416: IF (g_level_procedure >= g_current_runtime_level ) THEN
417: FND_LOG.STRING(g_level_procedure,
418: 'ZX.PLSQL.ZX_SIM_RULES_PKG.Insert_Row.BEGIN',
419: 'ZX_SIM_RULES_PKG: Lock_Row (-)');
420: END IF;
421: END Lock_Row;