40: PROCEDURE Debug(
41: p_msg_string IN VARCHAR2,
42: p_msg_type IN VARCHAR2 := 'PV_DEBUG_MESSAGE',
43: p_token_type IN VARCHAR2 := 'TEXT',
44: p_statement_level IN NUMBER := FND_LOG.LEVEL_PROCEDURE
45: );
46:
47: PROCEDURE Set_Message(
48: p_msg_level IN NUMBER,
272: -- -----------------------------------------------------------------------
273: Debug(p_msg_string => TO_CHAR(SYSDATE, 'DD-MON-YYYY HH24:MI:SS'),
274: p_msg_type => 'PV_REFERRAL_STATUS_START_TIME',
275: p_token_type => 'P_DATE_TIME',
276: p_statement_level => FND_LOG.LEVEL_EVENT
277: );
278:
279:
280: -- -----------------------------------------------------------------------
785: -- -------------------------------------------------------------------------
786: Debug(p_msg_string => TO_CHAR(SYSDATE, 'DD-MON-YYYY HH24:MI:SS'),
787: p_msg_type => 'PV_REFERRAL_STATUS_END_TIME',
788: p_token_type => 'P_DATE_TIME',
789: p_statement_level => FND_LOG.LEVEL_EVENT
790: );
791:
792:
793: l_elapsed_time := DBMS_UTILITY.get_time - l_total_start;
2365: PROCEDURE Debug(
2366: p_msg_string IN VARCHAR2,
2367: p_msg_type IN VARCHAR2 := 'PV_DEBUG_MESSAGE',
2368: p_token_type IN VARCHAR2 := 'TEXT',
2369: p_statement_level IN NUMBER := FND_LOG.LEVEL_PROCEDURE
2370: )
2371: IS
2372: BEGIN
2373: IF (PV_DEBUG_LOW_ON) THEN
2381: FND_FILE.PUT_LINE( FND_FILE.LOG, fnd_message.get );
2382: END IF;
2383: END IF;
2384:
2385: IF (p_statement_level >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2386: FND_LOG.STRING(p_statement_level,
2387: 'pv.plsql.' || g_pkg_name || '.' || g_api_name,
2388: p_msg_string
2389: );
2382: END IF;
2383: END IF;
2384:
2385: IF (p_statement_level >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2386: FND_LOG.STRING(p_statement_level,
2387: 'pv.plsql.' || g_pkg_name || '.' || g_api_name,
2388: p_msg_string
2389: );
2390: END IF;
2419: )
2420: IS
2421: BEGIN
2422: -- --------------------------------------------------------------------------
2423: -- 11.5.10 debug - messages logged to fnd_log_messages table.
2424: -- --------------------------------------------------------------------------
2425: IF (FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2426: FND_MESSAGE.Set_Name('PV', p_msg_name);
2427:
2421: BEGIN
2422: -- --------------------------------------------------------------------------
2423: -- 11.5.10 debug - messages logged to fnd_log_messages table.
2424: -- --------------------------------------------------------------------------
2425: IF (FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2426: FND_MESSAGE.Set_Name('PV', p_msg_name);
2427:
2428: IF (p_token1 IS NOT NULL) THEN
2429: FND_MESSAGE.Set_Token(p_token1, p_token1_value);
2437: FND_MESSAGE.Set_Token(p_token3, p_token3_value);
2438: END IF;
2439:
2440:
2441: FND_LOG.MESSAGE(FND_LOG.LEVEL_ERROR,
2442: 'pv.plsql.' || g_pkg_name || '.' || g_api_name,
2443: FALSE
2444: );
2445: END IF;