home *** CD-ROM | disk | FTP | other *** search
-
- IBM CMS Conversion Notes
-
- 1. In the main program (TIDY), delete the call to subroutine
- PCTIDY. Subroutines PCTIDY, OPFIL, and DOSDEV can be deleted.
-
- 2. Convert function KUPPER to EBCDIC by commenting out the ASCII
- parameters and activating the EBCDIC parameters.
-
- 3. In the main program (TIDY), change the value to which KTAB
- is set from 9 to 5 so that it is correct for EBCDIC.
-
- 4. The INCLUDE files must be stored in a MACLIB for the FORTVS
- compiler to process them. I suggest making the MS-DOS file
- TIDY.INC into the member COMMON in a MACLIB, and UNITS.INC
- into the member UNITS. Assuming that TIDY.INC was uploaded
- as TIDY INC A, and UNITS.INC as UNITS INC A, these CMS
- commands will generate a MACLIB named TIDY with these members:
-
- RENAME TIDY INC A COMMON COPY A
- RENAME UNITS INC A UNITS COPY A
- MACLIB GEN TIDY COMMON UNITS
-
- 5. The form of INCLUDE directives under VS-FORTRAN is different
- from IBM Professional Fortran, so they must be edited. Using
- XEDIT, change then:
-
- C/'TIDY.INC'/(COMMON)/ * *
- C/'UNITS.INC'/(UNITS)/ * *
-
- 6. Compile TIDY:
-
- FILEDEF SYSLIB DISK TIDY MACLIB A (PERM
- FORTVS TIDY (NOPRINT
-
- 7. Generate a module:
-
- LOAD TIDY (CLEAR
- GENMOD TIDY MODULE A
-
- A sample EXEC is in the file TIDYEXEC.CMS
-
- A file suitable for use with the CMS HELP system is TIDYHELP.CMS
- This can be renamed to TIDY HELPCMS for use.
-