The SimoCARD Series When technology complements business   Accessing 80-Column Card Files

Copyright © 1987-2008  SimoTime Enterprises, LLC  All Rights Reserved http://www.simotime.com

Introduction
(Next) (Previous) (Table-of-Contents)

This document provides a listing of the COBOL source code for the callable routines provided in the SimoCARD zPack (a suite of programs with documentation and sample data). Additional information about this program may be obtained by sending an e-mail to: helpdesk@simotime.com

The SimoCARD suite of programs will provide access to Record Sequential and Line Sequential data files consisting of eighty (80) byte records that have been downloaded from a mainframe using the File Transfer Protocol (FTP). The Record Sequential files are usually downloaded in BINARY mode and contain EBCDIC encoded data. The Line Sequential files are usually downloaded in ASCII mode and contain ASCII encoded data.

SimoCARD, How To Use
(Next) (Previous) (Table-of-Contents)

The SimoCARD suite of programs provide an easy, callable access to 80-byte sequentail files. the following callable members are provides.

SimoCARD, Preparing the Pass Area & the Call Interface
(Next) (Previous) (Table-of-Contents)

The following is an example of how to initialize the pass area and then sequentially read records from the file. The Gx80 notation would be replaced with GR80 for Record Sequential files and GL80 for Line Sequential files.

           move 'OPEN    ' to Gx80-FILE-REQUEST
           move ZERO       to Gx80-FILE-STATUS
           move SPACES     to Gx80-PASS-80
           call 'SIMOGx80' using Gx80-PASS-AREA

The following is an example of a call statement for the callable routine.

           call 'SIMOGx80' using Gx80-PASS-AREA

It is not necessary to do an explicit open of the input file. The first call to the routine will open the file and read the first record. Subsequent calls will return a logical record in the buffer.

      *****************************************************************
      *     Data Structure or Pass Area used for calling SIMOGT80.    *
      *****************************************************************
      *         Copyright (C) 1987-2006 SimoTime Enterprises          *
      *                     All Rights Reserved                       *
      *****************************************************************
      *              Provided by SimoTime Enterprises                 *
      *        Our e-mail address is: helpdesk@simotime.com           *
      *     Also, visit our Web Site at http://www.simotime.com       *
      *****************************************************************
      *
       01  GT80-PASS-AREA.
           05  GT80-PASS-REQUEST           PIC X(8).
           05  GT80-PASS-STATUS            PIC 9(4).
           05  GT80-FILE-REQUEST           PIC X(8).
           05  GT80-FILE-STATUS            PIC 9(4).
           05  GT80-PASS-80                PIC X(80).
      *!   PASSGT80 - End-of-Copy File...

The following is a list of the parameters required when using the CARD-PASS-AREA to call the SimoCARD routine.

The following is the copy statement used in the LINKAGE section of the SIMOCARD callable routine.

       COPY PASSCARD.

SimoCARD, Setting Environment Variables
(Next) (Previous) (Table-of-Contents)

The following are environment variables used by the SimoCARD read routine for mainframe formatted files with fixed-length records of 80-bytes.

Summary
(Next) (Previous) (Table-of-Contents)

The purpose of this document is to provide a COBOL Source member for viewing.

Software Agreement and Disclaimer
(Next) (Previous) (Table-of-Contents)

Permission to use, copy, modify and distribute this software for any commercial purpose requires a fee to be paid to Simotime Enterprises. Once the fee is received by SimoTime the latest version of the software 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.

Permission to use, copy, modify and distribute this software for a non-commercial purpose and without fee is hereby granted, 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 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.

Downloads and Links to Similar Pages
(Next) (Previous) (Table-of-Contents)

You may view the complete list of SimoTime callable Modules or Driver Programs at http://www.simotime.com/simomods.htm.

This item will provide a link to  an ASCII or EBCDIC translation table. A column for decimal, hexadecimal and binary is also included.

This document provides a quick summary of the  File Status Key  for VSAM data sets and QSAM files.

To review all the information available on this site start at  The SimoTime Home Page .

This link provides information about The Training Sessions and Self-Study Courses available from SimoTime Enterprises.

Glossary of Terms
(Next) (Previous) (Table-of-Contents)

Check out  The SimoTime Glossary  for a list of terms and definitions used in the documents provided by SimoTime.

Comments or Suggestions
(Next) (Previous) (Table-of-Contents)

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.

About SimoTime Enterprises, LLC
(Next) (Previous) (Table-of-Contents)

Founded in 1987, SimoTime Enterprises is a privately owned, Limited Liability Corporation located in Novato, California. 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