DBA Data[Home] [Help]

APPS.GMA_PURGE_UTILITIES dependencies on GMA_PURGE_UTILITIES

Line 1: PACKAGE BODY GMA_PURGE_UTILITIES AS

1: PACKAGE BODY GMA_PURGE_UTILITIES AS
2: /* $Header: GMAPRGUB.pls 115.9 2003/10/27 07:48:22 kmoizudd ship $ */
3:
4: -- output text in dated format to log
5: PROCEDURE logprint(p_purge_id sy_purg_mst.purge_id%TYPE,p_text VARCHAR2);

Line 42: -- GMA_PURGE_UTILITIES.logprint('Problem raised in GMA_PURGE_UTILITIES.logprint.');

38: EXCEPTION
39:
40: WHEN OTHERS THEN
41:
42: -- GMA_PURGE_UTILITIES.logprint('Problem raised in GMA_PURGE_UTILITIES.logprint.');
43: -- GMA_PURGE_UTILITIES.logprint('Unhandled EXCEPTION - ' || sqlerrm);
44: RAISE;
45: END logprint;
46:

Line 43: -- GMA_PURGE_UTILITIES.logprint('Unhandled EXCEPTION - ' || sqlerrm);

39:
40: WHEN OTHERS THEN
41:
42: -- GMA_PURGE_UTILITIES.logprint('Problem raised in GMA_PURGE_UTILITIES.logprint.');
43: -- GMA_PURGE_UTILITIES.logprint('Unhandled EXCEPTION - ' || sqlerrm);
44: RAISE;
45: END logprint;
46:
47: /***********************************************************/

Line 56: GMA_PURGE_UTILITIES.printline(p_purge_id);

52: -- print a line of stars before output, show length of string
53: BEGIN
54:
55: IF (p_debug_flag = TRUE) THEN
56: GMA_PURGE_UTILITIES.printline(p_purge_id);
57: GMA_PURGE_UTILITIES.logprint(p_purge_id,'Length is ' || TO_CHAR(LENGTH(p_text)));
58: GMA_PURGE_UTILITIES.printlong(p_purge_id,p_text);
59: END IF;
60:

Line 57: GMA_PURGE_UTILITIES.logprint(p_purge_id,'Length is ' || TO_CHAR(LENGTH(p_text)));

53: BEGIN
54:
55: IF (p_debug_flag = TRUE) THEN
56: GMA_PURGE_UTILITIES.printline(p_purge_id);
57: GMA_PURGE_UTILITIES.logprint(p_purge_id,'Length is ' || TO_CHAR(LENGTH(p_text)));
58: GMA_PURGE_UTILITIES.printlong(p_purge_id,p_text);
59: END IF;
60:
61: RETURN;

Line 58: GMA_PURGE_UTILITIES.printlong(p_purge_id,p_text);

54:
55: IF (p_debug_flag = TRUE) THEN
56: GMA_PURGE_UTILITIES.printline(p_purge_id);
57: GMA_PURGE_UTILITIES.logprint(p_purge_id,'Length is ' || TO_CHAR(LENGTH(p_text)));
58: GMA_PURGE_UTILITIES.printlong(p_purge_id,p_text);
59: END IF;
60:
61: RETURN;
62:

Line 66: GMA_PURGE_UTILITIES.printlong(p_purge_id,

62:
63: EXCEPTION
64:
65: WHEN OTHERS THEN
66: GMA_PURGE_UTILITIES.printlong(p_purge_id,
67: 'Problem raised in GMA_PURGE_UTILITIES.printdebug.');
68: GMA_PURGE_UTILITIES.printlong(p_purge_id,
69: 'Unhandled EXCEPTION - ' || sqlerrm);
70: RAISE;

Line 67: 'Problem raised in GMA_PURGE_UTILITIES.printdebug.');

63: EXCEPTION
64:
65: WHEN OTHERS THEN
66: GMA_PURGE_UTILITIES.printlong(p_purge_id,
67: 'Problem raised in GMA_PURGE_UTILITIES.printdebug.');
68: GMA_PURGE_UTILITIES.printlong(p_purge_id,
69: 'Unhandled EXCEPTION - ' || sqlerrm);
70: RAISE;
71:

Line 68: GMA_PURGE_UTILITIES.printlong(p_purge_id,

64:
65: WHEN OTHERS THEN
66: GMA_PURGE_UTILITIES.printlong(p_purge_id,
67: 'Problem raised in GMA_PURGE_UTILITIES.printdebug.');
68: GMA_PURGE_UTILITIES.printlong(p_purge_id,
69: 'Unhandled EXCEPTION - ' || sqlerrm);
70: RAISE;
71:
72: END;

Line 96: GMA_PURGE_UTILITIES.logprint(p_purge_id,l_frag);

92:
93: WHILE (l_counter > 0) LOOP
94: l_frag := SUBSTR(l_text,l_o_counter - l_counter,80);
95: l_counter := l_counter - 80;
96: GMA_PURGE_UTILITIES.logprint(p_purge_id,l_frag);
97: END LOOP;
98:
99: RETURN;
100:

Line 104: GMA_PURGE_UTILITIES.logprint(p_purge_id,

100:
101: EXCEPTION
102:
103: WHEN OTHERS THEN
104: GMA_PURGE_UTILITIES.logprint(p_purge_id,
105: 'Problem raised in GMA_PURGE_UTILITIES.printlong.');
106: GMA_PURGE_UTILITIES.logprint(p_purge_id,
107: 'Unhandled EXCEPTION - ' || sqlerrm);
108: RAISE;

Line 105: 'Problem raised in GMA_PURGE_UTILITIES.printlong.');

101: EXCEPTION
102:
103: WHEN OTHERS THEN
104: GMA_PURGE_UTILITIES.logprint(p_purge_id,
105: 'Problem raised in GMA_PURGE_UTILITIES.printlong.');
106: GMA_PURGE_UTILITIES.logprint(p_purge_id,
107: 'Unhandled EXCEPTION - ' || sqlerrm);
108: RAISE;
109:

Line 106: GMA_PURGE_UTILITIES.logprint(p_purge_id,

102:
103: WHEN OTHERS THEN
104: GMA_PURGE_UTILITIES.logprint(p_purge_id,
105: 'Problem raised in GMA_PURGE_UTILITIES.printlong.');
106: GMA_PURGE_UTILITIES.logprint(p_purge_id,
107: 'Unhandled EXCEPTION - ' || sqlerrm);
108: RAISE;
109:
110: END printlong;

Line 121: GMA_PURGE_UTILITIES.logprint(p_purge_id,TO_CHAR(SYSDATE,'DD-MON-YYYY HH24:MI:SS'));

117:
118: BEGIN
119:
120: IF (p_debug_flag = TRUE) THEN
121: GMA_PURGE_UTILITIES.logprint(p_purge_id,TO_CHAR(SYSDATE,'DD-MON-YYYY HH24:MI:SS'));
122: END IF;
123:
124: RETURN;
125:

Line 129: GMA_PURGE_UTILITIES.logprint(p_purge_id,

125:
126: EXCEPTION
127:
128: WHEN OTHERS THEN
129: GMA_PURGE_UTILITIES.logprint(p_purge_id,
130: 'Problem raised in GMA_PURGE_UTILITIES.debugtime.');
131: GMA_PURGE_UTILITIES.logprint(p_purge_id,
132: 'Unhandled EXCEPTION - ' || sqlerrm);
133: RAISE;

Line 130: 'Problem raised in GMA_PURGE_UTILITIES.debugtime.');

126: EXCEPTION
127:
128: WHEN OTHERS THEN
129: GMA_PURGE_UTILITIES.logprint(p_purge_id,
130: 'Problem raised in GMA_PURGE_UTILITIES.debugtime.');
131: GMA_PURGE_UTILITIES.logprint(p_purge_id,
132: 'Unhandled EXCEPTION - ' || sqlerrm);
133: RAISE;
134:

Line 131: GMA_PURGE_UTILITIES.logprint(p_purge_id,

127:
128: WHEN OTHERS THEN
129: GMA_PURGE_UTILITIES.logprint(p_purge_id,
130: 'Problem raised in GMA_PURGE_UTILITIES.debugtime.');
131: GMA_PURGE_UTILITIES.logprint(p_purge_id,
132: 'Unhandled EXCEPTION - ' || sqlerrm);
133: RAISE;
134:
135: END debugtime;

Line 163: GMA_PURGE_UTILITIES.printlong(p_purge_id,

159:
160: EXCEPTION
161:
162: WHEN OTHERS THEN
163: GMA_PURGE_UTILITIES.printlong(p_purge_id,
164: 'Problem raised in GMA_PURGE_UTILITIES.makearcname.'||p_purge_id||' '||p_sourcetable);
165: GMA_PURGE_UTILITIES.printlong(p_purge_id,
166: 'Unhandled EXCEPTION - ' || sqlerrm);
167: RAISE;

Line 164: 'Problem raised in GMA_PURGE_UTILITIES.makearcname.'||p_purge_id||' '||p_sourcetable);

160: EXCEPTION
161:
162: WHEN OTHERS THEN
163: GMA_PURGE_UTILITIES.printlong(p_purge_id,
164: 'Problem raised in GMA_PURGE_UTILITIES.makearcname.'||p_purge_id||' '||p_sourcetable);
165: GMA_PURGE_UTILITIES.printlong(p_purge_id,
166: 'Unhandled EXCEPTION - ' || sqlerrm);
167: RAISE;
168:

Line 165: GMA_PURGE_UTILITIES.printlong(p_purge_id,

161:
162: WHEN OTHERS THEN
163: GMA_PURGE_UTILITIES.printlong(p_purge_id,
164: 'Problem raised in GMA_PURGE_UTILITIES.makearcname.'||p_purge_id||' '||p_sourcetable);
165: GMA_PURGE_UTILITIES.printlong(p_purge_id,
166: 'Unhandled EXCEPTION - ' || sqlerrm);
167: RAISE;
168:
169: END makearcname;

Line 175: GMA_PURGE_UTILITIES.logprint(p_purge_id,

171: /***********************************************************/
172:
173: PROCEDURE printline(p_purge_id sy_purg_mst.purge_id%TYPE) IS
174: BEGIN
175: GMA_PURGE_UTILITIES.logprint(p_purge_id,
176: '****************************************' ||
177: '****************************************');
178: END printline;
179:

Line 194: END GMA_PURGE_UTILITIES;

190: RAISE;
191:
192: END chartime;
193:
194: END GMA_PURGE_UTILITIES;