Re: LE COBOL odd behavior

2012-06-07 Thread Frank Swarbrick
That is certainly interesting.  Enterprise COBOL 4.2 (and prior!) usually do a dynamic allocation of SYSOUT if there is no JCL allocation.  I have run in to cases where the dynamic allocation fails because the attempt to do it is being done in an I/O error routine.  I can't recall offhand the

Re: Brain drain: Where Cobol systems go from here

2012-05-23 Thread Frank Swarbrick
Only if you are an incompetent company... From: Ed Gould edgould1...@comcast.net To: IBM-MAIN@bama.ua.edu Sent: Wednesday, May 23, 2012 2:31 PM Subject: Brain drain: Where Cobol systems go from here Brain drain: Where Cobol systems go from here -When

Re: Brain drain: Where Cobol systems go from here

2012-05-23 Thread Frank Swarbrick
Indeed, this is exactly what our company does.  Our newest COBOL victim/developer (g) was working in a non-IT part of the company.  I myself came from such a place.  As have a not insignificant number of our other COBOL programmers. From: Thomas H

/usr/lpp

2012-05-04 Thread Frank Swarbrick
Unimportant question, probably, but I've long wondered...  What exactly does lpp stand for in this instance? Frank -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the

Re: /usr/lpp

2012-05-04 Thread Frank Swarbrick
On 5/4/2012 4:02 PM, Frank Swarbrick wrote: Unimportant question, probably, but I've long wondered...  What exactly does lpp stand for in this instance? I have long assumed it stood for 'licensed program products'. But I know not for sure... -- Edward E Jaffe Phoenix Software International

Re: It's feeding time in Jurassic Park . . .

2012-05-04 Thread Frank Swarbrick
I know little about nothing in this regard, but given a zBx with an Intel processor (that, along with POWER7, is available right?), I can't see why you'd have to recompile anything.  And in fact, could you not run Windows, Linux for Intel, and Solaris for Intel on zBx?  Wouldn't you just be

DFSORT, no records for SORTOUT

2012-04-19 Thread Frank Swarbrick
I know of the NULLOUT and NULLOFL options to specify return code setting if there are no records to be written to the output file.  I'm wondering if there is any option I can specify so that the SORTOUT file will not even be opened if there are no records to be written to it.  Basically, I want

Re: DFSORT, no records for SORTOUT

2012-04-19 Thread Frank Swarbrick
IF LASTCC = 4    THEN SET MAXCC=0 Oh well! Thanks again, Frank From: Frank Yaeger yae...@us.ibm.com To: IBM-MAIN@bama.ua.edu Sent: Thursday, April 19, 2012 11:38 AM Subject: Re: DFSORT, no records for SORTOUT Frank Swarbrick at IBM Mainframe

Re: DFSORT, no records for SORTOUT

2012-04-19 Thread Frank Swarbrick
. MAXIMUM CONDITION CODE WAS 0 Exactly what I was looking for.  Thanks Bill!! Frank From: Frank Swarbrick frank.swarbr...@yahoo.com To: IBM-MAIN@bama.ua.edu Sent: Thursday, April 19, 2012 12:16 PM Subject: Re: DFSORT, no records for SORTOUT That works

Re: DFSORT, no records for SORTOUT

2012-04-19 Thread Frank Swarbrick
19, 2012 4:30 PM Subject: Re: DFSORT, no records for SORTOUT On Thu, 19 Apr 2012 10:22:56 -0700, Frank Swarbrick frank.swarbr...@yahoo.com wrote: I know of the NULLOUT and NULLOFL options to specify return code setting if there are no records to be written to the output file.  I'm wondering

Re: Execute certain steps based on input parm

2012-04-18 Thread Frank Swarbrick
Whomever it was that invented the entire COND construct in JCL was severely demented; with the ABENDCC options being only a small part of it! :-( From: Joel C. Ewing jcew...@acm.org To: IBM-MAIN@bama.ua.edu Sent: Wednesday, April 18, 2012 11:25 AM Subject:

JCL help (yes, with COND)

2012-04-18 Thread Frank Swarbrick
I have the following job (cut down to include only the relevant parts): //VAPPROC4 JOB //BACKUP1  EXEC PROC=SORTBKUP,COND=(4,LT) //EP4IN    EXEC PROC=EP4IN,COND=(4,LT) //E4INPRT  EXEC PROC=E4INPRT // The EP4IN PROC is a vendor supplied proc as follows: //EP4IN  PROC //STEP01 EXEC

Re: JCL help (yes, with COND)

2012-04-18 Thread Frank Swarbrick
(yes, with COND) On 04/18/2012 12:43 PM, Frank Swarbrick wrote: I have the following job (cut down to include only the relevant parts): //VAPPROC4 JOB //BACKUP1  EXEC PROC=SORTBKUP,COND=(4,LT) //EP4IN    EXEC PROC=EP4IN,COND=(4,LT) //E4INPRT  EXEC PROC=E4INPRT // The EP4IN PROC

Re: Modernizing the BCP code ?

2012-04-13 Thread Frank Swarbrick
Haha, I think there were GCC projects for both COBOL and PL/I, but both are stagnate (and probably incomplete). One can still dream, though! Frank From: McKown, John john.mck...@healthmarkets.com To: IBM-MAIN@bama.ua.edu Sent: Friday, April 13, 2012 12:53 PM

Re: Modernizing the BCP code ?

2012-04-13 Thread Frank Swarbrick
: Modernizing the BCP code ? http://www.opencobol.org/ HTH Peter -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of Frank Swarbrick Sent: Friday, April 13, 2012 4:07 PM To: IBM-MAIN@bama.ua.edu Subject: Re: Modernizing the BCP code ? Haha, I think

Re: PL/I with variable PLISTs (was: LE C calling HLASM)

2012-04-12 Thread Frank Swarbrick
:38:26 -0700 From:    Frank Swarbrick frank.swarbr...@yahoo.com Subject: Re: PL/I with variable PLISTs (was: LE C calling HLASM) Hmmm  Have you (or anyone) actually verified that this works?  I just wrote the following programs: identification division

Re: Modernizing the BCP code ?

2012-04-12 Thread Frank Swarbrick
According to Tom Ross (of IBM COBOL development) at SHARE last year, they are working on migrating the back end to the same one that PL/I uses.  (And I am assuming the same one some of the other languages also use.) No idea if that would fix COBOL arithmetic. Frank - Original Message

Re: Modernizing the BCP code ?

2012-04-12 Thread Frank Swarbrick
I actually checked that.  The code is slightly different, but I don't see that it's much better. 01  FULLWORD-SORTOF  PIC S9(9) BINARY VALUE +9. 09  ADD  100 TO FULLWORD-SORTOF      000354 GN=16   

Re: PL/I with variable PLISTs (was: LE C calling HLASM)

2012-04-12 Thread Frank Swarbrick
I wonder if this would work: declare THEFUNCTION    entry     returns(fixed bin) options(nodescriptor, linkage(system), fetchable); result = THEFUNCTION(magic, parm1, parm2); result = THEFUNCTION(magic, parm1, parm2, parm3, parm4); Frank - Original Message - From: Phil Smith

Re: PL/I with variable PLISTs (was: LE C calling HLASM)

2012-04-12 Thread Frank Swarbrick
Thanks. Steve Comstock's method does work, in any case. Frank - Original Message - From: Victor Gil victor@broadridge.com To: IBM-MAIN@bama.ua.edu Cc: Sent: Thursday, April 12, 2012 1:59 PM Subject: Re: PL/I with variable PLISTs (was: LE C calling HLASM) Frank, I just

Re: Modernizing the BCP code ?

2012-04-12 Thread Frank Swarbrick
and Health Insurance Company.SM -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of Frank Swarbrick Sent: Thursday, April 12, 2012 1:07 PM To: IBM-MAIN@bama.ua.edu Subject: Re: Modernizing the BCP code ? I actually checked

Re: PL/I with variable PLISTs (was: LE C calling HLASM)

2012-04-11 Thread Frank Swarbrick
Subject: Re: PL/I with variable PLISTs (was: LE C calling HLASM) On 4/10/2012 4:33 PM, Frank Swarbrick wrote: - Original Message - From: Phil Smithp...@voltage.com To: IBM-MAIN@bama.ua.edu Cc: Sent: Tuesday, April 10, 2012 3:31 PM Subject: Re: PL/I with variable PLISTs (was: LE C

Re: PL/I with variable PLISTs (was: LE C calling HLASM)

2012-04-11 Thread Frank Swarbrick
Hmmm  Have you (or anyone) actually verified that this works?  I just wrote the following programs:  identification division.   program-id.  callopt.  data division.     working-storage

Re: PL/I with variable PLISTs

2012-04-11 Thread Frank Swarbrick
Subject: Re: PL/I with variable PLISTs On 4/11/2012 11:38 AM, Frank Swarbrick wrote: Hmmm  Have you (or anyone) actually verified that this works?  I just wrote the following programs:   identification division.   program-id.  callopt.   data division.   working-storage section

Re: PL/I with variable PLISTs

2012-04-11 Thread Frank Swarbrick
That does, indeed, work.  And it's also as fugly as h*ck.  :-) Thanks Steve. Frank - Original Message - From: Frank Swarbrick frank.swarbr...@yahoo.com To: IBM-MAIN@bama.ua.edu Cc: Sent: Wednesday, April 11, 2012 12:55 PM Subject: Re: PL/I with variable PLISTs Sorry, Victor's

Re: Enterprise COBOL and XML attributes

2012-04-10 Thread Frank Swarbrick
- Original Message - From: Steve Comstock st...@trainersfriend.com To: IBM-MAIN@bama.ua.edu Cc: Sent: Saturday, April 7, 2012 8:46 AM Subject: Re: Enterprise COBOL and XML attributes On 4/6/2012 5:29 PM, Frank Swarbrick wrote: Enterprise COBOL v4.2. First real world

Re: PL/I with variable PLISTs (was: LE C calling HLASM)

2012-04-10 Thread Frank Swarbrick
I only happened to learn PL/I this weekend, so take this with a grain of salt, but can't you activate THEFUNCTION with a call rather than as a function in order to be able to use LINKAGE(SYSTEM)?  And then use PLIRETV() in order to get the return code? declare THEFUNCTION entry options(ASM

Re: PL/I with variable PLISTs (was: LE C calling HLASM)

2012-04-10 Thread Frank Swarbrick
I don't know if this is relevant, but I was looking at the PL/I DL/I (IMS) interface (PLITDLI) and noticed that they actually have to pass, as the first parameter, a fullword containing the remaining number of items!  Crazy! For example, in COBOL you say: call 'CBLTDLI' using ghnp, pcb-mask,

Re: PL/I with variable PLISTs (was: LE C calling HLASM)

2012-04-10 Thread Frank Swarbrick
- Original Message - From: Phil Smith p...@voltage.com To: IBM-MAIN@bama.ua.edu Cc: Sent: Tuesday, April 10, 2012 3:31 PM Subject: Re: PL/I with variable PLISTs (was: LE C calling HLASM) Bernd Oppolzer wrote: I don't know if it helps you, but using C I would code the two calls

Re: PL/I with variable PLISTs (was: LE C calling HLASM)

2012-04-10 Thread Frank Swarbrick
of the parameters is fixed (see also my GDDM example on the other post). This is not required by any OS convention, at least that's my understanding. Kind regards Bernd Am 11.04.2012 00:19, schrieb Frank Swarbrick: I don't know if this is relevant, but I was looking at the PL/I DL/I (IMS

Re: PL/I with variable PLISTs (was: LE C calling HLASM)

2012-04-10 Thread Frank Swarbrick
We don't have PL/I in our shop (I downloaded an old trial version of VisualAge PL/I for Windows to play with at home), but it seems to me that one MIGHT be able to do the following for PL/I to call DL/I: declare CEETDLI entry linkage(SYSTEM); or perhaps declare CEETDLI entry(char(4), *, *, *,

Enterprise COBOL and XML attributes

2012-04-06 Thread Frank Swarbrick
Enterprise COBOL v4.2. First real world attempt at using XML GENERATE.  Works as designed, and relatively user friendly, but not particularly flexible for real world requirements. XML GENERATE will generate no fields as attributes unless with WITH ATTRIBUTES phrase is specified.  In that

Re: VSAM help wanted for random reads

2012-04-04 Thread Frank Swarbrick
, Frank Swarbrick wrote: Several good ideas given. My sysprog installed BLSR and I got very good results: Without BLSR: -                                -TIMINGS (MINS.)-- -PAGING COUNTS -STEPNAME PROCSTEP    RC   EXCP CONN TCB       SRB CLOCK          SERV WORKLOAD  PAGE

Re: VSAM help wanted for random reads

2012-04-04 Thread Frank Swarbrick
That was our original thought, but since we have to open it as I-O it wouldn't work for us.  Well, not without shareoptions 4. Thanks! Frank - Original Message - From: Chip Grantham cgrant...@ameritas.com To: IBM-MAIN@bama.ua.edu Cc: Sent: Wednesday, April 4, 2012 9:37 AM

Re: VSAM help wanted for random reads

2012-04-04 Thread Frank Swarbrick
Tested with DEFERW=YES (that is the proper syntax, by the way.  Commas are optional.) It didn't gain me much, as I am only updating 32 of 61459 records, so I'm not going to worry about it at this time. With BLSR DEFERW=YES: CSR020I BUFSI=1024, BUFSD=20480, BUFNI=10, BUFND=256, HBUFNI=0,

Re: VSAM help wanted for random reads

2012-04-04 Thread Frank Swarbrick
Performance Consultant, zChampion Worldwide Banking Center of Excellence, IBM +44-7802-245-584 email: martin_pac...@uk.ibm.com Twitter / Facebook IDs: MartinPacker Blog: https://www.ibm.com/developerworks/mydeveloperworks/blogs/MartinPacker From: Frank Swarbrick frank.swarbr

VSAM help wanted for random reads

2012-04-03 Thread Frank Swarbrick
Current program does the following (in COBOL!). - Opens KSDS for I-O - Sequentially processes another file (non-VSAM). - For each record in the non-VSAM file it attempts a random (keyed) read of a record on the KSDS file.  The key is, essentially, a concatenation of a record type code ('4' or

Re: VSAM help wanted for random reads

2012-04-03 Thread Frank Swarbrick
your while to investigate it.  See the JCL Reference manual for the parameters to use. HTH Peter -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of Frank Swarbrick Sent: Tuesday, April 03, 2012 5:24 PM To: IBM-MAIN@bama.ua.edu Subject: VSAM

Re: VSAM help wanted for random reads

2012-04-03 Thread Frank Swarbrick
wanted for random reads Run the 4's then run the 5's.  It can't be that simple. -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of Frank Swarbrick Sent: Tuesday, April 03, 2012 4:24 PM To: IBM-MAIN@bama.ua.edu Subject: VSAM help wanted

Re: VSAM help wanted for random reads

2012-04-03 Thread Frank Swarbrick
Several good ideas given. My sysprog installed BLSR and I got very good results: Without BLSR: -      -TIMINGS (MINS.)--  -PAGING COUNTS -STEPNAME PROCSTEP    RC   EXCP   CONN   TCB   SRB  CLOCK  SERV 

Re: Thought: new DISP status function

2012-02-27 Thread Frank Swarbrick
) OUTFILE(MYFILE)  /* Frank From: Paul Gilmartin paulgboul...@aim.com To: IBM-MAIN@bama.ua.edu Sent: Friday, February 24, 2012 8:06 PM Subject: Re: Thought: new DISP status function On Fri, 24 Feb 2012 15:48:57 -0800, Frank Swarbrick wrote: I'm

Re: Thought: new DISP status function

2012-02-24 Thread Frank Swarbrick
using your method? Thanks, Frank From: Paul Gilmartin paulgboul...@aim.com To: IBM-MAIN@bama.ua.edu Sent: Friday, February 24, 2012 12:24 AM Subject: Re: Thought: new DISP status function On Thu, 23 Feb 2012 13:44:18 -0800, Frank Swarbrick wrote: I'd much

Re: Thought: new DISP status function

2012-02-23 Thread Frank Swarbrick
I like it. John: What would your expectation be if the characteristics of the existing dataset were different than those specified on the DD.  SPACE and the like.  Would this new parm alter the characteristics as specified on the DD, or would they say the same? Frank

Re: Thought: new DISP status function

2012-02-23 Thread Frank Swarbrick
Company®, Mid-West National Life Insurance Company of TennesseeSM and The MEGA Life and Health Insurance Company.SM -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of Frank Swarbrick Sent: Thursday, February 23, 2012 3:30 PM To: IBM

Re: Thought: new DISP status function

2012-02-23 Thread Frank Swarbrick
Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of Frank Swarbrick Sent: Thursday, February 23, 2012 3:44 PM To: IBM-MAIN@bama.ua.edu Subject: Re: Thought: new DISP status function I'd much prefer the latter, but of course have no idea how much work it would be. What

Re: Thought: new DISP status function

2012-02-23 Thread Frank Swarbrick
Company®, Mid-West National Life Insurance Company of TennesseeSM and The MEGA Life and Health Insurance Company.SM -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of Frank Swarbrick Sent: Thursday, February 23, 2012 4:07 PM To: IBM

Re: Archaic allocation in JCL (Was: Physical record size query)

2012-02-17 Thread Frank Swarbrick
How many transactions am I going to post today?  How many on Monday.  What about Tuesday after a three day weekend?  What about Tuesday on a 3 day weekend 4 years from now? Each transactions is 100 bytes.  We save the transactions for a year.  We are a brand new bank that has not yet processed

Re: Archaic allocation in JCL (Was: Physical record size query)

2012-02-17 Thread Frank Swarbrick
Variable length records? From: Scott Ford scott_j_f...@yahoo.com To: IBM-MAIN@bama.ua.edu Sent: Friday, February 17, 2012 8:59 AM Subject: Re: Archaic allocation in JCL (Was: Physical record size query) Gil, Worked with a math phd for a bunch of yrs and he

Re: Archaic allocation in JCL (Was: Physical record size query)

2012-02-17 Thread Frank Swarbrick
2012 13:46:12 -0800, Frank Swarbrick wrote: How many transactions am I going to post today?  How many on Monday.  What about Tuesday after a three day weekend?  What about Tuesday on a 3 day weekend 4 years from now? Each transactions is 100 bytes.  We save the transactions for a year.  We

Re: Archaic allocation in JCL (Was: Physical record size query)

2012-02-17 Thread Frank Swarbrick
But who has the responsibility?  This seems something that a system programmer, with some good analysis tools, should do.  Or the system itself should be such that it can do it's own analysis.  After all, is that not what computers are for? Frank From:

Re: CICS vs IMS

2012-02-16 Thread Frank Swarbrick
, Feb 16, 2012 at 2:04 AM, Frank Swarbrick frank.swarbr...@yahoo.comwrote: We are a CICS shop with IMS DB (DBCTL), but I've been curious for a while about the differences between how CICS works and how IMS TM works.  I couldn't find anything on the web.  Anyone have a link to a good reference

Re: CICS vs IMS

2012-02-16 Thread Frank Swarbrick
That's not just a suggestion.  It's a requirement.  If you compile a CICS COBOL program with DYNAM the compile and link (bind) may succeed, but the program will not execute properly under CICS.  (Not sure I've actually ever tried it, but I can't imagine any other result based on the

Re: CICS vs IMS

2012-02-16 Thread Frank Swarbrick
@bama.ua.edu Sent: Thursday, February 16, 2012 5:28 PM Subject: Re: CICS vs IMS On Thu, Feb 16, 2012 at 11:44 AM, Frank Swarbrick frank.swarbr...@yahoo.com wrote: deleted 1) How does BMS compare to MFS.  Power, flexibility, ease of use. Pretty similar.  One run to create a binary map, one run

CICS vs IMS

2012-02-15 Thread Frank Swarbrick
We are a CICS shop with IMS DB (DBCTL), but I've been curious for a while about the differences between how CICS works and how IMS TM works.  I couldn't find anything on the web.  Anyone have a link to a good reference? Thanks, Frank

Re: Archaic allocation in JCL (Was: Physical record size query)

2012-02-13 Thread Frank Swarbrick
Are you sure you are a mainframer? From: Thomas Berg thomas.b...@swedbank.se To: IBM-MAIN@bama.ua.edu Sent: Monday, February 13, 2012 4:27 AM Subject: Archaic allocation in JCL (Was: Physical record size query) I can't understand why we STILL need to

Re: Archaic allocation in JCL (Was: Physical record size query)

2012-02-13 Thread Frank Swarbrick
We do this.  And while it somewhat simplifies things, it doesn't eliminate the requirement of determining how much storage is required.  It just moves it, and gives a set of sizes, rather than infinite granularity. We have the following SMS data classes: DATACLAS AVGREC   PRIMARY SECONDARY 

Re: Archaic allocation in JCL (Was: Physical record size query)

2012-02-13 Thread Frank Swarbrick
If you specify a default data class in this manner does this negate the requirement for both SPACE and DATACLAS? Sounds good to me! Frank From: Vernooij, CP - SPLXM kees.verno...@klm.com To: IBM-MAIN@bama.ua.edu Sent: Monday, February 13, 2012 6:43 AM

Re: Archaic allocation in JCL (Was: Physical record size query)

2012-02-13 Thread Frank Swarbrick
I am having a hard time seeing this type of rationality put forth.  It's throwing me for a loop.  It's been a peeve of mine since I started on mainframes 15+ years ago.  I'm used to hearing it's your application; you figure out how much space it will require, both now and 10 years down the

Re: PDSE

2012-01-25 Thread Frank Swarbrick
Might it be nice to have something other than the LNKLST that behaves as sort of a global JOBLIB?  I'm specifically referring to for batch jobs, but I imagine it would be useful for TSO as well.  In this could be specified those libraries that don't need much of what LNKLST provides (don't ask

Re: removing nulls from a file

2012-01-03 Thread Frank Swarbrick
Iowa State University 515-294-3088 -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of zMan Sent: Thursday, December 29, 2011 1:48 PM To: IBM-MAIN@bama.ua.edu Subject: Re: removing nulls from a file On Thu, Dec 29, 2011 at 1:18 PM, Frank

Re: removing nulls from a file

2011-12-29 Thread Frank Swarbrick
I agree, it looks like the original file is encoded in small-endian UTF-16. If the file is generated on a Windows system and there's no way to change the creating software to use UTF-8 or an ASCII code page (I'm betting there is, if one looks hard enough) you can probably use Windows Notepad to

Re: TSO concern - sysplex multisystem logon.

2011-12-21 Thread Frank Swarbrick
Argh. Why *wouldn't* you want to edit a file using FileAid in TSO.  That's what it's for!  If it can't handle doing what it is built to do then perhaps there is something wrong with the tool. How does disallowing concurrent logons force one to not do this?  Or is it just punishment?  If you

Re: Java apps have most flaws, Cobol is cleanest.

2011-12-12 Thread Frank Swarbrick
@bama.ua.edu Sent: Friday, December 9, 2011 5:00 PM Subject: Re: Java apps have most flaws, Cobol is cleanest. On 12/9/2011 4:48 PM, Frank Swarbrick wrote: Kind of a non sequitur.  COBOL programs (I am a COBOL programmer) do little in the way of dynamic allocation, thus no GC required

Re: Java apps have most flaws, Cobol is cleanest.

2011-12-12 Thread Frank Swarbrick
ALLOCATE and FREE are part of the 2002 COBOL international standard (ISO/IEC 1989:2002); a standard which IBM has made no commitment to implement... While certainly useful if you would like to build linked lists, I personally would much prefer dynamic-length tables and dynamic-length strings.

Re: Java apps have most flaws, Cobol is cleanest.

2011-12-09 Thread Frank Swarbrick
Kind of a non sequitur.  COBOL programs (I am a COBOL programmer) do little in the way of dynamic allocation, thus no GC required.  (Not that I wouldn't like some dynamic allocation in COBOL...) Frank From: Barry Merrill ba...@mxg.com To:

DFSORT JOINKEYS question

2011-12-05 Thread Frank Swarbrick
Can DFSORT be used to do the following? File 1 contains all records to be placed in the output. File 2 contains only some records with the same key. If the record is in file 2, then the output record should contain information from two fields in file 2. Otherwise the output record should contain

Re: DFSORT JOINKEYS question

2011-12-05 Thread Frank Swarbrick
Very cool.  I obviously had no understanding of what the ? option was really to be used for.  :-) Now I have the following, that at a glance appears to be working //SYMNAMES DD *    CHR-PAN-ACCOUNT,6,19,CH    CHR-PIC-CNT,1223,1,PD  CHR-ISSUE-CNT,1224,1,PD   

Re: SETTING CONDITION CODE

2011-11-29 Thread Frank Swarbrick
Sounds good to me.  Are you going to propose it? From: Paul Gilmartin paulgboul...@aim.com To: IBM-MAIN@bama.ua.edu Sent: Monday, November 28, 2011 6:48 PM Subject: Re: SETTING CONDITION CODE On Mon, 28 Nov 2011 17:17:13 -0800, Frank Swarbrick frank.swarbr

Re: SETTING CONDITION CODE

2011-11-28 Thread Frank Swarbrick
Now that's a nice enhancement.  This, along with the allowing of instream datasets in a PROC, gives me hope that IBM is open to further improvements to JCL! Frank From: Jack Schudel j...@nersp.cns.ufl.edu To: IBM-MAIN@bama.ua.edu Sent: Monday, November

Re: C newbie - pass a LDAP handle out to calling routine

2011-11-07 Thread Frank Swarbrick
FWIW, COBOL can now call by value, if desired. given: int cfunc (int x, double x, struct t *p); do this: call 'cfunc' using value cobol-fullword cobol-double    reference cobol-structure  returning ret-fullword Frank From:

Re: CRLF in Unix being translated on Mainframe to x'25'

2011-10-24 Thread Frank Swarbrick
This does not work going the other direction.  If it were available it would properly be named SBRECVEOL, or something similar; but the fact is it is not an available option. From: Farley, Peter x23353 peter.far...@broadridge.com To: IBM-MAIN@bama.ua.edu

Re: CRLF in Unix being translated on Mainframe to x'25'

2011-10-24 Thread Frank Swarbrick
What method is being used to transport the file from the UNIX box to the Windows box? It should not be a straight binary transfer because, as you've noticed, this does not convert from the UNIX end-of-line delimiter to the Windows end-of-line delimiter. It's a fact that some Windows

Re: MQ alternatives

2011-10-17 Thread Frank Swarbrick
There are alternatives.  As you say, web services is one.  I was just hoping for a message queuing alternative to IBM MQ.  Most likely we will go the web services path; I just wanted to make sure I wasn't missing a better alternative it it was available and in our price range. Thanks! Frank

MQ alternatives

2011-10-13 Thread Frank Swarbrick
We have a vendor product that would like us to use WebSphere MQ to interface with it.  We do not have MQ, and apparently have to intention of getting it any time soon (too expensive; too much support required...?).  They also support some alternative message queuing products (Java Message

Re: Question About Transfer Report

2011-09-09 Thread Frank Swarbrick
Is this the solution he was looking for?  The solution you give is how an FTP client can retrieve a report from JES.  Appears to me the OP wants to know how to have z/OS act as the client and automatically send the report to an FTP server.  If this is the case, as it was for us (we also

Cobol and large QSAM record length

2011-08-29 Thread Frank Swarbrick
Even using Spanned (record format is S) or Undefined (record format is U) Cobol (Enterprise COBOL 4.2) appears to not allow a record length more than 32K:   32  IGYGR1224-E   The maximum calculated record size of file WIRE-DOCUMENT-FILE was greater than the maximum allowable size

Re: Enforcing job name conventions - which exit?

2011-08-09 Thread Frank Swarbrick
Why would you want to enforce such a ridiculious restriction? :-( From: Robin Atwood robin.atw...@microfocus.com To: IBM-MAIN@bama.ua.edu Sent: Tuesday, August 9, 2011 8:18 AM Subject: Enforcing job name conventions - which exit? From: Robin Atwood Sent: 09 August 2011 15:08 To:

disclosing business information on the internet

2011-07-28 Thread Frank Swarbrick
like posting this information because I've received useful contacts and information based on it. I'm curious what policies other businesses have. Frank -- Frank Swarbrick Applications Architect - Mainframe Applications Development FirstBank Data Corporation - Lakewood, CO USA P: 303-235-1403

Re: VSAM definition deck from file itself

2011-07-15 Thread Frank Swarbrick
For VSE you would use Doctor D. For z/OS Anyone know if ASG-SmartFile has such a thing? Seems like any similar tool (File-AID, etc.) should, but I have no idea if they do. Frank -- Frank Swarbrick Applications Architect - Mainframe Applications Development FirstBank Data Corporation

Re: Z/OS Newbie question

2011-07-06 Thread Frank Swarbrick
Indeed, I ran in to the same things when converting from VSE to z/OS last year. I look forward to any useful ideas. -- Frank Swarbrick Applications Architect - Mainframe Applications Development FirstBank Data Corporation - Lakewood, CO USA P: 303-235-1403 On 7/4/2011 at 5:42 AM, in message

Re: An upbeat story

2011-06-14 Thread Frank Swarbrick
programmers? Why might that be? Frank -- Frank Swarbrick Applications Architect - Mainframe Applications Development FirstBank Data Corporation - Lakewood, CO USA P: 303-235-1403 On 6/14/2011 at 11:57 AM, in message BANLkTikXG75y4Jx1xijnpJV=3fta4dj...@mail.gmail.com, Mike Schwab mike.a.sch

Re: Antwort: Differences between REGION=0K and REGION=0M

2011-05-27 Thread Frank Swarbrick
I prefer SPACE=(0,0) On 5/27/2011 at 10:42 AM, in message 005101cc1c8d$07532e00$15f98a00$@mcn.org, Charles Mills charl...@mcn.org wrote: REGION=0K requests only one-thousandth as much as REGION=0M. Does SPACE=(TRK,0) allocate only 1/15 as much DASD as SPACE=(CYL,0)? Charles

Re: COBOL Module Using 'EZASOKET' Calls Receiving 0C!

2011-05-20 Thread Frank Swarbrick
as well? Thank you... John Weber FiTeq Inc. Financial Technologies Powering Innovation in Payments 30851 Agoura Road, Suite 103 Agoura, CA 91301 O: 818 483 4487 Fax: 818 865 8562 Cell: 562 221 5702 -- Frank Swarbrick Applications Architect - Mainframe Applications Development

DFSORT merge, no duplicates

2011-05-09 Thread Frank Swarbrick
the record from SORTIN01 and not SORTIN02? Thanks, Frank -- Frank Swarbrick Applications Architect - Mainframe Applications Development FirstBank Data Corporation - Lakewood, CO USA P: 303-235-1403 The information contained in this electronic communication and any document attached hereto

Re: DFSORT merge, no duplicates

2011-05-09 Thread Frank Swarbrick
Thanks! I knew there must be something. Frank -- Frank Swarbrick Applications Architect - Mainframe Applications Development FirstBank Data Corporation - Lakewood, CO USA P: 303-235-1403 On 5/9/2011 at 3:23 PM, in message offf5bd485.e13342b7-on8825788b.007544bd-8825788b.00757...@us.ibm.com

Re: COBOL to SQL server

2011-05-06 Thread Frank Swarbrick
You can use Infosphere Federation Server. We do this to access Oracle databases, but Federation Server supports many database types. Costs $$$ of course... -- Frank Swarbrick Applications Architect - Mainframe Applications Development FirstBank Data Corporation - Lakewood, CO USA P: 303-235

Re: COBOL to SQL server

2011-05-06 Thread Frank Swarbrick
I believe DB2 Connect is the other direction (allows non-mainframe access to DB2 for z/OS). Frank On 5/6/2011 at 6:47 AM, in message A826B9FD78356242A9D9595912F9B23234FE3261D0@DOITTMAIL03.doitt.nycnet, Barkow, Eileen ebar...@doitt.nyc.gov wrote: I do not know much about DB2 but I do know that

Re: USS vs USS

2011-05-03 Thread Frank Swarbrick
Just to unnecessarily add fuel to the fire, the following is a CICS SIT parameter: USSHOME The USSHOME system initialization parameter specifies the name and path of the root directory for CICS® TS 4.1 files on z/OS® UNIX. The information contained in this electronic communication and any

Re: Mixing Auth and Non-Auth Modules

2011-05-02 Thread Frank Swarbrick
...@efirstbank.com, on 04/22/2011 at 06:35 PM, Frank Swarbrick frank.swarbr...@efirstbank.com said: Where can an application programmer who can barely spell SVC and PC get an understanding of what these are? I'll take your word that the majority of your programmers are that ignorant, but do you

Re: Recursive PERFORM in COBOL

2011-04-25 Thread Frank Swarbrick
out this issue. I don't think my sysprogs would touch COBOL with a ten foot pole. :-) They'd shoot us if we (appl dev) gave this to them to resolve. And rightly so. Frank -- Frank Swarbrick Applications Architect - Mainframe Applications Development FirstBank Data Corporation - Lakewood

Re: Mixing Auth and Non-Auth Modules

2011-04-22 Thread Frank Swarbrick
Where can an application programmer who can barely spell SVC and PC get an understanding of what these are? (I know the SVC is supervisor call, but that's about it.) -- Frank Swarbrick Applications Architect - Mainframe Applications Development FirstBank Data Corporation - Lakewood, CO USA P

Re: Is DSNTYPE=EXT parameter only used for VSAM

2011-04-20 Thread Frank Swarbrick
I'm no expert, but we discovered when we used EXT that we could not use SMS DSS (ADRDSSU) to backup the file, because apparently DSS uses EXCP I/O (or something), and EXT does not support EXCP. Or something like that. -- Frank Swarbrick Applications Architect - Mainframe Applications

Re: Is DSNTYPE=EXT parameter only used for VSAM

2011-04-20 Thread Frank Swarbrick
of HealthMarkets, Inc. -The Chesapeake Life Insurance Company(r), Mid-West National Life Insurance Company of TennesseeSM and The MEGA Life and Health Insurance Company.SM -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of Frank Swarbrick

Re: FTP question

2011-03-31 Thread Frank Swarbrick
needs to delete it. So if the user does not have delete access the put fails. I don't have any way to test this on z/OS, but someone might want to try it. Frank -- Frank Swarbrick Applications Architect - Mainframe Applications Development FirstBank Data Corporation - Lakewood, CO USA P: 303-235

RESTful services discussion

2011-03-24 Thread Frank Swarbrick
Anyone know of a good newgroup or listserv for discussion of RESTful services? Thanks, Frank -- Frank Swarbrick Applications Architect - Mainframe Applications Development FirstBank Data Corporation - Lakewood, CO USA P: 303-235-1403 The information contained in this electronic

Re: Dynamic calls from COBOL

2011-03-18 Thread Frank Swarbrick
. -- Frank Swarbrick Applications Architect - Mainframe Applications Development FirstBank Data Corporation - Lakewood, CO USA P: 303-235-1403 On 3/18/2011 at 2:17 PM, in message of27de444e.0baf690d-on86257857.006f2f1d-86257857.006f6...@us.ibm.com, Wayne Driscoll wdri...@us.ibm.com wrote: Phil

Space allocation from REFDD?

2011-03-11 Thread Frank Swarbrick
=DEV.ATM.CIRRPT.BKP(+1), //REFDD=*.SORTIN, //UNIT=(,7), //DISP=(NEW,CATLG,DELETE) What am I doing wrong? Frank -- Frank Swarbrick Applications Architect - Mainframe Applications Development

Re: Space allocation from REFDD?

2011-03-11 Thread Frank Swarbrick
I guess I should mention that LIKE with a DSN does work as expected. On 3/11/2011 at 10:00 AM, in message 4d79f2d2.6f0f.008...@efirstbank.com, Frank Swarbrick frank.swarbr...@efirstbank.com wrote: The documentation states: REFDD Parameter The following attributes are copied to the new data

Re: Space allocation from REFDD?

2011-03-11 Thread Frank Swarbrick
Ah-hah, ok. Re-reading the docs with that knowledge in mind I see that I made an assumption and that assumption made me misread the docs. Happens too often. Thanks! Frank -- Frank Swarbrick Applications Architect - Mainframe Applications Development FirstBank Data Corporation - Lakewood, CO

Re: handling of errors

2011-02-18 Thread Frank Swarbrick
On 2/17/2011 at 1:31 PM, in message 20110218155212.223c0f58...@smtp.patriot.net, Shmuel Metz (Seymour J.) shmuel+ibm-m...@patriot.net wrote: In 4d5bfc54.6f0f.008...@efirstbank.com, on 02/16/2011 at 04:30 PM, Frank Swarbrick frank.swarbr...@efirstbank.com said: Let me give a very specific

  1   2   3   4   5   >