89: FND_MESSAGE.SET_NAME('JTF','JTF_WF_ALREADY_EXISTS');
90: FND_MESSAGE.SET_TOKEN('WF_NAME',p_wf_item_name);
91: FND_MESSAGE.SET_TOKEN('WF_KEY',p_wf_item_key);
92: FND_MSG_PUB.Add;
93: RAISE FND_API.G_EXC_ERROR;
94: else
95: -- Create workflow process.
96: wf_engine.CreateProcess( itemType => p_Wf_item_name,
97: itemKey => p_Wf_item_key,
146: JTF_USR_HKS.Purge_Bind_Data( p_bind_data_id => l_bind_data_id,
147: p_bind_type => 'W'
148: );
149:
150: x_return_code := FND_API.G_RET_STS_SUCCESS;
151:
152: end if;
153: Exception
154: When FND_API.G_EXC_ERROR then
150: x_return_code := FND_API.G_RET_STS_SUCCESS;
151:
152: end if;
153: Exception
154: When FND_API.G_EXC_ERROR then
155: x_return_code := FND_API.G_RET_STS_ERROR;
156:
157: When FND_API.G_EXC_UNEXPECTED_ERROR then
158: x_return_code := FND_API.G_RET_STS_UNEXP_ERROR;
151:
152: end if;
153: Exception
154: When FND_API.G_EXC_ERROR then
155: x_return_code := FND_API.G_RET_STS_ERROR;
156:
157: When FND_API.G_EXC_UNEXPECTED_ERROR then
158: x_return_code := FND_API.G_RET_STS_UNEXP_ERROR;
159:
153: Exception
154: When FND_API.G_EXC_ERROR then
155: x_return_code := FND_API.G_RET_STS_ERROR;
156:
157: When FND_API.G_EXC_UNEXPECTED_ERROR then
158: x_return_code := FND_API.G_RET_STS_UNEXP_ERROR;
159:
160: When OTHERS then
161: x_return_code := FND_API.G_RET_STS_UNEXP_ERROR;
154: When FND_API.G_EXC_ERROR then
155: x_return_code := FND_API.G_RET_STS_ERROR;
156:
157: When FND_API.G_EXC_UNEXPECTED_ERROR then
158: x_return_code := FND_API.G_RET_STS_UNEXP_ERROR;
159:
160: When OTHERS then
161: x_return_code := FND_API.G_RET_STS_UNEXP_ERROR;
162: FND_MESSAGE.SET_NAME('JTF','JTF_WF_LAUNCH_ERROR');
157: When FND_API.G_EXC_UNEXPECTED_ERROR then
158: x_return_code := FND_API.G_RET_STS_UNEXP_ERROR;
159:
160: When OTHERS then
161: x_return_code := FND_API.G_RET_STS_UNEXP_ERROR;
162: FND_MESSAGE.SET_NAME('JTF','JTF_WF_LAUNCH_ERROR');
163: FND_MESSAGE.SET_TOKEN('WF_NAME',p_wf_item_name);
164: FND_MESSAGE.SET_TOKEN('WF_KEY',p_wf_item_key);
165: FND_MSG_PUB.Add;
205: FND_MESSAGE.SET_NAME('JTF','JTF_WF_ALREADY_EXISTS');
206: FND_MESSAGE.SET_TOKEN('WF_NAME',p_wf_item_name);
207: FND_MESSAGE.SET_TOKEN('WF_KEY',p_wf_item_key);
208: FND_MSG_PUB.Add;
209: RAISE FND_API.G_EXC_ERROR;
210: else
211: -- Create workflow process.
212: wf_engine.CreateProcess( itemType => p_Wf_item_name,
213: itemKey => p_Wf_item_key,
290: JTF_USR_HKS.Purge_Bind_Data( p_bind_data_id => l_bind_data_id,
291: p_bind_type => 'W'
292: );
293:
294: x_return_code := FND_API.G_RET_STS_SUCCESS;
295:
296: end if;
297: Exception
298: When FND_API.G_EXC_ERROR then
294: x_return_code := FND_API.G_RET_STS_SUCCESS;
295:
296: end if;
297: Exception
298: When FND_API.G_EXC_ERROR then
299: x_return_code := FND_API.G_RET_STS_ERROR;
300:
301: When FND_API.G_EXC_UNEXPECTED_ERROR then
302: x_return_code := FND_API.G_RET_STS_UNEXP_ERROR;
295:
296: end if;
297: Exception
298: When FND_API.G_EXC_ERROR then
299: x_return_code := FND_API.G_RET_STS_ERROR;
300:
301: When FND_API.G_EXC_UNEXPECTED_ERROR then
302: x_return_code := FND_API.G_RET_STS_UNEXP_ERROR;
303:
297: Exception
298: When FND_API.G_EXC_ERROR then
299: x_return_code := FND_API.G_RET_STS_ERROR;
300:
301: When FND_API.G_EXC_UNEXPECTED_ERROR then
302: x_return_code := FND_API.G_RET_STS_UNEXP_ERROR;
303:
304: When OTHERS then
305: x_return_code := FND_API.G_RET_STS_UNEXP_ERROR;
298: When FND_API.G_EXC_ERROR then
299: x_return_code := FND_API.G_RET_STS_ERROR;
300:
301: When FND_API.G_EXC_UNEXPECTED_ERROR then
302: x_return_code := FND_API.G_RET_STS_UNEXP_ERROR;
303:
304: When OTHERS then
305: x_return_code := FND_API.G_RET_STS_UNEXP_ERROR;
306: FND_MESSAGE.SET_NAME('JTF','JTF_WF_LAUNCH_ERROR');
301: When FND_API.G_EXC_UNEXPECTED_ERROR then
302: x_return_code := FND_API.G_RET_STS_UNEXP_ERROR;
303:
304: When OTHERS then
305: x_return_code := FND_API.G_RET_STS_UNEXP_ERROR;
306: FND_MESSAGE.SET_NAME('JTF','JTF_WF_LAUNCH_ERROR');
307: FND_MESSAGE.SET_TOKEN('WF_NAME',p_wf_item_name);
308: FND_MESSAGE.SET_TOKEN('WF_KEY',p_wf_item_key);
309: FND_MSG_PUB.Add;
364: When NO_DATA_FOUND then
365: FND_MESSAGE.SET_NAME('JTF','JTF_NO_BUS_OBJECT');
366: FND_MESSAGE.SET_TOKEN('BO_CODE',p_bus_obj_code);
367: FND_MSG_PUB.ADD;
368: RAISE FND_API.G_EXC_ERROR;
369: When OTHERS then
370: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
371: End;
372: -- dbms_output.put_line(' Got message mode');
366: FND_MESSAGE.SET_TOKEN('BO_CODE',p_bus_obj_code);
367: FND_MSG_PUB.ADD;
368: RAISE FND_API.G_EXC_ERROR;
369: When OTHERS then
370: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
371: End;
372: -- dbms_output.put_line(' Got message mode');
373:
374: If ( l_msg_mode = 1 ) then /* Online Messaging */
397:
398: FND_MESSAGE.SET_NAME('JTF','JTF_INVALID_MSG_MODE');
399: FND_MESSAGE.SET_TOKEN('MSG_MODE', to_char(l_msg_mode) );
400: FND_MSG_PUB.ADD;
401: RAISE FND_API.G_EXC_ERROR;
402: End If;
403:
404: x_return_code := FND_API.G_RET_STS_SUCCESS;
405:
400: FND_MSG_PUB.ADD;
401: RAISE FND_API.G_EXC_ERROR;
402: End If;
403:
404: x_return_code := FND_API.G_RET_STS_SUCCESS;
405:
406: Exception
407: When FND_API.G_EXC_ERROR then
408: x_return_code := FND_API.G_RET_STS_ERROR;
403:
404: x_return_code := FND_API.G_RET_STS_SUCCESS;
405:
406: Exception
407: When FND_API.G_EXC_ERROR then
408: x_return_code := FND_API.G_RET_STS_ERROR;
409: When OTHERS then
410: x_return_code := FND_API.G_RET_STS_UNEXP_ERROR;
411: FND_MESSAGE.SET_NAME('JTF','JTF_MSG_GEN_ERROR');
404: x_return_code := FND_API.G_RET_STS_SUCCESS;
405:
406: Exception
407: When FND_API.G_EXC_ERROR then
408: x_return_code := FND_API.G_RET_STS_ERROR;
409: When OTHERS then
410: x_return_code := FND_API.G_RET_STS_UNEXP_ERROR;
411: FND_MESSAGE.SET_NAME('JTF','JTF_MSG_GEN_ERROR');
412: FND_MESSAGE.SET_TOKEN('PROD_CODE',p_prod_code);
406: Exception
407: When FND_API.G_EXC_ERROR then
408: x_return_code := FND_API.G_RET_STS_ERROR;
409: When OTHERS then
410: x_return_code := FND_API.G_RET_STS_UNEXP_ERROR;
411: FND_MESSAGE.SET_NAME('JTF','JTF_MSG_GEN_ERROR');
412: FND_MESSAGE.SET_TOKEN('PROD_CODE',p_prod_code);
413: FND_MESSAGE.SET_TOKEN('BO_CODE',p_bus_obj_code);
414: FND_MSG_PUB.ADD;
450: When NO_DATA_FOUND then
451: FND_MESSAGE.SET_NAME('JTF','JTF_NO_BUS_OBJECT');
452: FND_MESSAGE.SET_TOKEN('BO_CODE',p_bus_obj_code);
453: FND_MSG_PUB.ADD;
454: RAISE FND_API.G_EXC_ERROR;
455: When OTHERS then
456: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
457: End;
458: -- dbms_output.put_line(' Got message mode');
452: FND_MESSAGE.SET_TOKEN('BO_CODE',p_bus_obj_code);
453: FND_MSG_PUB.ADD;
454: RAISE FND_API.G_EXC_ERROR;
455: When OTHERS then
456: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
457: End;
458: -- dbms_output.put_line(' Got message mode');
459:
460: Publish_message(
468: p_ref_sender => p_ref_sender,
469: p_ref_msg_id => p_ref_msg_id
470: );
471:
472: x_return_code := FND_API.G_RET_STS_SUCCESS;
473:
474: Exception
475: When FND_API.G_EXC_ERROR then
476: x_return_code := FND_API.G_RET_STS_ERROR;
471:
472: x_return_code := FND_API.G_RET_STS_SUCCESS;
473:
474: Exception
475: When FND_API.G_EXC_ERROR then
476: x_return_code := FND_API.G_RET_STS_ERROR;
477: When OTHERS then
478: x_return_code := FND_API.G_RET_STS_UNEXP_ERROR;
479: FND_MESSAGE.SET_NAME('JTF','JTF_MSG_GEN_ERROR');
472: x_return_code := FND_API.G_RET_STS_SUCCESS;
473:
474: Exception
475: When FND_API.G_EXC_ERROR then
476: x_return_code := FND_API.G_RET_STS_ERROR;
477: When OTHERS then
478: x_return_code := FND_API.G_RET_STS_UNEXP_ERROR;
479: FND_MESSAGE.SET_NAME('JTF','JTF_MSG_GEN_ERROR');
480: FND_MESSAGE.SET_TOKEN('PROD_CODE',p_prod_code);
474: Exception
475: When FND_API.G_EXC_ERROR then
476: x_return_code := FND_API.G_RET_STS_ERROR;
477: When OTHERS then
478: x_return_code := FND_API.G_RET_STS_UNEXP_ERROR;
479: FND_MESSAGE.SET_NAME('JTF','JTF_MSG_GEN_ERROR');
480: FND_MESSAGE.SET_TOKEN('PROD_CODE',p_prod_code);
481: FND_MESSAGE.SET_TOKEN('BO_CODE',p_bus_obj_code);
482: FND_MSG_PUB.ADD;
523: When NO_DATA_FOUND then
524: FND_MESSAGE.SET_NAME('JTF','JTF_NO_BUS_OBJECT');
525: FND_MESSAGE.SET_TOKEN('BO_CODE',p_bus_obj_code);
526: FND_MSG_PUB.ADD;
527: RAISE FND_API.G_EXC_ERROR;
528: When OTHERS then
529: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
530: End;
531:
525: FND_MESSAGE.SET_TOKEN('BO_CODE',p_bus_obj_code);
526: FND_MSG_PUB.ADD;
527: RAISE FND_API.G_EXC_ERROR;
528: When OTHERS then
529: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
530: End;
531:
532: select jtf_msg_id_s.nextval
533: into x_msg_id
575: delete from JTF_SYNC_REPLY_MSG
576: where msg_id = x_msg_id
577: returning reply_msg into x_reply_msg;
578:
579: x_return_code := FND_API.G_RET_STS_SUCCESS;
580: else
581: x_return_code := FND_API.G_RET_STS_ERROR;
582: end if;
583:
577: returning reply_msg into x_reply_msg;
578:
579: x_return_code := FND_API.G_RET_STS_SUCCESS;
580: else
581: x_return_code := FND_API.G_RET_STS_ERROR;
582: end if;
583:
584: else
585: x_return_code := FND_API.G_RET_STS_SUCCESS;
581: x_return_code := FND_API.G_RET_STS_ERROR;
582: end if;
583:
584: else
585: x_return_code := FND_API.G_RET_STS_SUCCESS;
586: end if;
587:
588: Exception
589: When FND_API.G_EXC_ERROR then
585: x_return_code := FND_API.G_RET_STS_SUCCESS;
586: end if;
587:
588: Exception
589: When FND_API.G_EXC_ERROR then
590: x_return_code := FND_API.G_RET_STS_ERROR;
591: When OTHERS then
592: x_return_code := FND_API.G_RET_STS_UNEXP_ERROR;
593: FND_MESSAGE.SET_NAME('JTF','JTF_MSG_GEN_ERROR');
586: end if;
587:
588: Exception
589: When FND_API.G_EXC_ERROR then
590: x_return_code := FND_API.G_RET_STS_ERROR;
591: When OTHERS then
592: x_return_code := FND_API.G_RET_STS_UNEXP_ERROR;
593: FND_MESSAGE.SET_NAME('JTF','JTF_MSG_GEN_ERROR');
594: FND_MESSAGE.SET_TOKEN('PROD_CODE',p_prod_code);
588: Exception
589: When FND_API.G_EXC_ERROR then
590: x_return_code := FND_API.G_RET_STS_ERROR;
591: When OTHERS then
592: x_return_code := FND_API.G_RET_STS_UNEXP_ERROR;
593: FND_MESSAGE.SET_NAME('JTF','JTF_MSG_GEN_ERROR');
594: FND_MESSAGE.SET_TOKEN('PROD_CODE',p_prod_code);
595: FND_MESSAGE.SET_TOKEN('BO_CODE',p_bus_obj_code);
596: FND_MSG_PUB.ADD;
670: delete from JTF_SYNC_REPLY_MSG
671: where msg_id = x_msg_id
672: returning reply_msg into x_reply_msg;
673:
674: x_return_code := FND_API.G_RET_STS_SUCCESS;
675: else
676: x_return_code := FND_API.G_RET_STS_ERROR;
677: end if;
678:
672: returning reply_msg into x_reply_msg;
673:
674: x_return_code := FND_API.G_RET_STS_SUCCESS;
675: else
676: x_return_code := FND_API.G_RET_STS_ERROR;
677: end if;
678:
679: else
680: x_return_code := FND_API.G_RET_STS_SUCCESS;
676: x_return_code := FND_API.G_RET_STS_ERROR;
677: end if;
678:
679: else
680: x_return_code := FND_API.G_RET_STS_SUCCESS;
681: end if;
682:
683: Exception
684: When FND_API.G_EXC_ERROR then
680: x_return_code := FND_API.G_RET_STS_SUCCESS;
681: end if;
682:
683: Exception
684: When FND_API.G_EXC_ERROR then
685: x_return_code := FND_API.G_RET_STS_ERROR;
686: When OTHERS then
687: x_return_code := FND_API.G_RET_STS_UNEXP_ERROR;
688: FND_MESSAGE.SET_NAME('JTF','JTF_MSG_GEN_ERROR');
681: end if;
682:
683: Exception
684: When FND_API.G_EXC_ERROR then
685: x_return_code := FND_API.G_RET_STS_ERROR;
686: When OTHERS then
687: x_return_code := FND_API.G_RET_STS_UNEXP_ERROR;
688: FND_MESSAGE.SET_NAME('JTF','JTF_MSG_GEN_ERROR');
689: FND_MESSAGE.SET_TOKEN('PROD_CODE',p_prod_code);
683: Exception
684: When FND_API.G_EXC_ERROR then
685: x_return_code := FND_API.G_RET_STS_ERROR;
686: When OTHERS then
687: x_return_code := FND_API.G_RET_STS_UNEXP_ERROR;
688: FND_MESSAGE.SET_NAME('JTF','JTF_MSG_GEN_ERROR');
689: FND_MESSAGE.SET_TOKEN('PROD_CODE',p_prod_code);
690: FND_MESSAGE.SET_TOKEN('BO_CODE',p_bus_obj_code);
691: FND_MSG_PUB.ADD;
806:
807: l_line := lpad(' ',4)||'
808: l_hdrxml := l_hdrxml||l_line||l_newline;
809:
810: if ( p_noun <> FND_API.G_MISS_CHAR ) then
811: l_line := lpad(' ',4)||'
812: l_hdrxml := l_hdrxml||l_line||l_newline;
813: end if;
814:
811: l_line := lpad(' ',4)||'
812: l_hdrxml := l_hdrxml||l_line||l_newline;
813: end if;
814:
815: if ( p_type <> FND_API.G_MISS_CHAR ) then
816: l_line := lpad(' ',4)||'
817: l_hdrxml := l_hdrxml||l_line||l_newline;
818: end if;
819:
816: l_line := lpad(' ',4)||'
817: l_hdrxml := l_hdrxml||l_line||l_newline;
818: end if;
819:
820: if ( p_sender <> FND_API.G_MISS_CHAR ) then
821: l_line := lpad(' ',4)||'
822: l_hdrxml := l_hdrxml||l_line||l_newline;
823: end if;
824:
821: l_line := lpad(' ',4)||'
822: l_hdrxml := l_hdrxml||l_line||l_newline;
823: end if;
824:
825: if ( p_msg_id <> FND_API.G_MISS_CHAR ) then
826: l_line := '
827: l_hdrxml := l_hdrxml||l_line||l_newline;
828: end if;
829:
886: When NO_DATA_FOUND then
887: FND_MESSAGE.SET_NAME('JTF','JTF_NO_BUS_OBJECT');
888: FND_MESSAGE.SET_TOKEN('BO_CODE',p_bus_obj_code);
889: FND_MSG_PUB.ADD;
890: RAISE FND_API.G_EXC_ERROR;
891: When OTHERS then
892: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
893: End;
894: -- dbms_output.put_line(' Got message sql');
888: FND_MESSAGE.SET_TOKEN('BO_CODE',p_bus_obj_code);
889: FND_MSG_PUB.ADD;
890: RAISE FND_API.G_EXC_ERROR;
891: When OTHERS then
892: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
893: End;
894: -- dbms_output.put_line(' Got message sql');
895: -- set up the query context...!
896: queryCtx := DBMS_XMLQuery.newContext(l_msg_SQL);
902: Exception
903: When NO_DATA_FOUND then
904: FND_MESSAGE.SET_NAME('JTF','JTF_NO_HDR_DTD');
905: FND_MSG_PUB.ADD;
906: RAISE FND_API.G_EXC_ERROR;
907: When OTHERS then
908: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
909: End;
910:
904: FND_MESSAGE.SET_NAME('JTF','JTF_NO_HDR_DTD');
905: FND_MSG_PUB.ADD;
906: RAISE FND_API.G_EXC_ERROR;
907: When OTHERS then
908: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
909: End;
910:
911: -- dbms_output.put_line(' Got header dtd');
912: