Changing the MF IP Address
Hello, I'm going to a meeting next week where I will advocate moving our MF behind the firewall, which means changing its IP address. The advance discussion has turned up an argument that this could (would) break a lot of stuff. I suspect that argument is based on FUDSI. But, I'm not the one in the systems group either. Here's what I do know: --The MF is not an FTP server. We cannot ftp to the MF. We have never been able to. So, there's nothing in this area to break. (We can initiate FTP's in jobs on the MF.) --We aren't running SMTP on the MF, much to my chagrin. --Our 3270 terminal emulators (of which I have personally set up scores for various people over the years) all reference the MF by (one of) its domain names, never the IP. I think this is true for the hundreds that are out there accessing our on-line CICS applications TSO/ISPF. --Our MF environment is a single machine with 2 LPARS (plus a test LPAR) in a ring mode with GRS (whatever that means.) Question for the list: What should we be checking or looking for relative moving our MF behind a firewall and changing its IP address? Thanks! Stg -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
RMF V1R7 Disk Space Report question
Hello, When I try to use the RMF V1R7 Disk Space Report (via SPG command) it says: Storage group or volume data are currently not available. The help says I should specify a Storage Group. Can someone tell me how to do that? Thanks. Stg -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
RMF question
Hello again, Would anyone be concerned if they saw the following in their RMF monitor? (We are z/os 1.7, with 2 LPAR's, connected via GRS as I understand it. I believe we do not have XCF hardware, which is why we use GRS.) The DLY percentage below rarely drops below 15 or so. It peaks in the 20's. Thanks. Stg RMF V1R7 XCF DelaysLine 1 of 1 Command === Scroll === CSR Samples: 100 System: DSYS Date: 02/29/08 Time: 15.46.40 Range: 100 Sec ServiceDLY Main Delay Path(s) --- Jobname C Class %% Path% Path% Path% Path GRS S SYSTEM 25 23 22102 2410 -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: RMF V1R7 Disk Space Report question
Hello, I found SYS1.SERBCLS in my TSO SYSPROC DD concactenation. I don't have an ERBRMF04 member in this however. I didn't see it in the other SYS1.SERB* data sets either. Should we create one? Does it need more than the lines suggested? Thanks. Stg -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: RMF question
Hi, Regarding: What is the activity on other paths between these two systems? How many paths do you have defined? Unfortunately, you've already exceeded my sysprog and rmf skills.I'll just pass this on to the systems group. Thanks! Stg -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Counting Records in Files
Hello! z/OS 1.7 here! This is (I hope) a pre-Friday easy opinion question. The only parameters are, that we have no real third party tools to solve this except SyncSort. We need to count the number of records in about 100 flat files.Since we're already running these through SyncSort, I'm thinking of keeping and parsing the output of these with Rexx, but thought I would ask first to see if there are other nifty first. TIA! Stg In order to fulfill auditor requirements, Focus needs to compare the number of records FTP’d to FOCUS with the number of records used in its night production database loads. There are currently ten jobs that FTP over 100 files to the FOCUS server. Most of these jobs are put through an MVS SYNC SORT process to place the data in the correct format, so a total record count for those datasets is available in the SYSOUT. Getting this information manually is very time consuming, so we want to develop an automated method. Since a job that would read these counts from the SYSOUT file would be cumbersome to write, I would like to know if there is a means of directly counting the records in a dataset. One method of counting is provided by SYNC SORT, using the TRAILER parameter. Do you know of any others?
WLM SP Abend Mystery
Hello! z/OS 1.4, DB2 7.1 here.We got RRS up and running a few weeks ago and I'm making our first (1st) attempt to convert a COBOL SP from SPAS to WLM.The only change I made was to modify the LinkEdit step to include INCLUDE SYSLIB(DSNRLI) MODE AMODE(31) RMODE(ANY) instead of what we use for SPAS SP's: INCLUDE SYSLIB(DSNALI) MODE AMODE(31) RMODE(ANY) I didn't make any other changes. The WLM version starts and runs fine up until the first EXEC SQL statement, where it bombs with pretty much of a mess. (The SP abends. The WLM address space stays up and happy.) Our sysprog has raised an issue with IBM and I've created a CEEDUMP for the SP, but after a week, have gotten nowhere. (Apparantly, this isn't the dump they want.) Question for the group: Is there any basic step I'm missing?I'm not sure the problem is in DB2, so I'm cross-posting to IBM-Main. I'd love to solve this and not wrestle further with technical support, but am at a loss for ideas. (I guess I should read the two or there redbooks I have relative to this topic, but have only perused them thus far.) Thanks! P.S. For the thrill-seeker, here are excerpts from the stuff I sent our sysprog... After multiple compiles and WLM refreshes, I'm stuck. My comments are blue. The test can be done by anyone. Type TSO TSWOVDFT from a DSYS connected TSO session to recreate. This runs a RExx that calls the SP. You should see: = *** BEFORE THE CALL *** OVDFT_PGM_NAME: TSWOVDFT DISPLAY_SW: X SP_STATUS : 0 UPDATE_SW : Y CICS_SW : Y DEBUG_SW : DOC_CODE : BA DOC_ID: '954029 ' ERROR DIAGNOSTICS SQLCODE: -430 SQLSTATE: 38503 SQLERRMC: PROCEDURE:DBATEST .FIW_OVERDRAFTS:DBATEST .FIW_OVERDRAFTS : SQLERRP: DSNX9WAC I=1 SQLERRD(I): 0 I=2 SQLERRD(I): 0 I=3 SQLERRD(I): 0 I=4 SQLERRD(I): -1 I=5 SQLERRD(I): 0 I=6 SQLERRD(I): 0 I=1 SQLWARN(I): I=2 SQLWARN(I): I=3 SQLWARN(I): I=4 SQLWARN(I): I=5 SQLWARN(I): I=6 SQLWARN(I): I=7 SQLWARN(I): I=8 SQLWARN(I): I=9 SQLWARN(I): I=10 SQLWARN(I): DSNT408I SQLCODE = -430, ERROR:(SPECIFIC NAME ) HAS ABNORMALLY TERMINATED DSNT415I SQLERRP= SQL PROCEDURE DETECTING ERROR *** AFTER THE CALL *** OVDFT_PGM_NAME: TSWOVDFT DISPLAY_SW: X SP_STATUS : 0 UPDATE_SW : Y CICS_SW : Y DEBUG_SW : DOC_CODE : BA DOC_ID: '954029 ' DISCONNECT RC: -1 DISCONNECT SQLCODE: -924 ERROR DIAGNOSTICS SQLCODE: -924 SQLSTATE: 58006 SQLERRMC: 0001:000C:00F30020 SQLERRP: DSNTZALI I=1 SQLERRD(I): 0 I=2 SQLERRD(I): 0 I=3 SQLERRD(I): 0 I=4 SQLERRD(I): 0 I=5 SQLERRD(I): 0 I=6 SQLERRD(I): 0 I=1 SQLWARN(I): I=2 SQLWARN(I): I=3 SQLWARN(I): I=4 SQLWARN(I): I=5 SQLWARN(I): I=6 SQLWARN(I): I=7 SQLWARN(I): I=8 SQLWARN(I): I=9 SQLWARN(I): I=10 SQLWARN(I): DSNT408I SQLCODE = -924, ERROR: DB2 CONNECTION INTERNAL ERROR, , , DSNT415I SQLERRP= SQL PROCEDURE DETECTING ERROR === == === == The Stored Procedure does fire. The DBT1APP1 address space starts up and the COBOL DISPLAY statements confirm that FIWOVDFT it makes it as far as the first DB2 EXEC SQL (SELECT) statment. === == FIWOVDFT - ENTERED: 05/10/2007 13.41.05 COMPILED: 05/10/07 13.39.35 FIWOVDFT BEFORE PARMS: FIZ-PGM-NAME TSTOVDFT FIZ-DISPLAYY FIZ-SP-STATUS 0 FIZ-UPDATE-SW Y FIZ-CICS-SWY FIZ-DEBUG FIZ-DOC-CODE BA FIZ-DOC-ID 954029 WS-DOC-CODE: BA WS-DOC-ID: 954029 PREPARING TO RETRIEVE TIMESTAMP CEE3204S The system detected a protection exception (System Completion Code=0C4). From compile unit FIWOVDFT at entry point FIWOVDFT at compile unit offset -F39E9FA8 at entry offset -F39E9FA8 at address 000A. === == There doesn't seem to be anything else useful displayed in DBT1APP1. However, in DBT1MSTR the following shows up: === == 13.41.06 STC06107 DSNX905I -DBT1 DSNX9CAC PROCEDURE OR FUNCTION 494 494 DBATEST .FIW_OVERDRAFTS TERMINATED ABNORMALLY ASID= 0047 WLM_ENV= 494 DBT1APP1 13.41.06 STC06107 DSN3201I -DBT1 ABNORMAL EOT IN PROGRESS FOR 495 495 USER=DB2WLM CONNECTION-ID=RRSAF CORRELATION-ID= 495 JOBNAME=DBT1APP1 ASID=0047 TCB=00AC6B68
Fw: [DB2-L] WLM SP Abend Mystery
Hi -- a helpful suggestion got me past my error. Thank you! Stg - Forwarded by Steve Grimes/Systems/ais on 05/24/2007 05:37 PM - Steve Grimes/Systems/ais 05/24/2007 03:58 PM To DB2 Database Discussion list at IDUG [EMAIL PROTECTED] cc Subject Re: [DB2-L] WLM SP Abend Mystery Success! This definately got me on the right path -- thank you! I changed the PC options to ATTACH(RRSAF) and (eventually) the compile options to DYNAM and NOEXPORTALL. The execution seems to be happening now, with (typical) abends occurring due to program logic and check constraint stuff. (Probably because this program is truly NOT re-entrant.) Anyway, I'm on my way again. Thank you! Stg -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Prefetch Disabled - No Read Engine
Hello, DB2 v7.1, z/OS 1.4 here, cross-posting to DB2-L and IBM-Main. (I love you guys/gals!) I know this has come up before but I'm finally getting back to it. I've searched the web and various places, but to know avail. I was concerned when DB2 PM indicated a Prefetch Disabled - No Read Engine weekly count for all bufferpools that was about 7000. So far this week we are at 58000. A week or two back we hit over 260,000. I have no DASD person I can take this up with. We don't even have a single full-time sysprog, which is why I end up chasing many of these things. We do have a shark. We are using PAV. Any tips on where I should turn next? Thanks. Stg -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Wars and Allies
I think R. J. Rummel's Death by Government shines the light of statistics on this question. Stg -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
BLKSIZE on a SYSOUT dataset
Hello, z/OS 1.4, DB2 7.1 here, with a simple low-priority Friday question! I want to write the output of a DB2 PM report to disk so I can do some post-processing on it. If I leave the BLKSIZE off, or code DCB=BLKSIZE=0, I get a BLKSIZE of 6251 on the LRECL 133 dataset. Since this is going to a 3390, (yes we even still hard-code our vol-sers) wouldn't I better off hard-coding a BLKSIZE of, say, 27930? //SQTRCDD1 DD SYSOUT=* has become: //SQTRCDD1 DD DSN=WU07SG.TRACE.FILE,DISP=(,CATLG,DELETE), // UNIT=DISK,VOL=SER=WUDF34, // SPACE=(CYL,(100,100),RLSE), // DCB=BLKSIZE=27930 Since the post-processing will be done with Rexx, (which I expect to be pokey because of the volume of records) I'm wanting to help this thing along all I can. (For example, I'll set the EXECIO lines value to the number of records in a block.) TIA! Stg -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: BLKSIZE on a SYSOUT dataset
Hi Bruce! DCB=(RECFM=FB,LRECL=133,BLKSIZE=0) rendered 6251 also. It's no biggie. I'm hardcoding the BLKSIZE now. I wanted to run it by the list just to see if I was crazy or something. Thanks. Stg Bruce Black [EMAIL PROTECTED] Sent by: IBM Mainframe Discussion List IBM-MAIN@BAMA.UA.EDU 07/28/2006 11:55 AM Please respond to IBM Mainframe Discussion List IBM-MAIN@BAMA.UA.EDU To IBM-MAIN@BAMA.UA.EDU cc Subject Re: BLKSIZE on a SYSOUT dataset I want to write the output of a DB2 PM report to disk so I can do some post-processing on it. If I leave the BLKSIZE off, or code DCB=BLKSIZE=0, I get a BLKSIZE of 6251 on the LRECL 133 dataset. Since this is going to a 3390, (yes we even still hard-code our vol-sers) wouldn't I better off hard-coding a BLKSIZE of, say, 27930? I just tried it and it generated 27930. Probably something in the DB2 program is setting a default blocksize. z/OS will generate the blocksize at allocation time only if it knows the RECFM and LRECL, so try // RECFM=FB,LRECL=133,BLKSIZE=0 -- Bruce A. Black Senior Software Developer for FDR Innovation Data Processing 973-890-7300 personal: [EMAIL PROTECTED] sales info: [EMAIL PROTECTED] tech support: [EMAIL PROTECTED] web: www.innovationdp.fdr.com -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: BLKSIZE on a SYSOUT dataset
Ah -- that last tricked (adding DSORG=PS) worked. Thanks! Stg -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
WLM Service Definition for DDF Thread
Hello, DB2 V7.1, z/OS 1.4, WLM Goal Mode here, with DB2 PM, cross posting to DB2-L and IBM-Main, here! There is a lot written about this topic in the archives, and I'm also looking at other resources (Hugh Smith presentation, DB2 Admin guide, etc.) but I'd like to make a recommendation to our Systems folks this afternoon and would appreciate any perspective anyone can offer: Here is an excerpt from our WLM DB2 Transaction Classification screen: 1 SI DBP1 2PN FIPLAN DB2TTRAN 2PN MANTIS DB2PTRAN 2PN * DBP1 is our production subsystem. I assume that DBTTRAN has a lower priority than DB2PTRAN. (Because FIPLAN is mostly batch against production and MANTIS is mostly online.) I assume the asterisk is to prevent our DDF threads from falling into the default discretionary class. (Is this true?) My issue is that I would like to throttle our users MSACCESS threads to this DBP1 subsystem. Could this be as simple as adding: 2CI MSACCESS DB2TTRAN To the above list? (DB2 PM says MSACCESS is the 'Correlation Name'. It also says MSACCESS.EXE is the 'Client Application Name'.) I get plenty of 'Thread Id' stuff from PM, but am having trouble mapping it to the 'WLM Classification Attribute' abbreviations in the DB2 Admin guide. Is there a better approach? Thanks in advance! Stg -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: [DB2-L] WLM Service Definition for DDF Thread
Great tips -- thanks all. Using RMF screens (which I have access to) and looking over someone's shoulder for WLM screen's (which I don't have access to) I found that my assumptions were basically correct, but that I was looking at the wrong thing. Our production DDF thread rules are: 1 SIDBP1 2 . PN . *DDFPROD (Our test DDF thread on the same LPAR looks similar, but with DDFTEST.) DDFPROD is defined as 1 period, Imp = 2, 90% within 2 secs. DDFTEST is defined as 2 periods, 1st Period Duration=1, Imp = 3, 90% within 2 secs 2nd Period Imp = 5, Execution Velocity of 50 Using PM and RMF panals, I found my user's thread running with DDFPROD priority. So, I'm going to make my suggestion to add: 2 CI MSACCESS DDFTEST to the DBP1 definition and see where it goes. Thanks! Stg -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
-911 fetching from a declared GTT.
Hello, z/OS 1.4, DB2 1.7 here! We implemented a GRS (ring mode) last weekend and are seeing some interesting performance behaviours. One thing however, that I don't recall seeing before is the following abend: DC6PRAIQ - DSNT408I SQLCODE = -911, ERROR: THE CURRENT UNIT OF WORK HAS BEEN DC6PRAIQ - ROLLED BACK DUE TO DEADLOCK OR TIMEOUT. REASON 00C9008E, TY DC6PRAIQ - OF RESOURCE 0302, AND RESOURCE NAME DSNDB06 .0167.X' DC6PRAIQ - 000E6' DC6PRAIQ - DSNT418I SQLSTATE = 40001 SQLSTATE RETURN CODE DC6PRAIQ - DSNT415I SQLERRP= DSNXOCN SQL PROCEDURE DETECTING ERROR DC6PRAIQ - DSNT416I SQLERRD= -200 13172746 13172878 13813475 -1010298877 DC6PRAIQ - 536870912 SQL DIAGNOSTIC INFORMATION DC6PRAIQ - DSNT416I SQLERRD= X'FF38' X'00C9000A' X'00C9008E' DC6PRAIQ - X'00D2C6E3' X'C3C81003' X'2000' SQL DIAGNOSTIC DC6PRAIQ - INFORMATION This is on the fetch of data from a declared GTT in a (big) CICS program. Any thoughts or clues we should pursue? TIA! Stg P.S. This message was posted to both DB2-L and IBM-Main -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Allowing Joe User into TSO
Hello again! We'll I'm certainly enjoying the exchange. I think the initial responses covered what I was after. An additional detail for the curious -- Joe User currently has a Roscoe account and uses it to submit jobs that do updates. So, he has a reasonable amount of RACF authority already. But, alas, not enough due to recent (long overdue) tightening of RACF rules.So he calls us, and we submit this one job. Zeke has the authority to submit what they want, and the Work Center function (within) can be set up so they can only submit that -one- job. This would also serve as a proof of concept for migrating JCL stuff away from users (and Roscoe) and toward better (I think) control via the Zeke Work Center. Stg -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Allowing Joe User into TSO
Hello, z/OS 1.4 here. I apologize in advance for not knowing the best list to send this question to. (Perhaps ISPF-L? But I'm not a subscriber there.) I'm proposing to our systems folks that we allow a user to use TSO to get to the Zeke Work Center function. I'm being told that there is no way for us to limit what the user can do if we let them intoTSO. (Historically, we had RACF practically emasculated. This has been tightened down recently. Our application programmers no longer, for instance, have update access to SYS1.PARMLIB, etc.) I'm going to counter this assertion with my own, namely: We can create a sign-on PROC that executes a CLIST and panel that only gives this user access to Zeke. Once they're in Zeke, I'm confident (using the Zeke security functions) that I can limit them to just what I want them to be able to do. I'm hoping no RACF changes will be required, except perhaps for authorization to execute the sign-on proc. The only catch I see is that we currently select (from our initial menu) the Altai/Platinum product support menu which has Zara and Zeke, and choose Zeke from there. We don't want this user to see Zara, only Zeke. Am I making sense? Is my position sound? Any tips? I have been looking at the TSO/E Customization manual. The two-step I'll face is: 1) It can't be done. 2) It would take a long time to do that. TIA! Stg -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Are there any mainframe sites out there that don't use JCLCHECK/JCLPREP or equivalent?
We do not have such a tool in place. Well, technically, we have something built into the Roscoe side, but I'm pushing everyone who'll listen over to TSO and PDS's, where we have none. There is a free one out there (CBT has it, I think,) that I thought I might get installed and then wrap in a Rexx to add functionality. However, this requires a USER SVC. This was a brick wall that I could not scale with our systems group. (FUDSI.) Stg -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Are there any mainframe sites out there that don't use JCLCHECK/JCLPREP or equivalent?
Here's the doc from the free one (member $$DOCJCL). It's called JCLSCAN. The CBT references are at the bottom. -=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-= DOCUMENTATION FOR JCLSCAN TSO COMMAND PROCESSOR This highly convenient program calls MVS's JCL converter to report JCL errors in a jobstream on your TSO tube. It is the same program which checks the errors when you run a real jobstream with TYPRUN=SCAN. The output has been massaged to make it more convenient to display on the terminal. All syntax errors are found, but DATASET NOT FOUND-type errors, which are produced by the JCL interpreter, are not shown by this processing, which is done by the JCL CONVERTER. The program consists of two parts: the TSO command processor called JCLSCAN, and a user SVC, which does all the dirty work of calling the MVS JCL CONVERTER. The SVC is type 4. To use the program, just execute the TSO command: JCLSCAN 'dataset-name' This program was found on a large file of utilities submitted to the CBT tape from MEMOREX. It may be found on versions 260 and older. The file was file 313 on those versions of the CBT tape. That file contained over 100,000 lines of code, and contains many old but still useful utilities. You may have to tell some of them that 3380 or even 3350 disk drives exist, but once this is done, many of these programs still work. The file is much worth exploring. It was deleted from version 261 of the CBT tape. Version 249 of the CBT tape, which may be obtained from SHARE, (see file 1 of the current CBT tape for instructions how to order it) has this material on file 313. -=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-= And here are the install instructions from the same PDS (member: $INSJCLS) -=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-= INSTALLATION INSTRUCTIONS FOR JCLSCAN JCLSCAN IS A TSO COMMAND PROCESSOR WHICH EXECUTES THE IBM JCL CONVERTER IN THE FOREGROUND. YOU POINT IT TO A DATASET OF JCL (A JOB) AND IT RETURNS YOUR JCL ERRORS TO THE TERMINAL AS THOUGH IT WERE EXECUTED WITH TYPRUN=SCAN. THIS IS ESPECIALLY VALUABLE WHEN MAKING NEW JCL. YOU CAN TEST THE JCL WITHOUT USING AN INITIATOR. THE CONVERTER RUNS COMPLETELY IN THE FOREGROUND. THE JCLSCAN PROCESSOR WORKS WITH AN SVC WHICH ACTUALLY CALLS THE JCL CONVERTER. OUTPUT FROM THE CONVERTER IS RETURNED TO THE COMMAND PROCESSOR, WHICH FORMATS IT FOR THE SCREEN. HELP INFORMATION FOR THE TSO COMMAND JCLSCAN IS INCLUDED IN THE SOURCE CODE. COPY THAT INFORMATION INTO A TSO HELP DATASET AND EDIT IT SO IT FITS THE HELP FORMAT. TO INSTALL : A. ASSEMBLE THE JCLSCAN COMMAND AND THE SVC INTO AN AUTHORIZED LOAD LIBRARY. (PICK AN UNUSED TYPE 3 OR TYPE 4 SVC NUMBER.) B. IF YOU HAVE MODREP OR THE EQUIVALENT (TO MLPA THE SVC DYNAMICALLY) THEN MLPA THE SVC FOR TESTING. MODREP IS ON JIM MARSHALL'S FILE 316 OF THE CBT TAPE OR RICE UNIVERSITY FILE 336. WHEN IT WORKS TO YOUR SATISFACTION, COPY THE SVC INTO SYS1.LPALIB AND IPL MVS WITH CLPA. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Job schedulers
We use Zeke. It was originally from Platinum, now it's Allen Systems Group (I think.) I like the scheduler. It's relatively easy to use. Stg -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: The secret to multi-volume, non-SMS, DASD allocations?
I dropped the VOL= and just kept the modified UNIT parm. It seems to be working fine. Stg -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Highly used programs: any better replacements out there? IDCAMS, IEFBR14
Re: SR R15,R15 Wouldn't XR R15,R15 have been more efficient? Or are 32 bit subtractions now single cycle instructions? (Just curious.) Stg -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
CBT034 - RACFUSER - Index Error
Hello, z/OS 1.4 here. I'm looking for a clue as to why I'm getting *** AN ERROR OCCURRED IN THE INDEX RECORDS from my first attempt to execute pgm RACFUSER, (CBT Tape, file 034). Here's a snippet of the (relevant?) code. PINDX01 XRR2,R2 CLEAR FOR THE DIVIDE LHR3,DCBLRECLLOAD THE LRECL MHR3,RECNO+2 RECNO SHOULD BE ZERO, BUT... ARR7,R3 ADD THE OFFSET TO THE BEGINNING A R7,RBAOFF ADD ANY OFFSET TO THE RBA BEGINNING SPACE CLI INDXHID,HEX8A Q. IS THIS THE INDEX BLOCK ID BNE ERRINDEX A. NO, PUNT SPACE CLI INDXHI2,HEX4E Q. IS THIS THE INDEX BLOCK ID BNE ERRINDEX A. NO, PUNT SPACE CLI INDXHILN,HEX01 Q. IS THIS INDEX LEVEL 1 BNE ERRINDEX A. NO, PUNT Thanks. Stg -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: CA-Librarian -SEL RACF
Thank you. Extract did work! But... it but doesn't process the -REP, -INS, etc commands that programmers also include in their SYSIN stream. I was hoping for a solution that I could completely bury in the Procs and require minimal or no changes by the programmers. Unfortunately, I don't see an easy way to do this. Thanks. Stg -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
CA-Librarian -SEL RACF
Hey there, z/OS 1.4, CA Libr VERSION - 4.2 GENLVL=0101 here. I am RingTFM but to no avail yet. And this probably isn't the appropriate forum, but there are lots of smart folks here. It seems like I should be able, in a batch job, to -SEL module,TEMP against a CA-Librarian Master-File with READ ONLY RACF access. But alas, I'm getting ACCESS INTENT(UPDATE ) in my Job listing. Any thoughts? TIA. Stg -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: CA-Librarian -SEL RACF
David writes... -OPT GPO -OPT EXEC,LIST,NOPC -SEL NAME=// Hmmm, interesting! I tried this a couple of different ways. It seems to only build the necessary -SEL control statements and pass them to its OSJOB jobstream file. So, I'm presuming the next Lib step that tries to use them will fail with the same RACF problem. Thanks though! Stg -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: TSO replacement? [WAS: RE: Userids]
I've heard ROSCOE may make a comeback! (Is it Friday yet?) Stg -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
