276: *********************************************************************/
277: PROCEDURE Init_Globals IS
278:
279: BEGIN
280: G_request_id := FND_GLOBAL.CONC_REQUEST_ID();
281: G_appl_id := FND_GLOBAL.PROG_APPL_ID();
282: G_program_id := FND_GLOBAL.CONC_PROGRAM_ID();
283: G_user_id := FND_GLOBAL.USER_ID();
284: G_login_id := FND_GLOBAL.CONC_LOGIN_ID();
277: PROCEDURE Init_Globals IS
278:
279: BEGIN
280: G_request_id := FND_GLOBAL.CONC_REQUEST_ID();
281: G_appl_id := FND_GLOBAL.PROG_APPL_ID();
282: G_program_id := FND_GLOBAL.CONC_PROGRAM_ID();
283: G_user_id := FND_GLOBAL.USER_ID();
284: G_login_id := FND_GLOBAL.CONC_LOGIN_ID();
285: END Init_Globals;
278:
279: BEGIN
280: G_request_id := FND_GLOBAL.CONC_REQUEST_ID();
281: G_appl_id := FND_GLOBAL.PROG_APPL_ID();
282: G_program_id := FND_GLOBAL.CONC_PROGRAM_ID();
283: G_user_id := FND_GLOBAL.USER_ID();
284: G_login_id := FND_GLOBAL.CONC_LOGIN_ID();
285: END Init_Globals;
286:
279: BEGIN
280: G_request_id := FND_GLOBAL.CONC_REQUEST_ID();
281: G_appl_id := FND_GLOBAL.PROG_APPL_ID();
282: G_program_id := FND_GLOBAL.CONC_PROGRAM_ID();
283: G_user_id := FND_GLOBAL.USER_ID();
284: G_login_id := FND_GLOBAL.CONC_LOGIN_ID();
285: END Init_Globals;
286:
287:
280: G_request_id := FND_GLOBAL.CONC_REQUEST_ID();
281: G_appl_id := FND_GLOBAL.PROG_APPL_ID();
282: G_program_id := FND_GLOBAL.CONC_PROGRAM_ID();
283: G_user_id := FND_GLOBAL.USER_ID();
284: G_login_id := FND_GLOBAL.CONC_LOGIN_ID();
285: END Init_Globals;
286:
287:
288: /**********************************************
295:
296: /*Strings for Dynamic sql*/
297: l_insert_string VARCHAR2(1000) := '';
298: l_select_string VARCHAR2(5000) := '';
299: l_quote VARCHAR2(1) := FND_GLOBAL.LOCAL_CHR(39); -- single quote
300:
301: /*Bind variables*/
302: l_collection_date DATE ;--:= trunc(sysdate-1);
303: l_period_type VARCHAR2(50) := FND_PROFILE.VALUE('AS_FORECAST_CALENDAR');