33:
34: IF NOT FND_API.compatible_api_call(l_api_version, p_api_version,
35: l_api_name, g_pkg_name)
36: THEN
37: IF( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
38: FND_LOG.string(FND_LOG.LEVEL_PROCEDURE, g_module_prefix || l_api_name ||
39: '.invoked', 'Api version Incompatible');
40: END IF;
41: g_transaction_id := null;
34: IF NOT FND_API.compatible_api_call(l_api_version, p_api_version,
35: l_api_name, g_pkg_name)
36: THEN
37: IF( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
38: FND_LOG.string(FND_LOG.LEVEL_PROCEDURE, g_module_prefix || l_api_name ||
39: '.invoked', 'Api version Incompatible');
40: END IF;
41: g_transaction_id := null;
42: g_project_number := null;
44: END IF;
45: -- End standard API initialization
46:
47: IF (g_fnd_debug = 'Y') THEN
48: IF( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
49: FND_LOG.string(FND_LOG.LEVEL_PROCEDURE, g_module_prefix || l_api_name ||
50: '.invoked', 'Transaction Id: ' || NVL(TO_CHAR(p_transaction_id),'null'));
51: END IF;
52: END IF;
45: -- End standard API initialization
46:
47: IF (g_fnd_debug = 'Y') THEN
48: IF( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
49: FND_LOG.string(FND_LOG.LEVEL_PROCEDURE, g_module_prefix || l_api_name ||
50: '.invoked', 'Transaction Id: ' || NVL(TO_CHAR(p_transaction_id),'null'));
51: END IF;
52: END IF;
53:
69:
70: EXCEPTION
71: WHEN NO_DATA_FOUND THEN
72: IF (g_fnd_debug = 'Y') THEN
73: IF( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
74: FND_LOG.string(FND_LOG.LEVEL_PROCEDURE, g_module_prefix || l_api_name ||
75: '.invoked', 'Invalid Transaction Id.');
76: END IF;
77: END IF;
70: EXCEPTION
71: WHEN NO_DATA_FOUND THEN
72: IF (g_fnd_debug = 'Y') THEN
73: IF( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
74: FND_LOG.string(FND_LOG.LEVEL_PROCEDURE, g_module_prefix || l_api_name ||
75: '.invoked', 'Invalid Transaction Id.');
76: END IF;
77: END IF;
78: g_project_number := null;
84: IF l_distribution_id IS NOT NULL THEN
85: BEGIN
86: BEGIN
87: IF (g_fnd_debug = 'Y') THEN
88: IF( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
89: FND_LOG.string(FND_LOG.LEVEL_PROCEDURE, g_module_prefix || l_api_name ||
90: '.invoked', 'Distribution Id:' || l_distribution_id);
91: END IF;
92: END IF;
85: BEGIN
86: BEGIN
87: IF (g_fnd_debug = 'Y') THEN
88: IF( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
89: FND_LOG.string(FND_LOG.LEVEL_PROCEDURE, g_module_prefix || l_api_name ||
90: '.invoked', 'Distribution Id:' || l_distribution_id);
91: END IF;
92: END IF;
93:
126: ELSIF l_line_location_id IS NOT NULL THEN
127: BEGIN
128: BEGIN
129: IF (g_fnd_debug = 'Y') THEN
130: IF( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
131: FND_LOG.string(FND_LOG.LEVEL_PROCEDURE, g_module_prefix || l_api_name ||
132: '.invoked', 'Line Location Id:' || l_line_location_id);
133: END IF;
134: END IF;
127: BEGIN
128: BEGIN
129: IF (g_fnd_debug = 'Y') THEN
130: IF( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
131: FND_LOG.string(FND_LOG.LEVEL_PROCEDURE, g_module_prefix || l_api_name ||
132: '.invoked', 'Line Location Id:' || l_line_location_id);
133: END IF;
134: END IF;
135:
179: g_transaction_id := p_transaction_id;
180: END IF;
181: ELSE
182: IF (g_fnd_debug = 'Y') THEN
183: IF( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
184: FND_LOG.string(FND_LOG.LEVEL_PROCEDURE, g_module_prefix || l_api_name ||
185: '.invoked', 'ERROR : transaction_id is NULL');
186: END IF;
187: END IF;
180: END IF;
181: ELSE
182: IF (g_fnd_debug = 'Y') THEN
183: IF( FND_LOG.LEVEL_PROCEDURE >= FND_LOG.G_CURRENT_RUNTIME_LEVEL ) THEN
184: FND_LOG.string(FND_LOG.LEVEL_PROCEDURE, g_module_prefix || l_api_name ||
185: '.invoked', 'ERROR : transaction_id is NULL');
186: END IF;
187: END IF;
188: g_project_number := null;