BCS Programmer’s Tools

Primary Dialog Primary Option Menu Edit Link Categories Pop Up Menu Link Pop Up Menu Our primary workbench is depicted below. This tool stores links (for web pages and executable programs).  Browser counterparts cannot accomodete other links which may be useful in developing computer software. The panel on the left deals with entries for cagtegories […]

Hello My Name Is Arch Brooks

Mr. Arch Brooks has authored computer software across five decades.   For a current resume click here. To review the LinkedIn profile for Mr. Brooks click here.  Several methodologies are employed to accomplish rapid delivery of computer software solutions for the government and private industry. Many levels of technical training are also offered. To review Delphi […]

BCS MVS PDS (Partitioned Data Set) Unload

There are those times when it is necessary to unload a partitioned data set. The unloaded PDS can the be used in a subsequent restore. [codesyntax lang=”text”] //AMBMVS JOB (SYS), ‘BROOKS COMPUTING SYSTEMS,LLC’,CLASS=A,MSGCLASS=A, // MSGLEVEL=(1,1) //PDSUNLD PROC //SETP0001 EXEC PGM=IEBCOPY //SYSPRINT DD SYSOUT=* //SYSUT1 DD DISP=SHR,DSN=AMBMVS.PDS.&LLQ //SYSUT2 DD DISP=(,CATLG,DELETE),DSN=AMBMVS.&LLQ..OUT, // UNIT=3390,SPACE=(TRK,(1,2),RLSE),VOL=SER=USR003 //SYSIN DD DISP=SHR,DSN=AMBMVS.PDS.CNTL(UNLD1) // […]

BCS MVS Dynamic File Allocation COBOL

It would be nice to dynamically allocate and free the files need for applications via COBOL. This article describes how a subroutine may be used to accomplish such a feat. First we will examine the sub program that allow us to accomplish dynamic allocation. The BPXWDYN routine allows a text interface access to the allocate […]

BCS MVS COBOL Parameter Access

There are those times when parameters are useful to provide solution to automation tasks. This program takes a string of parameters delimited by a specific character and parses each parameter into a data area which is employed in subsequent processing. [codesyntax lang=”cobol”] 000100 IDENTIFICATION DIVISION. 000200 PROGRAM-ID. ABM00015. 000300 AUTHOR. ARCH BROOKS. 000400 INSTALLATION BROOKS […]

BCS MVS COBOL Prepare Current Date

There comes the time when it is beneficial to format the current date and time. The following COBOL sub routine does exactly that. [codesyntax lang=”cobol”] 000100 IDENTIFICATION DIVISION. 00010000 000200 PROGRAM-ID. ABS00010. 00020000 000300 AUTHOR. ARCH BROOKS. 00030000 000400 INSTALLATION BROOKS COMPUTING SYSTEMS, LLC. 00040000 000500 DATE-WRITTEN. 09/25/2014. 00050000 000600 DATE-COMPILED. 09/25/2014. 00060000 000700 ENVIRONMENT […]