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 196: FND_MESSAGE.set_name('SQLGL', 'gl_us_ci_others_fail');

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

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

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

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

379: l_in_table_name := i_parallel_name || group_id;
380: v_SQL := 'BEGIN '||' :l_group_id := ' || applSysSchema ||'.GL_CI_REMOTE_INVOKE_PKG.Get_Group_ID@' || dblink||';'||' END;';
381: EXECUTE IMMEDIATE v_SQL USING OUT l_group_id;
382: COMMIT;
383: FND_MESSAGE.set_name('SQLGL', 'GL_US_CI_GROUP_ID');
384: FND_MESSAGE.set_token('GROUP', l_group_id);
385: log_message('==>' || FND_MESSAGE.get, TRUE);
386: v_SQL := 'select apps_username ' ||
387: 'from rg_database_links ' ||

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

380: v_SQL := 'BEGIN '||' :l_group_id := ' || applSysSchema ||'.GL_CI_REMOTE_INVOKE_PKG.Get_Group_ID@' || dblink||';'||' END;';
381: EXECUTE IMMEDIATE v_SQL USING OUT l_group_id;
382: COMMIT;
383: FND_MESSAGE.set_name('SQLGL', 'GL_US_CI_GROUP_ID');
384: FND_MESSAGE.set_token('GROUP', l_group_id);
385: log_message('==>' || FND_MESSAGE.get, TRUE);
386: v_SQL := 'select apps_username ' ||
387: 'from rg_database_links ' ||
388: 'where name = :pd';

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

381: EXECUTE IMMEDIATE v_SQL USING OUT l_group_id;
382: COMMIT;
383: FND_MESSAGE.set_name('SQLGL', 'GL_US_CI_GROUP_ID');
384: FND_MESSAGE.set_token('GROUP', l_group_id);
385: log_message('==>' || FND_MESSAGE.get, TRUE);
386: v_SQL := 'select apps_username ' ||
387: 'from rg_database_links ' ||
388: 'where name = :pd';
389: EXECUTE IMMEDIATE v_SQL INTO l_db_username USING p_dblink;

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

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

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

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

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

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

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

947: exception
948: WHEN OTHERS THEN
949: rollback;
950: result := SUBSTR(SQLERRM, 1, 200);
951: FND_MESSAGE.set_name('SQLGL', 'gl_us_ci_others_fail');
952: FND_MESSAGE.set_token('RESULT', result);
953: app_exception.raise_exception;
954: return result;
955: END Remote_Data_Validation;

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

948: WHEN OTHERS THEN
949: rollback;
950: result := SUBSTR(SQLERRM, 1, 200);
951: FND_MESSAGE.set_name('SQLGL', 'gl_us_ci_others_fail');
952: FND_MESSAGE.set_token('RESULT', result);
953: app_exception.raise_exception;
954: return result;
955: END Remote_Data_Validation;
956: --+++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++

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

1114: --+ledger_id = -1, when no default ledger can be found for this data access set
1115: l_to_ledger_id := Get_Ledger_id(l_user_id, l_resp_id,
1116: l_app_id, p_dblink, l_access_set_id, l_access_set_name, l_access_code);
1117: if l_to_ledger_id = -1 then
1118: FND_MESSAGE.set_name('SQLGL', 'GL_US_CI_NO_DEFAULT_LEDGER');
1119: FND_MESSAGE.set_token('ACCESS_SET', l_access_set_name);
1120: log_message('==>' || FND_MESSAGE.get, TRUE);
1121: global_retcode := 1;
1122: raise GLOBAL_ERROR;

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

1115: l_to_ledger_id := Get_Ledger_id(l_user_id, l_resp_id,
1116: l_app_id, p_dblink, l_access_set_id, l_access_set_name, l_access_code);
1117: if l_to_ledger_id = -1 then
1118: FND_MESSAGE.set_name('SQLGL', 'GL_US_CI_NO_DEFAULT_LEDGER');
1119: FND_MESSAGE.set_token('ACCESS_SET', l_access_set_name);
1120: log_message('==>' || FND_MESSAGE.get, TRUE);
1121: global_retcode := 1;
1122: raise GLOBAL_ERROR;
1123: end if;

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

1116: l_app_id, p_dblink, l_access_set_id, l_access_set_name, l_access_code);
1117: if l_to_ledger_id = -1 then
1118: FND_MESSAGE.set_name('SQLGL', 'GL_US_CI_NO_DEFAULT_LEDGER');
1119: FND_MESSAGE.set_token('ACCESS_SET', l_access_set_name);
1120: log_message('==>' || FND_MESSAGE.get, TRUE);
1121: global_retcode := 1;
1122: raise GLOBAL_ERROR;
1123: end if;
1124: if l_to_ledger_id >= 0 then

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

1129: debug_message('Target ledger id is ' || l_to_ledger_id,TRUE);
1130: debug_message('Target ledger name is ' || l_target_ledger_name,TRUE);
1131: end if;
1132: if l_access_code <> 'B' then
1133: FND_MESSAGE.set_name('SQLGL', 'GL_US_CI_NO_ACCESS_RIGHTS');
1134: FND_MESSAGE.set_token('LEDGER_NAME', l_target_ledger_name);
1135: log_message('==>' || FND_MESSAGE.get, TRUE);
1136: global_retcode := 1;
1137: raise GLOBAL_ERROR;

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

1130: debug_message('Target ledger name is ' || l_target_ledger_name,TRUE);
1131: end if;
1132: if l_access_code <> 'B' then
1133: FND_MESSAGE.set_name('SQLGL', 'GL_US_CI_NO_ACCESS_RIGHTS');
1134: FND_MESSAGE.set_token('LEDGER_NAME', l_target_ledger_name);
1135: log_message('==>' || FND_MESSAGE.get, TRUE);
1136: global_retcode := 1;
1137: raise GLOBAL_ERROR;
1138: end if;

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

1131: end if;
1132: if l_access_code <> 'B' then
1133: FND_MESSAGE.set_name('SQLGL', 'GL_US_CI_NO_ACCESS_RIGHTS');
1134: FND_MESSAGE.set_token('LEDGER_NAME', l_target_ledger_name);
1135: log_message('==>' || FND_MESSAGE.get, TRUE);
1136: global_retcode := 1;
1137: raise GLOBAL_ERROR;
1138: end if;
1139: end if;

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

1140: --+check if the suspense posting is allowed for this ledger on the target instance
1141: v_SQL1 := 'BEGIN '||' :a := ' || applSysSchema || '.GL_CI_REMOTE_INVOKE_PKG.Get_Suspense_Flag@' || dblink
1142: || '(:ledger_id)' ||';'||' END;';
1143: EXECUTE IMMEDIATE v_SQL1 USING OUT l_suspense_flag, IN l_to_ledger_id;
1144: FND_MESSAGE.set_name('SQLGL', 'GL_US_CI_ENTER_CI');
1145: log_message('==>' || FND_MESSAGE.get, TRUE);
1146: errbuf := FND_MESSAGE.get;
1147: global_errbuf := FND_MESSAGE.get;
1148: --+Add l_balanced_flag to check if total debits equal to total credits. if not, output warning message

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

1141: v_SQL1 := 'BEGIN '||' :a := ' || applSysSchema || '.GL_CI_REMOTE_INVOKE_PKG.Get_Suspense_Flag@' || dblink
1142: || '(:ledger_id)' ||';'||' END;';
1143: EXECUTE IMMEDIATE v_SQL1 USING OUT l_suspense_flag, IN l_to_ledger_id;
1144: FND_MESSAGE.set_name('SQLGL', 'GL_US_CI_ENTER_CI');
1145: log_message('==>' || FND_MESSAGE.get, TRUE);
1146: errbuf := FND_MESSAGE.get;
1147: global_errbuf := FND_MESSAGE.get;
1148: --+Add l_balanced_flag to check if total debits equal to total credits. if not, output warning message
1149: --+to log file.

Line 1146: errbuf := FND_MESSAGE.get;

1142: || '(:ledger_id)' ||';'||' END;';
1143: EXECUTE IMMEDIATE v_SQL1 USING OUT l_suspense_flag, IN l_to_ledger_id;
1144: FND_MESSAGE.set_name('SQLGL', 'GL_US_CI_ENTER_CI');
1145: log_message('==>' || FND_MESSAGE.get, TRUE);
1146: errbuf := FND_MESSAGE.get;
1147: global_errbuf := FND_MESSAGE.get;
1148: --+Add l_balanced_flag to check if total debits equal to total credits. if not, output warning message
1149: --+to log file.
1150: l_to_group_id := Remote_Data_transfer(p_actual_flag,l_user_id, l_resp_id, l_app_id,

Line 1147: global_errbuf := FND_MESSAGE.get;

1143: EXECUTE IMMEDIATE v_SQL1 USING OUT l_suspense_flag, IN l_to_ledger_id;
1144: FND_MESSAGE.set_name('SQLGL', 'GL_US_CI_ENTER_CI');
1145: log_message('==>' || FND_MESSAGE.get, TRUE);
1146: errbuf := FND_MESSAGE.get;
1147: global_errbuf := FND_MESSAGE.get;
1148: --+Add l_balanced_flag to check if total debits equal to total credits. if not, output warning message
1149: --+to log file.
1150: l_to_group_id := Remote_Data_transfer(p_actual_flag,l_user_id, l_resp_id, l_app_id,
1151: dblink, from_ledger_id,l_pd_name, p_budget_name, from_group_id,

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

1152: p_request_id, p_dblink, l_to_ledger_id,
1153: l_avg_flag, l_balanced_flag, global_errbuf);
1154: --bug fix#3095741, return a meaningful error message when budget name is no found in the target db
1155: if (l_to_group_id = -1) and (global_errbuf = 'FAILED') then
1156: FND_MESSAGE.set_name('SQLGL', 'GL_US_CI_NO_BUDGET');
1157: log_message('==>' || FND_MESSAGE.get, TRUE);
1158: global_errbuf := FND_MESSAGE.get;
1159: global_retcode := 2;
1160: raise GLOBAL_ERROR;

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

1153: l_avg_flag, l_balanced_flag, global_errbuf);
1154: --bug fix#3095741, return a meaningful error message when budget name is no found in the target db
1155: if (l_to_group_id = -1) and (global_errbuf = 'FAILED') then
1156: FND_MESSAGE.set_name('SQLGL', 'GL_US_CI_NO_BUDGET');
1157: log_message('==>' || FND_MESSAGE.get, TRUE);
1158: global_errbuf := FND_MESSAGE.get;
1159: global_retcode := 2;
1160: raise GLOBAL_ERROR;
1161: end if;

Line 1158: global_errbuf := FND_MESSAGE.get;

1154: --bug fix#3095741, return a meaningful error message when budget name is no found in the target db
1155: if (l_to_group_id = -1) and (global_errbuf = 'FAILED') then
1156: FND_MESSAGE.set_name('SQLGL', 'GL_US_CI_NO_BUDGET');
1157: log_message('==>' || FND_MESSAGE.get, TRUE);
1158: global_errbuf := FND_MESSAGE.get;
1159: global_retcode := 2;
1160: raise GLOBAL_ERROR;
1161: end if;
1162: if (l_to_group_id = -1) and (global_errbuf = 'NO_DATA_FOUND') then

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

1159: global_retcode := 2;
1160: raise GLOBAL_ERROR;
1161: end if;
1162: if (l_to_group_id = -1) and (global_errbuf = 'NO_DATA_FOUND') then
1163: FND_MESSAGE.set_name('SQLGL', 'GL_US_CI_NO_DATA_FOUND');
1164: log_message('==>' || FND_MESSAGE.get, TRUE);
1165: global_errbuf := FND_MESSAGE.get;
1166: global_retcode := 1;
1167: raise GLOBAL_ERROR;

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

1160: raise GLOBAL_ERROR;
1161: end if;
1162: if (l_to_group_id = -1) and (global_errbuf = 'NO_DATA_FOUND') then
1163: FND_MESSAGE.set_name('SQLGL', 'GL_US_CI_NO_DATA_FOUND');
1164: log_message('==>' || FND_MESSAGE.get, TRUE);
1165: global_errbuf := FND_MESSAGE.get;
1166: global_retcode := 1;
1167: raise GLOBAL_ERROR;
1168: end if;

Line 1165: global_errbuf := FND_MESSAGE.get;

1161: end if;
1162: if (l_to_group_id = -1) and (global_errbuf = 'NO_DATA_FOUND') then
1163: FND_MESSAGE.set_name('SQLGL', 'GL_US_CI_NO_DATA_FOUND');
1164: log_message('==>' || FND_MESSAGE.get, TRUE);
1165: global_errbuf := FND_MESSAGE.get;
1166: global_retcode := 1;
1167: raise GLOBAL_ERROR;
1168: end if;
1169: if l_to_group_id < 0 then

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

1166: global_retcode := 1;
1167: raise GLOBAL_ERROR;
1168: end if;
1169: if l_to_group_id < 0 then
1170: FND_MESSAGE.set_name('SQLGL', 'GL_US_CI_TRANSFER_FAIL');
1171: log_message('==>' || FND_MESSAGE.get, TRUE);
1172: global_errbuf := global_errbuf || ' ' || FND_MESSAGE.get;
1173: if l_debug = 'Y' then
1174: debug_message('Invalid Target group ID in section number ' || section_number,TRUE);

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

1167: raise GLOBAL_ERROR;
1168: end if;
1169: if l_to_group_id < 0 then
1170: FND_MESSAGE.set_name('SQLGL', 'GL_US_CI_TRANSFER_FAIL');
1171: log_message('==>' || FND_MESSAGE.get, TRUE);
1172: global_errbuf := global_errbuf || ' ' || FND_MESSAGE.get;
1173: if l_debug = 'Y' then
1174: debug_message('Invalid Target group ID in section number ' || section_number,TRUE);
1175: end if;

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

1168: end if;
1169: if l_to_group_id < 0 then
1170: FND_MESSAGE.set_name('SQLGL', 'GL_US_CI_TRANSFER_FAIL');
1171: log_message('==>' || FND_MESSAGE.get, TRUE);
1172: global_errbuf := global_errbuf || ' ' || FND_MESSAGE.get;
1173: if l_debug = 'Y' then
1174: debug_message('Invalid Target group ID in section number ' || section_number,TRUE);
1175: end if;
1176: global_retcode := 1;

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

1176: global_retcode := 1;
1177: raise GLOBAL_ERROR;
1178: else
1179: if (l_balanced_flag = 'Y') then
1180: FND_MESSAGE.set_name('SQLGL', 'GL_US_CI_TRANSFER_OK');
1181: FND_MESSAGE.set_token('GROUP_ID', l_to_group_id);
1182: log_message('==>' || FND_MESSAGE.get, TRUE);
1183: errbuf := errbuf || ' ' || FND_MESSAGE.get;
1184: else

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

1177: raise GLOBAL_ERROR;
1178: else
1179: if (l_balanced_flag = 'Y') then
1180: FND_MESSAGE.set_name('SQLGL', 'GL_US_CI_TRANSFER_OK');
1181: FND_MESSAGE.set_token('GROUP_ID', l_to_group_id);
1182: log_message('==>' || FND_MESSAGE.get, TRUE);
1183: errbuf := errbuf || ' ' || FND_MESSAGE.get;
1184: else
1185: FND_MESSAGE.set_name('SQLGL', 'GL_US_CI_TRANSFER_OK');

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

1178: else
1179: if (l_balanced_flag = 'Y') then
1180: FND_MESSAGE.set_name('SQLGL', 'GL_US_CI_TRANSFER_OK');
1181: FND_MESSAGE.set_token('GROUP_ID', l_to_group_id);
1182: log_message('==>' || FND_MESSAGE.get, TRUE);
1183: errbuf := errbuf || ' ' || FND_MESSAGE.get;
1184: else
1185: FND_MESSAGE.set_name('SQLGL', 'GL_US_CI_TRANSFER_OK');
1186: FND_MESSAGE.set_token('GROUP_ID', l_to_group_id);

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

1179: if (l_balanced_flag = 'Y') then
1180: FND_MESSAGE.set_name('SQLGL', 'GL_US_CI_TRANSFER_OK');
1181: FND_MESSAGE.set_token('GROUP_ID', l_to_group_id);
1182: log_message('==>' || FND_MESSAGE.get, TRUE);
1183: errbuf := errbuf || ' ' || FND_MESSAGE.get;
1184: else
1185: FND_MESSAGE.set_name('SQLGL', 'GL_US_CI_TRANSFER_OK');
1186: FND_MESSAGE.set_token('GROUP_ID', l_to_group_id);
1187: log_message('==>' || FND_MESSAGE.get, TRUE);

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

1181: FND_MESSAGE.set_token('GROUP_ID', l_to_group_id);
1182: log_message('==>' || FND_MESSAGE.get, TRUE);
1183: errbuf := errbuf || ' ' || FND_MESSAGE.get;
1184: else
1185: FND_MESSAGE.set_name('SQLGL', 'GL_US_CI_TRANSFER_OK');
1186: FND_MESSAGE.set_token('GROUP_ID', l_to_group_id);
1187: log_message('==>' || FND_MESSAGE.get, TRUE);
1188: errbuf := errbuf || ' ' || FND_MESSAGE.get;
1189: FND_MESSAGE.set_name('SQLGL', 'GL_US_CI_IMBALANCED_OTHER');

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

1182: log_message('==>' || FND_MESSAGE.get, TRUE);
1183: errbuf := errbuf || ' ' || FND_MESSAGE.get;
1184: else
1185: FND_MESSAGE.set_name('SQLGL', 'GL_US_CI_TRANSFER_OK');
1186: FND_MESSAGE.set_token('GROUP_ID', l_to_group_id);
1187: log_message('==>' || FND_MESSAGE.get, TRUE);
1188: errbuf := errbuf || ' ' || FND_MESSAGE.get;
1189: FND_MESSAGE.set_name('SQLGL', 'GL_US_CI_IMBALANCED_OTHER');
1190: log_message('==>' || FND_MESSAGE.get, TRUE);

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

1183: errbuf := errbuf || ' ' || FND_MESSAGE.get;
1184: else
1185: FND_MESSAGE.set_name('SQLGL', 'GL_US_CI_TRANSFER_OK');
1186: FND_MESSAGE.set_token('GROUP_ID', l_to_group_id);
1187: log_message('==>' || FND_MESSAGE.get, TRUE);
1188: errbuf := errbuf || ' ' || FND_MESSAGE.get;
1189: FND_MESSAGE.set_name('SQLGL', 'GL_US_CI_IMBALANCED_OTHER');
1190: log_message('==>' || FND_MESSAGE.get, TRUE);
1191: errbuf := errbuf || ' ' || FND_MESSAGE.get;

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

1184: else
1185: FND_MESSAGE.set_name('SQLGL', 'GL_US_CI_TRANSFER_OK');
1186: FND_MESSAGE.set_token('GROUP_ID', l_to_group_id);
1187: log_message('==>' || FND_MESSAGE.get, TRUE);
1188: errbuf := errbuf || ' ' || FND_MESSAGE.get;
1189: FND_MESSAGE.set_name('SQLGL', 'GL_US_CI_IMBALANCED_OTHER');
1190: log_message('==>' || FND_MESSAGE.get, TRUE);
1191: errbuf := errbuf || ' ' || FND_MESSAGE.get;
1192: end if;

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

1185: FND_MESSAGE.set_name('SQLGL', 'GL_US_CI_TRANSFER_OK');
1186: FND_MESSAGE.set_token('GROUP_ID', l_to_group_id);
1187: log_message('==>' || FND_MESSAGE.get, TRUE);
1188: errbuf := errbuf || ' ' || FND_MESSAGE.get;
1189: FND_MESSAGE.set_name('SQLGL', 'GL_US_CI_IMBALANCED_OTHER');
1190: log_message('==>' || FND_MESSAGE.get, TRUE);
1191: errbuf := errbuf || ' ' || FND_MESSAGE.get;
1192: end if;
1193: IF (p_j_import = 'N') THEN

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

1186: FND_MESSAGE.set_token('GROUP_ID', l_to_group_id);
1187: log_message('==>' || FND_MESSAGE.get, TRUE);
1188: errbuf := errbuf || ' ' || FND_MESSAGE.get;
1189: FND_MESSAGE.set_name('SQLGL', 'GL_US_CI_IMBALANCED_OTHER');
1190: log_message('==>' || FND_MESSAGE.get, TRUE);
1191: errbuf := errbuf || ' ' || FND_MESSAGE.get;
1192: end if;
1193: IF (p_j_import = 'N') THEN
1194: --+populates the gl_interface_control table and gl_cons_interface_to_group_id table

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

1187: log_message('==>' || FND_MESSAGE.get, TRUE);
1188: errbuf := errbuf || ' ' || FND_MESSAGE.get;
1189: FND_MESSAGE.set_name('SQLGL', 'GL_US_CI_IMBALANCED_OTHER');
1190: log_message('==>' || FND_MESSAGE.get, TRUE);
1191: errbuf := errbuf || ' ' || FND_MESSAGE.get;
1192: end if;
1193: IF (p_j_import = 'N') THEN
1194: --+populates the gl_interface_control table and gl_cons_interface_to_group_id table
1195: --+add an average flag to indicate whether this is a adb balances transfer or not

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

1251: if l_debug = 'Y' then
1252: debug_message('The status after verifying journal import is ' || l_verify,TRUE);
1253: end if;
1254: if l_verify = 'SUCCESS' then
1255: FND_MESSAGE.set_name('SQLGL', 'GL_US_CI_JOURNAL_IMPORT_OK');
1256: FND_MESSAGE.set_token('RID', l_reqJI_id);
1257: log_message('==>' || FND_MESSAGE.get, TRUE);
1258: global_errbuf := FND_MESSAGE.get;
1259: errbuf := errbuf || ' ' || FND_MESSAGE.get;

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

1252: debug_message('The status after verifying journal import is ' || l_verify,TRUE);
1253: end if;
1254: if l_verify = 'SUCCESS' then
1255: FND_MESSAGE.set_name('SQLGL', 'GL_US_CI_JOURNAL_IMPORT_OK');
1256: FND_MESSAGE.set_token('RID', l_reqJI_id);
1257: log_message('==>' || FND_MESSAGE.get, TRUE);
1258: global_errbuf := FND_MESSAGE.get;
1259: errbuf := errbuf || ' ' || FND_MESSAGE.get;
1260: --+dbms_output.put_line('Journal Import is successful ' || l_reqJI_id || ' ' || l_to_group_id);

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

1253: end if;
1254: if l_verify = 'SUCCESS' then
1255: FND_MESSAGE.set_name('SQLGL', 'GL_US_CI_JOURNAL_IMPORT_OK');
1256: FND_MESSAGE.set_token('RID', l_reqJI_id);
1257: log_message('==>' || FND_MESSAGE.get, TRUE);
1258: global_errbuf := FND_MESSAGE.get;
1259: errbuf := errbuf || ' ' || FND_MESSAGE.get;
1260: --+dbms_output.put_line('Journal Import is successful ' || l_reqJI_id || ' ' || l_to_group_id);
1261: if (p_j_post = 'Y') then

Line 1258: global_errbuf := FND_MESSAGE.get;

1254: if l_verify = 'SUCCESS' then
1255: FND_MESSAGE.set_name('SQLGL', 'GL_US_CI_JOURNAL_IMPORT_OK');
1256: FND_MESSAGE.set_token('RID', l_reqJI_id);
1257: log_message('==>' || FND_MESSAGE.get, TRUE);
1258: global_errbuf := FND_MESSAGE.get;
1259: errbuf := errbuf || ' ' || FND_MESSAGE.get;
1260: --+dbms_output.put_line('Journal Import is successful ' || l_reqJI_id || ' ' || l_to_group_id);
1261: if (p_j_post = 'Y') then
1262: --+Journal Post

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

1255: FND_MESSAGE.set_name('SQLGL', 'GL_US_CI_JOURNAL_IMPORT_OK');
1256: FND_MESSAGE.set_token('RID', l_reqJI_id);
1257: log_message('==>' || FND_MESSAGE.get, TRUE);
1258: global_errbuf := FND_MESSAGE.get;
1259: errbuf := errbuf || ' ' || FND_MESSAGE.get;
1260: --+dbms_output.put_line('Journal Import is successful ' || l_reqJI_id || ' ' || l_to_group_id);
1261: if (p_j_post = 'Y') then
1262: --+Journal Post
1263: section_number := 3;

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

1317: if l_debug = 'Y' then
1318: debug_message('The status of Verify Journal Post is ' || l_verify,TRUE);
1319: end if;
1320: if l_verify = 'SUCCESS' then
1321: FND_MESSAGE.set_name('SQLGL', 'GL_US_CI_JOURNAL_POSTING_OK');
1322: FND_MESSAGE.set_token('RID', l_reqPost_id);
1323: log_message('==>' || FND_MESSAGE.get, TRUE);
1324: global_errbuf := FND_MESSAGE.get;
1325: errbuf := errbuf || ' ' || FND_MESSAGE.get;

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

1318: debug_message('The status of Verify Journal Post is ' || l_verify,TRUE);
1319: end if;
1320: if l_verify = 'SUCCESS' then
1321: FND_MESSAGE.set_name('SQLGL', 'GL_US_CI_JOURNAL_POSTING_OK');
1322: FND_MESSAGE.set_token('RID', l_reqPost_id);
1323: log_message('==>' || FND_MESSAGE.get, TRUE);
1324: global_errbuf := FND_MESSAGE.get;
1325: errbuf := errbuf || ' ' || FND_MESSAGE.get;
1326: --+ dbms_output.put_line('Journal Post is successful ' ||l_reqPost_id);

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

1319: end if;
1320: if l_verify = 'SUCCESS' then
1321: FND_MESSAGE.set_name('SQLGL', 'GL_US_CI_JOURNAL_POSTING_OK');
1322: FND_MESSAGE.set_token('RID', l_reqPost_id);
1323: log_message('==>' || FND_MESSAGE.get, TRUE);
1324: global_errbuf := FND_MESSAGE.get;
1325: errbuf := errbuf || ' ' || FND_MESSAGE.get;
1326: --+ dbms_output.put_line('Journal Post is successful ' ||l_reqPost_id);
1327: if l_first_one then

Line 1324: global_errbuf := FND_MESSAGE.get;

1320: if l_verify = 'SUCCESS' then
1321: FND_MESSAGE.set_name('SQLGL', 'GL_US_CI_JOURNAL_POSTING_OK');
1322: FND_MESSAGE.set_token('RID', l_reqPost_id);
1323: log_message('==>' || FND_MESSAGE.get, TRUE);
1324: global_errbuf := FND_MESSAGE.get;
1325: errbuf := errbuf || ' ' || FND_MESSAGE.get;
1326: --+ dbms_output.put_line('Journal Post is successful ' ||l_reqPost_id);
1327: if l_first_one then
1328: l_import_message_body := l_import_message_body || l_batch_name;

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

1321: FND_MESSAGE.set_name('SQLGL', 'GL_US_CI_JOURNAL_POSTING_OK');
1322: FND_MESSAGE.set_token('RID', l_reqPost_id);
1323: log_message('==>' || FND_MESSAGE.get, TRUE);
1324: global_errbuf := FND_MESSAGE.get;
1325: errbuf := errbuf || ' ' || FND_MESSAGE.get;
1326: --+ dbms_output.put_line('Journal Post is successful ' ||l_reqPost_id);
1327: if l_first_one then
1328: l_import_message_body := l_import_message_body || l_batch_name;
1329: l_post_request_id := l_post_request_id || l_reqPost_id;

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

1333: l_post_request_id := l_post_request_id || ', ' || l_reqPost_id;
1334: end if;
1335: else --+ posting verify failed
1336: if (l_balanced_flag = 'Y') then
1337: FND_MESSAGE.set_name('SQLGL', 'GL_US_CI_JOURNAL_POSTING_FAIL');
1338: FND_MESSAGE.set_token('RID', l_reqPost_id);
1339: log_message('==>' || FND_MESSAGE.get, TRUE);
1340: global_errbuf := global_errbuf || ' ' || FND_MESSAGE.get;
1341: global_retcode := 2;

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

1334: end if;
1335: else --+ posting verify failed
1336: if (l_balanced_flag = 'Y') then
1337: FND_MESSAGE.set_name('SQLGL', 'GL_US_CI_JOURNAL_POSTING_FAIL');
1338: FND_MESSAGE.set_token('RID', l_reqPost_id);
1339: log_message('==>' || FND_MESSAGE.get, TRUE);
1340: global_errbuf := global_errbuf || ' ' || FND_MESSAGE.get;
1341: global_retcode := 2;
1342: raise GLOBAL_ERROR;

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

1335: else --+ posting verify failed
1336: if (l_balanced_flag = 'Y') then
1337: FND_MESSAGE.set_name('SQLGL', 'GL_US_CI_JOURNAL_POSTING_FAIL');
1338: FND_MESSAGE.set_token('RID', l_reqPost_id);
1339: log_message('==>' || FND_MESSAGE.get, TRUE);
1340: global_errbuf := global_errbuf || ' ' || FND_MESSAGE.get;
1341: global_retcode := 2;
1342: raise GLOBAL_ERROR;
1343: else

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

1336: if (l_balanced_flag = 'Y') then
1337: FND_MESSAGE.set_name('SQLGL', 'GL_US_CI_JOURNAL_POSTING_FAIL');
1338: FND_MESSAGE.set_token('RID', l_reqPost_id);
1339: log_message('==>' || FND_MESSAGE.get, TRUE);
1340: global_errbuf := global_errbuf || ' ' || FND_MESSAGE.get;
1341: global_retcode := 2;
1342: raise GLOBAL_ERROR;
1343: else
1344: if (l_suspense_flag = 'N') then

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

1341: global_retcode := 2;
1342: raise GLOBAL_ERROR;
1343: else
1344: if (l_suspense_flag = 'N') then
1345: FND_MESSAGE.set_name('SQLGL', 'GL_US_CI_IMBALANCED_OTHER');
1346: log_message('==>' || FND_MESSAGE.get, TRUE);
1347: global_errbuf := global_errbuf || ' ' || FND_MESSAGE.get;
1348: else
1349: FND_MESSAGE.set_name('SQLGL', 'GL_US_CI_IMBALANCED_SUS');

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

1342: raise GLOBAL_ERROR;
1343: else
1344: if (l_suspense_flag = 'N') then
1345: FND_MESSAGE.set_name('SQLGL', 'GL_US_CI_IMBALANCED_OTHER');
1346: log_message('==>' || FND_MESSAGE.get, TRUE);
1347: global_errbuf := global_errbuf || ' ' || FND_MESSAGE.get;
1348: else
1349: FND_MESSAGE.set_name('SQLGL', 'GL_US_CI_IMBALANCED_SUS');
1350: FND_MESSAGE.set_token('RID', l_reqPost_id);

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

1343: else
1344: if (l_suspense_flag = 'N') then
1345: FND_MESSAGE.set_name('SQLGL', 'GL_US_CI_IMBALANCED_OTHER');
1346: log_message('==>' || FND_MESSAGE.get, TRUE);
1347: global_errbuf := global_errbuf || ' ' || FND_MESSAGE.get;
1348: else
1349: FND_MESSAGE.set_name('SQLGL', 'GL_US_CI_IMBALANCED_SUS');
1350: FND_MESSAGE.set_token('RID', l_reqPost_id);
1351: log_message('==>' || FND_MESSAGE.get, TRUE);

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

1345: FND_MESSAGE.set_name('SQLGL', 'GL_US_CI_IMBALANCED_OTHER');
1346: log_message('==>' || FND_MESSAGE.get, TRUE);
1347: global_errbuf := global_errbuf || ' ' || FND_MESSAGE.get;
1348: else
1349: FND_MESSAGE.set_name('SQLGL', 'GL_US_CI_IMBALANCED_SUS');
1350: FND_MESSAGE.set_token('RID', l_reqPost_id);
1351: log_message('==>' || FND_MESSAGE.get, TRUE);
1352: global_errbuf := global_errbuf || ' ' || FND_MESSAGE.get;
1353: errbuf := errbuf || ' ' || FND_MESSAGE.get;

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

1346: log_message('==>' || FND_MESSAGE.get, TRUE);
1347: global_errbuf := global_errbuf || ' ' || FND_MESSAGE.get;
1348: else
1349: FND_MESSAGE.set_name('SQLGL', 'GL_US_CI_IMBALANCED_SUS');
1350: FND_MESSAGE.set_token('RID', l_reqPost_id);
1351: log_message('==>' || FND_MESSAGE.get, TRUE);
1352: global_errbuf := global_errbuf || ' ' || FND_MESSAGE.get;
1353: errbuf := errbuf || ' ' || FND_MESSAGE.get;
1354: end if;

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

1347: global_errbuf := global_errbuf || ' ' || FND_MESSAGE.get;
1348: else
1349: FND_MESSAGE.set_name('SQLGL', 'GL_US_CI_IMBALANCED_SUS');
1350: FND_MESSAGE.set_token('RID', l_reqPost_id);
1351: log_message('==>' || FND_MESSAGE.get, TRUE);
1352: global_errbuf := global_errbuf || ' ' || FND_MESSAGE.get;
1353: errbuf := errbuf || ' ' || FND_MESSAGE.get;
1354: end if;
1355: FND_MESSAGE.set_name('SQLGL', 'GL_US_CI_JOURNAL_POSTING_FAIL');

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

1348: else
1349: FND_MESSAGE.set_name('SQLGL', 'GL_US_CI_IMBALANCED_SUS');
1350: FND_MESSAGE.set_token('RID', l_reqPost_id);
1351: log_message('==>' || FND_MESSAGE.get, TRUE);
1352: global_errbuf := global_errbuf || ' ' || FND_MESSAGE.get;
1353: errbuf := errbuf || ' ' || FND_MESSAGE.get;
1354: end if;
1355: FND_MESSAGE.set_name('SQLGL', 'GL_US_CI_JOURNAL_POSTING_FAIL');
1356: FND_MESSAGE.set_token('RID', l_reqPost_id);

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

1349: FND_MESSAGE.set_name('SQLGL', 'GL_US_CI_IMBALANCED_SUS');
1350: FND_MESSAGE.set_token('RID', l_reqPost_id);
1351: log_message('==>' || FND_MESSAGE.get, TRUE);
1352: global_errbuf := global_errbuf || ' ' || FND_MESSAGE.get;
1353: errbuf := errbuf || ' ' || FND_MESSAGE.get;
1354: end if;
1355: FND_MESSAGE.set_name('SQLGL', 'GL_US_CI_JOURNAL_POSTING_FAIL');
1356: FND_MESSAGE.set_token('RID', l_reqPost_id);
1357: log_message('==>' || FND_MESSAGE.get, TRUE);

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

1351: log_message('==>' || FND_MESSAGE.get, TRUE);
1352: global_errbuf := global_errbuf || ' ' || FND_MESSAGE.get;
1353: errbuf := errbuf || ' ' || FND_MESSAGE.get;
1354: end if;
1355: FND_MESSAGE.set_name('SQLGL', 'GL_US_CI_JOURNAL_POSTING_FAIL');
1356: FND_MESSAGE.set_token('RID', l_reqPost_id);
1357: log_message('==>' || FND_MESSAGE.get, TRUE);
1358: global_errbuf := global_errbuf || ' ' || FND_MESSAGE.get;
1359: global_retcode := 2;

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

1352: global_errbuf := global_errbuf || ' ' || FND_MESSAGE.get;
1353: errbuf := errbuf || ' ' || FND_MESSAGE.get;
1354: end if;
1355: FND_MESSAGE.set_name('SQLGL', 'GL_US_CI_JOURNAL_POSTING_FAIL');
1356: FND_MESSAGE.set_token('RID', l_reqPost_id);
1357: log_message('==>' || FND_MESSAGE.get, TRUE);
1358: global_errbuf := global_errbuf || ' ' || FND_MESSAGE.get;
1359: global_retcode := 2;
1360: raise GLOBAL_ERROR;

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

1353: errbuf := errbuf || ' ' || FND_MESSAGE.get;
1354: end if;
1355: FND_MESSAGE.set_name('SQLGL', 'GL_US_CI_JOURNAL_POSTING_FAIL');
1356: FND_MESSAGE.set_token('RID', l_reqPost_id);
1357: log_message('==>' || FND_MESSAGE.get, TRUE);
1358: global_errbuf := global_errbuf || ' ' || FND_MESSAGE.get;
1359: global_retcode := 2;
1360: raise GLOBAL_ERROR;
1361: end if;

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

1354: end if;
1355: FND_MESSAGE.set_name('SQLGL', 'GL_US_CI_JOURNAL_POSTING_FAIL');
1356: FND_MESSAGE.set_token('RID', l_reqPost_id);
1357: log_message('==>' || FND_MESSAGE.get, TRUE);
1358: global_errbuf := global_errbuf || ' ' || FND_MESSAGE.get;
1359: global_retcode := 2;
1360: raise GLOBAL_ERROR;
1361: end if;
1362: end if;

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

1360: raise GLOBAL_ERROR;
1361: end if;
1362: end if;
1363: else --+ posting status is COMPLETE:FAIL
1364: FND_MESSAGE.set_name('SQLGL', 'GL_US_CI_JOURNAL_POSTING_FAIL');
1365: FND_MESSAGE.set_token('RID', l_reqPost_id);
1366: log_message('==>' || FND_MESSAGE.get, TRUE);
1367: global_errbuf := global_errbuf || ' ' || FND_MESSAGE.get;
1368: global_retcode := 1;

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

1361: end if;
1362: end if;
1363: else --+ posting status is COMPLETE:FAIL
1364: FND_MESSAGE.set_name('SQLGL', 'GL_US_CI_JOURNAL_POSTING_FAIL');
1365: FND_MESSAGE.set_token('RID', l_reqPost_id);
1366: log_message('==>' || FND_MESSAGE.get, TRUE);
1367: global_errbuf := global_errbuf || ' ' || FND_MESSAGE.get;
1368: global_retcode := 1;
1369: raise GLOBAL_ERROR;

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

1362: end if;
1363: else --+ posting status is COMPLETE:FAIL
1364: FND_MESSAGE.set_name('SQLGL', 'GL_US_CI_JOURNAL_POSTING_FAIL');
1365: FND_MESSAGE.set_token('RID', l_reqPost_id);
1366: log_message('==>' || FND_MESSAGE.get, TRUE);
1367: global_errbuf := global_errbuf || ' ' || FND_MESSAGE.get;
1368: global_retcode := 1;
1369: raise GLOBAL_ERROR;
1370: end if; --+end of if wait for journal post is successful

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

1363: else --+ posting status is COMPLETE:FAIL
1364: FND_MESSAGE.set_name('SQLGL', 'GL_US_CI_JOURNAL_POSTING_FAIL');
1365: FND_MESSAGE.set_token('RID', l_reqPost_id);
1366: log_message('==>' || FND_MESSAGE.get, TRUE);
1367: global_errbuf := global_errbuf || ' ' || FND_MESSAGE.get;
1368: global_retcode := 1;
1369: raise GLOBAL_ERROR;
1370: end if; --+end of if wait for journal post is successful
1371: else --+For some reason, Journal Posting request id is zero

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

1368: global_retcode := 1;
1369: raise GLOBAL_ERROR;
1370: end if; --+end of if wait for journal post is successful
1371: else --+For some reason, Journal Posting request id is zero
1372: FND_MESSAGE.set_name('SQLGL', 'GL_US_CI_JOURNAL_POSTING_FAIL');
1373: FND_MESSAGE.set_token('RID', l_reqPost_id);
1374: log_message('==>' || FND_MESSAGE.get, TRUE);
1375: global_errbuf := global_errbuf || ' ' || FND_MESSAGE.get;
1376: global_retcode := 1;

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

1369: raise GLOBAL_ERROR;
1370: end if; --+end of if wait for journal post is successful
1371: else --+For some reason, Journal Posting request id is zero
1372: FND_MESSAGE.set_name('SQLGL', 'GL_US_CI_JOURNAL_POSTING_FAIL');
1373: FND_MESSAGE.set_token('RID', l_reqPost_id);
1374: log_message('==>' || FND_MESSAGE.get, TRUE);
1375: global_errbuf := global_errbuf || ' ' || FND_MESSAGE.get;
1376: global_retcode := 1;
1377: raise GLOBAL_ERROR;

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

1370: end if; --+end of if wait for journal post is successful
1371: else --+For some reason, Journal Posting request id is zero
1372: FND_MESSAGE.set_name('SQLGL', 'GL_US_CI_JOURNAL_POSTING_FAIL');
1373: FND_MESSAGE.set_token('RID', l_reqPost_id);
1374: log_message('==>' || FND_MESSAGE.get, TRUE);
1375: global_errbuf := global_errbuf || ' ' || FND_MESSAGE.get;
1376: global_retcode := 1;
1377: raise GLOBAL_ERROR;
1378: end if; --+ end of if Journal is Posted

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

1371: else --+For some reason, Journal Posting request id is zero
1372: FND_MESSAGE.set_name('SQLGL', 'GL_US_CI_JOURNAL_POSTING_FAIL');
1373: FND_MESSAGE.set_token('RID', l_reqPost_id);
1374: log_message('==>' || FND_MESSAGE.get, TRUE);
1375: global_errbuf := global_errbuf || ' ' || FND_MESSAGE.get;
1376: global_retcode := 1;
1377: raise GLOBAL_ERROR;
1378: end if; --+ end of if Journal is Posted
1379: END LOOP;

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

1386: --+bug#2750898, add more user friendly error message when
1387: --+user email address is not set
1388: if (l_return_code = EMAIL_CONTACT_NOT_SET) OR
1389: (l_return_code = CONTACT_INFO_NOT_FOUND) then
1390: FND_MESSAGE.set_name('SQLGL', 'GL_US_CI_EMAIL_USER');
1391: log_message('==>' || FND_MESSAGE.get, TRUE);
1392: end if;
1393: ELSE --+do not post, so send email at this point
1394: Compose_Import_message(l_reqJI_id, dblink,l_import_message_body);

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

1387: --+user email address is not set
1388: if (l_return_code = EMAIL_CONTACT_NOT_SET) OR
1389: (l_return_code = CONTACT_INFO_NOT_FOUND) then
1390: FND_MESSAGE.set_name('SQLGL', 'GL_US_CI_EMAIL_USER');
1391: log_message('==>' || FND_MESSAGE.get, TRUE);
1392: end if;
1393: ELSE --+do not post, so send email at this point
1394: Compose_Import_message(l_reqJI_id, dblink,l_import_message_body);
1395: gl_ci_workflow_pkg.send_cit_wf_ntf(

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

1415: --+bug#2750898, add more user friendly error message when
1416: --+user email address is not set
1417: if (l_return_code = EMAIL_CONTACT_NOT_SET) OR
1418: (l_return_code = CONTACT_INFO_NOT_FOUND) then
1419: FND_MESSAGE.set_name('SQLGL', 'GL_US_CI_EMAIL_USER');
1420: log_message('==>' || FND_MESSAGE.get, TRUE);
1421: end if;
1422: end if; --+end of if Journal Post flag is on
1423: else --+JI not verified

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

1416: --+user email address is not set
1417: if (l_return_code = EMAIL_CONTACT_NOT_SET) OR
1418: (l_return_code = CONTACT_INFO_NOT_FOUND) then
1419: FND_MESSAGE.set_name('SQLGL', 'GL_US_CI_EMAIL_USER');
1420: log_message('==>' || FND_MESSAGE.get, TRUE);
1421: end if;
1422: end if; --+end of if Journal Post flag is on
1423: else --+JI not verified
1424: FND_MESSAGE.set_name('SQLGL', 'GL_US_CI_JOURNAL_IMPORT_FAIL');

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

1420: log_message('==>' || FND_MESSAGE.get, TRUE);
1421: end if;
1422: end if; --+end of if Journal Post flag is on
1423: else --+JI not verified
1424: FND_MESSAGE.set_name('SQLGL', 'GL_US_CI_JOURNAL_IMPORT_FAIL');
1425: FND_MESSAGE.set_token('RID', l_reqJI_id);
1426: log_message('==>' || FND_MESSAGE.get, TRUE);
1427: global_errbuf := global_errbuf || ' ' || FND_MESSAGE.get;
1428: global_retcode := 2;

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

1421: end if;
1422: end if; --+end of if Journal Post flag is on
1423: else --+JI not verified
1424: FND_MESSAGE.set_name('SQLGL', 'GL_US_CI_JOURNAL_IMPORT_FAIL');
1425: FND_MESSAGE.set_token('RID', l_reqJI_id);
1426: log_message('==>' || FND_MESSAGE.get, TRUE);
1427: global_errbuf := global_errbuf || ' ' || FND_MESSAGE.get;
1428: global_retcode := 2;
1429: raise GLOBAL_ERROR;

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

1422: end if; --+end of if Journal Post flag is on
1423: else --+JI not verified
1424: FND_MESSAGE.set_name('SQLGL', 'GL_US_CI_JOURNAL_IMPORT_FAIL');
1425: FND_MESSAGE.set_token('RID', l_reqJI_id);
1426: log_message('==>' || FND_MESSAGE.get, TRUE);
1427: global_errbuf := global_errbuf || ' ' || FND_MESSAGE.get;
1428: global_retcode := 2;
1429: raise GLOBAL_ERROR;
1430: end if; --+end of if Journal Import is verified

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

1423: else --+JI not verified
1424: FND_MESSAGE.set_name('SQLGL', 'GL_US_CI_JOURNAL_IMPORT_FAIL');
1425: FND_MESSAGE.set_token('RID', l_reqJI_id);
1426: log_message('==>' || FND_MESSAGE.get, TRUE);
1427: global_errbuf := global_errbuf || ' ' || FND_MESSAGE.get;
1428: global_retcode := 2;
1429: raise GLOBAL_ERROR;
1430: end if; --+end of if Journal Import is verified
1431: else --+ JI status is COMPLETE:FAIL

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

1429: raise GLOBAL_ERROR;
1430: end if; --+end of if Journal Import is verified
1431: else --+ JI status is COMPLETE:FAIL
1432: if (l_balanced_flag = 'Y') then
1433: FND_MESSAGE.set_name('SQLGL', 'GL_US_CI_JOURNAL_IMPORT_FAIL');
1434: FND_MESSAGE.set_token('RID', l_reqJI_id);
1435: log_message('==>' || FND_MESSAGE.get, TRUE);
1436: global_errbuf := global_errbuf || ' ' || FND_MESSAGE.get;
1437: global_retcode := 1;

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

1430: end if; --+end of if Journal Import is verified
1431: else --+ JI status is COMPLETE:FAIL
1432: if (l_balanced_flag = 'Y') then
1433: FND_MESSAGE.set_name('SQLGL', 'GL_US_CI_JOURNAL_IMPORT_FAIL');
1434: FND_MESSAGE.set_token('RID', l_reqJI_id);
1435: log_message('==>' || FND_MESSAGE.get, TRUE);
1436: global_errbuf := global_errbuf || ' ' || FND_MESSAGE.get;
1437: global_retcode := 1;
1438: raise GLOBAL_ERROR;

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

1431: else --+ JI status is COMPLETE:FAIL
1432: if (l_balanced_flag = 'Y') then
1433: FND_MESSAGE.set_name('SQLGL', 'GL_US_CI_JOURNAL_IMPORT_FAIL');
1434: FND_MESSAGE.set_token('RID', l_reqJI_id);
1435: log_message('==>' || FND_MESSAGE.get, TRUE);
1436: global_errbuf := global_errbuf || ' ' || FND_MESSAGE.get;
1437: global_retcode := 1;
1438: raise GLOBAL_ERROR;
1439: else

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

1432: if (l_balanced_flag = 'Y') then
1433: FND_MESSAGE.set_name('SQLGL', 'GL_US_CI_JOURNAL_IMPORT_FAIL');
1434: FND_MESSAGE.set_token('RID', l_reqJI_id);
1435: log_message('==>' || FND_MESSAGE.get, TRUE);
1436: global_errbuf := global_errbuf || ' ' || FND_MESSAGE.get;
1437: global_retcode := 1;
1438: raise GLOBAL_ERROR;
1439: else
1440: FND_MESSAGE.set_name('SQLGL', 'GL_US_CI_JOURNAL_IMPORT_FAIL');

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

1436: global_errbuf := global_errbuf || ' ' || FND_MESSAGE.get;
1437: global_retcode := 1;
1438: raise GLOBAL_ERROR;
1439: else
1440: FND_MESSAGE.set_name('SQLGL', 'GL_US_CI_JOURNAL_IMPORT_FAIL');
1441: FND_MESSAGE.set_token('RID', l_reqJI_id);
1442: log_message('==>' || FND_MESSAGE.get, TRUE);
1443: global_errbuf := global_errbuf || ' ' || FND_MESSAGE.get;
1444: if (l_suspense_flag = 'N') then

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

1437: global_retcode := 1;
1438: raise GLOBAL_ERROR;
1439: else
1440: FND_MESSAGE.set_name('SQLGL', 'GL_US_CI_JOURNAL_IMPORT_FAIL');
1441: FND_MESSAGE.set_token('RID', l_reqJI_id);
1442: log_message('==>' || FND_MESSAGE.get, TRUE);
1443: global_errbuf := global_errbuf || ' ' || FND_MESSAGE.get;
1444: if (l_suspense_flag = 'N') then
1445: FND_MESSAGE.set_name('SQLGL', 'GL_US_CI_IMBALANCED_NOSUS');

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

1438: raise GLOBAL_ERROR;
1439: else
1440: FND_MESSAGE.set_name('SQLGL', 'GL_US_CI_JOURNAL_IMPORT_FAIL');
1441: FND_MESSAGE.set_token('RID', l_reqJI_id);
1442: log_message('==>' || FND_MESSAGE.get, TRUE);
1443: global_errbuf := global_errbuf || ' ' || FND_MESSAGE.get;
1444: if (l_suspense_flag = 'N') then
1445: FND_MESSAGE.set_name('SQLGL', 'GL_US_CI_IMBALANCED_NOSUS');
1446: FND_MESSAGE.set_token('RID', l_reqji_id);

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

1439: else
1440: FND_MESSAGE.set_name('SQLGL', 'GL_US_CI_JOURNAL_IMPORT_FAIL');
1441: FND_MESSAGE.set_token('RID', l_reqJI_id);
1442: log_message('==>' || FND_MESSAGE.get, TRUE);
1443: global_errbuf := global_errbuf || ' ' || FND_MESSAGE.get;
1444: if (l_suspense_flag = 'N') then
1445: FND_MESSAGE.set_name('SQLGL', 'GL_US_CI_IMBALANCED_NOSUS');
1446: FND_MESSAGE.set_token('RID', l_reqji_id);
1447: log_message('==>' || FND_MESSAGE.get, TRUE);

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

1441: FND_MESSAGE.set_token('RID', l_reqJI_id);
1442: log_message('==>' || FND_MESSAGE.get, TRUE);
1443: global_errbuf := global_errbuf || ' ' || FND_MESSAGE.get;
1444: if (l_suspense_flag = 'N') then
1445: FND_MESSAGE.set_name('SQLGL', 'GL_US_CI_IMBALANCED_NOSUS');
1446: FND_MESSAGE.set_token('RID', l_reqji_id);
1447: log_message('==>' || FND_MESSAGE.get, TRUE);
1448: global_errbuf := global_errbuf || ' ' || FND_MESSAGE.get;
1449: global_retcode := 1;

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

1442: log_message('==>' || FND_MESSAGE.get, TRUE);
1443: global_errbuf := global_errbuf || ' ' || FND_MESSAGE.get;
1444: if (l_suspense_flag = 'N') then
1445: FND_MESSAGE.set_name('SQLGL', 'GL_US_CI_IMBALANCED_NOSUS');
1446: FND_MESSAGE.set_token('RID', l_reqji_id);
1447: log_message('==>' || FND_MESSAGE.get, TRUE);
1448: global_errbuf := global_errbuf || ' ' || FND_MESSAGE.get;
1449: global_retcode := 1;
1450: raise GLOBAL_ERROR;

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

1443: global_errbuf := global_errbuf || ' ' || FND_MESSAGE.get;
1444: if (l_suspense_flag = 'N') then
1445: FND_MESSAGE.set_name('SQLGL', 'GL_US_CI_IMBALANCED_NOSUS');
1446: FND_MESSAGE.set_token('RID', l_reqji_id);
1447: log_message('==>' || FND_MESSAGE.get, TRUE);
1448: global_errbuf := global_errbuf || ' ' || FND_MESSAGE.get;
1449: global_retcode := 1;
1450: raise GLOBAL_ERROR;
1451: else

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

1444: if (l_suspense_flag = 'N') then
1445: FND_MESSAGE.set_name('SQLGL', 'GL_US_CI_IMBALANCED_NOSUS');
1446: FND_MESSAGE.set_token('RID', l_reqji_id);
1447: log_message('==>' || FND_MESSAGE.get, TRUE);
1448: global_errbuf := global_errbuf || ' ' || FND_MESSAGE.get;
1449: global_retcode := 1;
1450: raise GLOBAL_ERROR;
1451: else
1452: FND_MESSAGE.set_name('SQLGL', 'GL_US_CI_IMBALANCED_OTHER');

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

1448: global_errbuf := global_errbuf || ' ' || FND_MESSAGE.get;
1449: global_retcode := 1;
1450: raise GLOBAL_ERROR;
1451: else
1452: FND_MESSAGE.set_name('SQLGL', 'GL_US_CI_IMBALANCED_OTHER');
1453: log_message('==>' || FND_MESSAGE.get, TRUE);
1454: global_errbuf := global_errbuf || ' ' || FND_MESSAGE.get;
1455: global_retcode := 1;
1456: raise GLOBAL_ERROR;

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

1449: global_retcode := 1;
1450: raise GLOBAL_ERROR;
1451: else
1452: FND_MESSAGE.set_name('SQLGL', 'GL_US_CI_IMBALANCED_OTHER');
1453: log_message('==>' || FND_MESSAGE.get, TRUE);
1454: global_errbuf := global_errbuf || ' ' || FND_MESSAGE.get;
1455: global_retcode := 1;
1456: raise GLOBAL_ERROR;
1457: end if;

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

1450: raise GLOBAL_ERROR;
1451: else
1452: FND_MESSAGE.set_name('SQLGL', 'GL_US_CI_IMBALANCED_OTHER');
1453: log_message('==>' || FND_MESSAGE.get, TRUE);
1454: global_errbuf := global_errbuf || ' ' || FND_MESSAGE.get;
1455: global_retcode := 1;
1456: raise GLOBAL_ERROR;
1457: end if;
1458: end if;

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

1457: end if;
1458: end if;
1459: end if; --+end of if wait for journal import is successful
1460: else --+JI request id is zero, for some reason, the concurrent request failed
1461: FND_MESSAGE.set_name('SQLGL', 'GL_US_CI_JOURNAL_IMPORT_FAIL');
1462: FND_MESSAGE.set_token('RID', l_reqJI_id);
1463: log_message('==>' || FND_MESSAGE.get, TRUE);
1464: global_errbuf := global_errbuf || ' ' || FND_MESSAGE.get;
1465: global_retcode := 1;

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

1458: end if;
1459: end if; --+end of if wait for journal import is successful
1460: else --+JI request id is zero, for some reason, the concurrent request failed
1461: FND_MESSAGE.set_name('SQLGL', 'GL_US_CI_JOURNAL_IMPORT_FAIL');
1462: FND_MESSAGE.set_token('RID', l_reqJI_id);
1463: log_message('==>' || FND_MESSAGE.get, TRUE);
1464: global_errbuf := global_errbuf || ' ' || FND_MESSAGE.get;
1465: global_retcode := 1;
1466: raise GLOBAL_ERROR;

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

1459: end if; --+end of if wait for journal import is successful
1460: else --+JI request id is zero, for some reason, the concurrent request failed
1461: FND_MESSAGE.set_name('SQLGL', 'GL_US_CI_JOURNAL_IMPORT_FAIL');
1462: FND_MESSAGE.set_token('RID', l_reqJI_id);
1463: log_message('==>' || FND_MESSAGE.get, TRUE);
1464: global_errbuf := global_errbuf || ' ' || FND_MESSAGE.get;
1465: global_retcode := 1;
1466: raise GLOBAL_ERROR;
1467: end if; --+end of if journal is imported

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

1460: else --+JI request id is zero, for some reason, the concurrent request failed
1461: FND_MESSAGE.set_name('SQLGL', 'GL_US_CI_JOURNAL_IMPORT_FAIL');
1462: FND_MESSAGE.set_token('RID', l_reqJI_id);
1463: log_message('==>' || FND_MESSAGE.get, TRUE);
1464: global_errbuf := global_errbuf || ' ' || FND_MESSAGE.get;
1465: global_retcode := 1;
1466: raise GLOBAL_ERROR;
1467: end if; --+end of if journal is imported
1468: ELSE --+data transfer only

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

1490: --+bug#2750898, add more user friendly error message when
1491: --+user email address is not set
1492: if (l_return_code = EMAIL_CONTACT_NOT_SET) OR
1493: (l_return_code = CONTACT_INFO_NOT_FOUND) then
1494: FND_MESSAGE.set_name('SQLGL', 'GL_US_CI_EMAIL_USER');
1495: log_message('==>' || FND_MESSAGE.get, TRUE);
1496: end if;
1497: end if; --+end of if journal import flag is on
1498: exception

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

1491: --+user email address is not set
1492: if (l_return_code = EMAIL_CONTACT_NOT_SET) OR
1493: (l_return_code = CONTACT_INFO_NOT_FOUND) then
1494: FND_MESSAGE.set_name('SQLGL', 'GL_US_CI_EMAIL_USER');
1495: log_message('==>' || FND_MESSAGE.get, TRUE);
1496: end if;
1497: end if; --+end of if journal import flag is on
1498: exception
1499: when GLOBAL_ERROR then

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

1503: when OTHERS then
1504: rollback;
1505: retcode := global_retcode;
1506: errbuf := SUBSTR(SQLERRM,1,255);
1507: FND_MESSAGE.set_name('SQLGL', 'gl_us_ci_others_fail');
1508: FND_MESSAGE.set_token('RESULT', errbuf);
1509: log_message('==>' || FND_MESSAGE.get, TRUE);
1510: END Run_CI_transfer;
1511: end gl_ci_data_transfer_pkg;

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

1504: rollback;
1505: retcode := global_retcode;
1506: errbuf := SUBSTR(SQLERRM,1,255);
1507: FND_MESSAGE.set_name('SQLGL', 'gl_us_ci_others_fail');
1508: FND_MESSAGE.set_token('RESULT', errbuf);
1509: log_message('==>' || FND_MESSAGE.get, TRUE);
1510: END Run_CI_transfer;
1511: end gl_ci_data_transfer_pkg;
1512: --+ End of DDL script for GL_TEST_FND_REQUEST_PKG

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

1505: retcode := global_retcode;
1506: errbuf := SUBSTR(SQLERRM,1,255);
1507: FND_MESSAGE.set_name('SQLGL', 'gl_us_ci_others_fail');
1508: FND_MESSAGE.set_token('RESULT', errbuf);
1509: log_message('==>' || FND_MESSAGE.get, TRUE);
1510: END Run_CI_transfer;
1511: end gl_ci_data_transfer_pkg;
1512: --+ End of DDL script for GL_TEST_FND_REQUEST_PKG
1513: --+ End of DDL script for GL_TEST_FND_REQUEST_PKG