| |
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
Define a VSAM Cluster for CUSTMAST |
|
| |
|
|
|
|
|
|
|
|
|
|
|
|
|
|
Execute IDCAMS Program using DEFINE Function |
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
Define the VSAM Cluster for CUSTMAST |
| |
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
Populate CUSTMAST, a VSAM, KSDS |
|
| |
|
|
|
|
|
|
|
|
|
|
|
|
|
|
JCL, Execute COBOL Program |
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
Populate the VSAM Data Set with Customer Data |
|
|
|
|
|
|
|
Sequential data file for surnames |
|
|
|
|
|
|
|
Sequential data file for surnames |
|
|
|
|
|
|
|
Sequential data file for feminine first names |
|
|
|
|
|
|
|
Sequential data file for masculine first names |
|
|
|
|
|
|
|
Sequential data file for street names |
|
|
|
|
|
|
|
Sequential data file for City, State and Zip codeinfo |
| |
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
Define a VSAM Cluster for Baseline Copy |
|
| |
|
|
|
|
|
|
|
|
|
|
|
|
|
|
Execute IDCAMS Program using DEFINE Function |
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
Define the VSAM Cluster for Baseline Copy |
| |
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
Make a Baseline Copy of Customer Master |
|
| |
|
|
|
|
|
|
|
|
|
|
|
|
|
|
Execute IDCAMS Program using REPRO Function |
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
Copy Customer Master to Baseline |
| |
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
Modify or Update the Customer Master |
|
| |
|
|
|
|
|
|
|
|
|
|
|
|
|
|
Execute COBOL Program using instream Data |
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
Update Customer Master Records using INSTREAM Data |
| |
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
Compare Customer Master with Baseline Copy |
|
| |
|
|
|
|
|
|
|
|
|
|
|
|
|
|
Execute COBOL Program using Matching Record Logic |
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
Compare Master with Baseline |
| |
|
|
|
|
|
|
|
|
Regression Testing, a Sample Processing Cycle
|
Create a New Customer Master File
The first job that needs to be executed will use IDCAMS to define the VSAM Cluster. The second job will populate the VSAM Data Set with Customer information. The following flowchart shows the processing logic to create a new customer data set.
JCL, Define a VSAM Cluster for the Customer Master File
This job will create a VSAM, KSDS data set. The key is twelve characters starting at the first position in the record. The record length is 512 characters.
The following JCL Member (CUSCRTJ1.jcl) will define a VSAM Cluster for the customer data set.
//CUSCRTJ1 JOB SIMOTIME,CLASS=1,MSGCLASS=0,NOTIFY=CSIP1
//* *******************************************************************
//* CUSCRTJ1.JCL - a JCL Member for Batch Job Processing *
//* This JCL Member is provided by SimoTime Technologies *
//* (C) Copyright 1987-2019 All Rights Reserved *
//* Web Site URL: http://www.simotime.com *
//* e-mail: helpdesk@simotime.com *
//* *******************************************************************
//*
//* Text - Create an empty VSAM, KSDS data set using IDCAMS.
//* Author - SimoTime Technologies
//* Date - January 24, 1996
//*
//* This job will create a VSAM, KSDS data set. Refer to the INDEXED
//* parameter within the DEFINE CLUSTER.
//*
//* The key is twelve characters starting at the first position in
//* the record. Refer to the KEYS(12,0) parameter.
//*
//* The record length for the data set is 512 characters. Refer to
//* the RECORDIZE(512,512) where the first numeric value is the
//* AVERAGE and the second numeric value is the MAXIMUM length.
//*
//* This job script will run on an IBM Mainframe under ZOS or on a
//* Microsoft Windows System under Micro Focus Mainframe Express.
//*
//* *******************************************************************
//* Step 1 of 1, this is a single step job.
//*
//KSDSMAKE EXEC PGM=IDCAMS
//SYSPRINT DD SYSOUT=*
//SYSIN DD *
DEFINE CLUSTER (NAME(SIMOTIME.DATA.CUSTMAST) -
TRACKS(45,15) -
INDEXED) -
DATA (NAME(SIMOTIME.DATA.CUSTMAST.DAT) -
KEYS(12,0) -
RECORDSIZE(512,512) -
FREESPACE(10,15) -
CISZ(8192)) -
INDEX (NAME(SIMOTIME.DATA.CUSTMAST.IDX))
/*
//*
JCL, Populate the VSAM Keyed Sequence Data Set (KSDS)
The program that provides the capability of adding new records or replacing existing records is a COBOL program that may be compiled and executed on a mainframe system or a distributed system (Linux, UNIX or Windows) that is supported by Micro Focus. The program has the capability of adding one record to an empty VSAM Data Set or to add millions of records to an existing data set. A control file determines the number of records to add to a data set and the customer information is generated by input from various sequential files.
Note: Refer to the Downloads and Links to Similar Pages section of this document for additional information.
The following JCL Member (CUGNRUJ1.jcl) will populate (or load) a VSAM Data Set with customer information.
//CUGNRUJ1 JOB SIMOTIME,ACCOUNT,CLASS=1,MSGCLASS=0,NOTIFY=&SYSUID
//* *******************************************************************
//* CUGNRUJ1.JCL - a JCL Member for Batch Job Processing *
//* This JCL Member is provided by SimoTime Technologies *
//* (C) Copyright 1987-2019 All Rights Reserved *
//* Web Site URL: http://www.simotime.com *
//* e-mail: helpdesk@simotime.com *
//* *******************************************************************
//*
//* Text - Execute a COBOL program to update a Customer File.
//* Author - SimoTime Technologies
//* Date - January 01, 1997
//*
//* This COBOL program will read a control file and access the various
//* name files to populate or update a customer master file.
//*
//* This program uses a random UPDATE/ADD methodology.
//*
//* ************
//* * CUGNRUJ1 *
//* ********jcl*
//* *
//* *
//* ************ ************ ************
//* * OBFCTL80 *--*--* OBFDATC1 *-----* CUSTMAST *
//* *******rseq* * ********cbl* *******ksds*
//* * *
//* ************ * *
//* * LASTNAME *--* *
//* *******rseq* * *
//* * *
//* ************ * *
//* * FNAMEF01 *--* *
//* *******rseq* * *
//* * *
//* ************ * *
//* * FNAMEM01 *--* *
//* *******rseq* * *
//* * *
//* ************ * *
//* * STREET01 *--* *
//* *******rseq* * *
//* * *
//* ************ * *
//* * POSTCODE *--* *
//* *******rseq* * *
//* *
//* ************
//* * EOJ *
//* ************
//*
//* *******************************************************************
//* Step 1 of 1, Update existing or add new records to CUSTMAST
//*
//CUADDS01 EXEC PGM=OBFDATC1
//STEPLIB DD DISP=OLD,DSN=MFI01.SIMOPROD.LOADLIB1
//FNAMEF01 DD DISP=OLD,DSN=SIMOTIME.DATA.FNAMEF01
//FNAMEM01 DD DISP=OLD,DSN=SIMOTIME.DATA.FNAMEM01
//LASTNAME DD DISP=OLD,DSN=SIMOTIME.DATA.LASTNAME
//POSTCODE DD DISP=OLD,DSN=SIMOTIME.DATA.POSTCODE
//STREET01 DD DISP=OLD,DSN=SIMOTIME.DATA.STREET01
//OBF1CUST DD DISP=OLD,DSN=SIMOTIME.DATA.CUSTMAST
//* :....1....:....2....:....3....:....4....:....5....:....6....:....7....:....8
//OBFCTL80 DD *
* A comment is identified by an asterisk (*) in position one (1)
* ..:....1....:....2....:....3....:....4....:....5....:....6....
/CTL FLAGS=FFFF0000
/CTL RECORDS=45000
/*
//SYSOUT DD SYSOUT=*
//*
Make a Baseline Copy of the Customer Master File
The following two jobs will describe how to use IDCAMS to make a copy of the customer data set. As test cases are executed the Customer Data Set will be updated. This copy will be used as a base reference point for the file compare and change validation process.
JCL, Define a VSAM Cluster for a Baseline Copy
This job will create a VSAM, KSDS data set. The key is twelve characters starting at the first position in the record. The record length is 512 characters.
The following JCL Member (CUSCRTJ2.jcl) will create a new VSAM Cluster that will be used as a copy of the master data set.
//CUSCRTJ2 JOB SIMOTIME,CLASS=1,MSGCLASS=0,NOTIFY=&SYSUID
//* *******************************************************************
//* CUSCRTJ2.JCL - a JCL Member for Batch Job Processing *
//* This JCL Member is provided by SimoTime Technologies *
//* (C) Copyright 1987-2019 All Rights Reserved *
//* Web Site URL: http://www.simotime.com *
//* e-mail: helpdesk@simotime.com *
//* *******************************************************************
//*
//* This job will create a VSAM, KSDS data set. Refer to the INDEXED
//* parameter within the DEFINE CLUSTER.
//*
//* The key is twelve characters starting at the first position in
//* the record. Refer to the KEYS(12,0) parameter.
//*
//* The record length for the data set is 512 characters. Refer to
//* the RECORDIZE(512,512) where the first numeric value is the
//* AVERAGE and the second numeric value is the MAXIMUM length.
//*
//* This job script will run on an IBM Mainframe under ZOS or on a
//* Microsoft Windows System under Micro Focus Mainframe Express.
//*
//* *******************************************************************
//* Step 1 of 1, this is a single step job.
//*
//KSDSMAKE EXEC PGM=IDCAMS
//SYSPRINT DD SYSOUT=*
//SYSIN DD *
DEFINE CLUSTER (NAME(SIMOTIME.DATA.CUS512D2) -
TRACKS(45,15) -
INDEXED) -
DATA (NAME(SIMOTIME.DATA.CUS512D2.DAT) -
KEYS(12,0) -
RECORDSIZE(512,512) -
FREESPACE(10,15) -
CISZ(8192)) -
INDEX (NAME(SIMOTIME.DATA.CUS512D2.IDX))
/*
//*
JCL, Make a Baseline Copy of the Customer Master File using IDCAMS/REPRO
The following JCL Member (CUDUPEJ2.jcl) will execute the IDCAMS program to copy (i.e REPRO function of IDCAMS) the content from the customer master to the new VSAM Data Set.
//CUDUPEJ2 JOB SIMOTIME,ACCOUNT,CLASS=1,MSGCLASS=0,NOTIFY=CSIP1
//* *******************************************************************
//* CUDUPEJ2.JCL - a JCL Member for Batch Job Processing *
//* This JCL Member is provided by SimoTime Technologies *
//* (C) Copyright 1987-2019 All Rights Reserved *
//* Web Site URL: http://www.simotime.com *
//* e-mail: helpdesk@simotime.com *
//* *******************************************************************
//*
//* TEXT - COPY (OR REPRO) A VSAM, KSDS TO A VSAM, KSDS
//* AUTHOR - SIMOTIME TECHNOLOGIES
//* DATE - JANUARY 01, 1989
//*
//* *******************************************************************
//* Step 1 of 1, this is a single step job.
//*
// EXEC PGM=IDCAMS
//SYSPRINT DD SYSOUT=A
//CUSTMAST DD DSN=SIMOTIME.DATA.CUSTMAST,DISP=(SHR)
//CUST0512 DD DSN=SIMOTIME.DATA.CUS512D2,DISP=OLD
//SYSIN DD *
REPRO -
INFILE(CUSTMAST) -
OUTFILE(CUST0512)
/*
Modify or Update the Customer Master File
This COBOL program will read instream data and update fields in a VSAM Key-Sequenced-Data-Set (KSDS).
JCL, Update the Customer Master File using a COBOL Program
The following JCL Member (RTCUUPJ1.jcl) will make a change to the master data set.
//RTCUUPJ1 JOB SIMOTIME,ACCOUNT,CLASS=1,MSGCLASS=0,NOTIFY=CSIP1
//* *******************************************************************
//* This JCL Member is provided by SimoTime Technologies *
//* (C) Copyright 1987-2019 All Rights Reserved *
//* Web Site URL: http://www.simotime.com *
//* e-mail: helpdesk@simotime.com *
//* *******************************************************************
//*
//* Text - Execute a COBOL program, read INSTREAM and update KSDS.
//* Author - SimoTime Technologies
//* Date - January 01, 1997
//*
//* This COBOL program will read instream data and update fields in a
//* VSAM Key-Sequenced-Data-Set (KSDS).
//*
//* ************
//* * RTCUUPJ1 *
//* ********jcl*
//* *
//* *
//* ************ ************ ************
//* * CUSTSQ01 *-----* CUUPDC01 *-----* CUSTMAST *
//* **instream** ********cbl* *******vsam*
//* *
//* *
//* ************
//* * EOJ *
//* ************
//*
//* *******************************************************************
//* Positions Purpose/Description
//* 01-03 Control Information
//* 04-15 Key for KSDS Access
//* 15-71 Text string used for update
//*
//* *** ************************
//* /NL update CUST-LAST-NAME
//* /NF update CUST-FIRST-NAME
//* /NM update CUST-MIDDLE-NAME
//* /A1 update CUST-ADDRESS-1
//* /A2 update CUST-ADDRESS-2
//* /CT update CUST-CITY
//* /ST update CUST-STATE
//* /PC update CUST-POSTAL-CODE
//* /CL update CUST-CREDIT-LIMIT
//* /TH update CUST-PHONE-HOME
//* /TO update CUST-PHONE-OFFICE
//* /TM update CUST-PHONE-MOBILE
//*
//* *******************************************************************
//* Step 1 This is a single step job.
//*
//CUUPDS01 EXEC PGM=CUUPDC01
//STEPLIB DD DISP=SHR,DSN=MFI01.SIMOPROD.LOADLIB1
//CUSTMAST DD DISP=SHR,DSN=SIMOTIME.DATA.CUSTMAST
//SYSOUT DD SYSOUT=*
//CUSTSQ01 DD *
/NM000000022023Lee
/A2000000032760Suite 41
/*
//*
Compare the Customer Master File with the Baseline Copy
This step will run a program that does a compare of the master data set with an original copy and will identify changes made to the master data set. Since the records in the data sets have date and time fields that may in a "not equal" condition the program is designed to do partial record compares that bypass the date and time fields.
Note: The compare program was generated by SimoTime Technologies. The generated program is COBOL source code that may be compiled on a mainframe system or a distributed system (Linux, UNIX or Windows) that is supported by Micro Focus. Refer to the Downloads and Links to Similar Pages section of this document for how the compare program is generated.
JCL, Compare the Customer Master File with the Baseline Copy
The following JCL Member (CUP303J1.jcl) will execute a COBOL program that will compare the master data set with a second (or baseline) data set created at the beginning of this regression test cycle.
//CUP303J1 JOB (SIMOTIME),'VSAM KSDS COMPARE',CLASS=1,MSGCLASS=0,
// NOTIFY=CSIP1
//* *******************************************************************
//* CUP303J1.JCL - a JCL Member for Batch Job Processing *
//* This JCL Member is provided by SimoTime Technologies *
//* (C) Copyright 1987-2019 All Rights Reserved *
//* Web Site URL: http://www.simotime.com *
//* e-mail: helpdesk@simotime.com *
//* *******************************************************************
//*
//* Text - Compare two VSAM Key-Sequenced-Data-Sets (KSDS).
//* Author - SimoTime Technologies
//* Date - January 24, 1996
//*
//* This example will do a compare of part of the records in the
//* data set. The actual record length is 512 bytes but the compare
//* will only compare the first 303 positions of a record.
//*
//* Since the files are in sequence by the key-field the program
//* will explicity identify deleted or added records.
//*
//* This set of programs will run on a mainframe under MVS or on a
//* Personal Computer with Windows and Micro Focus Technologies.
//*
//* ************
//* * CUP303J1 *
//* ********jcl*
//* *
//* ************ ************ ************
//* * CUEXPECT *--*--* CUP303C1 *-----* SYSLOG *
//* *******ksds* * ********cbl* ************
//* * *
//* ************ * *
//* * CUACTUAL *--* *
//* *******ksds* *
//* *
//* ************
//* * EOJ *
//* ************
//*
//* *******************************************************************
//* Compare two VSAM KSDS's or Customer Master Files...
//* The positions within the records to be compared are determined by
//* the COMPARE statements in the Process Control File. This is done
//* when the compare program is generated.
//*
//* The results of the compare processing is posted to the SYSLOG File.
//* The results file must exist and new information is appended to the
//* end of the file. For more information about how to create an empty
//* log file (SYSOUT) refer to the SYSLOGJ8.JCL Member.
//*
//* *******************************************************************
//* Step 1 of 1, this is a single step job.
//*
//CUSTCOMP EXEC PGM=CUP303C1
//STEPLIB DD DSN=SIMOTIME.DEMO.LOADLIB1,DISP=SHR
//CUEXPECT DD DSN=SIMOTIME.DATA.CUSTMAST,DISP=SHR
//CUACTUAL DD DSN=SIMOTIME.DATA.CUS512D2,DISP=SHR
//SYSLOG DD SYSOUT=*
//SYSOUT DD SYSOUT=*
//
Compare, Sample Output when a Difference is Identified
The following shows the content of the SYSLOG file that is produced when a "not equal" condition is encountered. The "yellow high-lighted" lines identify the positions within the record where the "not equal" conditions occur.
*** 2011/11/11 22:00:53:67 ********************************************************************************
*** 2011/11/11 22:00:53:67 Starting - Comparison, CustMAST from 1 to 303 http://www.SimoTime.com
*** 2011/11/11 22:00:53:67 ********************************************************************************
*** 2011/11/11 22:00:53:67 * CUP303C1 Comparison, CustMAST from 1 to 303 v10.07.12 helpdesk@simotime.com
*** 2011/11/11 22:00:53:69 * CUP303C1 This Data File Compare Member was generated by SimoTime Technologies
*** 2011/11/11 22:00:54:36 CUACTUAL..000022023(00001:00303) COMPARISON PHYSICAL
*** 2011/11/11 22:00:54:36 ....:...10....:...20....:...30....:...40....:...50....:...60....:...70....:...80....:...90....:..100....:..110....:..120....:..130....:..140....:..150....:..160....:..170....:..180....:..190....:..200....:..210....:..220....:..230....:..240....:..250....:..260....:..270....:..280....:..290....:..300...
*** 2011/11/11 22:00:54:36 000000022023 Koontz Roger 930 Arguello Jamaica IA 50128 ....
*** 2011/11/11 22:00:54:36 333333333333246667722222222222222222222225666722222222222222222222222222222222222333247676666222222222222222222222222222222222222222222222222222222222222222222222222222222222222466666622222222222222222222244222222222222222222222222223333322222222222222222222222222222222222222222222222222222222222220000
*** 2011/11/11 22:00:54:36 0000000220230BFFE4A00000000000000000000002F75200000000000000000000000000000000000930012755CCF000000000000000000000000000000000000000000000000000000000000000000000000000000000000A1D19310000000000000000000009100000000000000000000000000501280000000000000000000000000000000000000000000000000000000000000000F
*** 2011/11/11 22:00:54:36 ..............??>.:.......................?...............................................%%?...................................................................................../_/../.......................................................................................................................
*** 2011/11/11 22:00:54:36 CUEXPECT..000022023(00001:00303) COMPARISON PHYSICAL
*** 2011/11/11 22:00:54:36 ....:...10....:...20....:...30....:...40....:...50....:...60....:...70....:...80....:...90....:..100....:..110....:..120....:..130....:..140....:..150....:..160....:..170....:..180....:..190....:..200....:..210....:..220....:..230....:..240....:..250....:..260....:..270....:..280....:..290....:..300...
*** 2011/11/11 22:00:54:36 000000022023 Koontz Roger Lee 930 Arguello Jamaica IA 50128 ....
*** 2011/11/11 22:00:54:36 333333333333246667722222222222222222222225666722222222222222246622222222222222222333247676666222222222222222222222222222222222222222222222222222222222222222222222222222222222222466666622222222222222222222244222222222222222222222222223333322222222222222222222222222222222222222222222222222222222222220000
*** 2011/11/11 22:00:54:36 0000000220230BFFE4A00000000000000000000002F752000000000000000C5500000000000000000930012755CCF000000000000000000000000000000000000000000000000000000000000000000000000000000000000A1D19310000000000000000000009100000000000000000000000000501280000000000000000000000000000000000000000000000000000000000000000F
*** 2011/11/11 22:00:54:37 ..............??>.:.......................?..................<............................%%?...................................................................................../_/../.......................................................................................................................
*** 2011/11/11 22:00:54:37 =============================================================###===============================================================================================================================================================================================================================================
*** 2011/11/11 22:00:54:37 *
*** 2011/11/11 22:00:54:70 CUACTUAL..000032760(00001:00303) COMPARISON PHYSICAL
*** 2011/11/11 22:00:54:70 ....:...10....:...20....:...30....:...40....:...50....:...60....:...70....:...80....:...90....:..100....:..110....:..120....:..130....:..140....:..150....:..160....:..170....:..180....:..190....:..200....:..210....:..220....:..230....:..240....:..250....:..260....:..270....:..280....:..290....:..300...
*** 2011/11/11 22:00:54:70 000000032760 Shand Franchesca 4966 Harrison Cunningham TX 75434 ....
*** 2011/11/11 22:00:54:70 333333333333256666222222222222222222222224766666766222222222222222222222222222222333324677676622222222222222222222222222222222222222222222222222222222222222222222222222222222222476666666622222222222222222255222222222222222222222222223333322222222222222222222222222222222222222222222222222222222222220000
*** 2011/11/11 22:00:54:72 0000000327600381E400000000000000000000000621E38533100000000000000000000000000000049660812293FE0000000000000000000000000000000000000000000000000000000000000000000000000000000000035EE9E781D0000000000000000004800000000000000000000000000754340000000000000000000000000000000000000000000000000000000000000000F
*** 2011/11/11 22:00:54:72 .............../>........................../>...../..................................../....?>.....................................................................................>>.>../_....................................................................................................................
*** 2011/11/11 22:00:54:72 CUEXPECT..000032760(00001:00303) COMPARISON PHYSICAL
*** 2011/11/11 22:00:54:72 ....:...10....:...20....:...30....:...40....:...50....:...60....:...70....:...80....:...90....:..100....:..110....:..120....:..130....:..140....:..150....:..160....:..170....:..180....:..190....:..200....:..210....:..220....:..230....:..240....:..250....:..260....:..270....:..280....:..290....:..300...
*** 2011/11/11 22:00:54:72 000000032760 Shand Franchesca 4966 Harrison Suite 41 Cunningham TX 75434 ....
*** 2011/11/11 22:00:54:72 333333333333256666222222222222222222222224766666766222222222222222222222222222222333324677676622222222222222222222222222222222222576762332222222222222222222222222222222222222222476666666622222222222222222255222222222222222222222222223333322222222222222222222222222222222222222222222222222222222222220000
*** 2011/11/11 22:00:54:72 0000000327600381E400000000000000000000000621E38533100000000000000000000000000000049660812293FE0000000000000000000000000000000000035945041000000000000000000000000000000000000000035EE9E781D0000000000000000004800000000000000000000000000754340000000000000000000000000000000000000000000000000000000000000000F
*** 2011/11/11 22:00:54:72 .............../>........................../>...../..................................../....?>.....................................................................................>>.>../_....................................................................................................................
*** 2011/11/11 22:00:54:72 =================================================================================================================================#####=##======================================================================================================================================================================
*** 2011/11/11 22:00:54:72 *
*** 2011/11/11 22:00:55:09 Conclude - Comparison, CustMAST from 1 to 303
*** 2011/11/11 22:00:55:11 000045000 - Record count for CUACTUAL
*** 2011/11/11 22:00:55:11 000045000 - Record count for CUEXPECT
*** 2011/11/11 22:00:55:11 000000002 - NOT Equal result for compare of existing records
*** 2011/11/11 22:00:55:11 ABENDING - Comparison, CustMAST from 1 to 303 http://www.SimoTime.com
Summary
The purpose of this document is to assist as a tutorial for new programmers or as a quick reference for experienced programmers. In the world of programming there are many ways to solve a problem. This document and the links to other documents are intended to provide a choice of alternatives.
Software Agreement and Disclaimer
Permission to use, copy, modify and distribute this software, documentation or training material for any purpose requires a fee to be paid to SimoTime Technologies. 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 Technologies.
SimoTime Technologies 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 expressed or implied warranty, including the implied warranties of merchantability, fitness for a particular purpose and non-infringement. SimoTime Technologies 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.
Downloads and Links
This section includes links to documents with additional information that are beyond the scope and purpose of this document. The first group of documents may be available from a local system or via an internet connection, the second group of documents will require an internet connection.
Note: A SimoTime License is required for the items to be made available on a local system or server.
Current Server or Internet Access
The following links may be to the current server or to the Internet.
Note: The latest versions of the SimoTime Documents and Program Suites are available on the Internet and may be accessed using the  icon. If a user has a SimoTime Enterprise License the Documents and Program Suites may be available on a local server and accessed using the  icon.
Explore How to Create a New or Update an Existing Customer Data Set that is a VSAM Key-Sequenced-Data-Set (KSDS). This document will describe the jobs and programs that create and maintain a Customer Data Set. The program will run on an IBM Mainframe System or a Linux, UNIX or Windows System with Micro Focus COBOL Support.
Explore The Generated COBOL Source Code that does a record-by-record compare of two VSAM Key-Sequenced-Data-Sets (KSDS's) that are used as the Customer Master Files.
Explore The ASCII and EBCDIC Translation Tables. These tables are provided for individuals that need to better understand the bit structures and differences of the encoding formats.
Explore The File Status Return Codes that are used to interpret the results of accessing VSAM data sets and/or QSAM files.
Internet Access Required
The following links will require an internet connect.
This suite of programs and documentation is available for download.
Link to an Evaluation zPAK Option that includes the program members, documentation and control files.
A good place to start is
The SimoTime Home Page
for access to white papers, program examples and product information. This link requires an Internet Connection
Explore
The Micro Focus Web Site
for more information about products (including Micro Focus COBOL) and services available from Micro Focus. This link requires an Internet Connection.
Glossary of Terms
Explore the Glossary of Terms for a list of terms and definitions used in this suite of documents and white papers.
Comments or Feedback
This document was created and is maintained by SimoTime Technologies. If you have any questions, suggestions, comments or feedback please use the following contact information.
|
1.
|
Send an e-mail to our helpdesk.
|
|
2.
|
Our telephone numbers are as follows.
|
|
2.1.
|
1 415 763-9430 office-helpdesk
|
|
2.2.
|
1 415 827-7045 mobile
|
We appreciate hearing from you.
Company Overview
SimoTime Technologies was founded in 1987 and 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. Our customers include small businesses using Internet technologies to corporations using very large mainframe systems.
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. We specialize in preparing applications and the associated data that are currently residing on a single platform to be distributed across a variety of platforms.
Preparing the application programs will require the transfer of source members that will be compiled and deployed on the target platform. The data will need to be transferred between the systems and may need to be converted and validated at various stages within the process. SimoTime has the technology, services and experience to assist in the application and data management tasks involved with doing business in a multi-system environment.
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 |
|
Regression Testing, the Customer Master File, Create and Monitor Changes
|
Copyright © 1987-2025
SimoTime Technologies and Services
All Rights Reserved |
| When technology complements business |
| http://www.simotime.com |
| 