APPS.OEXCPDST dependencies on OEXCPDST

Line 1: PACKAGE BODY OEXCPDST AS

1: PACKAGE BODY OEXCPDST AS
2: /* $Header: OECPDILB.pls 115.1 99/07/16 08:10:43 porting shi $ */
3:
4: PROCEDURE OE_CP_DISCOUNT
5: ( source_id IN NUMBER

Line 334: msg_text := 'OEXCPDST: success';

330: FROM SO_DISCOUNT_CUSTOMERS
331: WHERE DISCOUNT_ID = source_id;
332:
333: return_status := 0; --success
334: msg_text := 'OEXCPDST: success';
335:
336: EXCEPTION
337: WHEN NO_DATA_FOUND THEN
338: return_status := SQLCODE;

Line 339: msg_text := 'OEXCPDST:' || SUBSTR(SQLERRM, 1, 70) || actbuf;

335:
336: EXCEPTION
337: WHEN NO_DATA_FOUND THEN
338: return_status := SQLCODE;
339: msg_text := 'OEXCPDST:' || SUBSTR(SQLERRM, 1, 70) || actbuf;
340:
341: WHEN OTHERS THEN
342: return_status := SQLCODE;
343: msg_text := 'OEXCPDST:' || SUBSTR(SQLERRM, 1, 70) || actbuf;

Line 343: msg_text := 'OEXCPDST:' || SUBSTR(SQLERRM, 1, 70) || actbuf;

339: msg_text := 'OEXCPDST:' || SUBSTR(SQLERRM, 1, 70) || actbuf;
340:
341: WHEN OTHERS THEN
342: return_status := SQLCODE;
343: msg_text := 'OEXCPDST:' || SUBSTR(SQLERRM, 1, 70) || actbuf;
344: END;
345:
346: END OEXCPDST;

Line 346: END OEXCPDST;

342: return_status := SQLCODE;
343: msg_text := 'OEXCPDST:' || SUBSTR(SQLERRM, 1, 70) || actbuf;
344: END;
345:
346: END OEXCPDST;