DBA Data[Home] [Help]

APPS.AP_FUNDS_CONTROL_PKG dependencies on FND_LOG

Line 5: G_CURRENT_RUNTIME_LEVEL NUMBER := FND_LOG.G_CURRENT_RUNTIME_LEVEL;

1: PACKAGE BODY AP_FUNDS_CONTROL_PKG AS
2: /* $Header: aprfundb.pls 120.44.12010000.1 2008/07/28 06:04:42 appldev ship $ */
3:
4: -- Logging Infra
5: G_CURRENT_RUNTIME_LEVEL NUMBER := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
6: G_LEVEL_UNEXPECTED CONSTANT NUMBER := FND_LOG.LEVEL_UNEXPECTED;
7: G_LEVEL_ERROR CONSTANT NUMBER := FND_LOG.LEVEL_ERROR;
8: G_LEVEL_EXCEPTION CONSTANT NUMBER := FND_LOG.LEVEL_EXCEPTION;
9: G_LEVEL_UNEXPECTED CONSTANT NUMBER := FND_LOG.LEVEL_UNEXPECTED;

Line 6: G_LEVEL_UNEXPECTED CONSTANT NUMBER := FND_LOG.LEVEL_UNEXPECTED;

2: /* $Header: aprfundb.pls 120.44.12010000.1 2008/07/28 06:04:42 appldev ship $ */
3:
4: -- Logging Infra
5: G_CURRENT_RUNTIME_LEVEL NUMBER := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
6: G_LEVEL_UNEXPECTED CONSTANT NUMBER := FND_LOG.LEVEL_UNEXPECTED;
7: G_LEVEL_ERROR CONSTANT NUMBER := FND_LOG.LEVEL_ERROR;
8: G_LEVEL_EXCEPTION CONSTANT NUMBER := FND_LOG.LEVEL_EXCEPTION;
9: G_LEVEL_UNEXPECTED CONSTANT NUMBER := FND_LOG.LEVEL_UNEXPECTED;
10: G_LEVEL_EVENT CONSTANT NUMBER := FND_LOG.LEVEL_EVENT;

Line 7: G_LEVEL_ERROR CONSTANT NUMBER := FND_LOG.LEVEL_ERROR;

3:
4: -- Logging Infra
5: G_CURRENT_RUNTIME_LEVEL NUMBER := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
6: G_LEVEL_UNEXPECTED CONSTANT NUMBER := FND_LOG.LEVEL_UNEXPECTED;
7: G_LEVEL_ERROR CONSTANT NUMBER := FND_LOG.LEVEL_ERROR;
8: G_LEVEL_EXCEPTION CONSTANT NUMBER := FND_LOG.LEVEL_EXCEPTION;
9: G_LEVEL_UNEXPECTED CONSTANT NUMBER := FND_LOG.LEVEL_UNEXPECTED;
10: G_LEVEL_EVENT CONSTANT NUMBER := FND_LOG.LEVEL_EVENT;
11: G_LEVEL_PROCEDURE CONSTANT NUMBER := FND_LOG.LEVEL_PROCEDURE;

Line 8: G_LEVEL_EXCEPTION CONSTANT NUMBER := FND_LOG.LEVEL_EXCEPTION;

4: -- Logging Infra
5: G_CURRENT_RUNTIME_LEVEL NUMBER := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
6: G_LEVEL_UNEXPECTED CONSTANT NUMBER := FND_LOG.LEVEL_UNEXPECTED;
7: G_LEVEL_ERROR CONSTANT NUMBER := FND_LOG.LEVEL_ERROR;
8: G_LEVEL_EXCEPTION CONSTANT NUMBER := FND_LOG.LEVEL_EXCEPTION;
9: G_LEVEL_UNEXPECTED CONSTANT NUMBER := FND_LOG.LEVEL_UNEXPECTED;
10: G_LEVEL_EVENT CONSTANT NUMBER := FND_LOG.LEVEL_EVENT;
11: G_LEVEL_PROCEDURE CONSTANT NUMBER := FND_LOG.LEVEL_PROCEDURE;
12: G_LEVEL_STATEMENT CONSTANT NUMBER := FND_LOG.LEVEL_STATEMENT;

Line 9: G_LEVEL_UNEXPECTED CONSTANT NUMBER := FND_LOG.LEVEL_UNEXPECTED;

5: G_CURRENT_RUNTIME_LEVEL NUMBER := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
6: G_LEVEL_UNEXPECTED CONSTANT NUMBER := FND_LOG.LEVEL_UNEXPECTED;
7: G_LEVEL_ERROR CONSTANT NUMBER := FND_LOG.LEVEL_ERROR;
8: G_LEVEL_EXCEPTION CONSTANT NUMBER := FND_LOG.LEVEL_EXCEPTION;
9: G_LEVEL_UNEXPECTED CONSTANT NUMBER := FND_LOG.LEVEL_UNEXPECTED;
10: G_LEVEL_EVENT CONSTANT NUMBER := FND_LOG.LEVEL_EVENT;
11: G_LEVEL_PROCEDURE CONSTANT NUMBER := FND_LOG.LEVEL_PROCEDURE;
12: G_LEVEL_STATEMENT CONSTANT NUMBER := FND_LOG.LEVEL_STATEMENT;
13: G_MODULE_NAME CONSTANT VARCHAR2(50) := 'AP.PLSQL.AP_FUNDS_CONTROL_PKG.';

Line 10: G_LEVEL_EVENT CONSTANT NUMBER := FND_LOG.LEVEL_EVENT;

6: G_LEVEL_UNEXPECTED CONSTANT NUMBER := FND_LOG.LEVEL_UNEXPECTED;
7: G_LEVEL_ERROR CONSTANT NUMBER := FND_LOG.LEVEL_ERROR;
8: G_LEVEL_EXCEPTION CONSTANT NUMBER := FND_LOG.LEVEL_EXCEPTION;
9: G_LEVEL_UNEXPECTED CONSTANT NUMBER := FND_LOG.LEVEL_UNEXPECTED;
10: G_LEVEL_EVENT CONSTANT NUMBER := FND_LOG.LEVEL_EVENT;
11: G_LEVEL_PROCEDURE CONSTANT NUMBER := FND_LOG.LEVEL_PROCEDURE;
12: G_LEVEL_STATEMENT CONSTANT NUMBER := FND_LOG.LEVEL_STATEMENT;
13: G_MODULE_NAME CONSTANT VARCHAR2(50) := 'AP.PLSQL.AP_FUNDS_CONTROL_PKG.';
14: G_LEVEL_LOG_DISABLED CONSTANT NUMBER := 99;

Line 11: G_LEVEL_PROCEDURE CONSTANT NUMBER := FND_LOG.LEVEL_PROCEDURE;

7: G_LEVEL_ERROR CONSTANT NUMBER := FND_LOG.LEVEL_ERROR;
8: G_LEVEL_EXCEPTION CONSTANT NUMBER := FND_LOG.LEVEL_EXCEPTION;
9: G_LEVEL_UNEXPECTED CONSTANT NUMBER := FND_LOG.LEVEL_UNEXPECTED;
10: G_LEVEL_EVENT CONSTANT NUMBER := FND_LOG.LEVEL_EVENT;
11: G_LEVEL_PROCEDURE CONSTANT NUMBER := FND_LOG.LEVEL_PROCEDURE;
12: G_LEVEL_STATEMENT CONSTANT NUMBER := FND_LOG.LEVEL_STATEMENT;
13: G_MODULE_NAME CONSTANT VARCHAR2(50) := 'AP.PLSQL.AP_FUNDS_CONTROL_PKG.';
14: G_LEVEL_LOG_DISABLED CONSTANT NUMBER := 99;
15: --1-STATEMENT, 2-PROCEDURE, 3-EVENT, 4-EXCEPTION, 5-ERROR, 6-UNEXPECTED

Line 12: G_LEVEL_STATEMENT CONSTANT NUMBER := FND_LOG.LEVEL_STATEMENT;

8: G_LEVEL_EXCEPTION CONSTANT NUMBER := FND_LOG.LEVEL_EXCEPTION;
9: G_LEVEL_UNEXPECTED CONSTANT NUMBER := FND_LOG.LEVEL_UNEXPECTED;
10: G_LEVEL_EVENT CONSTANT NUMBER := FND_LOG.LEVEL_EVENT;
11: G_LEVEL_PROCEDURE CONSTANT NUMBER := FND_LOG.LEVEL_PROCEDURE;
12: G_LEVEL_STATEMENT CONSTANT NUMBER := FND_LOG.LEVEL_STATEMENT;
13: G_MODULE_NAME CONSTANT VARCHAR2(50) := 'AP.PLSQL.AP_FUNDS_CONTROL_PKG.';
14: G_LEVEL_LOG_DISABLED CONSTANT NUMBER := 99;
15: --1-STATEMENT, 2-PROCEDURE, 3-EVENT, 4-EXCEPTION, 5-ERROR, 6-UNEXPECTED
16:

Line 80: l_log_msg FND_LOG_MESSAGES.MESSAGE_TEXT%TYPE;

76: l_enc_enabled VARCHAR2(1);
77:
78: -- Logging Infra:
79: l_procedure_name CONSTANT VARCHAR2(30) := 'Encumbrance_Enabled';
80: l_log_msg FND_LOG_MESSAGES.MESSAGE_TEXT%TYPE;
81:
82: BEGIN
83:
84: -- Logging Infra: Procedure level

Line 87: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME||

83:
84: -- Logging Infra: Procedure level
85: IF (G_LEVEL_PROCEDURE >= g_log_level ) THEN
86: l_log_msg := 'Begin of procedure '|| l_procedure_name;
87: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME||
88: l_procedure_name||'.begin', l_log_msg);
89: END IF;
90:
91: BEGIN

Line 110: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME||

106:
107: -- Logging Infra: Procedure level
108: IF (G_LEVEL_PROCEDURE >= g_log_level ) THEN
109: l_log_msg := 'End of procedure '|| l_procedure_name;
110: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME||
111: l_procedure_name, l_log_msg);
112: END IF;
113:
114: EXCEPTION

Line 164: l_log_msg FND_LOG_MESSAGES.MESSAGE_TEXT%TYPE;

160:
161:
162: -- Logging Infra:
163: l_procedure_name CONSTANT VARCHAR2(30) := 'Setup_Gl_FundsCtrl_Params';
164: l_log_msg FND_LOG_MESSAGES.MESSAGE_TEXT%TYPE;
165:
166: BEGIN
167:
168: -- Logging Infra: Procedure level

Line 171: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME||

167:
168: -- Logging Infra: Procedure level
169: IF (G_LEVEL_PROCEDURE >= g_log_level ) THEN
170: l_log_msg := 'Begin of procedure '|| l_procedure_name;
171: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME||
172: l_procedure_name, l_log_msg);
173: END IF;
174:
175: /*-----------------------------------------------------------------+

Line 184: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME||

180:
181:
182: IF (G_LEVEL_PROCEDURE >= g_log_level ) THEN
183: l_log_msg := 'Calling mode is ' || p_called_by ;
184: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME||
185: l_procedure_name, l_log_msg);
186: END IF;
187:
188: p_bc_mode := 'P'; -- reserve funds --

Line 194: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME||

190: ELSE
191:
192: IF (G_LEVEL_PROCEDURE >= g_log_level ) THEN
193: l_log_msg := 'Called by Funds Check';
194: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME||
195: l_procedure_name||'.begin', l_log_msg);
196: END IF;
197:
198: p_bc_mode := 'C'; -- check funds --

Line 204: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME||

200: END IF;
201:
202: IF (G_LEVEL_PROCEDURE >= g_log_level ) THEN
203: l_log_msg := 'End of procedure '|| l_procedure_name;
204: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME||
205: l_procedure_name, l_log_msg);
206: END IF;
207:
208: EXCEPTION

Line 259: l_log_msg FND_LOG_MESSAGES.MESSAGE_TEXT%TYPE;

255: l_resp_id NUMBER;
256:
257: -- Logging Infra:
258: l_procedure_name CONSTANT VARCHAR2(30) := 'FundsReserve_Init';
259: l_log_msg FND_LOG_MESSAGES.MESSAGE_TEXT%TYPE;
260:
261: BEGIN
262:
263: l_curr_calling_sequence := 'AP_FUNDS_CONTROL_PKG.'||

Line 275: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME||

271:
272: -- Logging Infra: Procedure level
273: IF (G_LEVEL_PROCEDURE >= g_log_level ) THEN
274: l_log_msg := 'Begin of procedure '|| l_procedure_name;
275: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME||
276: l_procedure_name, l_log_msg);
277: END IF;
278:
279: p_override_mode := 'Y';

Line 290: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME||

286:
287: -- Logging Infra: Procedure level
288: IF (G_LEVEL_PROCEDURE >= g_log_level ) THEN
289: l_log_msg := 'Check if insufficient funds hold was user released';
290: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME||
291: l_procedure_name, l_log_msg);
292: END IF;
293:
294: AP_APPROVAL_PKG.Get_Hold_Status(

Line 317: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME|| l_procedure_name, l_log_msg);

313:
314: -- Logging Infra: Procedure level
315: IF (G_LEVEL_PROCEDURE >= g_log_level ) THEN
316: l_log_msg := 'Hold was released by user.';
317: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME|| l_procedure_name, l_log_msg);
318: END IF;
319:
320: IF (l_resp_id IS NOT NULL) THEN
321:

Line 331: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME||

327: END IF; -- l_hold_status = 'RELEASED BY USER' --
328:
329: IF (G_LEVEL_PROCEDURE >= g_log_level ) THEN
330: l_log_msg := 'End of procedure '|| l_procedure_name;
331: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME||
332: l_procedure_name, l_log_msg);
333: END IF;
334: EXCEPTION
335: WHEN OTHERS THEN

Line 391: l_log_msg FND_LOG_MESSAGES.MESSAGE_TEXT%TYPE;

387: p_calling_sequence IN VARCHAR2) IS
388:
389: l_curr_calling_sequence VARCHAR2(2000);
390: l_procedure_name CONSTANT VARCHAR2(30) := 'Fundscheck_Init';
391: l_log_msg FND_LOG_MESSAGES.MESSAGE_TEXT%TYPE;
392:
393: BEGIN
394:
395: -- Update the calling sequence --

Line 406: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME||

402: +-----------------------------------------------------------------*/
403:
404: IF (G_LEVEL_PROCEDURE >= g_log_level ) THEN
405: l_log_msg := 'Begin of procedure '|| l_procedure_name;
406: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME||
407: l_procedure_name, l_log_msg);
408: END IF;
409:
410: BEGIN

Line 442: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME||

438: FND_PROFILE.GET('USER_ID', p_gl_user_id);
439:
440: IF (G_LEVEL_PROCEDURE >= g_log_level ) THEN
441: l_log_msg := 'End of procedure '|| l_procedure_name;
442: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME||
443: l_procedure_name, l_log_msg);
444: END IF;
445:
446:

Line 481: l_log_msg FND_LOG_MESSAGES.MESSAGE_TEXT%TYPE;

477: p_fc_result_code IN OUT NOCOPY VARCHAR2) IS
478:
479: -- Logging Infra:
480: l_procedure_name CONSTANT VARCHAR2(30) := 'Get_GL_FundsChk_Result_Code';
481: l_log_msg FND_LOG_MESSAGES.MESSAGE_TEXT%TYPE;
482:
483: BEGIN
484:
485: ---------------------------------------------------------------

Line 492: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME||

488:
489: -- Logging Infra: Procedure level
490: IF (G_LEVEL_PROCEDURE >= g_log_level ) THEN
491: l_log_msg := 'Begin of procedure '|| l_procedure_name;
492: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME||
493: l_procedure_name, l_log_msg);
494: END IF;
495:
496: BEGIN

Line 516: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME||

512:
513: -- Logging Infra: Procedure level
514: IF (G_LEVEL_PROCEDURE >= g_log_level ) THEN
515: l_log_msg := 'End of procedure '|| l_procedure_name;
516: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME||
517: l_procedure_name, l_log_msg);
518: END IF;
519:
520: EXCEPTION

Line 817: l_log_msg FND_LOG_MESSAGES.MESSAGE_TEXT%TYPE;

813: PSA_API_EXCEPTION EXCEPTION;
814:
815: -- Logging Infra:
816: l_procedure_name CONSTANT VARCHAR2(30) := 'Funds_Reserve';
817: l_log_msg FND_LOG_MESSAGES.MESSAGE_TEXT%TYPE;
818:
819:
820: BEGIN
821: l_curr_calling_sequence := 'AP_FUNDS_CONTROL_PKG.'||l_debug_loc||

Line 827: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME||

823:
824: -- Logging Infra: Procedure level
825: IF (G_LEVEL_PROCEDURE >= g_log_level ) THEN
826: l_log_msg := 'Begin of procedure '|| l_procedure_name;
827: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME||
828: l_procedure_name, l_log_msg);
829: END IF;
830: l_debug_info := 'Initialize other variables';
831:

Line 840: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME||

836:
837: --Bug 5487757
838: IF (G_LEVEL_PROCEDURE >= g_log_level ) THEN
839: l_log_msg := 'Selecting Org_Id for determining Encumbrance Enabled or not' ;
840: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME||
841: l_procedure_name, l_log_msg);
842: END IF;
843:
844: SELECT org_id

Line 858: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME||

854:
855: IF (G_LEVEL_PROCEDURE >= g_log_level ) THEN
856: l_log_msg := 'FUNDSRESERVE - Encumbrance enabled and ' ||
857: 'setup gl_fundschecker parameters ';
858: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME||
859: l_procedure_name, l_log_msg);
860: END IF;
861:
862: /*-----------------------------------------------------------------+

Line 881: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME||

877:
878: IF (G_LEVEL_PROCEDURE >= g_log_level ) THEN
879: l_log_msg := ' call api to get override mode ' ||
880: 'ID informaiton';
881: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME||
882: l_procedure_name, l_log_msg);
883: END IF;
884:
885: FundsReserve_Init(

Line 900: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME ||

896: +-----------------------------------------------------------------*/
897:
898: IF (G_LEVEL_STATEMENT >= g_log_level ) THEN
899: l_log_msg := 'Step 3 - Open FundsCntrl_Inv_Dist_Cur Cursor';
900: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME ||
901: l_procedure_name, l_log_msg);
902: END IF;
903:
904: OPEN cur_fc_dist;

Line 914: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME ||

910: +-----------------------------------------------------------------*/
911:
912: IF (G_LEVEL_STATEMENT >= g_log_level ) THEN
913: l_log_msg := 'Step 3 - Call psa_ap_bc_pvt.Create_Events';
914: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME ||
915: l_procedure_name, l_log_msg);
916: END IF;
917:
918: IF ( t_funds_dist_tab.COUNT <> 0 ) THEN

Line 946: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME ||

942:
943: IF (G_LEVEL_STATEMENT >= g_log_level ) THEN
944: l_log_msg := 'Call psa_ap_bc_pvt.reinstate_po_encumbrance success' ||
945: 'l_return_status =' || l_return_status;
946: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME ||
947: l_procedure_name, l_log_msg);
948: END IF;
949:
950: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

Line 954: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME ||

950: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
951: IF (G_LEVEL_STATEMENT >= g_log_level ) THEN
952: l_log_msg := 'Call psa_ap_bc_pvt.reinstate_po_encumbrance fail and ' ||
953: 'l_return_status =' || l_return_status;
954: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME ||
955: l_procedure_name, l_log_msg);
956: END IF;
957:
958: RAISE PSA_API_EXCEPTION;

Line 976: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME ||

972:
973: IF (G_LEVEL_STATEMENT >= g_log_level ) THEN
974: l_log_msg := 'Step 3 - Call psa_ap_bc_pvt.Create_Events status result ' ||
975: 'l_return_status =' || l_return_status;
976: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME ||
977: l_procedure_name, l_log_msg);
978: END IF;
979:
980: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

Line 985: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME ||

981:
982: IF (G_LEVEL_STATEMENT >= g_log_level ) THEN
983: l_log_msg := 'Step 3 - Call psa_ap_bc_pvt.Create_Events not success ' ||
984: 'l_return_status =' || l_return_status;
985: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME ||
986: l_procedure_name, l_log_msg);
987: END IF;
988:
989: RAISE PSA_API_EXCEPTION;

Line 1000: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME ||

996: +-----------------------------------------------------------------*/
997:
998: IF (G_LEVEL_STATEMENT >= g_log_level ) THEN
999: l_log_msg := 'Step 4 - Call PSA_BC_XLA_PUB.Budgetary_Control';
1000: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME ||
1001: l_procedure_name, l_log_msg);
1002: END IF;
1003:
1004: PSA_BC_XLA_PUB.Budgetary_Control(

Line 1023: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME ||

1019:
1020: IF (G_LEVEL_STATEMENT >= g_log_level ) THEN
1021: l_log_msg := 'Call PSA_BC_XLA_PUB.Budgetary_Control not success' ||
1022: 'l_return_status =' || l_return_status;
1023: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME ||
1024: l_procedure_name, l_log_msg);
1025: END IF;
1026: RAISE PSA_API_EXCEPTION;
1027: END IF;

Line 1038: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME ||

1034: IF (G_LEVEL_STATEMENT >= g_log_level ) THEN
1035: l_log_msg := 'Call PSA_BC_XLA_PUB.Budgetary_Control success' ||
1036: 'l_return_code =' || l_return_code ||
1037: 'l_packet_id =' || to_char(l_packet_id);
1038: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME ||
1039: l_procedure_name, l_log_msg);
1040: END IF;
1041:
1042:

Line 1052: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME ||

1048: +-----------------------------------------------------------------*/
1049:
1050: IF (G_LEVEL_STATEMENT >= g_log_level ) THEN
1051: l_log_msg := 'Step 6.1 - process return code =' || l_return_code ;
1052: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME ||
1053: l_procedure_name, l_log_msg);
1054: END IF;
1055:
1056: IF ( l_return_code IN ('FATAL', 'XLA_ERROR','XLA_NO_JOURNAL' )) THEN

Line 1062: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME ||

1058: l_cant_fundsck_exists := 'Y';
1059: IF (G_LEVEL_STATEMENT >= g_log_level ) THEN
1060: l_log_msg := 'l_cant_fundsck_exists is set' ||
1061: 'l_cant_fundsck_exists' || l_cant_fundsck_exists;
1062: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME ||
1063: l_procedure_name, l_log_msg);
1064: END IF;
1065:
1066: ELSE

Line 1072: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME ||

1068: l_insuff_funds_exists := 'Y';
1069: IF (G_LEVEL_STATEMENT >= g_log_level ) THEN
1070: l_log_msg := 'l_insuff_funds_exists is set' ||
1071: 'l_insuff_funds_exists' || l_insuff_funds_exists;
1072: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME ||
1073: l_procedure_name, l_log_msg);
1074: END IF;
1075:
1076: END IF;

Line 1083: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME ||

1079:
1080: IF (G_LEVEL_STATEMENT >= g_log_level ) THEN
1081: l_log_msg := 'funds reservation returned Partial and calling '||
1082: 'psa_ap_bc_pvt.Get_Detailed_Results';
1083: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME ||
1084: l_procedure_name, l_log_msg);
1085: END IF;
1086:
1087: psa_ap_bc_pvt.Get_Detailed_Results (

Line 1102: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME ||

1098:
1099: IF (G_LEVEL_STATEMENT >= g_log_level ) THEN
1100: l_log_msg := 'Call psa_ap_bc_pvt.Get_Detailed_Results not success' ||
1101: 'l_return_status =' || l_return_status;
1102: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME ||
1103: l_procedure_name, l_log_msg);
1104: END IF;
1105:
1106: RAISE PSA_API_EXCEPTION;

Line 1113: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME ||

1109:
1110: IF (G_LEVEL_STATEMENT >= g_log_level ) THEN
1111: l_log_msg := 'process t_funds_dist_tab touched by PSA' ||
1112: 'PL/SQL TABLE COUNT IS' || to_char(t_funds_dist_tab.COUNT);
1113: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME ||
1114: l_procedure_name, l_log_msg);
1115: END IF;
1116:
1117: FOR i IN 1..t_funds_dist_tab.COUNT LOOP

Line 1122: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME ||

1118: IF (G_LEVEL_STATEMENT >= g_log_level ) THEN
1119: l_log_msg := 'in the loop to update encumbrance flag' ||
1120: 'for distribution table for distribution_id=' ||
1121: to_char(t_funds_dist_tab(i).inv_distribution_id);
1122: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME ||
1123: l_procedure_name, l_log_msg);
1124: END IF;
1125:
1126: IF t_funds_dist_tab(i).result_code = 'S' THEN

Line 1173: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME ||

1169:
1170: IF (G_LEVEL_STATEMENT >= g_log_level ) THEN
1171: l_log_msg := 'Step 6.2 - funds reserve is done fully' ||
1172: ' and process sucess return code =' || l_return_code ;
1173: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME ||
1174: l_procedure_name, l_log_msg);
1175: END IF;
1176:
1177: IF (G_LEVEL_STATEMENT >= g_log_level ) THEN

Line 1180: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME ||

1176:
1177: IF (G_LEVEL_STATEMENT >= g_log_level ) THEN
1178: l_log_msg := 'number of distributions get funds reserved=' ||
1179: to_char(t_funds_dist_tab.COUNT);
1180: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME ||
1181: l_procedure_name, l_log_msg);
1182: END IF;
1183:
1184: BEGIN

Line 1189: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME ||

1185: FOR i IN 1..t_funds_dist_tab.COUNT LOOP
1186: IF (G_LEVEL_STATEMENT >= g_log_level ) THEN
1187: l_log_msg := 'update encumbered flag for distribution id=' ||
1188: to_char(t_funds_dist_tab(i).inv_distribution_id);
1189: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME ||
1190: l_procedure_name, l_log_msg);
1191: END IF;
1192:
1193: -- Bug 6695993 added additional where clause

Line 1232: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME ||

1228:
1229: IF (G_LEVEL_STATEMENT >= g_log_level ) THEN
1230: l_log_msg := 'p_funds_return_code out param is set' ||
1231: 'p_funds_return_code = ' || l_return_code ;
1232: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME ||
1233: l_procedure_name, l_log_msg);
1234: END IF;
1235:
1236: /*-----------------------------------------------------------------+

Line 1242: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME||

1238: +-----------------------------------------------------------------*/
1239:
1240: IF (G_LEVEL_PROCEDURE >= g_log_level ) THEN
1241: l_log_msg := 'step 7 - process hold if exists';
1242: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME||
1243: l_procedure_name, l_log_msg);
1244: END IF;
1245:
1246:

Line 1266: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME||

1262: +-----------------------------------------------------------------*/
1263:
1264: IF (G_LEVEL_PROCEDURE >= g_log_level ) THEN
1265: l_log_msg := 'Step 8 - put CANT FUNDS CHECK';
1266: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME||
1267: l_procedure_name, l_log_msg);
1268: END IF;
1269:
1270:

Line 1292: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME ||

1288: NULL;
1289: IF (G_LEVEL_STATEMENT >= g_log_level ) THEN
1290: l_log_msg := 'Step 3 - no Call of psa_ap_bc_pvt.Create_Events' ||
1291: 'distribution cursor count = 0';
1292: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME ||
1293: l_procedure_name, l_log_msg);
1294: END IF;
1295:
1296: END IF;

Line 1307: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME||

1303: NULL;
1304:
1305: IF (G_LEVEL_PROCEDURE >= g_log_level ) THEN
1306: l_log_msg := 'encumbered flag is not enabled for the OU';
1307: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME||
1308: l_procedure_name, l_log_msg);
1309: END IF;
1310:
1311: END IF; -- Encumbrance Enabled --

Line 1316: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME||

1312:
1313:
1314: IF (G_LEVEL_PROCEDURE >= g_log_level ) THEN
1315: l_log_msg := 'End of '|| l_procedure_name;
1316: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME||
1317: l_procedure_name, l_log_msg);
1318: END IF;
1319:
1320: EXCEPTION

Line 1402: l_log_msg FND_LOG_MESSAGES.MESSAGE_TEXT%TYPE;

1398:
1399:
1400: -- Logging Infra:
1401: l_procedure_name CONSTANT VARCHAR2(30) := 'GET_ERV_CCID';
1402: l_log_msg FND_LOG_MESSAGES.MESSAGE_TEXT%TYPE;
1403:
1404:
1405:
1406: BEGIN

Line 1421: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME||

1417:
1418: -- Logging Infra: Procedure level
1419: IF (G_LEVEL_PROCEDURE >= g_log_level ) THEN
1420: l_log_msg := 'Begin of procedure '|| l_procedure_name;
1421: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME||
1422: l_procedure_name, l_log_msg);
1423: END IF;
1424:
1425:

Line 1432: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);

1428: nvl(p_erv, 0 ) <> 0 ) THEN
1429:
1430: IF (G_LEVEL_STATEMENT >= g_log_level ) THEN
1431: l_log_msg := 'GET_ERV_CCID - Query the exising erv ccid';
1432: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);
1433: END IF;
1434:
1435: BEGIN
1436: SELECT D.dist_code_combination_id

Line 1470: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME ||l_procedure_name, l_log_msg);

1466: ---------------------------------------------------------------
1467:
1468: IF (G_LEVEL_STATEMENT >= g_log_level ) THEN
1469: l_log_msg := 'GET_ERV_CCID - expense item ';
1470: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME ||l_procedure_name, l_log_msg);
1471: END IF;
1472:
1473: p_erv_ccid := p_variance_ccid ;
1474:

Line 1516: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME||

1512:
1513: -- Logging Infra: Procedure level
1514: IF (G_LEVEL_PROCEDURE >= g_log_level ) THEN
1515: l_log_msg := 'End of procedure '|| l_procedure_name;
1516: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME||
1517: l_procedure_name, l_log_msg);
1518: END IF;
1519: EXCEPTION
1520: WHEN OTHERS THEN

Line 1603: l_log_msg FND_LOG_MESSAGES.MESSAGE_TEXT%TYPE;

1599:
1600:
1601: -- Logging Infra:
1602: l_procedure_name CONSTANT VARCHAR2(30) := 'Calc_QV';
1603: l_log_msg FND_LOG_MESSAGES.MESSAGE_TEXT%TYPE;
1604:
1605:
1606: BEGIN
1607:

Line 1611: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME||

1607:
1608: -- Logging Infra: Procedure level
1609: IF (G_LEVEL_PROCEDURE >= g_log_level ) THEN
1610: l_log_msg := 'Begin of procedure '|| l_procedure_name;
1611: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME||
1612: l_procedure_name, l_log_msg);
1613: END IF;
1614:
1615: l_curr_calling_sequence := 'AP_FUNDS_CONTROL_PKG.'||l_debug_loc||

Line 1899: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME||

1895:
1896: -- Logging Infra: Procedure level
1897: IF (G_LEVEL_PROCEDURE >= g_log_level ) THEN
1898: l_log_msg := 'End of procedure '|| l_procedure_name;
1899: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME||
1900: l_procedure_name, l_log_msg);
1901: END IF;
1902:
1903: EXCEPTION

Line 1986: l_log_msg FND_LOG_MESSAGES.MESSAGE_TEXT%TYPE;

1982: l_amt_received NUMBER;
1983:
1984: -- Logging Infra:
1985: l_procedure_name CONSTANT VARCHAR2(30) := 'Calc_AV';
1986: l_log_msg FND_LOG_MESSAGES.MESSAGE_TEXT%TYPE;
1987:
1988: BEGIN
1989:
1990: -- Update the calling sequence --

Line 1998: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME||

1994:
1995: -- Logging Infra: Procedure level
1996: IF (G_LEVEL_PROCEDURE >= g_log_level ) THEN
1997: l_log_msg := 'Begin of procedure '|| l_procedure_name;
1998: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME||
1999: l_procedure_name, l_log_msg);
2000: END IF;
2001:
2002: -----------------------------------------------------------------------

Line 2119: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME||

2115:
2116: IF (G_LEVEL_PROCEDURE >= g_log_level ) THEN
2117: l_log_msg := 'CALC_AV - find dist line with min amt for ' ||
2118: 'negative amt_variance';
2119: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME||
2120: l_procedure_name, l_log_msg);
2121: END IF;
2122:
2123: select nvl(distribution_line_number,0),

Line 2198: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME||

2194:
2195: -- Logging Infra: Procedure level
2196: IF (G_LEVEL_PROCEDURE >= g_log_level ) THEN
2197: l_log_msg := 'End of procedure '|| l_procedure_name;
2198: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME||
2199: l_procedure_name, l_log_msg);
2200: END IF;
2201:
2202: EXCEPTION

Line 2469: l_log_msg FND_LOG_MESSAGES.MESSAGE_TEXT%TYPE;

2465: PSA_API_EXCEPTION EXCEPTION;
2466:
2467: -- Logging Infra:
2468: l_procedure_name CONSTANT VARCHAR2(30) := 'Funds_Check';
2469: l_log_msg FND_LOG_MESSAGES.MESSAGE_TEXT%TYPE;
2470:
2471: BEGIN
2472:
2473: -- Update the calling sequence --

Line 2481: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME||

2477:
2478: -- Logging Infra: Procedure level
2479: IF (G_LEVEL_PROCEDURE >= g_log_level ) THEN
2480: l_log_msg := 'Begin of procedure '|| l_procedure_name;
2481: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME||
2482: l_procedure_name, l_log_msg);
2483: END IF;
2484:
2485: --Bug 5487757

Line 2488: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME||

2484:
2485: --Bug 5487757
2486: IF (G_LEVEL_PROCEDURE >= g_log_level ) THEN
2487: l_log_msg := 'Selecting Org_Id for determining Encumbrance Enabled or not' ;
2488: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME||
2489: l_procedure_name, l_log_msg);
2490: END IF;
2491:
2492: SELECT org_id

Line 2511: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME||

2507:
2508: -- Logging Infra: Procedure level
2509: IF (G_LEVEL_PROCEDURE >= g_log_level ) THEN
2510: l_log_msg := 'Setup Gl Fundsctrl Param';
2511: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME||
2512: l_procedure_name, l_log_msg);
2513: END IF;
2514:
2515: Setup_Gl_FundsCtrl_Params(

Line 2527: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME ||

2523: +-----------------------------------------------------------------*/
2524:
2525: IF (G_LEVEL_STATEMENT >= g_log_level ) THEN
2526: l_log_msg := 'Step 2 - Open FundsCntrl_Inv_Dist_Cur Cursor';
2527: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME ||
2528: l_procedure_name, l_log_msg);
2529: END IF;
2530:
2531: OPEN Funds_Check_Dist_Cursor;

Line 2542: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME ||

2538: +-----------------------------------------------------------------*/
2539:
2540: IF (G_LEVEL_STATEMENT >= g_log_level ) THEN
2541: l_log_msg := 'Step 3 - Call psa_ap_bc_pvt.Create_Events';
2542: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME ||
2543: l_procedure_name, l_log_msg);
2544: END IF;
2545:
2546: IF ( t_funds_dist_tab.COUNT <> 0 ) THEN

Line 2561: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME ||

2557:
2558: IF (G_LEVEL_STATEMENT >= g_log_level ) THEN
2559: l_log_msg := 'Call psa_ap_bc_pvt.Create_Events status result ' ||
2560: 'l_return_status =' || l_return_status;
2561: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME ||
2562: l_procedure_name, l_log_msg);
2563: END IF;
2564:
2565: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

Line 2570: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME ||

2566:
2567: IF (G_LEVEL_STATEMENT >= g_log_level ) THEN
2568: l_log_msg := 'Step 3 - Call psa_ap_bc_pvt.Create_Events not success ' ||
2569: 'l_return_status =' || l_return_status;
2570: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME ||
2571: l_procedure_name, l_log_msg);
2572: END IF;
2573:
2574: RAISE PSA_API_EXCEPTION;

Line 2584: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME ||

2580: +-------------------------------------------------------------------*/
2581:
2582: IF (G_LEVEL_STATEMENT >= g_log_level ) THEN
2583: l_log_msg := 'Step 4 - Call PSA_BC_XLA_PUB.Budgetary_Control';
2584: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME ||
2585: l_procedure_name, l_log_msg);
2586: END IF;
2587:
2588: PSA_BC_XLA_PUB.Budgetary_Control(

Line 2607: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME ||

2603: IF (G_LEVEL_STATEMENT >= g_log_level ) THEN
2604: l_log_msg := 'Call PSA_BC_XLA_PUB.Budgetary_Control success' ||
2605: 'l_return_code =' || l_return_code ||
2606: 'l_packet_id =' || to_char(l_packet_id);
2607: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME ||
2608: l_procedure_name, l_log_msg);
2609: END IF;
2610:
2611:

Line 2617: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME ||

2613:
2614: IF (G_LEVEL_STATEMENT >= g_log_level ) THEN
2615: l_log_msg := 'Call PSA_BC_XLA_PUB.Budgetary_Control not success' ||
2616: 'l_return_status =' || l_return_status;
2617: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME ||
2618: l_procedure_name, l_log_msg);
2619: END IF;
2620:
2621: RAISE PSA_API_EXCEPTION;

Line 2632: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);

2628: +-------------------------------------------------------------------*/
2629:
2630: IF (G_LEVEL_STATEMENT >= g_log_level ) THEN
2631: l_log_msg := 'FUNDSCHECK - Process_Return_Code of GL funds check';
2632: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME || l_procedure_name, l_log_msg);
2633: END IF;
2634:
2635: IF (l_return_code in ('FAIL', 'PARTIAL')) THEN
2636:

Line 2674: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME ||

2670:
2671: IF (G_LEVEL_STATEMENT >= g_log_level ) THEN
2672: l_log_msg := 'returned message to form is ' ||
2673: 'p_return_message_name =' || p_return_message_name;
2674: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME ||
2675: l_procedure_name, l_log_msg);
2676: END IF;
2677:
2678: ELSE

Line 2687: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME ||

2683: NULL;
2684: IF (G_LEVEL_STATEMENT >= g_log_level ) THEN
2685: l_log_msg := 'no Call of psa_ap_bc_pvt.Create_Events' ||
2686: 'distribution cursor count = 0';
2687: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME ||
2688: l_procedure_name, l_log_msg);
2689: END IF;
2690:
2691: END IF;

Line 2700: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME ||

2696: +-------------------------------------------------------------------*/
2697:
2698: IF (G_LEVEL_STATEMENT >= g_log_level ) THEN
2699: l_log_msg := 'encumberance is off';
2700: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME ||
2701: l_procedure_name, l_log_msg);
2702: END IF;
2703:
2704: p_return_message_name := 'AP_ALL_ENC_OFF';

Line 2712: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME||

2708:
2709: -- Logging Infra: Procedure level
2710: IF (G_LEVEL_PROCEDURE >= g_log_level ) THEN
2711: l_log_msg := 'End of procedure '|| l_procedure_name;
2712: FND_LOG.STRING(G_LEVEL_PROCEDURE, G_MODULE_NAME||
2713: l_procedure_name, l_log_msg);
2714: END IF;
2715:
2716: EXCEPTION

Line 3094: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);

3090: 'QTY_CORRECTION' ) ) THEN
3091:
3092: l_debug_info := 'Calculate Matched Variances';
3093: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
3094: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
3095: END IF;
3096:
3097: AP_APPROVAL_MATCHED_PKG.Exec_Matched_Variance_Checks(
3098: p_invoice_id => p_invoice_id,

Line 3116: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);

3112: END LOOP;
3113:
3114: l_debug_info := 'Calculate Quantity Variance: '||p_invoice_id;
3115: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
3116: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
3117: END IF;
3118:
3119: AP_APPROVAL_MATCHED_PKG.Exec_Qty_Variance_Check(
3120: p_invoice_id => p_invoice_id,

Line 3128: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);

3124: p_calling_sequence => l_curr_calling_sequence );
3125:
3126: l_debug_info := 'Create Tax Distributions';
3127: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
3128: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
3129: END IF;
3130:
3131: l_success := ap_etax_pkg.calling_etax (
3132: p_invoice_id => p_invoice_id,

Line 3147: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);

3143: END IF; -- p_invoice_needs_validation
3144:
3145: l_debug_info := 'Before calling funds_check';
3146: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
3147: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
3148: END IF;
3149:
3150: ap_funds_control_pkg.funds_check(
3151: p_invoice_id => p_invoice_id,

Line 3159: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);

3155: p_calling_sequence => l_curr_calling_sequence);
3156:
3157: l_debug_info := 'After calling funds_check: l_return_message_name: '||l_return_message_name;
3158: IF (G_LEVEL_STATEMENT >= G_CURRENT_RUNTIME_LEVEL) THEN
3159: FND_LOG.STRING(G_LEVEL_STATEMENT,G_MODULE_NAME||l_api_name,l_debug_info);
3160: END IF;
3161:
3162: p_error_code := l_return_message_name;
3163: return(TRUE);

Line 3182: g_log_enabled := fnd_log.test

3178:
3179:
3180: BEGIN
3181: g_log_level := G_CURRENT_RUNTIME_LEVEL;
3182: g_log_enabled := fnd_log.test
3183: (log_level => g_log_level
3184: ,module => G_MODULE_NAME);
3185:
3186: IF NOT g_log_enabled THEN