18:
19: errbuf := NULL;
20: Retcode := 0;
21:
22: POA_LOG.setup('POAITEMS');
23: POA_LOG.debug_line('In List All Items');
24:
25: FOR litem in c_all_items LOOP
26: POA_LOG.output_line('"' ||
19: errbuf := NULL;
20: Retcode := 0;
21:
22: POA_LOG.setup('POAITEMS');
23: POA_LOG.debug_line('In List All Items');
24:
25: FOR litem in c_all_items LOOP
26: POA_LOG.output_line('"' ||
27: litem.item_number_pk || '","' ||
22: POA_LOG.setup('POAITEMS');
23: POA_LOG.debug_line('In List All Items');
24:
25: FOR litem in c_all_items LOOP
26: POA_LOG.output_line('"' ||
27: litem.item_number_pk || '","' ||
28: litem.item_name || '","' ||
29: litem.description || '"');
30: END LOOP;
28: litem.item_name || '","' ||
29: litem.description || '"');
30: END LOOP;
31:
32: POA_LOG.put_line('POAITEMS.out generated');
33: POA_LOG.wrapup('SUCCESS');
34:
35: EXCEPTION WHEN OTHERS THEN
36: errbuf := sqlerrm;
29: litem.description || '"');
30: END LOOP;
31:
32: POA_LOG.put_line('POAITEMS.out generated');
33: POA_LOG.wrapup('SUCCESS');
34:
35: EXCEPTION WHEN OTHERS THEN
36: errbuf := sqlerrm;
37: retcode := sqlcode;
35: EXCEPTION WHEN OTHERS THEN
36: errbuf := sqlerrm;
37: retcode := sqlcode;
38:
39: POA_LOG.put_line('Error while listing items:');
40: POA_LOG.put_line(sqlcode || ': ' || sqlerrm);
41:
42: v_buf := retcode || ':' || errbuf;
43: ROLLBACK;
36: errbuf := sqlerrm;
37: retcode := sqlcode;
38:
39: POA_LOG.put_line('Error while listing items:');
40: POA_LOG.put_line(sqlcode || ': ' || sqlerrm);
41:
42: v_buf := retcode || ':' || errbuf;
43: ROLLBACK;
44: POA_LOG.put_line(v_buf);
40: POA_LOG.put_line(sqlcode || ': ' || sqlerrm);
41:
42: v_buf := retcode || ':' || errbuf;
43: ROLLBACK;
44: POA_LOG.put_line(v_buf);
45: POA_LOG.wrapup('ERROR');
46:
47: RETURN;
48:
41:
42: v_buf := retcode || ':' || errbuf;
43: ROLLBACK;
44: POA_LOG.put_line(v_buf);
45: POA_LOG.wrapup('ERROR');
46:
47: RETURN;
48:
49: END poa_list_all_items;