eTRM uses javascript that opens and focuses a separate window to display reports. Your browser does not appear to support javascript. This should not prevent you from using eTRM but it does mean the window focus feature will not work. Please check the contents of other windows on your desktop if you click on a link that does not appear to do anything.

APPS.AHL_VWP_PLAN_TASKS_PVT dependencies on FND_API

Line 69: p_init_msg_list IN VARCHAR2 := Fnd_Api.g_false,

65: -- To Validate_Visit_Task
66: /*
67: PROCEDURE Validate_Visit_Task (
68: p_api_version IN NUMBER,
69: p_init_msg_list IN VARCHAR2 := Fnd_Api.g_false,
70: p_commit IN VARCHAR2 := Fnd_Api.g_false,
71: p_validation_level IN NUMBER := Fnd_Api.g_valid_level_full,
72: p_Task_rec IN AHL_VWP_RULES_PVT.task_rec_type,
73: x_return_status OUT NOCOPY VARCHAR2,

Line 70: p_commit IN VARCHAR2 := Fnd_Api.g_false,

66: /*
67: PROCEDURE Validate_Visit_Task (
68: p_api_version IN NUMBER,
69: p_init_msg_list IN VARCHAR2 := Fnd_Api.g_false,
70: p_commit IN VARCHAR2 := Fnd_Api.g_false,
71: p_validation_level IN NUMBER := Fnd_Api.g_valid_level_full,
72: p_Task_rec IN AHL_VWP_RULES_PVT.task_rec_type,
73: x_return_status OUT NOCOPY VARCHAR2,
74: x_msg_count OUT NOCOPY NUMBER,

Line 71: p_validation_level IN NUMBER := Fnd_Api.g_valid_level_full,

67: PROCEDURE Validate_Visit_Task (
68: p_api_version IN NUMBER,
69: p_init_msg_list IN VARCHAR2 := Fnd_Api.g_false,
70: p_commit IN VARCHAR2 := Fnd_Api.g_false,
71: p_validation_level IN NUMBER := Fnd_Api.g_valid_level_full,
72: p_Task_rec IN AHL_VWP_RULES_PVT.task_rec_type,
73: x_return_status OUT NOCOPY VARCHAR2,
74: x_msg_count OUT NOCOPY NUMBER,
75: x_msg_data OUT NOCOPY VARCHAR2

Line 109: IF p_x_task_rec.DURATION = Fnd_Api.G_MISS_NUM THEN

105: PROCEDURE Default_Missing_Attribs
106: ( p_x_task_rec IN OUT NOCOPY AHL_VWP_RULES_PVT.Task_Rec_Type)
107: AS
108: BEGIN
109: IF p_x_task_rec.DURATION = Fnd_Api.G_MISS_NUM THEN
110: p_x_task_rec.DURATION := NULL;
111: ELSE
112: p_x_task_rec.DURATION := p_x_task_rec.DURATION;
113: END IF;

Line 115: IF p_x_task_rec.PROJECT_TASK_ID = Fnd_Api.G_MISS_NUM THEN

111: ELSE
112: p_x_task_rec.DURATION := p_x_task_rec.DURATION;
113: END IF;
114:
115: IF p_x_task_rec.PROJECT_TASK_ID = Fnd_Api.G_MISS_NUM THEN
116: p_x_task_rec.PROJECT_TASK_ID := NULL;
117: ELSE
118: p_x_task_rec.PROJECT_TASK_ID := p_x_task_rec.PROJECT_TASK_ID;
119: END IF;

Line 121: IF p_x_task_rec.COST_PARENT_ID = Fnd_Api.G_MISS_NUM THEN

117: ELSE
118: p_x_task_rec.PROJECT_TASK_ID := p_x_task_rec.PROJECT_TASK_ID;
119: END IF;
120:
121: IF p_x_task_rec.COST_PARENT_ID = Fnd_Api.G_MISS_NUM THEN
122: p_x_task_rec.COST_PARENT_ID := NULL;
123: ELSE
124: p_x_task_rec.COST_PARENT_ID := p_x_task_rec.COST_PARENT_ID;
125: END IF;

Line 127: IF p_x_task_rec.MR_ROUTE_ID = Fnd_Api.G_MISS_NUM THEN

123: ELSE
124: p_x_task_rec.COST_PARENT_ID := p_x_task_rec.COST_PARENT_ID;
125: END IF;
126:
127: IF p_x_task_rec.MR_ROUTE_ID = Fnd_Api.G_MISS_NUM THEN
128: p_x_task_rec.MR_ROUTE_ID := NULL;
129: ELSE
130: p_x_task_rec.MR_ROUTE_ID := p_x_task_rec.MR_ROUTE_ID;
131: END IF;

Line 133: IF p_x_task_rec.MR_ID = Fnd_Api.G_MISS_NUM THEN

129: ELSE
130: p_x_task_rec.MR_ROUTE_ID := p_x_task_rec.MR_ROUTE_ID;
131: END IF;
132:
133: IF p_x_task_rec.MR_ID = Fnd_Api.G_MISS_NUM THEN
134: p_x_task_rec.MR_ID := NULL;
135: ELSE
136: p_x_task_rec.MR_ID := p_x_task_rec.MR_ID;
137: END IF;

Line 139: IF p_x_task_rec.UNIT_EFFECTIVITY_ID = Fnd_Api.G_MISS_NUM THEN

135: ELSE
136: p_x_task_rec.MR_ID := p_x_task_rec.MR_ID;
137: END IF;
138:
139: IF p_x_task_rec.UNIT_EFFECTIVITY_ID = Fnd_Api.G_MISS_NUM THEN
140: p_x_task_rec.UNIT_EFFECTIVITY_ID := NULL;
141: ELSE
142: p_x_task_rec.UNIT_EFFECTIVITY_ID := p_x_task_rec.UNIT_EFFECTIVITY_ID;
143: END IF;

Line 145: IF p_x_task_rec.START_FROM_HOUR = Fnd_Api.G_MISS_NUM THEN

141: ELSE
142: p_x_task_rec.UNIT_EFFECTIVITY_ID := p_x_task_rec.UNIT_EFFECTIVITY_ID;
143: END IF;
144:
145: IF p_x_task_rec.START_FROM_HOUR = Fnd_Api.G_MISS_NUM THEN
146: p_x_task_rec.START_FROM_HOUR := NULL;
147: ELSE
148: p_x_task_rec.START_FROM_HOUR := p_x_task_rec.START_FROM_HOUR;
149: END IF;

Line 151: IF p_x_task_rec.PRIMARY_VISIT_TASK_ID = Fnd_Api.G_MISS_NUM THEN

147: ELSE
148: p_x_task_rec.START_FROM_HOUR := p_x_task_rec.START_FROM_HOUR;
149: END IF;
150:
151: IF p_x_task_rec.PRIMARY_VISIT_TASK_ID = Fnd_Api.G_MISS_NUM THEN
152: p_x_task_rec.PRIMARY_VISIT_TASK_ID := NULL;
153: ELSE
154: p_x_task_rec.PRIMARY_VISIT_TASK_ID := p_x_task_rec.PRIMARY_VISIT_TASK_ID;
155: END IF;

Line 157: IF p_x_task_rec.ORIGINATING_TASK_ID = Fnd_Api.G_MISS_NUM THEN

153: ELSE
154: p_x_task_rec.PRIMARY_VISIT_TASK_ID := p_x_task_rec.PRIMARY_VISIT_TASK_ID;
155: END IF;
156:
157: IF p_x_task_rec.ORIGINATING_TASK_ID = Fnd_Api.G_MISS_NUM THEN
158: p_x_task_rec.ORIGINATING_TASK_ID := NULL;
159: ELSE
160: p_x_task_rec.ORIGINATING_TASK_ID := p_x_task_rec.ORIGINATING_TASK_ID;
161: END IF;

Line 163: IF p_x_task_rec.SERVICE_REQUEST_ID = Fnd_Api.G_MISS_NUM THEN

159: ELSE
160: p_x_task_rec.ORIGINATING_TASK_ID := p_x_task_rec.ORIGINATING_TASK_ID;
161: END IF;
162:
163: IF p_x_task_rec.SERVICE_REQUEST_ID = Fnd_Api.G_MISS_NUM THEN
164: p_x_task_rec.SERVICE_REQUEST_ID := NULL;
165: ELSE
166: p_x_task_rec.SERVICE_REQUEST_ID := p_x_task_rec.SERVICE_REQUEST_ID;
167: END IF;

Line 169: IF p_x_task_rec.attribute_category = Fnd_Api.G_MISS_CHAR THEN

165: ELSE
166: p_x_task_rec.SERVICE_REQUEST_ID := p_x_task_rec.SERVICE_REQUEST_ID;
167: END IF;
168:
169: IF p_x_task_rec.attribute_category = Fnd_Api.G_MISS_CHAR THEN
170: p_x_task_rec.attribute_category := NULL;
171: ELSE
172: p_x_task_rec.attribute_category := p_x_task_rec.attribute_category;
173: END IF;

Line 175: IF p_x_task_rec.attribute1 = Fnd_Api.G_MISS_CHAR THEN

171: ELSE
172: p_x_task_rec.attribute_category := p_x_task_rec.attribute_category;
173: END IF;
174: --
175: IF p_x_task_rec.attribute1 = Fnd_Api.G_MISS_CHAR THEN
176: p_x_task_rec.attribute1 := NULL;
177: ELSE
178: p_x_task_rec.attribute1 := p_x_task_rec.attribute1;
179: END IF;

Line 181: IF p_x_task_rec.attribute2 = Fnd_Api.G_MISS_CHAR THEN

177: ELSE
178: p_x_task_rec.attribute1 := p_x_task_rec.attribute1;
179: END IF;
180: --
181: IF p_x_task_rec.attribute2 = Fnd_Api.G_MISS_CHAR THEN
182: p_x_task_rec.attribute2 := NULL;
183: ELSE
184: p_x_task_rec.attribute2 := p_x_task_rec.attribute2;
185: END IF;

Line 187: IF p_x_task_rec.attribute3 = Fnd_Api.G_MISS_CHAR THEN

183: ELSE
184: p_x_task_rec.attribute2 := p_x_task_rec.attribute2;
185: END IF;
186: --
187: IF p_x_task_rec.attribute3 = Fnd_Api.G_MISS_CHAR THEN
188: p_x_task_rec.attribute3 := NULL;
189: ELSE
190: p_x_task_rec.attribute3 := p_x_task_rec.attribute3;
191: END IF;

Line 193: IF p_x_task_rec.attribute4 = Fnd_Api.G_MISS_CHAR THEN

189: ELSE
190: p_x_task_rec.attribute3 := p_x_task_rec.attribute3;
191: END IF;
192: --
193: IF p_x_task_rec.attribute4 = Fnd_Api.G_MISS_CHAR THEN
194: p_x_task_rec.attribute4 := NULL;
195: ELSE
196: p_x_task_rec.attribute4 := p_x_task_rec.attribute4;
197: END IF;

Line 199: IF p_x_task_rec.attribute5 = Fnd_Api.G_MISS_CHAR THEN

195: ELSE
196: p_x_task_rec.attribute4 := p_x_task_rec.attribute4;
197: END IF;
198: --
199: IF p_x_task_rec.attribute5 = Fnd_Api.G_MISS_CHAR THEN
200: p_x_task_rec.attribute5 := NULL;
201: ELSE
202: p_x_task_rec.attribute5 := p_x_task_rec.attribute5;
203: END IF;

Line 205: IF p_x_task_rec.attribute6 = Fnd_Api.G_MISS_CHAR THEN

201: ELSE
202: p_x_task_rec.attribute5 := p_x_task_rec.attribute5;
203: END IF;
204: --
205: IF p_x_task_rec.attribute6 = Fnd_Api.G_MISS_CHAR THEN
206: p_x_task_rec.attribute6 := NULL;
207: ELSE
208: p_x_task_rec.attribute6 := p_x_task_rec.attribute6;
209: END IF;

Line 211: IF p_x_task_rec.attribute7 = Fnd_Api.G_MISS_CHAR THEN

207: ELSE
208: p_x_task_rec.attribute6 := p_x_task_rec.attribute6;
209: END IF;
210: --
211: IF p_x_task_rec.attribute7 = Fnd_Api.G_MISS_CHAR THEN
212: p_x_task_rec.attribute7 := NULL;
213: ELSE
214: p_x_task_rec.attribute7 := p_x_task_rec.attribute7;
215: END IF;

Line 217: IF p_x_task_rec.attribute8 = Fnd_Api.G_MISS_CHAR THEN

213: ELSE
214: p_x_task_rec.attribute7 := p_x_task_rec.attribute7;
215: END IF;
216: --
217: IF p_x_task_rec.attribute8 = Fnd_Api.G_MISS_CHAR THEN
218: p_x_task_rec.attribute8 := NULL;
219: ELSE
220: p_x_task_rec.attribute8 := p_x_task_rec.attribute8;
221: END IF;

Line 223: IF p_x_task_rec.attribute9 = Fnd_Api.G_MISS_CHAR THEN

219: ELSE
220: p_x_task_rec.attribute8 := p_x_task_rec.attribute8;
221: END IF;
222: --
223: IF p_x_task_rec.attribute9 = Fnd_Api.G_MISS_CHAR THEN
224: p_x_task_rec.attribute9 := NULL;
225: ELSE
226: p_x_task_rec.attribute9 := p_x_task_rec.attribute9;
227: END IF;

Line 229: IF p_x_task_rec.attribute10 = Fnd_Api.G_MISS_CHAR THEN

225: ELSE
226: p_x_task_rec.attribute9 := p_x_task_rec.attribute9;
227: END IF;
228: --
229: IF p_x_task_rec.attribute10 = Fnd_Api.G_MISS_CHAR THEN
230: p_x_task_rec.attribute10 := NULL;
231: ELSE
232: p_x_task_rec.attribute10 := p_x_task_rec.attribute10;
233: END IF;

Line 235: IF p_x_task_rec.attribute11 = Fnd_Api.G_MISS_CHAR THEN

231: ELSE
232: p_x_task_rec.attribute10 := p_x_task_rec.attribute10;
233: END IF;
234: --
235: IF p_x_task_rec.attribute11 = Fnd_Api.G_MISS_CHAR THEN
236: p_x_task_rec.attribute11 := NULL;
237: ELSE
238: p_x_task_rec.attribute11 := p_x_task_rec.attribute11;
239: END IF;

Line 241: IF p_x_task_rec.attribute12 = Fnd_Api.G_MISS_CHAR THEN

237: ELSE
238: p_x_task_rec.attribute11 := p_x_task_rec.attribute11;
239: END IF;
240: --
241: IF p_x_task_rec.attribute12 = Fnd_Api.G_MISS_CHAR THEN
242: p_x_task_rec.attribute12 := NULL;
243: ELSE
244: p_x_task_rec.attribute12 := p_x_task_rec.attribute12;
245: END IF;

Line 247: IF p_x_task_rec.attribute13 = Fnd_Api.G_MISS_CHAR THEN

243: ELSE
244: p_x_task_rec.attribute12 := p_x_task_rec.attribute12;
245: END IF;
246: --
247: IF p_x_task_rec.attribute13 = Fnd_Api.G_MISS_CHAR THEN
248: p_x_task_rec.attribute13 := NULL;
249: ELSE
250: p_x_task_rec.attribute13 := p_x_task_rec.attribute13;
251: END IF;

Line 253: IF p_x_task_rec.attribute14 = Fnd_Api.G_MISS_CHAR THEN

249: ELSE
250: p_x_task_rec.attribute13 := p_x_task_rec.attribute13;
251: END IF;
252: --
253: IF p_x_task_rec.attribute14 = Fnd_Api.G_MISS_CHAR THEN
254: p_x_task_rec.attribute14 := NULL;
255: ELSE
256: p_x_task_rec.attribute14 := p_x_task_rec.attribute14;
257: END IF;

Line 259: IF p_x_task_rec.attribute15 = Fnd_Api.G_MISS_CHAR THEN

255: ELSE
256: p_x_task_rec.attribute14 := p_x_task_rec.attribute14;
257: END IF;
258: --
259: IF p_x_task_rec.attribute15 = Fnd_Api.G_MISS_CHAR THEN
260: p_x_task_rec.attribute15 := NULL;
261: ELSE
262: p_x_task_rec.attribute15 := p_x_task_rec.attribute15;
263: END IF;

Line 265: IF p_x_task_rec.description = Fnd_Api.G_MISS_CHAR THEN

261: ELSE
262: p_x_task_rec.attribute15 := p_x_task_rec.attribute15;
263: END IF;
264: --
265: IF p_x_task_rec.description = Fnd_Api.G_MISS_CHAR THEN
266: p_x_task_rec.description := NULL;
267: ELSE
268: p_x_task_rec.description := p_x_task_rec.description;
269: END IF;

Line 271: IF p_x_task_rec.STAGE_NAME = Fnd_Api.G_MISS_CHAR THEN

267: ELSE
268: p_x_task_rec.description := p_x_task_rec.description;
269: END IF;
270:
271: IF p_x_task_rec.STAGE_NAME = Fnd_Api.G_MISS_CHAR THEN
272: p_x_task_rec.STAGE_NAME := NULL;
273: ELSE
274: p_x_task_rec.STAGE_NAME := p_x_task_rec.STAGE_NAME;
275: END IF;

Line 325: IF (p_x_task_Rec.dept_name IS NOT NULL AND p_x_task_Rec.dept_name <> Fnd_Api.G_MISS_CHAR ) THEN

321: CLOSE c_visit;
322:
323: IF c_visit_rec.organization_id IS NOT NULL THEN
324: -- Get dept code using dept description
325: IF (p_x_task_Rec.dept_name IS NOT NULL AND p_x_task_Rec.dept_name <> Fnd_Api.G_MISS_CHAR ) THEN
326: AHL_VWP_RULES_PVT.Check_Dept_Desc_Or_Id
327: (p_organization_id => c_visit_rec.organization_id,
328: p_dept_name => p_x_task_Rec.dept_name,
329: p_department_id => Null,

Line 334: IF NVL(l_return_status,'x') <> FND_API.G_RET_STS_SUCCESS THEN

330: x_department_id => p_x_task_Rec.department_id,
331: x_return_status => l_return_status,
332: x_error_msg_code => l_msg_data);
333:
334: IF NVL(l_return_status,'x') <> FND_API.G_RET_STS_SUCCESS THEN
335: Fnd_Message.SET_NAME('AHL','AHL_VWP_DEPT_NOT_EXISTS');
336: Fnd_Msg_Pub.ADD;
337: RAISE Fnd_Api.G_EXC_ERROR;
338: END IF;

Line 337: RAISE Fnd_Api.G_EXC_ERROR;

333:
334: IF NVL(l_return_status,'x') <> FND_API.G_RET_STS_SUCCESS THEN
335: Fnd_Message.SET_NAME('AHL','AHL_VWP_DEPT_NOT_EXISTS');
336: Fnd_Msg_Pub.ADD;
337: RAISE Fnd_Api.G_EXC_ERROR;
338: END IF;
339:
340: -- Changes for Post 11.5.10 by amagrawa
341: AHL_VWP_RULES_PVT.CHECK_DEPARTMENT_SHIFT

Line 345: IF (NVL(l_return_status,'x') <> FND_API.G_RET_STS_SUCCESS) THEN

341: AHL_VWP_RULES_PVT.CHECK_DEPARTMENT_SHIFT
342: (P_DEPT_ID => p_x_task_Rec.department_id,
343: X_RETURN_STATUS => l_return_status);
344:
345: IF (NVL(l_return_status,'x') <> FND_API.G_RET_STS_SUCCESS) THEN
346: Fnd_Message.SET_NAME('AHL','AHL_VWP_NO_DEPT_SHIFT');
347: Fnd_Msg_Pub.ADD;
348: RAISE Fnd_Api.G_EXC_ERROR;
349: END IF;

Line 348: RAISE Fnd_Api.G_EXC_ERROR;

344:
345: IF (NVL(l_return_status,'x') <> FND_API.G_RET_STS_SUCCESS) THEN
346: Fnd_Message.SET_NAME('AHL','AHL_VWP_NO_DEPT_SHIFT');
347: Fnd_Msg_Pub.ADD;
348: RAISE Fnd_Api.G_EXC_ERROR;
349: END IF;
350: ELSE
351: p_x_task_Rec.dept_name := NULL;
352: -- Post 11.5.10 Changes by Senthil.

Line 362: IF (p_x_task_Rec.dept_name IS NOT NULL AND p_x_task_Rec.dept_name <> Fnd_Api.G_MISS_CHAR ) THEN

358: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN
359: fnd_log.string(fnd_log.level_statement,L_DEBUG,' Dept ID= ' || p_x_task_Rec.department_id);
360: END IF;
361: ELSE -- Else of if visit org not exists
362: IF (p_x_task_Rec.dept_name IS NOT NULL AND p_x_task_Rec.dept_name <> Fnd_Api.G_MISS_CHAR ) THEN
363: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN
364: fnd_log.string(fnd_log.level_statement,L_DEBUG,' NO ORGANIZATION FOR VISIT');
365: END IF;
366: Fnd_Message.SET_NAME('AHL','AHL_VWP_VISIT_NO_ORG_EXISTS');

Line 368: RAISE Fnd_Api.G_EXC_ERROR;

364: fnd_log.string(fnd_log.level_statement,L_DEBUG,' NO ORGANIZATION FOR VISIT');
365: END IF;
366: Fnd_Message.SET_NAME('AHL','AHL_VWP_VISIT_NO_ORG_EXISTS');
367: Fnd_Msg_Pub.ADD;
368: RAISE Fnd_Api.G_EXC_ERROR;
369: END IF;
370: END IF; -- End of if visit org exists
371:
372: /*Convert service request number to service request id

Line 373: IF (p_x_task_Rec.service_request_number IS NOT NULL AND p_x_task_Rec.service_request_number <> Fnd_Api.G_MISS_CHAR ) THEN

369: END IF;
370: END IF; -- End of if visit org exists
371:
372: /*Convert service request number to service request id
373: IF (p_x_task_Rec.service_request_number IS NOT NULL AND p_x_task_Rec.service_request_number <> Fnd_Api.G_MISS_CHAR ) THEN
374: AHL_VWP_RULES_PVT.Check_SR_Request_Number_Or_Id
375: (p_service_id => Null,
376: p_service_number => p_x_task_Rec.service_request_number,
377: x_service_id => p_x_task_Rec.service_request_id,

Line 381: IF NVL(l_return_status,'x') <> FND_API.G_RET_STS_SUCCESS THEN

377: x_service_id => p_x_task_Rec.service_request_id,
378: x_return_status => l_return_status,
379: x_error_msg_code => l_msg_data);
380:
381: IF NVL(l_return_status,'x') <> FND_API.G_RET_STS_SUCCESS THEN
382: Fnd_Message.SET_NAME('AHL','AHL_VWP_SERVICE_REQ_NOT_EXISTS');
383: Fnd_Msg_Pub.ADD;
384: RAISE Fnd_Api.g_exc_error;
385: END IF;

Line 384: RAISE Fnd_Api.g_exc_error;

380:
381: IF NVL(l_return_status,'x') <> FND_API.G_RET_STS_SUCCESS THEN
382: Fnd_Message.SET_NAME('AHL','AHL_VWP_SERVICE_REQ_NOT_EXISTS');
383: Fnd_Msg_Pub.ADD;
384: RAISE Fnd_Api.g_exc_error;
385: END IF;
386:
387: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) THEN
388: fnd_log.string(fnd_log.level_procedure,'ahl.plsql.', l_full_name ||': Service ID= ' || p_x_task_Rec.service_request_id);

Line 404: p_init_msg_list IN VARCHAR2 := Fnd_Api.g_false,

400: END Asso_Inst_Dept_to_Tasks;
401:
402: PROCEDURE Create_Planned_Task (
403: p_api_version IN NUMBER,
404: p_init_msg_list IN VARCHAR2 := Fnd_Api.g_false,
405: p_commit IN VARCHAR2 := Fnd_Api.g_false,
406: p_validation_level IN NUMBER := Fnd_Api.g_valid_level_full,
407: p_module_type IN VARCHAR2 := 'JSP',
408: p_x_task_Rec IN OUT NOCOPY AHL_VWP_RULES_PVT.task_rec_type,

Line 405: p_commit IN VARCHAR2 := Fnd_Api.g_false,

401:
402: PROCEDURE Create_Planned_Task (
403: p_api_version IN NUMBER,
404: p_init_msg_list IN VARCHAR2 := Fnd_Api.g_false,
405: p_commit IN VARCHAR2 := Fnd_Api.g_false,
406: p_validation_level IN NUMBER := Fnd_Api.g_valid_level_full,
407: p_module_type IN VARCHAR2 := 'JSP',
408: p_x_task_Rec IN OUT NOCOPY AHL_VWP_RULES_PVT.task_rec_type,
409: x_return_status OUT NOCOPY VARCHAR2,

Line 406: p_validation_level IN NUMBER := Fnd_Api.g_valid_level_full,

402: PROCEDURE Create_Planned_Task (
403: p_api_version IN NUMBER,
404: p_init_msg_list IN VARCHAR2 := Fnd_Api.g_false,
405: p_commit IN VARCHAR2 := Fnd_Api.g_false,
406: p_validation_level IN NUMBER := Fnd_Api.g_valid_level_full,
407: p_module_type IN VARCHAR2 := 'JSP',
408: p_x_task_Rec IN OUT NOCOPY AHL_VWP_RULES_PVT.task_rec_type,
409: x_return_status OUT NOCOPY VARCHAR2,
410: x_msg_count OUT NOCOPY NUMBER,

Line 616: IF Fnd_Api.to_boolean (p_init_msg_list) THEN

612: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) THEN
613: fnd_log.string(fnd_log.level_procedure, L_DEBUG||'.begin','At the start of PLSQL procedure');
614: END IF;
615:
616: IF Fnd_Api.to_boolean (p_init_msg_list) THEN
617: Fnd_Msg_Pub.initialize;
618: END IF;
619:
620: IF NOT Fnd_Api.compatible_api_call (

Line 620: IF NOT Fnd_Api.compatible_api_call (

616: IF Fnd_Api.to_boolean (p_init_msg_list) THEN
617: Fnd_Msg_Pub.initialize;
618: END IF;
619:
620: IF NOT Fnd_Api.compatible_api_call (
621: L_API_VERSION,
622: p_api_version,
623: L_API_NAME,
624: G_PKG_NAME

Line 626: RAISE Fnd_Api.g_exc_unexpected_error;

622: p_api_version,
623: L_API_NAME,
624: G_PKG_NAME
625: ) THEN
626: RAISE Fnd_Api.g_exc_unexpected_error;
627: END IF;
628:
629: x_return_status := Fnd_Api.g_ret_sts_success;
630:

Line 629: x_return_status := Fnd_Api.g_ret_sts_success;

625: ) THEN
626: RAISE Fnd_Api.g_exc_unexpected_error;
627: END IF;
628:
629: x_return_status := Fnd_Api.g_ret_sts_success;
630:
631: -- Calling Asso_Inst_Dept_to_Tasks API
632: Asso_Inst_Dept_to_Tasks (
633: p_module_type => p_module_type,

Line 643: IF l_department_id = FND_API.g_miss_num THEN

639: l_service_req_id := p_x_task_Rec.service_request_id;
640: l_department_id := p_x_task_Rec.department_id;
641: l_unit_effectivity_id := p_x_task_Rec.unit_effectivity_id;
642:
643: IF l_department_id = FND_API.g_miss_num THEN
644: l_department_id := NULL;
645: END IF;
646:
647: -- Cursor to retrieve visit info

Line 664: x_return_status := Fnd_Api.g_ret_sts_error;

660: condition p_module_type <> 'SR')*/
661: IF c_unit%FOUND AND p_module_type <> 'SR' THEN
662: CLOSE c_unit;
663: -- ERROR MESSAGE
664: x_return_status := Fnd_Api.g_ret_sts_error;
665: Fnd_Message.SET_NAME('AHL','AHL_VWP_UNIT_FOUND');
666: Fnd_Message.SET_TOKEN('VISIT_NUMBER', l_visit_number);
667: Fnd_Msg_Pub.ADD;
668: ELSE -- UE not planned in any other Visit

Line 756: IF NVL(l_return_status,'x') <> FND_API.G_RET_STS_SUCCESS THEN

752: fnd_log.string(fnd_log.level_statement,L_DEBUG, 'After AHL_VWP_RULES_PVT.Insert_Tasks for Planned Task');
753: fnd_log.string(fnd_log.level_statement,L_DEBUG, 'l_return_status' || l_return_status);
754: END IF;
755:
756: IF NVL(l_return_status,'x') <> FND_API.G_RET_STS_SUCCESS THEN
757: CLOSE c_task_for_ue; -- NR-MR Changes - sowsubra
758: RAISE Fnd_Api.G_EXC_ERROR;
759: END IF;
760: /*NR-MR Changes - sowsubra*/

Line 758: RAISE Fnd_Api.G_EXC_ERROR;

754: END IF;
755:
756: IF NVL(l_return_status,'x') <> FND_API.G_RET_STS_SUCCESS THEN
757: CLOSE c_task_for_ue; -- NR-MR Changes - sowsubra
758: RAISE Fnd_Api.G_EXC_ERROR;
759: END IF;
760: /*NR-MR Changes - sowsubra*/
761: END IF; --c_task_for_ue%NOTFOUND
762: CLOSE c_task_for_ue;

Line 796: IF AHL_VWP_RULES_PVT.instance_in_config_tree(l_visit_id, l_serial_id) = FND_API.G_RET_STS_ERROR THEN

792:
793: -- NR-MR Changes - sowsubra
794: -- Done to allow creation of a task for an instance that has already been removed.
795: /***
796: IF AHL_VWP_RULES_PVT.instance_in_config_tree(l_visit_id, l_serial_id) = FND_API.G_RET_STS_ERROR THEN
797: Fnd_Message.SET_NAME('AHL','AHL_VWP_TASK_SERIAL');
798: Fnd_Msg_Pub.ADD;
799: RAISE Fnd_Api.G_EXC_ERROR;
800: END IF; ***/

Line 799: RAISE Fnd_Api.G_EXC_ERROR;

795: /***
796: IF AHL_VWP_RULES_PVT.instance_in_config_tree(l_visit_id, l_serial_id) = FND_API.G_RET_STS_ERROR THEN
797: Fnd_Message.SET_NAME('AHL','AHL_VWP_TASK_SERIAL');
798: Fnd_Msg_Pub.ADD;
799: RAISE Fnd_Api.G_EXC_ERROR;
800: END IF; ***/
801:
802: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN
803: fnd_log.string(fnd_log.level_statement,L_DEBUG, 'Inside No Child UEs ELSE BLOCK');

Line 833: IF NVL(l_return_status,'x') <> FND_API.G_RET_STS_SUCCESS THEN

829: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN
830: fnd_log.string(fnd_log.level_statement,L_DEBUG, 'After AHL_VWP_RULES_PVT.Insert_Tasks for Planned Task - l_return_status : '|| l_return_status);
831: END IF;
832:
833: IF NVL(l_return_status,'x') <> FND_API.G_RET_STS_SUCCESS THEN
834: RAISE Fnd_Api.G_EXC_ERROR;
835: END IF;
836: END IF; -- Child UE Check
837:

Line 834: RAISE Fnd_Api.G_EXC_ERROR;

830: fnd_log.string(fnd_log.level_statement,L_DEBUG, 'After AHL_VWP_RULES_PVT.Insert_Tasks for Planned Task - l_return_status : '|| l_return_status);
831: END IF;
832:
833: IF NVL(l_return_status,'x') <> FND_API.G_RET_STS_SUCCESS THEN
834: RAISE Fnd_Api.G_EXC_ERROR;
835: END IF;
836: END IF; -- Child UE Check
837:
838: -- Call Service Request package to update the status.

Line 856: p_init_msg_list => FND_API.G_TRUE,

852: --l_service_request_rec.status_name := l_status_name;
853: /*
854: CS_SERVICEREQUEST_PUB.Update_ServiceRequest(
855: p_api_version => 3.0,
856: p_init_msg_list => FND_API.G_TRUE,
857: p_commit => FND_API.G_FALSE,
858: x_return_status => x_return_status,
859: x_msg_count => l_msg_count,
860: x_msg_data => l_msg_data,

Line 857: p_commit => FND_API.G_FALSE,

853: /*
854: CS_SERVICEREQUEST_PUB.Update_ServiceRequest(
855: p_api_version => 3.0,
856: p_init_msg_list => FND_API.G_TRUE,
857: p_commit => FND_API.G_FALSE,
858: x_return_status => x_return_status,
859: x_msg_count => l_msg_count,
860: x_msg_data => l_msg_data,
861: p_request_id => l_incident_id,

Line 884: RAISE FND_API.G_EXC_ERROR;

880:
881: -- Check Error Message stack.
882: x_msg_count := FND_MSG_PUB.count_msg;
883: IF x_msg_count > 0 THEN
884: RAISE FND_API.G_EXC_ERROR;
885: END IF;
886:
887: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN
888: fnd_log.string(fnd_log.level_statement,L_DEBUG, 'Before CS_ServiceRequest_PUB.Update_Status ');

Line 894: p_init_msg_list => FND_API.G_TRUE,

890: -- anraj changed the api
891: CS_ServiceRequest_PUB.Update_Status
892: (
893: p_api_version => 2.0,
894: p_init_msg_list => FND_API.G_TRUE,
895: p_commit => FND_API.G_FALSE,
896: p_resp_appl_id => NULL,
897: p_resp_id => NULL,
898: p_user_id => NULL,

Line 895: p_commit => FND_API.G_FALSE,

891: CS_ServiceRequest_PUB.Update_Status
892: (
893: p_api_version => 2.0,
894: p_init_msg_list => FND_API.G_TRUE,
895: p_commit => FND_API.G_FALSE,
896: p_resp_appl_id => NULL,
897: p_resp_id => NULL,
898: p_user_id => NULL,
899: p_login_id => NULL,

Line 903: p_called_by_workflow => FND_API.G_FALSE,

899: p_login_id => NULL,
900: p_status_id => 52,
901: p_closed_date => NULL,
902: p_audit_comments => NULL,
903: p_called_by_workflow => FND_API.G_FALSE,
904: p_workflow_process_id => NULL,
905: p_comments => NULL,
906: p_public_comment_flag => FND_API.G_FALSE,
907: p_validate_sr_closure => 'N',

Line 906: p_public_comment_flag => FND_API.G_FALSE,

902: p_audit_comments => NULL,
903: p_called_by_workflow => FND_API.G_FALSE,
904: p_workflow_process_id => NULL,
905: p_comments => NULL,
906: p_public_comment_flag => FND_API.G_FALSE,
907: p_validate_sr_closure => 'N',
908: p_auto_close_child_entities => 'N',
909: p_request_id => l_incident_id,
910: p_request_number => NULL,

Line 923: IF NVL(x_return_status,'x') <> FND_API.G_RET_STS_SUCCESS THEN

919: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN
920: fnd_log.string(fnd_log.level_statement,L_DEBUG, 'After CS_ServiceRequest_PUB.Update_Status - Return Status - '||x_return_status );
921: END IF;
922:
923: IF NVL(x_return_status,'x') <> FND_API.G_RET_STS_SUCCESS THEN
924: RAISE Fnd_Api.G_EXC_ERROR;
925: ELSE
926: Fnd_Msg_Pub.initialize;
927: END IF;

Line 924: RAISE Fnd_Api.G_EXC_ERROR;

920: fnd_log.string(fnd_log.level_statement,L_DEBUG, 'After CS_ServiceRequest_PUB.Update_Status - Return Status - '||x_return_status );
921: END IF;
922:
923: IF NVL(x_return_status,'x') <> FND_API.G_RET_STS_SUCCESS THEN
924: RAISE Fnd_Api.G_EXC_ERROR;
925: ELSE
926: Fnd_Msg_Pub.initialize;
927: END IF;
928: END IF; -- SR/MR

Line 942: RAISE FND_API.G_EXC_ERROR;

938: END IF; -- c_unit%FOUND
939: ELSE -- l_unit_effectivity_id
940: Fnd_Message.SET_NAME('AHL','AHL_VWP_NO_UNIT_EFFECTIVITY');
941: Fnd_Msg_Pub.ADD;
942: RAISE FND_API.G_EXC_ERROR;
943: END IF; -- End of unit effectivity check
944:
945: OPEN C_VISIT(l_visit_id);
946: fetch c_visit into l_visit_csr_rec;

Line 955: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN

951: p_flag =>'Y',
952: x_return_status =>x_return_status);
953: END IF;
954:
955: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
956: CLOSE C_VISIT;
957: RAISE FND_API.G_EXC_ERROR;
958: END IF;
959: END IF;

Line 957: RAISE FND_API.G_EXC_ERROR;

953: END IF;
954:
955: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
956: CLOSE C_VISIT;
957: RAISE FND_API.G_EXC_ERROR;
958: END IF;
959: END IF;
960: CLOSE C_VISIT;
961:

Line 966: p_encoded => Fnd_Api.g_false,

962: ------------------------- finish -------------------------------
963: -- Standard call to get message count and if count is 1, get message info
964: Fnd_Msg_Pub.count_and_get
965: (
966: p_encoded => Fnd_Api.g_false,
967: p_count => x_msg_count,
968: p_data => x_msg_data
969: );
970:

Line 974: RAISE FND_API.G_EXC_ERROR;

970:
971: -- Check Error Message stack.
972: x_msg_count := FND_MSG_PUB.count_msg;
973: IF x_msg_count > 0 THEN
974: RAISE FND_API.G_EXC_ERROR;
975: END IF;
976:
977: -- Standard check of p_commit.
978: IF Fnd_Api.To_Boolean ( p_commit ) THEN

Line 978: IF Fnd_Api.To_Boolean ( p_commit ) THEN

974: RAISE FND_API.G_EXC_ERROR;
975: END IF;
976:
977: -- Standard check of p_commit.
978: IF Fnd_Api.To_Boolean ( p_commit ) THEN
979: COMMIT WORK;
980: END IF;
981:
982: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) THEN

Line 987: WHEN Fnd_Api.g_exc_error THEN

983: fnd_log.string(fnd_log.level_procedure,L_DEBUG||'.end','At the end of PLSQL procedure');
984: END IF;
985:
986: EXCEPTION
987: WHEN Fnd_Api.g_exc_error THEN
988: ROLLBACK TO Create_Planned_Task;
989: x_return_status := Fnd_Api.g_ret_sts_error;
990: Fnd_Msg_Pub.count_and_get(
991: p_encoded => Fnd_Api.g_false,

Line 989: x_return_status := Fnd_Api.g_ret_sts_error;

985:
986: EXCEPTION
987: WHEN Fnd_Api.g_exc_error THEN
988: ROLLBACK TO Create_Planned_Task;
989: x_return_status := Fnd_Api.g_ret_sts_error;
990: Fnd_Msg_Pub.count_and_get(
991: p_encoded => Fnd_Api.g_false,
992: p_count => x_msg_count,
993: p_data => x_msg_data

Line 991: p_encoded => Fnd_Api.g_false,

987: WHEN Fnd_Api.g_exc_error THEN
988: ROLLBACK TO Create_Planned_Task;
989: x_return_status := Fnd_Api.g_ret_sts_error;
990: Fnd_Msg_Pub.count_and_get(
991: p_encoded => Fnd_Api.g_false,
992: p_count => x_msg_count,
993: p_data => x_msg_data
994: );
995: WHEN Fnd_Api.g_exc_unexpected_error THEN

Line 995: WHEN Fnd_Api.g_exc_unexpected_error THEN

991: p_encoded => Fnd_Api.g_false,
992: p_count => x_msg_count,
993: p_data => x_msg_data
994: );
995: WHEN Fnd_Api.g_exc_unexpected_error THEN
996: ROLLBACK TO Create_Planned_Task;
997: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;
998: Fnd_Msg_Pub.count_and_get (
999: p_encoded => Fnd_Api.g_false,

Line 997: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;

993: p_data => x_msg_data
994: );
995: WHEN Fnd_Api.g_exc_unexpected_error THEN
996: ROLLBACK TO Create_Planned_Task;
997: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;
998: Fnd_Msg_Pub.count_and_get (
999: p_encoded => Fnd_Api.g_false,
1000: p_count => x_msg_count,
1001: p_data => x_msg_data

Line 999: p_encoded => Fnd_Api.g_false,

995: WHEN Fnd_Api.g_exc_unexpected_error THEN
996: ROLLBACK TO Create_Planned_Task;
997: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;
998: Fnd_Msg_Pub.count_and_get (
999: p_encoded => Fnd_Api.g_false,
1000: p_count => x_msg_count,
1001: p_data => x_msg_data
1002: );
1003: WHEN OTHERS THEN

Line 1005: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;

1001: p_data => x_msg_data
1002: );
1003: WHEN OTHERS THEN
1004: ROLLBACK TO Create_Planned_Task;
1005: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;
1006: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_unexp_error)
1007: THEN
1008: Fnd_Msg_Pub.add_exc_msg (G_PKG_NAME, l_api_name);
1009: END IF;

Line 1011: p_encoded => Fnd_Api.g_false,

1007: THEN
1008: Fnd_Msg_Pub.add_exc_msg (G_PKG_NAME, l_api_name);
1009: END IF;
1010: Fnd_Msg_Pub.count_and_get (
1011: p_encoded => Fnd_Api.g_false,
1012: p_count => x_msg_count,
1013: p_data => x_msg_data
1014: );
1015: END Create_Planned_Task;

Line 1142: IF AHL_VWP_RULES_PVT.instance_in_config_tree(p_visit_id, l_serial_id) = FND_API.G_RET_STS_ERROR THEN

1138:
1139: -- NR-MR Changes - sowsubra
1140: -- Done to allow creation of a task for an instance that has already been removed.
1141: /***
1142: IF AHL_VWP_RULES_PVT.instance_in_config_tree(p_visit_id, l_serial_id) = FND_API.G_RET_STS_ERROR THEN
1143: Fnd_Message.SET_NAME('AHL','AHL_VWP_TASK_SERIAL');
1144: Fnd_Msg_Pub.ADD;
1145: RAISE Fnd_Api.G_EXC_ERROR;
1146: END IF;

Line 1145: RAISE Fnd_Api.G_EXC_ERROR;

1141: /***
1142: IF AHL_VWP_RULES_PVT.instance_in_config_tree(p_visit_id, l_serial_id) = FND_API.G_RET_STS_ERROR THEN
1143: Fnd_Message.SET_NAME('AHL','AHL_VWP_TASK_SERIAL');
1144: Fnd_Msg_Pub.ADD;
1145: RAISE Fnd_Api.G_EXC_ERROR;
1146: END IF;
1147: ***/
1148:
1149: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN

Line 1181: IF NVL(l_return_status,'x') <> FND_API.G_RET_STS_SUCCESS THEN

1177: fnd_log.string(fnd_log.level_statement,L_DEBUG, 'p_x_parent_MR_Id = ' || l_parent_MR_Id );
1178: fnd_log.string(fnd_log.level_statement,L_DEBUG, 'x_return_status is ' || l_return_status );
1179: END IF;
1180:
1181: IF NVL(l_return_status,'x') <> FND_API.G_RET_STS_SUCCESS THEN
1182: RAISE Fnd_Api.G_EXC_ERROR;
1183: END IF;
1184:
1185: MR_Serial_Tbl(0).MR_ID := l_mr_header_id ;

Line 1182: RAISE Fnd_Api.G_EXC_ERROR;

1178: fnd_log.string(fnd_log.level_statement,L_DEBUG, 'x_return_status is ' || l_return_status );
1179: END IF;
1180:
1181: IF NVL(l_return_status,'x') <> FND_API.G_RET_STS_SUCCESS THEN
1182: RAISE Fnd_Api.G_EXC_ERROR;
1183: END IF;
1184:
1185: MR_Serial_Tbl(0).MR_ID := l_mr_header_id ;
1186: MR_Serial_Tbl(0).Serial_ID := l_serial_id;

Line 1204: IF NVL(l_return_status,'x') <> FND_API.G_RET_STS_SUCCESS THEN

1200: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN
1201: fnd_log.string(fnd_log.level_statement,L_DEBUG, 'After AHL_VWP_RULES_PVT.Tech_Dependency - l_return_status : '||l_return_status);
1202: END IF;
1203:
1204: IF NVL(l_return_status,'x') <> FND_API.G_RET_STS_SUCCESS THEN
1205: RAISE Fnd_Api.G_EXC_ERROR;
1206: END IF;
1207: ELSE
1208: CLOSE c_header;

Line 1205: RAISE Fnd_Api.G_EXC_ERROR;

1201: fnd_log.string(fnd_log.level_statement,L_DEBUG, 'After AHL_VWP_RULES_PVT.Tech_Dependency - l_return_status : '||l_return_status);
1202: END IF;
1203:
1204: IF NVL(l_return_status,'x') <> FND_API.G_RET_STS_SUCCESS THEN
1205: RAISE Fnd_Api.G_EXC_ERROR;
1206: END IF;
1207: ELSE
1208: CLOSE c_header;
1209: END IF;

Line 1277: p_init_msg_list IN VARCHAR2 := Fnd_Api.g_false,

1273: -- To update Planned task for the Maintainance visit.
1274: --------------------------------------------------------------------
1275: PROCEDURE Update_Planned_Task (
1276: p_api_version IN NUMBER,
1277: p_init_msg_list IN VARCHAR2 := Fnd_Api.g_false,
1278: p_commit IN VARCHAR2 := Fnd_Api.g_false,
1279: p_validation_level IN NUMBER := Fnd_Api.g_valid_level_full,
1280: p_module_type IN VARCHAR2 := 'JSP',
1281: p_x_task_rec IN OUT NOCOPY AHL_VWP_RULES_PVT.Task_Rec_Type,

Line 1278: p_commit IN VARCHAR2 := Fnd_Api.g_false,

1274: --------------------------------------------------------------------
1275: PROCEDURE Update_Planned_Task (
1276: p_api_version IN NUMBER,
1277: p_init_msg_list IN VARCHAR2 := Fnd_Api.g_false,
1278: p_commit IN VARCHAR2 := Fnd_Api.g_false,
1279: p_validation_level IN NUMBER := Fnd_Api.g_valid_level_full,
1280: p_module_type IN VARCHAR2 := 'JSP',
1281: p_x_task_rec IN OUT NOCOPY AHL_VWP_RULES_PVT.Task_Rec_Type,
1282: x_return_status OUT NOCOPY VARCHAR2,

Line 1279: p_validation_level IN NUMBER := Fnd_Api.g_valid_level_full,

1275: PROCEDURE Update_Planned_Task (
1276: p_api_version IN NUMBER,
1277: p_init_msg_list IN VARCHAR2 := Fnd_Api.g_false,
1278: p_commit IN VARCHAR2 := Fnd_Api.g_false,
1279: p_validation_level IN NUMBER := Fnd_Api.g_valid_level_full,
1280: p_module_type IN VARCHAR2 := 'JSP',
1281: p_x_task_rec IN OUT NOCOPY AHL_VWP_RULES_PVT.Task_Rec_Type,
1282: x_return_status OUT NOCOPY VARCHAR2,
1283: x_msg_count OUT NOCOPY NUMBER,

Line 1323: IF Fnd_Api.to_boolean (p_init_msg_list) THEN

1319: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) THEN
1320: fnd_log.string(fnd_log.level_procedure,L_DEBUG||'.begin','At the start of PLSQL procedure');
1321: END IF;
1322:
1323: IF Fnd_Api.to_boolean (p_init_msg_list) THEN
1324: Fnd_Msg_Pub.initialize;
1325: END IF;
1326:
1327: -- Initialize API return status to success

Line 1328: x_return_status := Fnd_Api.G_RET_STS_SUCCESS;

1324: Fnd_Msg_Pub.initialize;
1325: END IF;
1326:
1327: -- Initialize API return status to success
1328: x_return_status := Fnd_Api.G_RET_STS_SUCCESS;
1329:
1330: -- Standard call to check for call compatibility.
1331: IF NOT Fnd_Api.compatible_api_call(
1332: l_api_version,

Line 1331: IF NOT Fnd_Api.compatible_api_call(

1327: -- Initialize API return status to success
1328: x_return_status := Fnd_Api.G_RET_STS_SUCCESS;
1329:
1330: -- Standard call to check for call compatibility.
1331: IF NOT Fnd_Api.compatible_api_call(
1332: l_api_version,
1333: p_api_version,
1334: l_api_name,
1335: G_PKG_NAME

Line 1337: RAISE Fnd_Api.g_exc_unexpected_error;

1333: p_api_version,
1334: l_api_name,
1335: G_PKG_NAME
1336: ) THEN
1337: RAISE Fnd_Api.g_exc_unexpected_error;
1338: END IF;
1339:
1340: ------------------------Start of API Body------------------------------------
1341:

Line 1366: IF (l_task_rec.dept_name IS NOT NULL AND l_task_rec.dept_name <> Fnd_Api.G_MISS_CHAR ) THEN

1362: ----------- Start defining and validate all LOVs on Create Visit's Task UI Screen---
1363: --
1364: -- For DEPARTMENT
1365: -- Convert department name to department id
1366: IF (l_task_rec.dept_name IS NOT NULL AND l_task_rec.dept_name <> Fnd_Api.G_MISS_CHAR ) THEN
1367:
1368: AHL_VWP_RULES_PVT.Check_Dept_Desc_Or_Id
1369: (p_organization_id => c_visit_rec.organization_id,
1370: p_dept_name => l_task_rec.dept_name,

Line 1376: IF NVL(l_return_status,'x') <> FND_API.G_RET_STS_SUCCESS

1372: x_department_id => l_department_id,
1373: x_return_status => l_return_status,
1374: x_error_msg_code => l_msg_data);
1375:
1376: IF NVL(l_return_status,'x') <> FND_API.G_RET_STS_SUCCESS
1377: THEN
1378: Fnd_Message.SET_NAME('AHL','AHL_VWP_DEPT_NOT_EXISTS');
1379: Fnd_Msg_Pub.ADD;
1380: RAISE Fnd_Api.G_EXC_ERROR;

Line 1380: RAISE Fnd_Api.G_EXC_ERROR;

1376: IF NVL(l_return_status,'x') <> FND_API.G_RET_STS_SUCCESS
1377: THEN
1378: Fnd_Message.SET_NAME('AHL','AHL_VWP_DEPT_NOT_EXISTS');
1379: Fnd_Msg_Pub.ADD;
1380: RAISE Fnd_Api.G_EXC_ERROR;
1381: END IF;
1382:
1383: --Assign the returned value
1384: l_task_rec.department_id := l_department_id;

Line 1396: l_Task_rec.cost_parent_number <> Fnd_Api.G_MISS_NUM ) THEN

1392: --
1393: -- For COST PARENT TASK
1394: -- Convert cost parent number to id
1395: IF (l_Task_rec.cost_parent_number IS NOT NULL AND
1396: l_Task_rec.cost_parent_number <> Fnd_Api.G_MISS_NUM ) THEN
1397:
1398: AHL_VWP_RULES_PVT.Check_Visit_Task_Number_OR_ID
1399: (p_visit_task_id => l_Task_rec.cost_parent_id,
1400: p_visit_task_number => l_Task_rec.cost_parent_number,

Line 1406: IF NVL(l_return_status,'x') <> FND_API.G_RET_STS_SUCCESS

1402: x_visit_task_id => l_cost_parent_id,
1403: x_return_status => l_return_status,
1404: x_error_msg_code => l_msg_data);
1405:
1406: IF NVL(l_return_status,'x') <> FND_API.G_RET_STS_SUCCESS
1407: THEN
1408: Fnd_Message.SET_NAME('AHL','AHL_VWP_PARENT_NOT_EXISTS');
1409: Fnd_Msg_Pub.ADD;
1410: RAISE Fnd_Api.g_exc_error;

Line 1410: RAISE Fnd_Api.g_exc_error;

1406: IF NVL(l_return_status,'x') <> FND_API.G_RET_STS_SUCCESS
1407: THEN
1408: Fnd_Message.SET_NAME('AHL','AHL_VWP_PARENT_NOT_EXISTS');
1409: Fnd_Msg_Pub.ADD;
1410: RAISE Fnd_Api.g_exc_error;
1411: END IF;
1412:
1413: --Assign the returned value
1414: l_Task_rec.cost_parent_id := l_cost_parent_id;

Line 1424: l_Task_rec.cost_parent_id <> Fnd_Api.G_MISS_NUM ) THEN

1420: END IF;
1421:
1422: -- To Check for cost parent task id not forming loop
1423: IF (l_Task_rec.cost_parent_id IS NOT NULL AND
1424: l_Task_rec.cost_parent_id <> Fnd_Api.G_MISS_NUM ) THEN
1425:
1426: AHL_VWP_RULES_PVT.Check_Cost_Parent_Loop
1427: (p_visit_id => l_Task_rec.visit_id,
1428: p_visit_task_id => l_Task_rec.visit_task_id ,

Line 1460: IF l_return_status = Fnd_Api.g_ret_sts_unexp_error THEN

1456: p_validation_mode => Jtf_Plsql_Api.g_update,
1457: x_return_status => l_return_status
1458: );
1459:
1460: IF l_return_status = Fnd_Api.g_ret_sts_unexp_error THEN
1461: RAISE Fnd_Api.g_exc_unexpected_error;
1462: ELSIF l_return_status = Fnd_Api.g_ret_sts_error THEN
1463: RAISE Fnd_Api.g_exc_error;
1464: END IF;

Line 1461: RAISE Fnd_Api.g_exc_unexpected_error;

1457: x_return_status => l_return_status
1458: );
1459:
1460: IF l_return_status = Fnd_Api.g_ret_sts_unexp_error THEN
1461: RAISE Fnd_Api.g_exc_unexpected_error;
1462: ELSIF l_return_status = Fnd_Api.g_ret_sts_error THEN
1463: RAISE Fnd_Api.g_exc_error;
1464: END IF;
1465: END IF;

Line 1462: ELSIF l_return_status = Fnd_Api.g_ret_sts_error THEN

1458: );
1459:
1460: IF l_return_status = Fnd_Api.g_ret_sts_unexp_error THEN
1461: RAISE Fnd_Api.g_exc_unexpected_error;
1462: ELSIF l_return_status = Fnd_Api.g_ret_sts_error THEN
1463: RAISE Fnd_Api.g_exc_error;
1464: END IF;
1465: END IF;
1466:

Line 1463: RAISE Fnd_Api.g_exc_error;

1459:
1460: IF l_return_status = Fnd_Api.g_ret_sts_unexp_error THEN
1461: RAISE Fnd_Api.g_exc_unexpected_error;
1462: ELSIF l_return_status = Fnd_Api.g_ret_sts_error THEN
1463: RAISE Fnd_Api.g_exc_error;
1464: END IF;
1465: END IF;
1466:
1467: -- Check Object version number.

Line 1471: RAISE Fnd_Api.g_exc_error;

1467: -- Check Object version number.
1468: IF (c_task_rec.object_version_number <> l_task_rec.object_version_number) THEN
1469: Fnd_Message.Set_Name('AHL','AHL_COM_RECORD_CHANGED');
1470: Fnd_Msg_Pub.ADD;
1471: RAISE Fnd_Api.g_exc_error;
1472: END IF;
1473:
1474: -- Post 11.5.10 Changes by Senthil.
1475: IF(L_task_rec.STAGE_ID IS NOT NULL OR L_task_rec.STAGE_NAME IS NOT NULL) THEN

Line 1492: IF l_msg_count > 0 OR NVL(l_return_status,'X') <> Fnd_Api.g_ret_sts_success THEN

1488:
1489: -- Standard check to count messages
1490: l_msg_count := Fnd_Msg_Pub.count_msg;
1491:
1492: IF l_msg_count > 0 OR NVL(l_return_status,'X') <> Fnd_Api.g_ret_sts_success THEN
1493: X_msg_count := l_msg_count;
1494: X_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
1495: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;
1496: END IF;

Line 1494: X_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;

1490: l_msg_count := Fnd_Msg_Pub.count_msg;
1491:
1492: IF l_msg_count > 0 OR NVL(l_return_status,'X') <> Fnd_Api.g_ret_sts_success THEN
1493: X_msg_count := l_msg_count;
1494: X_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
1495: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;
1496: END IF;
1497:
1498: -------------------------- update --------------------

Line 1495: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;

1491:
1492: IF l_msg_count > 0 OR NVL(l_return_status,'X') <> Fnd_Api.g_ret_sts_success THEN
1493: X_msg_count := l_msg_count;
1494: X_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
1495: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;
1496: END IF;
1497:
1498: -------------------------- update --------------------
1499: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN

Line 1570: p_init_msg_list => Fnd_Api.G_FALSE,

1566: fnd_log.string(fnd_log.level_statement,L_DEBUG,'Before calling AHL_VWP_TIMES_PVT.Adjust_Task_Times');
1567: END IF;
1568:
1569: AHL_VWP_TIMES_PVT.Adjust_Task_Times(p_api_version => 1.0,
1570: p_init_msg_list => Fnd_Api.G_FALSE,
1571: p_commit => Fnd_Api.G_FALSE,
1572: p_validation_level => Fnd_Api.G_VALID_LEVEL_FULL,
1573: x_return_status => l_return_status,
1574: x_msg_count => l_msg_count,

Line 1571: p_commit => Fnd_Api.G_FALSE,

1567: END IF;
1568:
1569: AHL_VWP_TIMES_PVT.Adjust_Task_Times(p_api_version => 1.0,
1570: p_init_msg_list => Fnd_Api.G_FALSE,
1571: p_commit => Fnd_Api.G_FALSE,
1572: p_validation_level => Fnd_Api.G_VALID_LEVEL_FULL,
1573: x_return_status => l_return_status,
1574: x_msg_count => l_msg_count,
1575: x_msg_data => l_msg_data,

Line 1572: p_validation_level => Fnd_Api.G_VALID_LEVEL_FULL,

1568:
1569: AHL_VWP_TIMES_PVT.Adjust_Task_Times(p_api_version => 1.0,
1570: p_init_msg_list => Fnd_Api.G_FALSE,
1571: p_commit => Fnd_Api.G_FALSE,
1572: p_validation_level => Fnd_Api.G_VALID_LEVEL_FULL,
1573: x_return_status => l_return_status,
1574: x_msg_count => l_msg_count,
1575: x_msg_data => l_msg_data,
1576: p_task_id => l_task_rec.visit_task_id);

Line 1585: IF l_msg_count > 0 OR NVL(l_return_status,'X') <> Fnd_Api.g_ret_sts_success THEN

1581:
1582: --Standard check to count messages
1583: l_msg_count := Fnd_Msg_Pub.count_msg;
1584:
1585: IF l_msg_count > 0 OR NVL(l_return_status,'X') <> Fnd_Api.g_ret_sts_success THEN
1586: x_msg_count := l_msg_count;
1587: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
1588: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;
1589: END IF;

Line 1587: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;

1583: l_msg_count := Fnd_Msg_Pub.count_msg;
1584:
1585: IF l_msg_count > 0 OR NVL(l_return_status,'X') <> Fnd_Api.g_ret_sts_success THEN
1586: x_msg_count := l_msg_count;
1587: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
1588: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;
1589: END IF;
1590:
1591: -- Assign back to in/out parameter

Line 1588: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;

1584:
1585: IF l_msg_count > 0 OR NVL(l_return_status,'X') <> Fnd_Api.g_ret_sts_success THEN
1586: x_msg_count := l_msg_count;
1587: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
1588: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;
1589: END IF;
1590:
1591: -- Assign back to in/out parameter
1592: p_x_task_rec := l_task_rec;

Line 1611: p_init_msg_list => FND_API.g_false,

1607: END IF;
1608:
1609: AHL_LTP_REQST_MATRL_PVT.Process_Planned_Materials (
1610: p_api_version => 1.0,
1611: p_init_msg_list => FND_API.g_false,
1612: p_commit => FND_API.g_false,
1613: p_validation_level => FND_API.g_valid_level_full,
1614: p_visit_id => l_task_rec.visit_id,
1615: p_visit_task_id => NULL,

Line 1612: p_commit => FND_API.g_false,

1608:
1609: AHL_LTP_REQST_MATRL_PVT.Process_Planned_Materials (
1610: p_api_version => 1.0,
1611: p_init_msg_list => FND_API.g_false,
1612: p_commit => FND_API.g_false,
1613: p_validation_level => FND_API.g_valid_level_full,
1614: p_visit_id => l_task_rec.visit_id,
1615: p_visit_task_id => NULL,
1616: p_org_id => NULL,

Line 1613: p_validation_level => FND_API.g_valid_level_full,

1609: AHL_LTP_REQST_MATRL_PVT.Process_Planned_Materials (
1610: p_api_version => 1.0,
1611: p_init_msg_list => FND_API.g_false,
1612: p_commit => FND_API.g_false,
1613: p_validation_level => FND_API.g_valid_level_full,
1614: p_visit_id => l_task_rec.visit_id,
1615: p_visit_task_id => NULL,
1616: p_org_id => NULL,
1617: p_start_date => NULL,

Line 1630: RAISE Fnd_Api.G_EXC_ERROR;

1626: fnd_log.string(fnd_log.level_statement,L_DEBUG,'Planned Order Flag : ' || l_planned_order_flag);
1627: END IF;
1628:
1629: IF l_return_status <> 'S' THEN
1630: RAISE Fnd_Api.G_EXC_ERROR;
1631: END IF;
1632: END IF;
1633:
1634: IF c_visit_rec.any_task_chg_flag = 'N' THEN

Line 1647: X_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;

1643: l_msg_count := Fnd_Msg_Pub.count_msg;
1644:
1645: IF l_msg_count > 0 THEN
1646: X_msg_count := l_msg_count;
1647: X_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
1648: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;
1649: END IF;
1650:
1651: --Standard check for commit

Line 1648: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;

1644:
1645: IF l_msg_count > 0 THEN
1646: X_msg_count := l_msg_count;
1647: X_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
1648: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;
1649: END IF;
1650:
1651: --Standard check for commit
1652: IF Fnd_Api.TO_BOOLEAN(p_commit) THEN

Line 1652: IF Fnd_Api.TO_BOOLEAN(p_commit) THEN

1648: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;
1649: END IF;
1650:
1651: --Standard check for commit
1652: IF Fnd_Api.TO_BOOLEAN(p_commit) THEN
1653: COMMIT;
1654: END IF;
1655:
1656: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) THEN

Line 1661: WHEN Fnd_Api.g_exc_error THEN

1657: fnd_log.string(fnd_log.level_procedure,L_DEBUG ||'.end','At the end of PLSQL procedure');
1658: END IF;
1659:
1660: EXCEPTION
1661: WHEN Fnd_Api.g_exc_error THEN
1662: ROLLBACK TO Update_Planned_Task;
1663: x_return_status := Fnd_Api.g_ret_sts_error;
1664: Fnd_Msg_Pub.count_and_get (
1665: p_encoded => Fnd_Api.g_false,

Line 1663: x_return_status := Fnd_Api.g_ret_sts_error;

1659:
1660: EXCEPTION
1661: WHEN Fnd_Api.g_exc_error THEN
1662: ROLLBACK TO Update_Planned_Task;
1663: x_return_status := Fnd_Api.g_ret_sts_error;
1664: Fnd_Msg_Pub.count_and_get (
1665: p_encoded => Fnd_Api.g_false,
1666: p_count => x_msg_count,
1667: p_data => x_msg_data

Line 1665: p_encoded => Fnd_Api.g_false,

1661: WHEN Fnd_Api.g_exc_error THEN
1662: ROLLBACK TO Update_Planned_Task;
1663: x_return_status := Fnd_Api.g_ret_sts_error;
1664: Fnd_Msg_Pub.count_and_get (
1665: p_encoded => Fnd_Api.g_false,
1666: p_count => x_msg_count,
1667: p_data => x_msg_data
1668: );
1669: WHEN Fnd_Api.g_exc_unexpected_error THEN

Line 1669: WHEN Fnd_Api.g_exc_unexpected_error THEN

1665: p_encoded => Fnd_Api.g_false,
1666: p_count => x_msg_count,
1667: p_data => x_msg_data
1668: );
1669: WHEN Fnd_Api.g_exc_unexpected_error THEN
1670: ROLLBACK TO Update_Planned_Task;
1671: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;
1672: Fnd_Msg_Pub.count_and_get (
1673: p_encoded => Fnd_Api.g_false,

Line 1671: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;

1667: p_data => x_msg_data
1668: );
1669: WHEN Fnd_Api.g_exc_unexpected_error THEN
1670: ROLLBACK TO Update_Planned_Task;
1671: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;
1672: Fnd_Msg_Pub.count_and_get (
1673: p_encoded => Fnd_Api.g_false,
1674: p_count => x_msg_count,
1675: p_data => x_msg_data

Line 1673: p_encoded => Fnd_Api.g_false,

1669: WHEN Fnd_Api.g_exc_unexpected_error THEN
1670: ROLLBACK TO Update_Planned_Task;
1671: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;
1672: Fnd_Msg_Pub.count_and_get (
1673: p_encoded => Fnd_Api.g_false,
1674: p_count => x_msg_count,
1675: p_data => x_msg_data
1676: );
1677: WHEN OTHERS THEN

Line 1679: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;

1675: p_data => x_msg_data
1676: );
1677: WHEN OTHERS THEN
1678: ROLLBACK TO Update_Planned_Task;
1679: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;
1680: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_unexp_error) THEN
1681: Fnd_Msg_Pub.add_exc_msg (G_PKG_NAME, l_api_name);
1682: END IF;
1683: Fnd_Msg_Pub.count_and_get (

Line 1684: p_encoded => Fnd_Api.g_false,

1680: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_unexp_error) THEN
1681: Fnd_Msg_Pub.add_exc_msg (G_PKG_NAME, l_api_name);
1682: END IF;
1683: Fnd_Msg_Pub.count_and_get (
1684: p_encoded => Fnd_Api.g_false,
1685: p_count => x_msg_count,
1686: p_data => x_msg_data
1687: );
1688: END Update_Planned_Task;

Line 1699: p_init_msg_list IN VARCHAR2 := Fnd_Api.g_false,

1695: -- To delete Planned tasks for the Maintenace visit.
1696: --------------------------------------------------------------------
1697: PROCEDURE Delete_Planned_Task (
1698: p_api_version IN NUMBER,
1699: p_init_msg_list IN VARCHAR2 := Fnd_Api.g_false,
1700: p_commit IN VARCHAR2 := Fnd_Api.g_false,
1701: p_validation_level IN NUMBER := Fnd_Api.g_valid_level_full,
1702: p_module_type IN VARCHAR2 := 'JSP',
1703: p_visit_task_ID IN NUMBER,

Line 1700: p_commit IN VARCHAR2 := Fnd_Api.g_false,

1696: --------------------------------------------------------------------
1697: PROCEDURE Delete_Planned_Task (
1698: p_api_version IN NUMBER,
1699: p_init_msg_list IN VARCHAR2 := Fnd_Api.g_false,
1700: p_commit IN VARCHAR2 := Fnd_Api.g_false,
1701: p_validation_level IN NUMBER := Fnd_Api.g_valid_level_full,
1702: p_module_type IN VARCHAR2 := 'JSP',
1703: p_visit_task_ID IN NUMBER,
1704:

Line 1701: p_validation_level IN NUMBER := Fnd_Api.g_valid_level_full,

1697: PROCEDURE Delete_Planned_Task (
1698: p_api_version IN NUMBER,
1699: p_init_msg_list IN VARCHAR2 := Fnd_Api.g_false,
1700: p_commit IN VARCHAR2 := Fnd_Api.g_false,
1701: p_validation_level IN NUMBER := Fnd_Api.g_valid_level_full,
1702: p_module_type IN VARCHAR2 := 'JSP',
1703: p_visit_task_ID IN NUMBER,
1704:
1705: x_return_status OUT NOCOPY VARCHAR2,

Line 1732: IF Fnd_Api.to_boolean (p_init_msg_list) THEN

1728: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) THEN
1729: fnd_log.string(fnd_log.level_procedure,l_debug||'.begin','At the start of PLSQL procedure');
1730: END IF;
1731:
1732: IF Fnd_Api.to_boolean (p_init_msg_list) THEN
1733: Fnd_Msg_Pub.initialize;
1734: END IF;
1735:
1736: -- Initialize API return status to success

Line 1737: x_return_status := Fnd_Api.G_RET_STS_SUCCESS;

1733: Fnd_Msg_Pub.initialize;
1734: END IF;
1735:
1736: -- Initialize API return status to success
1737: x_return_status := Fnd_Api.G_RET_STS_SUCCESS;
1738:
1739: -- Standard call to check for call compatibility.
1740: IF NOT Fnd_Api.compatible_api_call(
1741: l_api_version,

Line 1740: IF NOT Fnd_Api.compatible_api_call(

1736: -- Initialize API return status to success
1737: x_return_status := Fnd_Api.G_RET_STS_SUCCESS;
1738:
1739: -- Standard call to check for call compatibility.
1740: IF NOT Fnd_Api.compatible_api_call(
1741: l_api_version,
1742: p_api_version,
1743: l_api_name,
1744: G_PKG_NAME

Line 1746: RAISE Fnd_Api.g_exc_unexpected_error;

1742: p_api_version,
1743: l_api_name,
1744: G_PKG_NAME
1745: ) THEN
1746: RAISE Fnd_Api.g_exc_unexpected_error;
1747: END IF;
1748:
1749: ------------------------Start of API Body------------------------------------
1750: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN

Line 1766: RAISE Fnd_Api.g_exc_error;

1762: Fnd_Msg_Pub.ADD;
1763: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN
1764: fnd_log.string(fnd_log.level_statement,l_debug,'Invalid Task Id' || p_visit_task_ID);
1765: END IF;
1766: RAISE Fnd_Api.g_exc_error;
1767: ELSE
1768: CLOSE c_Task;
1769: -- To find the visit related information
1770: l_origin_id:= c_task_rec.originating_task_id;

Line 1779: p_init_msg_list => Fnd_Api.g_false,

1775: END IF;
1776:
1777: AHL_VWP_TASKS_PVT.Delete_Summary_Task(
1778: p_api_version => p_api_version,
1779: p_init_msg_list => Fnd_Api.g_false,
1780: p_commit => Fnd_Api.g_false,
1781: p_validation_level => Fnd_Api.g_valid_level_full,
1782: p_module_type => NULL,
1783: p_Visit_Task_Id => l_origin_id,

Line 1780: p_commit => Fnd_Api.g_false,

1776:
1777: AHL_VWP_TASKS_PVT.Delete_Summary_Task(
1778: p_api_version => p_api_version,
1779: p_init_msg_list => Fnd_Api.g_false,
1780: p_commit => Fnd_Api.g_false,
1781: p_validation_level => Fnd_Api.g_valid_level_full,
1782: p_module_type => NULL,
1783: p_Visit_Task_Id => l_origin_id,
1784: x_return_status => x_return_status,

Line 1781: p_validation_level => Fnd_Api.g_valid_level_full,

1777: AHL_VWP_TASKS_PVT.Delete_Summary_Task(
1778: p_api_version => p_api_version,
1779: p_init_msg_list => Fnd_Api.g_false,
1780: p_commit => Fnd_Api.g_false,
1781: p_validation_level => Fnd_Api.g_valid_level_full,
1782: p_module_type => NULL,
1783: p_Visit_Task_Id => l_origin_id,
1784: x_return_status => x_return_status,
1785: x_msg_count => x_msg_count,

Line 1792: IF x_return_status <> Fnd_Api.g_ret_sts_success THEN

1788: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN
1789: fnd_log.string(fnd_log.level_statement,l_debug,'After calling AHL_VWP_TASKS_PVT.Delete_Summary_Task : x_return_status - '||x_return_status);
1790: END IF;
1791:
1792: IF x_return_status <> Fnd_Api.g_ret_sts_success THEN
1793: RAISE Fnd_Api.G_EXC_ERROR;
1794: END IF;
1795: ELSE
1796: Fnd_Message.SET_NAME('AHL','AHL_VWP_PLANNEDTASKMR');

Line 1793: RAISE Fnd_Api.G_EXC_ERROR;

1789: fnd_log.string(fnd_log.level_statement,l_debug,'After calling AHL_VWP_TASKS_PVT.Delete_Summary_Task : x_return_status - '||x_return_status);
1790: END IF;
1791:
1792: IF x_return_status <> Fnd_Api.g_ret_sts_success THEN
1793: RAISE Fnd_Api.G_EXC_ERROR;
1794: END IF;
1795: ELSE
1796: Fnd_Message.SET_NAME('AHL','AHL_VWP_PLANNEDTASKMR');
1797: Fnd_Msg_Pub.ADD;

Line 1798: RAISE Fnd_Api.G_EXC_ERROR;

1794: END IF;
1795: ELSE
1796: Fnd_Message.SET_NAME('AHL','AHL_VWP_PLANNEDTASKMR');
1797: Fnd_Msg_Pub.ADD;
1798: RAISE Fnd_Api.G_EXC_ERROR;
1799: End IF;
1800: END IF;
1801: ------------------------End of API Body------------------------------------
1802: IF Fnd_Api.to_boolean (p_commit) THEN

Line 1802: IF Fnd_Api.to_boolean (p_commit) THEN

1798: RAISE Fnd_Api.G_EXC_ERROR;
1799: End IF;
1800: END IF;
1801: ------------------------End of API Body------------------------------------
1802: IF Fnd_Api.to_boolean (p_commit) THEN
1803: COMMIT;
1804: END IF;
1805:
1806: Fnd_Msg_Pub.count_and_get (

Line 1807: p_encoded => Fnd_Api.g_false,

1803: COMMIT;
1804: END IF;
1805:
1806: Fnd_Msg_Pub.count_and_get (
1807: p_encoded => Fnd_Api.g_false,
1808: p_count => x_msg_count,
1809: p_data => x_msg_data
1810: );
1811:

Line 1816: WHEN Fnd_Api.g_exc_error THEN

1812: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) THEN
1813: fnd_log.string(fnd_log.level_procedure,l_debug ||'.end','At the end of PLSQL procedure');
1814: END IF;
1815: EXCEPTION
1816: WHEN Fnd_Api.g_exc_error THEN
1817: ROLLBACK TO Delete_Planned_Task;
1818: x_return_status := Fnd_Api.g_ret_sts_error;
1819: Fnd_Msg_Pub.count_and_get (
1820: p_encoded => Fnd_Api.g_false,

Line 1818: x_return_status := Fnd_Api.g_ret_sts_error;

1814: END IF;
1815: EXCEPTION
1816: WHEN Fnd_Api.g_exc_error THEN
1817: ROLLBACK TO Delete_Planned_Task;
1818: x_return_status := Fnd_Api.g_ret_sts_error;
1819: Fnd_Msg_Pub.count_and_get (
1820: p_encoded => Fnd_Api.g_false,
1821: p_count => x_msg_count,
1822: p_data => x_msg_data

Line 1820: p_encoded => Fnd_Api.g_false,

1816: WHEN Fnd_Api.g_exc_error THEN
1817: ROLLBACK TO Delete_Planned_Task;
1818: x_return_status := Fnd_Api.g_ret_sts_error;
1819: Fnd_Msg_Pub.count_and_get (
1820: p_encoded => Fnd_Api.g_false,
1821: p_count => x_msg_count,
1822: p_data => x_msg_data
1823: );
1824:

Line 1825: WHEN Fnd_Api.g_exc_unexpected_error THEN

1821: p_count => x_msg_count,
1822: p_data => x_msg_data
1823: );
1824:
1825: WHEN Fnd_Api.g_exc_unexpected_error THEN
1826: ROLLBACK TO Delete_Planned_Task;
1827: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;
1828: Fnd_Msg_Pub.count_and_get (
1829: p_encoded => Fnd_Api.g_false,

Line 1827: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;

1823: );
1824:
1825: WHEN Fnd_Api.g_exc_unexpected_error THEN
1826: ROLLBACK TO Delete_Planned_Task;
1827: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;
1828: Fnd_Msg_Pub.count_and_get (
1829: p_encoded => Fnd_Api.g_false,
1830: p_count => x_msg_count,
1831: p_data => x_msg_data

Line 1829: p_encoded => Fnd_Api.g_false,

1825: WHEN Fnd_Api.g_exc_unexpected_error THEN
1826: ROLLBACK TO Delete_Planned_Task;
1827: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;
1828: Fnd_Msg_Pub.count_and_get (
1829: p_encoded => Fnd_Api.g_false,
1830: p_count => x_msg_count,
1831: p_data => x_msg_data
1832: );
1833:

Line 1836: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;

1832: );
1833:
1834: WHEN OTHERS THEN
1835: ROLLBACK TO Delete_Planned_Task;
1836: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;
1837: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_unexp_error)
1838: THEN
1839: Fnd_Msg_Pub.add_exc_msg (G_PKG_NAME, l_api_name);
1840: END IF;

Line 1842: p_encoded => Fnd_Api.g_false,

1838: THEN
1839: Fnd_Msg_Pub.add_exc_msg (G_PKG_NAME, l_api_name);
1840: END IF;
1841: Fnd_Msg_Pub.count_and_get (
1842: p_encoded => Fnd_Api.g_false,
1843: p_count => x_msg_count,
1844: p_data => x_msg_data
1845: );
1846:

Line 1870: x_return_status := FND_API.G_RET_STS_SUCCESS;

1866:
1867: BEGIN
1868: --
1869: -- Validate required items.
1870: x_return_status := FND_API.G_RET_STS_SUCCESS;
1871:
1872: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) THEN
1873: fnd_log.string(fnd_log.level_procedure,l_debug||'.begin', 'At the start of the procedure..');
1874: fnd_log.string(fnd_log.level_procedure,l_debug, 'Before Check_Visit_Task_Req_Items');

Line 1881: IF x_return_status <> Fnd_Api.g_ret_sts_success THEN

1877: Check_Visit_Task_Req_Items (
1878: p_task_rec => p_task_rec,
1879: x_return_status => x_return_status
1880: );
1881: IF x_return_status <> Fnd_Api.g_ret_sts_success THEN
1882: RETURN;
1883: END IF;
1884:
1885: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN

Line 1899: IF x_return_status <> Fnd_Api.g_ret_sts_success THEN

1895: p_task_rec => p_task_rec,
1896: p_validation_mode => p_validation_mode,
1897: x_return_status => x_return_status
1898: );
1899: IF x_return_status <> Fnd_Api.g_ret_sts_success THEN
1900: RETURN;
1901: END IF;
1902:
1903: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) THEN

Line 1940: RAISE Fnd_Api.g_exc_error;

1936: IF c_Visit_Task%NOTFOUND THEN
1937: CLOSE c_Visit_Task;
1938: Fnd_Message.set_name('AHL', 'AHL_API_RECORD_NOT_FOUND');
1939: Fnd_Msg_Pub.ADD;
1940: RAISE Fnd_Api.g_exc_error;
1941: END IF;
1942: CLOSE c_Visit_Task;
1943:
1944: END Complete_Visit_Task_Rec;

Line 1965: x_return_status := FND_API.G_RET_STS_SUCCESS;

1961: l_debug CONSTANT VARCHAR2(90) := 'ahl.plsql.'||L_FULL_NAME;
1962:
1963: BEGIN
1964:
1965: x_return_status := FND_API.G_RET_STS_SUCCESS;
1966:
1967: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) THEN
1968: fnd_log.string(fnd_log.level_procedure,l_debug,'At the Start of Check_Visit_Task_Req_Items ');
1969: END IF;

Line 1972: IF (p_task_rec.VISIT_TASK_NAME IS NULL OR p_Task_rec.VISIT_TASK_NAME = Fnd_Api.G_MISS_CHAR) THEN

1968: fnd_log.string(fnd_log.level_procedure,l_debug,'At the Start of Check_Visit_Task_Req_Items ');
1969: END IF;
1970:
1971: -- TASK NAME ==== NAME
1972: IF (p_task_rec.VISIT_TASK_NAME IS NULL OR p_Task_rec.VISIT_TASK_NAME = Fnd_Api.G_MISS_CHAR) THEN
1973: Fnd_Message.set_name ('AHL', 'AHL_VWP_NAME_MISSING');
1974: Fnd_Msg_Pub.ADD;
1975: x_return_status := Fnd_Api.g_ret_sts_error;
1976: RETURN;

Line 1975: x_return_status := Fnd_Api.g_ret_sts_error;

1971: -- TASK NAME ==== NAME
1972: IF (p_task_rec.VISIT_TASK_NAME IS NULL OR p_Task_rec.VISIT_TASK_NAME = Fnd_Api.G_MISS_CHAR) THEN
1973: Fnd_Message.set_name ('AHL', 'AHL_VWP_NAME_MISSING');
1974: Fnd_Msg_Pub.ADD;
1975: x_return_status := Fnd_Api.g_ret_sts_error;
1976: RETURN;
1977: END IF;
1978:
1979: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN

Line 1983: IF (p_task_rec.START_FROM_HOUR IS NOT NULL and p_Task_rec.START_FROM_HOUR <> Fnd_Api.G_MISS_NUM) THEN

1979: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN
1980: fnd_log.string(fnd_log.level_statement,l_debug,'Inside Validation Start from Hour = ' || p_task_rec.START_FROM_HOUR);
1981: END IF;
1982:
1983: IF (p_task_rec.START_FROM_HOUR IS NOT NULL and p_Task_rec.START_FROM_HOUR <> Fnd_Api.G_MISS_NUM) THEN
1984: IF p_task_rec.START_FROM_HOUR < 0 OR FLOOR(p_task_rec.START_FROM_HOUR) <> p_task_rec.START_FROM_HOUR THEN
1985: Fnd_Message.set_name ('AHL', 'AHL_VWP_ONLY_POSITIVE_VALUE');
1986: Fnd_Msg_Pub.ADD;
1987: x_return_status := Fnd_Api.g_ret_sts_error;

Line 1987: x_return_status := Fnd_Api.g_ret_sts_error;

1983: IF (p_task_rec.START_FROM_HOUR IS NOT NULL and p_Task_rec.START_FROM_HOUR <> Fnd_Api.G_MISS_NUM) THEN
1984: IF p_task_rec.START_FROM_HOUR < 0 OR FLOOR(p_task_rec.START_FROM_HOUR) <> p_task_rec.START_FROM_HOUR THEN
1985: Fnd_Message.set_name ('AHL', 'AHL_VWP_ONLY_POSITIVE_VALUE');
1986: Fnd_Msg_Pub.ADD;
1987: x_return_status := Fnd_Api.g_ret_sts_error;
1988: RETURN;
1989: END IF;
1990: END IF;
1991:

Line 2013: x_return_status := Fnd_Api.g_ret_sts_success;

2009: l_full_name CONSTANT VARCHAR2(60) := G_PKG_NAME || '.' || l_Api_name;
2010: l_debug CONSTANT VARCHAR2(90) := 'ahl.plsql.'||L_FULL_NAME;
2011:
2012: BEGIN
2013: x_return_status := Fnd_Api.g_ret_sts_success;
2014: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) THEN
2015: fnd_log.string(fnd_log.level_procedure,l_debug,'At the Start of Check_Visit_Task_UK_Items ');
2016: END IF;
2017: --

Line 2028: ) = Fnd_Api.g_false

2024: -- FOR CREATION
2025: IF Ahl_Utility_Pvt.check_uniqueness(
2026: 'Ahl_Visit_Tasks_vl',
2027: 'Visit_Task_ID = ' || p_task_rec.Visit_Task_ID
2028: ) = Fnd_Api.g_false
2029: THEN
2030: Fnd_Message.set_name ('AHL', 'AHL_VWP_DUPLICATE_TASK_ID');
2031: Fnd_Msg_Pub.ADD;
2032: x_return_status := Fnd_Api.g_ret_sts_error;

Line 2032: x_return_status := Fnd_Api.g_ret_sts_error;

2028: ) = Fnd_Api.g_false
2029: THEN
2030: Fnd_Message.set_name ('AHL', 'AHL_VWP_DUPLICATE_TASK_ID');
2031: Fnd_Msg_Pub.ADD;
2032: x_return_status := Fnd_Api.g_ret_sts_error;
2033: RETURN;
2034: END IF;
2035: END IF;
2036: