We use a single COBOL-Sourcecode (mostly subprograms) for multiple use to 
avoid redundancy (Batch, CICS, PC).
Sample Code in MF-Cobol:
003380 LINKAGE SECTION. 
003410$IF COMPILEMODUS = "CICS" 
003420 01 DFHCOMMAREA. 
003430    02 ...
003540$END 
003550 
003560$IF COMPILEMODUS = "BATCH"
003570 01 io-para. 
003580    05 ...
003670$END
003680 
003700$IF COMPILEMODUS = "PC"
003710 01 INPUT-BEREICH. 
003720    05 ...
003810$END
 
Edit macro is a good idea, but I need a script that works as well under 
MVS as under Windows. 
We migrate from Micro Focus Mainframe Express to Websphere Developer for 
zSeries. 
Thanks 
Albert 

VERLAGSGRUPPE WELTBILD GMBH
Sitz der Gesellschaft: Augsburg
Handelsregister Augsburg HRB 6035 
Ust-ID-Nr: DE 127501299

Geschäftsführung:
Carel Halff (Vorsitzender), Dr. Klaus Driever, Werner Ortner, Herbert Zoch

Vorsitzender des Aufsichtsrates:
Dr. Klaus Donaubauer

Reply via email to