203:
204: BEGIN
205:
206: -- Initialize WHO columns B 13811230 moved code up and added code to fetch l_dec_separator
207: g_user_id := FND_GLOBAL.USER_ID;
208: g_login_id := FND_GLOBAL.LOGIN_ID;
209: g_prog_appl_id := FND_GLOBAL.PROG_APPL_ID;
210: g_program_id := FND_GLOBAL.CONC_PROGRAM_ID;
211: g_request_id := FND_GLOBAL.CONC_REQUEST_ID;
204: BEGIN
205:
206: -- Initialize WHO columns B 13811230 moved code up and added code to fetch l_dec_separator
207: g_user_id := FND_GLOBAL.USER_ID;
208: g_login_id := FND_GLOBAL.LOGIN_ID;
209: g_prog_appl_id := FND_GLOBAL.PROG_APPL_ID;
210: g_program_id := FND_GLOBAL.CONC_PROGRAM_ID;
211: g_request_id := FND_GLOBAL.CONC_REQUEST_ID;
212:
205:
206: -- Initialize WHO columns B 13811230 moved code up and added code to fetch l_dec_separator
207: g_user_id := FND_GLOBAL.USER_ID;
208: g_login_id := FND_GLOBAL.LOGIN_ID;
209: g_prog_appl_id := FND_GLOBAL.PROG_APPL_ID;
210: g_program_id := FND_GLOBAL.CONC_PROGRAM_ID;
211: g_request_id := FND_GLOBAL.CONC_REQUEST_ID;
212:
213: l_resp_id := FND_GLOBAL.RESP_ID;
206: -- Initialize WHO columns B 13811230 moved code up and added code to fetch l_dec_separator
207: g_user_id := FND_GLOBAL.USER_ID;
208: g_login_id := FND_GLOBAL.LOGIN_ID;
209: g_prog_appl_id := FND_GLOBAL.PROG_APPL_ID;
210: g_program_id := FND_GLOBAL.CONC_PROGRAM_ID;
211: g_request_id := FND_GLOBAL.CONC_REQUEST_ID;
212:
213: l_resp_id := FND_GLOBAL.RESP_ID;
214: l_resp_appl_id := FND_GLOBAL.RESP_APPL_ID;
207: g_user_id := FND_GLOBAL.USER_ID;
208: g_login_id := FND_GLOBAL.LOGIN_ID;
209: g_prog_appl_id := FND_GLOBAL.PROG_APPL_ID;
210: g_program_id := FND_GLOBAL.CONC_PROGRAM_ID;
211: g_request_id := FND_GLOBAL.CONC_REQUEST_ID;
212:
213: l_resp_id := FND_GLOBAL.RESP_ID;
214: l_resp_appl_id := FND_GLOBAL.RESP_APPL_ID;
215:
209: g_prog_appl_id := FND_GLOBAL.PROG_APPL_ID;
210: g_program_id := FND_GLOBAL.CONC_PROGRAM_ID;
211: g_request_id := FND_GLOBAL.CONC_REQUEST_ID;
212:
213: l_resp_id := FND_GLOBAL.RESP_ID;
214: l_resp_appl_id := FND_GLOBAL.RESP_APPL_ID;
215:
216:
217: fnd_global.apps_initialize (user_id => g_user_id,
210: g_program_id := FND_GLOBAL.CONC_PROGRAM_ID;
211: g_request_id := FND_GLOBAL.CONC_REQUEST_ID;
212:
213: l_resp_id := FND_GLOBAL.RESP_ID;
214: l_resp_appl_id := FND_GLOBAL.RESP_APPL_ID;
215:
216:
217: fnd_global.apps_initialize (user_id => g_user_id,
218: resp_id => l_resp_id,
213: l_resp_id := FND_GLOBAL.RESP_ID;
214: l_resp_appl_id := FND_GLOBAL.RESP_APPL_ID;
215:
216:
217: fnd_global.apps_initialize (user_id => g_user_id,
218: resp_id => l_resp_id,
219: resp_appl_id => l_resp_appl_id
220: );
221:
218: resp_id => l_resp_id,
219: resp_appl_id => l_resp_appl_id
220: );
221:
222: l_dec_separator := NVL(FND_PROFILE.VALUE('ICX_NUMERIC_CHARACTERS'), FND_GLOBAL.NLS_NUMERIC_CHARACTERS);
223:
224: /* uncomment the call below to write to a local file */
225: FND_FILE.PUT_NAMES('gmfcpic.log','gmfcpic.out','/appslog/opm_top/utl/opmm0dv/log');
226:
1847: END IF;
1848:
1849:
1850: -- Initialize WHO columns
1851: g_user_id := FND_GLOBAL.USER_ID;
1852: g_login_id := FND_GLOBAL.LOGIN_ID;
1853: g_prog_appl_id := FND_GLOBAL.PROG_APPL_ID;
1854: g_program_id := FND_GLOBAL.CONC_PROGRAM_ID;
1855: g_request_id := FND_GLOBAL.CONC_REQUEST_ID;
1848:
1849:
1850: -- Initialize WHO columns
1851: g_user_id := FND_GLOBAL.USER_ID;
1852: g_login_id := FND_GLOBAL.LOGIN_ID;
1853: g_prog_appl_id := FND_GLOBAL.PROG_APPL_ID;
1854: g_program_id := FND_GLOBAL.CONC_PROGRAM_ID;
1855: g_request_id := FND_GLOBAL.CONC_REQUEST_ID;
1856:
1849:
1850: -- Initialize WHO columns
1851: g_user_id := FND_GLOBAL.USER_ID;
1852: g_login_id := FND_GLOBAL.LOGIN_ID;
1853: g_prog_appl_id := FND_GLOBAL.PROG_APPL_ID;
1854: g_program_id := FND_GLOBAL.CONC_PROGRAM_ID;
1855: g_request_id := FND_GLOBAL.CONC_REQUEST_ID;
1856:
1857: -- Houston, do you copy?
1850: -- Initialize WHO columns
1851: g_user_id := FND_GLOBAL.USER_ID;
1852: g_login_id := FND_GLOBAL.LOGIN_ID;
1853: g_prog_appl_id := FND_GLOBAL.PROG_APPL_ID;
1854: g_program_id := FND_GLOBAL.CONC_PROGRAM_ID;
1855: g_request_id := FND_GLOBAL.CONC_REQUEST_ID;
1856:
1857: -- Houston, do you copy?
1858: copy_burden_dtl
1851: g_user_id := FND_GLOBAL.USER_ID;
1852: g_login_id := FND_GLOBAL.LOGIN_ID;
1853: g_prog_appl_id := FND_GLOBAL.PROG_APPL_ID;
1854: g_program_id := FND_GLOBAL.CONC_PROGRAM_ID;
1855: g_request_id := FND_GLOBAL.CONC_REQUEST_ID;
1856:
1857: -- Houston, do you copy?
1858: copy_burden_dtl
1859: (