39: l_loop_count NUMBER;
40:
41: -- variables and structs used for api call
42: l_api_version NUMBER := 1.0;
43: l_init_msg_list VARCHAR2(1) := FND_API.G_FALSE;
44: l_commit VARCHAR2(1) := FND_API.G_FALSE;
45: l_validation_level NUMBER := FND_API.G_VALID_LEVEL_FULL;
46: l_return_status VARCHAR2(1);
47: l_msg_count number;
40:
41: -- variables and structs used for api call
42: l_api_version NUMBER := 1.0;
43: l_init_msg_list VARCHAR2(1) := FND_API.G_FALSE;
44: l_commit VARCHAR2(1) := FND_API.G_FALSE;
45: l_validation_level NUMBER := FND_API.G_VALID_LEVEL_FULL;
46: l_return_status VARCHAR2(1);
47: l_msg_count number;
48: l_msg_data VARCHAR2(4000);
41: -- variables and structs used for api call
42: l_api_version NUMBER := 1.0;
43: l_init_msg_list VARCHAR2(1) := FND_API.G_FALSE;
44: l_commit VARCHAR2(1) := FND_API.G_FALSE;
45: l_validation_level NUMBER := FND_API.G_VALID_LEVEL_FULL;
46: l_return_status VARCHAR2(1);
47: l_msg_count number;
48: l_msg_data VARCHAR2(4000);
49:
246: );
247:
248: END IF; -- l_Retirement_Status =...
249:
250: IF (l_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
251: raise ret_err;
252: END IF;
253:
254: X_success_count := X_success_count + 1;