[Home] [Help]
1: PACKAGE BODY PO_ONLINE_REPORT AS
2: /* $Header: POXPOONB.pls 115.6 2002/11/25 22:40:04 sbull ship $ */
3:
4: -- Types :
5: --
126: p_return_code => p_return_code) then
127:
128: PO_MESSAGE_S.APP_ERROR(error_name => 'PO_ALL_TRACE_ERROR',
129: token1 => 'FILE',
130: value1 => 'PO_ONLINE_REPORT',
131: token2 => 'ERR_NUMBER',
132: value2 => '005',
133: token3 => 'SUBROUTINE',
134: value3 => 'INSERT_MANY()');
152: p_return_code => p_return_code) then
153:
154: PO_MESSAGE_S.APP_ERROR(error_name => 'PO_ALL_TRACE_ERROR',
155: token1 => 'FILE',
156: value1 => 'PO_ONLINE_REPORT',
157: token2 => 'ERR_NUMBER',
158: value2 => '010',
159: token3 => 'SUBROUTINE',
160: value3 => 'INSERT_MANY()');
170: EXCEPTION
171:
172: WHEN OTHERS THEN
173:
174: PO_MESSAGE_S.SQL_ERROR(routine => 'PO_ONLINE_REPORT',
175: location => '015',
176: error_code => SQLCODE);
177:
178: return(FALSE);
211: p_return_code IN OUT NOCOPY VARCHAR2) RETURN BOOLEAN IS
212:
213: l_userid po_lines.last_updated_by%TYPE;
214: l_loginid po_lines.last_update_login%TYPE;
215: l_textline po_online_report_text.text_line%TYPE;
216:
217: l_shipmsg VARCHAR2(25);
218: l_linemsg VARCHAR2(25);
219: l_tokennam1 VARCHAR2(10);
233: if l_userid = -1 then
234:
235: PO_MESSAGE_S.APP_ERROR(error_name => 'PO_ALL_TRACE_ERROR_WITH_MSG',
236: token1 => 'FILE',
237: value1 => 'PO_ONLINE_REPORT',
238: token2 => 'ERR_NUMBER',
239: value2 => '020',
240: token3 => 'SUBROUTINE',
241: value3 => 'INSERT_SINGLE()',
257: if l_loginid = -1 then
258:
259: PO_MESSAGE_S.APP_ERROR(error_name => 'PO_ALL_TRACE_ERROR_WITH_MSG',
260: token1 => 'FILE',
261: value1 => 'PO_ONLINE_REPORT',
262: token2 => 'ERR_NUMBER',
263: value2 => '025',
264: token3 => 'SUBROUTINE',
265: value3 => 'INSERT_SINGLE()',
298: l_textline := replace(l_textline, l_tokennam2, p_linenum);
299: l_textline := replace(l_textline, l_tokennam3, l_shipmsg);
300: l_textline := replace(l_textline, l_tokennam4, p_shipnum);
301:
302: insert into po_online_report_text(online_report_id,
303: last_update_login,
304: last_updated_by,
305: last_update_date,
306: created_by,
339: EXCEPTION
340:
341: WHEN OTHERS THEN
342:
343: PO_MESSAGE_S.SQL_ERROR(routine => 'PO_ONLINE_REPORT',
344: location => '030',
345: error_code => SQLCODE);
346:
347: return(FALSE);
372: l_tokenval1 po_distributions.quantity_delivered%TYPE;
373: l_tokenval2 po_line_locations.quantity%TYPE;
374: l_userid po_lines.last_updated_by%TYPE;
375: l_loginid po_lines.last_update_login%TYPE;
376: l_textline po_online_report_text.text_line%TYPE;
377:
378: l_tokennam1 VARCHAR2(10);
379: l_tokennam2 VARCHAR2(10);
380: l_message VARCHAR2(2000);
414: if l_userid = -1 then
415:
416: PO_MESSAGE_S.APP_ERROR(error_name => 'PO_ALL_TRACE_ERROR_WITH_MSG',
417: token1 => 'FILE',
418: value1 => 'PO_ONLINE_REPORT',
419: token2 => 'ERR_NUMBER',
420: value2 => '035',
421: token3 => 'SUBROUTINE',
422: value3 => 'ONLINE_FINSERT()',
438: if l_loginid = -1 then
439:
440: PO_MESSAGE_S.APP_ERROR(error_name => 'PO_ALL_TRACE_ERROR_WITH_MSG',
441: token1 => 'FILE',
442: value1 => 'PO_ONLINE_REPORT',
443: token2 => 'ERR_NUMBER',
444: value2 => '040',
445: token3 => 'SUBROUTINE',
446: value3 => 'ONLINE_FINSERT()',
518: else
519: l_textline := l_message;
520: end if;
521:
522: insert into po_online_report_text
523: (online_report_id,
524: last_update_login,
525: last_updated_by,
526: last_update_date,
574: if dbms_sql.is_open(cur_insert) then
575: dbms_sql.close_cursor(cur_insert);
576: end if;
577:
578: PO_MESSAGE_S.SQL_ERROR(routine => 'PO_ONLINE_REPORT',
579: location => '045',
580: error_code => SQLCODE);
581:
582: return(FALSE);
602:
603: l_docid po_lines.line_num%TYPE;
604: l_userid po_lines.last_updated_by%TYPE;
605: l_loginid po_lines.last_update_login%TYPE;
606: l_textline po_online_report_text.text_line%TYPE;
607:
608: l_distmsg VARCHAR2(25);
609: l_shipmsg VARCHAR2(25);
610: l_linemsg VARCHAR2(25);
642: if l_userid = -1 then
643:
644: PO_MESSAGE_S.APP_ERROR(error_name => 'PO_ALL_TRACE_ERROR_WITH_MSG',
645: token1 => 'FILE',
646: value1 => 'PO_ONLINE_REPORT',
647: token2 => 'ERR_NUMBER',
648: value2 => '050',
649: token3 => 'SUBROUTINE',
650: value3 => 'ONLINE_SINSERT()',
666: if l_loginid = -1 then
667:
668: PO_MESSAGE_S.APP_ERROR(error_name => 'PO_ALL_TRACE_ERROR_WITH_MSG',
669: token1 => 'FILE',
670: value1 => 'PO_ONLINE_REPORT',
671: token2 => 'ERR_NUMBER',
672: value2 => '055',
673: token3 => 'SUBROUTINE',
674: value3 => 'ONLINE_SINSERT()',
693:
694:
695: -- Setup the SQL Statement
696:
697: sql_insert := 'insert into po_online_report_text ' ||
698: '(online_report_id, ' ||
699: 'last_update_login, ' ||
700: 'last_updated_by, ' ||
701: 'last_update_date, ' ||
764: if dbms_sql.is_open(cur_insert) then
765: dbms_sql.close_cursor(cur_insert);
766: end if;
767:
768: PO_MESSAGE_S.SQL_ERROR(routine => 'PO_ONLINE_REPORT',
769: location => '060',
770: error_code => SQLCODE);
771:
772: return(FALSE);
791: END get_debug;
792:
793: /* ----------------------------------------------------------------------- */
794:
795: END PO_ONLINE_REPORT;
796: