Z-Packs
http://www.simotime.com
|
|
Download
Options Z-Packs http://www.simotime.com |
| When technology complements business | Copyright © 1987-2010 SimoTime Enterprises All Rights Reserved |
|
||||||
| (Next) (Previous) (Table-of-Contents) |
| The following Z-Packs provide individual programming examples, documentation and test data files in a single package. The Z-Packs are usually in zip format to reduce the amount of time to download. The examples that are targeted for a mainframe (MVS or OS/390) will also run on the PC with Mainframe Express from Micro Focus. The COBOL examples are coded to the ANSI/85 standard and many have been tested on the PC using Net Express from Micro Focus. Some of the COBOL programs may be slightly modified to run on the AS/400. For example, the COMP is changed to BINARY. |
| Permission to use, copy, modify and distribute this software, documentation or training material for any purpose requires a fee to be paid to SimoTime Enterprises. For more information refer to the Software Agreement and Disclaimer section at the end of this document. |
|
||||||
| (Next) (Previous) (Table-of-Contents) |
| Permission to use, copy, modify and distribute this software,
documentation or training material for any purpose requires a fee to be paid to
SimoTime Enterprises. Once the fee is received by SimoTime the latest version
of the software, documentation or training material will be delivered and a
license will be granted for use within an enterprise, provided the SimoTime
copyright notice appear on all copies of the software. The SimoTime name or
Logo may not be used in any advertising or publicity pertaining to the use of
the software without the written permission of SimoTime Enterprises.
SimoTime Enterprises makes no warranty or representations about the suitability of the software, documentation or learning material for any purpose. It is provided "AS IS" without any express or implied warranty, including the implied warranties of merchantability, fitness for a particular purpose and non-infringement. SimoTime Enterprises shall not be liable for any direct, indirect, special or consequential damages resulting from the loss of use, data or projects, whether in an action of contract or tort, arising out of or in connection with the use or performance of this software, documentation or training material. If you have any questions, suggestions or comments please call or send an e-mail to: helpdesk@simotime.com |
|
||||||
| (Next) (Previous) (Table-of-Contents) | ||||||
|
Assembler, 370 Instruction
Set (Download) or (More Information) or (Top of Assembler List) This sample program is written in IBM Mainframe Assembler (HLASM) and executes each of the problem-state, non-floating-point instructions. This program is provided as a learning and reference example. It will run on a mainframe but is intended to be animated using Micro Focus Mainframe Express with the 370 Assembler option. Note: The zip file name is simoi370.zip and the approximate size is 26K. |
||||||
| Assembler, Bit
Manipulation (Download) or (More Information) or (Top of COBOL List) This is an example of how a COBOL program can call an Assembler program that does bit-level manipulation. The COBOL program is written using the COBOL/2 dialect but also work with COBOL for MVS and COBOL/370. The Assembler program was originally written using the IBM Mainframe Assembler/H and will work with HLASM. A JCL member is provided to run the job as an MVS batch job on an IBM mainframe or as a project with Micro Focus Mainframe Express (MFE) running on a PC with Windows. Note: The zip file name is asmbit01.zip and the approximate size is 23K. |
||||||
|---|---|---|---|---|---|---|
|
Assembler, Coding
Techniques (Download) or (More Information) or (Top of Assembler List) This sample program is written in IBM Mainframe Assembler (HLASM), it will compile using Assembler/H or HLASM. This program provides examples of some of the coding techniques used by mainframe assembler programmers. It will run as an MVS batch job on an IBM mainframe or as a project with Micro Focus Mainframe Express (MFE) running on a PC with Windows. Note: The zip file name is asmtrixs.zip and the approximate size is 16K. |
||||||
|
Assembler, Call, Load and
Link (Download) or (More Information) or (Top of Assembler List) This suite of programs provides examples of how a mainframe assembler program calls, loads or links to a mainframe assembler (HLASM) routine. The assembler programs are written in IBM Mainframe Assembler, they will compile using Assembler/H or HLASM. A JCL member is provided to run the job as an MVS batch job on an IBM mainframe or as a project with Micro Focus Mainframe Express (MFE) running on a PC with Windows. Note: The zip file name is asmasm01.zip and the approximate size is 17K. |
||||||
| Assembler, I/O Routine for QSAM File
Access (Download) or (More Information) or (Top of Assembler List) This suite of programs provides an example of how a mainline COBOL program calls a mainframe assembler (HLASM) I/O routine to access a QSAM or Sequential file. The COBOL program is written using COBOL/2 dialect but also works with COBOL for MVS and COBOL/370. The assembler IO routine is written in IBM Mainframe Assembler, it will compile using Assembler/H or HLASM. A JCL member is provided to run the job as an MVS batch job on an IBM mainframe or as a project with Micro Focus Mainframe Express (MFE) running on a PC with Windows. Note: The zip file name is cblasm01.zip and the approximate size is 17K. |
||||||
|
Assembler, I/O Routine for VSAM, KSDS
Access (Download) or (More Information) or (Top of Assembler List) This suite of programs provides an example of how a mainline COBOL program calls a mainframe assembler (HLASM) I/O routine to access a VSAM data set. The COBOL program is written using COBOL/2 dialect but also works with COBOL for MVS and COBOL/370. The assembler IO routine is written in IBM Mainframe Assembler, it will compile using Assembler/H or HLASM. A JCL member is provided to run the job as an MVS batch job on an IBM mainframe or as a project with Micro Focus Mainframe Express (MFE) running on a PC with Windows. Note: The zip file name is cblasm01.zip and the approximate size is 19K. |
||||||
|
Assembler, Labels and
Macros (Download) or (More Information) or (Top of Assembler List) This sample program discusses the task of maintaining unique labels when using macros that generate code that includes branch instructions. There are various techniques used to solve this problem and each has its own advantages and disadvantages. Note: The zip file name is simolab1.zip and the approximate size is 15K. |
||||||
|
Assembler, WTO
Macro (Download) or (More Information) or (Top of Assembler List) This sample program is written in IBM Mainframe Assembler (HLASM), it will compile using Assembler/H or HLASM. This program provides examples of some of the coding techniques used to display messages to the screen. It will run as an MVS batch job on an IBM mainframe or as a project with Micro Focus Mainframe Express (MFE) running on a PC with Windows. Note: The zip file name is asm4wto1.zip and the approximate size is 12K. |
||||||
|
||||||
| (Next) (Previous) (Table-of-Contents) | ||||||
| COBOL,
ABEND Processing for the Micro Focus Environment (Download) or (More Information) or (Top of COBOL List) This suite of sample programs describes how to call an ABEND (ABnormal ENDing) routine in a Micro Focus environment. This routine will display the call stack starting with the program that called the ABEND routine. The COBOL programs are written using the Micro Focus COBOL and tested with Net Express and Enterprise Server. A JCL member is provided to run the job as an MVS batch job under Enterprise Server or as a project with Micro Focus Mainframe Express (MFE) running on a PC with Windows. Note: The zip file name is abtest01.zip and the approximate size is 18K. |
||||||
| COBOL,
Bit Manipulation (Download) or (More Information) or (Top of COBOL List) This is an example of how COBOL can do bit-level manipulation. Both COBOL programs are written using the IBM VS COBOL II dialect and should work with COBOL for MVS and COBOL/370. A JCL member is provided to run the job as an MVS batch job on an IBM mainframe or as a project with Micro Focus Mainframe Express (MFE) running on a PC with Windows. Note: The zip file name is cblbit01.zip and the approximate size is 25K. |
||||||
| COBOL,
Callable Access, Sequential Files, 80-Byte Records (Download) or (More Information) or (Top of COBOL List) This packet is an example of how a mainline COBOL program calls a COBOL I/O routine to access sequential files with 80-byte logical records. The first example shows how to read a line sequential file via a simple call and write a record sequential file via a simple call. The COBOL programs are written using the IBM VS COBOL II dialect and should work with COBOL for MVS and COBOL/370 with the exception of the programs that provide access to line sequential files. A JCL member is provided to run the job as an MVS batch job on an IBM mainframe or as a project with Micro Focus Mainframe Express (MFE) running on a PC with Windows. A Windows Command file is provided to run with Net Express. Note: The zip file name is cblcrd01.zip and the approximate size is 20K. |
||||||
|
COBOL,
Calling COBOL I/O Routine for VSAM, KSDS Access (Download) or (More Information) or (Top of COBOL List) This packet is an example of how a mainline COBOL program calls a mainframe COBOL I/O routine to access a VSAM data set. Both COBOL programs are written using the IBM VS COBOL II dialect and should work with COBOL for MVS and COBOL/370. A JCL member is provided to run the job as an MVS batch job on an IBM mainframe or as a project with Micro Focus Mainframe Express (MFE) running on a PC with Windows. Note: The zip file name is cblcbl01.zip and the approximate size is 42K. |
||||||
| COBOL,
Calling Assembler, I/O Routine for QSAM File Access (Download) or (More Information) or (Top of COBOL List) This suite of programs provides an example of how a mainline COBOL program calls a mainframe assembler (HLASM) I/O routine to access a QSAM or Sequential file. The COBOL program is written using COBOL/2 dialect but also works with COBOL for MVS and COBOL/370. The assembler IO routine is written in IBM Mainframe Assembler, it will compile using Assembler/H or HLASM. A JCL member is provided to run the job as an MVS batch job on an IBM mainframe or as a project with Micro Focus Mainframe Express (MFE) running on a PC with Windows. Note: The zip file name is qsamio01.zip and the approximate size is 17K. |
||||||
| COBOL,
Calling Assembler I/O Routine for VSAM, KSDS Access (Download) or (More Information) or (Top of COBOL List) This suite of programs provides an example of how a mainline COBOL program calls a mainframe assembler (HLASM) I/O routine to access a VSAM data set. The COBOL program is written using COBOL/2 dialect but also works with COBOL for MVS and COBOL/370. The assembler IO routine is written in IBM Mainframe Assembler, it will compile using Assembler/H or HLASM. A JCL member is provided to run the job as an MVS batch job on an IBM mainframe or as a project with Micro Focus Mainframe Express (MFE) running on a PC with Windows. Note: The zip file name is cblasm01.zip and the approximate size is 15K. |
||||||
| COBOL,
Call using Procedure Pointer & External Memory (Download) or (More Information) or (Top of COBOL List) This suite of programs will describe how to use procedure pointers and external data items. A procedure pointer will be defined in a primary (or mainline) program. The procedure pointer will then be used to call a secondary program. A linkage section will not be required in the secondary program since the data will be accessed (or shared) using external data items. The COBOL program is written using COBOL/390 dialect but also works with COBOL for MVS and COBOL/370. A JCL member is provided to run the job as an MVS batch job on an IBM mainframe or as a project with Micro Focus Mainframe Express (MFE) running on a PC with Windows. Note: The zip file name is callam01.zip and the approximate size is 18K. |
||||||
| COBOL,
Case Conversion of aText String (Download) or (More Information) or (Top of COBOL List) This is an example of how COBOL programs do case conversion. The example shows simple conversion between upper and lower case plus capitalization and editing of specific words within a text string. Both COBOL programs were written and tested using the VS COBOL II dialect. Also, both COBOL programs will work with COBOL for MVS and COBOL/370. A JCL member is provided to run the job as an MVS batch job on an IBM mainframe or as a project with Micro Focus Mainframe Express (MFE) running on a PC with Windows. Also, a CMD member is provided to run the job with Micro Focus Net Express (MFE) running on a PC with Windows. Note: The zip file name is casecr01.zip and the approximate size is 30K. |
||||||
| COBOL,
Collating Sequences for EBCDIC and ASCII Environments (Download) or (More Information) or (Top of COBOL List) This suite of programs will create a file containing the printable character set. This file will be sorted and produce different sequencing for the EBCDIC and ASCII environments. A subsequent step will run a COBOL program that shows the type of programming logic that will execute properly in an EBCDIC environment but fail in an ASCII environment. The COBOL programs are written using the IBM VS COBOL II dialect and should work with COBOL for MVS and COBOL/370. A JCL member is provided to run the job as an MVS batch job on an IBM mainframe or as a project with Micro Focus Mainframe Express (MFE) running on a PC with Windows. A CMD member is provided to run the job from a windows command line as a batch job or as a project with Micro Focus Net Express running on a PC with Windows. Note: The zip file name is cblclt01.zip and the approximate size is 35K. |
||||||
| COBOL,
Comma Delimited File, Create a New File (Download) or (More Information) or (Top of COBOL List) This suite of programs will read a column-oriented, fixed-field-length sequential file and create a new comma-delimited file. A CMD member is provided to run the job from a windows command line as a batch job or as a project with Micro Focus Net Express running on a PC with Windows. Note: The zip file name is cblcsv01.zip and the approximate size is 22K. |
||||||
| COBOL,
Comma Delimited File, Read and Parse Existing File (Download) or (More Information) or (Top of COBOL List) This suite of sample programs will read and parse and existing comma-delimited file and create a column-oriented, fixed-field-length, sequential file. A CMD member is provided to run the job from a windows command line as a batch job or as a project with Micro Focus Net Express running on a PC with Windows. Note: The zip file name is cblcsv02.zip and the approximate size is 31K. |
||||||
| COBOL,
Copy File with REPLACING Function (Download) or (More Information) or (Top of COBOL List) This suite of sample programs describes the usage of the "REPLACING" function when using a copy file with a COBOL program. A CMD member is provided to run the job from a windows command line as a batch job or as a project with Micro Focus Net Express running on a PC with Windows. A JCL member is provided to run the job with Micro Focus Mainframe Express running on a PC with Windows. Note: The zip file name is cpyrep01.zip and the approximate size is 10K. |
||||||
|
COBOL,
Date Difference-in-Days between Two Dates (Download) or (More Information) or (Top of COBOL List) This is an example of a callable routine that will calculate the difference between two gregorian dates in the ccyymmdd format. Allowances have been made for leap years with the four-year and four-hundred-year cycles. Note: The zip file name is cblday01.zip and the approximate size is 36K. |
||||||
| COBOL,
Date Validate, Format and Convert (Download) or (More Information) or (Top of COBOL List) This is an example of a callable routine that will validate, format or convert dates. The program will accept a gregorian date in the ccyymmdd, ccyy/mm/dd, ccyy/m/d format then check for numeric values for ccyymmdd. The month and day will also be checked for a valid range of 1-12 and 1-nn according to the month. It also provides conversion to julian and text. For example, 2001/01/15 will be converted to a julian date of 2001015 and a text string of January 15, 2001. Note: The zip file name is cbldat01.zip and the approximate size is 32K. |
||||||
|
COBOL,
Digits to Text Conversion (Download) or (More Information) or (Top of COBOL List) This suite of programs provides an example of how to create a 150-character text data string from a 12-digit numeric field. For example, if the numeric field contains 000001234 then a text string is created with in the following information. One-Thousand-Two-Hundred-Thirty-Four. Note: The zip file name is cbltxn01.zip and the approximate size is 32K. |
||||||
| COBOL,
Embedded Hex or Non-Printable Characters (Download) or (More Information) or (Top of COBOL List) This suite of programs provides an example of how to identify and process embedded hex or non-printable characters in a text string or field. Note: The zip file name is utlhex01.zip and the approximate size is 34K. |
||||||
| COBOL,
Floating Point Arithmetic (Download) or (More Information) or (Top of COBOL List) This suite of sample programs provides an example of a COBOL program doing floating point arithmetic and writing the information to a Sequential file. Note: The zip file name is cblfpa01.zip and the approximate size is 22K. |
||||||
| COBOL,
Hexadecimal Dump of Data Items (Download) or (More Information) or (Top of COBOL List) This suite of programs provides a demonstration program and a callable program to display a data string in a hexadecimal format for both EBCDIC and ASCII. Both COBOL programs are written using the IBM VS COBOL II dialect and will also work with COBOL for MVS and COBOL/370. A JCL member is provided to run the job as an MVS batch job on an IBM mainframe or as a project with Micro Focus Mainframe Express (MFE) running on a PC with Windows. Note: The zip file name is cblhbx01.zip and the approximate size is 46K. |
||||||
| COBOL,
Replace the -INC Statements wit a Standard COBOL Copy
Statement (Download) or (More Information) or (Top of JCL List) The -INC is supported for the Micro Focus COBOL environment by using the LIBRARIAN"2" compiler directive. However, the CP and Preprocessor technology used with ORACLE requires the -INC to be changed to a standard COPY or EXEC SQL INCLUDE. A global conversion utility program (ALTINCC1.CBL) may be used to replace the -INC statements with standard COBOL COPY statements. Note: The zip file name is altinc01.zip and the approximate size is 12K. |
||||||
| COBOL,
Internal Reader and Job Submission (Download) or (More Information) or (Top of JCL List) This suite of programs will describe how to submit a second job from within the current running job. A COBOL program is used to write information to the Internal Reader (INtRDR). The JCL and COBOL program may be executed on the mainframe as an MVS or ZOS batch job. The JOB and DD statements will require modification prior to execution in different mainframe environments. The JCL and COBOL program may be executed using Micro Focus Mainframe Experss (MFE/EE) or Micro Focus Enterprise Server. Note: The zip file name is cblsub01.zip and the approximate size is 12K. |
||||||
| COBOL,
JCL Parameter Passing (Download) or (More Information) or (Top of COBOL List) This packet is an example of how a COBOL program accesses and processes a data string specified as a parameter as part of the EXEC statement in the JCL that is running the job. The COBOL programs are written using the IBM VS COBOL II dialect and should work with COBOL for MVS and COBOL/370. A JCL member is provided to run the job as an MVS batch job on an IBM mainframe or as a project with Micro Focus Mainframe Express (MFE) running on a PC with Windows. Note: The zip file name is cblpar01.zip and the approximate size is 21K. |
||||||
| COBOL,
Justify Text within a Field, Center and Right or Left Adjust
(Download) or (More Information) or (Top of COBOL List) This packet is an example of how a COBOL program can do text justification (center, left or right justify) within a field. The COBOL programs are written using the IBM VS COBOL II dialect and should work with COBOL for MVS and COBOL/370. A JCL member is provided to run the job as an MVS batch job on an IBM mainframe or as a project with Micro Focus Mainframe Express (MFE) running on a PC with Windows. Note: The zip file name is cbljus01.zip and the approximate size is 35K. |
||||||
| COBOL,
Mailing Labels - Read an Indexed File and Create a Print
File (Download) or (More Information) or (Top of COBOL List) The objective of this suite of programs is to read an INDEXED file containing name and address information and create a sequential file. Records containing a PO Box in the Street-Address field will be omitted from the sequential file. The file will be sorted by postal code sequence using the SORT program. A second COBOL program will read the sorted sequential file and create a print file that is formatted with 1, 2, 3 or 4 across labels of six lines each. This is a good examples of how to access an Indexed file (or VSAM, KSDS). It will also illustrate the use of a two-dimensional array. Note: The zip file name is stamlr01.zip and the approximate size is 80K. |
||||||
| COBOL,
Numeric Fields, Introduction to Internal Structures (Download) or (More Information) or (Top of COBOL List) This suite of example programs will describe the various numeric formats and their internal structures. The examples will also show how numeric fields may be converted from one format to another in preparation for printing, displaying or exporting to a non-mainframe or non-COBOL environment. Note: The zip file name is number01.zip and the approximate size is 36K. |
||||||
| COBOL,
Numeric Fields, Convert between Numeric Field Formats (Download) or (More Information) or (Top of COBOL List) This suite of programs provides an example of how to convert between the various numeric formats used with COBOL and on an IBM Mainframe System. This example also illustrates how to redefine a numeric field and how to display the actual hexadecimal content of a numeric field. Note: The zip file name is numcvt01.zip and the approximate size is 50K. |
||||||
| COBOL,
Numeric Fields, Commonly Used Formats and Field Sizes (Download) or (More Information) or (Top of COBOL List) This suite of example programs will describe the use, format and size of some of the commonly used numeric fields of the COBOL programming language. This example also illustrates how to redefine a numeric field and how to display the actual hexadecimal content of a numeric field. Note: The zip file name is numtyp01.zip and the approximate size is 36K. |
||||||
|
COBOL,
Numeric Fields, Test or Scan (Download) or (More Information) or (Top of COBOL List) This suite of programs provides a demonstration program for testing or scanning a numeric field for numeric content or all digits. The DISPLAY function of COBOL is used by the demonstration program to display the results of the parsing routine. The COBOL program is written using the IBM VS COBOL II dialect and will also work with COBOL for MVS and COBOL/370. A JCL member is provided to run the job as an MVS (or OS/390) batch job on an IBM mainframe or as a project with Micro Focus Mainframe Express (MFE) running on a PC with Windows. Note: The zip file name is cblnum01.zip and the approximate size is 18K. |
||||||
| COBOL,
Numeric Fields, Printing or Editing (Download) or (More Information) or (Top of COBOL List) This suite of example programs will describe how to prepare various numeric fields (i.e. packed or COMP-3, binary or COMP and signed, zoned decimal or USAGE IS DISPLAY) for printing. Note: The zip file name is numprt01.zip and the approximate size is 27K. |
||||||
| COBOL,
Numeric Fields, Leading SPACES and ZEROES (Download) or (More Information) or (Top of COBOL List) The challenge with this program is that it is expected to process the various numeric items in the same manner as the mainframe. For example, a zoned-decimal field that contains leading spaces should not cause an ABEND (i.e. 163 error on Micro Focus) but should treat the leading spaces as zeroes and complete the arithmetic calculation. However, a packed-decimal field that contains non-numeric values would issue a S0C7 (referred to as a sock-seven) on the mainframe and should issue a 163 error in the Micro Focus environment. Note: The zip file name is numbug01.zip and the approximate size is 30K. |
||||||
|
COBOL,
Parsing a Data String , Process Leading and Multiple, Embedded
Spaces (Download) or (More Information) or (Top of COBOL List) This suite of programs provides a demonstration program and a callable program to parse a field or data string. The DISPLAY function of COBOL is used by the demonstration program to display the results of the parsing routine. This example will also show how to create a new field (or data string) with the leading spaces removed and the multiple, embedded spaces replaced with a single space. The length of the text within the new field (or data string) is also calculated. Both COBOL programs are written using the IBM VS COBOL II dialect and will also work with COBOL for MVS and COBOL/370. A JCL member is provided to run the job as an MVS (or OS/390) batch job on an IBM mainframe or as a project with Micro Focus Mainframe Express (MFE) running on a PC with Windows. Note: The zip file name is cblrmp01.zip and the approximate size is 25K. |
||||||
|
COBOL,
Pass, Parse and Convert a Data String (Download) or (More Information) or (Top of COBOL List) This suite of programs provides examples of how to parse, edit, modify, format and display (standard or hexadecimal dump) various words within a data string. The programs also include examples of how to pass parameters between JCL and COBOL. The COBOL programs are written using the IBM VS COBOL II dialect and will also work with COBOL for MVS and COBOL/370. A JCL member is provided to run the job as an MVS (or OS/390) batch job on an IBM mainframe or as a project with Micro Focus Mainframe Express (MFE) running on a PC with Windows. Note: The zip file name is stafmt01.zip and the approximate size is 48K. |
||||||
| COBOL,
Print or Display Text String with non-Print or non-Display
Values (Download) or (More Information) or (Top of COBOL List) This suite of programs provides an example of a routine that will replace non-display or non-print values with spaces prior to displaying or printing. The example also shows what happens if a display is attempted with the binary or non-display characters in the text string. Note: The zip file name is cblprt01.zip and the approximate size is 17K. |
||||||
| COBOL,
Right-Adjust and Zero-Fill (Download) or (More Information) or (Top of COBOL List) This suite of programs provides an example of a routine that will Right-Adjust a text string within a field and fill the left-most or high-order bytes with zeroes. The resulting field is also tested for numeric values and a return code (RA12-RESPOND) is set to zero (0) if numeric and eight (8) if not numeric. Two COBOL programs are provided. The first program is a demonstration program that reads a file containing "RIGHTADJ-info" records and calls the second COBOL program that actually does the right-adjust, zero-fill processing. Note: The zip file name is cblraz01.zip and the approximate size is 33K. |
||||||
| COBOL,
Search and Replace Text strings of Different Sizes within a
Field (Download) or (More Information) or (Top of COBOL List) The objective of this suite of programs is to replace a text string within a field based on a search argument with a text string based on a replacement value of a different length. Note: The zip file name is cblrep01.zip and the approximate size is 24K. |
||||||
| COBOL,
Sequential File I/O (ASCII/Text) and Hexadecimal Dump
Formatting (Download) or (More Information) or (Top of COBOL List) This suite of sample programs describes Sequential File I/O and HEX-Dump formatting. The programs describe how to dump the input records to an output file in Hexadecimal format. This suite of programs will run on a Personal Computer with Windows and Micro Focus COBOL. The use of the EXTFHTAB.CFG file is used to override the Micro Focus default that replaces TAB characters with SPACE characters. The COBOL programs are compiled with the ASSIGN(EXTERNAL) and the SEQUENTIAL(LINE) directives. The former provides for external file mapping of file names. The latter provides for the mapping of the SEQUENTIAL files specified in the COBOL program to LINE SEQUENTIAL (or ASCII/TEXT) files. This technique provides for the use of a single COBOL source program that uses standard COBOL/2 dialect for sequential file processing. Note: The zip file name is txthex01.zip and the approximate size is 32K. |
||||||
| COBOL,
Snap Dump Routine (Download) or (More Information) or (Top of COBOL List) The objective of this suite of sample programs and documentation is to describe how to use a callable routine that will dump the Working Storage Section of the calling program. Note: The zip file name is cbsnap01.zip and the approximate size is 18K. |
||||||
| COBOL,
Street Address Parse and Identify PO Box Addresses (Download) or (More Information) or (Top of COBOL List) The objective of this suite of programs is to examine a data string containing a street address and produce a new data string with an edited version of the street address. The program will also identify Post Office Box addresses. Note: The zip file name is cblstr01.zip and the approximate size is 36K. |
||||||
| COBOL,
Table Processing Linear or Binary Search (Download) or (More Information) or (Top of COBOL List) This suite of programs describes how to load a table and then search the table using standard COBOL search or custom coded search methods. Note: The zip file name is cblbin01.zip and the approximate size is 36K. |
||||||
| COBOL,
Table Processing, Loading a Table and Bubble Sort (Download) or (More Information) or (Top of COBOL List) This suite of sample programs describes how to use COBOL to load a table with customer information and then sort the table using a bubble sort routine. Note: The zip file name is cbltbl01.zip and the approximate size is 32K. |
||||||
| COBOL,
Table Processing, Creating and Processing Binary Tables (Download) or (More Information) or (Top of COBOL List) This suite of sample programs describes how to use COBOL to create a table of binary values from X'00' through X'FF'. Note: The zip file name is binbit01.zip and the approximate size is 30K. |
||||||
| COBOL,
Tips and Techniques (Download) or (More Information) or (Top of COBOL List) This suite of programs shows various COBOL coding techniques to perform tasks or provide function that may be considered outside the primary business processing requirements. Note: The zip file name is cbltrx01.zip and the approximate size is 40K. |
||||||
|
COBOL,
File Conversion, Volume 1 (Download) or (More Information) or (Top of COBOL List) This suite of programs shows how to convert the organization of a file between sequential and keyed indexed, change the file content between ASCII and EBCDIC or change the organization of fields by position within a record. NoteThe file name is cble2a01.zip and the approximate size is 80K. |
||||||
| COBOL,
File Conversion, Volume 2 (Download) or (More Information) or (Top of COBOL List) This Z-Pack will discuss the cycle of how to convert a VSAM, KSDS to a flat Sequential file on the mainframe, download the flat sequential file from the mainframe to the PC and create an Indexed file of ASCII content on the PC. Additional programs are included for converting ASCII, Text files to Indexed files. These examples also show how to manage Packed-Decimal and BINARY or COMP fields. Note The file name is cbldfc01.zip and the approximate size is 150K. |
||||||
| COBOL,
Variable Length Records within a Sequential File (Download) or (More Information) or (Top of COBOL List) This program suite provides an example of how to create and access a sequential file containing variable length records. This job will run on an MVS mainframe or Micro Focus Mainframe Express. This is a COBOL program. Note: The zip file name is cblv8001.zip and the approximate size is 38K. |
||||||
| COBOL,
Variable Length Records (File Transfer, Share, Convert and
Compare) (Download) or (More Information) or (Top of COBOL List) This program suite provides an example of how to Transfer, Share, Convert and Compare sequential files containing variable length records. This job will run on an MVS mainframe or Micro Focus Mainframe Express. This is a COBOL program. Note: The zip file name is cblvlr01.zip and the approximate size is 38K. |
||||||
|
COBOL,
VSAM for Hex-Dump (Download) or (More Information) or (Top of COBOL List) This program reads a VSAM, Keyed Sequential Data Set (KSDS) and writes a sequential (QSAM) file that contains hexadecimal information. This job will run on an MVS mainframe or Micro Focus Mainframe Express. This is a COBOL program. Note: The zip file name is simhex01.zip and the approximate size is 27K. |
||||||
| COBOL,
Net Express, Environment, Command Line & File Name (Download) or (More Information) or (Top of COBOL List) This is an example of how a COBOL program can access (i.e. Get or Set) environment variables using Micro Focus Net Express. The sample program start by setting an environment variable for a file name. The program then gets the environment variable and displays the environment value on the screen. Next the program calls a second program that does file I/O. Since the second program is compiled with the SEQUENTIAL(LINE) directive the second program will read the ASCII/Text file specified in the environment value that was set in the first program. Note: The zip file name is nxcsys01.zip and the approximate size is 18K. |
||||||
|
||||||
| (Next) (Previous) (Table-of-Contents) | ||||||
|
COBOL
and Java, The SimoTime December Project (Download) or (More Information) or (Top of COBOL-Java List) This packet contains the Java and COBOL programs, the Java Server Pages (JSP) and the HTML documents for the Demonstration and Examples of how Java and COBOL work together as complementary technologies. Note: The zip file name is simojlib.zip and the approximate size is 77K. |
||||||
|
||||||
| (Next) (Previous) (Table-of-Contents) | ||||||
| CICS,
Menu Programs (Download) or (More Information) or (Top of CICS List) This suite of programs provides an example of how to use BMS (Basic Mapping Support) and COBOL programs to present and process a sequence of "Menu-oriented" screens. Note: The zip file name is cicsmn01.zip and the approximate size is 18K. |
||||||
| CICS,
File Management Programs (Download) or (More Information) or (Top of CICS List) This example uses a a suite of COBOL programs and BMS mapsets to execute programs that will provide data file inquiry or update functionality for the Customer and Item Master files. Note: The zip file name is cicsfm01.zip and the approximate size is 30K. |
||||||
| CICS,
File Management, Customer Master FIle (Download) or (More Information) or (Top of CICS List) This example uses a a suite of COBOL programs and BMS mapsets to execute programs that will provide data file inquiry or update functionality for the Customer Master FIle. Note: The zip file name is cicscm01.zip and the approximate size is 25K. |
||||||
| CICS,
File Management, Item Master File (Download) or (More Information) or (Top of CICS List) This example uses a a suite of COBOL programs and BMS mapsets to execute programs that will provide data file inquiry or update functionality. Note: The zip file name is cicsim01.zip and the approximate size is 30K. |
||||||
| CICS,
Hexadecimal Dump of Customer Records (Download) or (More Information) or (Top of CICS List) This example uses a suite of COBOL programs and BMS mapsets to display the contents of a user requsted record from the Customer Master File. The information is displayed in a hexadecimal (or DUMP) format. This transaction is provided as a tool for programmers and support personnel. Note: The zip file name is cicshx01.zip and the approximate size is 20K. |
||||||
| CICS,
Look-up for File Status Code (Download) or (More Information) or (Top of CICS List) This example uses a a suite of COBOL programs and BMS mapsets to display a screen to prompt a user for a file status code. When the user enters the code a brief discription of what caused the condition will be displayed. The programs use command level CICS statements to access the VSAM File with status codes and descriptions. The information is displayed to a 3270 terminal or terminal emulator. This transaction is provided as a tool for programmers and support personnel. Note: The zip file name is cicsfs01.zip and the approximate size is 20K. |
||||||
| CICS,
Access the File Properties Repository (Download) or (More Information) or (Top of CICS List) This suite of programs will provide the capability of creating and managing a repository of file properties (FPMASTER) for Data Files, Partitioned Data Sets (PDS) and GDG Base definitions used by a mainframe application or group of applications. . This transaction is provided as a tool for programmers and support personnel. Note: The zip file name is cicsfp01.zip and the approximate size is 20K. |
||||||
| CICS,
Access the Application Properties Repository (Download) or (More Information) or (Top of CICS List) The suite of programs provides the capability of creating and managing a repository of information or "Application Properties Repository" for the source code used by a mainframe application or group of applications. . This transaction is provided as a tool for programmers and support personnel. Note: The zip file name is cicsap01.zip and the approximate size is 20K. |
||||||
| CICS,
Access FCT Information in DFHDRDAT and Post to a CSV File (Download) or (More Information) or (Top of CICS List) The resources used by the Micro Focus Enterprise Server, Mainframe Subsystem Support (or ES/MSS) is stored in the the resource definitions file (DFHDRDAT). This file is a Micro Focus Key-Sequenced-Data-Set. This utility progam provides a batch access to get the FCT information and post this information into an ASCII/Text file with CSV formatted records. This transaction is provided as a tool for programmers and support personnel. Note: The zip file name is csdfct01.zip and the approximate size is 20K. |
||||||
| CICS,
Access PCT Information in DFHDRDAT and Post to a CSV File (Download) or (More Information) or (Top of CICS List) The resources used by the Micro Focus Enterprise Server, Mainframe Subsystem Support (or ES/MSS) is stored in the the resource definitions file (DFHDRDAT). This file is a Micro Focus Key-Sequenced-Data-Set. This utility progam provides a batch access to get the PCT information and post this information into an ASCII/Text file with CSV formatted records. This transaction is provided as a tool for programmers and support personnel. Note: The zip file name is csdpct01.zip and the approximate size is 20K. |
||||||
| CICS,
Submit JCL to INTRDR from CICS (Download) or (More Information) or (Top of CICS List) This example uses a COBOL program running under CICS to submit a job (i.e. JCL) to the Internal Reader (or INTRDR). The program uses command level CICS statements (EXEC CICS SPOOL) to access the internal reader. The program will run on an IBM Mainframe System with CICS or a Microsoft Windows System with Micro Focus Server and the Mainframe Sub-System option. This transaction is provided as a tool for programmers and support personnel. Note: The zip file name is ccsrdr01.zip and the approximate size is 20K. |
||||||
|
||||||
| (Next) (Previous) (Table-of-Contents) | ||||||
| JCL,
Quick Reference with Examples (Download) or (More Information) or (Top of JCL List) This suite of programs provides a quick reference document for mainframe JCL. Note: The zip file name is jclone01.zip and the approximate size is 15K. |
||||||
| JCL,
Basic JCL Functions with SORT Examples (Download) or (More Information) or (Top of JCL List) This file contains sample mainframe JCL to do syntax checking of a JCL member without executing the job steps. The first two JOB steps use IEFBR14 to delete previously created files and then uses IEBGENER to create a new file. The next two JOB steps use the SORT utility to copy a file and to sort a file. A job step is included that will do a case insensitive sort. The JCL may be executed on the mainframe as an MVS batch job. The JOB and DD statements will require modification prior to execution in different mainframe environments. Note: The zip file name is jclscn01.zip and the approximate size is 12K. |
||||||
|
JCL,
Conditional Processing (Download) or (More Information) or (Top of JCL List) This file contains sample mainframe JCL to do conditional processing. The JCL may be executed on the mainframe as an MVS batch job. The JOB and DD statements will require modification prior to execution in different mainframe environments. Note: The zip file name is jclcon01.zip and the approximate size is 8K. |
||||||
| JCL,
Replace the ++INCLUDE Statements with Standard JCL
Statements (Download) or (More Information) or (Top of JCL List) The ++INCLUDE is a function that is supported by CA-Panvalet for JCL Members stored and used on an IBM Mainframe. This function is not supported in the Micro Focus environment. When migrating a batch application that uses this function it will be necessary to change the ++INCLUDES to standard JCL statements that are supported in a Micro Focus environment and the mainframe. A conversion utility program (JCLALTC1.CBL) is available to do this conversion. A Windows command file is used to automate the process. Refer to JCLALTE1.CMD for more information.. Note: The zip file name is jclalt01.zip and the approximate size is 10K. |
||||||
| JCL,
Internal Reader and Job Submission (Download) or (More Information) or (Top of JCL List) This suite of programs will describe how to submit a second job from within the current running job. A small sequential file is created by the second JCL member. The JCL may be executed on the mainframe as an MVS batch job. The JOB and DD statements will require modification prior to execution in different mainframe environments. Note: The zip file name is intrdr01.zip and the approximate size is 10K. |
||||||
|
JCL,
Managing PDS's (Download) or (More Information) or (Top of JCL List) This file contains sample mainframe JCL to create Partitioned Data Sets (PDS's). The JCL may be executed on the mainframe as an MVS batch job. The JOB and DD statements will require modification prior to execution in different mainframe environments. Note: The zip file name is utldat02.zip and the approximate size is 12K. |
||||||
| JCL,
using PROCs with Parameter Substitution (Download) or (More Information) or (Top of JCL List) This file contains sample mainframe JCL using JCL Procedures to create and delete Partitioned Data Sets (PDS's). The JCL may be executed on the mainframe as an MVS batch job. The JOB and DD statements will require modification prior to execution in different mainframe environments. Note: The zip file name is jclprc01.zip and the approximate size is 10K. |
||||||
| JCL,
using PROCs with Procedure Overrides (Download) or (More Information) or (Top of JCL List) This file contains sample mainframe JCL using JCL Procedures that describe how to use parameter substitution and override values in a procedure that is to be executed. The JCL may be executed on the mainframe as an MVS batch job. The JOB and DD statements will require modification prior to execution in different mainframe environments. Note: The zip file name is jclovr01.zip and the approximate size is 17K. |
||||||
| JCL,
using INCLUDE and JCLLIB Statements (Download) or (More Information) or (Top of JCL List) This suite of programs will describe how to use the INCLUDE capability provided with JES and JCL Members. This capability and the information it provides is quite useful when supporting or migrating a batch application and data from a Mainframe System to a Windows System using Micro Focus technologies. The JCL may be executed on the mainframe as an MVS batch job. The JOB and DD statements will require modification prior to execution in different mainframe environments. Note: The zip file name is jclinc01.zip and the approximate size is 18K. |
||||||
|
JCL,
Compiling and Linking a Program (Download) or (More Information) or (Top of JCL List) This file contains sample mainframe JCL to compile and link programs. The JCL may be executed on the mainframe as an MVS batch job. The JOB and DD statements will require modification prior to execution in different mainframe environments. Note: The zip file name is utldat03.zip and the approximate size is 12K. |
||||||
|
JCL,
Passing a Parameter to a COBOL Program (Download) or (More Information) or (Top of JCL List) This packet is an example of how a COBOL program accesses and processes a data string specified as a parameter as part of the EXEC statement in the JCL that is running the job. The COBOL programs are written using the IBM VS COBOL II dialect and should work with COBOL for MVS and COBOL/370. A JCL member is provided to run the job as an MVS batch job on an IBM mainframe or as a project with Micro Focus Mainframe Express (MFE) running on a PC with Windows. Note: The zip file name is cblpar01.zip and the approximate size is 10K. |
||||||
| JCL,
Setting and Substituting Variables within JCL (Download) or (More Information) or (Top of JCL List) The purpose of this suite of programs is to describe how to define and use a variable within a JCL member or Procedure member. A JCL member with eight (8) job steps is provided to run the job as an MVS batch job on an IBM mainframe or as a project with Micro Focus Mainframe Express (MFE) running on a PC with Windows. Note: The zip file name is jclsub01.zip and the approximate size is 10K. |
||||||
| JCL,
using IEBGENER and IDCAMS to create a File and VSAM, KSDS
(Download) or (More Information) or (Top of JCL List) The purpose of this suite of programs is to describe how to use IEBGENER to create a sequential file with a list of file status codes. The example then uses IDCAMS to create and populate a VSAM, KSDS with the information. A JCL member with four (4) job steps is provided to run the job as an MVS batch job on an IBM mainframe or as a project with Micro Focus Mainframe Express (MFE) running on a PC with Windows. Note: The zip file name is stcams01.zip and the approximate size is 18K. |
||||||
| JCL,
using Micro Focus Enterprise Server with Default File Location
Override (Download) or (More Information) or (Top of JCL List) This example will focus on Micro Focus Enterprise Server and the Mainframe Sub-System (or ES/MSS). When a Region (or Server) is configured within Micro Focus Enterprise Server to run batch jobs (i.e. submit JCL) a default directory is defined and used for placement of new physical files that are allocate by a job. This is an example of how to catalog a new data set and override the base configuration and place the physical file in an alternate directory. Note: The zip file name is alocat01.zip and the approximate size is 18K. |
||||||
|
||||||
| (Next) (Previous) (Table-of-Contents) | ||||||
(Download) or (More Information) or (Top of SQL List) This suite of programs provides examples of how to create, manipulate and delete a relational data base using embedded SQL in COBOL programs. The COBOL programs were originally written to be compliant with the IBM COBOL 390 dialect. JCL members are provided to run the jobs as ZOS batch jobs on an IBM mainframe or as a project with Micro Focus Mainframe Express (MFE) running on a PC with Windows. Note: The zip file name is itqrdb01.zip and the approximate size is 71K. |
||||||
|
||||||
| (Next) (Previous) (Table-of-Contents) | ||||||
| Data Tracker, Data File Inventory
Management (Download) or (More Information) or (Top of VSAM-QSAM List) This example will use a Windows System running a Micro Focus sub-system to create a Key-Sequenced-Data-set containing an inventory of traditional sequential files and VSAM Data Sets. Once the inventory of files has been created it will be possible to use this information to build a catalog for Micro Focus Mainframe Express or Micro Focus Studio/Server environments. Note The zip file name is datrak01.zip and the approximate size is 25K. |
||||||
| GDG, Generation Data Group, Define and
Process (Download) or (More Information) or (Top of VSAM-QSAM List) This suite of sample programs describes how to define a Generation Data Group (GDG). Once the GDG is defined the creation of a Generation Date Set (referred to as a generation or GDS) within the group discussed. The COBOL program is written using IBM VS COBOL II dialect and should work with COBOL for MVS and COBOL/370. A JCL member is provided to run the job as an MVS batch job on an IBM mainframe or as a project with Micro Focus Mainframe Express (MFE) running on a PC with Windows. Note The zip file name is gdgone01.zip and the approximate size is 28K. |
||||||
| QSAM, Processing from a Single COBOL
Program (Download) or (More Information) or (Top of VSAM-QSAM List) This suite of programs provides an example of how a single mainline COBOL program accesses a QSAM or Sequential file. The COBOL program is written using IBM VS COBOL II dialect and should work with COBOL for MVS and COBOL/370. A JCL member is provided to run the job as an MVS batch job on an IBM mainframe or as a project with Micro Focus Mainframe Express (MFE) running on a PC with Windows. Note The zip file name is cblqsm03.zip and the approximate size is 15K. |
||||||
| QSAM, a COBOL Mainline Program calls a COBOL I/O Routine for
Sequential File Processing (Download) or (More Information) or (Top of VSAM-QSAM List) This suite of programs provides an example of how a mainline COBOL program calls a mainframe COBOL I/O routine to access a QSAM or Sequential file. Both COBOL programs are written using the VS COBOL II dialect and should work with COBOL for MVS, COBOL/370, OS390 and Enterprise COBOL. A JCL member is provided to run the job as an MVS batch job on an IBM mainframe or as a project with Micro Focus Mainframe Express (MFE) running on a PC with Windows. A suite of Windows Command files is provided to run in a Windows environment with Micro Focus Net Express or Application Servers without JCL.. Note The zip file name is cblqsm01.zip and the approximate size is 35K. |
||||||
| QSAM, File Convert, Mainframe to Micro Focus,
Variable Length Records (Download) or (More Information) or (Top of VSAM-QSAM List) The objective of this suite of programs is to provide a solution for using FTP to download a mainframe sequential file with variable length records to a system that is running Microsoft Windows and Micro Focus COBOL and convert the file format to a Micro Focus sequential file with variable length records. Note The zip file name is vrecex01.zip and the approximate size is 15K. |
||||||
| VSAM & QSAM, Alternate Index for a Keyed
Sequential Data Set (Download) or (More Information) or (Top of VSAM-QSAM List) This file contains mainframe JCL and COBOL programs to create, populate and access a VSAM, Keyed Sequential Data Set (KSDS) with a Primary Key and an Alternate Index. This job will run on an MVS mainframe or Micro Focus Mainframe Express. The COBOL program is written using IBM VS COBOL II dialect and should work with COBOL for MVS and COBOL/370. Note: The zip file name is cblalt01.zip and the approximate size is 50K. |
||||||
|
VSAM & QSAM, Common Utilities (Download) or (More Information) or (Top of VSAM-QSAM List) This file contains mainframe JCL and COBOL programs to create, populate and delete VSAM data sets or QSAM files that are used by many of the sample programs. This job will run on an MVS mainframe or Micro Focus Mainframe Express. The COBOL program is written using IBM VS COBOL II dialect and should work with COBOL for MVS and COBOL/370. Note: The zip file name is utldat01.zip and the approximate size is 25K. |
||||||
|
VSAM, Processing from a Single COBOL
Program (Download) or (More Information) or (Top of VSAM-QSAM List) This suite of programs provides an example of how a single mainline COBOL program accesses a VSAM data set. The COBOL program is written using IBM VS COBOL II dialect and should work with COBOL for MVS and COBOL/370. A JCL member is provided to run the job as an MVS batch job on an IBM mainframe or as a project with Micro Focus Mainframe Express (MFE) running on a PC with Windows. Note: The zip file name is cblvsm01.zip and the approximate size is 25K. |
||||||
| VSAM, ESDS, Delete, Define and Add
Records (Download) or (More Information) or (Top of VSAM-QSAM List) This program suite provides an example of how to delete and define a new Entry Sequenced Data Set (ESDS) using Mainframe JCL. Once the new ESDS is created a COBOL program is used to add records to the data set. The COBOL program is written using IBM VS COBOL II dialect and should work with COBOL for MVS and COBOL/370. A JCL member is provided to run the job as an MVS batch job on an IBM mainframe or as a project with Micro Focus Mainframe Express (MFE) running on a PC with Windows. Note: The zip file name is esd12801.zip and the approximate size is 18K. |
||||||
| VSAM & QSAM, Extract File Information from
JCL (Download) or (More Information) or (Top of VSAM-QSAM List) This suite of programs will scan JCL members and extract file information based on the IDCAMS or DD statements. The file information will be written to a sequential file. This capability and the information it provides is quite useful when migrating a batch application and data from a Mainframe System to a Windows System using Micro Focus technologies. Note: The zip file name is jcscan01.zip and the approximate size is 25K. |
||||||
| VSAM & QSAM, Large Files with Micro
Focus (Download) or (More Information) or (Top of VSAM-QSAM List) This is an example of how Micro Focus COBOL can create and access large files (size exceeds 2 gigabytes) on a Windows platform. The COBOL program is written using IBM VS COBOL II dialect and should work with COBOL for MVS and COBOL/370. A JCL member is provided to run the job as an MVS batch job on an IBM mainframe or as a project with Micro Focus Mainframe Express (MFE) running on a PC with Windows. Note: The zip file name is ksdbig01.zip and the approximate size is 18K. |
||||||
| VSAM & QSAM, Populate a Catalog with Micro
Focus (Download) or (More Information) or (Top of VSAM-QSAM List) When doing an "application migration" or "transferring and sharing data" between a Mainframe System and a Windows System with Micro Focus Server it can be a challenge to create and populate the Server Catalog entries and make this a repeatable process. This document describes a possible solution to this challenge. Note: The zip file name is catpop01.zip and the approximate size is 30K. |
||||||
| File Status Codes, Format and
Display (Download) or (More Information) or (Top of VSAM-QSAM List) This suite of programs provides an example of how a mainline COBOL program can call a COBOL routine to format the two byte file status code that may contain binary data into a four byte numeric field that may be displayed. The routine will also provide a brief, one line description about the file status code. The COBOL program is written using IBM VS COBOL II dialect and should work with COBOL for MVS and COBOL/370. A JCL member is provided to run the job as an MVS batch job on an IBM mainframe or as a project with Micro Focus Mainframe Express (MFE) running on a PC with Windows. Note: The zip file name is cblrtn01.zip and the approximate size is 18K. |
||||||
| SORT, Simple Examples for Mainframe and Micro
Focus (Download) or (More Information) or (Top of VSAM-QSAM List) This suite of programs will describe how to do use the Micro Focus SORT program with a Windows command line or Mainframe JCL. The Mainframe JCL will execute on a Mainframe System with ZOS. A small sequential file is created and then sorted. Note: The zip file name is sortut01.zip and the approximate size is 18K. |
||||||
| VSAM & QSAM, Customer Master File, Programs to Create
Test Data (Download) or (More Information) or (Top of VSAM-QSAM List) This suite of programs includes an overview for a suite of programs that will create a file with obfuscated names and addresses that may be used as a Customer Master File. Note: The zip file name is obfdat01.zip and the approximate size is 60K. |
||||||
| VSAM & QSAM, Customer Master File, Name and Address
Files to Create Test Data (Download) or (More Information) or (Top of VSAM-QSAM List) This suite of files includes the name and address files that will be used to create a Customer Master File that may be used in a testing environment. Note: The zip file name is obfdat02.zip and the approximate size is 600K. |
||||||
| VSAM & QSAM, Customer Master File (Download) or (More Information) or (Top of VSAM-QSAM List) This suite of programs includes the following examples. 1. Create and populate a customer master file 2. Convert between EBCDIC and ASCII encoding formats 3. Extract data for using with a Microsoft Excel spread sheet. Note: The zip file name is cumast01.zip and the approximate size is 30K. |
||||||
| VSAM & QSAM, Item Master File (Download) or (More Information) or (Top of VSAM-QSAM List) This suite of programs includes the following examples. 1. Create and populate an item master file 2. Convert between EBCDIC and ASCII encoding formats 3. Extract data for using with a Microsoft Excel spread sheet. Note: The zip file name is itmast01.zip and the approximate size is 30K. |
||||||
| Data File Compare, A Simple Example (Download) or (More Information) or (Top of VSAM-QSAM List) This suite of programs is provided as one of the many possible solutions for comparing data files. This is a simple example that uses sequential files with 80-byte records. Note: The zip file name is cprs8001.zip and the approximate size is less than 32K. |
||||||
| Data File Compare, An Example of Moderate
Complexity (Download) or (More Information) or (Top of VSAM-QSAM List) This suite of programs is provided as one of the many possible solutions for comparing data files. It is a Data Set Compare with moderate complexity. It will compare two VSAM, Key-Sequenced-Data-Sets (KSDS). This example does a partial record compare. The positions to be compared within a record are defined by the user. Also, it will track new or deleted records. Note: The zip file name is cup30301.zip and the approximate size is less than 32K. |
||||||
| Data File Conversion with Eighty (80) Byte
Records (Download) or (More Information) or (Top of VSAM-QSAM List) This suite of sample programs will show an approach to the task of File format conversion between Line Sequential and Record Sequential files.Also, file content conversion between ASCII and EBCDIC will be discussed. This example uses sequential files with 80-byte records. Note: The zip file name is data8001.zip and the approximate size is 32K. |
||||||
| Data File with Multiple Record Types (Download) or (More Information) or (Top of VSAM-QSAM List) This is an example of how COBOL can create and process a file containing multiple record types. The records contain a combination of text strings and numeric values stored in various formats such as signed-zoned-decimal, packed and binary. Note: The zip file name is datmrt01.zip and the approximate size is 20KB. |
||||||
| Data Transfer, Share, Convert and Compare (Download) or (More Information) or (Top of VSAM-QSAM List) This suite of programs includes the following examples. 1. Create and populate a sequentail file. 2. Reformat the fields and create a new file 3. Convert between EBCDIC and ASCII 4. Extract data for using with a Microsoft Excel spread sheet. 5. Compare two data files Note: The zip file name is datcyc01.zip and the approximate size is 60K. |
||||||
| Data File Repro and Compare with IDCAMS and
COBOL (Download) or (More Information) or (Top of VSAM-QSAM List) This example will use IEBGENER to create a sequential file. This file will be used by IDCAMS to populate a VSAM, KSDS. The KSDS will then be copied to a sequential file with variable length records. The first file created will then be compared to the last file created using a COBOL program. This example includes JCL members and a COBOL program. In the world of programming there are many ways to solve a problem. This suite of programs is provided as one of the many possible solutions for data file format conversion and comparison. Note: The zip file name is datfmt01.zip and the approximate size is 25K. |
||||||
| Create, Manage and Use a File Properties
Repository (Download) or (More Information) or (Top of VSAM-QSAM List) This suite of programs will provide the capability of creating and managing a repository of file properties (FPMASTER) for data files, Partitioned Data Sets (PDS) and GDG Base definitions used by a mainframe application or group of applications. This capability and the information it provides is quite useful when supporting applications or migrating an application (source code, control information and data) from a Mainframe System to a Linux, UNIX or Windows System using Micro Focus technologies. Note: The zip file name is fpmast01.zip and the approximate size is 64K. |
||||||
|
||||||
| (Next) (Previous) (Table-of-Contents) | ||||||
| Numeric Example, Convert between Comma-Separated-Values &
Fixed-Field-Length (Download) or (More Information) or (Top of Numeric Examples List) This suite of programs provides an example of how to convert variable-length, display-oriented numeric values separated by a delimiter character (Comma-Separated-Value) into data strings of a fixed field length format. The fixed field length may be signed or unsigned values in a display, packed or binary format. Note: The zip file name is numbnt01.zip and the approximate size is 60K. |
||||||
| Numeric Example, Computational Numeric Values with a focus on
COMP, COMP-3 and COMP-5 (Download) or (More Information) or (Top of Numeric Examples List) This document (with sample programs) describes the internal format of the COMP, COMP-3 and COMP-5 numeric fields. The sample program will show techniques for displaying a field in a hexadecimal dump format Note: The zip file name is nbrtst01.zip and the approximate size is 25K. |
||||||
|
||||||
| (Next) (Previous) (Table-of-Contents) | ||||||
| Shared
Modules, SimoCARD, Optional Routines for Card Image Access (Executable
Modules) (Download) or (More Information) or (Top of Shared Modules List) The SimoCARD Series is an optional collection of callable routines that may be used to access sequential files with eighty (80) byte records. The files may be record sequential or line sequential. This z-Pack contains executable modules that have been compiled with Micro Focus Net Express. The intended use is for a system running Microsoft Windows and Micro Focus Net Express, Application Server or Enterprise Server. The SimoCARD Series requires the The SimoMODS Series to be installed Note: The zip file name is execcard.zip and the approximate size is 535K. |
||||||
| Shared
Modules, SimoMODS, Primary Routines and Driver Programs (Executable
Modules) (Download) or (More Information) or (Top of Shared Modules List) The SimoMODS Series is the primary collection of common callable routines and driver programs that may be used by many of the COBOL sample programs provided by SimoTime Enterprises. This z-Pack contains executable modules that have been compiled with Micro Focus Net Express. The intended use is for a system running Microsoft Windows and Micro Focus Net Express, Application Server or Enterprise Server. Note: The zip file name is execmods.zip and the approximate size is 810K. |
||||||
| Shared
Modules, SimoTRAK, Optional Routines for Program Tracking (Executable
Modules) (Download) or (More Information) or (Top of Shared Modules List) The SimoTRAK Series is an optional collection of callable routines and a preprocessor for use with the Micro Focus COBOL Compiler. The callable routines are used at execution time to track program execution with start, stop and elapsed times. The information is written to a log file and may be imported into an excel spread sheet. This z-Pack contains executable modules that have been compiled with Micro Focus Net Express. The intended use is for a system running Microsoft Windows and Micro Focus Net Express, Application Server or Enterprise Server. The SimoTRAK Series requires the The SimoMODS Series to be installed Note: The zip file name is execcard.zip and the approximate size is 410K. |
||||||
| Shared
Modules, SimoCARD, Optional Routines for Card Image Access (Source
Members) (Download) or (More Information) or (Top of Shared Modules List) The SimoCARD Series is an optional collection of routines that may be called by a COBOL program to access sequential files containing eighty (80) byte records. Note: The zip file name is simocard.zip and the approximate size is 50K. |
||||||
| Shared
Modules, SimoMODS, Primary Callable Routines and Driver Programs (Source
Members) (Download) or (More Information) or (Top of Shared Modules List) The SimoMODS Series is the primary collection of common callable routines and driver programs that may be used by many of the COBOL sample programs provided by SimoTime Enterprises. Note: The zip file name is simomods.zip and the approximate size is 215K. |
||||||
| Shared
Modules, SimoTRAK, Optional Routines for Program Tracking (Source
Members) (Download) or (More Information) or (Top of Shared Modules List) The SimoTRAK Series is an optional collection of callable routines and a preprocessor for use with the Micro Focus COBOL Compiler. The callable routines are used at execution time to track program execution with start, stop and elapsed times being posted to a log file that may be imported into an excel spread sheet. Note: The zip file name is simotrak.zip and the approximate size is 30K. |
||||||
| Shared
Modules, Text Message, Display to Screen and Write to a Log
File (Download) or (More Information) or (Top of Shared Modules List) This is an example of how to display a text string on the screen of a Command Line window. Also, the displayed text will be written to a log file. This z-Pack contains the source code and executable components. The intended use is for a system running Microsoft Windows with command file scripts that require posting of text messages to a log file for process validation and review. Note: The zip file name is simmsg01.zip and the approximate size is 10K. |
||||||
| Shared
Modules, Catalog List for Micro Focus Server (Download) or (More Information) or (Top of Shared Modules List) This utility program will list the contents of the CATALOG.DAT file that is used by Micro Focus Server for Mainframe Migration and Mainframe Express. This z-Pack contains the source code and executable components. The intended use is for a system running Microsoft Windows with command file scripts and Micro Focus Server for Mainframe Migration. Note: The zip file name is cblcat01.zip and the approximate size is 10K. |
||||||
| Shared
Modules, Directory Compare (Download) or (More Information) or (Top of Shared Modules List) The Directory Compare Utility Program may be used to compare the contents of two different directories or to compare the contents of the same directory before and after a job has executed. This z-Pack contains the source code and executable components. The intended use is for a system running Microsoft Windows with command file scripts and Micro Focus Server for Mainframe Migration. Note: The zip file name is dircom01.zip and the approximate size is 18K |
||||||
| Shared
Modules, Special Printing Requirements (Download) or (More Information) or (Top of Shared Modules List) This suite of programs will describe a starting point for handling special print requirements that are sometimes used by mainframe applications that are being moved to a Windows System with Micro Focus Net Experss and Enterprise Server. Note: The zip file name is lrsprt01.zip and the approximate size is 17K. |
||||||
| Shared
Modules, Scripted Application Build for Micro Focus
Environment (Download) or (More Information) or (Top of Shared Modules List) This document is an introduction or overview of the scripted application build process for an application that has been moved from a Mainframe System to a Windows system running a Micro Focus sub-system such as Enterprise Server, Application Server or Net Express. Note: The zip file name is bdscript.zip and the approximate size is 23K. |
||||||
| Shared
Modules, The ezSERIES for the Micro Focus Server Environment (Download) or (More Information) or (Top of Shared Modules List) This document is an introduction or overview of the ezSERIES of Windows Command files that may be used to start a region within Enterprise Server, submit or schedule batch jobs to a region within Enterprise Server or stop a region within Enterprise Server. Note: The zip file name is ezseries.zip and the approximate size is 15K. |
||||||
| Shared
Modules, Create, Manage and Use an Application Properties
Repository (Download) or (More Information) or (Top of Shared Modules List) This suite of programs (referred to as APMAST01) runs on a personal computer with Microsoft Windows (Windows/XP or later) and Micro Focus (Net Express 5.1 or later). The suite provides the capability of creating and managing a repository of information or "application properties" for the source code used by a mainframe application or group of applications. This information can be quite useful when supporting applications or migrating applications and data between a Mainframe System and a Windows System using Micro Focus technologies. Note: The zip file name is apmast01.zip and the approximate size is 54K. |
||||||
| Shared
Modules, Micro Focus, Export Catalog File Info to a CSV File (Download) or (More Information) or (Top of Shared Modules List) This suite of programs (referred to as MFCATXPT) runs on a personal computer with Microsoft Windows (Windows/XP or later) and Micro Focus (Net Express 5.1 or later). The MFCATXPT program will read the Micro FOcus Catalog and write data file information to a CSV File to feed other applications or an Excel spreadsheet. This information can be quite useful when supporting applications or migrating applications and data between a Mainframe System and a Windows System using Micro Focus technologies. Note: This suite of programs is included in the SimoMODS zPACK. The zip file name is simomods.zip and the approximate size is 300K. |
||||||
| Shared
Modules, Micro Focus, GET or SET Environment Variables (Download) or (More Information) or (Top of Shared Modules List) This suite of programs (referred to as MFENVARS) runs on a personal computer with Microsoft Windows (Windows/XP or later) and Micro Focus (Net Express 5.1 or later). The MFENVARS routine (or callable program) will provide the capability of getting or setting and environment variable to a 256-byte value for use in a Micro Focus environment. This information can be quite useful when supporting applications or migrating applications and data between a Mainframe System and a Windows System using Micro Focus technologies. Note: This suite of programs is included in the SimoMODS zPACK. The zip file name is simomods.zip and the approximate size is 300K. |
||||||
| Shared
Modules, Micro Focus, JES Log Presentation or Sharing
Alternatives (Download) or (More Information) or (Top of Shared Modules List) This suite of programs (referred to as MFJESLOG) runs on a personal computer with Microsoft Windows (Windows/XP or later) and Micro Focus (Net Express 5.1 or later).This program provides presentation alternatives for reviewing or sharing the contents of the Micro Focus JES log. The MFJESLOG program will read a JES Spool file created by Micro Focus and produce an HTML or CSV file with job and job step information such as start, stop and elapsed times along with the Job Name, Job Number and the condition code at the end of each step and at the end of job. This information can be quite useful when supporting applications or migrating applications and data between a Mainframe System and a Windows System using Micro Focus technologies. Note: This suite of programs is included in the SimoMODS zPACK. The zip file name is simomods.zip and the approximate size is 300K. |
|
||||||
| (Next) (Previous) (Table-of-Contents) |
The purpose of this document is to provide examples of various programming techniques for an independent or shared mainframe, PC and server environment. These examples are provided as a convenience to our customers and may be changed at the discretion of SimoTime Enterprises.
Permission to use, copy, modify and distribute this software, documentation or training material for any purpose requires a fee to be paid to SimoTime Enterprises. Once the fee is received by SimoTime the latest version of the software, documentation or training material will be delivered and a license will be granted for use within an enterprise, provided the SimoTime copyright notice appear on all copies of the software. The SimoTime name or Logo may not be used in any advertising or publicity pertaining to the use of the software without the written permission of SimoTime Enterprises.
SimoTime Enterprises makes no warranty or representations about the suitability of the software, documentation or learning material for any purpose. It is provided "AS IS" without any express or implied warranty, including the implied warranties of merchantability, fitness for a particular purpose and non-infringement. SimoTime Enterprises shall not be liable for any direct, indirect, special or consequential damages resulting from the loss of use, data or projects, whether in an action of contract or tort, arising out of or in connection with the use or performance of this software, documentation or training material.
If you have any questions, suggestions or comments please call or send an e-mail to: helpdesk@simotime.com
Check out The SimoTime Library for a wide range of topics for Programmers, Project Managers and Software Developers.
To review all the information available on this site start at The SimoTime Home Page .
If you have any questions, suggestions or comments please call or send an e-mail to: helpdesk@simotime.com
We appreciate your comments and feedback.
Founded in 1987, SimoTime Enterprises is a privately owned company. We specialize in the creation and deployment of business applications using new or existing technologies and services. We have a team of individuals that understand the broad range of technologies being used in today's environments. This includes the smallest thin client using the Internet and the very large mainframe systems. There is more to making the Internet work for your company's business than just having a nice looking WEB site. It is about combining the latest technologies and existing technologies with practical business experience. It's about the business of doing business and looking good in the process. Quite often, to reach larger markets or provide a higher level of service to existing customers it requires the newer Internet technologies to work in a complementary manner with existing corporate mainframe systems. Whether you want to use the Internet to expand into new market segments or as a delivery vehicle for existing business functions simply give us a call or check the web site at http://www.simotime.com
| Return-to-Top |
| Copyright © 1987-2010 SimoTime Enterprises All Rights Reserved |
| When technology complements business |
| http://www.simotime.com |