7: PROCEDURE Add(debug_msg IN VARCHAR2, debug_level IN NUMBER, module IN VARCHAR2)
8: IS
9: BEGIN
10:
11: IF (debug_level >= fnd_log.G_CURRENT_RUNTIME_LEVEL) THEN
12:
13: fnd_log.string(debug_level,module,debug_msg);
14: --COMMIT;
15:
9: BEGIN
10:
11: IF (debug_level >= fnd_log.G_CURRENT_RUNTIME_LEVEL) THEN
12:
13: fnd_log.string(debug_level,module,debug_msg);
14: --COMMIT;
15:
16: -- if in a concurrent request, also add to the CP log
17: IF fnd_global.CONC_REQUEST_ID <> -1 THEN
46: FND_FILE.put_line(FND_FILE.LOG, debug_msg);
47: END IF;
48:
49: -- Write into log only if DEBUG LEVELS match.
50: IF (debug_level >= fnd_log.G_CURRENT_RUNTIME_LEVEL) THEN
51: fnd_log.string(debug_level,module,debug_msg);
52: END IF;
53:
54:
47: END IF;
48:
49: -- Write into log only if DEBUG LEVELS match.
50: IF (debug_level >= fnd_log.G_CURRENT_RUNTIME_LEVEL) THEN
51: fnd_log.string(debug_level,module,debug_msg);
52: END IF;
53:
54:
55: EXCEPTION