OpenVMS System Management Techniques, Tools ... - OpenMPE

sort_vms$layered.com
$! SORT_VMS$LAYERED.COM
$!
$ set noon
$ temp = f$element(0,";",f$parse(p1,f$trnlnm("startup$startup_layered"),,,"SYNTAX_ONLY"))
$ temp_file = f$element(0,";",f$parse(".sorted",temp,,,"SYNTAX_ONLY"))
$ fdl_spec = f$element(0,";",f$parse(".fdl",temp,,,"SYNTAX_ONLY"))
$ specification_file = f$element(0,";",f$parse(".srt",f$environment("PROCEDURE"),,,"SYNTAX_ONLY"))
$!
$ analyze_ /rms /fdl /output='fdl_spec' 'temp'
$ edit_ /fdl /nointeractive /analyze='fdl_spec' 'fdl_spec'
$ create_ /fdl='fdl_spec' 'temp_file'
$ sort_ 'temp' 'temp_file'/overlay -
/key=(pos:1,siz:12) - ! Phase, primary indexed key
/key=(pos:13,siz:1) - ! Mode, not an indexed key
/key=(pos:14,siz:79) - ! File, secondary indexed key
/specification='specification_file'
$ rename /log 'temp_file' 'temp'
$ exit
• Note underscores on the four commands. This allows the command to be executed and not any global
symbol that may have been defined in SYLOGIN.COM or LOGIN.COM
HP World 2004 - Seminar 4063 93