Download count: 4 this month, 6277 altogether.

Download package:

• VMARC (710K)

**********************  Unclassified  **********************************
* :nick.RXDASD     :sec.Unclassified                  :disk.IBMVMGAT
* :title.DASD I/O as REXX a function
* :version.1.00    :date.95/11/01   :summary.ANNOUNCE :support.X
* :oname.Richard Corak              :onode.YKTVMV     :ouser.CORAK
* :aname.Richard Corak              :anode.YKTVMV     :auser.CORAK
* :sw.VM/ESA-ESA MACLIBs to assembl
* :ops.VM/SP through VM/ESA-ESA     :lang.HLASM       :source.Y
* :doc.Yes
* :kwd.RXDASD, DASD, I/O, CKD, ECKD, FBA, REXX
* :abs.RXDASD is program that provides a Rexx DASD function for reading
* writing Direct Access Storage Device (both Count-Key-Data DASD and
* Fixed-Block-Architecture DASD) records from a Rexx EXEC.
* :lic.By placing material on this conference, I agree to grant
* IBM a non-exclusive, royalty-free license for the material
* as set forth in the LICENSE AGREEMNT file on this conference.
************************************************************************
* Recapitulation of some tags because more room is needed
*
* :abs.RXDASD is program that provides a Rexx DASD function for reading
* writing Direct Access Storage Device (both Count-Key-Data DASD and
* Fixed-Block-Architecture DASD) records from a Rexx EXEC.  In
* addition, many SENSE I/O commands are supported when directed to DASD
* or to non-DASD devices.
* RXDASD will probably not work on any CMS prior to release 5.
*
* COPYRIGHT -
*   (c) Copyright
*   International Business Machines Corporation 1990, 1995.
*   All Rights Reserved.
*
************************************************************************
*  This is all you'd need to run RXDASD.
*
*  A sample EXEC, and the final RXDASD MODULE
      RXDASD   EXEC     *
      RXDASD   MODULE   *
*
************************************************************************
*  This is the documentation on how to run RXDASD.
*
*  Documentation
      RXDASD   SCRIPT   *
      RXDASD   LIST3820 * Created from RXDASD SCRIPT
      RXDASD   PS       * Created from RXDASD LIST3820
      RXDASD   LIST1403 * Created from RXDASD SCRIPT
*
************************************************************************
*  The ANNOUNCE file, if you want to read it
*
      RXDASD   ANNOUNCE *
*
************************************************************************
*  Source, etc., to see how it does what it does.
*
*  The LOADMAP when the RXDASD MODULE was generated
      RXDASD   LOADMAP  *
*
*  Macros
      RXDASD   MACLIB   *
*
*  The function router, and the function handler for SENSE-type I/O
      RXDASD   ASSEMBLE *
      RXDASD   LISTING  *
      RXDASD   TEXT     *
*
*  The function handler for CKD and ECKD DASD I/O
      RXDASDCK ASSEMBLE *
      RXDASDCK LISTING  *
      RXDASDCK TEXT     *
*
*  The function handler for FBA DASD I/O
      RXDASDFB ASSEMBLE *
      RXDASDFB LISTING  *
      RXDASDFB TEXT     *
*
*  Message routine
      RXDASDMS ASSEMBLE *
      RXDASDMS LISTING  *
      RXDASDMS TEXT     *
*
*  Common subroutines
      RXDASDRT ASSEMBLE *
      RXDASDRT LISTING  *
      RXDASDRT TEXT     *
*
*  CMS release 4           routines to get storage, release it, etc.
      RXDASD4  ASSEMBLE *
      RXDASD4  LISTING  *
      RXDASD4  TEXT     *
*
*  CMS release 5 and later routines to get storage, release it, etc.
      RXDASD5  ASSEMBLE *
      RXDASD5  LISTING  *
      RXDASD5  TEXT     *
*
*  $DASD$ CONSTS and RXDASD CONSTS converted to TEXT
      RXDASD   CONSTS   *
      RXDASD$$ TEXT     *
*
*  A Control file for XEDIT (CTL RXDASD
      RXDASD   CNTRL    *
*