//DFMX0001 JOB ,MSGCLASS=Z
//DFMX0001 PROC DFMINIT=  <,optional_procedural_parameters>
//DFMAGENT EXEC PGM=&DFMINIT     <,optional_program_parameters>
//*
//* This procedure is a sample showing how to set up a procedure
//* for starting a DFM DataAgent.
//*
//* DFM DataAgent processing requires a procedure (whose name is
//* the same as the agent name).  The procedure has to run DFMINIT
//* and DFMINIT will call a DataAgent routine.  The DataAgent routine
//* will default to the same name as the agent (or procedure) name
//* but can be the name of any executable program suitable for
//* running as a key 8 job step.
//*
//* For example, you could run this DataAgent routine with no
//* further setup by issuing the following SdU sample command
//* from a workstation:
//*       dfmacall agent x:filename dfmx0001 pgm iefbr14
//*
//* DFMINIT is DFM's DataAgent routing module and should not
//* be changed.  Other DD statements and symbolic
//* substitutions can be added as needed by the DataAgent
//* program itself.
//*
//* This example is intended to discard the output by routing
//* it to MSGCLASS of Z.  You should modify it as appropriate
//* for your installation.  If you do not purge output, the
//* operator will have to periodically have to issue the $ps
//* command.
//*
//* Add additional DD statements as required by your program.
//*
//SYSPRINT  DD  SYSOUT=*
//SYSUDUMP  DD  SYSOUT=*
//DFMX0001 PEND
//GO       EXEC DFMX0001