368:
369: begin
370:
371: select 'Y' into l_reg_flag
372: from dual
373: where exists
374: ( select 'x' from pji_prg_batch where substr(batch_name,10,3) = '-R-' );
375: select to_number(substr(batch_name,13,5)) into l_reg_num
376: from pji_prg_batch
988:
989:
990:
991: select count(1) into r_count
992: from dual
993: where exists
994: ( select 'x' from PJI_LAUNCH_INCR where incr_type = 'REFRESH' ) ;
995:
996: select count(1) into u_count
993: where exists
994: ( select 'x' from PJI_LAUNCH_INCR where incr_type = 'REFRESH' ) ;
995:
996: select count(1) into u_count
997: from dual
998: where exists
999: ( select 'x' from PJI_LAUNCH_INCR where incr_type <> 'REFRESH' ) ;
1000:
1001:
1042: begin
1043:
1044: select 'Y'
1045: into l_prg_event_exists
1046: from dual
1047: where exists
1048: ( select 'x'
1049: from PA_PJI_PROJ_EVENTS_LOG log
1050: where
2204: 'PROJ_WRK_NEW',
2205: PRG_PARENT_NODE.prg_group,
2206: PRG_PARENT_NODE.parent_proj_id ,
2207: PRG_PARENT_NODE.parent_prg_level
2208: from dual
2209: where not exists
2210: (
2211: select 'x'
2212: from PJI_LAUNCH_INCR b
2655: 'PROJ_WRK_NEW',
2656: PRG_PARENT_NODE.prg_group,
2657: PRG_PARENT_NODE.parent_proj_id ,
2658: PRG_PARENT_NODE.parent_prg_level
2659: from dual
2660: where not exists
2661: (
2662: select 'x'
2663: from PJI_LAUNCH_INCR b