Re: Abend0C1 while calling an IBM-Cobol routine from OS/BS Cobol Main.

2008-08-13 Thread Rich Tabor
Any chance you don't have the newer LE runtime library first in your steplib concatenation? On Wed, Aug 13, 2008 at 7:43 AM, Itschak Mugzach [EMAIL PROTECTED] wrote: I am running a n IMS MPP transaction written in OS/VS Cobol and is statically binded. The main program calls a routine compiled

Re: Data set's lost

2008-06-12 Thread Rich Tabor
Perhaps DEFINE ... RECATALOG followed by DELETE!? On Thu, Jun 12, 2008 at 5:23 AM, HELIO [EMAIL PROTECTED] wrote: Hello list, I have some data set's vsam not catalogued and are lost on the disks, tried to delete them and I am not able, used the IDCAMS VVR and NVR and I am getting the

Re: Long running Batch programs keep IMS databases offline

2008-05-07 Thread Rich Tabor
PROCOPT=GO(T) basically is read-only. Anyways, these days DLI batch and the online IMS systems can be setup to share the databases as well as update them concurrently, so there are no access restrictions. On Wed, May 7, 2008 at 5:03 AM, Visser, Hans (PinkRoccade Infrastructure Services Technisch

Re: Any Utility that will allow correction of a corroupt library

2008-03-14 Thread Rich Tabor
Bad news, good news here. First the bad, for the IMS referral library, the library (along with IMS.FORMAT) is supposed to be updated by the MFSUTL process, not IEBCOPY. IMS.REFERAL is also used as input to MFSUTL process for verification that all device type formats are being created/changed

Re: What identifies a jobname/address space as a unique instance in time?

2007-11-11 Thread Rich Tabor
Have your system task create a system-level name/token (nopersist) - when the task goes down, the token disappears as well. On Nov 11, 2007 7:36 PM, Todd Burch [EMAIL PROTECTED] wrote: From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED] On Behalf Of Peter Relson Sent: Sunday,

Re: EBCDIC to HEX translation in Assembler?

2007-07-23 Thread Rich Tabor
Maybe something like? PACK wk1,parmfld+1 PACK wk2,wk1 UNPK outfld+1,wk2 On 7/23/07, Phil Kingston [EMAIL PROTECTED] wrote: Hi all, Does anyone have a quick assembler routine to convert a hexadecimal number represented in EBCDIC into the real hex number? Phil. No virus found in this

Re: 1.7 and Internal Reader

2007-06-05 Thread Rich Tabor
Probably needs to be something like: //SYSUT1 DD DDNAME=IEFRDER //IEFRDER DD DSN=FILE(MEM),DISP=SHR On 6/5/07, Daniel McLaughlin [EMAIL PROTECTED] wrote: Has anyone else had their venerable internal reader proc go crazy under 1.7? Ours gets JCL errors and doesn't pull the job to submit. Must

Re: Cobol Internal sort and DLI Databases

2007-03-27 Thread Rich Tabor
Sorry - I have to believe this is a coding error. My guess is that many of the 6 segments were re-read after every success selection (RELEASE) because the logic in the input procedure probably started retrieving over at the beginning of the database. Post the code. On 3/27/07, GAVIN Darren

Re: BPXWDYN problem

2007-03-13 Thread Rich Tabor
I think you will have better luck using FI and DA instead of DD and DSN. On 3/12/07, Steve Comstock [EMAIL PROTECTED] wrote: OK, so I'm writing this CGI in Assembler to access a VSAM file [seemed like a fun thing to do]. The program is reentrant and LE-conforming. To allocate the file, I want

Re: BPXWDYN problem

2007-03-13 Thread Rich Tabor
. Never mind. -Emily L On 3/13/07, Paul Gilmartin [EMAIL PROTECTED] wrote: In a recent note, Rich Tabor said: Date: Tue, 13 Mar 2007 05:34:15 -0700 I think you will have better luck using FI and DA instead of DD and DSN. Why? -- gil -- StorageTek INFORMATION made POWERFUL

SVC99 and MPF Exits

2007-03-13 Thread Rich Tabor
Any restrictions for using dynamic allocation in an MFS user exit? -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at

SVC99 and MPF exits

2007-03-13 Thread Rich Tabor
Any restrictions for using dynamic allocation (SVC99)in MPF exits? -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at

Re: BPXWDYN problem

2007-03-13 Thread Rich Tabor
, Rich Tabor said: Date: Tue, 13 Mar 2007 05:34:15 -0700 I think you will have better luck using FI and DA instead of DD and DSN. Why? -- gil -- StorageTek INFORMATION made POWERFUL -- For IBM-MAIN

Re: INFO ZIP Large File Error

2007-01-06 Thread Rich Tabor
You maybe hitting the 2GB max. On 1/6/07, Crystal Kay [EMAIL PROTECTED] wrote: Hi, I have Infozip working on MVS/TSO. It zips up a 17 cylinder file (85% compression). But when I double the size of the file, it gives the following message: :zip warning: new zip file left as: zip I/O error:

Re: Allocating STEPLIB in TSO

2006-10-12 Thread Rich Tabor
In your description below, did you actually issue TSOLIB ACT DS('SOME.OTHER.LIBRARY') before attempting the CALL my.library.one(SOMEPROG) command? On 10/11/06, Charles Mills [EMAIL PROTECTED] wrote: OK. Simplest, since you say you want to use a TSO call command, why not CALL

Re: Allocating STEPLIB in TSO

2006-10-11 Thread Rich Tabor
TSOLIB does work for subsequent load/link/attach. On 10/11/06, Paul Gilmartin [EMAIL PROTECTED] wrote: In a recent note, Charles Mills said: Date: Wed, 11 Oct 2006 16:33:19 -0700 CALL my.library.one(SOMEPROG) And it works just fine, so far as it goes. Subsequently, while SOMEPROG

Re: IDENTIFY questions

2006-10-06 Thread Rich Tabor
If your IDENTIFY was for a module originally loaded from LPA, then I don't think DELETE cleans everything up, otherwise I agree with Shmuel, et al that DELETE is the un-IDENTIFY. On 10/6/06, Charles Mills [EMAIL PROTECTED] wrote: Shmuel, I still think you have this wrong. Let's assume that no

APPC/MVS System Base LU

2006-08-17 Thread Rich Tabor
Are there any control blocks or services an application written in assembler can use to determine the system's base LU for APPC/MVS? I' have tried the REXX MVSVAR(SYSAPPCLU) function but only get spaces returned. Some sample execs on CBT have the use of MVSVAR(SYSAPPCLU) coded but also

Z890 CF LPAR

2006-01-27 Thread Rich Tabor
Is it possible to partition a Z890 into an LPAR that functions as a coupling facility? -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search

Re: Problem in IMS-DC

2005-12-06 Thread Rich Tabor
It sounds like your transaction may be defined as NONRESPONSE instead of RESPONSE. You probably can get more help on the IMS discussion group which can be joined at PO.MISSOURI.EDU (IMS-L). On 12/6/05, sudhanshu Kumar [EMAIL PROTECTED] wrote: Hi all, I have created an online IMS-DC program

Re: Problem regarding IMS-DC

2005-12-05 Thread Rich Tabor
The second ISRT call without the modname means that the modname IMS will use may be the previously specified modname on the previous ISRT call. On 12/6/05, sudhanshu Kumar [EMAIL PROTECTED] wrote: Hi all, I am having a problem in my IMS-DC code. I want to know what's the difference between the

Re: How to copy a DASD data set with 56k blocks

2005-10-17 Thread Rich Tabor
Perhaps TRSMAIN On 10/17/05, Bruce Black [EMAIL PROTECTED] wrote: Is there a utility program that can copy 56k blocks from DASD to tape, or to another DASD data set with BLKSIZE=32760? The record format is VBS and the data set was created in VSE. I tried to write a quick-and-dirty