Re: Extents more than One for load modules library
On 8/11/2014 6:47 AM, Peter Relson wrote: IBM Health Checker for z/OS Check(IBMCSV,CSV_LNKLST_SPACE) alerts you when you have a data set with more than 1 extent. I think this checks for linklist data sets allocated with a secondary space value, rather than a data set with existing secondary extents. -- Richard -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: DFSORT SVC
On 5/21/2014 6:56 AM, Peter Relson wrote: we are using SYNCSORT as primary sort application, but although DFSORT in connection with DB2. Now we plan to install the DFSORT SVC in parallel. SYNCSORT uses SVC 109 routing code 17 (IGX00017). For DFSORT we would like to use SVC 109 routing code 38 (IGX00038). I have to ask: where did you come up with 38 as the extended routing code to use? I would have expected DFSORT to use 17 and SYNCSORT to use something in the 200-255 range that are reserved for non-IBM products. Or perhaps you might say that the sort program is to use routing code 17. Only the product can tell you if it has a dependency on the routing code that you use. Most will not have such a dependency; some might. In any case, you really ought to use something in the range 200-255 for the second. For what it's worth, there is a historical annotation from 1988 that SVC 109 routing codes up to 53 are assigned. I do not know assigned to what or even if such assignments are still correct. From Sri h Kolusu's response, it sounds like DFSORT is already setup to use routing code 38 if you specify the ALT parm. Also, according to: http://pic.dhe.ibm.com/infocenter/zos/v1r12/index.jsp?topic=%2Fcom.ibm.zos.r12.ieav200%2Fsvc109.htm (watch the wrap) routing codes C8-FF are reserved for customer use with SVC 109, so they should be able to use those as well as SVC 200-255. -- Richard -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: FREE DDNAME with concatenated datasets?
On 4/2/2014 4:50 PM, Paul Gilmartin wrote: On Wed, 2 Apr 2014 16:25:10 -0500, Walt Farrell wrote: snip allocate dd(ddn) dsn(dsn1) allocate dd(ddn2) dsn(dsn2) concat ddlist(ddn,ddn2) free ddn ...frees dsn1 but leaves dsn2 allocated. So, I'm left wondering what's different between the control block structures created by the two processes. (Or did I make an observational error?) snip This makes sense to me. If I specifically allocate two files, I would expect to have to free two files. The free of ddn de-concats the files and frees ddn. -- Richard -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Implicit VVDS creation
On 2/7/2014 11:58 AM, retired mainframer wrote: Since the VVDS is a catalog extension supporting both VSAM and SMS, wouldn't the size of the VVDS depend on mix of VSAM and non-VSAM datasets and possibly even the type of VSAM datasets on the volume? There is a formula to calculate the size of a VVDS base on the number of KSDS, ESDS/RRDS, LINEAR, and NONVSAM datasets. http://pic.dhe.ibm.com/infocenter/zos/v2r1/index.jsp?topic=%2Fcom.ibm.zos.v2r1.idac100%2Fvvdsize.htm watch for wrap. -- Richard -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Innovating an old IMS 3270-based application
On 1/6/2014 5:22 PM, Lizette Koehler wrote: This might be a better topic on IMS Newsgroup. They may have ideas to make an old app look new. Also, be aware of any SLAs or performance concerns. Going to a server platform (LUW) might not always provide the best service. I am not sure SLA's really transfer. I have seen customers that demanded sub-second response on the mainframe accept multi-second response on WEB apps. Not that WEB apps can't be responsive, just what I have seen accepted. -- Richard -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Cpc name variable in IEASYMxx
On 10/29/2013 8:07 AM, Jorge Garcia wrote: Hello: We want to add a new variable in our IEASYMxx. A new SITE variable with the last two positions cpc name. The problem is that the HWNAME variable doesn't exist in IEASYMxx and we couldn't obtain the last two positions of this variable. We have defined HWNAME in LOADxx. The new configuration load with a set of members in a main site and with another set of members in a disaster recovery site (with different cpc name). The last two positions of this member will be the SITE variable. Is possible obtain the cpc name in a variable in the IEASYMxx? You can do something like the following: SYSDEF SYMDEF(SYSR2='SYSR1(1:4).R2') SYMDEF(SYSD1='SYSR1(1:4).D1') SYMDEF(SYSD2='SYSR1(1:4).D2') SYMDEF(SYSH1='SYSR1(1:4).H1') SYMDEF(SYSS1='SYSR1(1:3).SMP') SYMDEF(VER='SYSR1(1:4)') SYSDEF HWNAME(P00AC0DC) SYMDEF(LOC='CS') SYSDEF HWNAME(P00ED9C6) SYMDEF(LOC='DAL') SYSDEF LPARNAME(MVSA) SYMDEF(CNMDOMN='TAM01') SYSDEF LPARNAME(MVSD) SYMDEF(CNMDOMN='TAM02') -- Richard -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Catching CICS Transaction ABENDs?
On 10/21/2013 11:03 AM, Charles Mills wrote: Thanks. Might do so. It's not so much handling as just being notified of ABENDs programmatically. Charles, You will get a message similar to: +DFHSR0001 An abend (code 0C7/AKEA) has occurred at offset X'' in program . where is the VTAM APPLID and is the CICS program. Unless it is suppressed this will be in the CICS JOBLOG and SYSLOG/OPERLOG. -- Richard -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Allocation test
On 9/20/2013 2:05 AM, Mike Schwab wrote: One suggestion I would like to make. When a dataset is deleted, a very tiny EOF record is written to each track. Just enough so the actual dasd unit erases all records on that track. If we were still using real 3390s, I would suggest a track full of EOF records. And not an intensive rewrite of the track like ICKDSF TRKRMT or the current VSAM ERASE would do. If you specify erase on scratch in RACF it will erase each track when the dataset is deleted. I assume there is equivalent support in the other security products. You don't need to write a track full of EOF's, if you issue a write count key and data command it will erase the rest of the track anyway, or you can just use the erase command. -- Richard -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Allocation test
On 9/19/2013 8:13 AM, Paul Gilmartin wrote: By surmise, I'll add another piece to the puzzle. Since the specified directory blocks is 0, allocation does not format a directory, and does not write the terminating EOF. Later, allocation sees that DSORG=PO, and does not write an EOF (which would be real, not pseudo) at the beginning lest it destroy the directory had it created one. Subsequent behavior depends on the residual content of the first allocated track. This was my guess as well, and I have verified it with a GTF trace. If directory blocks are specified or defaulted they are formatted at allocation. If directory blocks a specified as zero, none are formatted, and what ever was on the track is still there. Generally it will not look like a directory block and will cause an I/O error. But if you happen to allocate over a former PDS you will see whatever directories it had. -- Richard -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Allocation test
On 9/19/2013 3:19 PM, Richard Peurifoy wrote: On 9/19/2013 8:13 AM, Paul Gilmartin wrote: By surmise, I'll add another piece to the puzzle. Since the specified directory blocks is 0, allocation does not format a directory, and does not write the terminating EOF. Later, allocation sees that DSORG=PO, and does not write an EOF (which would be real, not pseudo) at the beginning lest it destroy the directory had it created one. Subsequent behavior depends on the residual content of the first allocated track. This was my guess as well, and I have verified it with a GTF trace. If directory blocks are specified or defaulted they are formatted at allocation. If directory blocks a specified as zero, none are formatted, and what ever was on the track is still there. Generally it will not look like a directory block and will cause an I/O error. But if you happen to allocate over a former PDS you will see whatever directories it had. Forgot to mention that this assumes you don't have erase on scratch -- Richard -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: JES2 start fail with S878-10
On 9/3/2013 9:06 AM, RCG wrote: Hi Jake.. Good question.. Unfortunately this lpar has no SADMP set-up.. Its a sandbox and a stand-alone system :-( You can set a SLIP trap to get a dump of the failing address space. -- Richard -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: DFDSS problem
On 8/29/2013 8:37 AM, Lizette Koehler wrote: I cannot guarantee this will work but two things to try. 1) Preallocate the new file with your attributes. Restore to that file. DFDSS may honor your file with the blksize you want. 2) Restore the file even if it gets a BLKSIZE of 0. Then use IEBGENER to do the following //SYSUT1 DD * /* yes a null entry //SYSUT2 DD DISP=OLD,DSN=yourfilename,BLKSIZE=4096,LRECL=... When IEBGENER opens and closes the file, it could use your BLKSIZE in the JCL to override what was restored. I think this should be: //SYSUT2 DD DISP=(MOD,KEEP),DSN=yourfilename,BLKSIZE=4096,LRECL=... With DISP=OLD it will write an EOF at the front of the file. -- Richard -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: SubSystem Command Prefix for Netview -- Missing
On 8/13/2013 11:49 AM, Mark Jacobs wrote: We migrated Netview from 5.4 to 6.1 and noticed that it's no longer registering a command prefix. Is that function gone in 6.1 or did we miss a step in the migration process? This is controlled by the PFXREG option in the SSI PROC. See (watch wrap) http://pic.dhe.ibm.com/infocenter/tivihelp/v3r1/index.jsp?topic=%2Fcom.ibm.itnetviewforzos.doc_5.4%2Finql0mst78.htm I am on V6.1 and it is working for me. I have PFXREG=ONE. I don't think this has changed. -- Richard -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: VISARA Consoles FICON Get 505, 510
On 7/23/2013 7:31 PM, George Henke wrote: We need VISARAs for the LMU interface for the STK SILOs, but they also double as system consoles. Doesn't help with consoles (we OSA's for these), but there is (or least used to be) an option to drive the STK SILO's with a TCP connection instead of co-ax. RIchard -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Data volumes
On 6/9/2013 10:07 AM, John Gilmore wrote: The numbers 9 and 27 (for the venturesome) still prevail in many shops. Much larger values, never available as physical, spinning DASD, appear to make some people uneasy. They get used, reluctantly at least on the first occasion, only when some compelling special argument is made for them. In querying people about such decisions I have been told things like The smaller volumes are more reliable or I wasn't sure the big ones would work. In our case management wouldn't buy PAV, so we don't use really large volumes to avoid contention. -- Richard -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Unable to mount ZFS
On 5/31/2013 1:08 PM, ibmmain wrote: Well, that the open failed took me by surprise completely. It doesn't fail on the other system that is (almost) identical. There is certainly no access allowed on that system for the ZFS userid. In addition, nothing in the IBM installation docs for z/OS says to authorize the ZFS address space to the data set profiles for the ZFS that are explicitly defined by their customization (and their RACF job goes into ridiculous detail to make sure everything is covered). So it must be something else that causes this 'requirement' on my current system. Is the rest of the world routinely defining at least READ access for the ZFS userid to each and every ZFS dataset that might get mounted? Barbara, From (watch the wrap) http://publib.boulder.ibm.com/infocenter/zos/v1r11/index.jsp?topic=/com.ibm.zos.r11.ioea700/ioea7d0021001588.htm Note: The DFS user ID must have at least ALTER authority to all VSAM LDS that contain zFS aggregates. A user ID other than DFS can be used to run the zFS started task if it is defined with the same RACF characteristics as shown for the DFS user ID. As an alternative to PERMIT ALTER authority to all VSAM LDS that contain zFS aggregates, you can assign the zFS started task the TRUSTED attribute or you can assign the user ID of the zFS started task the OPERATIONS attribute. For details, see z/OS Security Server RACF Security Administrator's Guide. We chose to go the TRUSTED route. -- Richard -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Undocumented VSAM Return/reason code
On 5/4/2013 12:26 PM, Dave Cole wrote: At 5/4/2013 09:25 AM, Lizette Koehler wrote: [snip] What kind of vsam - ESDS, KSDS, etc... It's actually a VTAM file. Sorry about being misleading. Dave, See z/OS Communications Server IP and SNA Codes http://publibz.boulder.ibm.com/zoslib/pdf/f1a1d2b2.pdf 90 (X'5A') No entry is found in the VTAM configuration tables that matches the name indicated by the ACB APPLID field (or supplied by the operating system). This error might have occurred for one of the following reasons: The VTAM operator deactivated the APPL entry The APPL entry was never created VTAM is trying to recover for persistent sessions and the application is not in pending recovery state -- Richard -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: 32760? (was: PARMDD?)
On 3/28/2013 1:17 PM, John Gilmore wrote: I did not find Kevin Kelley's post entirely persuasive. This restriction long antedates 2 Kibyte pages, and the equation 8 x 2048 = 32768 is thus historically irrelevant. Does the two-fullword---not doubleword?---prefix have the structure |?|?|?|?|?||?|?|c|c|, in which |c|c| is the length L = 0 in bytes of the PARM value? From looking at a dump the format is: xxx At entry R1 points to is the pointer to the length field of the parm (high bit on). is the length of the parm xxx is the value of the parm In my case the field is on a double word boundary, making the parm value also on a double word boundary. I suspect this is on purpose, but I haven't looked for documentation to support this. -- Richard -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Enqueue during VSAM REPRO - Who is the culprit
On 3/8/2013 1:20 PM, Lizette Koehler wrote: Esteem Listers - I have a simple issue, but I am unable to see a solution. Running z/OS V1.12. I create a new VSAM file. Then I REPRO current to new. Sometimes (not always) when this job runs I get REPRO IDS(NEW.VSAM.FILE)- . ODS(CURRENT.VSAM.FILE) REUSE .IKJ56225I DATA SET CURRENT.VSAM.FILE ALREADY IN USE, TRY LATER .IKJ56225I DATA SET IS ALLOCATED TO ANOTHER JOB OR USER .IDC0005I NUMBER OF RECORDS PROCESSED WAS .IDC3003I FUNCTION TERMINATED. CONDITION CODE IS 12 Your sample actually shows copying new to current, I assume that is what you meant you do. If you add a DD card with the current VSAM dataset to your job with DISP=OLD, your job will not start running until the dataset is available, and you will be able to see the conflict. -- Richard -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: DSECT for volume list returned by CAMLST, also device types
On 2/22/2013 3:01 PM, Breton Imhauser wrote: Hey y’all! I’m looking for an IBM(/or ?) provided dsect for the volume list returned by LOCATE. If there isn’t one, that’s okay, as they layout is self-evident. I also am wondering if there is a macro/copy member with EQUates for the device types returned. I know about the printed reference table in “AMS for Catalogs”, but would like a reliable program method for differentiating device types based on the catalog device types returned. Thanks for any pointers! You can use the EDTINFO macro to call a service to convert a device type to a generic or esoteric name. -- Richard -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Problem with SYSEVENT QVS
On 2/21/2013 7:54 AM, Peter Relson wrote: I think what Gerhard meant is that Jan should have L 15,CVTSRM-CVTMAP(,15) instead of L 15,CVTSRM-CVT(,15) If Gerhard meant that, he would have been incorrect. CVT is the name of the DSECT when CVT DSECT=YES is used. CVTMAP is a name for the beginning as well. I have no idea why it even exists. But it has existed (for our needs) forever. Either can be used safely and successfully. Just to cover all the bases, if you specify a label when invoking the CVT macro, that label will be used rather than CVTMAP. ex.: CVTLBL CVT DSECT=YES will use CVTLBL in place of CVTMAP. -- Richard -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Problem with SYSEVENT QVS
On 2/20/2013 11:21 AM, Leonardo Vaz wrote: I think what Gerhard meant is that Jan should have L 15,CVTSRM-CVTMAP(,15) instead of L 15,CVTSRM-CVT(,15) This is being generated by the SYSEVENT macro, and is therefore under IBM's control. -- Richard -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: VTOC QUESTION
On 1/21/2013 8:16 AM, Lizette Koehler wrote: I also allocate in Cylinders and not Tracks. Lizette It used to be worth while to allocate the VTOC so that the last track ended at the end of a cylinder regardless of where it started. This allowed multi-track search CCWs to be used. I don't know if this is still true, or if VTOC searches have been updated to use ECKD CCWs. Of course with VTOC indexes, searches are a lot less common at least for code that has been updated to use the index (hopefully most by this time). -- Richard -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: IBM Application Performance Analyzer
On 12/18/2012 2:42 AM, Miklos Szigetvari wrote: Hi Maybe Dave can comment this , but with the normal C++compiler and the HEAPPOOL(ALIGN, .. option we got 5-10% performance improvements. I would take a DUMP, to see what is going around this address. A SLIP IF (Instruction Fetch) trace might help determine what is going on in this area. -- Richard -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: I broke it - programcontrolled programs
On 12/13/2012 11:51 PM, nitz-...@gmx.net wrote: Yes, in the meantime I found the module. And I still wonder why ftp works with the old definitions when there is quite obviously a missing definition in */PROGRAM. Just a guess, but could it be because the environment stays clean until DFSMRCL0 is invoked at task termination (after the FTP is finished)? -- Richard -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: NETSOL CBT 1981 edition question
On 11/27/2012 12:12 PM, Cifani, Domenic wrote: Hi First of all, I know why are we still using Ed's 1991 version? The client transitioned to us and I have to try and figure out how to use this old version. I'm trying to add a new VTAM APPL to the CMDTAB for Insight DB2. When I try to run the Assembly for CMDSUB it fails looking for a Macro called RPLUSFLD, or at least I believe it's a macro. Does anyone have any experience with this version of NETSOL? Here is the cut/paste of the assembly error. Domenic 278 *$$$ 279 *$$$ 280 * 281 * 282 *SEARCH COMMAND TABLE FOR MATCHI 0001CA 284 SRCHTAB DS0H R:1 0 285 USING CMDDSECT,R1 O 0001CA 5810 B66C0166C 286 L R1,=AL4(CMDTAB) 0001CE 4170 52F2002F2 287 LAR7,DATASEQ P 0001D2 91FF 1000 0 288 CMDLOOP TMCMDGAPPL,X'FF' E 0001D6 47E0 C1F4001F4 289 BNO CMDCHECKN 0001DA 4100 00022 290 CMDERROR LAR0,MSG02Y 0001DE 0 291 L R3,RPLUSFLD E ** ASMA044E Undefined symbol - RPLUSFLD ** ASMA435I Record 271 in NET9.NETSOL.SOURCE(CMDSUB) on volume: X1SMS4 292 $CALL SEND 0001E2 58F0 B67001670 293+ L R15,=V(SEND) LOAD EP 0001E6 05EF 294+ BALR R14,R15 BRANCH 0001E8 59F0 B67401674 295 C R15,=F'08' R 0001EC 4780 C58C0058C 296 BERELOPEN T 0001F0 47F0 B62401624 297 B EXITE RPLUSFLD is defined in the IFGRLP macro which is in SYS1.MODGEN. -- Richard -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: IGGCSI00 DFSMS - ALIAS with SYMBOLICRELATE
On 10/22/2012 11:53 AM, Mil Hashoul wrote: Hi, I am using the IGGCSI00, the catalog search interface, the dataset name is an alias which is resolve to dataset name with symbolicrelate how couls I ask catalog to resolve the dataset name and find the dataset. right now if I use the dataset with the symbolicrelate variable, the IGGCSI00 R15=4 and as IBM documentation the Return area has the value: FS1E7A, FS is the module name , and 1E is the return code and 7A is the reason code, but these reurn codes does not xist under the IDC30009I message as IBM explain. any one has a clue? Regards Milad Are you sure this isn't return code 122 (X'7A'), and reason code 30 (X'1E')? If so this indicates invalid filter key. The CSI documentation says that return code / reason code are listed in IDC3009I except for 100 (X'64') and 122 (X'7A'). -- Richard -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: IGGCSI00 DFSMS - ALIAS with SYMBOLICRELATE
On 10/22/2012 3:26 PM, Mil Hashoul wrote: At the Return Area, I got the following: FS1E7A , the first one is the return code I guess and the second is reason code, Am I right? but the question is: will catalog resolve the SYMBOLICRELATED variable, when I use the CSIFILT with the DSN that include the SYMBILICRELATE like K68.SYSNAM..V111.LOAD? In DFSMS Managing Catalogs SC26-7409-11 http://publibz.boulder.ibm.com/epubs/pdf/dgt2c191.pdf Chapter 11 describes CSI. The section on return codes has this: Description Length in Bytes Module ID 2 Reason code 1 Return code 1 So the 7A is the return code. I have not used SYBOLICRELATE, so I don't know what CSI does with it. -- Richard -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: Space Allocation In Bytes
On 8/28/2012 3:19 PM, glen herrmannsfeldt wrote: Shmuel Metz , Seymour J. shmuel+...@patriot.net wrote: In 503bf5eb.5010...@bremultibank.com.pl, on 08/28/2012 at 12:34 AM, R.S. r.skoru...@bremultibank.com.pl said: Valid, but illogical. Data set with zero size is illogical. No. That's exploitation of side effect. Stilla valid (it works, so it is valid), but it's still illogical. It's perfectly logical, as are /dev/null and DUMMY. But for CKD doesn't there have to be some place to write the EOF? I think BSAM/QSAM will simulate an EOF without doing any I/O to the data set if you try to read it. -- RIchard -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: IEBPTPCH questions
On 6/18/2012 4:33 PM, Kirk Wolf wrote: I'll tried the FIELD=(80) thing, but no difference. The manual would lead you to believe that you always get some kind of control character (ASA or M), so that's probably how it works. It is, after all, just for printing or punching :-) I thought I had done this long ago (haven't used IEBPTPCH since early 70's). After reading the manual, I agree it seems to say it always adds CC. Should have tested it first. Sorry -- Richard -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: IEBPTPCH questions
On 6/18/2012 1:47 PM, John P Kalinich wrote: You can use the OFFLOAD program from CBT file 093 (http://www.cbttape.org) to create a sequential file (flat PDS) of all members. This is a good solution, but to answer your question, I think this will do it: PRINT TYPORG=PO,MAXFLDS=1 RECORD FIELD=(80) -- Richard -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN