Alternatively, have a single blank record (or whatever defaults are
appropriate) input file and use CIOR in the UDC (untested). No program changes
needed.
MYUDC
ECHO > DUMMY
RUN PROGNAME.progxl < DUMMY
*
"Gates, Scott" wrote:
> I need to get a COBOL program to accept command line input
> if that's possible.
>
> I know I can use an ACCEPT statement in the program, but
> this stops the program from running waiting for input if the program is
> being run by a UDC.
>
> I'd like it to run the program and if the PARAM is blank,
> skip it.
> Like this
>
> RUN PROGNAME.progxl SWITCH
>
> ************************************************
> * Scott Gates-ext 7994 | There is no problem *
> * UPMC Health Plan | in the world that *
> * [log in to unmask] | cannot be made worse *
> * 412-454-7994 | overreacting to it. *
> ************************************************