[Home] [Help]
1: PACKAGE BODY CSTPACHK AS
2: /* $Header: CSTACHKB.pls 120.3.12010000.3 2010/02/26 08:14:10 lchevala ship $ */
3:
4: -- FUNCTION
5: -- actual_cost_hook Cover routine to allow users to add
39: EXCEPTION
40:
41: when others then
42: o_err_num := SQLCODE;
43: o_err_msg := 'CSTPACHK.ACTUAL_COST_HOOK:' || substrb(SQLERRM,1,150);
44: return 0;
45:
46: END actual_cost_hook;
47:
79: EXCEPTION
80:
81: when others then
82: o_err_num := SQLCODE;
83: o_err_msg := 'CSTPACHK.COST_DIST_HOOK:' || substrb(SQLERRM,1,150);
84: return 0;
85:
86: END cost_dist_hook;
87:
182:
183: when others then
184: o_err_num := -1;
185: o_err_code := to_char(SQLCODE);
186: o_err_msg := 'Error in CSTPACHK.GET_ACCOUNT_ID:' || substrb(SQLERRM,1,150);
187: return 0;
188:
189: END get_account_id;
190:
223: EXCEPTION
224:
225: when others then
226: o_err_num := SQLCODE;
227: o_err_msg := 'CSTPACHK.layer_hook:' || substrb(SQLERRM,1,150);
228: return 0;
229:
230: END layer_hook;
231:
262:
263: EXCEPTION
264: WHEN OTHERS THEN
265: o_err_num := SQLCODE;
266: o_err_msg := 'CSTPACHK.layers_hook:' || substrb(SQLERRM,1,150);
267: END;
268:
269: -- FUNCTION
270: -- LayerMerge_hook This routine is a client extension that lets the
299: RETURN 1;
300: EXCEPTION
301: WHEN OTHERS THEN
302: o_err_num := SQLCODE;
303: o_err_msg := 'CSTPACHK.layers_hook:' || substrb(SQLERRM,1,150);
304: RETURN -1;
305: END;
306:
307: function get_date(
383:
384: EXCEPTION
385: when others then
386: o_err_num := SQLCODE;
387: o_err_msg := 'CSTPACHK.layer_hook:' || substrb(SQLERRM,1,150);
388: return 0;
389: END validate_job_est_status_hook;
390:
391: --
418: x_msg_count := 0;
419: END;
420:
421:
422: END CSTPACHK;