1: PACKAGE BODY CSTPPPOI AS
2: /* $Header: CSTPPOIB.pls 120.1 2005/06/21 14:47:42 appldev ship $ */
3:
4: PROCEDURE validate_cost_elements (
5: x_interface_header_id IN NUMBER,
32: WHEN OTHERS THEN
33: ROLLBACK;
34: x_err_num := SQLCODE;
35: x_err_code := NULL;
36: x_err_msg := SUBSTR('CSTPPPOI.validate_cost_elements('
37: || to_char(l_stmt_num)
38: || '): '
39: ||SQLERRM,1,240);
40: END validate_cost_elements;
71: WHEN OTHERS THEN
72: ROLLBACK;
73: x_err_num := SQLCODE;
74: x_err_code := NULL;
75: x_err_msg := SUBSTR('CSTPPPOI.validate_level_types('
76: || to_char(l_stmt_num)
77: || '): '
78: ||SQLERRM,1,240);
79:
126: WHEN OTHERS THEN
127: ROLLBACK;
128: x_err_num := SQLCODE;
129: x_err_code := NULL;
130: x_err_msg := SUBSTR('CSTPPPOI.get_le_cg_id('
131: || to_char(l_stmt_num)
132: || '): '
133: ||SQLERRM,1,240);
134:
177: WHEN OTHERS THEN
178: ROLLBACK;
179: x_err_num := SQLCODE;
180: x_err_code := NULL;
181: x_err_msg := SUBSTR('CSTPPPOI.get_ct_cm_id('
182: || to_char(l_stmt_num)
183: || '): '
184: ||SQLERRM,1,240);
185:
232: WHEN OTHERS THEN
233: ROLLBACK;
234: x_err_num := SQLCODE;
235: x_err_code := NULL;
236: x_err_msg := SUBSTR('CSTPPPOI.get_pac_id('
237: || to_char(l_stmt_num)
238: || '): '
239: ||SQLERRM,1,240);
240:
278: WHEN OTHERS THEN
279: ROLLBACK;
280: x_err_num := SQLCODE;
281: x_err_code := NULL;
282: x_err_msg := SUBSTR('CSTPPPOI.validate_item('
283: || to_char(l_stmt_num)
284: || '): '
285: ||SQLERRM,1,240);
286:
325: WHEN OTHERS THEN
326: ROLLBACK;
327: x_err_num := SQLCODE;
328: x_err_code := NULL;
329: x_err_msg := SUBSTR('CSTPPPOI.validate_cost('
330: || to_char(l_stmt_num)
331: || '): '
332: ||SQLERRM,1,240);
333:
366: WHEN OTHERS THEN
367: ROLLBACK;
368: x_err_num := SQLCODE;
369: x_err_code := NULL;
370: x_err_msg := SUBSTR('CSTPPPOI.validate_market_value('
371: || to_char(l_stmt_num)
372: || '): '
373: ||SQLERRM,1,240);
374:
408: WHEN OTHERS THEN
409: ROLLBACK;
410: x_err_num := SQLCODE;
411: x_err_code := NULL;
412: x_err_msg := SUBSTR('CSTPPPOI.validate_justification('
413: || to_char(l_stmt_num)
414: || '): '
415: ||SQLERRM,1,240);
416:
655: WHEN no_rows_exception THEN
656: ROLLBACK;
657: x_err_num := -1;
658: x_err_code := NULL;
659: x_err_msg := SUBSTR('CSTPPPOI.import_costs('
660: || to_char(l_stmt_num)
661: || '): '
662: ||'No rows imported ERROR',1,240);
663:
665: WHEN OTHERS THEN
666: ROLLBACK;
667: x_err_num := SQLCODE;
668: x_err_code := NULL;
669: x_err_msg := SUBSTR('CSTPPPOI.import_costs('
670: || to_char(l_stmt_num)
671: || '): '
672: ||SQLERRM,1,240);
673:
1037: WHEN no_rows_exception THEN
1038: ROLLBACK;
1039: x_err_num := -1;
1040: x_err_code := NULL;
1041: x_err_msg := SUBSTR('CSTPPPOI.derive_costs('
1042: || to_char(l_stmt_num)
1043: || '): '
1044: ||'No rows computed ERROR',1,240);
1045:
1047: WHEN OTHERS THEN
1048: ROLLBACK;
1049: x_err_num := SQLCODE;
1050: x_err_code := NULL;
1051: x_err_msg := SUBSTR('CSTPPPOI.derive_costs('
1052: || to_char(l_stmt_num)
1053: || '): '
1054: ||SQLERRM,1,240);
1055:
1059:
1060:
1061:
1062:
1063: END CSTPPPOI;
1064: