Re: Question about COBOL Program
I have been following this thread for a bit. Maybe I missed where the has been answered. Are COBOL LOAD modules incompatible between VSE and Z/os? (specifically regarding file handling?) If not, is there an option to delay or stage the changing and recompiling/binding of the COBOL SOURCE code until after the conversion. The programs could be changed as they come up for maintenance or encounter a problem? If the old ones can continue to run, you could use historical data to determine if certain programs are often maintained or fails frequently, and work on those programs first? Kriss Kriss Davis Project Manager, CIRBN ITDC Room 122C, Mail Code 6370 Illinois State University -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Mainframe books
Probably not exactly what you are looking for, but on the topic of books about the mainframe, I would like to recommend the following. What On Earth is a Mainframe? By David Stephens. I have loaned my copy of this book to several Windows and UNIX folks and they have all given it very positive reviews regarding how it helped them understand mainframe concepts and principles. Kriss Davis Illinois State University -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
production library control options
Before I start with vendors, etc. I was going to get a sense from you folks about the various options for handling check-in, check-out, promotion, etc. of various production/custom objects like JCL, COBOL SOURCE, PROCs, COPYBOOKS, JAVA parts, WSDLs, and maybe other things on the USS side of the mainframe. We have all this stuff plus we have PEOPLECODE we should probably be managing/controlling and we have some custom software on AIX in a development/maintenance tool called ENVISION (for our Datatel/Colleague footprint). We could treat the vendor stuff as separate I figure if we have to. We have a lot of locally developed mainframe CICS and BATCH COBOL code with and without DB2. Plus CICS based webservice programs that create files on the USS side of the mainframe. We have DOC TEMPLATES, etc. also. And as mentioned, Peoplesoft HRMS (Oracle, non-mainframe) and Datatel/Colleague accounting system on AIX. So... I am not sure I care what platform the repository of all this stuff is located on, but whatever tool we get, it needs to handle a lot of different things. Mainframe, AIX, ORACLE, DB2, etc. etc. And hopefully, have one interface to manage check-in, check-out, and promotion to production processes. We have no check-in, check-out, promotion automation in place now on the mainframe side for our local COBOL/CICS/DB2 stuff. Not sure what is going on in Peoplesoft since it is not in production yet, still in development/roll-out. We are going to have to phase in whatever we get, but I would like to have one place for all this stuff to be. And start with a tool that has the potential to do it all. Maybe it is just too much to really expect of one tool. Thanks I advance for any suggestions on this. Kriss Kriss Davis Manager Illinois State University kpda...@ilstu.edu -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Getting BIND/LINK date out of load module members
I am working on process to monitor/audit load libraries for new/replaced members during a date range. I have a working version that uses AMBLIST with a SYSIN of LISTIDR. I run the REPORT OUTPUT created by this to a disk dataset for a given load library. Then in the next step, I parse the REPORT output looking for the member name and BIND date. If the BIND date is less than 3 days old, I output the member name on the report. The AMBLIST step (unloading all the member data to the report) takes quite awhile for some of our larger LOAD libraries. And of course, outputs a lot more info than I need. I just need the member name and the BIND date. Is there another IBM utility (or a different parameter for AMBLIST) that would unload a LOAD library of its members and dates more efficiently? I only run this once a day, so it is not a big deal that it runs quite a while, but it would help testing new features if I could get the AMBLIST part to run faster. Thanks in advance! Kriss Kriss Davis Manager Illinois State University kpda...@ilstu.edu -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: Intelligent comparator?
Depending on the task you want to perform and where you want to perform it, I have used Version Merger in TSO/ISPF to keep COBOL vendor software upgraded. This used to be owned by Princeton Softech, IBM may own this now. The cool thing it would do is a three-way compare. You have the original vendor code, the current code that may have local customizations intermixed, and the new release vendor code. Once the comparison is run, you get one ISPF panel with all the comparison data integrated with indicators specifying the source of each line (was it in all three versions, just two, or is the line of code new to the new vendor release for example). You can edit right from there and save off the result. The compare could run in batch for the whole SOURCE library and you could find out the scope of the upgrade through summary reports. And use the summary reports as a check off list that you have looked at each program or copybook in the library. Kriss Kriss Davis Manager Illinois State University kpda...@ilstu.edu -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: IEBUPDTE Supports Only LRECL =80 :-(
If you have SAS installed on your mainframe and you are comfortable using it... BASE SAS has many data management functions that can be used on PDS and PDSE datasets. Including member update, loading, unloading, etc. These are documented in the SAS Companion manual for Z/os for the level of SAS you have currently installed. Kriss Kriss Davis Manager Illinois State University kpda...@ilstu.edu -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
Re: copybook usage
Depending on the amount of batch updating to be done... I would be tempted to write the update process/program in CICS. Then use EXCI (or other batch interface to CICS) to post the activity you are getting from your flat file. You might end up with two CICS programs. One as the presentation layer and one that is LINKed to that does the update once the presentation layer has collected the data. This way you have one update program to maintain. No change for data or logic to become out of sync. Also, you can run your batch updates while CICS has control of the file (if the destination is a VSAM file for example) and CICS will manage any file/record contention. But this is only advisable if the amount of batch updating is relatively small in my opinion. If you do separate the presentation and business logic/update layers, you could also write a web service at some point and use a browser as your presentation layer. Kriss Davis Illinois State University 3470 Administrative Information Systems Normal, IL 61790-3470 [EMAIL PROTECTED] (309) 438-3983 -- 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
Global Payments Systems TP029 file
I don't know the file, is it EDIFACT format? The acronym or abbreviation EDIFACT does not appear in any of the documentation for the TP029 file. It also carries a copyright on the bottom of each page for Global Payments. So I am pretty sure this is their standard format for sending data to clients that process payments through them. Kriss Davis Illinois State University 3470 Administrative Information Systems Normal, IL 61790-3470 [EMAIL PROTECTED] (309) 438-3983 -- 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
Global Payments Systems TP029 file
I realize this is a bit off-topic, but perhaps someone is processing this file and has this information or could point me to another source. We are planning on using a download file from our credit card processor (Global Payments, Inc) of our credit card activity. This is a fixed length, multi-record type file of transactions. It is called the TP029 file by Global. This appears to be a standard file that Global sends to its payment processing customers to allow them to update their local systems. Before I start to code up the SAS INPUT statements for this file, I was wondering if anyone has created INPUT statements for some or all of the record types in this file? I did a few Google searches to see if I could find any references, but came up empty. A subset of this file will end up in DB2 tables on the mainframe. I posted this question to the SAS-L forum, but no luck so far. I could even use a COBOL file description of this file and run it through the COB2SAS process as a starting point. If someone had one of those. Thanks in advance, Kriss Davis Illinois State University 3470 Administrative Information Systems Normal, IL 61790-3470 [EMAIL PROTECTED] (309) 438-3983 -- 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
Rational toolset training.
Just wondering if anyone has had someone come in-house and do Rational Toolset training for their mainframe application developers? And if so, did you especially like any particular training group or individual trainer? We are looking for recommendations on a trainer, but also for someone that could work with our people on the first few projects to get them started in the right way. Thanks in advance. Kriss Davis Illinois State University 3470 Administrative Information Systems Normal, IL 61790-3470 [EMAIL PROTECTED] (309) 438-3101 -- 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: Looking for consult help getting to 31-bit CICS Cobol
You could also look at MHTRAN2 to do your COBOL conversion. I used it to convert a whole portfolio of COBOL source and copybook code (around 1300 programs and related copybooks). I don't believe it has a TRACKING component to help you keep track of what has been converted and what has not. But it did a good job for me getting the code changed and ready for re-compile and re-link. Since I was the only one working on the project, I did not need a sophisticated source code portfolio manager to track what had been changed and converted. I did this conversion over 10 years ago, so my experience with the product is a bit dated. I used SAS to unload the source code libraries, build JCL streams of mass translates and compiles, etc. Prince Software. http://www.princesoftware.com/pages/mhtran2.html Kriss Davis [EMAIL PROTECTED] (309) 438-3101 -- 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
Peoplesoft Installation Question
This is a bit off topic. Apologies in advance... I am looking for a university or college that purchased and has in production only the HR/HCM part of Peoplesoft. In other words, the University purchased the HR/HCM component of Peoplesoft, but have interfaced it with either another vendors' Student and Finance systems, or to home grown systems. There are some specific questions regarding that type of configuration we would like to talk to someone about. Feel free to reply off list. Thanks in advance. Kriss Davis e-Merge Merging People, Process, and Technology Illinois State University 3470 Administrative Information Systems Normal, IL 61790-3470 [EMAIL PROTECTED] (309) 438-3101 -- 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
VTAMSWITCH and muliple MSwindows of CICS screens.
We have asked the vendor (Mackinney) and they have said no, but we are thinking, if we are willing to give up some functions in VTAMSWITCH, we can get where we want to go with it. It could be we are just not asking the right question or explaining the need well. We can rotate through multiple applications (multiple active CICS sessions). Rotating meaning by pressing a PA key, each active CICS sessions/screen will be brought up in the emulator in succession. Works great. However, our end users used to be able to start up multiple tn3270 sessions and then log into multiple CICS sessions and keep them visible simultaneously. This allowed the end users to have multiple CICS sessions up on their Windows desktops and not have to rotate through them. For example, having a CICS inquiry screen up in one MS WINDOW and and UPDATE screen visible in another. Also, this allowed cut and paste between two or more visible CICS screens. We are using RACF to control access and we are at CICS/TS 3.1 so have its facilities. Is there an alternative to TN3270 running through the WEB to perhaps pass the userid/credentials directly to CICS (kind of a WEB VTAM?) that might allow multiple connections? Z/os 1.7. one terminal owning region and multiple AORs. DB2 V8. Just curious if we are missing something like dynamic terminal assignment or something. And again, it just may not be a function the product supports as the vendor has explained. We were caught kind of off-guard on the viewing simultaneous piece. We could give up terminal stealing, messaging, etc. for example. At least in the short run. Perhaps a small additional product? Only a small subset need TSO access. Most users are CICS users. Perhaps a small additional product? Thanks in advance, Kriss Davis ISU [EMAIL PROTECTED] -- 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
3580, 3590, and magstar
I have tried to search the archives, but don't come up with a match on this. We have an outside agency that says they can accept 3580 carts, but not 3590 carts. We have a Magstar Robot and we create 3590 by default. Sorry for the simple question, but can we create 3580's and if so, is just a change in JCL? Do we have to initialize some of our 3590 to 3580? Or buy some? I did not get any hits on 3580 at all? Maybe they told us the wrong cart type. Thanks in advance, Kriss - Kriss Davis, CCP Interim Mainframe/eServer Manager Datatel Project Management Illinois State University [EMAIL PROTECTED] 309-438-2802 - -- 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
Getting a list of datasets off a volume without needing a DDNAME for each volume
I have a long, dynamic list of DASD volume names that I would then like to generate a list of dataset names from by volume. I can do this by having a job generate a job, but those tend to turn into a bit of a maintenance problem. For example. (first step, create all the IEHLIST control cards for the volumes I need listings for. Place in IEHTEMP) //LISTVT1 EXEC PGM=IEHLIST //SYSPRINT DD SYSOUT=* //VOLDD1 DD UNIT=3390,VOL=SER=WORK01,DISP=SHR //SYSIN DD DSN=IEHTEMP,DISP=(OLD,DELETE) // I can generate the IEHTEMP input dataset in a prior step for all volumes I want, but within the same job, I cannot dynamically create the VOLDD1 pointers to use. I can have this job submit a second job, but I was hoping to avoid that. I can use our scheduler to create a job precedence and that is what I will probably do if there is no dynamic way to get the data. The job bombs if I leave the VOLDD1 card out and just have a list of control cards. LISTVTOC FORMAT,VOL=3390=WORK01 LISTVTOC FORMAT,VOL=3390=WORK02 ... Is there any utility that will create a list of DSNs on a volume that does not require a DD card pointer to that volume? I don't need DCB or other info. Just the Dataset name. I also don't want to miss any special not-catalogged datasets on the volume. Thanks in advance. Kriss - Kriss Davis, CCP Interim Mainframe/eServer Manager Datatel Project Management Illinois State University [EMAIL PROTECTED] 309-438-2802 - -- 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
EMSP00 changes, how to activate them?
I have looked in the NVAS/NETVIEW manual for OS/390 and still have a question. If we change the text of the EMSP00 panel (signon panel), how do we get NVAS to start using it? Does NVAS have to be bounced or is there a command to refresh the pointer to this panel? Our operators are a bit wary of bouncing NVAS except as part of an IPL. Thanks in advance Kriss - Kriss Davis, CCP Interim Mainframe/eServer Manager Datatel Project Management Illinois State University [EMAIL PROTECTED] 309-438-2802 - -- 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
EMS1076E Recursive logon in NVAS
We are having some odd problems with the jump keys not working in certain environments/applications in NVAS. Then folks close their TERMINAL emulation window and then get error messages like the below. EMS1076E Recursive logon to same group is not allowed. We have had little trouble with the PA/PF key JUMP processing in the past, but it seems like either certain CICS versions or whatever is now trapping those keys from being passed up to NVAS. I know the above is pretty general, but just wondering if anyone had this same problem and perhaps there was a PTF or something else that was applied to fix it. a search of IBM-MAIN archives did not get a hit on the error message above. Thanks in advance, Kriss - Kriss Davis, CCP Interim Enterprise Server Manager Datatel/Touchnet Project Management Illinois State University [EMAIL PROTECTED] 309-438-2802 - -- 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
Beta Production LPAR(s) setup.
Dear Colleagues, We have a new Z/os capable machine we will be moving our current work load onto. We have a LOT of disk space on SHARK. We are primarily CICS/DB2/COBOL with some CICS/VSAM COBOL. We are not at modern levels of the OS or CICS currently. We have not exploited to any extent CICS/TS web capabilities. We are on DB2 version 7. Most of our CICS is non-TS. Our plan is to create an LPAR and move our current OS/390 production environment to that (my understanding this is possible with the proper patches in place). Then create a second LPAR that can be refreshed in a timely (daily) manner to either match the current environment or be IPL'ed into a Z/os environment for migration testing etc. We use RACF and SMS. We could even think about having three, one with the production environment, one with a clone of the production environment, and one that stays at Z/os for on-going migration and testing. I have been at one shop that set up a full copy BETA LPAR for Y2k and then kept it since it was VERY useful for both system and application testing. Each morning, the two LPARS start out identical unless a group has asked for the BETA LPAR to be IPL'ed in a different fashion. It can be reserved by systems programming or various application areas for private use in advance. I have some general questions. 1. Have you done this or thought seriously about it? 2. What were the top three gotchas you discovered along the way to putting this type of cloned production environment together? One I know about is to disabled certain automatic or scheduled activities. Another is to disallow or control FTP processing to the Beta LPAR is my assumption. 3. Do you have any overview document you could share that outlines how yours is set up, what additional software (flashcopy, other?) or hardware you needed. 4. I figure the licensing in this situation is a bit bizarre, but at this point, I am interested in the configurations people have used to accomplish this type of environment. Thanks in advance! Kriss - (Mr.) Kriss Davis, CCP Illinois State University [EMAIL PROTECTED] 309-438-2802 - -- 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
CISP VISA compliance
Dear Colleagues, I know this is more of a business question, but perhaps some of you have been involved in the technical compliance part of this. There are new credit card compliance rules (firewall placement, etc.) coming into effect for VISA credit card transactions. There seems to be two parts (we are tier 2 based on our transaction loads and VISA's CISP documentation). 1. The periodic scan of our servers/system by a certified scanner to make sure our systems are secure. 2. The self-assessment Q and A document we need to fill out periodically. I would be interested if anyone has used a consulting firm for one or both compliance parts. The Q and A part we have reviewed just is not clear enough to us to know what VISA is asking for in certain situations. Getting someone in that has a track record and knowledge of the ins and outs of the CISP specification to help us would be great. Thanks in advance. - Kriss Davis, CCP Project Manager Touchnet/eCommerce Illinois State University [EMAIL PROTECTED] 309-438-2802 - -- 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
DFSORT, INREC and BUILD
I am trying to build an output record that looks like D04nn (where nn is in column 27 for a length of 6 in the input record) I found a start on the IBM http://www-1.ibm.com/servers/storage/support/software/sort/mvs/professor _sort/srtmarfm.html and got this far //SYSINDD * SORT FIELDS=COPY INCLUDE COND=(21,3,CH,EQ,C'JOB',AND, 5,4,CH,EQ,C'') INREC BUILD=(1,1,C'D',2,2,C'04',27,6) RECORD TYPE=F We are on release 14 of DFSORT (not sure what PTF has been applied, I am an application programmer). I have tried it without the INREC part and it still gives me grief. 1ICE143I 0 BLOCKSET COPY TECHNIQUE SELECTED ICE000I 1 - CONTROL STATEMENTS FOR 5740-SM1, DFSORT REL 14.0 - 12:40 ON THU MAY 0 SORT FIELDS=COPY INCLUDE COND=(21,3,CH,EQ,C'JOB',AND, 5,4,CH,EQ,C'') INREC BUILD=(1,1,C'D',2,2,C'04',27,6) $ ICE104A 0 INVALID INREC OR OUTREC STATEMENT OPERAND RECORD TYPE=F I have built INREC with using only data from the input record, but have not inserted anything by spaces in the output before. Any help would be greatly appreciated. Kriss - Kriss Davis, CCP Illinois State University [EMAIL PROTECTED] 309-438-2802 - -- 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
