DBA Data[Home] [Help]

APPS.AK_DELETE_GRP dependencies on FND_API

Line 7: p_primary_key IN VARCHAR2 := FND_API.G_MISS_CHAR,

3:
4: procedure DELETE (
5: p_business_object IN VARCHAR2,
6: p_appl_short_name IN VARCHAR2,
7: p_primary_key IN VARCHAR2 := FND_API.G_MISS_CHAR,
8: p_return_status OUT NOCOPY VARCHAR2,
9: p_delete_cascade IN VARCHAR2 := 'Y'
10: ) is
11: cursor l_get_appl_id_csr (short_name_param varchar2) is

Line 29: l_object_pk varchar2(30) := FND_API.G_MISS_CHAR;

25: l_return_status VARCHAR2(1);
26: l_string_pos number;
27: l_table_index number;
28: l_dum NUMBER;
29: l_object_pk varchar2(30) := FND_API.G_MISS_CHAR;
30: l_flow_pk_tbl AK_FLOW_PUB.Flow_PK_Tbl_Type;
31: l_region_pk_tbl AK_REGION_PUB.Region_PK_Tbl_Type;
32: l_custom_pk_tbl AK_CUSTOM_PUB.Custom_PK_Tbl_Type;
33: l_object_pk_tbl AK_OBJECT_PUB.Object_PK_Tbl_Type;

Line 51: if (p_primary_key is not null and p_primary_key <> FND_API.G_MISS_CHAR) then

47:
48: --
49: -- Get Primary key for the object
50: --
51: if (p_primary_key is not null and p_primary_key <> FND_API.G_MISS_CHAR) then
52: l_object_pk := p_primary_key;
53: else
54: if FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
55: FND_MESSAGE.SET_NAME('AK','AK_PRIMARY_KEY_INVALID');

Line 78: raise FND_API.G_EXC_ERROR;

74: FND_MESSAGE.SET_TOKEN('APPL_SHORT_NAME', l_appl_short_name);
75: FND_MSG_PUB.Add;
76: end if;
77: close l_get_appl_id_csr;
78: raise FND_API.G_EXC_ERROR;
79: end if;
80: close l_get_appl_id_csr;
81:
82: -- set Loading mode

Line 137: -- p_validation_level => FND_API.G_VALID_LEVEL_NONE,

133: -- Download data from database
134: --
135: if (upper(l_by_object) = 'REGION') then
136: AK_REGION_GRP.DELETE_REGION (
137: -- p_validation_level => FND_API.G_VALID_LEVEL_NONE,
138: p_api_version_number => 1.0,
139: p_init_msg_tbl => TRUE,
140: p_msg_count => l_msg_count,
141: p_msg_data => l_msg_data,

Line 167: l_buffer_tbl(i + l_index) := FND_MSG_PUB.GET(p_encoded=>FND_API.G_FALSE);

163: if FND_MSG_PUB.Count_Msg > 0 then
164: FND_MSG_PUB.Reset;
165: --dbms_output.put_line('Messages: ');
166: for i in 1 .. FND_MSG_PUB.Count_Msg loop
167: l_buffer_tbl(i + l_index) := FND_MSG_PUB.GET(p_encoded=>FND_API.G_FALSE);
168: end loop;
169: FND_MSG_PUB.Initialize;
170: end if;
171:

Line 181: if (p_primary_key is not null and p_primary_key <> FND_API.G_MISS_CHAR) then

177: l_index := l_index + 1;
178: l_buffer_tbl(l_index) := to_char(sysdate, 'DY MON DD YYYY HH24:MI:SS');
179: l_index := l_index + 1;
180: l_buffer_tbl(l_index) := 'Finished processing application: '||l_appl_short_name;
181: if (p_primary_key is not null and p_primary_key <> FND_API.G_MISS_CHAR) then
182: l_index := l_index + 1;
183: l_buffer_tbl(l_index) := 'Primary key: '||p_primary_key;
184: end if;
185: l_index := l_index + 1;

Line 199: --if (l_return_status = FND_API.G_RET_STS_SUCCESS) then

195: p_buffer_tbl => l_buffer_tbl,
196: p_write_mode => AK_ON_OBJECTS_PUB.G_APPEND
197: );
198:
199: --if (l_return_status = FND_API.G_RET_STS_SUCCESS) then
200: -- dbms_output.put_line('Log file has been printed out to screen');
201: --else
202: -- dbms_output.put_line('Failed to write log file to Global PL/SQL table');
203: --end if;

Line 206: WHEN FND_API.G_EXC_ERROR THEN

202: -- dbms_output.put_line('Failed to write log file to Global PL/SQL table');
203: --end if;
204:
205: EXCEPTION
206: WHEN FND_API.G_EXC_ERROR THEN
207: p_return_status := FND_API.G_RET_STS_ERROR;
208: WHEN NO_DATA_FOUND THEN
209: p_return_status := FND_API.G_RET_STS_ERROR;
210: WHEN OTHERS THEN

Line 207: p_return_status := FND_API.G_RET_STS_ERROR;

203: --end if;
204:
205: EXCEPTION
206: WHEN FND_API.G_EXC_ERROR THEN
207: p_return_status := FND_API.G_RET_STS_ERROR;
208: WHEN NO_DATA_FOUND THEN
209: p_return_status := FND_API.G_RET_STS_ERROR;
210: WHEN OTHERS THEN
211: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 209: p_return_status := FND_API.G_RET_STS_ERROR;

205: EXCEPTION
206: WHEN FND_API.G_EXC_ERROR THEN
207: p_return_status := FND_API.G_RET_STS_ERROR;
208: WHEN NO_DATA_FOUND THEN
209: p_return_status := FND_API.G_RET_STS_ERROR;
210: WHEN OTHERS THEN
211: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
212: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name,
213: SUBSTR (SQLERRM, 1, 240) );

Line 211: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

207: p_return_status := FND_API.G_RET_STS_ERROR;
208: WHEN NO_DATA_FOUND THEN
209: p_return_status := FND_API.G_RET_STS_ERROR;
210: WHEN OTHERS THEN
211: p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
212: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME, l_api_name,
213: SUBSTR (SQLERRM, 1, 240) );
214:
215: end DELETE;