Article View: comp.lang.asm370
Article #302Re: Dataset I/O using Channel Program
From: "Dwight M. McCann"
Date: Wed, 21 Mar 1990 23:54
Date: Wed, 21 Mar 1990 23:54
21 lines
1664 bytes
1664 bytes
On Wed, 21 Mar 90 16:10:59 EST Steve Greenfield said: >Does anyone have an assembler program that does I/O to a DSORG=DA keyed >file that resides on a 3380 device? The program I am looking for does all >I/O using Channel Programs! If anyone has such a beast and would like to >share their code I would be most appreciative. Thank you in advance. I have pieces of code that read, write and update a DSORG=DA, KEYLEN=13, RECFM=VB dataset that is owned by an MVS system on shared DASD (this is not a guest system), but the code is not a standalone program for reading such datasets. The dataset is actually on a 3375, but that should matter very little. The code fragments that I have written use the standard interface in DMKIOS for CP mods, and DIAG X'20' to drive the channel programs (that perform the same functions to the same dataset) in CMS. If you don't get the program you are after from someone, I would be willing to share what I know with you. Dwight M. McCann, VM System Manager Information Systems & Computing University of California at Santa Barbara 93106 (805) 961-3113
Technical Details
Message-ID:
<9003220007.AA21732@lilac.berkeley.edu>Path:
arc1-ca.pugleaf.net!utzoo!utgpu!news-server.csri.toronto.edu!cs.utexas.edu!tut.cis.ohio-state.edu!ucbvax!UCSBVM.BITNET!950MMCCAReferences:
<FEATS@VTVM1>Show Full Headers
Complete Article Headers
Path: arc1-ca.pugleaf.net!utzoo!utgpu!news-server.csri.toronto.edu!cs.utexas.edu!tut.cis.ohio-state.edu!ucbvax!UCSBVM.BITNET!950MMCCA
From: 950MMCCA@UCSBVM.BITNET ("Dwight M. McCann")
Newsgroups: comp.lang.asm370
Subject: Re: Dataset I/O using Channel Program
Message-ID: <9003220007.AA21732@lilac.berkeley.edu>
Date: 21 Mar 90 23:54:20 GMT
References: <FEATS@VTVM1>
Sender: daemon@ucbvax.BERKELEY.EDU
Reply-To: IBM 370 Assembly Programming Discussion List <ASM370%UCF1VM.bitnet@lilac.berkeley.edu>
Distribution: inet
Organization: The Internet
Lines: 21