58:
59: EXCEPTION
60: WHEN OTHERS THEN
61: x_ret_status := FND_API.G_RET_STS_ERROR;
62: fnd_message.set_name('FLM', 'FLM_INTERFACE_ERR');
63: x_err_msg := fnd_message.get;
64:
65: END read_pull_sequence_interface;
66:
59: EXCEPTION
60: WHEN OTHERS THEN
61: x_ret_status := FND_API.G_RET_STS_ERROR;
62: fnd_message.set_name('FLM', 'FLM_INTERFACE_ERR');
63: x_err_msg := fnd_message.get;
64:
65: END read_pull_sequence_interface;
66:
67:
101:
102: EXCEPTION
103: WHEN OTHERS THEN
104: x_ret_status := FND_API.G_RET_STS_ERROR;
105: fnd_message.set_name('FLM', 'FLM_INTERFACE_ERR');
106: x_err_msg := fnd_message.get;
107:
108: END read_cards_interface;
109:
102: EXCEPTION
103: WHEN OTHERS THEN
104: x_ret_status := FND_API.G_RET_STS_ERROR;
105: fnd_message.set_name('FLM', 'FLM_INTERFACE_ERR');
106: x_err_msg := fnd_message.get;
107:
108: END read_cards_interface;
109:
110: -- Main procedure called by the kanaban mass register concurrent program
127: x_err_msg => l_error_msg);
128:
129: IF l_ret_status = FND_API.G_RET_STS_ERROR THEN
130: retcode := 2;
131: fnd_message.set_name('FLM','FLM_PULLSEQ_INTF_ERR');
132: errbuf := fnd_message.get;
133: fnd_file.put_line(fnd_file.log, errbuf);
134: l_conc_status := fnd_concurrent.set_completion_status('ERROR', errbuf);
135: RETURN;
128:
129: IF l_ret_status = FND_API.G_RET_STS_ERROR THEN
130: retcode := 2;
131: fnd_message.set_name('FLM','FLM_PULLSEQ_INTF_ERR');
132: errbuf := fnd_message.get;
133: fnd_file.put_line(fnd_file.log, errbuf);
134: l_conc_status := fnd_concurrent.set_completion_status('ERROR', errbuf);
135: RETURN;
136: ELSIF l_ret_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
143: x_err_msg => l_error_msg);
144:
145: IF l_ret_status = FND_API.G_RET_STS_ERROR THEN
146: retcode := 2;
147: fnd_message.set_name('FLM','FLM_CARDS_INTF_ERR');
148: errbuf := fnd_message.get;
149: fnd_file.put_line(fnd_file.log, errbuf);
150: l_conc_status := fnd_concurrent.set_completion_status('ERROR', errbuf);
151: RETURN;
144:
145: IF l_ret_status = FND_API.G_RET_STS_ERROR THEN
146: retcode := 2;
147: fnd_message.set_name('FLM','FLM_CARDS_INTF_ERR');
148: errbuf := fnd_message.get;
149: fnd_file.put_line(fnd_file.log, errbuf);
150: l_conc_status := fnd_concurrent.set_completion_status('ERROR', errbuf);
151: RETURN;
152: ELSIF l_ret_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
176: WHERE interface_id = g_kanban_card_tbl(i).interface_id;
177:
178: IF l_ret_status = FND_API.G_RET_STS_SUCCESS THEN
179: retcode := 0;
180: fnd_message.set_name('FLM','FLM_INTERFACE_SUCCESS');
181: errbuf := fnd_message.get;
182: fnd_file.put_line(fnd_file.log, errbuf);
183: l_conc_status := fnd_concurrent.set_completion_status('NORMAL', errbuf);
184: ELSE
177:
178: IF l_ret_status = FND_API.G_RET_STS_SUCCESS THEN
179: retcode := 0;
180: fnd_message.set_name('FLM','FLM_INTERFACE_SUCCESS');
181: errbuf := fnd_message.get;
182: fnd_file.put_line(fnd_file.log, errbuf);
183: l_conc_status := fnd_concurrent.set_completion_status('NORMAL', errbuf);
184: ELSE
185: retcode := 1;
182: fnd_file.put_line(fnd_file.log, errbuf);
183: l_conc_status := fnd_concurrent.set_completion_status('NORMAL', errbuf);
184: ELSE
185: retcode := 1;
186: fnd_message.set_name('FLM','FLM_INTERFACE_ROW_ERR');
187: errbuf := fnd_message.get;
188: fnd_file.put_line(fnd_file.log, errbuf);
189: l_conc_status := fnd_concurrent.set_completion_status('WARNING', errbuf);
190: END IF;
183: l_conc_status := fnd_concurrent.set_completion_status('NORMAL', errbuf);
184: ELSE
185: retcode := 1;
186: fnd_message.set_name('FLM','FLM_INTERFACE_ROW_ERR');
187: errbuf := fnd_message.get;
188: fnd_file.put_line(fnd_file.log, errbuf);
189: l_conc_status := fnd_concurrent.set_completion_status('WARNING', errbuf);
190: END IF;
191:
191:
192: EXCEPTION
193: WHEN OTHERS THEN
194: retcode := 2;
195: fnd_message.set_name('FLM','FLM_INTERFACE_ERR');
196: errbuf := fnd_message.get;
197: fnd_file.put_line(fnd_file.log, errbuf);
198: fnd_file.put_line(fnd_file.log, SQLERRM);
199: l_conc_status := fnd_concurrent.set_completion_status('ERROR', errbuf);
192: EXCEPTION
193: WHEN OTHERS THEN
194: retcode := 2;
195: fnd_message.set_name('FLM','FLM_INTERFACE_ERR');
196: errbuf := fnd_message.get;
197: fnd_file.put_line(fnd_file.log, errbuf);
198: fnd_file.put_line(fnd_file.log, SQLERRM);
199: l_conc_status := fnd_concurrent.set_completion_status('ERROR', errbuf);
200: