[Home] [Help]
3267: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,' IN POPULATE_GL_INTERFACE PROCEDURE....');
3268: END IF;
3269:
3270: -- Get the interface_run_id
3271: vg_interface_run_id := Gl_Interface_Control_Pkg.Get_Unique_Run_Id;
3272:
3273: -- Get the journal group_id
3274: SELECT Gl_Interface_Control_S.NEXTVAL
3275: INTO vg_jrnl_group_id
3270: -- Get the interface_run_id
3271: vg_interface_run_id := Gl_Interface_Control_Pkg.Get_Unique_Run_Id;
3272:
3273: -- Get the journal group_id
3274: SELECT Gl_Interface_Control_S.NEXTVAL
3275: INTO vg_jrnl_group_id
3276: FROM DUAL;
3277:
3278: IF ( FND_LOG.LEVEL_STATEMENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3279: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,' INTERFACE RUN ID: '||TO_CHAR(VG_INTERFACE_RUN_ID));
3280: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,' JOURNAL GROUP ID: '||TO_CHAR(VG_JRNL_GROUP_ID));
3281: END IF;
3282:
3283: --Insert a control record in gl_interface_control for gl_import to work
3284: INSERT INTO Gl_Interface_Control
3285: (je_source_name,
3286: status,
3287: interface_run_id,
3280: FV_UTILITY.DEBUG_MESG(FND_LOG.LEVEL_STATEMENT, l_module_name,' JOURNAL GROUP ID: '||TO_CHAR(VG_JRNL_GROUP_ID));
3281: END IF;
3282:
3283: --Insert a control record in gl_interface_control for gl_import to work
3284: INSERT INTO Gl_Interface_Control
3285: (je_source_name,
3286: status,
3287: interface_run_id,
3288: group_id,