//JCLNNRMM JOB (ACCT1,ACCT2,ACCT3,ACCT4),TIME=1440,
//         CLASS=A,MSGCLASS=A,MSGLEVEL=(1,1)
//*================================================================
//*- 1. Inform valid USER or GROUP name for  XXXXX
//*
//*- 2. Do a ftp in "ASC II" format and compressed of the file xxxxx.RMM.EXTRACT 
//*      to the following site:
//*     
//*          ftp://sinapbit.serveftp.com (user/pswd: it will be sent by mail)
//*
//*===============================================================
//STEP01 EXEC PGM=EDGHSKP,PARM='RPTEXT,DATEFORM(I)'
//MESSAGE DD DISP=SHR,DSN=xxxxx.RMM.MESSAGE,SPACE=(CYL,(9,9))
//REPTEXT DD DISP=SHR,DSN=xxxxx.RMM.EXTRACT,SPACE=(CYL,(9,9))