678: p_share_tbl IN share_tbl_type,
679: p_control_flag IN VARCHAR2 DEFAULT NULL) IS
680:
681: CURSOR get_program_info_csr IS
682: SELECT DECODE(FND_GLOBAL.CONC_REQUEST_ID,-1,NULL,FND_GLOBAL.CONC_REQUEST_ID),
683: DECODE(FND_GLOBAL.PROG_APPL_ID,-1,NULL,FND_GLOBAL.PROG_APPL_ID),
684: DECODE(FND_GLOBAL.CONC_PROGRAM_ID,-1,NULL,FND_GLOBAL.CONC_PROGRAM_ID),
685: DECODE(FND_GLOBAL.CONC_REQUEST_ID,-1,NULL,SYSDATE),
686: mo_global.get_current_org_id()
679: p_control_flag IN VARCHAR2 DEFAULT NULL) IS
680:
681: CURSOR get_program_info_csr IS
682: SELECT DECODE(FND_GLOBAL.CONC_REQUEST_ID,-1,NULL,FND_GLOBAL.CONC_REQUEST_ID),
683: DECODE(FND_GLOBAL.PROG_APPL_ID,-1,NULL,FND_GLOBAL.PROG_APPL_ID),
684: DECODE(FND_GLOBAL.CONC_PROGRAM_ID,-1,NULL,FND_GLOBAL.CONC_PROGRAM_ID),
685: DECODE(FND_GLOBAL.CONC_REQUEST_ID,-1,NULL,SYSDATE),
686: mo_global.get_current_org_id()
687: FROM DUAL;
680:
681: CURSOR get_program_info_csr IS
682: SELECT DECODE(FND_GLOBAL.CONC_REQUEST_ID,-1,NULL,FND_GLOBAL.CONC_REQUEST_ID),
683: DECODE(FND_GLOBAL.PROG_APPL_ID,-1,NULL,FND_GLOBAL.PROG_APPL_ID),
684: DECODE(FND_GLOBAL.CONC_PROGRAM_ID,-1,NULL,FND_GLOBAL.CONC_PROGRAM_ID),
685: DECODE(FND_GLOBAL.CONC_REQUEST_ID,-1,NULL,SYSDATE),
686: mo_global.get_current_org_id()
687: FROM DUAL;
688:
681: CURSOR get_program_info_csr IS
682: SELECT DECODE(FND_GLOBAL.CONC_REQUEST_ID,-1,NULL,FND_GLOBAL.CONC_REQUEST_ID),
683: DECODE(FND_GLOBAL.PROG_APPL_ID,-1,NULL,FND_GLOBAL.PROG_APPL_ID),
684: DECODE(FND_GLOBAL.CONC_PROGRAM_ID,-1,NULL,FND_GLOBAL.CONC_PROGRAM_ID),
685: DECODE(FND_GLOBAL.CONC_REQUEST_ID,-1,NULL,SYSDATE),
686: mo_global.get_current_org_id()
687: FROM DUAL;
688:
689: CURSOR c_app_info IS