Has any one used Focus with MicroFocus Cobol Jobs.

We are moving our mainframe production jobs to the windows platform and need to run the same focus procedures as we did on the mainframe. The Focus procedures will be moved to our midrange windows box.

I need to know how the JCL in MicroFocus Cobol can me modified to run the FOCEXEC's. I also need to be able to check for the return code out of the FOCEXEC and use this return code in the JCL.

Another note - we are using Cybermation as our batch scheduler.

Thank you for your help.

Jay,

We did this at Anthem in 2003, Operation FORKLIFT. We(the data group) used MicroFocus COBOL to extract data from DB2 on the mainframe and FTP to a server on Windows.

We then used APP MAP in EDASPROF.prf to access those servers with DDNAMES. i.e.,

APP MAP flatfile \\Dv2kods03\Curs\Mainframe\CURS1P\converted\

Then, we used PC SyncSort to extract data from those files, if needed.

We also had to write Metadata Masters for "ALL" of these files.

Then, we filedef'd the files with APP FI to read them in:

-SET &INFILE1 = 'CURS.PROD.MCUBE530.BMBRGRP.YR2004.ASCII.DAT';
APP FI DDNAME flatfile\&INFILE1 (LRECL nnn RECFM F

These files did "NOT" have an end-of-file indicator, so, LRECL and RECFM fixed that.

Hope this helps...

Tom

EDIT: Caveat: BINARY data. Had to put a DEFINE in every Master with BINARY data and use the REVERSE function for that column; quite a pain...

This message has been edited. Last edited by: Tom Flynn,

What i'm looking for is how to run JCL pointing to a focexec. Does focus have load libraries on windowns and unix that I can poinr to?

Hi Tom,

Thank you for sharing your data movement scenario.

How did you invoke/call/trigger the MicroFocus COBOL routines?

Thanks,
Dave

Hi David,

If I recall "correctly", they used a Windows scheduler, passing parms to the mainframe.
I am not real positive, as this was done by the data group. I can find out, if you need me too; I still have contacts at Anthem...

Tom

We are getting off the mainframe - and putting our jobs in the midrange. I still need to run my focexecs that I had on the mainframe but I need to run them on the windows box with JCL (this is being done through the MicroFocus product and Cybermation for scheduliong).