$SAVE NOLIST ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ; ; Define macros for creating remote file driver global data ; ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; rfd_code segment er public rfd_code ends %*define(rfd_const(symbol,decl,value)) (%' rfd_code segment %symbol %decl %value public %symbol rfd_code ends ) %*define(rem_iotasks_prio(value)) (%rfd_const(remiotasksprio,db,%value)) %*define(num_rem_reqs(value)) (%rfd_const(numremreqs,db,%value)) %*define(num_sbufs(value)) (%rfd_const(numsbufs,db,%value)) %*define(job_exit_interval(value)) (%rfd_const(jobexitinterval,dd,%value)) %*define(logoff_interval(value)) (%rfd_const(logoffinterval,dd,%value)) %*define(config_base_time(value)) (%rfd_const(configbasetime,dd,%value)) $RESTORE