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 […]