1: PACKAGE BODY JTF_TTY_WORKFLOW_POP_BIN_PVT AS
2: /* $Header: jtfvpobb.pls 120.0 2005/06/02 18:22:12 appldev ship $ */
3: -- Start of Comments
4: -- ---------------------------------------------------
5: -- PACKAGE NAME: JTF_TTY_WORKFLOW_POP_BIN_PVT
1: PACKAGE BODY JTF_TTY_WORKFLOW_POP_BIN_PVT AS
2: /* $Header: jtfvpobb.pls 120.0 2005/06/02 18:22:12 appldev ship $ */
3: -- Start of Comments
4: -- ---------------------------------------------------
5: -- PACKAGE NAME: JTF_TTY_WORKFLOW_POP_BIN_PVT
6: -- PURPOSE
7: --
8: -- Procedures:
9: -- (see below for specification)
39: BEGIN
40:
41: G_DEBUG := TRUE;
42:
43: JTF_TTY_WORKFLOW_POP_BIN_PVT.print_log('Debug flag ' || p_debug_flag);
44:
45: G_DEBUG := FALSE;
46:
47: if upper(p_debug_flag) = 'Y' then
51: end if;
52:
53: if p_process_workflow = 'Y' then
54: --
55: JTF_TTY_WORKFLOW_POP_BIN_PVT.print_log('Calling workflow procedure since workflow param is Y ');
56:
57: JTF_TTY_CATCHALL_WORKFLOW.Process_catch_all_rec
58: ( x_return_status => l_return_status
59: , x_error_message => l_error_message
112: EXCEPTION
113: when FND_API.G_EXC_ERROR then
114: RETCODE := 1;
115: ERRBUF := SQLERRM;
116: JTF_TTY_WORKFLOW_POP_BIN_PVT.print_log('Exception others in populate_bin_startworkflow '||SQLERRM);
117: RETURN;
118: when FND_API.G_EXC_UNEXPECTED_ERROR then
119: RETCODE := 1;
120: ERRBUF := SQLERRM;
117: RETURN;
118: when FND_API.G_EXC_UNEXPECTED_ERROR then
119: RETCODE := 1;
120: ERRBUF := SQLERRM;
121: JTF_TTY_WORKFLOW_POP_BIN_PVT.print_log ('Exception others in populate_bin_startworkflow '||SQLERRM);
122: RETURN;
123: when others then
124: RETCODE := 1;
125: JTF_TTY_WORKFLOW_POP_BIN_PVT.print_log ('Exception others in populate_bin_startworkflow '||SQLERRM);
121: JTF_TTY_WORKFLOW_POP_BIN_PVT.print_log ('Exception others in populate_bin_startworkflow '||SQLERRM);
122: RETURN;
123: when others then
124: RETCODE := 1;
125: JTF_TTY_WORKFLOW_POP_BIN_PVT.print_log ('Exception others in populate_bin_startworkflow '||SQLERRM);
126:
127: RETURN;
128:
129: END populate_bin_startworkflow;
140:
141: end print_log;
142:
143:
144: END JTF_TTY_WORKFLOW_POP_BIN_PVT;