eTRM uses javascript that opens and focuses a separate window to display reports. Your browser does not appear to support javascript. This should not prevent you from using eTRM but it does mean the window focus feature will not work. Please check the contents of other windows on your desktop if you click on a link that does not appear to do anything.

APPS.GL_CI_DATA_TRANSFER_PKG dependencies on FND_MESSAGE

Line 173: FND_MESSAGE.set_name('SQLGL', 'gl_us_ci_others_fail');

169: exception
170: when GLOBAL_ERROR then
171: rollback;
172: result := SUBSTR(SQLERRM, 1, 200);
173: FND_MESSAGE.set_name('SQLGL', 'gl_us_ci_others_fail');
174: FND_MESSAGE.set_token('RESULT', result);
175: app_exception.raise_exception;
176: END Get_Schema_Name;
177: --+ ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++

Line 174: FND_MESSAGE.set_token('RESULT', result);

170: when GLOBAL_ERROR then
171: rollback;
172: result := SUBSTR(SQLERRM, 1, 200);
173: FND_MESSAGE.set_name('SQLGL', 'gl_us_ci_others_fail');
174: FND_MESSAGE.set_token('RESULT', result);
175: app_exception.raise_exception;
176: END Get_Schema_Name;
177: --+ ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
178: --+bug#2712006, cannot use hardcoded domain name, get doamin name here.

Line 197: FND_MESSAGE.set_name('SQLGL', 'gl_us_ci_others_fail');

193: exception
194: when GLOBAL_ERROR then
195: rollback;
196: result := SUBSTR(SQLERRM, 1, 200);
197: FND_MESSAGE.set_name('SQLGL', 'gl_us_ci_others_fail');
198: FND_MESSAGE.set_token('RESULT', result);
199: app_exception.raise_exception;
200: END Get_Domain_Name;
201: --+ ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++

Line 198: FND_MESSAGE.set_token('RESULT', result);

194: when GLOBAL_ERROR then
195: rollback;
196: result := SUBSTR(SQLERRM, 1, 200);
197: FND_MESSAGE.set_name('SQLGL', 'gl_us_ci_others_fail');
198: FND_MESSAGE.set_token('RESULT', result);
199: app_exception.raise_exception;
200: END Get_Domain_Name;
201: --+ ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
202: --+ this function is called in the GLXCORUN.fmb to get the remote instance

Line 389: FND_MESSAGE.set_name('SQLGL', 'GL_US_CI_GROUP_ID');

385: l_in_table_name := i_parallel_name || group_id;
386: v_SQL := 'BEGIN '||' :l_group_id := ' || applSysSchema ||'.GL_CI_REMOTE_INVOKE_PKG.Get_Group_ID@' || dblink||';'||' END;';
387: EXECUTE IMMEDIATE v_SQL USING OUT l_group_id;
388: COMMIT;
389: FND_MESSAGE.set_name('SQLGL', 'GL_US_CI_GROUP_ID');
390: FND_MESSAGE.set_token('GROUP', l_group_id);
391: log_message('==>' || FND_MESSAGE.get, TRUE);
392: v_SQL := 'select apps_username ' ||
393: 'from rg_database_links ' ||

Line 390: FND_MESSAGE.set_token('GROUP', l_group_id);

386: v_SQL := 'BEGIN '||' :l_group_id := ' || applSysSchema ||'.GL_CI_REMOTE_INVOKE_PKG.Get_Group_ID@' || dblink||';'||' END;';
387: EXECUTE IMMEDIATE v_SQL USING OUT l_group_id;
388: COMMIT;
389: FND_MESSAGE.set_name('SQLGL', 'GL_US_CI_GROUP_ID');
390: FND_MESSAGE.set_token('GROUP', l_group_id);
391: log_message('==>' || FND_MESSAGE.get, TRUE);
392: v_SQL := 'select apps_username ' ||
393: 'from rg_database_links ' ||
394: 'where name = :pd';

Line 391: log_message('==>' || FND_MESSAGE.get, TRUE);

387: EXECUTE IMMEDIATE v_SQL USING OUT l_group_id;
388: COMMIT;
389: FND_MESSAGE.set_name('SQLGL', 'GL_US_CI_GROUP_ID');
390: FND_MESSAGE.set_token('GROUP', l_group_id);
391: log_message('==>' || FND_MESSAGE.get, TRUE);
392: v_SQL := 'select apps_username ' ||
393: 'from rg_database_links ' ||
394: 'where name = :pd';
395: EXECUTE IMMEDIATE v_SQL INTO l_db_username USING p_dblink;

Line 400: FND_MESSAGE.set_name('SQLGL', 'GL_US_CI_INTERFACE');

396: v_BlockSQL := 'BEGIN '|| applSysSchema || '.GL_CI_REMOTE_INVOKE_PKG.Create_Interface_Table@' || dblink||'(:l_group_id, :l_db_username);'||' END;';
397: EXECUTE IMMEDIATE v_BlockSQL USING IN l_group_id,l_db_username;
398: commit;
399: --+dbms_output.put_line('after table is created in the target ');
400: FND_MESSAGE.set_name('SQLGL', 'GL_US_CI_INTERFACE');
401: FND_MESSAGE.set_token('GROUP', l_group_id);
402: log_message('==>' || FND_MESSAGE.get, TRUE);
403: l_out_table_name := i_parallel_name || l_group_id;
404: if actual_flag = 'B' then

Line 401: FND_MESSAGE.set_token('GROUP', l_group_id);

397: EXECUTE IMMEDIATE v_BlockSQL USING IN l_group_id,l_db_username;
398: commit;
399: --+dbms_output.put_line('after table is created in the target ');
400: FND_MESSAGE.set_name('SQLGL', 'GL_US_CI_INTERFACE');
401: FND_MESSAGE.set_token('GROUP', l_group_id);
402: log_message('==>' || FND_MESSAGE.get, TRUE);
403: l_out_table_name := i_parallel_name || l_group_id;
404: if actual_flag = 'B' then
405: l_target_budget_version_id := Get_Budget_Version_id(user_id, resp_id, app_id, dblink,budget_name);

Line 402: log_message('==>' || FND_MESSAGE.get, TRUE);

398: commit;
399: --+dbms_output.put_line('after table is created in the target ');
400: FND_MESSAGE.set_name('SQLGL', 'GL_US_CI_INTERFACE');
401: FND_MESSAGE.set_token('GROUP', l_group_id);
402: log_message('==>' || FND_MESSAGE.get, TRUE);
403: l_out_table_name := i_parallel_name || l_group_id;
404: if actual_flag = 'B' then
405: l_target_budget_version_id := Get_Budget_Version_id(user_id, resp_id, app_id, dblink,budget_name);
406: --bug fix #3095741, returns a meaningful error message when no matching budget is found in target

Line 969: FND_MESSAGE.set_name('SQLGL', 'gl_us_ci_others_fail');

965: exception
966: WHEN OTHERS THEN
967: rollback;
968: result := SUBSTR(SQLERRM, 1, 200);
969: FND_MESSAGE.set_name('SQLGL', 'gl_us_ci_others_fail');
970: FND_MESSAGE.set_token('RESULT', result);
971: app_exception.raise_exception;
972: return result;
973: END Remote_Data_Validation;

Line 970: FND_MESSAGE.set_token('RESULT', result);

966: WHEN OTHERS THEN
967: rollback;
968: result := SUBSTR(SQLERRM, 1, 200);
969: FND_MESSAGE.set_name('SQLGL', 'gl_us_ci_others_fail');
970: FND_MESSAGE.set_token('RESULT', result);
971: app_exception.raise_exception;
972: return result;
973: END Remote_Data_Validation;
974: --+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++

Line 1157: FND_MESSAGE.set_name('SQLGL', 'GL_US_CI_NO_DEFAULT_LEDGER');

1153: initialize_over_dblink(l_user_id, l_resp_id, l_app_id,dblink);
1154: l_to_ledger_id := Get_Ledger_id(l_user_id, l_resp_id,
1155: l_app_id, p_dblink, l_access_set_id, l_access_set_name, l_access_code,l_tgt_ld_name);
1156: if l_to_ledger_id = -1 then
1157: FND_MESSAGE.set_name('SQLGL', 'GL_US_CI_NO_DEFAULT_LEDGER');
1158: FND_MESSAGE.set_token('ACCESS_SET', l_access_set_name);
1159: log_message('==>' || FND_MESSAGE.get, TRUE);
1160: global_retcode := 1;
1161: raise GLOBAL_ERROR;

Line 1158: FND_MESSAGE.set_token('ACCESS_SET', l_access_set_name);

1154: l_to_ledger_id := Get_Ledger_id(l_user_id, l_resp_id,
1155: l_app_id, p_dblink, l_access_set_id, l_access_set_name, l_access_code,l_tgt_ld_name);
1156: if l_to_ledger_id = -1 then
1157: FND_MESSAGE.set_name('SQLGL', 'GL_US_CI_NO_DEFAULT_LEDGER');
1158: FND_MESSAGE.set_token('ACCESS_SET', l_access_set_name);
1159: log_message('==>' || FND_MESSAGE.get, TRUE);
1160: global_retcode := 1;
1161: raise GLOBAL_ERROR;
1162: end if;

Line 1159: log_message('==>' || FND_MESSAGE.get, TRUE);

1155: l_app_id, p_dblink, l_access_set_id, l_access_set_name, l_access_code,l_tgt_ld_name);
1156: if l_to_ledger_id = -1 then
1157: FND_MESSAGE.set_name('SQLGL', 'GL_US_CI_NO_DEFAULT_LEDGER');
1158: FND_MESSAGE.set_token('ACCESS_SET', l_access_set_name);
1159: log_message('==>' || FND_MESSAGE.get, TRUE);
1160: global_retcode := 1;
1161: raise GLOBAL_ERROR;
1162: end if;
1163: if l_to_ledger_id >= 0 then

Line 1172: FND_MESSAGE.set_name('SQLGL', 'GL_US_CI_NO_ACCESS_RIGHTS');

1168: debug_message('Target ledger id is ' || l_to_ledger_id,TRUE);
1169: debug_message('Target ledger name is ' || l_target_ledger_name,TRUE);
1170: end if;
1171: if l_access_code <> 'B' then
1172: FND_MESSAGE.set_name('SQLGL', 'GL_US_CI_NO_ACCESS_RIGHTS');
1173: FND_MESSAGE.set_token('LEDGER_NAME', l_target_ledger_name);
1174: log_message('==>' || FND_MESSAGE.get, TRUE);
1175: global_retcode := 1;
1176: raise GLOBAL_ERROR;

Line 1173: FND_MESSAGE.set_token('LEDGER_NAME', l_target_ledger_name);

1169: debug_message('Target ledger name is ' || l_target_ledger_name,TRUE);
1170: end if;
1171: if l_access_code <> 'B' then
1172: FND_MESSAGE.set_name('SQLGL', 'GL_US_CI_NO_ACCESS_RIGHTS');
1173: FND_MESSAGE.set_token('LEDGER_NAME', l_target_ledger_name);
1174: log_message('==>' || FND_MESSAGE.get, TRUE);
1175: global_retcode := 1;
1176: raise GLOBAL_ERROR;
1177: end if;

Line 1174: log_message('==>' || FND_MESSAGE.get, TRUE);

1170: end if;
1171: if l_access_code <> 'B' then
1172: FND_MESSAGE.set_name('SQLGL', 'GL_US_CI_NO_ACCESS_RIGHTS');
1173: FND_MESSAGE.set_token('LEDGER_NAME', l_target_ledger_name);
1174: log_message('==>' || FND_MESSAGE.get, TRUE);
1175: global_retcode := 1;
1176: raise GLOBAL_ERROR;
1177: end if;
1178: end if;

Line 1183: FND_MESSAGE.set_name('SQLGL', 'GL_US_CI_ENTER_CI');

1179: --+check if the suspense posting is allowed for this ledger on the target instance
1180: v_SQL1 := 'BEGIN '||' :a := ' || applSysSchema || '.GL_CI_REMOTE_INVOKE_PKG.Get_Suspense_Flag@' || dblink
1181: || '(:ledger_id)' ||';'||' END;';
1182: EXECUTE IMMEDIATE v_SQL1 USING OUT l_suspense_flag, IN l_to_ledger_id;
1183: FND_MESSAGE.set_name('SQLGL', 'GL_US_CI_ENTER_CI');
1184: log_message('==>' || FND_MESSAGE.get, TRUE);
1185: errbuf := FND_MESSAGE.get;
1186: global_errbuf := FND_MESSAGE.get;
1187: --+Add l_balanced_flag to check if total debits equal to total credits. if not, output warning message

Line 1184: log_message('==>' || FND_MESSAGE.get, TRUE);

1180: v_SQL1 := 'BEGIN '||' :a := ' || applSysSchema || '.GL_CI_REMOTE_INVOKE_PKG.Get_Suspense_Flag@' || dblink
1181: || '(:ledger_id)' ||';'||' END;';
1182: EXECUTE IMMEDIATE v_SQL1 USING OUT l_suspense_flag, IN l_to_ledger_id;
1183: FND_MESSAGE.set_name('SQLGL', 'GL_US_CI_ENTER_CI');
1184: log_message('==>' || FND_MESSAGE.get, TRUE);
1185: errbuf := FND_MESSAGE.get;
1186: global_errbuf := FND_MESSAGE.get;
1187: --+Add l_balanced_flag to check if total debits equal to total credits. if not, output warning message
1188: --+to log file.

Line 1185: errbuf := FND_MESSAGE.get;

1181: || '(:ledger_id)' ||';'||' END;';
1182: EXECUTE IMMEDIATE v_SQL1 USING OUT l_suspense_flag, IN l_to_ledger_id;
1183: FND_MESSAGE.set_name('SQLGL', 'GL_US_CI_ENTER_CI');
1184: log_message('==>' || FND_MESSAGE.get, TRUE);
1185: errbuf := FND_MESSAGE.get;
1186: global_errbuf := FND_MESSAGE.get;
1187: --+Add l_balanced_flag to check if total debits equal to total credits. if not, output warning message
1188: --+to log file.
1189: l_to_group_id := Remote_Data_transfer(p_actual_flag,l_user_id, l_resp_id, l_app_id,

Line 1186: global_errbuf := FND_MESSAGE.get;

1182: EXECUTE IMMEDIATE v_SQL1 USING OUT l_suspense_flag, IN l_to_ledger_id;
1183: FND_MESSAGE.set_name('SQLGL', 'GL_US_CI_ENTER_CI');
1184: log_message('==>' || FND_MESSAGE.get, TRUE);
1185: errbuf := FND_MESSAGE.get;
1186: global_errbuf := FND_MESSAGE.get;
1187: --+Add l_balanced_flag to check if total debits equal to total credits. if not, output warning message
1188: --+to log file.
1189: l_to_group_id := Remote_Data_transfer(p_actual_flag,l_user_id, l_resp_id, l_app_id,
1190: dblink, from_ledger_id,l_pd_name, p_budget_name, from_group_id,

Line 1195: FND_MESSAGE.set_name('SQLGL', 'GL_US_CI_NO_BUDGET');

1191: p_request_id, p_dblink, l_to_ledger_id,
1192: l_avg_flag, l_balanced_flag, global_errbuf);
1193: --bug fix#3095741, return a meaningful error message when budget name is no found in the target db
1194: if (l_to_group_id = -1) and (global_errbuf = 'FAILED') then
1195: FND_MESSAGE.set_name('SQLGL', 'GL_US_CI_NO_BUDGET');
1196: log_message('==>' || FND_MESSAGE.get, TRUE);
1197: global_errbuf := FND_MESSAGE.get;
1198: global_retcode := 2;
1199: raise GLOBAL_ERROR;

Line 1196: log_message('==>' || FND_MESSAGE.get, TRUE);

1192: l_avg_flag, l_balanced_flag, global_errbuf);
1193: --bug fix#3095741, return a meaningful error message when budget name is no found in the target db
1194: if (l_to_group_id = -1) and (global_errbuf = 'FAILED') then
1195: FND_MESSAGE.set_name('SQLGL', 'GL_US_CI_NO_BUDGET');
1196: log_message('==>' || FND_MESSAGE.get, TRUE);
1197: global_errbuf := FND_MESSAGE.get;
1198: global_retcode := 2;
1199: raise GLOBAL_ERROR;
1200: end if;

Line 1197: global_errbuf := FND_MESSAGE.get;

1193: --bug fix#3095741, return a meaningful error message when budget name is no found in the target db
1194: if (l_to_group_id = -1) and (global_errbuf = 'FAILED') then
1195: FND_MESSAGE.set_name('SQLGL', 'GL_US_CI_NO_BUDGET');
1196: log_message('==>' || FND_MESSAGE.get, TRUE);
1197: global_errbuf := FND_MESSAGE.get;
1198: global_retcode := 2;
1199: raise GLOBAL_ERROR;
1200: end if;
1201: if (l_to_group_id = -1) and (global_errbuf = 'NO_DATA_FOUND') then

Line 1202: FND_MESSAGE.set_name('SQLGL', 'GL_US_CI_NO_DATA_FOUND');

1198: global_retcode := 2;
1199: raise GLOBAL_ERROR;
1200: end if;
1201: if (l_to_group_id = -1) and (global_errbuf = 'NO_DATA_FOUND') then
1202: FND_MESSAGE.set_name('SQLGL', 'GL_US_CI_NO_DATA_FOUND');
1203: log_message('==>' || FND_MESSAGE.get, TRUE);
1204: global_errbuf := FND_MESSAGE.get;
1205: global_retcode := 1;
1206: raise GLOBAL_ERROR;

Line 1203: log_message('==>' || FND_MESSAGE.get, TRUE);

1199: raise GLOBAL_ERROR;
1200: end if;
1201: if (l_to_group_id = -1) and (global_errbuf = 'NO_DATA_FOUND') then
1202: FND_MESSAGE.set_name('SQLGL', 'GL_US_CI_NO_DATA_FOUND');
1203: log_message('==>' || FND_MESSAGE.get, TRUE);
1204: global_errbuf := FND_MESSAGE.get;
1205: global_retcode := 1;
1206: raise GLOBAL_ERROR;
1207: end if;

Line 1204: global_errbuf := FND_MESSAGE.get;

1200: end if;
1201: if (l_to_group_id = -1) and (global_errbuf = 'NO_DATA_FOUND') then
1202: FND_MESSAGE.set_name('SQLGL', 'GL_US_CI_NO_DATA_FOUND');
1203: log_message('==>' || FND_MESSAGE.get, TRUE);
1204: global_errbuf := FND_MESSAGE.get;
1205: global_retcode := 1;
1206: raise GLOBAL_ERROR;
1207: end if;
1208: if l_to_group_id < 0 then

Line 1209: FND_MESSAGE.set_name('SQLGL', 'GL_US_CI_TRANSFER_FAIL');

1205: global_retcode := 1;
1206: raise GLOBAL_ERROR;
1207: end if;
1208: if l_to_group_id < 0 then
1209: FND_MESSAGE.set_name('SQLGL', 'GL_US_CI_TRANSFER_FAIL');
1210: log_message('==>' || FND_MESSAGE.get, TRUE);
1211: global_errbuf := global_errbuf || ' ' || FND_MESSAGE.get;
1212: if l_debug = 'Y' then
1213: debug_message('Invalid Target group ID in section number ' || section_number,TRUE);

Line 1210: log_message('==>' || FND_MESSAGE.get, TRUE);

1206: raise GLOBAL_ERROR;
1207: end if;
1208: if l_to_group_id < 0 then
1209: FND_MESSAGE.set_name('SQLGL', 'GL_US_CI_TRANSFER_FAIL');
1210: log_message('==>' || FND_MESSAGE.get, TRUE);
1211: global_errbuf := global_errbuf || ' ' || FND_MESSAGE.get;
1212: if l_debug = 'Y' then
1213: debug_message('Invalid Target group ID in section number ' || section_number,TRUE);
1214: end if;

Line 1211: global_errbuf := global_errbuf || ' ' || FND_MESSAGE.get;

1207: end if;
1208: if l_to_group_id < 0 then
1209: FND_MESSAGE.set_name('SQLGL', 'GL_US_CI_TRANSFER_FAIL');
1210: log_message('==>' || FND_MESSAGE.get, TRUE);
1211: global_errbuf := global_errbuf || ' ' || FND_MESSAGE.get;
1212: if l_debug = 'Y' then
1213: debug_message('Invalid Target group ID in section number ' || section_number,TRUE);
1214: end if;
1215: global_retcode := 1;

Line 1219: FND_MESSAGE.set_name('SQLGL', 'GL_US_CI_TRANSFER_OK');

1215: global_retcode := 1;
1216: raise GLOBAL_ERROR;
1217: else
1218: if (l_balanced_flag = 'Y') then
1219: FND_MESSAGE.set_name('SQLGL', 'GL_US_CI_TRANSFER_OK');
1220: FND_MESSAGE.set_token('GROUP_ID', l_to_group_id);
1221: log_message('==>' || FND_MESSAGE.get, TRUE);
1222: errbuf := errbuf || ' ' || FND_MESSAGE.get;
1223: else

Line 1220: FND_MESSAGE.set_token('GROUP_ID', l_to_group_id);

1216: raise GLOBAL_ERROR;
1217: else
1218: if (l_balanced_flag = 'Y') then
1219: FND_MESSAGE.set_name('SQLGL', 'GL_US_CI_TRANSFER_OK');
1220: FND_MESSAGE.set_token('GROUP_ID', l_to_group_id);
1221: log_message('==>' || FND_MESSAGE.get, TRUE);
1222: errbuf := errbuf || ' ' || FND_MESSAGE.get;
1223: else
1224: FND_MESSAGE.set_name('SQLGL', 'GL_US_CI_TRANSFER_OK');

Line 1221: log_message('==>' || FND_MESSAGE.get, TRUE);

1217: else
1218: if (l_balanced_flag = 'Y') then
1219: FND_MESSAGE.set_name('SQLGL', 'GL_US_CI_TRANSFER_OK');
1220: FND_MESSAGE.set_token('GROUP_ID', l_to_group_id);
1221: log_message('==>' || FND_MESSAGE.get, TRUE);
1222: errbuf := errbuf || ' ' || FND_MESSAGE.get;
1223: else
1224: FND_MESSAGE.set_name('SQLGL', 'GL_US_CI_TRANSFER_OK');
1225: FND_MESSAGE.set_token('GROUP_ID', l_to_group_id);

Line 1222: errbuf := errbuf || ' ' || FND_MESSAGE.get;

1218: if (l_balanced_flag = 'Y') then
1219: FND_MESSAGE.set_name('SQLGL', 'GL_US_CI_TRANSFER_OK');
1220: FND_MESSAGE.set_token('GROUP_ID', l_to_group_id);
1221: log_message('==>' || FND_MESSAGE.get, TRUE);
1222: errbuf := errbuf || ' ' || FND_MESSAGE.get;
1223: else
1224: FND_MESSAGE.set_name('SQLGL', 'GL_US_CI_TRANSFER_OK');
1225: FND_MESSAGE.set_token('GROUP_ID', l_to_group_id);
1226: log_message('==>' || FND_MESSAGE.get, TRUE);

Line 1224: FND_MESSAGE.set_name('SQLGL', 'GL_US_CI_TRANSFER_OK');

1220: FND_MESSAGE.set_token('GROUP_ID', l_to_group_id);
1221: log_message('==>' || FND_MESSAGE.get, TRUE);
1222: errbuf := errbuf || ' ' || FND_MESSAGE.get;
1223: else
1224: FND_MESSAGE.set_name('SQLGL', 'GL_US_CI_TRANSFER_OK');
1225: FND_MESSAGE.set_token('GROUP_ID', l_to_group_id);
1226: log_message('==>' || FND_MESSAGE.get, TRUE);
1227: errbuf := errbuf || ' ' || FND_MESSAGE.get;
1228: FND_MESSAGE.set_name('SQLGL', 'GL_US_CI_IMBALANCED_OTHER');

Line 1225: FND_MESSAGE.set_token('GROUP_ID', l_to_group_id);

1221: log_message('==>' || FND_MESSAGE.get, TRUE);
1222: errbuf := errbuf || ' ' || FND_MESSAGE.get;
1223: else
1224: FND_MESSAGE.set_name('SQLGL', 'GL_US_CI_TRANSFER_OK');
1225: FND_MESSAGE.set_token('GROUP_ID', l_to_group_id);
1226: log_message('==>' || FND_MESSAGE.get, TRUE);
1227: errbuf := errbuf || ' ' || FND_MESSAGE.get;
1228: FND_MESSAGE.set_name('SQLGL', 'GL_US_CI_IMBALANCED_OTHER');
1229: log_message('==>' || FND_MESSAGE.get, TRUE);

Line 1226: log_message('==>' || FND_MESSAGE.get, TRUE);

1222: errbuf := errbuf || ' ' || FND_MESSAGE.get;
1223: else
1224: FND_MESSAGE.set_name('SQLGL', 'GL_US_CI_TRANSFER_OK');
1225: FND_MESSAGE.set_token('GROUP_ID', l_to_group_id);
1226: log_message('==>' || FND_MESSAGE.get, TRUE);
1227: errbuf := errbuf || ' ' || FND_MESSAGE.get;
1228: FND_MESSAGE.set_name('SQLGL', 'GL_US_CI_IMBALANCED_OTHER');
1229: log_message('==>' || FND_MESSAGE.get, TRUE);
1230: errbuf := errbuf || ' ' || FND_MESSAGE.get;

Line 1227: errbuf := errbuf || ' ' || FND_MESSAGE.get;

1223: else
1224: FND_MESSAGE.set_name('SQLGL', 'GL_US_CI_TRANSFER_OK');
1225: FND_MESSAGE.set_token('GROUP_ID', l_to_group_id);
1226: log_message('==>' || FND_MESSAGE.get, TRUE);
1227: errbuf := errbuf || ' ' || FND_MESSAGE.get;
1228: FND_MESSAGE.set_name('SQLGL', 'GL_US_CI_IMBALANCED_OTHER');
1229: log_message('==>' || FND_MESSAGE.get, TRUE);
1230: errbuf := errbuf || ' ' || FND_MESSAGE.get;
1231: end if;

Line 1228: FND_MESSAGE.set_name('SQLGL', 'GL_US_CI_IMBALANCED_OTHER');

1224: FND_MESSAGE.set_name('SQLGL', 'GL_US_CI_TRANSFER_OK');
1225: FND_MESSAGE.set_token('GROUP_ID', l_to_group_id);
1226: log_message('==>' || FND_MESSAGE.get, TRUE);
1227: errbuf := errbuf || ' ' || FND_MESSAGE.get;
1228: FND_MESSAGE.set_name('SQLGL', 'GL_US_CI_IMBALANCED_OTHER');
1229: log_message('==>' || FND_MESSAGE.get, TRUE);
1230: errbuf := errbuf || ' ' || FND_MESSAGE.get;
1231: end if;
1232: IF (p_j_import = 'N') THEN

Line 1229: log_message('==>' || FND_MESSAGE.get, TRUE);

1225: FND_MESSAGE.set_token('GROUP_ID', l_to_group_id);
1226: log_message('==>' || FND_MESSAGE.get, TRUE);
1227: errbuf := errbuf || ' ' || FND_MESSAGE.get;
1228: FND_MESSAGE.set_name('SQLGL', 'GL_US_CI_IMBALANCED_OTHER');
1229: log_message('==>' || FND_MESSAGE.get, TRUE);
1230: errbuf := errbuf || ' ' || FND_MESSAGE.get;
1231: end if;
1232: IF (p_j_import = 'N') THEN
1233: --+populates the gl_interface_control table and gl_cons_interface_to_group_id table

Line 1230: errbuf := errbuf || ' ' || FND_MESSAGE.get;

1226: log_message('==>' || FND_MESSAGE.get, TRUE);
1227: errbuf := errbuf || ' ' || FND_MESSAGE.get;
1228: FND_MESSAGE.set_name('SQLGL', 'GL_US_CI_IMBALANCED_OTHER');
1229: log_message('==>' || FND_MESSAGE.get, TRUE);
1230: errbuf := errbuf || ' ' || FND_MESSAGE.get;
1231: end if;
1232: IF (p_j_import = 'N') THEN
1233: --+populates the gl_interface_control table and gl_cons_interface_to_group_id table
1234: --+add an average flag to indicate whether this is a adb balances transfer or not

Line 1294: FND_MESSAGE.set_name('SQLGL', 'GL_US_CI_JOURNAL_IMPORT_OK');

1290: if l_debug = 'Y' then
1291: debug_message('The status after verifying journal import is ' || l_verify,TRUE);
1292: end if;
1293: if l_verify = 'SUCCESS' then
1294: FND_MESSAGE.set_name('SQLGL', 'GL_US_CI_JOURNAL_IMPORT_OK');
1295: FND_MESSAGE.set_token('RID', l_reqJI_id);
1296: log_message('==>' || FND_MESSAGE.get, TRUE);
1297: global_errbuf := FND_MESSAGE.get;
1298: errbuf := errbuf || ' ' || FND_MESSAGE.get;

Line 1295: FND_MESSAGE.set_token('RID', l_reqJI_id);

1291: debug_message('The status after verifying journal import is ' || l_verify,TRUE);
1292: end if;
1293: if l_verify = 'SUCCESS' then
1294: FND_MESSAGE.set_name('SQLGL', 'GL_US_CI_JOURNAL_IMPORT_OK');
1295: FND_MESSAGE.set_token('RID', l_reqJI_id);
1296: log_message('==>' || FND_MESSAGE.get, TRUE);
1297: global_errbuf := FND_MESSAGE.get;
1298: errbuf := errbuf || ' ' || FND_MESSAGE.get;
1299: --+dbms_output.put_line('Journal Import is successful ' || l_reqJI_id || ' ' || l_to_group_id);

Line 1296: log_message('==>' || FND_MESSAGE.get, TRUE);

1292: end if;
1293: if l_verify = 'SUCCESS' then
1294: FND_MESSAGE.set_name('SQLGL', 'GL_US_CI_JOURNAL_IMPORT_OK');
1295: FND_MESSAGE.set_token('RID', l_reqJI_id);
1296: log_message('==>' || FND_MESSAGE.get, TRUE);
1297: global_errbuf := FND_MESSAGE.get;
1298: errbuf := errbuf || ' ' || FND_MESSAGE.get;
1299: --+dbms_output.put_line('Journal Import is successful ' || l_reqJI_id || ' ' || l_to_group_id);
1300: if (p_j_post = 'Y') then

Line 1297: global_errbuf := FND_MESSAGE.get;

1293: if l_verify = 'SUCCESS' then
1294: FND_MESSAGE.set_name('SQLGL', 'GL_US_CI_JOURNAL_IMPORT_OK');
1295: FND_MESSAGE.set_token('RID', l_reqJI_id);
1296: log_message('==>' || FND_MESSAGE.get, TRUE);
1297: global_errbuf := FND_MESSAGE.get;
1298: errbuf := errbuf || ' ' || FND_MESSAGE.get;
1299: --+dbms_output.put_line('Journal Import is successful ' || l_reqJI_id || ' ' || l_to_group_id);
1300: if (p_j_post = 'Y') then
1301: --+Journal Post

Line 1298: errbuf := errbuf || ' ' || FND_MESSAGE.get;

1294: FND_MESSAGE.set_name('SQLGL', 'GL_US_CI_JOURNAL_IMPORT_OK');
1295: FND_MESSAGE.set_token('RID', l_reqJI_id);
1296: log_message('==>' || FND_MESSAGE.get, TRUE);
1297: global_errbuf := FND_MESSAGE.get;
1298: errbuf := errbuf || ' ' || FND_MESSAGE.get;
1299: --+dbms_output.put_line('Journal Import is successful ' || l_reqJI_id || ' ' || l_to_group_id);
1300: if (p_j_post = 'Y') then
1301: --+Journal Post
1302: section_number := 3;

Line 1360: FND_MESSAGE.set_name('SQLGL', 'GL_US_CI_JOURNAL_POSTING_OK');

1356: if l_debug = 'Y' then
1357: debug_message('The status of Verify Journal Post is ' || l_verify,TRUE);
1358: end if;
1359: if l_verify = 'SUCCESS' then
1360: FND_MESSAGE.set_name('SQLGL', 'GL_US_CI_JOURNAL_POSTING_OK');
1361: FND_MESSAGE.set_token('RID', l_reqPost_id);
1362: log_message('==>' || FND_MESSAGE.get, TRUE);
1363: global_errbuf := FND_MESSAGE.get;
1364: errbuf := errbuf || ' ' || FND_MESSAGE.get;

Line 1361: FND_MESSAGE.set_token('RID', l_reqPost_id);

1357: debug_message('The status of Verify Journal Post is ' || l_verify,TRUE);
1358: end if;
1359: if l_verify = 'SUCCESS' then
1360: FND_MESSAGE.set_name('SQLGL', 'GL_US_CI_JOURNAL_POSTING_OK');
1361: FND_MESSAGE.set_token('RID', l_reqPost_id);
1362: log_message('==>' || FND_MESSAGE.get, TRUE);
1363: global_errbuf := FND_MESSAGE.get;
1364: errbuf := errbuf || ' ' || FND_MESSAGE.get;
1365: --+ dbms_output.put_line('Journal Post is successful ' ||l_reqPost_id);

Line 1362: log_message('==>' || FND_MESSAGE.get, TRUE);

1358: end if;
1359: if l_verify = 'SUCCESS' then
1360: FND_MESSAGE.set_name('SQLGL', 'GL_US_CI_JOURNAL_POSTING_OK');
1361: FND_MESSAGE.set_token('RID', l_reqPost_id);
1362: log_message('==>' || FND_MESSAGE.get, TRUE);
1363: global_errbuf := FND_MESSAGE.get;
1364: errbuf := errbuf || ' ' || FND_MESSAGE.get;
1365: --+ dbms_output.put_line('Journal Post is successful ' ||l_reqPost_id);
1366: if l_first_one then

Line 1363: global_errbuf := FND_MESSAGE.get;

1359: if l_verify = 'SUCCESS' then
1360: FND_MESSAGE.set_name('SQLGL', 'GL_US_CI_JOURNAL_POSTING_OK');
1361: FND_MESSAGE.set_token('RID', l_reqPost_id);
1362: log_message('==>' || FND_MESSAGE.get, TRUE);
1363: global_errbuf := FND_MESSAGE.get;
1364: errbuf := errbuf || ' ' || FND_MESSAGE.get;
1365: --+ dbms_output.put_line('Journal Post is successful ' ||l_reqPost_id);
1366: if l_first_one then
1367: l_import_message_body := l_import_message_body || l_batch_name;

Line 1364: errbuf := errbuf || ' ' || FND_MESSAGE.get;

1360: FND_MESSAGE.set_name('SQLGL', 'GL_US_CI_JOURNAL_POSTING_OK');
1361: FND_MESSAGE.set_token('RID', l_reqPost_id);
1362: log_message('==>' || FND_MESSAGE.get, TRUE);
1363: global_errbuf := FND_MESSAGE.get;
1364: errbuf := errbuf || ' ' || FND_MESSAGE.get;
1365: --+ dbms_output.put_line('Journal Post is successful ' ||l_reqPost_id);
1366: if l_first_one then
1367: l_import_message_body := l_import_message_body || l_batch_name;
1368: l_post_request_id := l_post_request_id || l_reqPost_id;

Line 1376: FND_MESSAGE.set_name('SQLGL', 'GL_US_CI_JOURNAL_POSTING_FAIL');

1372: l_post_request_id := l_post_request_id || ', ' || l_reqPost_id;
1373: end if;
1374: else --+ posting verify failed
1375: if (l_balanced_flag = 'Y') then
1376: FND_MESSAGE.set_name('SQLGL', 'GL_US_CI_JOURNAL_POSTING_FAIL');
1377: FND_MESSAGE.set_token('RID', l_reqPost_id);
1378: log_message('==>' || FND_MESSAGE.get, TRUE);
1379: global_errbuf := global_errbuf || ' ' || FND_MESSAGE.get;
1380: global_retcode := 2;

Line 1377: FND_MESSAGE.set_token('RID', l_reqPost_id);

1373: end if;
1374: else --+ posting verify failed
1375: if (l_balanced_flag = 'Y') then
1376: FND_MESSAGE.set_name('SQLGL', 'GL_US_CI_JOURNAL_POSTING_FAIL');
1377: FND_MESSAGE.set_token('RID', l_reqPost_id);
1378: log_message('==>' || FND_MESSAGE.get, TRUE);
1379: global_errbuf := global_errbuf || ' ' || FND_MESSAGE.get;
1380: global_retcode := 2;
1381: raise GLOBAL_ERROR;

Line 1378: log_message('==>' || FND_MESSAGE.get, TRUE);

1374: else --+ posting verify failed
1375: if (l_balanced_flag = 'Y') then
1376: FND_MESSAGE.set_name('SQLGL', 'GL_US_CI_JOURNAL_POSTING_FAIL');
1377: FND_MESSAGE.set_token('RID', l_reqPost_id);
1378: log_message('==>' || FND_MESSAGE.get, TRUE);
1379: global_errbuf := global_errbuf || ' ' || FND_MESSAGE.get;
1380: global_retcode := 2;
1381: raise GLOBAL_ERROR;
1382: else

Line 1379: global_errbuf := global_errbuf || ' ' || FND_MESSAGE.get;

1375: if (l_balanced_flag = 'Y') then
1376: FND_MESSAGE.set_name('SQLGL', 'GL_US_CI_JOURNAL_POSTING_FAIL');
1377: FND_MESSAGE.set_token('RID', l_reqPost_id);
1378: log_message('==>' || FND_MESSAGE.get, TRUE);
1379: global_errbuf := global_errbuf || ' ' || FND_MESSAGE.get;
1380: global_retcode := 2;
1381: raise GLOBAL_ERROR;
1382: else
1383: if (l_suspense_flag = 'N') then

Line 1384: FND_MESSAGE.set_name('SQLGL', 'GL_US_CI_IMBALANCED_OTHER');

1380: global_retcode := 2;
1381: raise GLOBAL_ERROR;
1382: else
1383: if (l_suspense_flag = 'N') then
1384: FND_MESSAGE.set_name('SQLGL', 'GL_US_CI_IMBALANCED_OTHER');
1385: log_message('==>' || FND_MESSAGE.get, TRUE);
1386: global_errbuf := global_errbuf || ' ' || FND_MESSAGE.get;
1387: else
1388: FND_MESSAGE.set_name('SQLGL', 'GL_US_CI_IMBALANCED_SUS');

Line 1385: log_message('==>' || FND_MESSAGE.get, TRUE);

1381: raise GLOBAL_ERROR;
1382: else
1383: if (l_suspense_flag = 'N') then
1384: FND_MESSAGE.set_name('SQLGL', 'GL_US_CI_IMBALANCED_OTHER');
1385: log_message('==>' || FND_MESSAGE.get, TRUE);
1386: global_errbuf := global_errbuf || ' ' || FND_MESSAGE.get;
1387: else
1388: FND_MESSAGE.set_name('SQLGL', 'GL_US_CI_IMBALANCED_SUS');
1389: FND_MESSAGE.set_token('RID', l_reqPost_id);

Line 1386: global_errbuf := global_errbuf || ' ' || FND_MESSAGE.get;

1382: else
1383: if (l_suspense_flag = 'N') then
1384: FND_MESSAGE.set_name('SQLGL', 'GL_US_CI_IMBALANCED_OTHER');
1385: log_message('==>' || FND_MESSAGE.get, TRUE);
1386: global_errbuf := global_errbuf || ' ' || FND_MESSAGE.get;
1387: else
1388: FND_MESSAGE.set_name('SQLGL', 'GL_US_CI_IMBALANCED_SUS');
1389: FND_MESSAGE.set_token('RID', l_reqPost_id);
1390: log_message('==>' || FND_MESSAGE.get, TRUE);

Line 1388: FND_MESSAGE.set_name('SQLGL', 'GL_US_CI_IMBALANCED_SUS');

1384: FND_MESSAGE.set_name('SQLGL', 'GL_US_CI_IMBALANCED_OTHER');
1385: log_message('==>' || FND_MESSAGE.get, TRUE);
1386: global_errbuf := global_errbuf || ' ' || FND_MESSAGE.get;
1387: else
1388: FND_MESSAGE.set_name('SQLGL', 'GL_US_CI_IMBALANCED_SUS');
1389: FND_MESSAGE.set_token('RID', l_reqPost_id);
1390: log_message('==>' || FND_MESSAGE.get, TRUE);
1391: global_errbuf := global_errbuf || ' ' || FND_MESSAGE.get;
1392: errbuf := errbuf || ' ' || FND_MESSAGE.get;

Line 1389: FND_MESSAGE.set_token('RID', l_reqPost_id);

1385: log_message('==>' || FND_MESSAGE.get, TRUE);
1386: global_errbuf := global_errbuf || ' ' || FND_MESSAGE.get;
1387: else
1388: FND_MESSAGE.set_name('SQLGL', 'GL_US_CI_IMBALANCED_SUS');
1389: FND_MESSAGE.set_token('RID', l_reqPost_id);
1390: log_message('==>' || FND_MESSAGE.get, TRUE);
1391: global_errbuf := global_errbuf || ' ' || FND_MESSAGE.get;
1392: errbuf := errbuf || ' ' || FND_MESSAGE.get;
1393: end if;

Line 1390: log_message('==>' || FND_MESSAGE.get, TRUE);

1386: global_errbuf := global_errbuf || ' ' || FND_MESSAGE.get;
1387: else
1388: FND_MESSAGE.set_name('SQLGL', 'GL_US_CI_IMBALANCED_SUS');
1389: FND_MESSAGE.set_token('RID', l_reqPost_id);
1390: log_message('==>' || FND_MESSAGE.get, TRUE);
1391: global_errbuf := global_errbuf || ' ' || FND_MESSAGE.get;
1392: errbuf := errbuf || ' ' || FND_MESSAGE.get;
1393: end if;
1394: FND_MESSAGE.set_name('SQLGL', 'GL_US_CI_JOURNAL_POSTING_FAIL');

Line 1391: global_errbuf := global_errbuf || ' ' || FND_MESSAGE.get;

1387: else
1388: FND_MESSAGE.set_name('SQLGL', 'GL_US_CI_IMBALANCED_SUS');
1389: FND_MESSAGE.set_token('RID', l_reqPost_id);
1390: log_message('==>' || FND_MESSAGE.get, TRUE);
1391: global_errbuf := global_errbuf || ' ' || FND_MESSAGE.get;
1392: errbuf := errbuf || ' ' || FND_MESSAGE.get;
1393: end if;
1394: FND_MESSAGE.set_name('SQLGL', 'GL_US_CI_JOURNAL_POSTING_FAIL');
1395: FND_MESSAGE.set_token('RID', l_reqPost_id);

Line 1392: errbuf := errbuf || ' ' || FND_MESSAGE.get;

1388: FND_MESSAGE.set_name('SQLGL', 'GL_US_CI_IMBALANCED_SUS');
1389: FND_MESSAGE.set_token('RID', l_reqPost_id);
1390: log_message('==>' || FND_MESSAGE.get, TRUE);
1391: global_errbuf := global_errbuf || ' ' || FND_MESSAGE.get;
1392: errbuf := errbuf || ' ' || FND_MESSAGE.get;
1393: end if;
1394: FND_MESSAGE.set_name('SQLGL', 'GL_US_CI_JOURNAL_POSTING_FAIL');
1395: FND_MESSAGE.set_token('RID', l_reqPost_id);
1396: log_message('==>' || FND_MESSAGE.get, TRUE);

Line 1394: FND_MESSAGE.set_name('SQLGL', 'GL_US_CI_JOURNAL_POSTING_FAIL');

1390: log_message('==>' || FND_MESSAGE.get, TRUE);
1391: global_errbuf := global_errbuf || ' ' || FND_MESSAGE.get;
1392: errbuf := errbuf || ' ' || FND_MESSAGE.get;
1393: end if;
1394: FND_MESSAGE.set_name('SQLGL', 'GL_US_CI_JOURNAL_POSTING_FAIL');
1395: FND_MESSAGE.set_token('RID', l_reqPost_id);
1396: log_message('==>' || FND_MESSAGE.get, TRUE);
1397: global_errbuf := global_errbuf || ' ' || FND_MESSAGE.get;
1398: global_retcode := 2;

Line 1395: FND_MESSAGE.set_token('RID', l_reqPost_id);

1391: global_errbuf := global_errbuf || ' ' || FND_MESSAGE.get;
1392: errbuf := errbuf || ' ' || FND_MESSAGE.get;
1393: end if;
1394: FND_MESSAGE.set_name('SQLGL', 'GL_US_CI_JOURNAL_POSTING_FAIL');
1395: FND_MESSAGE.set_token('RID', l_reqPost_id);
1396: log_message('==>' || FND_MESSAGE.get, TRUE);
1397: global_errbuf := global_errbuf || ' ' || FND_MESSAGE.get;
1398: global_retcode := 2;
1399: raise GLOBAL_ERROR;

Line 1396: log_message('==>' || FND_MESSAGE.get, TRUE);

1392: errbuf := errbuf || ' ' || FND_MESSAGE.get;
1393: end if;
1394: FND_MESSAGE.set_name('SQLGL', 'GL_US_CI_JOURNAL_POSTING_FAIL');
1395: FND_MESSAGE.set_token('RID', l_reqPost_id);
1396: log_message('==>' || FND_MESSAGE.get, TRUE);
1397: global_errbuf := global_errbuf || ' ' || FND_MESSAGE.get;
1398: global_retcode := 2;
1399: raise GLOBAL_ERROR;
1400: end if;

Line 1397: global_errbuf := global_errbuf || ' ' || FND_MESSAGE.get;

1393: end if;
1394: FND_MESSAGE.set_name('SQLGL', 'GL_US_CI_JOURNAL_POSTING_FAIL');
1395: FND_MESSAGE.set_token('RID', l_reqPost_id);
1396: log_message('==>' || FND_MESSAGE.get, TRUE);
1397: global_errbuf := global_errbuf || ' ' || FND_MESSAGE.get;
1398: global_retcode := 2;
1399: raise GLOBAL_ERROR;
1400: end if;
1401: end if;

Line 1403: FND_MESSAGE.set_name('SQLGL', 'GL_US_CI_JOURNAL_POSTING_FAIL');

1399: raise GLOBAL_ERROR;
1400: end if;
1401: end if;
1402: else --+ posting status is COMPLETE:FAIL
1403: FND_MESSAGE.set_name('SQLGL', 'GL_US_CI_JOURNAL_POSTING_FAIL');
1404: FND_MESSAGE.set_token('RID', l_reqPost_id);
1405: log_message('==>' || FND_MESSAGE.get, TRUE);
1406: global_errbuf := global_errbuf || ' ' || FND_MESSAGE.get;
1407: global_retcode := 1;

Line 1404: FND_MESSAGE.set_token('RID', l_reqPost_id);

1400: end if;
1401: end if;
1402: else --+ posting status is COMPLETE:FAIL
1403: FND_MESSAGE.set_name('SQLGL', 'GL_US_CI_JOURNAL_POSTING_FAIL');
1404: FND_MESSAGE.set_token('RID', l_reqPost_id);
1405: log_message('==>' || FND_MESSAGE.get, TRUE);
1406: global_errbuf := global_errbuf || ' ' || FND_MESSAGE.get;
1407: global_retcode := 1;
1408: raise GLOBAL_ERROR;

Line 1405: log_message('==>' || FND_MESSAGE.get, TRUE);

1401: end if;
1402: else --+ posting status is COMPLETE:FAIL
1403: FND_MESSAGE.set_name('SQLGL', 'GL_US_CI_JOURNAL_POSTING_FAIL');
1404: FND_MESSAGE.set_token('RID', l_reqPost_id);
1405: log_message('==>' || FND_MESSAGE.get, TRUE);
1406: global_errbuf := global_errbuf || ' ' || FND_MESSAGE.get;
1407: global_retcode := 1;
1408: raise GLOBAL_ERROR;
1409: end if; --+end of if wait for journal post is successful

Line 1406: global_errbuf := global_errbuf || ' ' || FND_MESSAGE.get;

1402: else --+ posting status is COMPLETE:FAIL
1403: FND_MESSAGE.set_name('SQLGL', 'GL_US_CI_JOURNAL_POSTING_FAIL');
1404: FND_MESSAGE.set_token('RID', l_reqPost_id);
1405: log_message('==>' || FND_MESSAGE.get, TRUE);
1406: global_errbuf := global_errbuf || ' ' || FND_MESSAGE.get;
1407: global_retcode := 1;
1408: raise GLOBAL_ERROR;
1409: end if; --+end of if wait for journal post is successful
1410: else --+For some reason, Journal Posting request id is zero

Line 1411: FND_MESSAGE.set_name('SQLGL', 'GL_US_CI_JOURNAL_POSTING_FAIL');

1407: global_retcode := 1;
1408: raise GLOBAL_ERROR;
1409: end if; --+end of if wait for journal post is successful
1410: else --+For some reason, Journal Posting request id is zero
1411: FND_MESSAGE.set_name('SQLGL', 'GL_US_CI_JOURNAL_POSTING_FAIL');
1412: FND_MESSAGE.set_token('RID', l_reqPost_id);
1413: log_message('==>' || FND_MESSAGE.get, TRUE);
1414: global_errbuf := global_errbuf || ' ' || FND_MESSAGE.get;
1415: global_retcode := 1;

Line 1412: FND_MESSAGE.set_token('RID', l_reqPost_id);

1408: raise GLOBAL_ERROR;
1409: end if; --+end of if wait for journal post is successful
1410: else --+For some reason, Journal Posting request id is zero
1411: FND_MESSAGE.set_name('SQLGL', 'GL_US_CI_JOURNAL_POSTING_FAIL');
1412: FND_MESSAGE.set_token('RID', l_reqPost_id);
1413: log_message('==>' || FND_MESSAGE.get, TRUE);
1414: global_errbuf := global_errbuf || ' ' || FND_MESSAGE.get;
1415: global_retcode := 1;
1416: raise GLOBAL_ERROR;

Line 1413: log_message('==>' || FND_MESSAGE.get, TRUE);

1409: end if; --+end of if wait for journal post is successful
1410: else --+For some reason, Journal Posting request id is zero
1411: FND_MESSAGE.set_name('SQLGL', 'GL_US_CI_JOURNAL_POSTING_FAIL');
1412: FND_MESSAGE.set_token('RID', l_reqPost_id);
1413: log_message('==>' || FND_MESSAGE.get, TRUE);
1414: global_errbuf := global_errbuf || ' ' || FND_MESSAGE.get;
1415: global_retcode := 1;
1416: raise GLOBAL_ERROR;
1417: end if; --+ end of if Journal is Posted

Line 1414: global_errbuf := global_errbuf || ' ' || FND_MESSAGE.get;

1410: else --+For some reason, Journal Posting request id is zero
1411: FND_MESSAGE.set_name('SQLGL', 'GL_US_CI_JOURNAL_POSTING_FAIL');
1412: FND_MESSAGE.set_token('RID', l_reqPost_id);
1413: log_message('==>' || FND_MESSAGE.get, TRUE);
1414: global_errbuf := global_errbuf || ' ' || FND_MESSAGE.get;
1415: global_retcode := 1;
1416: raise GLOBAL_ERROR;
1417: end if; --+ end of if Journal is Posted
1418: END LOOP;

Line 1429: FND_MESSAGE.set_name('SQLGL', 'GL_US_CI_EMAIL_USER');

1425: --+bug#2750898, add more user friendly error message when
1426: --+user email address is not set
1427: if (l_return_code = EMAIL_CONTACT_NOT_SET) OR
1428: (l_return_code = CONTACT_INFO_NOT_FOUND) then
1429: FND_MESSAGE.set_name('SQLGL', 'GL_US_CI_EMAIL_USER');
1430: log_message('==>' || FND_MESSAGE.get, TRUE);
1431: end if;
1432: ELSE --+do not post, so send email at this point
1433: Compose_Import_message(l_reqJI_id, dblink,l_import_message_body);

Line 1430: log_message('==>' || FND_MESSAGE.get, TRUE);

1426: --+user email address is not set
1427: if (l_return_code = EMAIL_CONTACT_NOT_SET) OR
1428: (l_return_code = CONTACT_INFO_NOT_FOUND) then
1429: FND_MESSAGE.set_name('SQLGL', 'GL_US_CI_EMAIL_USER');
1430: log_message('==>' || FND_MESSAGE.get, TRUE);
1431: end if;
1432: ELSE --+do not post, so send email at this point
1433: Compose_Import_message(l_reqJI_id, dblink,l_import_message_body);
1434: gl_ci_workflow_pkg.send_cit_wf_ntf(

Line 1458: FND_MESSAGE.set_name('SQLGL', 'GL_US_CI_EMAIL_USER');

1454: --+bug#2750898, add more user friendly error message when
1455: --+user email address is not set
1456: if (l_return_code = EMAIL_CONTACT_NOT_SET) OR
1457: (l_return_code = CONTACT_INFO_NOT_FOUND) then
1458: FND_MESSAGE.set_name('SQLGL', 'GL_US_CI_EMAIL_USER');
1459: log_message('==>' || FND_MESSAGE.get, TRUE);
1460: end if;
1461: end if; --+end of if Journal Post flag is on
1462: else --+JI not verified

Line 1459: log_message('==>' || FND_MESSAGE.get, TRUE);

1455: --+user email address is not set
1456: if (l_return_code = EMAIL_CONTACT_NOT_SET) OR
1457: (l_return_code = CONTACT_INFO_NOT_FOUND) then
1458: FND_MESSAGE.set_name('SQLGL', 'GL_US_CI_EMAIL_USER');
1459: log_message('==>' || FND_MESSAGE.get, TRUE);
1460: end if;
1461: end if; --+end of if Journal Post flag is on
1462: else --+JI not verified
1463: FND_MESSAGE.set_name('SQLGL', 'GL_US_CI_JOURNAL_IMPORT_FAIL');

Line 1463: FND_MESSAGE.set_name('SQLGL', 'GL_US_CI_JOURNAL_IMPORT_FAIL');

1459: log_message('==>' || FND_MESSAGE.get, TRUE);
1460: end if;
1461: end if; --+end of if Journal Post flag is on
1462: else --+JI not verified
1463: FND_MESSAGE.set_name('SQLGL', 'GL_US_CI_JOURNAL_IMPORT_FAIL');
1464: FND_MESSAGE.set_token('RID', l_reqJI_id);
1465: log_message('==>' || FND_MESSAGE.get, TRUE);
1466: global_errbuf := global_errbuf || ' ' || FND_MESSAGE.get;
1467: global_retcode := 2;

Line 1464: FND_MESSAGE.set_token('RID', l_reqJI_id);

1460: end if;
1461: end if; --+end of if Journal Post flag is on
1462: else --+JI not verified
1463: FND_MESSAGE.set_name('SQLGL', 'GL_US_CI_JOURNAL_IMPORT_FAIL');
1464: FND_MESSAGE.set_token('RID', l_reqJI_id);
1465: log_message('==>' || FND_MESSAGE.get, TRUE);
1466: global_errbuf := global_errbuf || ' ' || FND_MESSAGE.get;
1467: global_retcode := 2;
1468: raise GLOBAL_ERROR;

Line 1465: log_message('==>' || FND_MESSAGE.get, TRUE);

1461: end if; --+end of if Journal Post flag is on
1462: else --+JI not verified
1463: FND_MESSAGE.set_name('SQLGL', 'GL_US_CI_JOURNAL_IMPORT_FAIL');
1464: FND_MESSAGE.set_token('RID', l_reqJI_id);
1465: log_message('==>' || FND_MESSAGE.get, TRUE);
1466: global_errbuf := global_errbuf || ' ' || FND_MESSAGE.get;
1467: global_retcode := 2;
1468: raise GLOBAL_ERROR;
1469: end if; --+end of if Journal Import is verified

Line 1466: global_errbuf := global_errbuf || ' ' || FND_MESSAGE.get;

1462: else --+JI not verified
1463: FND_MESSAGE.set_name('SQLGL', 'GL_US_CI_JOURNAL_IMPORT_FAIL');
1464: FND_MESSAGE.set_token('RID', l_reqJI_id);
1465: log_message('==>' || FND_MESSAGE.get, TRUE);
1466: global_errbuf := global_errbuf || ' ' || FND_MESSAGE.get;
1467: global_retcode := 2;
1468: raise GLOBAL_ERROR;
1469: end if; --+end of if Journal Import is verified
1470: else --+ JI status is COMPLETE:FAIL

Line 1472: FND_MESSAGE.set_name('SQLGL', 'GL_US_CI_JOURNAL_IMPORT_FAIL');

1468: raise GLOBAL_ERROR;
1469: end if; --+end of if Journal Import is verified
1470: else --+ JI status is COMPLETE:FAIL
1471: if (l_balanced_flag = 'Y') then
1472: FND_MESSAGE.set_name('SQLGL', 'GL_US_CI_JOURNAL_IMPORT_FAIL');
1473: FND_MESSAGE.set_token('RID', l_reqJI_id);
1474: log_message('==>' || FND_MESSAGE.get, TRUE);
1475: global_errbuf := global_errbuf || ' ' || FND_MESSAGE.get;
1476: global_retcode := 1;

Line 1473: FND_MESSAGE.set_token('RID', l_reqJI_id);

1469: end if; --+end of if Journal Import is verified
1470: else --+ JI status is COMPLETE:FAIL
1471: if (l_balanced_flag = 'Y') then
1472: FND_MESSAGE.set_name('SQLGL', 'GL_US_CI_JOURNAL_IMPORT_FAIL');
1473: FND_MESSAGE.set_token('RID', l_reqJI_id);
1474: log_message('==>' || FND_MESSAGE.get, TRUE);
1475: global_errbuf := global_errbuf || ' ' || FND_MESSAGE.get;
1476: global_retcode := 1;
1477: raise GLOBAL_ERROR;

Line 1474: log_message('==>' || FND_MESSAGE.get, TRUE);

1470: else --+ JI status is COMPLETE:FAIL
1471: if (l_balanced_flag = 'Y') then
1472: FND_MESSAGE.set_name('SQLGL', 'GL_US_CI_JOURNAL_IMPORT_FAIL');
1473: FND_MESSAGE.set_token('RID', l_reqJI_id);
1474: log_message('==>' || FND_MESSAGE.get, TRUE);
1475: global_errbuf := global_errbuf || ' ' || FND_MESSAGE.get;
1476: global_retcode := 1;
1477: raise GLOBAL_ERROR;
1478: else

Line 1475: global_errbuf := global_errbuf || ' ' || FND_MESSAGE.get;

1471: if (l_balanced_flag = 'Y') then
1472: FND_MESSAGE.set_name('SQLGL', 'GL_US_CI_JOURNAL_IMPORT_FAIL');
1473: FND_MESSAGE.set_token('RID', l_reqJI_id);
1474: log_message('==>' || FND_MESSAGE.get, TRUE);
1475: global_errbuf := global_errbuf || ' ' || FND_MESSAGE.get;
1476: global_retcode := 1;
1477: raise GLOBAL_ERROR;
1478: else
1479: FND_MESSAGE.set_name('SQLGL', 'GL_US_CI_JOURNAL_IMPORT_FAIL');

Line 1479: FND_MESSAGE.set_name('SQLGL', 'GL_US_CI_JOURNAL_IMPORT_FAIL');

1475: global_errbuf := global_errbuf || ' ' || FND_MESSAGE.get;
1476: global_retcode := 1;
1477: raise GLOBAL_ERROR;
1478: else
1479: FND_MESSAGE.set_name('SQLGL', 'GL_US_CI_JOURNAL_IMPORT_FAIL');
1480: FND_MESSAGE.set_token('RID', l_reqJI_id);
1481: log_message('==>' || FND_MESSAGE.get, TRUE);
1482: global_errbuf := global_errbuf || ' ' || FND_MESSAGE.get;
1483: if (l_suspense_flag = 'N') then

Line 1480: FND_MESSAGE.set_token('RID', l_reqJI_id);

1476: global_retcode := 1;
1477: raise GLOBAL_ERROR;
1478: else
1479: FND_MESSAGE.set_name('SQLGL', 'GL_US_CI_JOURNAL_IMPORT_FAIL');
1480: FND_MESSAGE.set_token('RID', l_reqJI_id);
1481: log_message('==>' || FND_MESSAGE.get, TRUE);
1482: global_errbuf := global_errbuf || ' ' || FND_MESSAGE.get;
1483: if (l_suspense_flag = 'N') then
1484: FND_MESSAGE.set_name('SQLGL', 'GL_US_CI_IMBALANCED_NOSUS');

Line 1481: log_message('==>' || FND_MESSAGE.get, TRUE);

1477: raise GLOBAL_ERROR;
1478: else
1479: FND_MESSAGE.set_name('SQLGL', 'GL_US_CI_JOURNAL_IMPORT_FAIL');
1480: FND_MESSAGE.set_token('RID', l_reqJI_id);
1481: log_message('==>' || FND_MESSAGE.get, TRUE);
1482: global_errbuf := global_errbuf || ' ' || FND_MESSAGE.get;
1483: if (l_suspense_flag = 'N') then
1484: FND_MESSAGE.set_name('SQLGL', 'GL_US_CI_IMBALANCED_NOSUS');
1485: FND_MESSAGE.set_token('RID', l_reqji_id);

Line 1482: global_errbuf := global_errbuf || ' ' || FND_MESSAGE.get;

1478: else
1479: FND_MESSAGE.set_name('SQLGL', 'GL_US_CI_JOURNAL_IMPORT_FAIL');
1480: FND_MESSAGE.set_token('RID', l_reqJI_id);
1481: log_message('==>' || FND_MESSAGE.get, TRUE);
1482: global_errbuf := global_errbuf || ' ' || FND_MESSAGE.get;
1483: if (l_suspense_flag = 'N') then
1484: FND_MESSAGE.set_name('SQLGL', 'GL_US_CI_IMBALANCED_NOSUS');
1485: FND_MESSAGE.set_token('RID', l_reqji_id);
1486: log_message('==>' || FND_MESSAGE.get, TRUE);

Line 1484: FND_MESSAGE.set_name('SQLGL', 'GL_US_CI_IMBALANCED_NOSUS');

1480: FND_MESSAGE.set_token('RID', l_reqJI_id);
1481: log_message('==>' || FND_MESSAGE.get, TRUE);
1482: global_errbuf := global_errbuf || ' ' || FND_MESSAGE.get;
1483: if (l_suspense_flag = 'N') then
1484: FND_MESSAGE.set_name('SQLGL', 'GL_US_CI_IMBALANCED_NOSUS');
1485: FND_MESSAGE.set_token('RID', l_reqji_id);
1486: log_message('==>' || FND_MESSAGE.get, TRUE);
1487: global_errbuf := global_errbuf || ' ' || FND_MESSAGE.get;
1488: global_retcode := 1;

Line 1485: FND_MESSAGE.set_token('RID', l_reqji_id);

1481: log_message('==>' || FND_MESSAGE.get, TRUE);
1482: global_errbuf := global_errbuf || ' ' || FND_MESSAGE.get;
1483: if (l_suspense_flag = 'N') then
1484: FND_MESSAGE.set_name('SQLGL', 'GL_US_CI_IMBALANCED_NOSUS');
1485: FND_MESSAGE.set_token('RID', l_reqji_id);
1486: log_message('==>' || FND_MESSAGE.get, TRUE);
1487: global_errbuf := global_errbuf || ' ' || FND_MESSAGE.get;
1488: global_retcode := 1;
1489: raise GLOBAL_ERROR;

Line 1486: log_message('==>' || FND_MESSAGE.get, TRUE);

1482: global_errbuf := global_errbuf || ' ' || FND_MESSAGE.get;
1483: if (l_suspense_flag = 'N') then
1484: FND_MESSAGE.set_name('SQLGL', 'GL_US_CI_IMBALANCED_NOSUS');
1485: FND_MESSAGE.set_token('RID', l_reqji_id);
1486: log_message('==>' || FND_MESSAGE.get, TRUE);
1487: global_errbuf := global_errbuf || ' ' || FND_MESSAGE.get;
1488: global_retcode := 1;
1489: raise GLOBAL_ERROR;
1490: else

Line 1487: global_errbuf := global_errbuf || ' ' || FND_MESSAGE.get;

1483: if (l_suspense_flag = 'N') then
1484: FND_MESSAGE.set_name('SQLGL', 'GL_US_CI_IMBALANCED_NOSUS');
1485: FND_MESSAGE.set_token('RID', l_reqji_id);
1486: log_message('==>' || FND_MESSAGE.get, TRUE);
1487: global_errbuf := global_errbuf || ' ' || FND_MESSAGE.get;
1488: global_retcode := 1;
1489: raise GLOBAL_ERROR;
1490: else
1491: FND_MESSAGE.set_name('SQLGL', 'GL_US_CI_IMBALANCED_OTHER');

Line 1491: FND_MESSAGE.set_name('SQLGL', 'GL_US_CI_IMBALANCED_OTHER');

1487: global_errbuf := global_errbuf || ' ' || FND_MESSAGE.get;
1488: global_retcode := 1;
1489: raise GLOBAL_ERROR;
1490: else
1491: FND_MESSAGE.set_name('SQLGL', 'GL_US_CI_IMBALANCED_OTHER');
1492: log_message('==>' || FND_MESSAGE.get, TRUE);
1493: global_errbuf := global_errbuf || ' ' || FND_MESSAGE.get;
1494: global_retcode := 1;
1495: raise GLOBAL_ERROR;

Line 1492: log_message('==>' || FND_MESSAGE.get, TRUE);

1488: global_retcode := 1;
1489: raise GLOBAL_ERROR;
1490: else
1491: FND_MESSAGE.set_name('SQLGL', 'GL_US_CI_IMBALANCED_OTHER');
1492: log_message('==>' || FND_MESSAGE.get, TRUE);
1493: global_errbuf := global_errbuf || ' ' || FND_MESSAGE.get;
1494: global_retcode := 1;
1495: raise GLOBAL_ERROR;
1496: end if;

Line 1493: global_errbuf := global_errbuf || ' ' || FND_MESSAGE.get;

1489: raise GLOBAL_ERROR;
1490: else
1491: FND_MESSAGE.set_name('SQLGL', 'GL_US_CI_IMBALANCED_OTHER');
1492: log_message('==>' || FND_MESSAGE.get, TRUE);
1493: global_errbuf := global_errbuf || ' ' || FND_MESSAGE.get;
1494: global_retcode := 1;
1495: raise GLOBAL_ERROR;
1496: end if;
1497: end if;

Line 1500: FND_MESSAGE.set_name('SQLGL', 'GL_US_CI_JOURNAL_IMPORT_FAIL');

1496: end if;
1497: end if;
1498: end if; --+end of if wait for journal import is successful
1499: else --+JI request id is zero, for some reason, the concurrent request failed
1500: FND_MESSAGE.set_name('SQLGL', 'GL_US_CI_JOURNAL_IMPORT_FAIL');
1501: FND_MESSAGE.set_token('RID', l_reqJI_id);
1502: log_message('==>' || FND_MESSAGE.get, TRUE);
1503: global_errbuf := global_errbuf || ' ' || FND_MESSAGE.get;
1504: global_retcode := 1;

Line 1501: FND_MESSAGE.set_token('RID', l_reqJI_id);

1497: end if;
1498: end if; --+end of if wait for journal import is successful
1499: else --+JI request id is zero, for some reason, the concurrent request failed
1500: FND_MESSAGE.set_name('SQLGL', 'GL_US_CI_JOURNAL_IMPORT_FAIL');
1501: FND_MESSAGE.set_token('RID', l_reqJI_id);
1502: log_message('==>' || FND_MESSAGE.get, TRUE);
1503: global_errbuf := global_errbuf || ' ' || FND_MESSAGE.get;
1504: global_retcode := 1;
1505: raise GLOBAL_ERROR;

Line 1502: log_message('==>' || FND_MESSAGE.get, TRUE);

1498: end if; --+end of if wait for journal import is successful
1499: else --+JI request id is zero, for some reason, the concurrent request failed
1500: FND_MESSAGE.set_name('SQLGL', 'GL_US_CI_JOURNAL_IMPORT_FAIL');
1501: FND_MESSAGE.set_token('RID', l_reqJI_id);
1502: log_message('==>' || FND_MESSAGE.get, TRUE);
1503: global_errbuf := global_errbuf || ' ' || FND_MESSAGE.get;
1504: global_retcode := 1;
1505: raise GLOBAL_ERROR;
1506: end if; --+end of if journal is imported

Line 1503: global_errbuf := global_errbuf || ' ' || FND_MESSAGE.get;

1499: else --+JI request id is zero, for some reason, the concurrent request failed
1500: FND_MESSAGE.set_name('SQLGL', 'GL_US_CI_JOURNAL_IMPORT_FAIL');
1501: FND_MESSAGE.set_token('RID', l_reqJI_id);
1502: log_message('==>' || FND_MESSAGE.get, TRUE);
1503: global_errbuf := global_errbuf || ' ' || FND_MESSAGE.get;
1504: global_retcode := 1;
1505: raise GLOBAL_ERROR;
1506: end if; --+end of if journal is imported
1507: ELSE --+data transfer only

Line 1533: FND_MESSAGE.set_name('SQLGL', 'GL_US_CI_EMAIL_USER');

1529: --+bug#2750898, add more user friendly error message when
1530: --+user email address is not set
1531: if (l_return_code = EMAIL_CONTACT_NOT_SET) OR
1532: (l_return_code = CONTACT_INFO_NOT_FOUND) then
1533: FND_MESSAGE.set_name('SQLGL', 'GL_US_CI_EMAIL_USER');
1534: log_message('==>' || FND_MESSAGE.get, TRUE);
1535: end if;
1536: end if; --+end of if journal import flag is on
1537: exception

Line 1534: log_message('==>' || FND_MESSAGE.get, TRUE);

1530: --+user email address is not set
1531: if (l_return_code = EMAIL_CONTACT_NOT_SET) OR
1532: (l_return_code = CONTACT_INFO_NOT_FOUND) then
1533: FND_MESSAGE.set_name('SQLGL', 'GL_US_CI_EMAIL_USER');
1534: log_message('==>' || FND_MESSAGE.get, TRUE);
1535: end if;
1536: end if; --+end of if journal import flag is on
1537: exception
1538: when GLOBAL_ERROR then

Line 1546: FND_MESSAGE.set_name('SQLGL', 'gl_us_ci_others_fail');

1542: when OTHERS then
1543: rollback;
1544: retcode := global_retcode;
1545: errbuf := SUBSTR(SQLERRM,1,255);
1546: FND_MESSAGE.set_name('SQLGL', 'gl_us_ci_others_fail');
1547: FND_MESSAGE.set_token('RESULT', errbuf);
1548: log_message('==>' || FND_MESSAGE.get, TRUE);
1549: END Run_CI_transfer;
1550:

Line 1547: FND_MESSAGE.set_token('RESULT', errbuf);

1543: rollback;
1544: retcode := global_retcode;
1545: errbuf := SUBSTR(SQLERRM,1,255);
1546: FND_MESSAGE.set_name('SQLGL', 'gl_us_ci_others_fail');
1547: FND_MESSAGE.set_token('RESULT', errbuf);
1548: log_message('==>' || FND_MESSAGE.get, TRUE);
1549: END Run_CI_transfer;
1550:
1551: procedure initialize_over_dblink(

Line 1548: log_message('==>' || FND_MESSAGE.get, TRUE);

1544: retcode := global_retcode;
1545: errbuf := SUBSTR(SQLERRM,1,255);
1546: FND_MESSAGE.set_name('SQLGL', 'gl_us_ci_others_fail');
1547: FND_MESSAGE.set_token('RESULT', errbuf);
1548: log_message('==>' || FND_MESSAGE.get, TRUE);
1549: END Run_CI_transfer;
1550:
1551: procedure initialize_over_dblink(
1552: user_id IN NUMBER,