80:
81: x_Third_Party_Name OUT NOCOPY VARCHAR2,
82: x_Third_Party_Num OUT NOCOPY varchar2) IS
83: l_Invoice_Id NUMBER;
84: l_Dbg_Level NUMBER := Fnd_Log.g_Current_Runtime_Level;
85: l_Proc_Level NUMBER := Fnd_Log.Level_Procedure;
86: l_Proc_Name VARCHAR2(100) := 'Process_Ap_Detail';
87:
88: --Fix bug#6697073 begin----------------------------------------
81: x_Third_Party_Name OUT NOCOPY VARCHAR2,
82: x_Third_Party_Num OUT NOCOPY varchar2) IS
83: l_Invoice_Id NUMBER;
84: l_Dbg_Level NUMBER := Fnd_Log.g_Current_Runtime_Level;
85: l_Proc_Level NUMBER := Fnd_Log.Level_Procedure;
86: l_Proc_Name VARCHAR2(100) := 'Process_Ap_Detail';
87:
88: --Fix bug#6697073 begin----------------------------------------
89: l_Invoice_idx NUMBER:=0;
119:
120:
121: BEGIN
122: IF (l_Proc_Level >= l_Dbg_Level) THEN
123: Fnd_Log.STRING(l_Proc_Level,
124: l_Module_Prefix || '.' || l_Proc_Name || '.begin',
125: 'Enter procedure');
126: Fnd_Log.STRING(l_Proc_Level,
127: l_Module_Prefix || '.' || l_Proc_Name || '.parameters',
122: IF (l_Proc_Level >= l_Dbg_Level) THEN
123: Fnd_Log.STRING(l_Proc_Level,
124: l_Module_Prefix || '.' || l_Proc_Name || '.begin',
125: 'Enter procedure');
126: Fnd_Log.STRING(l_Proc_Level,
127: l_Module_Prefix || '.' || l_Proc_Name || '.parameters',
128: 'P_AE_HEADER_ID ' || p_Ae_Header_Id);
129: Fnd_Log.STRING(l_Proc_Level,
130: l_Module_Prefix || '.' || l_Proc_Name || '.parameters',
125: 'Enter procedure');
126: Fnd_Log.STRING(l_Proc_Level,
127: l_Module_Prefix || '.' || l_Proc_Name || '.parameters',
128: 'P_AE_HEADER_ID ' || p_Ae_Header_Id);
129: Fnd_Log.STRING(l_Proc_Level,
130: l_Module_Prefix || '.' || l_Proc_Name || '.parameters',
131: 'P_AE_LINE_NUM' || p_Ae_Line_Num);
132: Fnd_Log.STRING(l_Proc_Level,
133: l_Module_Prefix || '.' || l_Proc_Name || '.parameters',
128: 'P_AE_HEADER_ID ' || p_Ae_Header_Id);
129: Fnd_Log.STRING(l_Proc_Level,
130: l_Module_Prefix || '.' || l_Proc_Name || '.parameters',
131: 'P_AE_LINE_NUM' || p_Ae_Line_Num);
132: Fnd_Log.STRING(l_Proc_Level,
133: l_Module_Prefix || '.' || l_Proc_Name || '.parameters',
134: 'P_LEDGER_ID ' || p_Ledger_Id);
135: END IF; --(l_proc_level >= l_dbg_level)
136:
202: -- Fix bug#6697073 end--------------------------------------------------------
203:
204: --log for debug
205: IF (l_Proc_Level >= l_Dbg_Level) THEN
206: Fnd_Log.STRING(l_Proc_Level,
207: l_Module_Prefix || '.' || l_Proc_Name || '.end',
208: 'Exit procedure');
209: END IF; --( l_proc_level >= l_dbg_level )
210:
210:
211: EXCEPTION
212: WHEN OTHERS THEN
213: IF (l_Proc_Level >= l_Dbg_Level) THEN
214: Fnd_Log.STRING(l_Proc_Level,
215: l_Module_Prefix || '.' || l_Proc_Name ||
216: '.Other_Exception AP',
217: SQLCODE || ':' || SQLERRM);
218: END IF; --(l_proc_level >= l_dbg_level)
252: x_Invoice_Num OUT NOCOPY INVOICE_NUM_TBL, --Fix bug#6697073
253: x_Third_Party_Name OUT NOCOPY VARCHAR2,
254: x_Third_Party_Num OUT NOCOPY varchar2) IS
255: l_Customer_Trx_Id NUMBER;
256: l_Dbg_Level NUMBER := Fnd_Log.g_Current_Runtime_Level;
257: l_Proc_Level NUMBER := Fnd_Log.Level_Procedure;
258: l_Proc_Name VARCHAR2(100) := 'Process_Ar_Detail';
259:
260: --Fix bug#6697073 begin-----------------------------------------------------
253: x_Third_Party_Name OUT NOCOPY VARCHAR2,
254: x_Third_Party_Num OUT NOCOPY varchar2) IS
255: l_Customer_Trx_Id NUMBER;
256: l_Dbg_Level NUMBER := Fnd_Log.g_Current_Runtime_Level;
257: l_Proc_Level NUMBER := Fnd_Log.Level_Procedure;
258: l_Proc_Name VARCHAR2(100) := 'Process_Ar_Detail';
259:
260: --Fix bug#6697073 begin-----------------------------------------------------
261: l_Invoice_idx NUMBER:=0;
291:
292:
293: BEGIN
294: IF (l_Proc_Level >= l_Dbg_Level) THEN
295: Fnd_Log.STRING(l_Proc_Level,
296: l_Module_Prefix || '.' || l_Proc_Name || '.begin',
297: 'Enter procedure');
298: Fnd_Log.STRING(l_Proc_Level,
299: l_Module_Prefix || '.' || l_Proc_Name || '.parameters',
294: IF (l_Proc_Level >= l_Dbg_Level) THEN
295: Fnd_Log.STRING(l_Proc_Level,
296: l_Module_Prefix || '.' || l_Proc_Name || '.begin',
297: 'Enter procedure');
298: Fnd_Log.STRING(l_Proc_Level,
299: l_Module_Prefix || '.' || l_Proc_Name || '.parameters',
300: 'P_AE_HEADER_ID ' || p_Ae_Header_Id);
301: Fnd_Log.STRING(l_Proc_Level,
302: l_Module_Prefix || '.' || l_Proc_Name || '.parameters',
297: 'Enter procedure');
298: Fnd_Log.STRING(l_Proc_Level,
299: l_Module_Prefix || '.' || l_Proc_Name || '.parameters',
300: 'P_AE_HEADER_ID ' || p_Ae_Header_Id);
301: Fnd_Log.STRING(l_Proc_Level,
302: l_Module_Prefix || '.' || l_Proc_Name || '.parameters',
303: 'P_AE_LINE_NUM' || p_Ae_Line_Num);
304: Fnd_Log.STRING(l_Proc_Level,
305: l_Module_Prefix || '.' || l_Proc_Name || '.parameters',
300: 'P_AE_HEADER_ID ' || p_Ae_Header_Id);
301: Fnd_Log.STRING(l_Proc_Level,
302: l_Module_Prefix || '.' || l_Proc_Name || '.parameters',
303: 'P_AE_LINE_NUM' || p_Ae_Line_Num);
304: Fnd_Log.STRING(l_Proc_Level,
305: l_Module_Prefix || '.' || l_Proc_Name || '.parameters',
306: 'P_LEDGER_ID ' || p_Ledger_Id);
307: END IF; --(l_proc_level >= l_dbg_level)
308:
378: --Fix bug#6697073 end---------------------------------------------------------
379:
380: --log for debug
381: IF (l_Proc_Level >= l_Dbg_Level) THEN
382: Fnd_Log.STRING(l_Proc_Level,
383: l_Module_Prefix || '.' || l_Proc_Name || '.end',
384: 'Exit procedure');
385:
386: END IF; --( l_proc_level >= l_dbg_level )
387:
388: EXCEPTION
389: WHEN OTHERS THEN
390: IF (l_Proc_Level >= l_Dbg_Level) THEN
391: Fnd_Log.STRING(l_Proc_Level,
392: l_Module_Prefix || '.' || l_Proc_Name ||
393: '.Other_Exception AR',
394: SQLCODE || ':' || SQLERRM);
395: END IF; --(l_proc_level >= l_dbg_level)
457: ,P_SOURCE IN VARCHAR2
458: ,P_BSV IN VARCHAR2--Fix bug#7334017 add
459: ) IS
460:
461: L_DBG_LEVEL NUMBER := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
462: L_PROC_LEVEL NUMBER := FND_LOG.LEVEL_PROCEDURE;
463: L_PROC_NAME VARCHAR2(100) := 'Cfs_Detail_Report';
464: L_LE_NAME HR_ALL_ORGANIZATION_UNITS.NAME%TYPE;
465: L_PERIOD_NUM_FROM GL_PERIODS.PERIOD_NUM%TYPE;
458: ,P_BSV IN VARCHAR2--Fix bug#7334017 add
459: ) IS
460:
461: L_DBG_LEVEL NUMBER := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
462: L_PROC_LEVEL NUMBER := FND_LOG.LEVEL_PROCEDURE;
463: L_PROC_NAME VARCHAR2(100) := 'Cfs_Detail_Report';
464: L_LE_NAME HR_ALL_ORGANIZATION_UNITS.NAME%TYPE;
465: L_PERIOD_NUM_FROM GL_PERIODS.PERIOD_NUM%TYPE;
466: L_PERIOD_NUM_TO GL_PERIODS.PERIOD_NUM%TYPE;
679: BEGIN
680: --log for debug
681: IF (L_PROC_LEVEL >= L_DBG_LEVEL)
682: THEN
683: FND_LOG.STRING(L_PROC_LEVEL,
684: L_MODULE_PREFIX || '.' || L_PROC_NAME || '.begin',
685: 'Enter procedure');
686: FND_LOG.STRING(L_PROC_LEVEL,
687: L_MODULE_PREFIX || '.' || L_PROC_NAME || '.parameters',
682: THEN
683: FND_LOG.STRING(L_PROC_LEVEL,
684: L_MODULE_PREFIX || '.' || L_PROC_NAME || '.begin',
685: 'Enter procedure');
686: FND_LOG.STRING(L_PROC_LEVEL,
687: L_MODULE_PREFIX || '.' || L_PROC_NAME || '.parameters',
688: 'P_LEGAL_ENTITY_ID ' || P_LEGAL_ENTITY_ID);
689: FND_LOG.STRING(L_PROC_LEVEL,
690: L_MODULE_PREFIX || '.' || L_PROC_NAME || '.parameters',
685: 'Enter procedure');
686: FND_LOG.STRING(L_PROC_LEVEL,
687: L_MODULE_PREFIX || '.' || L_PROC_NAME || '.parameters',
688: 'P_LEGAL_ENTITY_ID ' || P_LEGAL_ENTITY_ID);
689: FND_LOG.STRING(L_PROC_LEVEL,
690: L_MODULE_PREFIX || '.' || L_PROC_NAME || '.parameters',
691: 'P_LEDGER_ID ' || P_LEDGER_ID);
692: FND_LOG.STRING(L_PROC_LEVEL,
693: L_MODULE_PREFIX || '.' || L_PROC_NAME || '.parameters',
688: 'P_LEGAL_ENTITY_ID ' || P_LEGAL_ENTITY_ID);
689: FND_LOG.STRING(L_PROC_LEVEL,
690: L_MODULE_PREFIX || '.' || L_PROC_NAME || '.parameters',
691: 'P_LEDGER_ID ' || P_LEDGER_ID);
692: FND_LOG.STRING(L_PROC_LEVEL,
693: L_MODULE_PREFIX || '.' || L_PROC_NAME || '.parameters',
694: 'P_chart_of_accounts_ID ' || P_CHART_OF_ACCOUNTS_ID);
695:
696: FND_LOG.STRING(L_PROC_LEVEL,
692: FND_LOG.STRING(L_PROC_LEVEL,
693: L_MODULE_PREFIX || '.' || L_PROC_NAME || '.parameters',
694: 'P_chart_of_accounts_ID ' || P_CHART_OF_ACCOUNTS_ID);
695:
696: FND_LOG.STRING(L_PROC_LEVEL,
697: L_MODULE_PREFIX || '.' || L_PROC_NAME || '.parameters',
698: 'P_ADHOC_PREFIX ' || P_ADHOC_PREFIX);
699:
700: FND_LOG.STRING(L_PROC_LEVEL,
696: FND_LOG.STRING(L_PROC_LEVEL,
697: L_MODULE_PREFIX || '.' || L_PROC_NAME || '.parameters',
698: 'P_ADHOC_PREFIX ' || P_ADHOC_PREFIX);
699:
700: FND_LOG.STRING(L_PROC_LEVEL,
701: L_MODULE_PREFIX || '.' || L_PROC_NAME || '.parameters',
702: 'P_INDUSTRY ' || P_INDUSTRY);
703:
704: FND_LOG.STRING(L_PROC_LEVEL,
700: FND_LOG.STRING(L_PROC_LEVEL,
701: L_MODULE_PREFIX || '.' || L_PROC_NAME || '.parameters',
702: 'P_INDUSTRY ' || P_INDUSTRY);
703:
704: FND_LOG.STRING(L_PROC_LEVEL,
705: L_MODULE_PREFIX || '.' || L_PROC_NAME || '.parameters',
706: 'P_ID_FLEX_CODE ' || P_ID_FLEX_CODE);
707: FND_LOG.STRING(L_PROC_LEVEL,
708: L_MODULE_PREFIX || '.' || L_PROC_NAME || '.parameters',
703:
704: FND_LOG.STRING(L_PROC_LEVEL,
705: L_MODULE_PREFIX || '.' || L_PROC_NAME || '.parameters',
706: 'P_ID_FLEX_CODE ' || P_ID_FLEX_CODE);
707: FND_LOG.STRING(L_PROC_LEVEL,
708: L_MODULE_PREFIX || '.' || L_PROC_NAME || '.parameters',
709: 'P_GL_PERIOD_FROM ' || P_GL_PERIOD_FROM);
710: FND_LOG.STRING(L_PROC_LEVEL,
711: L_MODULE_PREFIX || '.' || L_PROC_NAME || '.parameters',
706: 'P_ID_FLEX_CODE ' || P_ID_FLEX_CODE);
707: FND_LOG.STRING(L_PROC_LEVEL,
708: L_MODULE_PREFIX || '.' || L_PROC_NAME || '.parameters',
709: 'P_GL_PERIOD_FROM ' || P_GL_PERIOD_FROM);
710: FND_LOG.STRING(L_PROC_LEVEL,
711: L_MODULE_PREFIX || '.' || L_PROC_NAME || '.parameters',
712: 'P_GL_PERIOD_TO' || P_GL_PERIOD_TO);
713: FND_LOG.STRING(L_PROC_LEVEL,
714: L_MODULE_PREFIX || '.' || L_PROC_NAME || '.parameters',
709: 'P_GL_PERIOD_FROM ' || P_GL_PERIOD_FROM);
710: FND_LOG.STRING(L_PROC_LEVEL,
711: L_MODULE_PREFIX || '.' || L_PROC_NAME || '.parameters',
712: 'P_GL_PERIOD_TO' || P_GL_PERIOD_TO);
713: FND_LOG.STRING(L_PROC_LEVEL,
714: L_MODULE_PREFIX || '.' || L_PROC_NAME || '.parameters',
715: 'P_SOURCE ' || P_SOURCE);
716: FND_LOG.STRING(L_PROC_LEVEL,
717: L_MODULE_PREFIX || '.' || L_PROC_NAME || '.parameters',
712: 'P_GL_PERIOD_TO' || P_GL_PERIOD_TO);
713: FND_LOG.STRING(L_PROC_LEVEL,
714: L_MODULE_PREFIX || '.' || L_PROC_NAME || '.parameters',
715: 'P_SOURCE ' || P_SOURCE);
716: FND_LOG.STRING(L_PROC_LEVEL,
717: L_MODULE_PREFIX || '.' || L_PROC_NAME || '.parameters',
718: 'P_REPORT_ID ' || P_REPORT_ID);
719: FND_LOG.STRING(L_PROC_LEVEL, --enhancment add
720: L_MODULE_PREFIX || '.' || L_PROC_NAME || '.parameters',
715: 'P_SOURCE ' || P_SOURCE);
716: FND_LOG.STRING(L_PROC_LEVEL,
717: L_MODULE_PREFIX || '.' || L_PROC_NAME || '.parameters',
718: 'P_REPORT_ID ' || P_REPORT_ID);
719: FND_LOG.STRING(L_PROC_LEVEL, --enhancment add
720: L_MODULE_PREFIX || '.' || L_PROC_NAME || '.parameters',
721: 'P_BSV ' || P_BSV);
722:
723: END IF; --(l_proc_level >= l_dbg_level)
1182:
1183: --log for debug
1184: IF (L_PROC_LEVEL >= L_DBG_LEVEL)
1185: THEN
1186: FND_LOG.STRING(L_PROC_LEVEL,
1187: L_MODULE_PREFIX || '.' || L_PROC_NAME || '.end',
1188: 'Exit procedure');
1189: END IF; --( l_proc_level >= l_dbg_level )
1190:
1194: NAME => 'JA_CN_INVALID_GLPERIOD');
1195: L_MSG_INVALID_GLPERIOD := FND_MESSAGE.GET;
1196: IF (L_PROC_LEVEL >= L_DBG_LEVEL)
1197: THEN
1198: FND_LOG.STRING(L_PROC_LEVEL,
1199: L_MODULE_PREFIX || '.' || L_PROC_NAME ||
1200: '.JA_CN_INVALID_GLPERIOD ',
1201: L_MSG_INVALID_GLPERIOD);
1202: END IF; --(l_proc_level >= l_dbg_level)
1220: ERRBUF := L_MSG_INVALID_GLPERIOD;
1221: WHEN OTHERS THEN
1222: IF (L_PROC_LEVEL >= L_DBG_LEVEL)
1223: THEN
1224: FND_LOG.STRING(L_PROC_LEVEL,
1225: L_MODULE_PREFIX || '.' || L_PROC_NAME ||
1226: '.Other_Exception ',
1227: SQLCODE || ':' || SQLERRM);
1228: END IF; --(l_proc_level >= l_dbg_level)