Hi,
Can someone help me with this. Explain what the following program does
$ open/read input_file 'flagfile'
$ read_iteration:
$ read/end_of_file=end_of_loop input_file current_line
$
$ size = f$length(current_line)
$ flag = f$extract(size-1,1,current_line)
$ show sym flag
$
$ jobname = f$extract(0,size-2,current_line)
$ show sym jobname
$
$ if 'flag' .eq. 1
$ then
$ @cs_progs:cs20_resubmit_job.com 'jobname'
$ endif
$
$ goto read_iteration
$ end_of_loop
Thank u in advance


Reply With Quote
