*RE: Another elementary Assembler question

Why not change your entry code slightly: WHATEVER CSECT ENTRY0 JAS R15,MAIN ENTRY1 JAS R15,MAIN ENTRY2 JAS R15,MAIN ENTRY3 JAS R15,MAIN ENTRY4 JAS R15,MAIN LARL R12,WHATEVER SRR15,R12 subtract r12 from R15 to get relative offset from WHATEVER *

Re: SDSF/REXX question

and delete all copies. -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf Of Paul Gilmartin Sent: Wednesday, May 31, 2017 10:26 PM To: IBM-MAIN@LISTSERV.UA.EDU Subject: Re: SDSF/REXX question On Thu, 1 Jun 2017 02:24:43 +, Hardee

SDSF/REXX question

Hello Listers, I am having a random timing issue with a REXX that I am developing using SDSF calls. The REXX identifies the job name and number within which it is running and then attempts to use SDSF to find and process the SYSOUT datasets already created by previous steps in the job. The

Re: SAS user abend code documentation?

Yeah, I sort of figured you had already checked it out, but, it never hurts to ask. We don't use SAS here so I can't help much more. Good luck on your hunt. Charles (Chuck) Hardee Senior Systems Engineer/Database Administration EAS Information Technology Thermo Fisher Scientific 300 Industry

Re: SAS user abend code documentation?

Barbara, Have you seen this http://support.sas.com/kb/54/206.html Chuck Charles (Chuck) Hardee Senior Systems Engineer/Database Administration EAS Information Technology Thermo Fisher Scientific 300 Industry Drive | Pittsburgh, PA 15275 Phone +1 (724) 517-2633 | Mobile +1 (412) 877-2809 | FAX:

Re: Jollygiant support (QWS3270 PLUS vendor) has not responded to several emails

Sorry Chris, I sent it to them and they never cashed it and I never got it back and they won't return my emails. Otherwise we could work something out. Chuck Charles (Chuck) Hardee Senior Systems Engineer/Database Administration EAS Information Technology Thermo Fisher Scientific 300 Industry

Re: Jollygiant support (QWS3270 PLUS vendor) has not responded to several emails

] On Behalf Of Hardee, Chuck Sent: Tuesday, March 14, 2017 1:22 PM To: IBM-MAIN@LISTSERV.UA.EDU Subject: Re: Jollygiant support (QWS3270 PLUS vendor) has not responded to several emails If you are lucky enough to get thru to them, please report back how you established contact. I tried to contact

Re: Jollygiant support (QWS3270 PLUS vendor) has not responded to several emails

If you are lucky enough to get thru to them, please report back how you established contact. I tried to contact them shortly after Jolly sold to Brandon asking why they hadn't cashed my check for support renewal. TO this date I have had no response to my inquiries. It would be nice to know if

Re: Friday fun with REXX and PARSE

I'm probably going to explain this incorrectly, but the jist of the problem is the literal periods in the PARSE statement. Due to the literal periods ("."), PARSE assigns the values of "word1" and "word2" to var1 and var2 respectively. Then, PARSE assigns nulls to var3, var4 and var5 bringing

Re: Fujitsu Mainframe Vs IBM mainframe

There may have been several versions but, when I was involved in getting IDMS to run on Fujitsu, Hitachi, Siemens and others, it was BS2000. Charles (Chuck) Hardee Senior Systems Engineer/Database Administration EAS Information Technology Thermo Fisher Scientific 300 Industry Drive |

Re: JCL IF Condition - I'm Missing Something

William, Here's a modified version of your test without SETs: //* //CKEXIST1 EXEC PGM=IDCAMS //SYSPRINT DD SYSOUT=* //SYSINDD * LISTCAT ENTRIES('S01CH.TEST.LOADLIB') /*

Re: Where's my dump?

Greg, Occasionally I have to test something using a COBOL program. This is what I have in my JCL to obtain a SYSMDUMP and I seem to get one every time I need one. //ABNLIGNR DD DUMMY DO NOT TAKE ABEND-AID DUMP //CAOESTOP DD DUMMY/* BYPASS CA-SYMDUMP */ //SYSABEND DD DUMMY

Re: BPXWDYN allocation with DEFER and UNIT=AFF

- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf Of Hardee, Chuck Sent: Friday, February 03, 2017 5:17 AM To: IBM-MAIN@LISTSERV.UA.EDU Subject: Re: BPXWDYN allocation with DEFER and UNIT=AFF Ahhh! Thanks John! I hadn't gotten to the DYNALLOC support yet

Re: BPXWDYN allocation with DEFER and UNIT=AFF

: IBM-MAIN@LISTSERV.UA.EDU Subject: Re: BPXWDYN allocation with DEFER and UNIT=AFF On Thu, Feb 2, 2017 at 7:19 PM, Hardee, Chuck <chuck.har...@thermofisher.com > wrote: > Before I move on to the next function of my Easytrieve program, I thought > I'd ask for some insight from those

BPXWDYN allocation with DEFER and UNIT=AFF

Before I move on to the next function of my Easytrieve program, I thought I'd ask for some insight from those who have used BPXWDYN. And before anyone says RTFM, I have. Okay, here's the issue, the documentation does not include DEFER as an option for dynamic allocation functions. At least not

Re: Calling bpxwdyn from CA-Easytrieve

: Tuesday, January 31, 2017 8:35 PM To: IBM-MAIN@LISTSERV.UA.EDU Subject: Re: Calling bpxwdyn from CA-Easytrieve On Wed, 1 Feb 2017 00:51:03 +, Hardee, Chuck wrote: >Well, suffice it to say, Easytrieve allows one to define a variable following >the BPXWDYN non-REXX return variable str

Re: Calling bpxwdyn from CA-Easytrieve

Gilmartin Sent: Tuesday, January 31, 2017 7:24 PM To: IBM-MAIN@LISTSERV.UA.EDU Subject: Re: Calling bpxwdyn from CA-Easytrieve On 2017-01-31, at 17:04, Hardee, Chuck wrote: > In order to return a value from BPXWDYN to an Easytrieve caller, one must use > the variable definition as f

Re: Calling bpxwdyn from CA-Easytrieve

: Calling bpxwdyn from CA-Easytrieve On Tue, 31 Jan 2017 19:58:48 +, Hardee, Chuck wrote: > >At the moment, allocation is not what I am trying to do. >I am trying to use the INFO function to return the dataset name. >I am getting a return code of 0 from the BPXWDYN call, but I am

Re: Calling bpxwdyn from CA-Easytrieve

END-IF. STOP. Alan Hardee, Chuck wrote: > Thanks Alan, but what you have indicated won't work for me in CA-Easytrieve. > The biggest problem is that to use null or space terminated strings as > parameters, I have to be able to call BPXWDYN with R0 = 0 and Easytrieve > doe

Re: Calling bpxwdyn from CA-Easytrieve

MAIN@LISTSERV.UA.EDU Subject: Re: Calling bpxwdyn from CA-Easytrieve On Tue, 31 Jan 2017 12:41:10 +, Hardee, Chuck wrote: > >The manual states that on a call from a non-REXX environment, R0 must be zero. > Why? This is bizarre. And sometimes hard to satisfy. BPXWDYN ought to provide

Re: Calling bpxwdyn from CA-Easytrieve

later use. > > Email me privately if you want a copy of the stub routine. It wasn't hard to > code, 40 actual code lines and 7 lines of comments. > > Peter > > -Original Message- > From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On > Beh

Re: Calling bpxwdyn from CA-Easytrieve

at the end of the parameter string and there is also and the "+1" in the length value (just to make things confusing). Al Nims Systems Admin/Programmer 3 UFIT University of Florida (352) 273-1298 -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Beha

Re: Calling bpxwdyn from CA-Easytrieve

yn-command DC Y(L'bpxwdyn-info) should be: bpxwdyn-command DC Y(L'bpxwdyn-info+1) Al Nims Systems Admin/Programmer 3 UFIT University of Florida (352) 273-1298 -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf Of Har

Re: Calling bpxwdyn from CA-Easytrieve

privately if you want a copy of the stub routine. It wasn't hard to code, 40 actual code lines and 7 lines of comments. Peter -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf Of Hardee, Chuck Sent: Tuesday, January 31, 2017 7:41 AM To: IBM

Re: sdsf in rexx

Tim, I haven't had a chance to try what you are attempting, at least not specifically the command, but something I stumbled upon a while back was when I wrote an SDSF enabled REXX, I tried asking for something that was in the extended screen layout rather than the default screen layout. Is it

Calling bpxwdyn from CA-Easytrieve

I have a need to be able to call bpxwdyn from within an CA-Easytrieve "program". According to the manual, IBM says that bpxwdyn can be called from non-REXX environments as long as certain rules are followed. It also states that values can be returned as long as the return value parameter

Re: FDR List

M To: IBM-MAIN@LISTSERV.UA.EDU Subject: Re: FDR List Whats the prob you are encountering and can you supply the exec pack, I maybe able to help Ta Nick -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf Of Hardee, Chuck Sent: 03 J

FDR List

Does anyone know if there is an FDR list out there somewhere? If there isn't one, is anyone willing to offer insight on an FDR RESTORE problem I am having? Thanks, Chuck Charles (Chuck) Hardee Senior Systems Engineer/Database Administration EAS Information

Re: how to: convince programmer something else is better.

Suggest to him (or her), that if there is an error in the compression and/or decompression code, it's their posterior that is in the frying pan. If there's an error in the vendor's code, their posterior is not in harm's way. (hopefully said error does not render your compressed data

Re: TSO Command to issue message to Outtrap

(Station 200) (005OP6.3.10) VA OI Service Delivery & Engineering -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf Of Hardee, Chuck Sent: Thursday, November 03, 2016 6:22 AM To: IBM-MAIN@LISTSERV.UA.EDU Subject: [EXTERNAL] Re: TSO Com

Re: TSO Command to issue message to Outtrap

Lionel, I don't know if this helps, but the following does, to a degree, what you want: --- /* rexx */ if arg(1) \= "R" then do rc = outtrap("said.") call

Re: Rexx and hex data strings

Consider the following: /* rexx */ YES = (1 = 1) NO = \YES marker = "$$HEXSTUFF$$" hexdata. = 0 maxsrcline = sourceline() doinghex = NO do src# = 1 to maxsrcline sourceline = sourceline(src#) markerline = wordpos(marker,sourceline) if markerline & \doinghex then do doinghex =

Re: How does COBOL detect a recursive call?

The wherefores of using a main program and an ENTRY versus 2 programs is a political battle I am not prepared or willing to fight. When initially assigned this project I was hoping that my Systems status within the company would grant me some carte blanche in how I engineered the solution but,

Re: How does COBOL detect a recursive call?

Bob, Since John is working with a stripped down copy of my program I resurrected the copy of the program with my debugging displays in it where I had already coded the displays for the two addresses you asked about. Displaying the main entry point address, that is, the name of the program as

Re: How does COBOL detect a recursive call?

Okay, let's run with this one. If program A has an entry, B, and the program is compiled with NAME(ALIAS), when the program is linked, there will be an entry for A and an entry for B as an ALIAS of A. When A is executed, a statement in the program says SET TO ENTRY B where is

Another COBOL question

Thanks to everyone that responded to my previous question about generating link statements from the compiler. The answer was to use the NAME(ALIAS) PROCESS statement. I now am looking for some further insight. I have a program that has a main program and an alternate entry point (ENTRY). The

Re: Question about the COBOL compiler

g 4, 2016 at 6:41 PM, Hardee, Chuck <chuck.har...@thermofisher.com > wrote: > Actually, my dynamic calls work just fine to the alias'ed entry points so > it's not an issue. > Bottom line, I' fine with my module's structure both in its primary entry > point and its aliased entry po

Re: Question about the COBOL compiler

nvironment prelinker. HTH Peter -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf Of Hardee, Chuck Sent: Thursday, August 04, 2016 5:49 PM To: IBM-MAIN@LISTSERV.UA.EDU Subject: Re: Question about the COBOL compiler That would definitely

Re: Question about the COBOL compiler

Actually, my dynamic calls work just fine to the alias'ed entry points so it's not an issue. Bottom line, I' fine with my module's structure both in its primary entry point and its aliased entry point. All I am looking for is whether the COBOL compiler can do PUNCH statements like some of the

Re: Question about the COBOL compiler

rame Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf Of Hardee, Chuck Sent: Thursday, August 04, 2016 5:22 PM To: IBM-MAIN@LISTSERV.UA.EDU Subject: Re: Question about the COBOL compiler Compiler version: PP 5655-G53 IBM Enterprise COBOL for z/OS 3.4.1 V3R2 What I need is this: INC

Re: Question about the COBOL compiler

Thanks Bill, if I don't get anywhere here, maybe I'll run over there and see if anyone can help. Charles (Chuck) Hardee Senior Systems Engineer/Database Administration EAS Information Technology Thermo Fisher Scientific 300 Industry Drive | Pittsburgh, PA 15275 Phone +1 (724) 517-2633 | Mobile

Re: Question about the COBOL compiler

Compiler version: PP 5655-G53 IBM Enterprise COBOL for z/OS 3.4.1 V3R2 What I need is this: INCLUDE OBJLIB(PROGRAMA) ALIAS ENTRYB(NTRYPTB) NAME PROGRMA(R) Our compile panels generate the INCLUDE and NAME statements. However, I need to have the ALIAS in there as well. Our panels don't allow

Re: Question about the COBOL compiler

Thanks Edward, I'll check it out. Charles (Chuck) Hardee Senior Systems Engineer/Database Administration EAS Information Technology Thermo Fisher Scientific 300 Industry Drive | Pittsburgh, PA 15275 Phone +1 (724) 517-2633 | Mobile +1 (412) 877-2809 | FAX: +1 (412) 490-9230

Question about the COBOL compiler

Hello All, Does anyone know if it is possible to cause the COBOL compiler to generate Link Edit/Binder parms during the compile process? Needless to say, we have standard compile panels that do not allow for "extra" link instructions and I have a COBOL program that has an ENTRY statement and I

Re: OS ENQ from COBOL

While that would be an interesting way to invoke the code, I suspect there would be less chance of that being supported should something happen to me than an assembler language subroutine. Chuck Charles (Chuck) Hardee Senior Systems Engineer/Database Administration EAS Information Technology

Re: OS ENQ from COBOL

Yes, I found nothing in the Unix, LE or C/C++ services that perform an ENQ of any kind, be it for control or for testing availability. I agree, the only real reason someone other than myself would need to do anything to the code is to reassemble it if the ENQ macro were to change. Since it

Re: OS ENQ from COBOL

No, my requirement is batch. The service executing in its own address space that I need to access issues an EXCLUSIVE ENQ for a determinable QName/RName when it is up and ready to receive requests. I need to know if it is up and ready to receive before issuing any requests to it. This is all

Re: Kind of COND in a CLIST

Radoslaw, I would put the commands into a CLIST (or REXX) and add IF logic to check the return code from each command and EXIT when it's not an acceptable value. Chuck Charles (Chuck) Hardee Senior Systems Engineer/Database Administration EAS Information Technology Thermo Fisher Scientific

OS ENQ from COBOL

Hello Listers, First off, does anyone know of an IBM COBOL related list? If so, could you point me in that direction. Now, to my question. I can code an assembler solution, or even a hybrid COBOL/Assembler solution, but what I would truly love would be a COBOL only solution. My need is to be

Re: Simple assembler question

Hi Phil, I would consider something like this: LR R15,R3 Copy low 32-bits to R15 SRLGR0,R3,32Copy upper 32-bits to R0 You may want to add an SR or XR for register 0 and 15 prior to the above two instructions if you want to make sure of the

SMP/E question

Hello Everyone, I am having an issue with doing a RESTORE/REJECT on some mods that were last applied with the SMP/e that came with z/OS 1.13. I am now on z/OS 2.2 and this is the first RESTORE/REJECT I am trying to execute in order to reengineer a usermod. Thanks, Chuck Charles (Chuck)

Re: IPCS SYSTRACE command

Thanks Don. I suspect I have ASID 4 in my dump since I can set the ASID of the abending address space and I can issue the SYSTRACE ALL (and other flavors) and I get results formatted. I'll poke around in ASID 4 and see what I can glean. Charles (Chuck) Hardee Senior Systems Engineer/Database

IPCS SYSTRACE command

Hello All, Happy April Fool's Day! On a more serious note, I have a dump which I can format out the system trace table with the SYSTRACE IPCS verb (subcommand). What I would like to know, and can't seem to find, is where the raw data can be found in the dump. Can anyone guide me in how I can

Re: Dumb TSO Rexx question

Agreed, I do it the way Scott has indicated. Works just fine. Charles (Chuck) Hardee Senior Systems Engineer/Database Administration EAS Information Technology Thermo Fisher Scientific 300 Industry Drive | Pittsburgh, PA 15275 Phone +1 (724) 517-2633 | Mobile +1 (412) 877-2809 | FAX: +1 (412)

Re: Tritus SPF

Congrats! It's a sweet product. Good luck on the floppy reader. Charles (Chuck) Hardee Senior Systems Engineer/Database Administration EAS Information Technology Thermo Fisher Scientific 300 Industry Drive | Pittsburgh, PA 15275 Phone +1 (724) 517-2633 | Mobile +1 (412) 877-2809 | FAX: +1 (412)

Re: Reading the CA-1 Tape Catalog

[mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf Of Mike Schwab Sent: Friday, February 12, 2016 9:13 AM To: IBM-MAIN@LISTSERV.UA.EDU Subject: Re: Reading the CA-1 Tape Catalog Until the tape is overwritten the scratched tapes will still be in the database. On Fri, Feb 12, 2016 at 5:17 AM, Hardee

Re: Reading the CA-1 Tape Catalog

: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf Of Hardee, Chuck Sent: Friday, February 12, 2016 5:17 AM To: IBM-MAIN@LISTSERV.UA.EDU Subject: Reading the CA-1 Tape Catalog Hello Everyone, I have posted this to the IBM Mainframe and IBM Assembler lists. I was wondering

Re: Reading the CA-1 Tape Catalog

-Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf Of Hardee, Chuck Sent: Friday, February 12, 2016 7:58 AM To: IBM-MAIN@LISTSERV.UA.EDU Subject: Re: Reading the CA-1 Tape Catalog Thanks Russell, I'll go re-read the documentation

Re: Reading the CA-1 Tape Catalog

and provides reports for DR purposes. Thanks, Ron McCabe Mutual of Enumclaw -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf Of Hardee, Chuck Sent: Friday, February 12, 2016 6:19 AM To: IBM-MAIN@LISTSERV.UA.EDU Subject: Re: Reading the CA-1 Tape

Re: Where is SET allowed in JCL?

The reason is that the Converter/Interpreter is expecting data as a result of the "//DD2 DD *". It found none so it is now looking for a new "starting" JCL statement. It found one, the "// SET" statement. After processing the "// SET" statement it again looks for a new "starting" statement. It

Re: SMF/RMF Reporting question

? Lizette > -Original Message- > From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On > Behalf Of Hardee, Chuck > Sent: Friday, November 20, 2015 5:23 AM > To: IBM-MAIN@LISTSERV.UA.EDU > Subject: SMF/RMF Reporting question > > Hello Everyone, >

Re: SMF/RMF Reporting question

:03 AM To: IBM-MAIN@LISTSERV.UA.EDU Subject: Re: SMF/RMF Reporting question IBM Mainframe Discussion List <IBM-MAIN@LISTSERV.UA.EDU> wrote on 11/20/2015 07:22:44 AM: > From: "Hardee, Chuck" <chuck.har...@thermofisher.com> > To: IBM-MAIN@LISTSERV.UA.EDU > Date: 11/

Re: SMF/RMF Reporting question

e Tivoli Omegamon, MainView? > > Lizette > > > > -Original Message- > > From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] > > On Behalf Of Hardee, Chuck > > Sent: Friday, November 20, 2015 5:23 AM > > To: IBM-MAIN@LISTSERV.

SMF/RMF Reporting question

Hello Everyone, I am trying to find, from a historical perspective, that is to say, after an event has occurred, what units of work were using how much of the available CPU. Is there an SMF and/or RMF report that allows on to ask, "During the interval from hh:mm to hh:mm on a particular day, in

Re: REXX-question

Leopold, This is purely a guess, but the last line of the prompt states: INMR909A You may enter DSNAME, SPACE, UNIT, VOL, OLD/NEW, or RESTORE/COPY/DELETE/END You supplied a DATASET() parameter, but I don't see a RESTORE, COPY or DELETE prior to the END. Try adding: queue "RESTORE" Just

Re: RE-IPL for the Daylight to Standard time conversion?

As of IDMS Version 18, the journal and log files both use UTC and no longer use local time. This has been around for a couple of years now. You should find out what release of IDMS they are on and push them to version 18 or later. In fact, I would suggest going to Version 19 at this point.

Re: [Bulk] Re: [IBM-MAIN] File Placement Utility

Have you ever heard of inheritance? When one steps into a new shop, 9 times out of 10, one inherits decisions made by others. Along with that inheritance comes the ever faithful reply, when asked, "Not sure, it's just always been that way". When one asks the next question, "Who made the

Re: File Placement Utility

f datasets, or do you simply need them spread randomly across "up to" 70 volumes. Ron -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf Of Hardee, Chuck Sent: Friday, October 9, 2015 5:31 PM To: IBM-MAIN@LISTSERV.UA.EDU Subject:

Re: File Placement Utility

searches and seizures, shall not be violated, and no Warrants shall issue, but upon probable cause, supported by Oath or affirmation, and particularly describing the place to be searched, and the persons or things to be seized. -Original Message- From: Hardee, Chuck Sent: Friday, October 09

Re: File Placement Utility

and delete all copies. -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf Of Hardee, Chuck H. Sent: Thursday, October 08, 2015 9:25 PM To: IBM-MAIN@LISTSERV.UA.EDU Subject: File Placement Utility I have a need to juggle the locations of 1500

File Placement Utility

I have a need to juggle the locations of 1500+ files on 70 volumes. These packs are not SMS managed and will never be. There will be 4 sets of these files across 4 sets of 70 DASD volumes. Does anyone know of a utility, REXX, EXCEL, executable program, etc, that would let me feed in the file

Re: Way to change a PROC to add a concatenation to existing DD?

Why not simply code: //EXECPROD EXEC JVMPRC80 //STDINDD // DD DISP=SHR,DSN=next.dsn.name Then, in your PROC code an assignment to STDIN and point it at a dataset. That dataset would be either empty, or filled as required, with "basic" or "common" input that most everything needs, or

Re: IPCS BLS18028I message suppression

ptember 19, 2015 3:39 PM To: IBM-MAIN@LISTSERV.UA.EDU Subject: Re: IPCS BLS18028I message suppression On 9/19/2015 3:26 PM, Hardee, Chuck wrote: > Thanks Jim, your explanation was helpful, believe it or not. > It bears out with what I am seeing. > I really appreciate your passing on your insig

Re: IPCS BLS18028I message suppression

Thanks Jim, your explanation was helpful, believe it or not. It bears out with what I am seeing. I really appreciate your passing on your insights and discoveries in the code when we ask questions. Chuck Charles (Chuck) Hardee Senior Systems Engineer/Database Administration EAS Information

Re: S0C4 running Disasembler ASMDASM

Is it possibly running with too small a region size? Is it possibly coming from an authorized load lib and linked as REENT and trying to modify itself? That's my nickel, absent a dump in front of me. Charles (Chuck) Hardee Senior Systems Engineer/Database Administration EAS Information

Re: Submit job without messages

I am not aware of an option for the TSO SUBMIT command to suppress the message, but could your REXX allocate an internal reader and write the JCL to it then close it? Charles (Chuck) Hardee Senior Systems Engineer/Database Administration EAS Information Technology Thermo Fisher Scientific 300

Re: Not understanding COBOL diagnostic

I haven't played with COBOL in a long while, but is the leading apostrophe needed on the continuation line? Charles (Chuck) Hardee Senior Systems Engineer/Database Administration EAS Information Technology Thermo Fisher Scientific 300 Industry Drive | Pittsburgh, PA 15275 Phone +1 (724)

Re: Not understanding COBOL diagnostic

I thought one of them had to be left out but I couldn't remember which one. Looks like I guessed at the wrong one. Charles (Chuck) Hardee Senior Systems Engineer/Database Administration EAS Information Technology Thermo Fisher Scientific 300 Industry Drive | Pittsburgh, PA 15275 Phone +1 (724)

Re: I need a little help using LISTDSI in a REXX program

back through my rexx execs and I have this example: retcode = LISTDSI(LKDSN NORECALL) -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf Of Hardee, Chuck Sent: Thursday, July 16, 2015 2:49 PM To: IBM-MAIN@LISTSERV.UA.EDU Subject: Re: I

Re: I need a little help using LISTDSI in a REXX program

I believe you want SRC = LISTDSI(''FN1' NORECALL) I'm not where I can get to some of my rexx routines to confirm this to be sure. Charles (Chuck) Hardee Senior Systems Engineer/Database Administration EAS Information Technology Thermo Fisher Scientific 300 Industry Drive | Pittsburgh, PA

Re: CA-1 programming example

-Original Message- From: IBM Mainframe Discussion List [mailto:IBM- m...@listserv.ua.edu] On Behalf Of Hardee, Chuck Sent: Thursday, May 21, 2015 8:39 AM To: IBM-MAIN@LISTSERV.UA.EDU Subject: CA-1 programming example Has anyone out there written a program to inquire against a CA-1 tape

CA-1 programming example

Has anyone out there written a program to inquire against a CA-1 tape library? I'm looking for tips and/or samples of how to do it. I have a list of DSNs and their (tape) VOLSERs but I'd like to get more information about the DSN/VOLSER from CA-1. Anything shareable that someone might have would

Re: CA-1 programming example

On Thu, May 21, 2015 at 11:07 AM, Hardee, Chuck chuck.har...@thermofisher.com wrote: I had been looking in the Programming Guide for samples of how to call CA-1 and obtain information about a volser. There is a specific macro with which to do this, but, in my opinion, the narrative

Re: Sort Jcl

VV V VV I think you're out of sync??? OUTREC FINDREP=(INOUT=(C''96 M/B WHITE SALE', C' 96 M/B WHITE SALE ')) Charles (Chuck) Hardee Senior Systems Engineer/Database Administration EAS Information Technology Thermo Fisher

Re: Twelve different companies IBM has been (watch the wrap)

I tried Mozilla Firefox and had the same experience. I then tried IE version 8 and had the same experience. I then turned on compatibility mode and it worked, sort of. Some of the text was overlayed, but it was sufficient to at least see the pictures and figure out what they were with a little

Re: Google got its own airport

Where are the Men In Black when you need them? Someone needs to ride herd over these two! Charles (Chuck) Hardee Senior Systems Engineer/Database Administration EAS Information Technology Thermo Fisher Scientific 300 Industry Drive | Pittsburgh, PA 15275 Phone +1 (724) 517-2633 | Mobile +1

SMP/E APPLY output capture question

Hello Listers, I am in need of capturing the output from an APPLY step, specifically the assembly and link output. Currently my target zone has SYSPRINT defined as SYSOUT=*. I have tried several things but, unless I've coded them incorrectly, they did not achieve the result I need. I have

Re: SMP/E APPLY output capture question

zone, under UTILITY select ASMA90 (or what else you might use), specify a print DD name and use this in your JCL and review the PARM statements. Christian -Ursprüngliche Nachricht- Von: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] Im Auftrag von Hardee, Chuck Gesendet

Re: SMP/E APPLY output capture question

: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf Of Hardee, Chuck Sent: Tuesday, November 11, 2014 6:35 AM To: IBM-MAIN@LISTSERV.UA.EDU Subject: Re: SMP/E APPLY output capture question Thanks Christian, but I tried that already. I changed the utility to use the DD

Re: SMP/E APPLY output capture question

] On Behalf Of Shmuel Metz (Seymour J.) Sent: Tuesday, November 11, 2014 8:23 AM To: IBM-MAIN@LISTSERV.UA.EDU Subject: Re: SMP/E APPLY output capture question In 9b26bc6a6df52d4483dd73b1fe7b4b068b3e557...@uspho-mxvs07.amer.thermo.com, on 11/11/2014 at 05:54 AM, Hardee, Chuck chuck.har

Re: SMP/E APPLY output capture question

As I replied to Shmuel Metz, I am using a usermod that APPLYs just fine when I don't attempt to capture the output using any means. The GLOBAL zone defines no override for the assembler or link utilities and the DDDEFs for SYSPRINT in the target zone says SYSOUT=*. With that arrangement, the

Re: SMP/E APPLY output capture question

class with outdisp=purge ? Happened to me a couple of times in various shops ;) Christian -Ursprüngliche Nachricht- Von: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] Im Auftrag von Hardee, Chuck Gesendet: Dienstag, 11. November 2014 14:35 An: IBM-MAIN@LISTSERV.UA.EDU

Re: SMP/E APPLY output capture question

question -Original Message- From: IBM Mainframe Discussion List On Behalf Of Hardee, Chuck No, at least not intentionally. When I run my usermod using no changes to the CSI and/or JCL, the output is directed, via the MSGCLASS parm on the JOB statement to class X, which is a hold

Re: SMP/E APPLY output capture question

Sent: Tuesday, November 11, 2014 11:28 AM To: IBM-MAIN@LISTSERV.UA.EDU Subject: Re: SMP/E APPLY output capture question -Original Message- From: IBM Mainframe Discussion List On Behalf Of Hardee, Chuck No, at least not intentionally. When I run my usermod using no changes to the CSI

Re: SMP/E APPLY output capture question

, John Sent: Tuesday, November 11, 2014 11:42 AM To: IBM-MAIN@LISTSERV.UA.EDU Subject: Re: SMP/E APPLY output capture question -Original Message- From: IBM Mainframe Discussion List On Behalf Of Hardee, Chuck See, that's the rub. As I understand SMP/E, if there is no DD in the JCL

Re: xmitip txt2pdf

I use it all the time to spool job listings, assembly listing, etc for various reasons. Don't have a problem with it at all. Unfortunately, I had nothing to do with the current installation so I don't know if there were ever any problems with multi page PDFs. Charles (Chuck) Hardee Senior

Re: DF/SORT question (challenge?)

Okay, let me say up front, I know nothing about the abilities of SORT other than simple sort this file on these keys and give me the output in this file. Okay, we're good? Here's my question. If (can) sort insert records into its output on a break in key? If so, why not sort the input file

Re: ASM calling C or C++ subroutines

David, You say that the subroutine linkage is different. Can you tell me where the linkage is documented? I'd like to understand how XPLINK linkage works for incorporation into some of my routines. Thanks, Chuck Charles (Chuck) Hardee Senior Systems Engineer/Database Administration CCG

Re: ASM calling C or C++ subroutines

: Re: ASM calling C or C++ subroutines Look at 'zOS Language Environment Vendor Interfaces'. On 20.08.2014 11:35, Hardee, Chuck wrote: David, You say that the subroutine linkage is different. Can you tell me where the linkage is documented? I'd like to understand how XPLINK linkage works

Re: Return code 8 from open

He said he found that the SVC 99 allocate worked via ISRDDN. It would seem to me that his program is being executed in a TSO session. My question would be, would that message be written to the job log representing his session, the terminal screen as part of his output, or is it being held by

  1   2   >