 |
|
| When technology complements business | Z-Packs |
| Copyright © 1987-2008 SimoTime Enterprises, LLC All Rights Reserved | http://www.simotime.com |
|
|||||
|
|
||||||
| (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,
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,
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,
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, 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 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 mainframe under OS/390, a Personal Computer with Windows or UNIX platforms. The Windows or UNIX platforms require Micro Focus COBOL. The use of the extfh.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 will run on OS/390, Windows or UNIX. 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) | ||||||
| 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,
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 (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,
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. |
||||||
|
||||||
| (Next) (Previous) (Table-of-Contents) | ||||||
| SQL, Item File Example, Create, Manipulate and Delete a
Relation Data Base (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) | ||||||
| GDG, Generation Data Group, Define and
Process (Download) or ( |