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 76: p_init_msg_list IN VARCHAR2 := Fnd_Api.g_false,

72: -- To Validate_Visit_Task
73: /*
74: PROCEDURE Validate_Visit_Task (
75: p_api_version IN NUMBER,
76: p_init_msg_list IN VARCHAR2 := Fnd_Api.g_false,
77: p_commit IN VARCHAR2 := Fnd_Api.g_false,
78: p_validation_level IN NUMBER := Fnd_Api.g_valid_level_full,
79: p_Task_rec IN AHL_VWP_RULES_PVT.task_rec_type,
80: x_return_status OUT NOCOPY VARCHAR2,

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

73: /*
74: PROCEDURE Validate_Visit_Task (
75: p_api_version IN NUMBER,
76: p_init_msg_list IN VARCHAR2 := Fnd_Api.g_false,
77: p_commit IN VARCHAR2 := Fnd_Api.g_false,
78: p_validation_level IN NUMBER := Fnd_Api.g_valid_level_full,
79: p_Task_rec IN AHL_VWP_RULES_PVT.task_rec_type,
80: x_return_status OUT NOCOPY VARCHAR2,
81: x_msg_count OUT NOCOPY NUMBER,

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

74: PROCEDURE Validate_Visit_Task (
75: p_api_version IN NUMBER,
76: p_init_msg_list IN VARCHAR2 := Fnd_Api.g_false,
77: p_commit IN VARCHAR2 := Fnd_Api.g_false,
78: p_validation_level IN NUMBER := Fnd_Api.g_valid_level_full,
79: p_Task_rec IN AHL_VWP_RULES_PVT.task_rec_type,
80: x_return_status OUT NOCOPY VARCHAR2,
81: x_msg_count OUT NOCOPY NUMBER,
82: x_msg_data OUT NOCOPY VARCHAR2

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

112: PROCEDURE Default_Missing_Attribs
113: ( p_x_task_rec IN OUT NOCOPY AHL_VWP_RULES_PVT.Task_Rec_Type)
114: AS
115: BEGIN
116: IF p_x_task_rec.DURATION = Fnd_Api.G_MISS_NUM THEN
117: p_x_task_rec.DURATION := NULL;
118: ELSE
119: p_x_task_rec.DURATION := p_x_task_rec.DURATION;
120: END IF;

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

166: ELSE
167: p_x_task_rec.ORIGINATING_TASK_ID := p_x_task_rec.ORIGINATING_TASK_ID;
168: END IF;
169:
170: IF p_x_task_rec.SERVICE_REQUEST_ID = Fnd_Api.G_MISS_NUM THEN
171: p_x_task_rec.SERVICE_REQUEST_ID := NULL;
172: ELSE
173: p_x_task_rec.SERVICE_REQUEST_ID := p_x_task_rec.SERVICE_REQUEST_ID;
174: END IF;

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

274: ELSE
275: p_x_task_rec.description := p_x_task_rec.description;
276: END IF;
277:
278: IF p_x_task_rec.STAGE_NAME = Fnd_Api.G_MISS_CHAR THEN
279: p_x_task_rec.STAGE_NAME := NULL;
280: ELSE
281: p_x_task_rec.STAGE_NAME := p_x_task_rec.STAGE_NAME;
282: END IF;

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

328: CLOSE c_visit;
329:
330: IF c_visit_rec.organization_id IS NOT NULL THEN
331: -- Get dept code using dept description
332: IF (p_x_task_Rec.dept_name IS NOT NULL AND p_x_task_Rec.dept_name <> Fnd_Api.G_MISS_CHAR ) THEN
333: AHL_VWP_RULES_PVT.Check_Dept_Desc_Or_Id
334: (p_organization_id => c_visit_rec.organization_id,
335: p_dept_name => p_x_task_Rec.dept_name,
336: p_department_id => Null,

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

337: x_department_id => p_x_task_Rec.department_id,
338: x_return_status => l_return_status,
339: x_error_msg_code => l_msg_data);
340:
341: IF NVL(l_return_status,'x') <> FND_API.G_RET_STS_SUCCESS THEN
342: Fnd_Message.SET_NAME('AHL','AHL_VWP_DEPT_NOT_EXISTS');
343: Fnd_Msg_Pub.ADD;
344: RAISE Fnd_Api.G_EXC_ERROR;
345: END IF;

Line 344: RAISE Fnd_Api.G_EXC_ERROR;

340:
341: IF NVL(l_return_status,'x') <> FND_API.G_RET_STS_SUCCESS THEN
342: Fnd_Message.SET_NAME('AHL','AHL_VWP_DEPT_NOT_EXISTS');
343: Fnd_Msg_Pub.ADD;
344: RAISE Fnd_Api.G_EXC_ERROR;
345: END IF;
346:
347: -- Changes for Post 11.5.10 by amagrawa
348: AHL_VWP_RULES_PVT.CHECK_DEPARTMENT_SHIFT

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

348: AHL_VWP_RULES_PVT.CHECK_DEPARTMENT_SHIFT
349: (P_DEPT_ID => p_x_task_Rec.department_id,
350: X_RETURN_STATUS => l_return_status);
351:
352: IF (NVL(l_return_status,'x') <> FND_API.G_RET_STS_SUCCESS) THEN
353: Fnd_Message.SET_NAME('AHL','AHL_VWP_NO_DEPT_SHIFT');
354: Fnd_Msg_Pub.ADD;
355: RAISE Fnd_Api.G_EXC_ERROR;
356: END IF;

Line 355: RAISE Fnd_Api.G_EXC_ERROR;

351:
352: IF (NVL(l_return_status,'x') <> FND_API.G_RET_STS_SUCCESS) THEN
353: Fnd_Message.SET_NAME('AHL','AHL_VWP_NO_DEPT_SHIFT');
354: Fnd_Msg_Pub.ADD;
355: RAISE Fnd_Api.G_EXC_ERROR;
356: END IF;
357: ELSE
358: p_x_task_Rec.dept_name := NULL;
359: -- Post 11.5.10 Changes by Senthil.

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

365: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN
366: fnd_log.string(fnd_log.level_statement,L_DEBUG,' Dept ID= ' || p_x_task_Rec.department_id);
367: END IF;
368: ELSE -- Else of if visit org not exists
369: IF (p_x_task_Rec.dept_name IS NOT NULL AND p_x_task_Rec.dept_name <> Fnd_Api.G_MISS_CHAR ) THEN
370: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN
371: fnd_log.string(fnd_log.level_statement,L_DEBUG,' NO ORGANIZATION FOR VISIT');
372: END IF;
373: Fnd_Message.SET_NAME('AHL','AHL_VWP_VISIT_NO_ORG_EXISTS');

Line 375: RAISE Fnd_Api.G_EXC_ERROR;

371: fnd_log.string(fnd_log.level_statement,L_DEBUG,' NO ORGANIZATION FOR VISIT');
372: END IF;
373: Fnd_Message.SET_NAME('AHL','AHL_VWP_VISIT_NO_ORG_EXISTS');
374: Fnd_Msg_Pub.ADD;
375: RAISE Fnd_Api.G_EXC_ERROR;
376: END IF;
377: END IF; -- End of if visit org exists
378:
379: /*Convert service request number to service request id

Line 380: 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

376: END IF;
377: END IF; -- End of if visit org exists
378:
379: /*Convert service request number to service request id
380: 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
381: AHL_VWP_RULES_PVT.Check_SR_Request_Number_Or_Id
382: (p_service_id => Null,
383: p_service_number => p_x_task_Rec.service_request_number,
384: x_service_id => p_x_task_Rec.service_request_id,

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

384: x_service_id => p_x_task_Rec.service_request_id,
385: x_return_status => l_return_status,
386: x_error_msg_code => l_msg_data);
387:
388: IF NVL(l_return_status,'x') <> FND_API.G_RET_STS_SUCCESS THEN
389: Fnd_Message.SET_NAME('AHL','AHL_VWP_SERVICE_REQ_NOT_EXISTS');
390: Fnd_Msg_Pub.ADD;
391: RAISE Fnd_Api.g_exc_error;
392: END IF;

Line 391: RAISE Fnd_Api.g_exc_error;

387:
388: IF NVL(l_return_status,'x') <> FND_API.G_RET_STS_SUCCESS THEN
389: Fnd_Message.SET_NAME('AHL','AHL_VWP_SERVICE_REQ_NOT_EXISTS');
390: Fnd_Msg_Pub.ADD;
391: RAISE Fnd_Api.g_exc_error;
392: END IF;
393:
394: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) THEN
395: fnd_log.string(fnd_log.level_procedure,'ahl.plsql.', l_full_name ||': Service ID= ' || p_x_task_Rec.service_request_id);

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

407: END Asso_Inst_Dept_to_Tasks;
408:
409: PROCEDURE Create_Planned_Task (
410: p_api_version IN NUMBER,
411: p_init_msg_list IN VARCHAR2 := Fnd_Api.g_false,
412: p_commit IN VARCHAR2 := Fnd_Api.g_false,
413: p_validation_level IN NUMBER := Fnd_Api.g_valid_level_full,
414: p_module_type IN VARCHAR2 := 'JSP',
415: p_x_task_Rec IN OUT NOCOPY AHL_VWP_RULES_PVT.task_rec_type,

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

408:
409: PROCEDURE Create_Planned_Task (
410: p_api_version IN NUMBER,
411: p_init_msg_list IN VARCHAR2 := Fnd_Api.g_false,
412: p_commit IN VARCHAR2 := Fnd_Api.g_false,
413: p_validation_level IN NUMBER := Fnd_Api.g_valid_level_full,
414: p_module_type IN VARCHAR2 := 'JSP',
415: p_x_task_Rec IN OUT NOCOPY AHL_VWP_RULES_PVT.task_rec_type,
416: x_return_status OUT NOCOPY VARCHAR2,

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

409: PROCEDURE Create_Planned_Task (
410: p_api_version IN NUMBER,
411: p_init_msg_list IN VARCHAR2 := Fnd_Api.g_false,
412: p_commit IN VARCHAR2 := Fnd_Api.g_false,
413: p_validation_level IN NUMBER := Fnd_Api.g_valid_level_full,
414: p_module_type IN VARCHAR2 := 'JSP',
415: p_x_task_Rec IN OUT NOCOPY AHL_VWP_RULES_PVT.task_rec_type,
416: x_return_status OUT NOCOPY VARCHAR2,
417: x_msg_count OUT NOCOPY NUMBER,

Line 627: IF Fnd_Api.to_boolean (p_init_msg_list) THEN

623: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) THEN
624: fnd_log.string(fnd_log.level_procedure, L_DEBUG||'.begin','At the start of PLSQL procedure');
625: END IF;
626:
627: IF Fnd_Api.to_boolean (p_init_msg_list) THEN
628: Fnd_Msg_Pub.initialize;
629: END IF;
630:
631: IF NOT Fnd_Api.compatible_api_call (

Line 631: IF NOT Fnd_Api.compatible_api_call (

627: IF Fnd_Api.to_boolean (p_init_msg_list) THEN
628: Fnd_Msg_Pub.initialize;
629: END IF;
630:
631: IF NOT Fnd_Api.compatible_api_call (
632: L_API_VERSION,
633: p_api_version,
634: L_API_NAME,
635: G_PKG_NAME

Line 637: RAISE Fnd_Api.g_exc_unexpected_error;

633: p_api_version,
634: L_API_NAME,
635: G_PKG_NAME
636: ) THEN
637: RAISE Fnd_Api.g_exc_unexpected_error;
638: END IF;
639:
640: x_return_status := Fnd_Api.g_ret_sts_success;
641:

Line 640: x_return_status := Fnd_Api.g_ret_sts_success;

636: ) THEN
637: RAISE Fnd_Api.g_exc_unexpected_error;
638: END IF;
639:
640: x_return_status := Fnd_Api.g_ret_sts_success;
641:
642: --SKPATHAK :: ER: 9147951 :: 11-JAN-2010 :: Populate the values from input record to local variables
643: l_past_task_start_date := p_x_task_Rec.past_task_start_date;
644: l_past_task_end_date := p_x_task_Rec.past_task_end_date;

Line 667: IF l_department_id = FND_API.g_miss_num THEN

663: l_service_req_id := p_x_task_Rec.service_request_id;
664: l_department_id := p_x_task_Rec.department_id;
665: l_unit_effectivity_id := p_x_task_Rec.unit_effectivity_id;
666:
667: IF l_department_id = FND_API.g_miss_num THEN
668: l_department_id := NULL;
669: END IF;
670:
671: -- Cursor to retrieve visit info

Line 688: x_return_status := Fnd_Api.g_ret_sts_error;

684: condition p_module_type <> 'SR')*/
685: IF c_unit%FOUND AND p_module_type <> 'SR' THEN
686: CLOSE c_unit;
687: -- ERROR MESSAGE
688: x_return_status := Fnd_Api.g_ret_sts_error;
689: Fnd_Message.SET_NAME('AHL','AHL_VWP_UNIT_FOUND');
690: Fnd_Message.SET_TOKEN('VISIT_NUMBER', l_visit_number);
691: Fnd_Msg_Pub.ADD;
692: ELSE -- UE not planned in any other Visit

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

785: fnd_log.string(fnd_log.level_statement,L_DEBUG, 'After AHL_VWP_RULES_PVT.Insert_Tasks for Planned Task');
786: fnd_log.string(fnd_log.level_statement,L_DEBUG, 'l_return_status' || l_return_status);
787: END IF;
788:
789: IF NVL(l_return_status,'x') <> FND_API.G_RET_STS_SUCCESS THEN
790: CLOSE c_task_for_ue; -- NR-MR Changes - sowsubra
791: RAISE Fnd_Api.G_EXC_ERROR;
792: END IF;
793: /*NR-MR Changes - sowsubra*/

Line 791: RAISE Fnd_Api.G_EXC_ERROR;

787: END IF;
788:
789: IF NVL(l_return_status,'x') <> FND_API.G_RET_STS_SUCCESS THEN
790: CLOSE c_task_for_ue; -- NR-MR Changes - sowsubra
791: RAISE Fnd_Api.G_EXC_ERROR;
792: END IF;
793: /*NR-MR Changes - sowsubra*/
794: END IF; --c_task_for_ue%NOTFOUND
795: CLOSE c_task_for_ue;

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

832:
833: -- NR-MR Changes - sowsubra
834: -- Done to allow creation of a task for an instance that has already been removed.
835: /***
836: IF AHL_VWP_RULES_PVT.instance_in_config_tree(l_visit_id, l_serial_id) = FND_API.G_RET_STS_ERROR THEN
837: Fnd_Message.SET_NAME('AHL','AHL_VWP_TASK_SERIAL');
838: Fnd_Msg_Pub.ADD;
839: RAISE Fnd_Api.G_EXC_ERROR;
840: END IF; ***/

Line 839: RAISE Fnd_Api.G_EXC_ERROR;

835: /***
836: IF AHL_VWP_RULES_PVT.instance_in_config_tree(l_visit_id, l_serial_id) = FND_API.G_RET_STS_ERROR THEN
837: Fnd_Message.SET_NAME('AHL','AHL_VWP_TASK_SERIAL');
838: Fnd_Msg_Pub.ADD;
839: RAISE Fnd_Api.G_EXC_ERROR;
840: END IF; ***/
841:
842: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN
843: fnd_log.string(fnd_log.level_statement,L_DEBUG, 'Inside No Child UEs ELSE BLOCK');

Line 888: IF (NVL(l_return_status,'x') = FND_API.G_RET_STS_SUCCESS AND l_task_id IS NOT NULL AND p_x_task_Rec.duration IS NOT NULL) THEN

884: 'Id of the parent summary Task: ' || l_parent_task_id ||
885: ', p_x_task_Rec.duration: ' || p_x_task_Rec.duration ||
886: ', return_status from AHL_VWP_RULES_PVT.Insert_Tasks: ' || l_return_status );
887: END IF;
888: IF (NVL(l_return_status,'x') = FND_API.G_RET_STS_SUCCESS AND l_task_id IS NOT NULL AND p_x_task_Rec.duration IS NOT NULL) THEN
889: -- Update the duration column for the Planned task as well as its parent summary task with the user entered Estimated Duration
890: UPDATE AHL_VISIT_TASKS_B
891: SET DURATION = p_x_task_Rec.duration
892: WHERE VISIT_TASK_ID IN(l_task_id,l_parent_task_id) ;

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

896: END IF;
897: END IF;
898: -- TCHIMIRA::ER 9368251 ::17-JUN-2010::End
899:
900: IF NVL(l_return_status,'x') <> FND_API.G_RET_STS_SUCCESS THEN
901: RAISE Fnd_Api.G_EXC_ERROR;
902: END IF;
903: END IF; -- Child UE Check
904:

Line 901: RAISE Fnd_Api.G_EXC_ERROR;

897: END IF;
898: -- TCHIMIRA::ER 9368251 ::17-JUN-2010::End
899:
900: IF NVL(l_return_status,'x') <> FND_API.G_RET_STS_SUCCESS THEN
901: RAISE Fnd_Api.G_EXC_ERROR;
902: END IF;
903: END IF; -- Child UE Check
904:
905: -- Call Service Request package to update the status.

Line 923: p_init_msg_list => FND_API.G_TRUE,

919: --l_service_request_rec.status_name := l_status_name;
920: /*
921: CS_SERVICEREQUEST_PUB.Update_ServiceRequest(
922: p_api_version => 3.0,
923: p_init_msg_list => FND_API.G_TRUE,
924: p_commit => FND_API.G_FALSE,
925: x_return_status => x_return_status,
926: x_msg_count => l_msg_count,
927: x_msg_data => l_msg_data,

Line 924: p_commit => FND_API.G_FALSE,

920: /*
921: CS_SERVICEREQUEST_PUB.Update_ServiceRequest(
922: p_api_version => 3.0,
923: p_init_msg_list => FND_API.G_TRUE,
924: p_commit => FND_API.G_FALSE,
925: x_return_status => x_return_status,
926: x_msg_count => l_msg_count,
927: x_msg_data => l_msg_data,
928: p_request_id => l_incident_id,

Line 951: RAISE FND_API.G_EXC_ERROR;

947:
948: -- Check Error Message stack.
949: x_msg_count := FND_MSG_PUB.count_msg;
950: IF x_msg_count > 0 THEN
951: RAISE FND_API.G_EXC_ERROR;
952: END IF;
953:
954: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN
955: fnd_log.string(fnd_log.level_statement,L_DEBUG, 'Before CS_ServiceRequest_PUB.Update_Status ');

Line 961: p_init_msg_list => FND_API.G_TRUE,

957: -- anraj changed the api
958: CS_ServiceRequest_PUB.Update_Status
959: (
960: p_api_version => 2.0,
961: p_init_msg_list => FND_API.G_TRUE,
962: p_commit => FND_API.G_FALSE,
963: p_resp_appl_id => NULL,
964: p_resp_id => NULL,
965: p_user_id => NULL,

Line 962: p_commit => FND_API.G_FALSE,

958: CS_ServiceRequest_PUB.Update_Status
959: (
960: p_api_version => 2.0,
961: p_init_msg_list => FND_API.G_TRUE,
962: p_commit => FND_API.G_FALSE,
963: p_resp_appl_id => NULL,
964: p_resp_id => NULL,
965: p_user_id => NULL,
966: p_login_id => NULL,

Line 970: p_called_by_workflow => FND_API.G_FALSE,

966: p_login_id => NULL,
967: p_status_id => 52,
968: p_closed_date => NULL,
969: p_audit_comments => NULL,
970: p_called_by_workflow => FND_API.G_FALSE,
971: p_workflow_process_id => NULL,
972: p_comments => NULL,
973: p_public_comment_flag => FND_API.G_FALSE,
974: p_validate_sr_closure => 'N',

Line 973: p_public_comment_flag => FND_API.G_FALSE,

969: p_audit_comments => NULL,
970: p_called_by_workflow => FND_API.G_FALSE,
971: p_workflow_process_id => NULL,
972: p_comments => NULL,
973: p_public_comment_flag => FND_API.G_FALSE,
974: p_validate_sr_closure => 'N',
975: p_auto_close_child_entities => 'N',
976: p_request_id => l_incident_id,
977: p_request_number => NULL,

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

986: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN
987: fnd_log.string(fnd_log.level_statement,L_DEBUG, 'After CS_ServiceRequest_PUB.Update_Status - Return Status - '||x_return_status );
988: END IF;
989:
990: IF NVL(x_return_status,'x') <> FND_API.G_RET_STS_SUCCESS THEN
991: RAISE Fnd_Api.G_EXC_ERROR;
992: ELSE
993: Fnd_Msg_Pub.initialize;
994: END IF;

Line 991: RAISE Fnd_Api.G_EXC_ERROR;

987: fnd_log.string(fnd_log.level_statement,L_DEBUG, 'After CS_ServiceRequest_PUB.Update_Status - Return Status - '||x_return_status );
988: END IF;
989:
990: IF NVL(x_return_status,'x') <> FND_API.G_RET_STS_SUCCESS THEN
991: RAISE Fnd_Api.G_EXC_ERROR;
992: ELSE
993: Fnd_Msg_Pub.initialize;
994: END IF;
995: END IF; -- SR/MR

Line 1009: RAISE FND_API.G_EXC_ERROR;

1005: END IF; -- c_unit%FOUND
1006: ELSE -- l_unit_effectivity_id
1007: Fnd_Message.SET_NAME('AHL','AHL_VWP_NO_UNIT_EFFECTIVITY');
1008: Fnd_Msg_Pub.ADD;
1009: RAISE FND_API.G_EXC_ERROR;
1010: END IF; -- End of unit effectivity check
1011:
1012: OPEN C_VISIT(l_visit_id);
1013: fetch c_visit into l_visit_csr_rec;

Line 1022: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN

1018: p_flag =>'Y',
1019: x_return_status =>x_return_status);
1020: END IF;
1021:
1022: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1023: CLOSE C_VISIT;
1024: RAISE FND_API.G_EXC_ERROR;
1025: END IF;
1026: END IF;

Line 1024: RAISE FND_API.G_EXC_ERROR;

1020: END IF;
1021:
1022: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1023: CLOSE C_VISIT;
1024: RAISE FND_API.G_EXC_ERROR;
1025: END IF;
1026: END IF;
1027: CLOSE C_VISIT;
1028:

Line 1033: p_encoded => Fnd_Api.g_false,

1029: ------------------------- finish -------------------------------
1030: -- Standard call to get message count and if count is 1, get message info
1031: Fnd_Msg_Pub.count_and_get
1032: (
1033: p_encoded => Fnd_Api.g_false,
1034: p_count => x_msg_count,
1035: p_data => x_msg_data
1036: );
1037:

Line 1041: RAISE FND_API.G_EXC_ERROR;

1037:
1038: -- Check Error Message stack.
1039: x_msg_count := FND_MSG_PUB.count_msg;
1040: IF x_msg_count > 0 THEN
1041: RAISE FND_API.G_EXC_ERROR;
1042: END IF;
1043:
1044: -- Standard check of p_commit.
1045: IF Fnd_Api.To_Boolean ( p_commit ) THEN

Line 1045: IF Fnd_Api.To_Boolean ( p_commit ) THEN

1041: RAISE FND_API.G_EXC_ERROR;
1042: END IF;
1043:
1044: -- Standard check of p_commit.
1045: IF Fnd_Api.To_Boolean ( p_commit ) THEN
1046: COMMIT WORK;
1047: END IF;
1048:
1049: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) THEN

Line 1054: WHEN Fnd_Api.g_exc_error THEN

1050: fnd_log.string(fnd_log.level_procedure,L_DEBUG||'.end','At the end of PLSQL procedure');
1051: END IF;
1052:
1053: EXCEPTION
1054: WHEN Fnd_Api.g_exc_error THEN
1055: ROLLBACK TO Create_Planned_Task;
1056: x_return_status := Fnd_Api.g_ret_sts_error;
1057: Fnd_Msg_Pub.count_and_get(
1058: p_encoded => Fnd_Api.g_false,

Line 1056: x_return_status := Fnd_Api.g_ret_sts_error;

1052:
1053: EXCEPTION
1054: WHEN Fnd_Api.g_exc_error THEN
1055: ROLLBACK TO Create_Planned_Task;
1056: x_return_status := Fnd_Api.g_ret_sts_error;
1057: Fnd_Msg_Pub.count_and_get(
1058: p_encoded => Fnd_Api.g_false,
1059: p_count => x_msg_count,
1060: p_data => x_msg_data

Line 1058: p_encoded => Fnd_Api.g_false,

1054: WHEN Fnd_Api.g_exc_error THEN
1055: ROLLBACK TO Create_Planned_Task;
1056: x_return_status := Fnd_Api.g_ret_sts_error;
1057: Fnd_Msg_Pub.count_and_get(
1058: p_encoded => Fnd_Api.g_false,
1059: p_count => x_msg_count,
1060: p_data => x_msg_data
1061: );
1062: WHEN Fnd_Api.g_exc_unexpected_error THEN

Line 1062: WHEN Fnd_Api.g_exc_unexpected_error THEN

1058: p_encoded => Fnd_Api.g_false,
1059: p_count => x_msg_count,
1060: p_data => x_msg_data
1061: );
1062: WHEN Fnd_Api.g_exc_unexpected_error THEN
1063: ROLLBACK TO Create_Planned_Task;
1064: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;
1065: Fnd_Msg_Pub.count_and_get (
1066: p_encoded => Fnd_Api.g_false,

Line 1064: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;

1060: p_data => x_msg_data
1061: );
1062: WHEN Fnd_Api.g_exc_unexpected_error THEN
1063: ROLLBACK TO Create_Planned_Task;
1064: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;
1065: Fnd_Msg_Pub.count_and_get (
1066: p_encoded => Fnd_Api.g_false,
1067: p_count => x_msg_count,
1068: p_data => x_msg_data

Line 1066: p_encoded => Fnd_Api.g_false,

1062: WHEN Fnd_Api.g_exc_unexpected_error THEN
1063: ROLLBACK TO Create_Planned_Task;
1064: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;
1065: Fnd_Msg_Pub.count_and_get (
1066: p_encoded => Fnd_Api.g_false,
1067: p_count => x_msg_count,
1068: p_data => x_msg_data
1069: );
1070: WHEN OTHERS THEN

Line 1072: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;

1068: p_data => x_msg_data
1069: );
1070: WHEN OTHERS THEN
1071: ROLLBACK TO Create_Planned_Task;
1072: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;
1073: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_unexp_error)
1074: THEN
1075: Fnd_Msg_Pub.add_exc_msg (G_PKG_NAME, l_api_name);
1076: END IF;

Line 1078: p_encoded => Fnd_Api.g_false,

1074: THEN
1075: Fnd_Msg_Pub.add_exc_msg (G_PKG_NAME, l_api_name);
1076: END IF;
1077: Fnd_Msg_Pub.count_and_get (
1078: p_encoded => Fnd_Api.g_false,
1079: p_count => x_msg_count,
1080: p_data => x_msg_data
1081: );
1082: END Create_Planned_Task;

Line 1240: RAISE Fnd_Api.G_EXC_ERROR;

1236: IF c_validate_mr%FOUND THEN
1237: CLOSE c_validate_mr;
1238: Fnd_Message.SET_NAME('AHL','AHL_VWP_NR_MR_EXPIRED');
1239: Fnd_Msg_Pub.ADD;
1240: RAISE Fnd_Api.G_EXC_ERROR;
1241: END IF;
1242: CLOSE c_validate_mr;
1243:
1244:

Line 1260: RAISE Fnd_Api.G_EXC_ERROR;

1256: IF c_validate_child_mrs%FOUND THEN
1257: CLOSE c_validate_child_mrs;
1258: Fnd_Message.SET_NAME('AHL','AHL_VWP_NR_MR_EXPIRED');
1259: Fnd_Msg_Pub.ADD;
1260: RAISE Fnd_Api.G_EXC_ERROR;
1261: END IF;
1262: CLOSE c_validate_child_mrs;
1263:
1264: OPEN c_info (l_mr_header_id, l_unit_eff_id);

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

1273:
1274: -- NR-MR Changes - sowsubra
1275: -- Done to allow creation of a task for an instance that has already been removed.
1276: /***
1277: IF AHL_VWP_RULES_PVT.instance_in_config_tree(p_visit_id, l_serial_id) = FND_API.G_RET_STS_ERROR THEN
1278: Fnd_Message.SET_NAME('AHL','AHL_VWP_TASK_SERIAL');
1279: Fnd_Msg_Pub.ADD;
1280: RAISE Fnd_Api.G_EXC_ERROR;
1281: END IF;

Line 1280: RAISE Fnd_Api.G_EXC_ERROR;

1276: /***
1277: IF AHL_VWP_RULES_PVT.instance_in_config_tree(p_visit_id, l_serial_id) = FND_API.G_RET_STS_ERROR THEN
1278: Fnd_Message.SET_NAME('AHL','AHL_VWP_TASK_SERIAL');
1279: Fnd_Msg_Pub.ADD;
1280: RAISE Fnd_Api.G_EXC_ERROR;
1281: END IF;
1282: ***/
1283:
1284: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN

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

1319: fnd_log.string(fnd_log.level_statement,L_DEBUG, 'p_x_parent_MR_Id = ' || l_parent_MR_Id );
1320: fnd_log.string(fnd_log.level_statement,L_DEBUG, 'x_return_status is ' || l_return_status );
1321: END IF;
1322:
1323: IF NVL(l_return_status,'x') <> FND_API.G_RET_STS_SUCCESS THEN
1324: RAISE Fnd_Api.G_EXC_ERROR;
1325: END IF;
1326:
1327: MR_Serial_Tbl(0).MR_ID := l_mr_header_id ;

Line 1324: RAISE Fnd_Api.G_EXC_ERROR;

1320: fnd_log.string(fnd_log.level_statement,L_DEBUG, 'x_return_status is ' || l_return_status );
1321: END IF;
1322:
1323: IF NVL(l_return_status,'x') <> FND_API.G_RET_STS_SUCCESS THEN
1324: RAISE Fnd_Api.G_EXC_ERROR;
1325: END IF;
1326:
1327: MR_Serial_Tbl(0).MR_ID := l_mr_header_id ;
1328: MR_Serial_Tbl(0).Serial_ID := l_serial_id;

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

1344: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN
1345: fnd_log.string(fnd_log.level_statement,L_DEBUG, 'After AHL_VWP_RULES_PVT.Tech_Dependency - l_return_status : '||l_return_status);
1346: END IF;
1347:
1348: IF NVL(l_return_status,'x') <> FND_API.G_RET_STS_SUCCESS THEN
1349: RAISE Fnd_Api.G_EXC_ERROR;
1350: END IF;
1351: ELSE
1352: CLOSE c_header;

Line 1349: RAISE Fnd_Api.G_EXC_ERROR;

1345: fnd_log.string(fnd_log.level_statement,L_DEBUG, 'After AHL_VWP_RULES_PVT.Tech_Dependency - l_return_status : '||l_return_status);
1346: END IF;
1347:
1348: IF NVL(l_return_status,'x') <> FND_API.G_RET_STS_SUCCESS THEN
1349: RAISE Fnd_Api.G_EXC_ERROR;
1350: END IF;
1351: ELSE
1352: CLOSE c_header;
1353: END IF;

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

1424: -- To update Planned task for the Maintainance visit.
1425: --------------------------------------------------------------------
1426: PROCEDURE Update_Planned_Task (
1427: p_api_version IN NUMBER,
1428: p_init_msg_list IN VARCHAR2 := Fnd_Api.g_false,
1429: p_commit IN VARCHAR2 := Fnd_Api.g_false,
1430: p_validation_level IN NUMBER := Fnd_Api.g_valid_level_full,
1431: p_module_type IN VARCHAR2 := 'JSP',
1432: p_x_task_rec IN OUT NOCOPY AHL_VWP_RULES_PVT.Task_Rec_Type,

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

1425: --------------------------------------------------------------------
1426: PROCEDURE Update_Planned_Task (
1427: p_api_version IN NUMBER,
1428: p_init_msg_list IN VARCHAR2 := Fnd_Api.g_false,
1429: p_commit IN VARCHAR2 := Fnd_Api.g_false,
1430: p_validation_level IN NUMBER := Fnd_Api.g_valid_level_full,
1431: p_module_type IN VARCHAR2 := 'JSP',
1432: p_x_task_rec IN OUT NOCOPY AHL_VWP_RULES_PVT.Task_Rec_Type,
1433: x_return_status OUT NOCOPY VARCHAR2,

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

1426: PROCEDURE Update_Planned_Task (
1427: p_api_version IN NUMBER,
1428: p_init_msg_list IN VARCHAR2 := Fnd_Api.g_false,
1429: p_commit IN VARCHAR2 := Fnd_Api.g_false,
1430: p_validation_level IN NUMBER := Fnd_Api.g_valid_level_full,
1431: p_module_type IN VARCHAR2 := 'JSP',
1432: p_x_task_rec IN OUT NOCOPY AHL_VWP_RULES_PVT.Task_Rec_Type,
1433: x_return_status OUT NOCOPY VARCHAR2,
1434: x_msg_count OUT NOCOPY NUMBER,

Line 1475: IF Fnd_Api.to_boolean (p_init_msg_list) THEN

1471: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) THEN
1472: fnd_log.string(fnd_log.level_procedure,L_DEBUG||'.begin','At the start of PLSQL procedure');
1473: END IF;
1474:
1475: IF Fnd_Api.to_boolean (p_init_msg_list) THEN
1476: Fnd_Msg_Pub.initialize;
1477: END IF;
1478:
1479: -- Initialize API return status to success

Line 1480: x_return_status := Fnd_Api.G_RET_STS_SUCCESS;

1476: Fnd_Msg_Pub.initialize;
1477: END IF;
1478:
1479: -- Initialize API return status to success
1480: x_return_status := Fnd_Api.G_RET_STS_SUCCESS;
1481:
1482: -- Standard call to check for call compatibility.
1483: IF NOT Fnd_Api.compatible_api_call(
1484: l_api_version,

Line 1483: IF NOT Fnd_Api.compatible_api_call(

1479: -- Initialize API return status to success
1480: x_return_status := Fnd_Api.G_RET_STS_SUCCESS;
1481:
1482: -- Standard call to check for call compatibility.
1483: IF NOT Fnd_Api.compatible_api_call(
1484: l_api_version,
1485: p_api_version,
1486: l_api_name,
1487: G_PKG_NAME

Line 1489: RAISE Fnd_Api.g_exc_unexpected_error;

1485: p_api_version,
1486: l_api_name,
1487: G_PKG_NAME
1488: ) THEN
1489: RAISE Fnd_Api.g_exc_unexpected_error;
1490: END IF;
1491:
1492: ------------------------Start of API Body------------------------------------
1493:

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

1514: ----------- Start defining and validate all LOVs on Create Visit's Task UI Screen---
1515: --
1516: -- For DEPARTMENT
1517: -- Convert department name to department id
1518: IF (l_task_rec.dept_name IS NOT NULL AND l_task_rec.dept_name <> Fnd_Api.G_MISS_CHAR ) THEN
1519:
1520: AHL_VWP_RULES_PVT.Check_Dept_Desc_Or_Id
1521: (p_organization_id => c_visit_rec.organization_id,
1522: p_dept_name => l_task_rec.dept_name,

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

1524: x_department_id => l_department_id,
1525: x_return_status => l_return_status,
1526: x_error_msg_code => l_msg_data);
1527:
1528: IF NVL(l_return_status,'x') <> FND_API.G_RET_STS_SUCCESS
1529: THEN
1530: Fnd_Message.SET_NAME('AHL','AHL_VWP_DEPT_NOT_EXISTS');
1531: Fnd_Msg_Pub.ADD;
1532: RAISE Fnd_Api.G_EXC_ERROR;

Line 1532: RAISE Fnd_Api.G_EXC_ERROR;

1528: IF NVL(l_return_status,'x') <> FND_API.G_RET_STS_SUCCESS
1529: THEN
1530: Fnd_Message.SET_NAME('AHL','AHL_VWP_DEPT_NOT_EXISTS');
1531: Fnd_Msg_Pub.ADD;
1532: RAISE Fnd_Api.G_EXC_ERROR;
1533: END IF;
1534:
1535: --Assign the returned value
1536: l_task_rec.department_id := l_department_id;

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

1544: --
1545: -- For COST PARENT TASK
1546: -- Convert cost parent number to id
1547: IF (l_Task_rec.cost_parent_number IS NOT NULL AND
1548: l_Task_rec.cost_parent_number <> Fnd_Api.G_MISS_NUM ) THEN
1549:
1550: AHL_VWP_RULES_PVT.Check_Visit_Task_Number_OR_ID
1551: (p_visit_task_id => l_Task_rec.cost_parent_id,
1552: p_visit_task_number => l_Task_rec.cost_parent_number,

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

1554: x_visit_task_id => l_cost_parent_id,
1555: x_return_status => l_return_status,
1556: x_error_msg_code => l_msg_data);
1557:
1558: IF NVL(l_return_status,'x') <> FND_API.G_RET_STS_SUCCESS
1559: THEN
1560: Fnd_Message.SET_NAME('AHL','AHL_VWP_PARENT_NOT_EXISTS');
1561: Fnd_Msg_Pub.ADD;
1562: RAISE Fnd_Api.g_exc_error;

Line 1562: RAISE Fnd_Api.g_exc_error;

1558: IF NVL(l_return_status,'x') <> FND_API.G_RET_STS_SUCCESS
1559: THEN
1560: Fnd_Message.SET_NAME('AHL','AHL_VWP_PARENT_NOT_EXISTS');
1561: Fnd_Msg_Pub.ADD;
1562: RAISE Fnd_Api.g_exc_error;
1563: END IF;
1564:
1565: --Assign the returned value
1566: l_Task_rec.cost_parent_id := l_cost_parent_id;

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

1572: END IF;
1573:
1574: -- To Check for cost parent task id not forming loop
1575: IF (l_Task_rec.cost_parent_id IS NOT NULL AND
1576: l_Task_rec.cost_parent_id <> Fnd_Api.G_MISS_NUM ) THEN
1577:
1578: AHL_VWP_RULES_PVT.Check_Cost_Parent_Loop
1579: (p_visit_id => l_Task_rec.visit_id,
1580: p_visit_task_id => l_Task_rec.visit_task_id ,

Line 1612: IF l_return_status = Fnd_Api.g_ret_sts_unexp_error THEN

1608: p_validation_mode => Jtf_Plsql_Api.g_update,
1609: x_return_status => l_return_status
1610: );
1611:
1612: IF l_return_status = Fnd_Api.g_ret_sts_unexp_error THEN
1613: RAISE Fnd_Api.g_exc_unexpected_error;
1614: ELSIF l_return_status = Fnd_Api.g_ret_sts_error THEN
1615: RAISE Fnd_Api.g_exc_error;
1616: END IF;

Line 1613: RAISE Fnd_Api.g_exc_unexpected_error;

1609: x_return_status => l_return_status
1610: );
1611:
1612: IF l_return_status = Fnd_Api.g_ret_sts_unexp_error THEN
1613: RAISE Fnd_Api.g_exc_unexpected_error;
1614: ELSIF l_return_status = Fnd_Api.g_ret_sts_error THEN
1615: RAISE Fnd_Api.g_exc_error;
1616: END IF;
1617: END IF;

Line 1614: ELSIF l_return_status = Fnd_Api.g_ret_sts_error THEN

1610: );
1611:
1612: IF l_return_status = Fnd_Api.g_ret_sts_unexp_error THEN
1613: RAISE Fnd_Api.g_exc_unexpected_error;
1614: ELSIF l_return_status = Fnd_Api.g_ret_sts_error THEN
1615: RAISE Fnd_Api.g_exc_error;
1616: END IF;
1617: END IF;
1618:

Line 1615: RAISE Fnd_Api.g_exc_error;

1611:
1612: IF l_return_status = Fnd_Api.g_ret_sts_unexp_error THEN
1613: RAISE Fnd_Api.g_exc_unexpected_error;
1614: ELSIF l_return_status = Fnd_Api.g_ret_sts_error THEN
1615: RAISE Fnd_Api.g_exc_error;
1616: END IF;
1617: END IF;
1618:
1619: -- Check Object version number.

Line 1623: RAISE Fnd_Api.g_exc_error;

1619: -- Check Object version number.
1620: IF (c_task_rec.object_version_number <> l_task_rec.object_version_number) THEN
1621: Fnd_Message.Set_Name('AHL','AHL_COM_RECORD_CHANGED');
1622: Fnd_Msg_Pub.ADD;
1623: RAISE Fnd_Api.g_exc_error;
1624: END IF;
1625:
1626: -- Post 11.5.10 Changes by Senthil.
1627: IF(L_task_rec.STAGE_ID IS NOT NULL OR L_task_rec.STAGE_NAME IS NOT NULL) THEN

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

1640:
1641: -- Standard check to count messages
1642: l_msg_count := Fnd_Msg_Pub.count_msg;
1643:
1644: IF l_msg_count > 0 OR NVL(l_return_status,'X') <> Fnd_Api.g_ret_sts_success THEN
1645: X_msg_count := l_msg_count;
1646: X_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
1647: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;
1648: END IF;

Line 1646: X_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;

1642: l_msg_count := Fnd_Msg_Pub.count_msg;
1643:
1644: IF l_msg_count > 0 OR NVL(l_return_status,'X') <> Fnd_Api.g_ret_sts_success THEN
1645: X_msg_count := l_msg_count;
1646: X_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
1647: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;
1648: END IF;
1649:
1650: -------------------------- update --------------------

Line 1647: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;

1643:
1644: IF l_msg_count > 0 OR NVL(l_return_status,'X') <> Fnd_Api.g_ret_sts_success THEN
1645: X_msg_count := l_msg_count;
1646: X_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
1647: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;
1648: END IF;
1649:
1650: -------------------------- update --------------------
1651: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN

Line 1778: IF l_msg_count > 0 OR l_return_status <> Fnd_Api.g_ret_sts_success THEN

1774: l_return_status);
1775: END IF;
1776:
1777: l_msg_count := Fnd_Msg_Pub.count_msg;
1778: IF l_msg_count > 0 OR l_return_status <> Fnd_Api.g_ret_sts_success THEN
1779: x_msg_count := l_msg_count;
1780: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
1781: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;
1782: END IF;

Line 1780: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;

1776:
1777: l_msg_count := Fnd_Msg_Pub.count_msg;
1778: IF l_msg_count > 0 OR l_return_status <> Fnd_Api.g_ret_sts_success THEN
1779: x_msg_count := l_msg_count;
1780: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
1781: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;
1782: END IF;
1783: --salogan added for supplier warranty ends
1784:

Line 1781: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;

1777: l_msg_count := Fnd_Msg_Pub.count_msg;
1778: IF l_msg_count > 0 OR l_return_status <> Fnd_Api.g_ret_sts_success THEN
1779: x_msg_count := l_msg_count;
1780: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
1781: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;
1782: END IF;
1783: --salogan added for supplier warranty ends
1784:
1785: -- Added cxcheng POST11510--------------

Line 1794: p_init_msg_list => Fnd_Api.G_FALSE,

1790:
1791: --SKPATHAK :: ER: 9147951 :: 11-JAN-2010 :: Call Adjust_Task_Times only if past date is null
1792: IF l_task_rec.PAST_TASK_START_DATE IS NULL THEN
1793: AHL_VWP_TIMES_PVT.Adjust_Task_Times(p_api_version => 1.0,
1794: p_init_msg_list => Fnd_Api.G_FALSE,
1795: p_commit => Fnd_Api.G_FALSE,
1796: p_validation_level => Fnd_Api.G_VALID_LEVEL_FULL,
1797: x_return_status => l_return_status,
1798: x_msg_count => l_msg_count,

Line 1795: p_commit => Fnd_Api.G_FALSE,

1791: --SKPATHAK :: ER: 9147951 :: 11-JAN-2010 :: Call Adjust_Task_Times only if past date is null
1792: IF l_task_rec.PAST_TASK_START_DATE IS NULL THEN
1793: AHL_VWP_TIMES_PVT.Adjust_Task_Times(p_api_version => 1.0,
1794: p_init_msg_list => Fnd_Api.G_FALSE,
1795: p_commit => Fnd_Api.G_FALSE,
1796: p_validation_level => Fnd_Api.G_VALID_LEVEL_FULL,
1797: x_return_status => l_return_status,
1798: x_msg_count => l_msg_count,
1799: x_msg_data => l_msg_data,

Line 1796: p_validation_level => Fnd_Api.G_VALID_LEVEL_FULL,

1792: IF l_task_rec.PAST_TASK_START_DATE IS NULL THEN
1793: AHL_VWP_TIMES_PVT.Adjust_Task_Times(p_api_version => 1.0,
1794: p_init_msg_list => Fnd_Api.G_FALSE,
1795: p_commit => Fnd_Api.G_FALSE,
1796: p_validation_level => Fnd_Api.G_VALID_LEVEL_FULL,
1797: x_return_status => l_return_status,
1798: x_msg_count => l_msg_count,
1799: x_msg_data => l_msg_data,
1800: p_task_id => l_task_rec.visit_task_id);

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

1806:
1807: --Standard check to count messages
1808: l_msg_count := Fnd_Msg_Pub.count_msg;
1809:
1810: IF l_msg_count > 0 OR NVL(l_return_status,'X') <> Fnd_Api.g_ret_sts_success THEN
1811: x_msg_count := l_msg_count;
1812: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
1813: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;
1814: END IF;

Line 1812: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;

1808: l_msg_count := Fnd_Msg_Pub.count_msg;
1809:
1810: IF l_msg_count > 0 OR NVL(l_return_status,'X') <> Fnd_Api.g_ret_sts_success THEN
1811: x_msg_count := l_msg_count;
1812: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
1813: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;
1814: END IF;
1815:
1816: -- Assign back to in/out parameter

Line 1813: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;

1809:
1810: IF l_msg_count > 0 OR NVL(l_return_status,'X') <> Fnd_Api.g_ret_sts_success THEN
1811: x_msg_count := l_msg_count;
1812: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
1813: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;
1814: END IF;
1815:
1816: -- Assign back to in/out parameter
1817: p_x_task_rec := l_task_rec;

Line 1836: p_init_msg_list => FND_API.g_false,

1832: END IF;
1833:
1834: AHL_LTP_REQST_MATRL_PVT.Process_Planned_Materials (
1835: p_api_version => 1.0,
1836: p_init_msg_list => FND_API.g_false,
1837: p_commit => FND_API.g_false,
1838: p_validation_level => FND_API.g_valid_level_full,
1839: p_visit_id => l_task_rec.visit_id,
1840: p_visit_task_id => NULL,

Line 1837: p_commit => FND_API.g_false,

1833:
1834: AHL_LTP_REQST_MATRL_PVT.Process_Planned_Materials (
1835: p_api_version => 1.0,
1836: p_init_msg_list => FND_API.g_false,
1837: p_commit => FND_API.g_false,
1838: p_validation_level => FND_API.g_valid_level_full,
1839: p_visit_id => l_task_rec.visit_id,
1840: p_visit_task_id => NULL,
1841: p_org_id => NULL,

Line 1838: p_validation_level => FND_API.g_valid_level_full,

1834: AHL_LTP_REQST_MATRL_PVT.Process_Planned_Materials (
1835: p_api_version => 1.0,
1836: p_init_msg_list => FND_API.g_false,
1837: p_commit => FND_API.g_false,
1838: p_validation_level => FND_API.g_valid_level_full,
1839: p_visit_id => l_task_rec.visit_id,
1840: p_visit_task_id => NULL,
1841: p_org_id => NULL,
1842: p_start_date => NULL,

Line 1855: RAISE Fnd_Api.G_EXC_ERROR;

1851: fnd_log.string(fnd_log.level_statement,L_DEBUG,'Planned Order Flag : ' || l_planned_order_flag);
1852: END IF;
1853:
1854: IF l_return_status <> 'S' THEN
1855: RAISE Fnd_Api.G_EXC_ERROR;
1856: END IF;
1857: END IF;
1858:
1859: IF c_visit_rec.any_task_chg_flag = 'N' THEN

Line 1872: X_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;

1868: l_msg_count := Fnd_Msg_Pub.count_msg;
1869:
1870: IF l_msg_count > 0 THEN
1871: X_msg_count := l_msg_count;
1872: X_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
1873: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;
1874: END IF;
1875:
1876: --Standard check for commit

Line 1873: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;

1869:
1870: IF l_msg_count > 0 THEN
1871: X_msg_count := l_msg_count;
1872: X_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
1873: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;
1874: END IF;
1875:
1876: --Standard check for commit
1877: IF Fnd_Api.TO_BOOLEAN(p_commit) THEN

Line 1877: IF Fnd_Api.TO_BOOLEAN(p_commit) THEN

1873: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;
1874: END IF;
1875:
1876: --Standard check for commit
1877: IF Fnd_Api.TO_BOOLEAN(p_commit) THEN
1878: COMMIT;
1879: END IF;
1880:
1881: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) THEN

Line 1886: WHEN Fnd_Api.g_exc_error THEN

1882: fnd_log.string(fnd_log.level_procedure,L_DEBUG ||'.end','At the end of PLSQL procedure');
1883: END IF;
1884:
1885: EXCEPTION
1886: WHEN Fnd_Api.g_exc_error THEN
1887: ROLLBACK TO Update_Planned_Task;
1888: x_return_status := Fnd_Api.g_ret_sts_error;
1889: Fnd_Msg_Pub.count_and_get (
1890: p_encoded => Fnd_Api.g_false,

Line 1888: x_return_status := Fnd_Api.g_ret_sts_error;

1884:
1885: EXCEPTION
1886: WHEN Fnd_Api.g_exc_error THEN
1887: ROLLBACK TO Update_Planned_Task;
1888: x_return_status := Fnd_Api.g_ret_sts_error;
1889: Fnd_Msg_Pub.count_and_get (
1890: p_encoded => Fnd_Api.g_false,
1891: p_count => x_msg_count,
1892: p_data => x_msg_data

Line 1890: p_encoded => Fnd_Api.g_false,

1886: WHEN Fnd_Api.g_exc_error THEN
1887: ROLLBACK TO Update_Planned_Task;
1888: x_return_status := Fnd_Api.g_ret_sts_error;
1889: Fnd_Msg_Pub.count_and_get (
1890: p_encoded => Fnd_Api.g_false,
1891: p_count => x_msg_count,
1892: p_data => x_msg_data
1893: );
1894: WHEN Fnd_Api.g_exc_unexpected_error THEN

Line 1894: WHEN Fnd_Api.g_exc_unexpected_error THEN

1890: p_encoded => Fnd_Api.g_false,
1891: p_count => x_msg_count,
1892: p_data => x_msg_data
1893: );
1894: WHEN Fnd_Api.g_exc_unexpected_error THEN
1895: ROLLBACK TO Update_Planned_Task;
1896: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;
1897: Fnd_Msg_Pub.count_and_get (
1898: p_encoded => Fnd_Api.g_false,

Line 1896: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;

1892: p_data => x_msg_data
1893: );
1894: WHEN Fnd_Api.g_exc_unexpected_error THEN
1895: ROLLBACK TO Update_Planned_Task;
1896: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;
1897: Fnd_Msg_Pub.count_and_get (
1898: p_encoded => Fnd_Api.g_false,
1899: p_count => x_msg_count,
1900: p_data => x_msg_data

Line 1898: p_encoded => Fnd_Api.g_false,

1894: WHEN Fnd_Api.g_exc_unexpected_error THEN
1895: ROLLBACK TO Update_Planned_Task;
1896: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;
1897: Fnd_Msg_Pub.count_and_get (
1898: p_encoded => Fnd_Api.g_false,
1899: p_count => x_msg_count,
1900: p_data => x_msg_data
1901: );
1902: WHEN OTHERS THEN

Line 1904: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;

1900: p_data => x_msg_data
1901: );
1902: WHEN OTHERS THEN
1903: ROLLBACK TO Update_Planned_Task;
1904: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;
1905: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_unexp_error) THEN
1906: Fnd_Msg_Pub.add_exc_msg (G_PKG_NAME, l_api_name);
1907: END IF;
1908: Fnd_Msg_Pub.count_and_get (

Line 1909: p_encoded => Fnd_Api.g_false,

1905: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_unexp_error) THEN
1906: Fnd_Msg_Pub.add_exc_msg (G_PKG_NAME, l_api_name);
1907: END IF;
1908: Fnd_Msg_Pub.count_and_get (
1909: p_encoded => Fnd_Api.g_false,
1910: p_count => x_msg_count,
1911: p_data => x_msg_data
1912: );
1913: END Update_Planned_Task;

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

1920: -- To delete Planned tasks for the Maintenace visit.
1921: --------------------------------------------------------------------
1922: PROCEDURE Delete_Planned_Task (
1923: p_api_version IN NUMBER,
1924: p_init_msg_list IN VARCHAR2 := Fnd_Api.g_false,
1925: p_commit IN VARCHAR2 := Fnd_Api.g_false,
1926: p_validation_level IN NUMBER := Fnd_Api.g_valid_level_full,
1927: p_module_type IN VARCHAR2 := 'JSP',
1928: p_visit_task_ID IN NUMBER,

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

1921: --------------------------------------------------------------------
1922: PROCEDURE Delete_Planned_Task (
1923: p_api_version IN NUMBER,
1924: p_init_msg_list IN VARCHAR2 := Fnd_Api.g_false,
1925: p_commit IN VARCHAR2 := Fnd_Api.g_false,
1926: p_validation_level IN NUMBER := Fnd_Api.g_valid_level_full,
1927: p_module_type IN VARCHAR2 := 'JSP',
1928: p_visit_task_ID IN NUMBER,
1929:

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

1922: PROCEDURE Delete_Planned_Task (
1923: p_api_version IN NUMBER,
1924: p_init_msg_list IN VARCHAR2 := Fnd_Api.g_false,
1925: p_commit IN VARCHAR2 := Fnd_Api.g_false,
1926: p_validation_level IN NUMBER := Fnd_Api.g_valid_level_full,
1927: p_module_type IN VARCHAR2 := 'JSP',
1928: p_visit_task_ID IN NUMBER,
1929:
1930: x_return_status OUT NOCOPY VARCHAR2,

Line 1957: IF Fnd_Api.to_boolean (p_init_msg_list) THEN

1953: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) THEN
1954: fnd_log.string(fnd_log.level_procedure,l_debug||'.begin','At the start of PLSQL procedure');
1955: END IF;
1956:
1957: IF Fnd_Api.to_boolean (p_init_msg_list) THEN
1958: Fnd_Msg_Pub.initialize;
1959: END IF;
1960:
1961: -- Initialize API return status to success

Line 1962: x_return_status := Fnd_Api.G_RET_STS_SUCCESS;

1958: Fnd_Msg_Pub.initialize;
1959: END IF;
1960:
1961: -- Initialize API return status to success
1962: x_return_status := Fnd_Api.G_RET_STS_SUCCESS;
1963:
1964: -- Standard call to check for call compatibility.
1965: IF NOT Fnd_Api.compatible_api_call(
1966: l_api_version,

Line 1965: IF NOT Fnd_Api.compatible_api_call(

1961: -- Initialize API return status to success
1962: x_return_status := Fnd_Api.G_RET_STS_SUCCESS;
1963:
1964: -- Standard call to check for call compatibility.
1965: IF NOT Fnd_Api.compatible_api_call(
1966: l_api_version,
1967: p_api_version,
1968: l_api_name,
1969: G_PKG_NAME

Line 1971: RAISE Fnd_Api.g_exc_unexpected_error;

1967: p_api_version,
1968: l_api_name,
1969: G_PKG_NAME
1970: ) THEN
1971: RAISE Fnd_Api.g_exc_unexpected_error;
1972: END IF;
1973:
1974: ------------------------Start of API Body------------------------------------
1975: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN

Line 1991: RAISE Fnd_Api.g_exc_error;

1987: Fnd_Msg_Pub.ADD;
1988: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN
1989: fnd_log.string(fnd_log.level_statement,l_debug,'Invalid Task Id' || p_visit_task_ID);
1990: END IF;
1991: RAISE Fnd_Api.g_exc_error;
1992: ELSE
1993: CLOSE c_Task;
1994: -- To find the visit related information
1995: l_origin_id:= c_task_rec.originating_task_id;

Line 2004: p_init_msg_list => Fnd_Api.g_false,

2000: END IF;
2001:
2002: AHL_VWP_TASKS_PVT.Delete_Summary_Task(
2003: p_api_version => p_api_version,
2004: p_init_msg_list => Fnd_Api.g_false,
2005: p_commit => Fnd_Api.g_false,
2006: p_validation_level => Fnd_Api.g_valid_level_full,
2007: p_module_type => NULL,
2008: p_Visit_Task_Id => l_origin_id,

Line 2005: p_commit => Fnd_Api.g_false,

2001:
2002: AHL_VWP_TASKS_PVT.Delete_Summary_Task(
2003: p_api_version => p_api_version,
2004: p_init_msg_list => Fnd_Api.g_false,
2005: p_commit => Fnd_Api.g_false,
2006: p_validation_level => Fnd_Api.g_valid_level_full,
2007: p_module_type => NULL,
2008: p_Visit_Task_Id => l_origin_id,
2009: x_return_status => x_return_status,

Line 2006: p_validation_level => Fnd_Api.g_valid_level_full,

2002: AHL_VWP_TASKS_PVT.Delete_Summary_Task(
2003: p_api_version => p_api_version,
2004: p_init_msg_list => Fnd_Api.g_false,
2005: p_commit => Fnd_Api.g_false,
2006: p_validation_level => Fnd_Api.g_valid_level_full,
2007: p_module_type => NULL,
2008: p_Visit_Task_Id => l_origin_id,
2009: x_return_status => x_return_status,
2010: x_msg_count => x_msg_count,

Line 2017: IF x_return_status <> Fnd_Api.g_ret_sts_success THEN

2013: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN
2014: fnd_log.string(fnd_log.level_statement,l_debug,'After calling AHL_VWP_TASKS_PVT.Delete_Summary_Task : x_return_status - '||x_return_status);
2015: END IF;
2016:
2017: IF x_return_status <> Fnd_Api.g_ret_sts_success THEN
2018: RAISE Fnd_Api.G_EXC_ERROR;
2019: END IF;
2020: ELSE
2021: Fnd_Message.SET_NAME('AHL','AHL_VWP_PLANNEDTASKMR');

Line 2018: RAISE Fnd_Api.G_EXC_ERROR;

2014: fnd_log.string(fnd_log.level_statement,l_debug,'After calling AHL_VWP_TASKS_PVT.Delete_Summary_Task : x_return_status - '||x_return_status);
2015: END IF;
2016:
2017: IF x_return_status <> Fnd_Api.g_ret_sts_success THEN
2018: RAISE Fnd_Api.G_EXC_ERROR;
2019: END IF;
2020: ELSE
2021: Fnd_Message.SET_NAME('AHL','AHL_VWP_PLANNEDTASKMR');
2022: Fnd_Msg_Pub.ADD;

Line 2023: RAISE Fnd_Api.G_EXC_ERROR;

2019: END IF;
2020: ELSE
2021: Fnd_Message.SET_NAME('AHL','AHL_VWP_PLANNEDTASKMR');
2022: Fnd_Msg_Pub.ADD;
2023: RAISE Fnd_Api.G_EXC_ERROR;
2024: End IF;
2025: END IF;
2026: ------------------------End of API Body------------------------------------
2027: IF Fnd_Api.to_boolean (p_commit) THEN

Line 2027: IF Fnd_Api.to_boolean (p_commit) THEN

2023: RAISE Fnd_Api.G_EXC_ERROR;
2024: End IF;
2025: END IF;
2026: ------------------------End of API Body------------------------------------
2027: IF Fnd_Api.to_boolean (p_commit) THEN
2028: COMMIT;
2029: END IF;
2030:
2031: Fnd_Msg_Pub.count_and_get (

Line 2032: p_encoded => Fnd_Api.g_false,

2028: COMMIT;
2029: END IF;
2030:
2031: Fnd_Msg_Pub.count_and_get (
2032: p_encoded => Fnd_Api.g_false,
2033: p_count => x_msg_count,
2034: p_data => x_msg_data
2035: );
2036:

Line 2041: WHEN Fnd_Api.g_exc_error THEN

2037: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) THEN
2038: fnd_log.string(fnd_log.level_procedure,l_debug ||'.end','At the end of PLSQL procedure');
2039: END IF;
2040: EXCEPTION
2041: WHEN Fnd_Api.g_exc_error THEN
2042: ROLLBACK TO Delete_Planned_Task;
2043: x_return_status := Fnd_Api.g_ret_sts_error;
2044: Fnd_Msg_Pub.count_and_get (
2045: p_encoded => Fnd_Api.g_false,

Line 2043: x_return_status := Fnd_Api.g_ret_sts_error;

2039: END IF;
2040: EXCEPTION
2041: WHEN Fnd_Api.g_exc_error THEN
2042: ROLLBACK TO Delete_Planned_Task;
2043: x_return_status := Fnd_Api.g_ret_sts_error;
2044: Fnd_Msg_Pub.count_and_get (
2045: p_encoded => Fnd_Api.g_false,
2046: p_count => x_msg_count,
2047: p_data => x_msg_data

Line 2045: p_encoded => Fnd_Api.g_false,

2041: WHEN Fnd_Api.g_exc_error THEN
2042: ROLLBACK TO Delete_Planned_Task;
2043: x_return_status := Fnd_Api.g_ret_sts_error;
2044: Fnd_Msg_Pub.count_and_get (
2045: p_encoded => Fnd_Api.g_false,
2046: p_count => x_msg_count,
2047: p_data => x_msg_data
2048: );
2049:

Line 2050: WHEN Fnd_Api.g_exc_unexpected_error THEN

2046: p_count => x_msg_count,
2047: p_data => x_msg_data
2048: );
2049:
2050: WHEN Fnd_Api.g_exc_unexpected_error THEN
2051: ROLLBACK TO Delete_Planned_Task;
2052: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;
2053: Fnd_Msg_Pub.count_and_get (
2054: p_encoded => Fnd_Api.g_false,

Line 2052: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;

2048: );
2049:
2050: WHEN Fnd_Api.g_exc_unexpected_error THEN
2051: ROLLBACK TO Delete_Planned_Task;
2052: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;
2053: Fnd_Msg_Pub.count_and_get (
2054: p_encoded => Fnd_Api.g_false,
2055: p_count => x_msg_count,
2056: p_data => x_msg_data

Line 2054: p_encoded => Fnd_Api.g_false,

2050: WHEN Fnd_Api.g_exc_unexpected_error THEN
2051: ROLLBACK TO Delete_Planned_Task;
2052: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;
2053: Fnd_Msg_Pub.count_and_get (
2054: p_encoded => Fnd_Api.g_false,
2055: p_count => x_msg_count,
2056: p_data => x_msg_data
2057: );
2058:

Line 2061: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;

2057: );
2058:
2059: WHEN OTHERS THEN
2060: ROLLBACK TO Delete_Planned_Task;
2061: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;
2062: IF Fnd_Msg_Pub.check_msg_level (Fnd_Msg_Pub.g_msg_lvl_unexp_error)
2063: THEN
2064: Fnd_Msg_Pub.add_exc_msg (G_PKG_NAME, l_api_name);
2065: END IF;

Line 2067: p_encoded => Fnd_Api.g_false,

2063: THEN
2064: Fnd_Msg_Pub.add_exc_msg (G_PKG_NAME, l_api_name);
2065: END IF;
2066: Fnd_Msg_Pub.count_and_get (
2067: p_encoded => Fnd_Api.g_false,
2068: p_count => x_msg_count,
2069: p_data => x_msg_data
2070: );
2071:

Line 2095: x_return_status := FND_API.G_RET_STS_SUCCESS;

2091:
2092: BEGIN
2093: --
2094: -- Validate required items.
2095: x_return_status := FND_API.G_RET_STS_SUCCESS;
2096:
2097: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) THEN
2098: fnd_log.string(fnd_log.level_procedure,l_debug||'.begin', 'At the start of the procedure..');
2099: fnd_log.string(fnd_log.level_procedure,l_debug, 'Before Check_Visit_Task_Req_Items');

Line 2106: IF x_return_status <> Fnd_Api.g_ret_sts_success THEN

2102: Check_Visit_Task_Req_Items (
2103: p_task_rec => p_task_rec,
2104: x_return_status => x_return_status
2105: );
2106: IF x_return_status <> Fnd_Api.g_ret_sts_success THEN
2107: RETURN;
2108: END IF;
2109:
2110: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN

Line 2124: IF x_return_status <> Fnd_Api.g_ret_sts_success THEN

2120: p_task_rec => p_task_rec,
2121: p_validation_mode => p_validation_mode,
2122: x_return_status => x_return_status
2123: );
2124: IF x_return_status <> Fnd_Api.g_ret_sts_success THEN
2125: RETURN;
2126: END IF;
2127:
2128: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) THEN

Line 2165: RAISE Fnd_Api.g_exc_error;

2161: IF c_Visit_Task%NOTFOUND THEN
2162: CLOSE c_Visit_Task;
2163: Fnd_Message.set_name('AHL', 'AHL_API_RECORD_NOT_FOUND');
2164: Fnd_Msg_Pub.ADD;
2165: RAISE Fnd_Api.g_exc_error;
2166: END IF;
2167: CLOSE c_Visit_Task;
2168:
2169: END Complete_Visit_Task_Rec;

Line 2190: x_return_status := FND_API.G_RET_STS_SUCCESS;

2186: l_debug CONSTANT VARCHAR2(90) := 'ahl.plsql.'||L_FULL_NAME;
2187:
2188: BEGIN
2189:
2190: x_return_status := FND_API.G_RET_STS_SUCCESS;
2191:
2192: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) THEN
2193: fnd_log.string(fnd_log.level_procedure,l_debug,'At the Start of Check_Visit_Task_Req_Items ');
2194: END IF;

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

2193: fnd_log.string(fnd_log.level_procedure,l_debug,'At the Start of Check_Visit_Task_Req_Items ');
2194: END IF;
2195:
2196: -- TASK NAME ==== NAME
2197: IF (p_task_rec.VISIT_TASK_NAME IS NULL OR p_Task_rec.VISIT_TASK_NAME = Fnd_Api.G_MISS_CHAR) THEN
2198: Fnd_Message.set_name ('AHL', 'AHL_VWP_NAME_MISSING');
2199: Fnd_Msg_Pub.ADD;
2200: x_return_status := Fnd_Api.g_ret_sts_error;
2201: RETURN;

Line 2200: x_return_status := Fnd_Api.g_ret_sts_error;

2196: -- TASK NAME ==== NAME
2197: IF (p_task_rec.VISIT_TASK_NAME IS NULL OR p_Task_rec.VISIT_TASK_NAME = Fnd_Api.G_MISS_CHAR) THEN
2198: Fnd_Message.set_name ('AHL', 'AHL_VWP_NAME_MISSING');
2199: Fnd_Msg_Pub.ADD;
2200: x_return_status := Fnd_Api.g_ret_sts_error;
2201: RETURN;
2202: END IF;
2203:
2204: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN

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

2204: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN
2205: fnd_log.string(fnd_log.level_statement,l_debug,'Inside Validation Start from Hour = ' || p_task_rec.START_FROM_HOUR);
2206: END IF;
2207:
2208: IF (p_task_rec.START_FROM_HOUR IS NOT NULL and p_Task_rec.START_FROM_HOUR <> Fnd_Api.G_MISS_NUM) THEN
2209: IF p_task_rec.START_FROM_HOUR < 0 OR FLOOR(p_task_rec.START_FROM_HOUR) <> p_task_rec.START_FROM_HOUR THEN
2210: Fnd_Message.set_name ('AHL', 'AHL_VWP_ONLY_POSITIVE_VALUE');
2211: Fnd_Msg_Pub.ADD;
2212: x_return_status := Fnd_Api.g_ret_sts_error;

Line 2212: x_return_status := Fnd_Api.g_ret_sts_error;

2208: IF (p_task_rec.START_FROM_HOUR IS NOT NULL and p_Task_rec.START_FROM_HOUR <> Fnd_Api.G_MISS_NUM) THEN
2209: IF p_task_rec.START_FROM_HOUR < 0 OR FLOOR(p_task_rec.START_FROM_HOUR) <> p_task_rec.START_FROM_HOUR THEN
2210: Fnd_Message.set_name ('AHL', 'AHL_VWP_ONLY_POSITIVE_VALUE');
2211: Fnd_Msg_Pub.ADD;
2212: x_return_status := Fnd_Api.g_ret_sts_error;
2213: RETURN;
2214: END IF;
2215: END IF;
2216:

Line 2238: x_return_status := Fnd_Api.g_ret_sts_success;

2234: l_full_name CONSTANT VARCHAR2(60) := G_PKG_NAME || '.' || l_Api_name;
2235: l_debug CONSTANT VARCHAR2(90) := 'ahl.plsql.'||L_FULL_NAME;
2236:
2237: BEGIN
2238: x_return_status := Fnd_Api.g_ret_sts_success;
2239: IF (fnd_log.level_procedure >= fnd_log.g_current_runtime_level) THEN
2240: fnd_log.string(fnd_log.level_procedure,l_debug,'At the Start of Check_Visit_Task_UK_Items ');
2241: END IF;
2242: --

Line 2253: ) = Fnd_Api.g_false

2249: -- FOR CREATION
2250: IF Ahl_Utility_Pvt.check_uniqueness(
2251: 'Ahl_Visit_Tasks_vl',
2252: 'Visit_Task_ID = ' || p_task_rec.Visit_Task_ID
2253: ) = Fnd_Api.g_false
2254: THEN
2255: Fnd_Message.set_name ('AHL', 'AHL_VWP_DUPLICATE_TASK_ID');
2256: Fnd_Msg_Pub.ADD;
2257: x_return_status := Fnd_Api.g_ret_sts_error;

Line 2257: x_return_status := Fnd_Api.g_ret_sts_error;

2253: ) = Fnd_Api.g_false
2254: THEN
2255: Fnd_Message.set_name ('AHL', 'AHL_VWP_DUPLICATE_TASK_ID');
2256: Fnd_Msg_Pub.ADD;
2257: x_return_status := Fnd_Api.g_ret_sts_error;
2258: RETURN;
2259: END IF;
2260: END IF;
2261: