Re: LzLabs

[Brian Westerman]

It was a pretty web site though, wasn't it?

Don't get me wrong, I think its a good concept, but I don't think it will work 
like they try to picture it, especially not for a large or medium size place, 
(or maybe even not for a really small one). I guess if you had converted 
everything and you still had some little tiny thing left that didn't care about 
performance (at all) that it might make sense.

Brian

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

Re: DFSMShsm high CPU consumption

[Brian Westerman]

I agree, HSM is a bit of a hog, so it shouldn't be set to run above your loved 
ones.  It's more important than batch or TSO, but not CICS, 
DB/2|ADASBAS|ORACLE, TCP, VTAM or anybody else important.

STCLOW is a good choice so long as everything "important" is above it.

Brian

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

Re: Friday OT, cheerful program for gloomy times

[CM Poncelet]

Thanks, but I get the following errors:
 
ecalc(182): Error #39, Evaluation stack overflow
    do until tmp = tail

PRESS ANY KEY TO CONTINUE.
 
and
 
Error 10: Illegal ISPEXEC Service 'isredit macro (parm) NOPROCESS'.

PRESS ANY KEY TO CONTINUE.
 
I have CTC Rexx running under DOS - perhaps not the right environment
for this 
 
Cheers, Chris
 


On 27/04/2020 15:29, Robert Prins wrote:
> On 2020-04-24 06:01, CM Poncelet wrote:
>> I attach a Rexx program to calculate and display the biorhythm values
>> for a given date of birth and current or whatever other date.
>
> And if you want to see some niche graphs, try "ecalc
> biog(dd.mm.)", where ecalc can be found (for now) @
> 
>
> Also contains a few other more-or-lesser useful conversions, "ecalc ?"
> will display some help.
>
> Robert

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

Re: Friday OT, cheerful program for gloomy times

[CM Poncelet]

Yes, you are absolutely right. I thought it was the other way round,
divisble by 100 being leap years and by 400 not leap years.
 
It should have been
  LEAP  = (YEAR-YEAR%4*4=0 & YEAR-YEAR%100*100¬=0 | YEAR-YEAR%400*400=0)
 
This does not affect the calculations themselves, but it does report
incorrectly e.g. that 2000.0229 is not valid.
 
Thanks a lot for pointing this out.
 
Cheers, Chris Poncelet
 
 

On 27/04/2020 10:01, David Crayford wrote:
> FYI, you have a bug with your leap year calculation. You need to check
> if the year is evenly dividable by 100 (which are not leap years
> unless evenly divisible by 400).
>
> isleap: procedure
>   arg year .
>   return (year // 4 = 0 & year // 100 /= 0 ) | year // 400 = 0
>
> On 2020-04-24 2:01 PM, CM Poncelet wrote:
>> I attach a Rexx program to calculate and display the biorhythm values
>> for a given date of birth and current or whatever other date.
>>   If 'management' complains that home workers are not putting enough
>> effort into their working-from-home time, they can run this thing and
>> send its output to 'management' just to prove that they are in perfect
>> working condition and that any slow-down in productivity must be due to
>> external factors which are wholly beyond their control .
>>   Cheers, Chris Poncelet (retired sysprog)
>>
>> --
>> For IBM-MAIN subscribe / signoff / archive access instructions,
>> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
> .
>

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

Re: C

[Seymour J Metz]

There was nothing to release; you didn't need a selector subchannel for a 1403. 
But the ANSI control characters were older than the S/360.


--
Shmuel (Seymour J.) Metz
http://mason.gmu.edu/~smetz3


From: IBM Mainframe Discussion List [IBM-MAIN@LISTSERV.UA.EDU] on behalf of 
Charles Mills [charl...@mcn.org]
Sent: Monday, April 27, 2020 10:44 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: C

Absolutely it was true. The printer could release the Mux channel while it 
advanced the carriage. This was the old days. Not a lot of intelligence in a 
printer.

Charles


-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Paul Gilmartin
Sent: Monday, April 27, 2020 7:15 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: C

On Tue, 28 Apr 2020 11:47:23 +1000, Wayne Bickerdike wrote:

>Doesn't seem right to me. If we're takling ANSI carriage control.
>
I think they're talking MVT COBOL syntax.

>0 - move double
>blank - move single
>+ - no LF
>1 - Skip to next page (Channel 1)
>
>We always used machine code characters because they didn't have to be
>immediate whereas ANSI were immediate. The reasoning was that it was faster
>to perform the print action and then do the carriage move to the next line
>or channel. In the days of the 1403 line printer.
>
Is that a guess, or did someone actually perform measurements?

I would hope that a well-designed printer driver would optimize channel
programs as it converted from ANSI to CCWs.  The controller always
performs spacing after printing.

-- gil

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

Re: C

[Seymour J Metz]

There should be no performance difference; the access needs to look a line 
ahead for RECFM=*A in order to determine the appropriate CCW opcode, but that 
takes a negligible amount of CPU time compared to everything else it does.

> Doesn't seem right to me. If we're takling ANSI carriage control.

> 0 - move double

Change previous 09 (Write and Space 1 Line) CCW opcode to 11 (Write and Space 2 
Lines)

> blank - move single

No change to previous CCW

+ - no LF

Change previous 09 (Write and Space 1 Line) CCW opcode to 01 (Write Without 
Spacing)

1 - Skip to next page (Channel 1)

Change previous 09 (Write and Space 1 Line) CCW opcode to 89 (Write and Skip to 
Channel 1)

In the days of the 1401 there was no RECFM=*M; the W instruction always spaced 
one line after printing and the F instruction did an immediate skip, immediate 
space, skip after next print or space after next print depending on the value 
of the d character.


--
Shmuel (Seymour J.) Metz
http://mason.gmu.edu/~smetz3


From: IBM Mainframe Discussion List [IBM-MAIN@LISTSERV.UA.EDU] on behalf of 
Wayne Bickerdike [wayn...@gmail.com]
Sent: Monday, April 27, 2020 9:47 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: C

Doesn't seem right to me. If we're takling ANSI carriage control.

0 - move double
blank - move single
+ - no LF
1 - Skip to next page (Channel 1)

We always used machine code characters because they didn't have to be
immediate whereas ANSI were immediate. The reasoning was that it was faster
to perform the print action and then do the carriage move to the next line
or channel. In the days of the 1403 line printer.

On Tue, Apr 28, 2020 at 7:21 AM Seymour J Metz  wrote:

> That's OS/360, not just MVT, and it applies to COBOL E and F, which do not
> claim to be standards compliant.
>
>
> --
> Shmuel (Seymour J.) Metz
> http://mason.gmu.edu/~smetz3
>
> 
> From: IBM Mainframe Discussion List [IBM-MAIN@LISTSERV.UA.EDU] on behalf
> of Joe Monk [joemon...@gmail.com]
> Sent: Monday, April 27, 2020 3:31 PM
> To: IBM-MAIN@LISTSERV.UA.EDU
> Subject: Re: C
>
> Not according to the MVT Cobol compiler manual...
>
> "The AFTER ADVANCING option is used for output destined to be printed or
> punched. When this option is used, the first character in each logical
> record for the file must be reserved for the control character. When the
> AFTER
> ADVANCING option is used, integer must be unsigned and have the value 0, 1,
> 2, or 3. The value 0 designates a carriage-control eject (i.e., skip to
> next
> page). The value 1 designates single spacing; the value 2, double spacing;
> and the value 3, triple spacing."
>
>
> http://secure-web.cisco.com/13JssaKkgEv6PvHbWqBb4_nGJr_KEk7X_p5dUxZ430B0TL067KAC3GmG62amVkyrK0wFJ6uAEiyuAI7pb90pBKUQu0efiy_EcUfFMps04VF_q3JCv2_EZfIyvaUoSxqVPc2j53HP4bEbd1UFUAFCLEfVb44yWkXMNs6D-ajkuaFWpwmOQ7DLdelU_kFoBfwK5MZ_99qKk1CuLZlVgozWOZL-_bSq_TGDGSJTg-n_WyQMcvJyYY36pAe8ZuT04bcBv85pG4_ec93Kta1h-fnUfm1av5W4Rrbx5p7qylU04uJOEM0P6WFyLKZsVsN9fcwPlF6x_1LZidv6aycTEAYyrPSpAWy7wZpPldHH-cnTUKc-qPz9772YMzNFNq0kfjiUmqVlSSL_YelM-_hg_l4oKtelOcnJWpjuuVTQ6Ppnp-zMhgROTwHMtUNj4JWJLEXBR/http%3A%2F%2Fwww.bitsavers.org%2Fpdf%2Fibm%2F360%2Fos%2Fcobol%2FC28-6516-2_IBM_OS360_COBOL_Language_Dec64.pdf
>
> Joe
>
> On Mon, Apr 27, 2020 at 11:52 AM Seymour J Metz  wrote:
>
> > That's a bug; the carriage control character is supposed to be
> transparent
> > to the COBOL programmer.
> >
> >
> > --
> > Shmuel (Seymour J.) Metz
> > http://mason.gmu.edu/~smetz3
> >
> > 
> > From: IBM Mainframe Discussion List [IBM-MAIN@LISTSERV.UA.EDU] on behalf
> > of Paul Gilmartin [000433f07816-dmarc-requ...@listserv.ua.edu]
> > Sent: Monday, April 27, 2020 11:04 AM
> > To: IBM-MAIN@LISTSERV.UA.EDU
> > Subject: Re: C
> >
> > On Mon, 27 Apr 2020 15:06:03 +1000, Wayne Bickerdike wrote:
> > >
> > >I had neither mainframe COBOL nor SPPS skills but I'd written a whole
> > bunch
> > >of Microfocus COBOL on CP/M micros.
> > >
> > >I convinced them that I could do mainframe COBOL, which wasn't that
> > >difficult. When I looked at the SPPS code, it was macro Assembler, so
> that
> > >was the start of a short time with same.
> > >
> > My one foray into COBOL occurred when I worked for a small consulting
> > firm.  Warm body with no COBOL skill.  I developed a small COBOL
> > program timesharing to DECSystem-10.
> >
> > My co-worker carried it to client's IBM 360.
> >
> > Failed.
> >
> > Using AFTER ADVANCING construct in IBM COBOL clobbers the first
> > character of my data record.  Who woulda thunk it?
> >
> > DEC COBOL, more wisely IMO, prefixes the intact record with LF, FF,
> > whatever carriage motion command(s).  Better design; standard be
> > damned!
> >
> > -- gil
> >
> > --
> > For IBM-MAIN subscribe / signoff / archive access instructions,
> > send email to lists...@listserv.ua.edu with 

Re: C

[Charles Mills]

Absolutely it was true. The printer could release the Mux channel while it 
advanced the carriage. This was the old days. Not a lot of intelligence in a 
printer.

Charles


-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Paul Gilmartin
Sent: Monday, April 27, 2020 7:15 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: C

On Tue, 28 Apr 2020 11:47:23 +1000, Wayne Bickerdike wrote:

>Doesn't seem right to me. If we're takling ANSI carriage control.
>
I think they're talking MVT COBOL syntax.

>0 - move double
>blank - move single
>+ - no LF
>1 - Skip to next page (Channel 1)
>
>We always used machine code characters because they didn't have to be
>immediate whereas ANSI were immediate. The reasoning was that it was faster
>to perform the print action and then do the carriage move to the next line
>or channel. In the days of the 1403 line printer.
> 
Is that a guess, or did someone actually perform measurements?

I would hope that a well-designed printer driver would optimize channel
programs as it converted from ANSI to CCWs.  The controller always
performs spacing after printing.

-- gil

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

Re: Addressing literals and Automatic Storage in Metal C

[David Crayford]

Joe,

You really do need to learn how to read the manuals instead of posting here so 
someone else can do it for you!

https://www.ibm.com/support/knowledgecenter/SSLTBW_2.1.0/com.ibm.zos.v2r1.ccrug00/insert-asm.htm

> On 28 Apr 2020, at 4:23 am, Joseph Reichman  wrote:
> 
> Hi
> 
> 
> 
> I am trying insert assembler code (a macro) in a Metal C program that's has
> literal copybook for constants and a dsect
> 
> 
> 
> I am assuming for the DSECT I would have to do something like @@AUTO@1 DSECT
> followed by ORG @@AUTO@1+X'' after the last stack variable copy my dsect
> variables
> 
> For the constants I would do ORG @@LIT@1+X'NNN' after the last constant and
> then point back LOCTR to the next NSI
> 
> 
> 
> I am wondering if anyone has done this and can give my some tips
> 
> 
> 
> Thanks
> 
> 
> 
> 
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

Re: C

[Paul Gilmartin]

On Tue, 28 Apr 2020 11:47:23 +1000, Wayne Bickerdike wrote:

>Doesn't seem right to me. If we're takling ANSI carriage control.
>
I think they're talking MVT COBOL syntax.

>0 - move double
>blank - move single
>+ - no LF
>1 - Skip to next page (Channel 1)
>
>We always used machine code characters because they didn't have to be
>immediate whereas ANSI were immediate. The reasoning was that it was faster
>to perform the print action and then do the carriage move to the next line
>or channel. In the days of the 1403 line printer.
> 
Is that a guess, or did someone actually perform measurements?

I would hope that a well-designed printer driver would optimize channel
programs as it converted from ANSI to CCWs.  The controller always
performs spacing after printing.

-- gil

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

Re: C

[Wayne Bickerdike]

Doesn't seem right to me. If we're takling ANSI carriage control.

0 - move double
blank - move single
+ - no LF
1 - Skip to next page (Channel 1)

We always used machine code characters because they didn't have to be
immediate whereas ANSI were immediate. The reasoning was that it was faster
to perform the print action and then do the carriage move to the next line
or channel. In the days of the 1403 line printer.

On Tue, Apr 28, 2020 at 7:21 AM Seymour J Metz  wrote:

> That's OS/360, not just MVT, and it applies to COBOL E and F, which do not
> claim to be standards compliant.
>
>
> --
> Shmuel (Seymour J.) Metz
> http://mason.gmu.edu/~smetz3
>
> 
> From: IBM Mainframe Discussion List [IBM-MAIN@LISTSERV.UA.EDU] on behalf
> of Joe Monk [joemon...@gmail.com]
> Sent: Monday, April 27, 2020 3:31 PM
> To: IBM-MAIN@LISTSERV.UA.EDU
> Subject: Re: C
>
> Not according to the MVT Cobol compiler manual...
>
> "The AFTER ADVANCING option is used for output destined to be printed or
> punched. When this option is used, the first character in each logical
> record for the file must be reserved for the control character. When the
> AFTER
> ADVANCING option is used, integer must be unsigned and have the value 0, 1,
> 2, or 3. The value 0 designates a carriage-control eject (i.e., skip to
> next
> page). The value 1 designates single spacing; the value 2, double spacing;
> and the value 3, triple spacing."
>
>
> http://secure-web.cisco.com/13JssaKkgEv6PvHbWqBb4_nGJr_KEk7X_p5dUxZ430B0TL067KAC3GmG62amVkyrK0wFJ6uAEiyuAI7pb90pBKUQu0efiy_EcUfFMps04VF_q3JCv2_EZfIyvaUoSxqVPc2j53HP4bEbd1UFUAFCLEfVb44yWkXMNs6D-ajkuaFWpwmOQ7DLdelU_kFoBfwK5MZ_99qKk1CuLZlVgozWOZL-_bSq_TGDGSJTg-n_WyQMcvJyYY36pAe8ZuT04bcBv85pG4_ec93Kta1h-fnUfm1av5W4Rrbx5p7qylU04uJOEM0P6WFyLKZsVsN9fcwPlF6x_1LZidv6aycTEAYyrPSpAWy7wZpPldHH-cnTUKc-qPz9772YMzNFNq0kfjiUmqVlSSL_YelM-_hg_l4oKtelOcnJWpjuuVTQ6Ppnp-zMhgROTwHMtUNj4JWJLEXBR/http%3A%2F%2Fwww.bitsavers.org%2Fpdf%2Fibm%2F360%2Fos%2Fcobol%2FC28-6516-2_IBM_OS360_COBOL_Language_Dec64.pdf
>
> Joe
>
> On Mon, Apr 27, 2020 at 11:52 AM Seymour J Metz  wrote:
>
> > That's a bug; the carriage control character is supposed to be
> transparent
> > to the COBOL programmer.
> >
> >
> > --
> > Shmuel (Seymour J.) Metz
> > http://mason.gmu.edu/~smetz3
> >
> > 
> > From: IBM Mainframe Discussion List [IBM-MAIN@LISTSERV.UA.EDU] on behalf
> > of Paul Gilmartin [000433f07816-dmarc-requ...@listserv.ua.edu]
> > Sent: Monday, April 27, 2020 11:04 AM
> > To: IBM-MAIN@LISTSERV.UA.EDU
> > Subject: Re: C
> >
> > On Mon, 27 Apr 2020 15:06:03 +1000, Wayne Bickerdike wrote:
> > >
> > >I had neither mainframe COBOL nor SPPS skills but I'd written a whole
> > bunch
> > >of Microfocus COBOL on CP/M micros.
> > >
> > >I convinced them that I could do mainframe COBOL, which wasn't that
> > >difficult. When I looked at the SPPS code, it was macro Assembler, so
> that
> > >was the start of a short time with same.
> > >
> > My one foray into COBOL occurred when I worked for a small consulting
> > firm.  Warm body with no COBOL skill.  I developed a small COBOL
> > program timesharing to DECSystem-10.
> >
> > My co-worker carried it to client's IBM 360.
> >
> > Failed.
> >
> > Using AFTER ADVANCING construct in IBM COBOL clobbers the first
> > character of my data record.  Who woulda thunk it?
> >
> > DEC COBOL, more wisely IMO, prefixes the intact record with LF, FF,
> > whatever carriage motion command(s).  Better design; standard be
> > damned!
> >
> > -- gil
> >
> > --
> > For IBM-MAIN subscribe / signoff / archive access instructions,
> > send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
> >
> > --
> > For IBM-MAIN subscribe / signoff / archive access instructions,
> > send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
> >
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>


-- 
Wayne V. Bickerdike

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

Re: XL C\C ++ sizeof of datatypes

[retired mainframer]

If operand is a type (as opposed to variable name), the parentheses are
required.  If the operand is an expression (including a solitary variable
name), the parentheses are optional.

> -Original Message-
> From: IBM Mainframe Discussion List  On
> Behalf Of Seymour J Metz
> Sent: Monday, April 27, 2020 3:20 PM
> To: IBM-MAIN@LISTSERV.UA.EDU
> Subject: Re: XL C\C ++ sizeof of datatypes
> 
> I don't understand why, but after listing it as an operator K&R gives it
as "sizeof (size
> of an object)" and all of the examples have parentheses around the type.
Of course,
> something like "sizeof (struct tnode) " really does need the parentheses.
> 
> --
> Shmuel (Seymour J.) Metz
> http://mason.gmu.edu/~smetz3
> 
> 
> 
> From: IBM Mainframe Discussion List  on behalf
> of Farley, Peter x23353 
> Sent: Monday, April 27, 2020 1:30 PM
> To: IBM-MAIN@LISTSERV.UA.EDU
> Subject: Re: XL C\C ++ sizeof of datatypes
> 
> Joe,
> 
> In C the "sizeof" keyword is an OPERATOR, not a function.  Instead of
> "sizeof(shorttype)" you should code "sizeof shorttype".
> 
> Peter
> 
> -Original Message-
> From: IBM Mainframe Discussion List  On
> Behalf Of Joseph Reichman
> Sent: Sunday, April 26, 2020 9:58 AM
> To: IBM-MAIN@LISTSERV.UA.EDU
> Subject: XL C\C ++ sizeof of datatypes
> 
> HI
> 
>I am looking in the XL C docs lang reference user guide programming
guide
> 
> For the length of the following data types
> 
>   Short , int long and I cannot seem to find it
> 
> frustrated
> 
>   I coded a program
> 
> Int len;
> 
> Unsigned short shortype;
> 
> Int len = sizeof(shorttype);
> 
>But the compiler seemed to comment the above statement
and not
> generate the assembler ps (I am running metal c);
> 
> Any help appreciate it
> --
> 
> This message and any attachments are intended only for the use of the
addressee and
> may contain information that is privileged and confidential. If the reader
of the
> message is not the intended recipient or an authorized representative of
the intended
> recipient, you are hereby notified that any dissemination of this
communication is
> strictly prohibited. If you have received this communication in error,
please notify us
> immediately by e-mail and delete the message and any attachments from your
system.
> 
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
> 
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

Re: XL C\C ++ sizeof of datatypes

[retired mainframer]

You may see the operator with parentheses more often than without but that
does not change the nature of the keyword.  Any function with the same name
as a keyword causes undefined behavior.

> -Original Message-
> From: IBM Mainframe Discussion List  On
> Behalf Of Charles Mills
> Sent: Monday, April 27, 2020 2:46 PM
> To: IBM-MAIN@LISTSERV.UA.EDU
> Subject: Re: XL C\C ++ sizeof of datatypes
> 
> I think both are correct, and in my experience I have seen the function
much
> more than the operator.
> 
> https://www.educative.io/edpresso/what-is-the-sizeof-function-in-c
> 
> Charles
> 
> 
> -Original Message-
> From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On
> Behalf Of Farley, Peter x23353
> Sent: Monday, April 27, 2020 10:31 AM
> To: IBM-MAIN@LISTSERV.UA.EDU
> Subject: Re: XL C\C ++ sizeof of datatypes
> 
> Joe,
> 
> In C the "sizeof" keyword is an OPERATOR, not a function.  Instead of
> "sizeof(shorttype)" you should code "sizeof shorttype".
> 
> Peter
> 
> -Original Message-
> From: IBM Mainframe Discussion List  On
> Behalf Of
> Joseph Reichman
> Sent: Sunday, April 26, 2020 9:58 AM
> To: IBM-MAIN@LISTSERV.UA.EDU
> Subject: XL C\C ++ sizeof of datatypes
> 
> HI
> 
>I am looking in the XL C docs lang reference user guide programming
guide
> 
> For the length of the following data types
> 
>   Short , int long and I cannot seem to find it
> 
> frustrated
> 
>   I coded a program
> 
> Int len;
> 
> Unsigned short shortype;
> 
> Int len = sizeof(shorttype);
> 
>But the compiler seemed to comment the above statement
> and not generate the assembler ps (I am running metal c);
> 
> Any help appreciate it
> --
> 
> This message and any attachments are intended only for the use of the
> addressee and may contain information that is privileged and confidential.
> If the reader of the message is not the intended recipient or an
authorized
> representative of the intended recipient, you are hereby notified that any
> dissemination of this communication is strictly prohibited. If you have
> received this communication in error, please notify us immediately by
e-mail
> and delete the message and any attachments from your system.
> 
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
> 
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

Re: XL C\C ++ sizeof of datatypes

[Thomas David Rivers]

Seymour J Metz wrote:

The difference is that sizeof is parsed as an operator. 


Sometimes programs have parameterized declarations and the compiler must 
generate code to calculate sizeof.


--
Shmuel (Seymour J.) Metz
http://mason.gmu.edu/~smetz3
 


This is true - for C99 variable length arrays.   That was made an optional
feature of the latest standards, because it turns out to not be the best
idea.   Hopefully it will go away completely in the future.

The basic problem is the one of "catching" an out-of-memory situation,
C doesn't have any recourse in this case except to blow-up with an 
out-of-stack

(which generally causes a SIGSEGV on many platforms, an ABEND 978 in the
Dignus runtime.)   Whereas, a program can easily malloc() memory and
check for NULL and "do something" if there isn't sufficient memory.
(You _can_ set up an alternate signal stack and catch these issues, but
you can't continue the program's execution from them.)

C variable arrays were touted as a portable way to accomplish what
the non-portable alloca() function does in many implementations.   But,
the common alloca() will return NULL if there is no space... so, it's 
probably

a better approach.

C variable-length arrays are the only time sizeof() isn't a compile-time 
constant.


   - Dave Rivers -


--
riv...@dignus.comWork: (919) 676-0847
Get your mainframe programming tools at http://www.dignus.com

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

Re: XL C\C ++ sizeof of datatypes

[Thomas David Rivers]

Charles Mills wrote:


Is that true? I know the first part is true: sizeof(foo) or sizeof foo is
evaluated at compile time, not run time. But "not invoked until run time" is
also true for most operators, right? a + b is *generally* evaluated at run
time.

I have a user-defined macro #define elementsof(a) sizeof(a)/sizeof(a[0]). Is
that a function or an operator? It is certainly a "function-type macro."

Charles

 


There's a lot being thrown around here

However, there _are_ places in the C language where the compiler must
fold constants at compile time, e.g.:

   enum tag { one = (1+0), two = (1+1+0) };

That is obliged to compile and the compiler most compute those
additions to provide the proper values for the "one" and "two" enumeration
constants.

The C standard has more details about this.So most compilers will
easily handle most constant computions (there are several corners
that are interesting to consider...  probably only interesting to
compiler writers :-) )

It seems there were plenty of other answers about the vagaries
of parameters and default integer promotions, etc...

  - Dave Rivers -


--
riv...@dignus.comWork: (919) 676-0847
Get your mainframe programming tools at http://www.dignus.com

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

Re: XL C\C ++ sizeof of datatypes

[Seymour J Metz]

The difference is that sizeof is parsed as an operator. 

Sometimes programs have parameterized declarations and the compiler must 
generate code to calculate sizeof.


--
Shmuel (Seymour J.) Metz
http://mason.gmu.edu/~smetz3



From: IBM Mainframe Discussion List  on behalf of 
Pew, Curtis G 
Sent: Monday, April 27, 2020 6:56 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: XL C\C ++ sizeof of datatypes

On Apr 27, 2020, at 5:29 PM, Charles Mills  wrote:
>
> I guess it's an operator but it sure as heck looks like a function.
>
> If it walks like a duck and quacks like a duck ...
>


--
Pew, Curtis G
curtis@austin.utexas.edu

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

Re: XL C\C ++ sizeof of datatypes

[Charles Mills]

Is that true? I know the first part is true: sizeof(foo) or sizeof foo is
evaluated at compile time, not run time. But "not invoked until run time" is
also true for most operators, right? a + b is *generally* evaluated at run
time.

I have a user-defined macro #define elementsof(a) sizeof(a)/sizeof(a[0]). Is
that a function or an operator? It is certainly a "function-type macro."

Charles


-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On
Behalf Of Pew, Curtis G
Sent: Monday, April 27, 2020 3:56 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: XL C\C ++ sizeof of datatypes

On Apr 27, 2020, at 5:29 PM, Charles Mills  wrote:
> 
> I guess it's an operator but it sure as heck looks like a function.
> 
> If it walks like a duck and quacks like a duck ...
> 

The distinction is that sizeof is calculated by the compiler during
compilation. A function is not invoked until run time.

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

Re: XL C\C ++ sizeof of datatypes

[Pew, Curtis G]

On Apr 27, 2020, at 5:29 PM, Charles Mills  wrote:
> 
> I guess it's an operator but it sure as heck looks like a function.
> 
> If it walks like a duck and quacks like a duck ...
> 

The distinction is that sizeof is calculated by the compiler during 
compilation. A function is not invoked until run time.


-- 
Pew, Curtis G
curtis@austin.utexas.edu

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

Re: XL C\C ++ sizeof of datatypes

[Charles Mills]

https://www.quora.com/How-is-sizeof-an-operator-but-not-a-function-Can-you-g
ive-source-code-for-it 

I guess it's an operator but it sure as heck looks like a function.

If it walks like a duck and quacks like a duck ...

Charles


-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On
Behalf Of Seymour J Metz
Sent: Monday, April 27, 2020 3:24 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: XL C\C ++ sizeof of datatypes

I believe that edpresoso is wrong and that sizeof is always an operator,
never a function, despite the parentheses.

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

Re: XL C\C ++ sizeof of datatypes

[Seymour J Metz]

I believe that edpresoso is wrong and that sizeof is always an operator, never 
a function, despite the parentheses.


--
Shmuel (Seymour J.) Metz
http://mason.gmu.edu/~smetz3



From: IBM Mainframe Discussion List  on behalf of 
Charles Mills 
Sent: Monday, April 27, 2020 5:45 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: XL C\C ++ sizeof of datatypes

I think both are correct, and in my experience I have seen the function much
more than the operator.

https://secure-web.cisco.com/17gpmDBkWzqWqGMhxvhYOL7Gh6Los9fw28x1TitarKIHN9PktFSwcSUXStjw8dG_ilzFTV9oIEmChXP4bSfdMZQTg6GRchPfD0-p_Ri_PfWzu-NJYlgrCKK-eBslsxUN7e_HmExhAJvllwMqOYz1PVSDLZzU8dfgd5fj8kKClVhjpZkb_eEKadi94x7T0Vuzt6PhHlIdO_sPTZTSylNnlGnVn0GOAMdgNlsUYjq4Xs3dS3ODTNRx1vs02xI1C7ZUg5jj_uKia1sbIFDHNGFHU99GCM8XwyvX4y8cIIr8nitz6Ihc8S3QhSlSvqbSeE7DI7V2hEApbjOm6y1OrDu_UlNTvbeLCILmgF8GLr4xkuCroXB_9RWufG3jf9x14b76UAXG0czxLyK6hjZDWh8dIbO1x2acDyBPo4636NjsgSftsHcqr0OrAdf9KXIiFchBFoFKYtxcFpQkZkMFfVm5pDA/https%3A%2F%2Fwww.educative.io%2Fedpresso%2Fwhat-is-the-sizeof-function-in-c

Charles


-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On
Behalf Of Farley, Peter x23353
Sent: Monday, April 27, 2020 10:31 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: XL C\C ++ sizeof of datatypes

Joe,

In C the "sizeof" keyword is an OPERATOR, not a function.  Instead of
"sizeof(shorttype)" you should code "sizeof shorttype".

Peter

-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of
Joseph Reichman
Sent: Sunday, April 26, 2020 9:58 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: XL C\C ++ sizeof of datatypes

HI

   I am looking in the XL C docs lang reference user guide programming guide

For the length of the following data types

  Short , int long and I cannot seem to find it

frustrated

  I coded a program

Int len;

Unsigned short shortype;

Int len = sizeof(shorttype);

   But the compiler seemed to comment the above statement
and not generate the assembler ps (I am running metal c);

Any help appreciate it
--

This message and any attachments are intended only for the use of the
addressee and may contain information that is privileged and confidential.
If the reader of the message is not the intended recipient or an authorized
representative of the intended recipient, you are hereby notified that any
dissemination of this communication is strictly prohibited. If you have
received this communication in error, please notify us immediately by e-mail
and delete the message and any attachments from your system.

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

Re: XL C\C ++ sizeof of datatypes

[Seymour J Metz]

I don't understand why, but after listing it as an operator K&R gives it as 
"sizeof (size of an object)" and all of the examples have parentheses around 
the type. Of course, something like "sizeof (struct tnode) " really does need 
the parentheses.

--
Shmuel (Seymour J.) Metz
http://mason.gmu.edu/~smetz3



From: IBM Mainframe Discussion List  on behalf of 
Farley, Peter x23353 
Sent: Monday, April 27, 2020 1:30 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: XL C\C ++ sizeof of datatypes

Joe,

In C the "sizeof" keyword is an OPERATOR, not a function.  Instead of 
"sizeof(shorttype)" you should code "sizeof shorttype".

Peter

-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
Joseph Reichman
Sent: Sunday, April 26, 2020 9:58 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: XL C\C ++ sizeof of datatypes

HI

   I am looking in the XL C docs lang reference user guide programming guide

For the length of the following data types

  Short , int long and I cannot seem to find it

frustrated

  I coded a program

Int len;

Unsigned short shortype;

Int len = sizeof(shorttype);

   But the compiler seemed to comment the above statement and 
not generate the assembler ps (I am running metal c);

Any help appreciate it
--

This message and any attachments are intended only for the use of the addressee 
and may contain information that is privileged and confidential. If the reader 
of the message is not the intended recipient or an authorized representative of 
the intended recipient, you are hereby notified that any dissemination of this 
communication is strictly prohibited. If you have received this communication 
in error, please notify us immediately by e-mail and delete the message and any 
attachments from your system.

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

Re: XL C\C ++ sizeof of datatypes

[Charles Mills]

I think both are correct, and in my experience I have seen the function much
more than the operator.

https://www.educative.io/edpresso/what-is-the-sizeof-function-in-c 

Charles


-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On
Behalf Of Farley, Peter x23353
Sent: Monday, April 27, 2020 10:31 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: XL C\C ++ sizeof of datatypes

Joe,

In C the "sizeof" keyword is an OPERATOR, not a function.  Instead of
"sizeof(shorttype)" you should code "sizeof shorttype".

Peter

-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of
Joseph Reichman
Sent: Sunday, April 26, 2020 9:58 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: XL C\C ++ sizeof of datatypes

HI 

   I am looking in the XL C docs lang reference user guide programming guide

For the length of the following data types 

  Short , int long and I cannot seem to find it

frustrated 

  I coded a program

Int len; 

Unsigned short shortype;

Int len = sizeof(shorttype);

   But the compiler seemed to comment the above statement
and not generate the assembler ps (I am running metal c);

Any help appreciate it
--

This message and any attachments are intended only for the use of the
addressee and may contain information that is privileged and confidential.
If the reader of the message is not the intended recipient or an authorized
representative of the intended recipient, you are hereby notified that any
dissemination of this communication is strictly prohibited. If you have
received this communication in error, please notify us immediately by e-mail
and delete the message and any attachments from your system.

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

Re: C

[Seymour J Metz]

That's OS/360, not just MVT, and it applies to COBOL E and F, which do not 
claim to be standards compliant.


--
Shmuel (Seymour J.) Metz
http://mason.gmu.edu/~smetz3


From: IBM Mainframe Discussion List [IBM-MAIN@LISTSERV.UA.EDU] on behalf of Joe 
Monk [joemon...@gmail.com]
Sent: Monday, April 27, 2020 3:31 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: C

Not according to the MVT Cobol compiler manual...

"The AFTER ADVANCING option is used for output destined to be printed or
punched. When this option is used, the first character in each logical
record for the file must be reserved for the control character. When the AFTER
ADVANCING option is used, integer must be unsigned and have the value 0, 1,
2, or 3. The value 0 designates a carriage-control eject (i.e., skip to next
page). The value 1 designates single spacing; the value 2, double spacing;
and the value 3, triple spacing."

http://secure-web.cisco.com/13JssaKkgEv6PvHbWqBb4_nGJr_KEk7X_p5dUxZ430B0TL067KAC3GmG62amVkyrK0wFJ6uAEiyuAI7pb90pBKUQu0efiy_EcUfFMps04VF_q3JCv2_EZfIyvaUoSxqVPc2j53HP4bEbd1UFUAFCLEfVb44yWkXMNs6D-ajkuaFWpwmOQ7DLdelU_kFoBfwK5MZ_99qKk1CuLZlVgozWOZL-_bSq_TGDGSJTg-n_WyQMcvJyYY36pAe8ZuT04bcBv85pG4_ec93Kta1h-fnUfm1av5W4Rrbx5p7qylU04uJOEM0P6WFyLKZsVsN9fcwPlF6x_1LZidv6aycTEAYyrPSpAWy7wZpPldHH-cnTUKc-qPz9772YMzNFNq0kfjiUmqVlSSL_YelM-_hg_l4oKtelOcnJWpjuuVTQ6Ppnp-zMhgROTwHMtUNj4JWJLEXBR/http%3A%2F%2Fwww.bitsavers.org%2Fpdf%2Fibm%2F360%2Fos%2Fcobol%2FC28-6516-2_IBM_OS360_COBOL_Language_Dec64.pdf

Joe

On Mon, Apr 27, 2020 at 11:52 AM Seymour J Metz  wrote:

> That's a bug; the carriage control character is supposed to be transparent
> to the COBOL programmer.
>
>
> --
> Shmuel (Seymour J.) Metz
> http://mason.gmu.edu/~smetz3
>
> 
> From: IBM Mainframe Discussion List [IBM-MAIN@LISTSERV.UA.EDU] on behalf
> of Paul Gilmartin [000433f07816-dmarc-requ...@listserv.ua.edu]
> Sent: Monday, April 27, 2020 11:04 AM
> To: IBM-MAIN@LISTSERV.UA.EDU
> Subject: Re: C
>
> On Mon, 27 Apr 2020 15:06:03 +1000, Wayne Bickerdike wrote:
> >
> >I had neither mainframe COBOL nor SPPS skills but I'd written a whole
> bunch
> >of Microfocus COBOL on CP/M micros.
> >
> >I convinced them that I could do mainframe COBOL, which wasn't that
> >difficult. When I looked at the SPPS code, it was macro Assembler, so that
> >was the start of a short time with same.
> >
> My one foray into COBOL occurred when I worked for a small consulting
> firm.  Warm body with no COBOL skill.  I developed a small COBOL
> program timesharing to DECSystem-10.
>
> My co-worker carried it to client's IBM 360.
>
> Failed.
>
> Using AFTER ADVANCING construct in IBM COBOL clobbers the first
> character of my data record.  Who woulda thunk it?
>
> DEC COBOL, more wisely IMO, prefixes the intact record with LF, FF,
> whatever carriage motion command(s).  Better design; standard be
> damned!
>
> -- gil
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

Re: Read BookManager/READ files

[Seymour J Metz]

I'm using Firefox 38.8.0, which is probably much older than you have. I notice 
that you didn't mention IE; while I dislike it and microsoft has deprecated it, 
there are still people using it due to problems with edge, so you might want to 
include it in what you're testing.

Is there enough of a difference between Chromium and Chrome to warrant separate 
testing?

It works much better on Linux, with Firefox 68.7.0esr.


--
Shmuel (Seymour J.) Metz
http://mason.gmu.edu/~smetz3


From: IBM Mainframe Discussion List [IBM-MAIN@LISTSERV.UA.EDU] on behalf of 
Susan Shumway [chale...@us.ibm.com]
Sent: Monday, April 27, 2020 2:34 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Read BookManager/READ files

Hi Shmuel,

So, there's just the page title but no contents? That's strange. It
looks okay to me on Firefox, Chrome, and Edge, so I'm not sure what the
problem is on your end. If others notice the same behavior, I'll look
into if it's a problem on the content or site end.

In the meantime, here are direct links to the Softcopy Reader downloadables:

IBM Softcopy Reader/Windows V4.0:
ftp://public.dhe.ibm.com/ps/products/bookmanager/tools/ilrjava.exe

Release Notes:
ftp://public.dhe.ibm.com/ps/products/bookmanager/tools/swinread.txt

-Sue Shumway


On 4/27/2020 1:57 PM, Seymour J Metz wrote:
> Is it browser dependent? What I get is
>
>
> IBM®
> IBM Support  Offerings  My support  Downloads  Documents  Cases  Communities  
> Training  Other
>
> Downloadable free BookManager tools and components
>
>  Contact IBM  Privacy  Terms of use  Accessibility
>
> with different values for the middle line.
>
>
> --
> Shmuel (Seymour J.) Metz
> http://mason.gmu.edu/~smetz3
>
> 
> From: IBM Mainframe Discussion List [IBM-MAIN@LISTSERV.UA.EDU] on behalf of 
> Susan Shumway [chale...@us.ibm.com]
> Sent: Monday, April 27, 2020 1:43 PM
> To: IBM-MAIN@LISTSERV.UA.EDU
> Subject: Re: Read BookManager/READ files
>
> Hi Shmuel,
>
> It's a sort of old-school site - you just need to do some clicking. From
> https://www.ibm.com/support/pages/node/324693 , click "IBM Softcopy
> Reader", which gets you to https://www.ibm.com/support/pages/node/324679
> . From there, click "Download Softcopy Reader for Windows 4.0", which
> gets you to https://www.ibm.com/support/pages/node/731199 . Scroll to
> the bottom for the link to download the package with FTP.
>
> -Sue Shumway
>
> On 4/27/2020 12:47 PM, Seymour J Metz wrote:
>> I assume that's under the Download tab, but none of the menu options seem 
>> appropriate.
>>
>>
>> --
>> Shmuel (Seymour J.) Metz
>> http://mason.gmu.edu/~smetz3
>>
>> 
>> From: IBM Mainframe Discussion List [IBM-MAIN@LISTSERV.UA.EDU] on behalf of 
>> Susan Shumway [chale...@us.ibm.com]
>> Sent: Monday, April 27, 2020 12:25 PM
>> To: IBM-MAIN@LISTSERV.UA.EDU
>> Subject: Re: Read BookManager/READ files
>>
>> See "Downloadable free BookManager tools and components" (
>> https://www.ibm.com/support/pages/node/324693 ) for links to download
>> IBM Softcopy Reader and other helpful resources.
>>
>> If you ever need to access older z/OS documentation, note that we've
>> made available PDF versions of it back to V1R10, available in the IBM Z
>> Publications Library Archive:
>> https://www.ibm.com/servers/resourcelink/svc00100.nsf/pages/zos-library-archives
>>
>> -Sue Shumway
>>
>> On 4/27/2020 5:49 AM, R.S. wrote:
>>> W dniu 27.04.2020 o 11:14, Juergen Kehr pisze:
 Hello,

 where just in the process to migrate our z/OS systems to V2.4. As you
 know, on z/OS V2.4 BookManager/READ isn't available anymore. But
 unfortunately some developers come up with a requirement to read some
 very old homegrown documentation files (.BOO files). So my question
 is, are there any free tools available to read and/or convert these
 files to PDF or HTML?
>>>
>>> BOO files can be still read using existing tools like IBM Softcopy
>>> Reader which works nicely under Win10 x64 and older Windows versions.
>>> You can still use IBM Library Reader which is 16-bit application and
>>> will not work under 64-bit Windows, but you can run it under old Windows
>>> running under Virtual Box or other tool. Personally I prefer Library
>>> Reader, but it is simpler to use Softcopy Reader.
>>> Note: both tools were available for download and IMHO you can still use
>>> it, even if IBM removed it from webpage. If you need a copy, just look
>>> for older documentation on DVD or CD.
>>> I hope you don't want to use BOO files under z/OS. ;-)
>>>
>>
>> --
>> Sue Shumway
>> z/OS Project Lead and Client Advocate
>> IBM Poughkeepsie
>> chale...@us.ibm.com
>>
>> --
>> For IBM-MAIN subscribe / signoff / archive access instructions,
>> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>>
>> ---

Addressing literals and Automatic Storage in Metal C

[Joseph Reichman]

Hi

 

I am trying insert assembler code (a macro) in a Metal C program that's has
literal copybook for constants and a dsect

 

I am assuming for the DSECT I would have to do something like @@AUTO@1 DSECT
followed by ORG @@AUTO@1+X'' after the last stack variable copy my dsect
variables

For the constants I would do ORG @@LIT@1+X'NNN' after the last constant and
then point back LOCTR to the next NSI

 

I am wondering if anyone has done this and can give my some tips

 

Thanks

 


--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

Re: zOSMF in a Sysplex

[Jousma, David]

In order to share the files filesystem in read/write ( ie mounted to multiple 
systems at once) you have be in shared sysplex filesystem and the file system 
mounted rwshare.   Otherwise the attempt to mount it in a second spot will 
fail.   Of course, none if this applies if you mount/unmount the user 
filesystem as part of the zosmf started task which is what we used to do before 
going shared.

_

Dave Jousma

AVP | Manager, Systems Engineering


Fifth Third Bank | 1830 East Paris Ave, SE | MD RSCB2H | Grand Rapids, MI 49546

616.653.8429 | fax: 616.653.2717



From: IBM Mainframe Discussion List  on behalf of 
Steve Beaver 
Sent: Monday, April 27, 2020 4:06:38 PM
To: IBM-MAIN@LISTSERV.UA.EDU 
Subject: zOSMF in a Sysplex

**CAUTION EXTERNAL EMAIL**

**DO NOT open attachments or click on links from unknown senders or unexpected 
emails**

I have zOSMF working in a MONOPLEX and that was a challenge to itself
especially with RACF.



It's time for a SYSPLEX.  We have several PARMLIB's and the concatenation is
all the same on all the LPAR's as is the

PARMLIB suffix.



The zFS for zOSMF is shared R/W, the Libery zFS os READONLY



Am I right to be scared to death, or am I just overly concerned



TIA


--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
**CAUTION EXTERNAL EMAIL**

**DO NOT open attachments or click on links from unknown senders or unexpected 
emails**

This e-mail transmission contains information that is confidential and may be 
privileged.
It is intended only for the addressee(s) named above. If you receive this 
e-mail in error,
please do not read, copy or disseminate it in any manner.  If you are not the 
intended 
recipient, any disclosure, copying, distribution or use of the contents of this 
information
is prohibited. Please reply to the message immediately by informing the sender 
that the 
message was misdirected. After replying, please erase it from your computer 
system. Your 
assistance in correcting this error is appreciated.




--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

zOSMF in a Sysplex

[Steve Beaver]

I have zOSMF working in a MONOPLEX and that was a challenge to itself
especially with RACF.

 

It's time for a SYSPLEX.  We have several PARMLIB's and the concatenation is
all the same on all the LPAR's as is the 

PARMLIB suffix. 

 

The zFS for zOSMF is shared R/W, the Libery zFS os READONLY 

 

Am I right to be scared to death, or am I just overly concerned 

 

TIA


--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

Re: DLS180I DRIVE IS ALREADY ALLOCATED or BOXED

[CarlosM Martinez]

Thank you.

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Joe Monk
Sent: Monday, April 27, 2020 2:20 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: DLS180I DRIVE IS ALREADY ALLOCATED or BOXED

More tape drives.

Joe

On Mon, Apr 27, 2020 at 1:06 PM CarlosM Martinez 
wrote:

> DLS180I DRIVE IS ALREADY ALLOCATED or BOXED
>
> Hello all does anyone here know the resolution for the above message
> during a backup VSAM files job?
>
> -Original Message-
> From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On
> Behalf Of Gibney, Dave
> Sent: Monday, April 27, 2020 1:31 PM
> To: IBM-MAIN@LISTSERV.UA.EDU
> Subject: Re: DFSMShsm high CPU consumption
>
> Almost by definition, DFHSM  doesn't do high priority work. Even recalls.
> If a dataset is needed quickly, why did the migration rules allow it to
> migrate.
>
> I run DFHSM in STCLOW
>
> > -Original Message-
> > From: IBM Mainframe Discussion List  On
> > Behalf Of Arye Shemer
> > Sent: Monday, April 27, 2020 4:27 AM
> > To: IBM-MAIN@LISTSERV.UA.EDU
> > Subject: DFSMShsm high CPU consumption
> >
> > Hello forumers,
> > IHAC complaining about high CPU consumption by DFSMShsm.
> > Customer has no HSM experts and saying that while running HSM backups,
> > Recycle, and several other HSM activities the CPU consumption rising to
> > 100%.
> > This high CPU consumption interfere with other higher importance online
> > jobs and cause timeouts.
> > Customer is willing to let the HSM activities (backups and maintenance)
> take
> > longer in order to reduce the CPU consumption.
> > Which HSM parameters we should investigate in order to achieve this goal.
> > I assume that WLM is also need to be looked at to reduce the priority of
> the
> > HSM tasks.
> >  Your  directions and sharing your experience  would be in great help,
> Thank
> > you, Arye Shemer.
> >
> > --
> > For IBM-MAIN subscribe / signoff / archive access instructions, send
> email to
> > lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

Re: C

[Joe Monk]

Not according to the MVT Cobol compiler manual...

"The AFTER ADVANCING option is used for output destined to be printed or
punched. When this option is used, the first character in each logical
record for the file must be reserved for the control character. When the AFTER
ADVANCING option is used, integer must be unsigned and have the value 0, 1,
2, or 3. The value 0 designates a carriage-control eject (i.e., skip to next
page). The value 1 designates single spacing; the value 2, double spacing;
and the value 3, triple spacing."

http://www.bitsavers.org/pdf/ibm/360/os/cobol/C28-6516-2_IBM_OS360_COBOL_Language_Dec64.pdf

Joe

On Mon, Apr 27, 2020 at 11:52 AM Seymour J Metz  wrote:

> That's a bug; the carriage control character is supposed to be transparent
> to the COBOL programmer.
>
>
> --
> Shmuel (Seymour J.) Metz
> http://mason.gmu.edu/~smetz3
>
> 
> From: IBM Mainframe Discussion List [IBM-MAIN@LISTSERV.UA.EDU] on behalf
> of Paul Gilmartin [000433f07816-dmarc-requ...@listserv.ua.edu]
> Sent: Monday, April 27, 2020 11:04 AM
> To: IBM-MAIN@LISTSERV.UA.EDU
> Subject: Re: C
>
> On Mon, 27 Apr 2020 15:06:03 +1000, Wayne Bickerdike wrote:
> >
> >I had neither mainframe COBOL nor SPPS skills but I'd written a whole
> bunch
> >of Microfocus COBOL on CP/M micros.
> >
> >I convinced them that I could do mainframe COBOL, which wasn't that
> >difficult. When I looked at the SPPS code, it was macro Assembler, so that
> >was the start of a short time with same.
> >
> My one foray into COBOL occurred when I worked for a small consulting
> firm.  Warm body with no COBOL skill.  I developed a small COBOL
> program timesharing to DECSystem-10.
>
> My co-worker carried it to client's IBM 360.
>
> Failed.
>
> Using AFTER ADVANCING construct in IBM COBOL clobbers the first
> character of my data record.  Who woulda thunk it?
>
> DEC COBOL, more wisely IMO, prefixes the intact record with LF, FF,
> whatever carriage motion command(s).  Better design; standard be
> damned!
>
> -- gil
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

Re: Latest COBOL standard is 2014 was Re: Cobol

[Frank Swarbrick]

And believe it or not, there is an ISO group working on a 202X standard for 
COBOL.


From: IBM Mainframe Discussion List  on behalf of 
Clark Morris 
Sent: Monday, April 27, 2020 7:39 AM
To: IBM-MAIN@LISTSERV.UA.EDU 
Subject: Latest COBOL standard is 2014 was Re: Cobol

[Default] On 27 Apr 2020 00:29:21 -0700, in bit.listserv.ibm-main
dcrayf...@gmail.com (David Crayford) wrote:

>Define modern? A language is only as modern as its last standard (or
>version). For example, Python is considered a modern language although
>it's 30 years old. It's constantly
>being updated. Python 3.6 supports static type checking! JavaScript is
>the same. C++20 is being ratified, C2x is being worked on. Java 13 is
>going to GA on z/OS this year!
>
>It's my understanding that COBOL-85 is the current standard in use on
>z/OS? That's probably indicative of COBOL programmers not requiring new
>language features as they don't
>need them to maintain the code bases that they work on. COBOL
>modernization on z/OS has mostly been back-end optimizer work which is
>probably a lot more valuable to z/OS
>IT managers then new language features that won't be used. If companies
>want to modernize a COBOL application they integrate with Java like CICS
>and IMS.

The latest COBOL standard is 2014 with 2002 and 1989 extensions being
predecessors.  The 2014 standard supports IEEE binary floating point
plus IEEE decimal floating point with all of the rounding options
including round to nearest even.  There also are true binary usages
including binary character and USAGE BIT along with boolean
operations.  There is everything needed to fully work with SMf 30
records without weird coding.  It would allow a relatively straight
forward conversion of Assembler DSECTS to COBOL.  Because it has
language to support all of the IEEE fixed and floating point binary
usages, IEEE and hex floating point could co-exist in the same
program.  I wanted USAGE BIT 50 years ago because I was dealing with
bit switches on customer, product and open account files.

Clark Morris
>
>REXX hasn't changed in almost 30 years. There's been a few updates to
>TSO REXX such as EXECIO VBS support but that's about all.
>
>On 2020-04-25 7:03 AM, Wayne Bickerdike wrote:
>> One of our guys was talking about modern languages such as C. I said what?
>>
>> On Sat, Apr 25, 2020 at 7:01 AM Seymour J Metz  wrote:
>>
>>> Well what do you know? The emperor has no clothes. We shot an innocent
>>> language.
>>>
>>>
>>> --
>>> Shmuel (Seymour J.) Metz
>>> http://mason.gmu.edu/~smetz3
>>>
>>> 
>>> From: IBM Mainframe Discussion List [IBM-MAIN@LISTSERV.UA.EDU] on behalf
>>> of Paul Gilmartin [000433f07816-dmarc-requ...@listserv.ua.edu]
>>> Sent: Friday, April 24, 2020 3:58 PM
>>> To: IBM-MAIN@LISTSERV.UA.EDU
>>> Subject: Re: Cobol
>>>
>>> On Fri, 24 Apr 2020 18:26:49 +, Seymour J Metz wrote:
>>>
 There are blurbs for dozens of articles; which one is relevant? I tried
>>> searxhing for COBOL, but got 0 hits.
>>> I suspect that was OP's desperate and futile attempt to circumvent
>>> secureweb,
>>> as you often do.  But, I hope (posting from web interface):
>>>
>>> https://secure-web.cisco.com/18wMr2wQiot_mC2NJkJL7buWujrBfP9suLfEWZL4dG8gjB_Zjaj31ZgILnrnn--CfD_RooCYfsFjxvxArhRiN2V2tCmTfs8NayUQCV2ProhQ0KfRlDMDZdg2alKOSjuWwTXeK_Lci9elkht49bjva6Fj7o1W1SIr2REv9PF2NO_PK0BStoe0irBBLJRM9a_tKg3QNHj3DghbIM6_s_J2QBa8K1XWudsYnadGx1bdpDNNTapriOq_jLHjoC742AxmqQVAJ4Szwl0aLrINIHWnzPzP_p0N_kYOi4keUEoOLuWRccU_ZVES-3NC05VlKLovPbiDfx9BUbsi3Kn4nGo1sHGipsJJfPFN4ClnEGuuMjWs6LU9f2293Fm0jTt3GhayZHNNDR8prcppx857Qz_vQpR6HOUIxm-p1DAvFYE8aFU_B3Da9y60snIIWQxr9qfkI67XWmwAvbGdgFfA9cP_uBHV85oupnnYfOSco5uQPIVE/https%3A%2F%2Fwww.wired.com%2Fstory%2Fcant-file-unemployment-dont-blame-cobol%2F
>>>
>>> 
>>> From: scott Ford
>>> Sent: Friday, April 24, 2020 2:08 PM
>>>
>>> See this url ...
>>>
>>>
>>> http://secure-web.cisco.com/1DYCAeckpzqV94PQWw8dHuuJalhW0eVroAe-0-S4pJl_FnqGfZxS4EcWK7cCAl1oA09gJJKNMcHC1Be4KK3D-KcMIEVRVBeNOw5sf7565Z6e9CTYIm43a-oit3GGWnum7LgBTpYCxV6CAhgR9TuXipYHaUjUUPtd7BICMs1zfFGQQ8NhAeXHdXvHPrGdxzaQmTRfNi8vGWGKk4fg_G75au8H3Ja9AbLwRb2m8-upI9jYdmy1ZYdzYlRF2kzlwN155wAFEug02LCkZ5Bpk3IvSuxwzwd1UUyk_5NUmIqwMFmcDxZ8SpSnwFspncJTV1bLmByZAIVczBfj-JctXDA5Ta99YBqxx1tBpdl0qN5MWPGsz1CGAQ_Is1sLoRxy9Dl_fCLgMhLDvO5L8-EsVff2IiswF1xKvwUDiAEPcV0mOxz5c915mExQuVbCTDL0KTJQEtCF5dYTiss8HJIK_dzSG8g/http%3A%2F%2Fwww.wired.com.
>>>Can't File for Unemployment - Don?t Blame Cobol
>>>
>>> -- gil
>>>
>>> --
>>> For IBM-MAIN subscribe / signoff / archive access instructions,
>>> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>>>
>>>
>>> --
>>> For IBM-MAIN subscribe / signoff / archive access instructions,
>>> send email to lists...@listserv.ua.edu with the message: INFO

Re: C

[Frank Swarbrick]

The "1974" COBOL compiler (OS/VS COBOL) required the printer control character 
to be explicitly defined.  This "bug" can be "emulated" with VS COBOL II and 
subsequent compilers by specifying the "NOADV" compiler option.  Not 
recommended for new programs, but useful when migrating from OS/VS COBOL.


From: IBM Mainframe Discussion List  on behalf of 
Seymour J Metz 
Sent: Monday, April 27, 2020 10:52 AM
To: IBM-MAIN@LISTSERV.UA.EDU 
Subject: Re: C

That's a bug; the carriage control character is supposed to be transparent to 
the COBOL programmer.


--
Shmuel (Seymour J.) Metz
http://mason.gmu.edu/~smetz3


From: IBM Mainframe Discussion List [IBM-MAIN@LISTSERV.UA.EDU] on behalf of 
Paul Gilmartin [000433f07816-dmarc-requ...@listserv.ua.edu]
Sent: Monday, April 27, 2020 11:04 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: C

On Mon, 27 Apr 2020 15:06:03 +1000, Wayne Bickerdike wrote:
>
>I had neither mainframe COBOL nor SPPS skills but I'd written a whole bunch
>of Microfocus COBOL on CP/M micros.
>
>I convinced them that I could do mainframe COBOL, which wasn't that
>difficult. When I looked at the SPPS code, it was macro Assembler, so that
>was the start of a short time with same.
>
My one foray into COBOL occurred when I worked for a small consulting
firm.  Warm body with no COBOL skill.  I developed a small COBOL
program timesharing to DECSystem-10.

My co-worker carried it to client's IBM 360.

Failed.

Using AFTER ADVANCING construct in IBM COBOL clobbers the first
character of my data record.  Who woulda thunk it?

DEC COBOL, more wisely IMO, prefixes the intact record with LF, FF,
whatever carriage motion command(s).  Better design; standard be
damned!

-- gil

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

Re: Read BookManager/READ files

[Susan Shumway]

Hi Shmuel,

So, there's just the page title but no contents? That's strange. It 
looks okay to me on Firefox, Chrome, and Edge, so I'm not sure what the 
problem is on your end. If others notice the same behavior, I'll look 
into if it's a problem on the content or site end.


In the meantime, here are direct links to the Softcopy Reader downloadables:

IBM Softcopy Reader/Windows V4.0: 
ftp://public.dhe.ibm.com/ps/products/bookmanager/tools/ilrjava.exe


Release Notes: 
ftp://public.dhe.ibm.com/ps/products/bookmanager/tools/swinread.txt


-Sue Shumway


On 4/27/2020 1:57 PM, Seymour J Metz wrote:

Is it browser dependent? What I get is


IBM®
IBM Support  Offerings  My support  Downloads  Documents  Cases  Communities  
Training  Other

Downloadable free BookManager tools and components

 Contact IBM  Privacy  Terms of use  Accessibility

with different values for the middle line.


--
Shmuel (Seymour J.) Metz
http://mason.gmu.edu/~smetz3


From: IBM Mainframe Discussion List [IBM-MAIN@LISTSERV.UA.EDU] on behalf of 
Susan Shumway [chale...@us.ibm.com]
Sent: Monday, April 27, 2020 1:43 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Read BookManager/READ files

Hi Shmuel,

It's a sort of old-school site - you just need to do some clicking. From
https://www.ibm.com/support/pages/node/324693 , click "IBM Softcopy
Reader", which gets you to https://www.ibm.com/support/pages/node/324679
. From there, click "Download Softcopy Reader for Windows 4.0", which
gets you to https://www.ibm.com/support/pages/node/731199 . Scroll to
the bottom for the link to download the package with FTP.

-Sue Shumway

On 4/27/2020 12:47 PM, Seymour J Metz wrote:

I assume that's under the Download tab, but none of the menu options seem 
appropriate.


--
Shmuel (Seymour J.) Metz
http://mason.gmu.edu/~smetz3


From: IBM Mainframe Discussion List [IBM-MAIN@LISTSERV.UA.EDU] on behalf of 
Susan Shumway [chale...@us.ibm.com]
Sent: Monday, April 27, 2020 12:25 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Read BookManager/READ files

See "Downloadable free BookManager tools and components" (
https://www.ibm.com/support/pages/node/324693 ) for links to download
IBM Softcopy Reader and other helpful resources.

If you ever need to access older z/OS documentation, note that we've
made available PDF versions of it back to V1R10, available in the IBM Z
Publications Library Archive:
https://www.ibm.com/servers/resourcelink/svc00100.nsf/pages/zos-library-archives

-Sue Shumway

On 4/27/2020 5:49 AM, R.S. wrote:

W dniu 27.04.2020 o 11:14, Juergen Kehr pisze:

Hello,

where just in the process to migrate our z/OS systems to V2.4. As you
know, on z/OS V2.4 BookManager/READ isn't available anymore. But
unfortunately some developers come up with a requirement to read some
very old homegrown documentation files (.BOO files). So my question
is, are there any free tools available to read and/or convert these
files to PDF or HTML?


BOO files can be still read using existing tools like IBM Softcopy
Reader which works nicely under Win10 x64 and older Windows versions.
You can still use IBM Library Reader which is 16-bit application and
will not work under 64-bit Windows, but you can run it under old Windows
running under Virtual Box or other tool. Personally I prefer Library
Reader, but it is simpler to use Softcopy Reader.
Note: both tools were available for download and IMHO you can still use
it, even if IBM removed it from webpage. If you need a copy, just look
for older documentation on DVD or CD.
I hope you don't want to use BOO files under z/OS. ;-)



--
Sue Shumway
z/OS Project Lead and Client Advocate
IBM Poughkeepsie
chale...@us.ibm.com

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN



--
Sue Shumway
z/OS Project Lead and Client Advocate
IBM Poughkeepsie
chale...@us.ibm.com

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN



--
Sue Shumway
z/OS Project Lead and Client Advocate
IBM Poughkeepsie
chale...@us.ibm.com

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

Re: DLS180I DRIVE IS ALREADY ALLOCATED or BOXED

[Joe Monk]

More tape drives.

Joe

On Mon, Apr 27, 2020 at 1:06 PM CarlosM Martinez 
wrote:

> DLS180I DRIVE IS ALREADY ALLOCATED or BOXED
>
> Hello all does anyone here know the resolution for the above message
> during a backup VSAM files job?
>
> -Original Message-
> From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On
> Behalf Of Gibney, Dave
> Sent: Monday, April 27, 2020 1:31 PM
> To: IBM-MAIN@LISTSERV.UA.EDU
> Subject: Re: DFSMShsm high CPU consumption
>
> Almost by definition, DFHSM  doesn't do high priority work. Even recalls.
> If a dataset is needed quickly, why did the migration rules allow it to
> migrate.
>
> I run DFHSM in STCLOW
>
> > -Original Message-
> > From: IBM Mainframe Discussion List  On
> > Behalf Of Arye Shemer
> > Sent: Monday, April 27, 2020 4:27 AM
> > To: IBM-MAIN@LISTSERV.UA.EDU
> > Subject: DFSMShsm high CPU consumption
> >
> > Hello forumers,
> > IHAC complaining about high CPU consumption by DFSMShsm.
> > Customer has no HSM experts and saying that while running HSM backups,
> > Recycle, and several other HSM activities the CPU consumption rising to
> > 100%.
> > This high CPU consumption interfere with other higher importance online
> > jobs and cause timeouts.
> > Customer is willing to let the HSM activities (backups and maintenance)
> take
> > longer in order to reduce the CPU consumption.
> > Which HSM parameters we should investigate in order to achieve this goal.
> > I assume that WLM is also need to be looked at to reduce the priority of
> the
> > HSM tasks.
> >  Your  directions and sharing your experience  would be in great help,
> Thank
> > you, Arye Shemer.
> >
> > --
> > For IBM-MAIN subscribe / signoff / archive access instructions, send
> email to
> > lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

DLS180I DRIVE IS ALREADY ALLOCATED or BOXED

[CarlosM Martinez]

DLS180I DRIVE IS ALREADY ALLOCATED or BOXED

Hello all does anyone here know the resolution for the above message  during a 
backup VSAM files job?

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Gibney, Dave
Sent: Monday, April 27, 2020 1:31 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: DFSMShsm high CPU consumption

Almost by definition, DFHSM  doesn't do high priority work. Even recalls. If a 
dataset is needed quickly, why did the migration rules allow it to migrate.

I run DFHSM in STCLOW

> -Original Message-
> From: IBM Mainframe Discussion List  On
> Behalf Of Arye Shemer
> Sent: Monday, April 27, 2020 4:27 AM
> To: IBM-MAIN@LISTSERV.UA.EDU
> Subject: DFSMShsm high CPU consumption
> 
> Hello forumers,
> IHAC complaining about high CPU consumption by DFSMShsm.
> Customer has no HSM experts and saying that while running HSM backups,
> Recycle, and several other HSM activities the CPU consumption rising to
> 100%.
> This high CPU consumption interfere with other higher importance online
> jobs and cause timeouts.
> Customer is willing to let the HSM activities (backups and maintenance) take
> longer in order to reduce the CPU consumption.
> Which HSM parameters we should investigate in order to achieve this goal.
> I assume that WLM is also need to be looked at to reduce the priority of the
> HSM tasks.
>  Your  directions and sharing your experience  would be in great help, Thank
> you, Arye Shemer.
> 
> --
> For IBM-MAIN subscribe / signoff / archive access instructions, send email to
> lists...@listserv.ua.edu with the message: INFO IBM-MAIN

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

Re: Read BookManager/READ files

[Seymour J Metz]

Is it browser dependent? What I get is


IBM®
IBM Support  Offerings  My support  Downloads  Documents  Cases  Communities  
Training  Other

Downloadable free BookManager tools and components

Contact IBM  Privacy  Terms of use  Accessibility

with different values for the middle line.


--
Shmuel (Seymour J.) Metz
http://mason.gmu.edu/~smetz3


From: IBM Mainframe Discussion List [IBM-MAIN@LISTSERV.UA.EDU] on behalf of 
Susan Shumway [chale...@us.ibm.com]
Sent: Monday, April 27, 2020 1:43 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Read BookManager/READ files

Hi Shmuel,

It's a sort of old-school site - you just need to do some clicking. From
https://www.ibm.com/support/pages/node/324693 , click "IBM Softcopy
Reader", which gets you to https://www.ibm.com/support/pages/node/324679
. From there, click "Download Softcopy Reader for Windows 4.0", which
gets you to https://www.ibm.com/support/pages/node/731199 . Scroll to
the bottom for the link to download the package with FTP.

-Sue Shumway

On 4/27/2020 12:47 PM, Seymour J Metz wrote:
> I assume that's under the Download tab, but none of the menu options seem 
> appropriate.
>
>
> --
> Shmuel (Seymour J.) Metz
> http://mason.gmu.edu/~smetz3
>
> 
> From: IBM Mainframe Discussion List [IBM-MAIN@LISTSERV.UA.EDU] on behalf of 
> Susan Shumway [chale...@us.ibm.com]
> Sent: Monday, April 27, 2020 12:25 PM
> To: IBM-MAIN@LISTSERV.UA.EDU
> Subject: Re: Read BookManager/READ files
>
> See "Downloadable free BookManager tools and components" (
> https://www.ibm.com/support/pages/node/324693 ) for links to download
> IBM Softcopy Reader and other helpful resources.
>
> If you ever need to access older z/OS documentation, note that we've
> made available PDF versions of it back to V1R10, available in the IBM Z
> Publications Library Archive:
> https://www.ibm.com/servers/resourcelink/svc00100.nsf/pages/zos-library-archives
>
> -Sue Shumway
>
> On 4/27/2020 5:49 AM, R.S. wrote:
>> W dniu 27.04.2020 o 11:14, Juergen Kehr pisze:
>>> Hello,
>>>
>>> where just in the process to migrate our z/OS systems to V2.4. As you
>>> know, on z/OS V2.4 BookManager/READ isn't available anymore. But
>>> unfortunately some developers come up with a requirement to read some
>>> very old homegrown documentation files (.BOO files). So my question
>>> is, are there any free tools available to read and/or convert these
>>> files to PDF or HTML?
>>
>> BOO files can be still read using existing tools like IBM Softcopy
>> Reader which works nicely under Win10 x64 and older Windows versions.
>> You can still use IBM Library Reader which is 16-bit application and
>> will not work under 64-bit Windows, but you can run it under old Windows
>> running under Virtual Box or other tool. Personally I prefer Library
>> Reader, but it is simpler to use Softcopy Reader.
>> Note: both tools were available for download and IMHO you can still use
>> it, even if IBM removed it from webpage. If you need a copy, just look
>> for older documentation on DVD or CD.
>> I hope you don't want to use BOO files under z/OS. ;-)
>>
>
> --
> Sue Shumway
> z/OS Project Lead and Client Advocate
> IBM Poughkeepsie
> chale...@us.ibm.com
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>

--
Sue Shumway
z/OS Project Lead and Client Advocate
IBM Poughkeepsie
chale...@us.ibm.com

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

Re: Friday OT, cheerful program for gloomy times

[Seymour J Metz]

> What I have against (E)TOD is that IEBCOPY got leap seconds wrong
> until they resolved my APAR by converting to TIME.

That's an IEBCOPY issue. If TIME STCKE doesn't do adjustments, then *that* is 
the issue, not ETOD itself. I certainly hope that if IBM starts using ETOD for 
timestamps that they will do so through a documented system interface, not RYO. 
What would be really nice would be if they included both UT* and the zone in 
the new timestamp format.


-- 
Shmuel (Seymour J.) Metz
http://mason.gmu.edu/~smetz3


From: IBM Mainframe Discussion List [IBM-MAIN@LISTSERV.UA.EDU] on behalf of 
Paul Gilmartin [000433f07816-dmarc-requ...@listserv.ua.edu]
Sent: Monday, April 27, 2020 1:29 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Friday OT, cheerful program for gloomy times

On Mon, 27 Apr 2020 17:10:54 +, Seymour J Metz wrote:

>> I hope not.
>
>What do you have against ETOD?
>
>> TIME macro
> TIME  STCKE,foo
>
>Or doesn't that do the adjustments?
>
I believe it does not.  I believe TIME LOCAL and TIME GMT do.
I believe STCKCONV and CONVTOD do not.  I am confident
that before TOD rolls over TIME will be using ETOD.

What I have against (E)TOD is that IEBCOPY got leap seconds wrong
until they resolved my APAR by converting to TIME.

And back to David's report on the OP's BIO.TXT.  That uses two
different leap year formulae.  Neither reports an error for 1900.0229.
Rexx DATE() reports an error (though not very lucidly).  The moral
is, "Trust the experts; don't RYO (as IEBCOPY once did)."

-- gil

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

Re: Read BookManager/READ files

[Susan Shumway]

Hi Shmuel,

It's a sort of old-school site - you just need to do some clicking. From 
https://www.ibm.com/support/pages/node/324693 , click "IBM Softcopy 
Reader", which gets you to https://www.ibm.com/support/pages/node/324679 
. From there, click "Download Softcopy Reader for Windows 4.0", which 
gets you to https://www.ibm.com/support/pages/node/731199 . Scroll to 
the bottom for the link to download the package with FTP.


-Sue Shumway

On 4/27/2020 12:47 PM, Seymour J Metz wrote:

I assume that's under the Download tab, but none of the menu options seem 
appropriate.


--
Shmuel (Seymour J.) Metz
http://mason.gmu.edu/~smetz3


From: IBM Mainframe Discussion List [IBM-MAIN@LISTSERV.UA.EDU] on behalf of 
Susan Shumway [chale...@us.ibm.com]
Sent: Monday, April 27, 2020 12:25 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Read BookManager/READ files

See "Downloadable free BookManager tools and components" (
https://www.ibm.com/support/pages/node/324693 ) for links to download
IBM Softcopy Reader and other helpful resources.

If you ever need to access older z/OS documentation, note that we've
made available PDF versions of it back to V1R10, available in the IBM Z
Publications Library Archive:
https://www.ibm.com/servers/resourcelink/svc00100.nsf/pages/zos-library-archives

-Sue Shumway

On 4/27/2020 5:49 AM, R.S. wrote:

W dniu 27.04.2020 o 11:14, Juergen Kehr pisze:

Hello,

where just in the process to migrate our z/OS systems to V2.4. As you
know, on z/OS V2.4 BookManager/READ isn't available anymore. But
unfortunately some developers come up with a requirement to read some
very old homegrown documentation files (.BOO files). So my question
is, are there any free tools available to read and/or convert these
files to PDF or HTML?


BOO files can be still read using existing tools like IBM Softcopy
Reader which works nicely under Win10 x64 and older Windows versions.
You can still use IBM Library Reader which is 16-bit application and
will not work under 64-bit Windows, but you can run it under old Windows
running under Virtual Box or other tool. Personally I prefer Library
Reader, but it is simpler to use Softcopy Reader.
Note: both tools were available for download and IMHO you can still use
it, even if IBM removed it from webpage. If you need a copy, just look
for older documentation on DVD or CD.
I hope you don't want to use BOO files under z/OS. ;-)



--
Sue Shumway
z/OS Project Lead and Client Advocate
IBM Poughkeepsie
chale...@us.ibm.com

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN



--
Sue Shumway
z/OS Project Lead and Client Advocate
IBM Poughkeepsie
chale...@us.ibm.com

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

Re: XL C\C ++ sizeof of datatypes

[Farley, Peter x23353]

Joe,

In C the "sizeof" keyword is an OPERATOR, not a function.  Instead of 
"sizeof(shorttype)" you should code "sizeof shorttype".

Peter

-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
Joseph Reichman
Sent: Sunday, April 26, 2020 9:58 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: XL C\C ++ sizeof of datatypes

HI 

   I am looking in the XL C docs lang reference user guide programming guide

For the length of the following data types 

  Short , int long and I cannot seem to find it

frustrated 

  I coded a program

Int len; 

Unsigned short shortype;

Int len = sizeof(shorttype);

   But the compiler seemed to comment the above statement and 
not generate the assembler ps (I am running metal c);

Any help appreciate it
--

This message and any attachments are intended only for the use of the addressee 
and may contain information that is privileged and confidential. If the reader 
of the message is not the intended recipient or an authorized representative of 
the intended recipient, you are hereby notified that any dissemination of this 
communication is strictly prohibited. If you have received this communication 
in error, please notify us immediately by e-mail and delete the message and any 
attachments from your system.

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

Re: DFSMShsm high CPU consumption

[Gibney, Dave]

Almost by definition, DFHSM  doesn't do high priority work. Even recalls. If a 
dataset is needed quickly, why did the migration rules allow it to migrate.

I run DFHSM in STCLOW

> -Original Message-
> From: IBM Mainframe Discussion List  On
> Behalf Of Arye Shemer
> Sent: Monday, April 27, 2020 4:27 AM
> To: IBM-MAIN@LISTSERV.UA.EDU
> Subject: DFSMShsm high CPU consumption
> 
> Hello forumers,
> IHAC complaining about high CPU consumption by DFSMShsm.
> Customer has no HSM experts and saying that while running HSM backups,
> Recycle, and several other HSM activities the CPU consumption rising to
> 100%.
> This high CPU consumption interfere with other higher importance online
> jobs and cause timeouts.
> Customer is willing to let the HSM activities (backups and maintenance) take
> longer in order to reduce the CPU consumption.
> Which HSM parameters we should investigate in order to achieve this goal.
> I assume that WLM is also need to be looked at to reduce the priority of the
> HSM tasks.
>  Your  directions and sharing your experience  would be in great help, Thank
> you, Arye Shemer.
> 
> --
> For IBM-MAIN subscribe / signoff / archive access instructions, send email to
> lists...@listserv.ua.edu with the message: INFO IBM-MAIN

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

Re: Friday OT, cheerful program for gloomy times

[Paul Gilmartin]

On Mon, 27 Apr 2020 17:10:54 +, Seymour J Metz wrote:

>> I hope not.
>
>What do you have against ETOD?
>
>> TIME macro
> TIME  STCKE,foo
>
>Or doesn't that do the adjustments?
> 
I believe it does not.  I believe TIME LOCAL and TIME GMT do.
I believe STCKCONV and CONVTOD do not.  I am confident
that before TOD rolls over TIME will be using ETOD.

What I have against (E)TOD is that IEBCOPY got leap seconds wrong
until they resolved my APAR by converting to TIME.

And back to David's report on the OP's BIO.TXT.  That uses two
different leap year formulae.  Neither reports an error for 1900.0229.
Rexx DATE() reports an error (though not very lucidly).  The moral
is, "Trust the experts; don't RYO (as IEBCOPY once did)."

-- gil

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

Re: DFSMShsm high CPU consumption [EXTERNAL]

[Lizette Koehler]

SETSYS is what you want to review

1)  Do you have HSM in a plex or a single CPU?
2)  How did you set up SPACE MGMT, Primary and Secondary?
3)  Are you using FSM for migration?
4)  How are your management classes set up?  
5)  This gets tricky, how often are RECALLs done?
6)  Are you using Common Recall Queue?  It needs a CF
7)  What is the performance/priority for HSM in WLM


These are somethings you can review.

HSM can take a lot of resources for Migration/Recall/Backup/Dumps and ABARS if 
you use that

You need to see how it is set up to make sense of the consumption


Lizette



-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
Feller, Paul
Sent: Monday, April 27, 2020 8:32 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: DFSMShsm high CPU consumption [EXTERNAL]

I don't recall how you set it up in HSM, but one thing to look at is how many 
tasks we are running at one time.  As an example you can have several tasks 
running to do migrations during primary space management.  So you could look at 
the possibility of reducing the number of tasks running during primary space 
management.


Thanks..

Paul Feller
AGT Mainframe Technical Support

-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
Arye Shemer
Sent: Monday, April 27, 2020 6:27 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: DFSMShsm high CPU consumption [EXTERNAL]

Hello forumers,
IHAC complaining about high CPU consumption by DFSMShsm.
Customer has no HSM experts and saying that while running HSM backups, Recycle, 
and several other HSM activities the CPU consumption rising to 100%.
This high CPU consumption interfere with other higher importance online jobs 
and cause timeouts.
Customer is willing to let the HSM activities (backups and maintenance) take 
longer in order to reduce the CPU consumption.
Which HSM parameters we should investigate in order to achieve this goal.
I assume that WLM is also need to be looked at to reduce the priority of the 
HSM tasks.
 Your  directions and sharing your experience  would be in great help, Thank 
you, Arye Shemer.

--
For IBM-MAIN subscribe / signoff / archive access instructions, send email to 
lists...@listserv.ua.edu with the message: INFO IBM-MAIN

--
Please note:  This message originated outside your organization. Please use 
caution when opening links or attachments.

--
For IBM-MAIN subscribe / signoff / archive access instructions, send email to 
lists...@listserv.ua.edu with the message: INFO IBM-MAIN

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

Re: Request: Examples of an IPCS RUNARRAY command where the EXEC clause display storage using a pointer as a displacement off of X

[Seymour J Metz]

I don't have access to a live system, so I have to rely on the documentation, 
which sometimes omits critical information. One thought is to package the IPCS 
command in a REXX, possibly preceded by an EQ, and to use that member name in 
the RUNARRAY subcommand.


--
Shmuel (Seymour J.) Metz
http://mason.gmu.edu/~smetz3


From: IBM Mainframe Discussion List [IBM-MAIN@LISTSERV.UA.EDU] on behalf of 
Binyamin Dissen [bdis...@dissensoftware.com]
Sent: Monday, April 27, 2020 9:38 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Request: Examples of an IPCS RUNARRAY command where the EXEC 
clause display storage using a pointer as a displacement off of X

Unrelated.

Can you provide a working example?

On Sun, 26 Apr 2020 21:19:12 + Seymour J Metz  wrote:

:>Is it failing even when everything is in the same address space?

:>Shmuel (Seymour J.) Metz
:>http://mason.gmu.edu/~smetz3

:>From: IBM Mainframe Discussion List [IBM-MAIN@LISTSERV.UA.EDU] on behalf of 
Binyamin Dissen [bdis...@dissensoftware.com]
:>Sent: Sunday, April 26, 2020 9:59 AM
:>To: IBM-MAIN@LISTSERV.UA.EDU
:>Subject: Request: Examples of an IPCS RUNARRAY command where the EXEC clause 
display storage using a pointer as a displacement off of X
:>
:>I would like to see an examples of an IPCS RUNARRAY command where the EXEC
:>clause display storage using a pointer as a displacement off of X.
:>
:>So far I have not been able to make it work.

--
Binyamin Dissen 
http://secure-web.cisco.com/1sE_Y-LnhtIQBMedIDfdXlpIk9-ltSb-yGRb0Ee5JbmQE8xXeCI3cJclh1d_Q8hXJTRKPtqAqyxEGWvdZAEQ-VeN8LqfVqbFhn2bj8_E_zhjmZOzZ1zIxuhZkc_VG3i09gmZLfuPjVXmYFcSh5l0Q-Y57hKNy39-___9G0qf7LKtkod9ARRwI9noPqBe8vRpOASQrst2V6Qj3TgILOSEuKLBQSiMH7_FyqJ1zYwFUNKK6PykxscnnYTo9YcYBa2No2GN_m-VB-iVaoXITOowVq9dc-f36gOB8_ctknKWR8OremrhHapPohBOeMMgyRiB1vg98gVuWAfcj55IuaUGKCNTQnB-EzS25qrsGqiH3wb8z8SzkWxpm-moVHK27TAfmJatSmYaCe5KbQXJVa7_6pkoBtGs20Ho50UzKoWnKitox4YoLbsuLeKsD3STKRYKK/http%3A%2F%2Fwww.dissensoftware.com

Director, Dissen Software, Bar & Grill - Israel


Should you use the mailblocks package and expect a response from me,
you should preauthorize the dissensoftware.com domain.

I very rarely bother responding to challenge/response systems,
especially those from irresponsible companies.

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

Re: Friday OT, cheerful program for gloomy times

[Seymour J Metz]

> I hope not.

What do you have against ETOD?

> TIME macro

 TIME  STCKE,foo

Or doesn't that do the adjustments?


--
Shmuel (Seymour J.) Metz
http://mason.gmu.edu/~smetz3


From: IBM Mainframe Discussion List [IBM-MAIN@LISTSERV.UA.EDU] on behalf of 
Paul Gilmartin [000433f07816-dmarc-requ...@listserv.ua.edu]
Sent: Monday, April 27, 2020 10:46 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Friday OT, cheerful program for gloomy times

On 2020-04-27, at 04:57:13, Seymour J Metz wrote:
>
> Is there a statement of direction for using ETOD for all timestamping?
>
I hope not.

I once went to SR because the timestamps in IEBCOPY SYSPRINT were
about 20 seconds ahead of those in job log.  Suggested I suspected
a leap second problem.

Level 1> Whatsa Leap Second?

gil> [lotsa URLs; GIYF]

Level 1> Wow! Thanks!

They fixed it; closure text said they switched to TIME macro --
much better idea than RYO from ETOD, CVTLSO, CVTLDTO, ...


> On 2020-04-27, at 03:41:14, ITschak Mugzach wrote:
>
> צ
>
> בתאריך יום ב׳, 27 באפר׳ 2020, 12:38, מאת David Crayford ...
>
Year 5800/Y6K problem?

-- gil

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

Re: C

[Seymour J Metz]

That's a bug; the carriage control character is supposed to be transparent to 
the COBOL programmer.


--
Shmuel (Seymour J.) Metz
http://mason.gmu.edu/~smetz3


From: IBM Mainframe Discussion List [IBM-MAIN@LISTSERV.UA.EDU] on behalf of 
Paul Gilmartin [000433f07816-dmarc-requ...@listserv.ua.edu]
Sent: Monday, April 27, 2020 11:04 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: C

On Mon, 27 Apr 2020 15:06:03 +1000, Wayne Bickerdike wrote:
>
>I had neither mainframe COBOL nor SPPS skills but I'd written a whole bunch
>of Microfocus COBOL on CP/M micros.
>
>I convinced them that I could do mainframe COBOL, which wasn't that
>difficult. When I looked at the SPPS code, it was macro Assembler, so that
>was the start of a short time with same.
>
My one foray into COBOL occurred when I worked for a small consulting
firm.  Warm body with no COBOL skill.  I developed a small COBOL
program timesharing to DECSystem-10.

My co-worker carried it to client's IBM 360.

Failed.

Using AFTER ADVANCING construct in IBM COBOL clobbers the first
character of my data record.  Who woulda thunk it?

DEC COBOL, more wisely IMO, prefixes the intact record with LF, FF,
whatever carriage motion command(s).  Better design; standard be
damned!

-- gil

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

Re: Read BookManager/READ files

[Seymour J Metz]

I assume that's under the Download tab, but none of the menu options seem 
appropriate.


--
Shmuel (Seymour J.) Metz
http://mason.gmu.edu/~smetz3


From: IBM Mainframe Discussion List [IBM-MAIN@LISTSERV.UA.EDU] on behalf of 
Susan Shumway [chale...@us.ibm.com]
Sent: Monday, April 27, 2020 12:25 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Read BookManager/READ files

See "Downloadable free BookManager tools and components" (
https://www.ibm.com/support/pages/node/324693 ) for links to download
IBM Softcopy Reader and other helpful resources.

If you ever need to access older z/OS documentation, note that we've
made available PDF versions of it back to V1R10, available in the IBM Z
Publications Library Archive:
https://www.ibm.com/servers/resourcelink/svc00100.nsf/pages/zos-library-archives

-Sue Shumway

On 4/27/2020 5:49 AM, R.S. wrote:
> W dniu 27.04.2020 o 11:14, Juergen Kehr pisze:
>> Hello,
>>
>> where just in the process to migrate our z/OS systems to V2.4. As you
>> know, on z/OS V2.4 BookManager/READ isn't available anymore. But
>> unfortunately some developers come up with a requirement to read some
>> very old homegrown documentation files (.BOO files). So my question
>> is, are there any free tools available to read and/or convert these
>> files to PDF or HTML?
>
> BOO files can be still read using existing tools like IBM Softcopy
> Reader which works nicely under Win10 x64 and older Windows versions.
> You can still use IBM Library Reader which is 16-bit application and
> will not work under 64-bit Windows, but you can run it under old Windows
> running under Virtual Box or other tool. Personally I prefer Library
> Reader, but it is simpler to use Softcopy Reader.
> Note: both tools were available for download and IMHO you can still use
> it, even if IBM removed it from webpage. If you need a copy, just look
> for older documentation on DVD or CD.
> I hope you don't want to use BOO files under z/OS. ;-)
>

--
Sue Shumway
z/OS Project Lead and Client Advocate
IBM Poughkeepsie
chale...@us.ibm.com

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

Re: Read BookManager/READ files

[Susan Shumway]

See "Downloadable free BookManager tools and components" ( 
https://www.ibm.com/support/pages/node/324693 ) for links to download 
IBM Softcopy Reader and other helpful resources.


If you ever need to access older z/OS documentation, note that we've 
made available PDF versions of it back to V1R10, available in the IBM Z 
Publications Library Archive: 
https://www.ibm.com/servers/resourcelink/svc00100.nsf/pages/zos-library-archives


-Sue Shumway

On 4/27/2020 5:49 AM, R.S. wrote:

W dniu 27.04.2020 o 11:14, Juergen Kehr pisze:

Hello,

where just in the process to migrate our z/OS systems to V2.4. As you 
know, on z/OS V2.4 BookManager/READ isn't available anymore. But 
unfortunately some developers come up with a requirement to read some 
very old homegrown documentation files (.BOO files). So my question 
is, are there any free tools available to read and/or convert these 
files to PDF or HTML?


BOO files can be still read using existing tools like IBM Softcopy 
Reader which works nicely under Win10 x64 and older Windows versions.
You can still use IBM Library Reader which is 16-bit application and 
will not work under 64-bit Windows, but you can run it under old Windows 
running under Virtual Box or other tool. Personally I prefer Library 
Reader, but it is simpler to use Softcopy Reader.
Note: both tools were available for download and IMHO you can still use 
it, even if IBM removed it from webpage. If you need a copy, just look 
for older documentation on DVD or CD.

I hope you don't want to use BOO files under z/OS. ;-)



--
Sue Shumway
z/OS Project Lead and Client Advocate
IBM Poughkeepsie
chale...@us.ibm.com

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

Re: Friday OT, cheerful program for gloomy times

[Paul Gilmartin]

On Mon, 27 Apr 2020 17:01:08 +0800, David Crayford wrote:

>FYI, you have a bug with your leap year calculation. You need to check
>if the year is evenly dividable by 100 (which are not leap years unless
>evenly divisible by 400).
>
>isleap: procedure
>   arg year .
>   return (year // 4 = 0 & year // 100 /= 0 ) | year // 400 = 0
> 
I believe that's taken care of in the OP's code by:
... TRUNC((TRUNC(YY/100)+1)*3/4)

-- gil

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

Re: Latest COBOL standard is 2014 was Re: Cobol

[Bernd Oppolzer]

Am 27.04.2020 um 15:39 schrieb Clark Morris:

I wanted USAGE BIT 50 years ago because I was dealing with
bit switches on customer, product and open account files. 



In 1992, my customer at that time (local transport) wanted to help
the local transport company in Lodz (Poland), which is our partner town,
to replace their ODRA machine (Polish ICL clone) by an IBM mainframe
(4381 model 12, IIRC) running VM/CMS, VSE, CICS, SQL/DS etc.
The programs there were COBOL programs. Our manager told the people there,
that there will be no problem, because COBOL is COBOL, after all.

When we looked at the COBOL programs at the ODRA machine, we soon
realized two severe problems that gave us some headaches:

- a printer with line width 160 characters (we had 132 maximum);
all ODRA programs of course used this line width for their reports

- and variable definitions like this:
01  BITS  PIC 1(8).
that is: eight bits.

So the migration to IBM was not as cheap as expected :-)
what made our support more painful was the use of polish variable names
throughout the programs ... nobody of us knew Polish, only one of them knew
German, and one knew English :-(
but it was a very nice experience, great fun, and we stayed friends 
until today


Kind regards

Bernd

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

Re: DFSMShsm high CPU consumption [EXTERNAL]

[Feller, Paul]

I don't recall how you set it up in HSM, but one thing to look at is how many 
tasks we are running at one time.  As an example you can have several tasks 
running to do migrations during primary space management.  So you could look at 
the possibility of reducing the number of tasks running during primary space 
management.


Thanks..

Paul Feller
AGT Mainframe Technical Support

-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
Arye Shemer
Sent: Monday, April 27, 2020 6:27 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: DFSMShsm high CPU consumption [EXTERNAL]

Hello forumers,
IHAC complaining about high CPU consumption by DFSMShsm.
Customer has no HSM experts and saying that while running HSM backups, Recycle, 
and several other HSM activities the CPU consumption rising to 100%.
This high CPU consumption interfere with other higher importance online jobs 
and cause timeouts.
Customer is willing to let the HSM activities (backups and maintenance) take 
longer in order to reduce the CPU consumption.
Which HSM parameters we should investigate in order to achieve this goal.
I assume that WLM is also need to be looked at to reduce the priority of the 
HSM tasks.
 Your  directions and sharing your experience  would be in great help, Thank 
you, Arye Shemer.

--
For IBM-MAIN subscribe / signoff / archive access instructions, send email to 
lists...@listserv.ua.edu with the message: INFO IBM-MAIN

--
Please note:  This message originated outside your organization. Please use 
caution when opening links or attachments.

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

Re: C

[Paul Gilmartin]

On Mon, 27 Apr 2020 15:06:03 +1000, Wayne Bickerdike wrote:
>
>I had neither mainframe COBOL nor SPPS skills but I'd written a whole bunch
>of Microfocus COBOL on CP/M micros.
>
>I convinced them that I could do mainframe COBOL, which wasn't that
>difficult. When I looked at the SPPS code, it was macro Assembler, so that
>was the start of a short time with same.
>
My one foray into COBOL occurred when I worked for a small consulting
firm.  Warm body with no COBOL skill.  I developed a small COBOL
program timesharing to DECSystem-10.

My co-worker carried it to client's IBM 360.

Failed.

Using AFTER ADVANCING construct in IBM COBOL clobbers the first
character of my data record.  Who woulda thunk it?

DEC COBOL, more wisely IMO, prefixes the intact record with LF, FF,
whatever carriage motion command(s).  Better design; standard be
damned!

-- gil

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

Re: Friday OT, cheerful program for gloomy times

[Paul Gilmartin]

On 2020-04-27, at 04:57:13, Seymour J Metz wrote:
> 
> Is there a statement of direction for using ETOD for all timestamping?
>  
I hope not.

I once went to SR because the timestamps in IEBCOPY SYSPRINT were
about 20 seconds ahead of those in job log.  Suggested I suspected
a leap second problem.

Level 1> Whatsa Leap Second?

gil> [lotsa URLs; GIYF]

Level 1> Wow! Thanks!

They fixed it; closure text said they switched to TIME macro --
much better idea than RYO from ETOD, CVTLSO, CVTLDTO, ...


> On 2020-04-27, at 03:41:14, ITschak Mugzach wrote:
> 
> צ
> 
> בתאריך יום ב׳, 27 באפר׳ 2020, 12:38, מאת David Crayford ...
>   
Year 5800/Y6K problem?

-- gil

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

Re: Cobol

[Phil Smith III]

John McKown wrote:
>I always thought it was named "C" because that would have been the grade a
>student would have gotten if he/she had designed it in a modern computer
>science class.

I've said for years that even a C++ is just a B-minus.

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

Latest COBOL standard is 2014 was Re: Cobol

[Clark Morris]

[Default] On 27 Apr 2020 00:29:21 -0700, in bit.listserv.ibm-main
dcrayf...@gmail.com (David Crayford) wrote:

>Define modern? A language is only as modern as its last standard (or 
>version). For example, Python is considered a modern language although 
>it's 30 years old. It's constantly
>being updated. Python 3.6 supports static type checking! JavaScript is 
>the same. C++20 is being ratified, C2x is being worked on. Java 13 is 
>going to GA on z/OS this year!
>
>It's my understanding that COBOL-85 is the current standard in use on 
>z/OS? That's probably indicative of COBOL programmers not requiring new 
>language features as they don't
>need them to maintain the code bases that they work on. COBOL 
>modernization on z/OS has mostly been back-end optimizer work which is 
>probably a lot more valuable to z/OS
>IT managers then new language features that won't be used. If companies 
>want to modernize a COBOL application they integrate with Java like CICS 
>and IMS.

The latest COBOL standard is 2014 with 2002 and 1989 extensions being
predecessors.  The 2014 standard supports IEEE binary floating point
plus IEEE decimal floating point with all of the rounding options
including round to nearest even.  There also are true binary usages
including binary character and USAGE BIT along with boolean
operations.  There is everything needed to fully work with SMf 30
records without weird coding.  It would allow a relatively straight
forward conversion of Assembler DSECTS to COBOL.  Because it has
language to support all of the IEEE fixed and floating point binary
usages, IEEE and hex floating point could co-exist in the same
program.  I wanted USAGE BIT 50 years ago because I was dealing with
bit switches on customer, product and open account files.

Clark Morris  
>
>REXX hasn't changed in almost 30 years. There's been a few updates to 
>TSO REXX such as EXECIO VBS support but that's about all.
>
>On 2020-04-25 7:03 AM, Wayne Bickerdike wrote:
>> One of our guys was talking about modern languages such as C. I said what?
>>
>> On Sat, Apr 25, 2020 at 7:01 AM Seymour J Metz  wrote:
>>
>>> Well what do you know? The emperor has no clothes. We shot an innocent
>>> language.
>>>
>>>
>>> --
>>> Shmuel (Seymour J.) Metz
>>> http://mason.gmu.edu/~smetz3
>>>
>>> 
>>> From: IBM Mainframe Discussion List [IBM-MAIN@LISTSERV.UA.EDU] on behalf
>>> of Paul Gilmartin [000433f07816-dmarc-requ...@listserv.ua.edu]
>>> Sent: Friday, April 24, 2020 3:58 PM
>>> To: IBM-MAIN@LISTSERV.UA.EDU
>>> Subject: Re: Cobol
>>>
>>> On Fri, 24 Apr 2020 18:26:49 +, Seymour J Metz wrote:
>>>
 There are blurbs for dozens of articles; which one is relevant? I tried
>>> searxhing for COBOL, but got 0 hits.
>>> I suspect that was OP's desperate and futile attempt to circumvent
>>> secureweb,
>>> as you often do.  But, I hope (posting from web interface):
>>>
>>> https://secure-web.cisco.com/18wMr2wQiot_mC2NJkJL7buWujrBfP9suLfEWZL4dG8gjB_Zjaj31ZgILnrnn--CfD_RooCYfsFjxvxArhRiN2V2tCmTfs8NayUQCV2ProhQ0KfRlDMDZdg2alKOSjuWwTXeK_Lci9elkht49bjva6Fj7o1W1SIr2REv9PF2NO_PK0BStoe0irBBLJRM9a_tKg3QNHj3DghbIM6_s_J2QBa8K1XWudsYnadGx1bdpDNNTapriOq_jLHjoC742AxmqQVAJ4Szwl0aLrINIHWnzPzP_p0N_kYOi4keUEoOLuWRccU_ZVES-3NC05VlKLovPbiDfx9BUbsi3Kn4nGo1sHGipsJJfPFN4ClnEGuuMjWs6LU9f2293Fm0jTt3GhayZHNNDR8prcppx857Qz_vQpR6HOUIxm-p1DAvFYE8aFU_B3Da9y60snIIWQxr9qfkI67XWmwAvbGdgFfA9cP_uBHV85oupnnYfOSco5uQPIVE/https%3A%2F%2Fwww.wired.com%2Fstory%2Fcant-file-unemployment-dont-blame-cobol%2F
>>>
>>> 
>>> From: scott Ford
>>> Sent: Friday, April 24, 2020 2:08 PM
>>>
>>> See this url ...
>>>
>>>
>>> http://secure-web.cisco.com/1DYCAeckpzqV94PQWw8dHuuJalhW0eVroAe-0-S4pJl_FnqGfZxS4EcWK7cCAl1oA09gJJKNMcHC1Be4KK3D-KcMIEVRVBeNOw5sf7565Z6e9CTYIm43a-oit3GGWnum7LgBTpYCxV6CAhgR9TuXipYHaUjUUPtd7BICMs1zfFGQQ8NhAeXHdXvHPrGdxzaQmTRfNi8vGWGKk4fg_G75au8H3Ja9AbLwRb2m8-upI9jYdmy1ZYdzYlRF2kzlwN155wAFEug02LCkZ5Bpk3IvSuxwzwd1UUyk_5NUmIqwMFmcDxZ8SpSnwFspncJTV1bLmByZAIVczBfj-JctXDA5Ta99YBqxx1tBpdl0qN5MWPGsz1CGAQ_Is1sLoRxy9Dl_fCLgMhLDvO5L8-EsVff2IiswF1xKvwUDiAEPcV0mOxz5c915mExQuVbCTDL0KTJQEtCF5dYTiss8HJIK_dzSG8g/http%3A%2F%2Fwww.wired.com.
>>>Can't File for Unemployment - Don?t Blame Cobol
>>>
>>> -- gil
>>>
>>> --
>>> For IBM-MAIN subscribe / signoff / archive access instructions,
>>> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>>>
>>>
>>> --
>>> For IBM-MAIN subscribe / signoff / archive access instructions,
>>> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>>>
>>
>
>--
>For IBM-MAIN subscribe / signoff / archive access instructions,
>send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

--

Re: Request: Examples of an IPCS RUNARRAY command where the EXEC clause display storage using a pointer as a displacement off of X

[Binyamin Dissen]

Unrelated.

Can you provide a working example?

On Sun, 26 Apr 2020 21:19:12 + Seymour J Metz  wrote:

:>Is it failing even when everything is in the same address space?

:>Shmuel (Seymour J.) Metz
:>http://mason.gmu.edu/~smetz3

:>From: IBM Mainframe Discussion List [IBM-MAIN@LISTSERV.UA.EDU] on behalf of 
Binyamin Dissen [bdis...@dissensoftware.com]
:>Sent: Sunday, April 26, 2020 9:59 AM
:>To: IBM-MAIN@LISTSERV.UA.EDU
:>Subject: Request: Examples of an IPCS RUNARRAY command where the EXEC clause 
display storage using a pointer as a displacement off of X
:>
:>I would like to see an examples of an IPCS RUNARRAY command where the EXEC
:>clause display storage using a pointer as a displacement off of X.
:>
:>So far I have not been able to make it work.

--
Binyamin Dissen 
http://www.dissensoftware.com

Director, Dissen Software, Bar & Grill - Israel


Should you use the mailblocks package and expect a response from me,
you should preauthorize the dissensoftware.com domain.

I very rarely bother responding to challenge/response systems,
especially those from irresponsible companies.

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

Re: XL C\C ++ sizeof of datatypes

[Bernd Oppolzer]

Am 27.04.2020 um 13:46 schrieb Seymour J Metz:

But can you use a character as an initial or limit value in a DO? That's 
possible in some other languages.


yes:

for ch := 'A' to 'Z' do
   writeln ('character with ord = ', ord (ch), ' appeared ', howoften 
[ch]);


I did not use this in the example below, because I wanted to cover the 
complete range of char

and both CHR (0) and CHR (255) are not printable characters.

The coding above is not really portable, because in ASCII there are 26 
chars between 'A' and 'Z',

but in EBCDIC, there are more :-)

BTW: I extended Stanford Pascal long ago to support hexadecimal 
notation, so I could code

my original example as:

for ch := X'00' to X'FF' do
   writeln ('character with ord = ', ord (ch), ' appeared ', howoften 
[ch]);


without the need for the conversion functions.

There again, I had to take care of the incompatibiliy between char and 
integer types:


X'FF' is a char hexadezimal constant
0xFF is an integer hexadezimal constant

http://bernd-oppolzer.de/job9i029.htm

Kind regards

Bernd



--
Shmuel (Seymour J.) Metz
http://mason.gmu.edu/~smetz3


From: IBM Mainframe Discussion List [IBM-MAIN@LISTSERV.UA.EDU] on behalf of 
Bernd Oppolzer [bernd.oppol...@t-online.de]
Sent: Monday, April 27, 2020 3:45 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: XL C\C ++ sizeof of datatypes

Am 27.04.2020 um 05:56 schrieb Paul Gilmartin:

On Mon, 27 Apr 2020 04:23:49 +0200, Bernd Oppolzer wrote:


On the other hand, Pascal supports ANY standard or scalar or subrange
type as index type
for arrays, for example:

var howoften : array [char] of integer ;
 ch: char;
...
read (ch);
howoften [ch] := howoften [ch]  + 1;

the array howoften is used to count the occurence of chars in an input
file, for example.


But can you use a char as a control variable of DO to
step through the howoften array?

yes:

for ch := chr (0) to chr (255) do
 writeln ('character with ord = ', ord (ch), ' appeared ', howoften
[ch]);

I used ord here because not all chars are printable ...

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

--

Oppolzer-Informatik
Dipl. Inf. Bernd Oppolzer
Bärenhofstraße 23
70771 Leinfelden-Echterdingen
—
Tel.: +49 711 7949591
priv.: +49 711 7949590
mobil: +49 151 75005359
eMail: bernd.oppol...@t-online.de 
Web: http://bernd-oppolzer.de/job.htm
—
Für Umsatzsteuerzwecke:
SteuerNr.: 97 076 / 29921
USt-ID-Nr.: DE 147 700 393
—
Oppolzer-Informatik 1983 - 2019
36years of experience in computer science**




--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

LzLabs

[Peter Baumann]

Hi there
Any news on LzLabs mainframe emulation company. I heard they are having big 
layoff.
Peter B

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

Re: DFSMShsm high CPU consumption

[Mike Schwab]

Check your compression settings.
https://www.ibm.com/developerworks/community/blogs/e0c474f8-3aad-4f01-8bca-f2c12b576ac9/entry/November_20_2015_at_9_30_21_AM?lang=en

On Mon, Apr 27, 2020 at 11:27 AM Arye Shemer  wrote:
>
> Hello forumers,
> IHAC complaining about high CPU consumption by DFSMShsm.
> Customer has no HSM experts and saying that while running HSM backups,
> Recycle, and several other HSM activities the CPU consumption rising to
> 100%.
> This high CPU consumption interfere with other higher importance online
> jobs and cause timeouts.
> Customer is willing to let the HSM activities (backups and maintenance)
> take longer in order to reduce the CPU consumption.
> Which HSM parameters we should investigate in order to achieve this goal.
> I assume that WLM is also need to be looked at to reduce the priority of
> the HSM tasks.
>  Your  directions and sharing your experience  would be in great help,
> Thank you,
> Arye Shemer.
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN



-- 
Mike A Schwab, Springfield IL USA
Where do Forest Rangers go to get away from it all?

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

Re: XL C\C ++ sizeof of datatypes

[Seymour J Metz]

But can you use a character as an initial or limit value in a DO? That's 
possible in some other languages.


--
Shmuel (Seymour J.) Metz
http://mason.gmu.edu/~smetz3


From: IBM Mainframe Discussion List [IBM-MAIN@LISTSERV.UA.EDU] on behalf of 
Bernd Oppolzer [bernd.oppol...@t-online.de]
Sent: Monday, April 27, 2020 3:45 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: XL C\C ++ sizeof of datatypes

Am 27.04.2020 um 05:56 schrieb Paul Gilmartin:
> On Mon, 27 Apr 2020 04:23:49 +0200, Bernd Oppolzer wrote:
>
>> On the other hand, Pascal supports ANY standard or scalar or subrange
>> type as index type
>> for arrays, for example:
>>
>> var howoften : array [char] of integer ;
>> ch: char;
>> ...
>> read (ch);
>> howoften [ch] := howoften [ch]  + 1;
>>
>> the array howoften is used to count the occurence of chars in an input
>> file, for example.
>>
> But can you use a char as a control variable of DO to
> step through the howoften array?

yes:

for ch := chr (0) to chr (255) do
writeln ('character with ord = ', ord (ch), ' appeared ', howoften
[ch]);

I used ord here because not all chars are printable ...

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

Re: C

[Seymour J Metz]

> The assembler was SPPS. 

I should have had some coffee before responding!


--
Shmuel (Seymour J.) Metz
http://mason.gmu.edu/~smetz3


From: IBM Mainframe Discussion List [IBM-MAIN@LISTSERV.UA.EDU] on behalf of 
Wayne Bickerdike [wayn...@gmail.com]
Sent: Monday, April 27, 2020 1:06 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: C

Seymour,

The assembler was SPPS. Too close to the stats package name SPSS.

I was working at a DOS/VSE shop in England in 1983 and they had COBOL and
SPPS on their IBM cash registers.

I had neither mainframe COBOL nor SPPS skills but I'd written a whole bunch
of Microfocus COBOL on CP/M micros.

I convinced them that I could do mainframe COBOL, which wasn't that
difficult. When I looked at the SPPS code, it was macro Assembler, so that
was the start of a short time with same.

A few years later I found myself in Melbourne, Australia working for a
department store. They also had 3651 store controllers and 36.. POS
terminals (point of sale LOL).
The 3651 implemented a local area network before I'd seen what we know now
as LAN. Connected to a FEP, it was quite smart in its day. The PC killed
off this technology and within a few years most of this type of kit was on
the scrap heap.




On Mon, Apr 27, 2020 at 6:46 AM Seymour J Metz  wrote:

> > I thought the macros were part of CONCEPT 14?
>
> CONCEPT 14 
> (http://secure-web.cisco.com/1CHCEBy2ejyI8mo7e2XHtiMOF1hORd47Tu8xQPk_d4Xgyov2qzGyO4bvyX6uBHWPtVYnEI-un5lRLC1OSI6BMpiDcZWlS6cj5B4UyCSSswWuH6sOASr_Ki8G6fkIuxV8I5QdL9lZ-uSpzRDHW9I1AcJX3VeC60CgREV8KXC7UFn8_ugREkMgOK6l45j1SaWy9TMthbXpJ51jFfZI7npqfspDVJ6ipuZaJuV578rhbS0mj84ZyXQ7IArSTw7lnqtZrgAHsU1GVU5deLYp3ny9CDKLI4_uelb1kX1cdlegdqtx587ECKDN4wYNG3NHWWcIWOyeZ5xnutmZslhjrZPz-oJAn1a9eJ1wbwHkKmb1G4kFZ_7FiSRJPDrWaTb1M47y5W0lxEo_0uCoqZa_cm4ILFOw999NZcih4tfPMqbptYXlhwJkjKvE4yNmvIomo0hH8/http%3A%2F%2Fskycoast.us%2Fpscott%2Fsoftware%2Fmvs%2Fc14%2Fc14-.html%29
> could be what I was thinking of.  It's the basis for the macro package in
> the HLASM Toolkit.
>
> The macro package I actually used was called PROC.
>
> > http://secure-web.cisco.com/1-yqatGSqBMWY1MHlNnXHG6lxyioYHhuIzHSdmALEoj0jpwC66v5WGXmQoGF2NV_HKCT12H0IjBUIzSkTSRznuqQg1W9vCoIYmLycWibH6-Fk0Md4F4mtZGtxnIDPDTlK6hK9EaO5nFoJ2WkeqaZ_msUWN9A9m4RS8UShLYQehrWaSk521LcGRAwUW_mx0rRbYu8KkLSR8qfRunHQ8SQg8TGWRc9zaH79DKwqyNziqH4N9UgRnLVJbt4UE9n9sx9fyaVH_VBx0wqoj4e54IzKiESA4iBXTBr7Z3z1AfA-4Ak8LDa6O4GjN29aNLF0h0m-yKd7HGFWxHpHIFlIpq-Q3NBV5pP7IL1B1MWRXkb7ImdSmZoG2bmWS4bLvZmSowBPieqaLG4MOrAHcoK-mZcxzvtY-AofOj5hn4wllcwHuZQSPw25uB0bk0nFUcVRqNDR/http%3A%2F%2Fskycoast.us%2Fpscott%2Fsoftware%2Fmvs%2Fc14%2Fc14-.html
>
> The only SPSS I ever heard of was Statistical Package for the Social
> Sciences, and it didn't look like assembler.
>
>
> --
> Shmuel (Seymour J.) Metz
> http://mason.gmu.edu/~smetz3
>
> 
> From: IBM Mainframe Discussion List [IBM-MAIN@LISTSERV.UA.EDU] on behalf
> of Wayne Bickerdike [wayn...@gmail.com]
> Sent: Sunday, April 26, 2020 4:01 PM
> To: IBM-MAIN@LISTSERV.UA.EDU
> Subject: Re: C
>
> I thought the macros were part of CONCEPT 14? I do remember working on IBM
> 3684 point of sale systems between 1982 and 1986. They were programmed
> using an Asembler like language called SPSS II, it had IF THEN ELSE and
> other macros.
>
> On Mon, Apr 27, 2020, 03:36 Seymour J Metz  wrote:
>
> > Those macros were not part of the assembler. As I recall there was a
> > popular macro package called CONCEPT 101 (sp?) floating around, and
> another
> > package called PROC, but they didn't come from IBM.
> >
> >
> > --
> > Shmuel (Seymour J.) Metz
> > http://mason.gmu.edu/~smetz3
> >
> > 
> > From: IBM Mainframe Discussion List [IBM-MAIN@LISTSERV.UA.EDU] on behalf
> > of Mike Schwab [mike.a.sch...@gmail.com]
> > Sent: Sunday, April 26, 2020 1:25 PM
> > To: IBM-MAIN@LISTSERV.UA.EDU
> > Subject: Re: C
> >
> > I was doing an internship in the Chicago area during the summer of
> > 1984.  They were using an assembler with IF macros.
> >
> > On Sun, Apr 26, 2020 at 2:11 PM Seymour J Metz  wrote:
> > >
> > > HLASM in 1980? Not before June 1992. I assume that you were using XF
> and
> > H, possibly with the SLAC mods on the latter (thank you, Greg and John.)
> > >
> > >
> > > --
> > > Shmuel (Seymour J.) Metz
> > > http://mason.gmu.edu/~smetz3
> > >
> > > 
> > > From: IBM Mainframe Discussion List [IBM-MAIN@LISTSERV.UA.EDU] on
> > behalf of Donald Blake [dhbl...@gmail.com]
> > > Sent: Sunday, April 26, 2020 8:51 AM
> > > To: IBM-MAIN@LISTSERV.UA.EDU
> > > Subject: C
> > >
> > > I took my first C course in 1980. The text was the original *The C
> > > programming Language* by Kerrigan and Richie, which I still have on my
> > > shelf, The text is copyright 1978. That's 42 years ago. I was an IBM HL
> > > Assembler programmer at the time. BTW ... we still were using IFOX00 at
> > the
> > > time as well.
>

Re: Friday OT, cheerful program for gloomy times

[Robert Prins]

On 2020-04-24 06:01, CM Poncelet wrote:

I attach a Rexx program to calculate and display the biorhythm values
for a given date of birth and current or whatever other date.


And if you want to see some niche graphs, try "ecalc biog(dd.mm.)", where 
ecalc can be found (for now) @ 


Also contains a few other more-or-lesser useful conversions, "ecalc ?" will 
display some help.


Robert
--
Robert AH Prins
robert.ah.prins(a)gmail.com
The hitchhiking grandfather - https://prino.neocities.org/indez.html
Some REXX code for use on z/OS - https://prino.neocities.org/zOS/zOS-Tools.html

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

z/OS V2.4 problem

[Dave Jousma]

All,

Just a heads up.   I wasn’t aware that we had any old programs left in 
production using the ISAM Interface (surprise), but there is currently an open 
APAR against it due to IBM internal compiler issue.  We only upgraded half of 
our prod lpars, so we have a workaround.   The IBM module lives in LPA.  Not 
sure when the fixing PTF comes out, if there will be a dynamic activation 
option or if I’ll be forced to re-ipl the affected systems.

APAR Identifier .. OA59229  Last Changed  20/04/16
  ABEND0C1 IN IDAIIPM3 WHEN TRYING TO READ/WRITE USING THE ISAM
  INTERFACE  20/04/16 PTF PECHANGE

  Symptom .. AB ABEND0C1  Status ... CLOSED  PER
  Severity ... 3  Date Closed . 20/04/16
  Component .. 5695DF106  Duplicate of 
  Reported Release . 240  Fixed Release  999
  Component Name DFSMS VSAM   Special NoticePE
  Current Target Date ..20/05/15  Flags
  SCP ...
  Platform 

  Status Detail: ANALYSIS - APAR is being investigated or debugged.

  PE PTF List:UJ02054

  PTF List:
  Release 240   : UJ02664 not available yet

 
  Parent APAR:
  Child APAR list:

 
  ERROR DESCRIPTION:
  ABEND0C1 in IDAIIPM3+08 when trying to READ/WRITE using the
  indexed sequential access method (ISAM)

  KNOWN IMPACT:
  READ/WRITE macros don't work for ISAM in 2.4

  PE Information:
  The original APAR (OA58976) and associated PTF (UJ02054) to
  address the ABEND0C1 in IDAIIPM3+08 did not correct that issue

 
  LOCAL FIX:

 
  PROBLEM SUMMARY:
  
  * USERS AFFECTED:  *
  * All VSAM users of the ISAM interface who use BISAM macros at *
  * z/OS 2.4.*
  
  * PROBLEM DESCRIPTION: *
  * ABEND0C1 because of a bad address for the READ and WRITE *
  * macros in the DCB.   *
  
  * RECOMMENDATION:  *
  * Apply PTF.   *
  
  A change in the compiler level changed the offsets of the entry
  points for READ and WRITE causing an ABEND0C1 due to a bad
  branch.

 
  PROBLEM CONCLUSION:
  The compiler level has been changed back.

 
  TEMPORARY FIX:

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

DFSMShsm high CPU consumption

[Arye Shemer]

Hello forumers,
IHAC complaining about high CPU consumption by DFSMShsm.
Customer has no HSM experts and saying that while running HSM backups,
Recycle, and several other HSM activities the CPU consumption rising to
100%.
This high CPU consumption interfere with other higher importance online
jobs and cause timeouts.
Customer is willing to let the HSM activities (backups and maintenance)
take longer in order to reduce the CPU consumption.
Which HSM parameters we should investigate in order to achieve this goal.
I assume that WLM is also need to be looked at to reduce the priority of
the HSM tasks.
 Your  directions and sharing your experience  would be in great help,
Thank you,
Arye Shemer.

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

Re: Cobol

[Seymour J Metz]

It's true that ANSI hasn't issued a Rexx standard since 1996 and never ratified 
the 1998 draft standard for Extended Rexx, but there have been de facto changes 
in oorexx. Alas, that did not included picking up all of the 1996 enhancements 
from ANSI..


--
Shmuel (Seymour J.) Metz
http://mason.gmu.edu/~smetz3


From: IBM Mainframe Discussion List [IBM-MAIN@LISTSERV.UA.EDU] on behalf of 
David Crayford [dcrayf...@gmail.com]
Sent: Monday, April 27, 2020 3:29 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Cobol

Define modern? A language is only as modern as its last standard (or
version). For example, Python is considered a modern language although
it's 30 years old. It's constantly
being updated. Python 3.6 supports static type checking! JavaScript is
the same. C++20 is being ratified, C2x is being worked on. Java 13 is
going to GA on z/OS this year!

It's my understanding that COBOL-85 is the current standard in use on
z/OS? That's probably indicative of COBOL programmers not requiring new
language features as they don't
need them to maintain the code bases that they work on. COBOL
modernization on z/OS has mostly been back-end optimizer work which is
probably a lot more valuable to z/OS
IT managers then new language features that won't be used. If companies
want to modernize a COBOL application they integrate with Java like CICS
and IMS.

REXX hasn't changed in almost 30 years. There's been a few updates to
TSO REXX such as EXECIO VBS support but that's about all.

On 2020-04-25 7:03 AM, Wayne Bickerdike wrote:
> One of our guys was talking about modern languages such as C. I said what?
>
> On Sat, Apr 25, 2020 at 7:01 AM Seymour J Metz  wrote:
>
>> Well what do you know? The emperor has no clothes. We shot an innocent
>> language.
>>
>>
>> --
>> Shmuel (Seymour J.) Metz
>> http://mason.gmu.edu/~smetz3
>>
>> 
>> From: IBM Mainframe Discussion List [IBM-MAIN@LISTSERV.UA.EDU] on behalf
>> of Paul Gilmartin [000433f07816-dmarc-requ...@listserv.ua.edu]
>> Sent: Friday, April 24, 2020 3:58 PM
>> To: IBM-MAIN@LISTSERV.UA.EDU
>> Subject: Re: Cobol
>>
>> On Fri, 24 Apr 2020 18:26:49 +, Seymour J Metz wrote:
>>
>>> There are blurbs for dozens of articles; which one is relevant? I tried
>> searxhing for COBOL, but got 0 hits.
>> I suspect that was OP's desperate and futile attempt to circumvent
>> secureweb,
>> as you often do.  But, I hope (posting from web interface):
>>
>> https://secure-web.cisco.com/18wMr2wQiot_mC2NJkJL7buWujrBfP9suLfEWZL4dG8gjB_Zjaj31ZgILnrnn--CfD_RooCYfsFjxvxArhRiN2V2tCmTfs8NayUQCV2ProhQ0KfRlDMDZdg2alKOSjuWwTXeK_Lci9elkht49bjva6Fj7o1W1SIr2REv9PF2NO_PK0BStoe0irBBLJRM9a_tKg3QNHj3DghbIM6_s_J2QBa8K1XWudsYnadGx1bdpDNNTapriOq_jLHjoC742AxmqQVAJ4Szwl0aLrINIHWnzPzP_p0N_kYOi4keUEoOLuWRccU_ZVES-3NC05VlKLovPbiDfx9BUbsi3Kn4nGo1sHGipsJJfPFN4ClnEGuuMjWs6LU9f2293Fm0jTt3GhayZHNNDR8prcppx857Qz_vQpR6HOUIxm-p1DAvFYE8aFU_B3Da9y60snIIWQxr9qfkI67XWmwAvbGdgFfA9cP_uBHV85oupnnYfOSco5uQPIVE/https%3A%2F%2Fwww.wired.com%2Fstory%2Fcant-file-unemployment-dont-blame-cobol%2F
>>
>> 
>> From: scott Ford
>> Sent: Friday, April 24, 2020 2:08 PM
>>
>> See this url ...
>>
>>
>> http://secure-web.cisco.com/1DYCAeckpzqV94PQWw8dHuuJalhW0eVroAe-0-S4pJl_FnqGfZxS4EcWK7cCAl1oA09gJJKNMcHC1Be4KK3D-KcMIEVRVBeNOw5sf7565Z6e9CTYIm43a-oit3GGWnum7LgBTpYCxV6CAhgR9TuXipYHaUjUUPtd7BICMs1zfFGQQ8NhAeXHdXvHPrGdxzaQmTRfNi8vGWGKk4fg_G75au8H3Ja9AbLwRb2m8-upI9jYdmy1ZYdzYlRF2kzlwN155wAFEug02LCkZ5Bpk3IvSuxwzwd1UUyk_5NUmIqwMFmcDxZ8SpSnwFspncJTV1bLmByZAIVczBfj-JctXDA5Ta99YBqxx1tBpdl0qN5MWPGsz1CGAQ_Is1sLoRxy9Dl_fCLgMhLDvO5L8-EsVff2IiswF1xKvwUDiAEPcV0mOxz5c915mExQuVbCTDL0KTJQEtCF5dYTiss8HJIK_dzSG8g/http%3A%2F%2Fwww.wired.com.
>>Can't File for Unemployment - Don�t Blame Cobol
>>
>> -- gil
>>
>> --
>> For IBM-MAIN subscribe / signoff / archive access instructions,
>> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>>
>>
>> --
>> For IBM-MAIN subscribe / signoff / archive access instructions,
>> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>>
>

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

Re: COBOL and C

[Seymour J Metz]

> And CPL before that (born in 1963). Yes, COBOL has roots in FLOW-MATIC
(mostly, with a light dusting of COM-TRAN),

"FACT is fiction"? (Honeywell)

Did the CODASYL SRC committee get anything from 9PAC? JOVIAL?


--
Shmuel (Seymour J.) Metz
http://mason.gmu.edu/~smetz3


From: IBM Mainframe Discussion List [IBM-MAIN@LISTSERV.UA.EDU] on behalf of 
Timothy Sipples [sipp...@sg.ibm.com]
Sent: Monday, April 27, 2020 4:00 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: COBOL and C

Charles Mills wrote:
>Funny, isn’t it?
>COBOL (née 1959) is  61 years old. It’s a very old language.
>C (née 1972) is 48 years old. It’s a modern language.

These dates aren't actually comparable. In 1959 the Short Range Committee
first met -- on May 28 and 29, 1959, at the Pentagon -- and did a lot of
work over the next few months. However, the COBOL specifications weren't
formally approved until January 8, 1960 (with GPO printing thereafter).
There was never any "COBOL 59." The first COBOL was "COBOL 60." And it
wasn't until August 17, 1960, that the first COBOL program ran (on a RCA
501).(*) In other words, 1959 is the "some people got together and came up
with an idea for a new programming language" date, analogous to
celebrating your birthday on the date when your parents first met.

For sure the first C program ran at least as early as 1972, probably in
1971, and perhaps even earlier. Version 2 Unix was released on June 12,
1972, and included a C compiler. Or, in other words, 1972 is when the
first C compiler shipped outside Bell Labs. That's quite a different
historical event, not directly comparable to committee meetings.

Then there are the complexities associated with the fact that C comes
after B, and there was a B programming language -- and BCPL before that.
And CPL before that (born in 1963). Yes, COBOL has roots in FLOW-MATIC
(mostly, with a light dusting of COM-TRAN), but...it's complicated. And
surely we shouldn't be hanging our hat on somebody deciding in circa 1971
to advance to the next letter of the alphabet in what others might have
called "B '72"?

Anyway, if somebody wants to claim that a time difference is meaningful,
isn't it important at least to get the birth dates right?

(*) And the compilers remained practically unusable for a couple years
thereafter.

- - - - - - - - - -
Timothy Sipples
I.T. Architect Executive
Digital Asset & Other Industry Solutions
IBM Z & LinuxONE
- - - - - - - - - -
E-Mail: sipp...@sg.ibm.com



--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

Re: Read BookManager/READ files

[Seymour J Metz]

I use the OS/2 Library Reader and it works just fine for old manuals. What 
current documentation does IBM have in BOO format.


--
Shmuel (Seymour J.) Metz
http://mason.gmu.edu/~smetz3


From: IBM Mainframe Discussion List [IBM-MAIN@LISTSERV.UA.EDU] on behalf of 
Juergen Kehr [kehrjuer...@t-online.de]
Sent: Monday, April 27, 2020 5:14 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Read BookManager/READ files

Hello,

where just in the process to migrate our z/OS systems to V2.4. As you know, on 
z/OS V2.4 BookManager/READ isn't available anymore. But unfortunately some 
developers come up with a requirement to read some very old homegrown 
documentation files (.BOO files). So my question is, are there any free tools 
available to read and/or convert these files to PDF or HTML?

Thanks in advance for any help.

Kind regards
Juergen

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

Re: Friday OT, cheerful program for gloomy times

[Seymour J Metz]

Is there a statement of direction for using ETOD for all timestamping?


--
Shmuel (Seymour J.) Metz
http://mason.gmu.edu/~smetz3


From: IBM Mainframe Discussion List [IBM-MAIN@LISTSERV.UA.EDU] on behalf of 
David Crayford [dcrayf...@gmail.com]
Sent: Monday, April 27, 2020 5:37 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Friday OT, cheerful program for gloomy times

On 2020-04-27 5:18 PM, Ray Pearce wrote:
> Will there be a Y2.1K bug?

I don't know but we've got much bigger problems to solve before then
when the TOD clocks start wrapping :).

Hopefully, I will be retired by then.

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

Re: Friday OT, cheerful program for gloomy times

[David Crayford]

I'll be 71 so I may come out of retirement to earn a few extra quid to 
bump up my pension!


On 2020-04-27 6:07 PM, Ray Pearce wrote:

I'm fairly certain I will retire at some point in the next 22 years.
Can't see me still working at age 87 ;)


-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of David Crayford
Sent: 27 April 2020 10:38
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Friday OT, cheerful program for gloomy times

On 2020-04-27 5:18 PM, Ray Pearce wrote:

Will there be a Y2.1K bug?

I don't know but we've got much bigger problems to solve before then
when the TOD clocks start wrapping :).

Hopefully, I will be retired by then.

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN



--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

Re: Friday OT, cheerful program for gloomy times

[Ray Pearce]

I'm fairly certain I will retire at some point in the next 22 years.
Can't see me still working at age 87 ;)


-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of David Crayford
Sent: 27 April 2020 10:38
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Friday OT, cheerful program for gloomy times

On 2020-04-27 5:18 PM, Ray Pearce wrote:
> Will there be a Y2.1K bug?

I don't know but we've got much bigger problems to solve before then 
when the TOD clocks start wrapping :).

Hopefully, I will be retired by then.

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

-- 
This e-mail message has been scanned and cleared by Google Message Security 
and the UNICOM Global security systems. This message is for the named 
person's use only. If you receive this message in error, please delete it 
and notify the sender. 

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

Re: Read BookManager/READ files

[R.S.]

W dniu 27.04.2020 o 11:14, Juergen Kehr pisze:

Hello,

where just in the process to migrate our z/OS systems to V2.4. As you know, on 
z/OS V2.4 BookManager/READ isn't available anymore. But unfortunately some 
developers come up with a requirement to read some very old homegrown 
documentation files (.BOO files). So my question is, are there any free tools 
available to read and/or convert these files to PDF or HTML?


BOO files can be still read using existing tools like IBM Softcopy 
Reader which works nicely under Win10 x64 and older Windows versions.
You can still use IBM Library Reader which is 16-bit application and 
will not work under 64-bit Windows, but you can run it under old Windows 
running under Virtual Box or other tool. Personally I prefer Library 
Reader, but it is simpler to use Softcopy Reader.
Note: both tools were available for download and IMHO you can still use 
it, even if IBM removed it from webpage. If you need a copy, just look 
for older documentation on DVD or CD.

I hope you don't want to use BOO files under z/OS. ;-)

--
Radoslaw Skorupka
Lodz, Poland





==

Jeśli nie jesteś adresatem tej wiadomości:

- powiadom nas o tym w mailu zwrotnym (dziękujemy!),
- usuń trwale tę wiadomość (i wszystkie kopie, które wydrukowałeś lub zapisałeś 
na dysku).
Wiadomość ta może zawierać chronione prawem informacje, które może wykorzystać 
tylko adresat.Przypominamy, że każdy, kto rozpowszechnia (kopiuje, rozprowadza) 
tę wiadomość lub podejmuje podobne działania, narusza prawo i może podlegać 
karze.

mBank S.A. z siedzibą w Warszawie, ul. Senatorska 18, 00-950 
Warszawa,www.mBank.pl, e-mail: kont...@mbank.pl. Sąd Rejonowy dla m. st. 
Warszawy XII Wydział Gospodarczy Krajowego Rejestru Sądowego, KRS 025237, 
NIP: 526-021-50-88. Kapitał zakładowy (opłacony w całości) według stanu na 
01.01.2020 r. wynosi 169.401.468 złotych.

If you are not the addressee of this message:

- let us know by replying to this e-mail (thank you!),
- delete this message permanently (including all the copies which you have 
printed out or saved).
This message may contain legally protected information, which may be used 
exclusively by the addressee.Please be reminded that anyone who disseminates 
(copies, distributes) this message or takes any similar action, violates the 
law and may be penalised.

mBank S.A. with its registered office in Warsaw, ul. Senatorska 18, 00-950 
Warszawa,www.mBank.pl, e-mail: kont...@mbank.pl. District Court for the Capital 
City of Warsaw, 12th Commercial Division of the National Court Register, KRS 
025237, NIP: 526-021-50-88. Fully paid-up share capital amounting to PLN 
169.401.468 as at 1 January 2020.

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

Re: Friday OT, cheerful program for gloomy times

[ITschak Mugzach]

צ

בתאריך יום ב׳, 27 באפר׳ 2020, 12:38, מאת David Crayford ‏<
dcrayf...@gmail.com>:

> On 2020-04-27 5:18 PM, Ray Pearce wrote:
> > Will there be a Y2.1K bug?
>
> I don't know but we've got much bigger problems to solve before then
> when the TOD clocks start wrapping :).
>
> Hopefully, I will be retired by then.
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

Re: Friday OT, cheerful program for gloomy times

[David Crayford]

On 2020-04-27 5:18 PM, Ray Pearce wrote:

Will there be a Y2.1K bug?


I don't know but we've got much bigger problems to solve before then 
when the TOD clocks start wrapping :).


Hopefully, I will be retired by then.

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

Re: Friday OT, cheerful program for gloomy times

[Ray Pearce]

I guess the code is assuming that the user isn't over 120 years old.

Will there be a Y2.1K bug?

Ray

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of David Crayford
Sent: 27 April 2020 10:01
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Friday OT, cheerful program for gloomy times

FYI, you have a bug with your leap year calculation. You need to check 
if the year is evenly dividable by 100 (which are not leap years unless 
evenly divisible by 400).

isleap: procedure
   arg year .
   return (year // 4 = 0 & year // 100 /= 0 ) | year // 400 = 0


-- 
This e-mail message has been scanned and cleared by Google Message Security 
and the UNICOM Global security systems. This message is for the named 
person's use only. If you receive this message in error, please delete it 
and notify the sender. 

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

Read BookManager/READ files

[Juergen Kehr]

Hello,

where just in the process to migrate our z/OS systems to V2.4. As you know, on 
z/OS V2.4 BookManager/READ isn't available anymore. But unfortunately some 
developers come up with a requirement to read some very old homegrown 
documentation files (.BOO files). So my question is, are there any free tools 
available to read and/or convert these files to PDF or HTML?

Thanks in advance for any help.

Kind regards
Juergen

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

Re: Friday OT, cheerful program for gloomy times

[David Crayford]

FYI, you have a bug with your leap year calculation. You need to check 
if the year is evenly dividable by 100 (which are not leap years unless 
evenly divisible by 400).


isleap: procedure
  arg year .
  return (year // 4 = 0 & year // 100 /= 0 ) | year // 400 = 0

On 2020-04-24 2:01 PM, CM Poncelet wrote:

I attach a Rexx program to calculate and display the biorhythm values
for a given date of birth and current or whatever other date.
  
If 'management' complains that home workers are not putting enough

effort into their working-from-home time, they can run this thing and
send its output to 'management' just to prove that they are in perfect
working condition and that any slow-down in productivity must be due to
external factors which are wholly beyond their control .
  
Cheers, Chris Poncelet (retired sysprog)


--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

Re: COBOL and C

[Timothy Sipples]

Charles Mills wrote:
>Funny, isn’t it?
>COBOL (née 1959) is  61 years old. It’s a very old language.
>C (née 1972) is 48 years old. It’s a modern language.

These dates aren't actually comparable. In 1959 the Short Range Committee 
first met -- on May 28 and 29, 1959, at the Pentagon -- and did a lot of 
work over the next few months. However, the COBOL specifications weren't 
formally approved until January 8, 1960 (with GPO printing thereafter). 
There was never any "COBOL 59." The first COBOL was "COBOL 60." And it 
wasn't until August 17, 1960, that the first COBOL program ran (on a RCA 
501).(*) In other words, 1959 is the "some people got together and came up 
with an idea for a new programming language" date, analogous to 
celebrating your birthday on the date when your parents first met.

For sure the first C program ran at least as early as 1972, probably in 
1971, and perhaps even earlier. Version 2 Unix was released on June 12, 
1972, and included a C compiler. Or, in other words, 1972 is when the 
first C compiler shipped outside Bell Labs. That's quite a different 
historical event, not directly comparable to committee meetings.

Then there are the complexities associated with the fact that C comes 
after B, and there was a B programming language -- and BCPL before that. 
And CPL before that (born in 1963). Yes, COBOL has roots in FLOW-MATIC 
(mostly, with a light dusting of COM-TRAN), but...it's complicated. And 
surely we shouldn't be hanging our hat on somebody deciding in circa 1971 
to advance to the next letter of the alphabet in what others might have 
called "B '72"?

Anyway, if somebody wants to claim that a time difference is meaningful, 
isn't it important at least to get the birth dates right?

(*) And the compilers remained practically unusable for a couple years 
thereafter.

- - - - - - - - - -
Timothy Sipples
I.T. Architect Executive
Digital Asset & Other Industry Solutions
IBM Z & LinuxONE
- - - - - - - - - -
E-Mail: sipp...@sg.ibm.com



--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

Re: XL C\C ++ sizeof of datatypes

[Bernd Oppolzer]

Am 27.04.2020 um 05:56 schrieb Paul Gilmartin:

On Mon, 27 Apr 2020 04:23:49 +0200, Bernd Oppolzer wrote:


On the other hand, Pascal supports ANY standard or scalar or subrange
type as index type
for arrays, for example:

var howoften : array [char] of integer ;
    ch: char;
...
read (ch);
howoften [ch] := howoften [ch]  + 1;

the array howoften is used to count the occurence of chars in an input
file, for example.


But can you use a char as a control variable of DO to
step through the howoften array?


yes:

for ch := chr (0) to chr (255) do
   writeln ('character with ord = ', ord (ch), ' appeared ', howoften 
[ch]);


I used ord here because not all chars are printable ...

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

Re: Cobol

[David Crayford]

Define modern? A language is only as modern as its last standard (or 
version). For example, Python is considered a modern language although 
it's 30 years old. It's constantly
being updated. Python 3.6 supports static type checking! JavaScript is 
the same. C++20 is being ratified, C2x is being worked on. Java 13 is 
going to GA on z/OS this year!


It's my understanding that COBOL-85 is the current standard in use on 
z/OS? That's probably indicative of COBOL programmers not requiring new 
language features as they don't
need them to maintain the code bases that they work on. COBOL 
modernization on z/OS has mostly been back-end optimizer work which is 
probably a lot more valuable to z/OS
IT managers then new language features that won't be used. If companies 
want to modernize a COBOL application they integrate with Java like CICS 
and IMS.


REXX hasn't changed in almost 30 years. There's been a few updates to 
TSO REXX such as EXECIO VBS support but that's about all.


On 2020-04-25 7:03 AM, Wayne Bickerdike wrote:

One of our guys was talking about modern languages such as C. I said what?

On Sat, Apr 25, 2020 at 7:01 AM Seymour J Metz  wrote:


Well what do you know? The emperor has no clothes. We shot an innocent
language.


--
Shmuel (Seymour J.) Metz
http://mason.gmu.edu/~smetz3


From: IBM Mainframe Discussion List [IBM-MAIN@LISTSERV.UA.EDU] on behalf
of Paul Gilmartin [000433f07816-dmarc-requ...@listserv.ua.edu]
Sent: Friday, April 24, 2020 3:58 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Cobol

On Fri, 24 Apr 2020 18:26:49 +, Seymour J Metz wrote:


There are blurbs for dozens of articles; which one is relevant? I tried

searxhing for COBOL, but got 0 hits.
I suspect that was OP's desperate and futile attempt to circumvent
secureweb,
as you often do.  But, I hope (posting from web interface):

https://secure-web.cisco.com/18wMr2wQiot_mC2NJkJL7buWujrBfP9suLfEWZL4dG8gjB_Zjaj31ZgILnrnn--CfD_RooCYfsFjxvxArhRiN2V2tCmTfs8NayUQCV2ProhQ0KfRlDMDZdg2alKOSjuWwTXeK_Lci9elkht49bjva6Fj7o1W1SIr2REv9PF2NO_PK0BStoe0irBBLJRM9a_tKg3QNHj3DghbIM6_s_J2QBa8K1XWudsYnadGx1bdpDNNTapriOq_jLHjoC742AxmqQVAJ4Szwl0aLrINIHWnzPzP_p0N_kYOi4keUEoOLuWRccU_ZVES-3NC05VlKLovPbiDfx9BUbsi3Kn4nGo1sHGipsJJfPFN4ClnEGuuMjWs6LU9f2293Fm0jTt3GhayZHNNDR8prcppx857Qz_vQpR6HOUIxm-p1DAvFYE8aFU_B3Da9y60snIIWQxr9qfkI67XWmwAvbGdgFfA9cP_uBHV85oupnnYfOSco5uQPIVE/https%3A%2F%2Fwww.wired.com%2Fstory%2Fcant-file-unemployment-dont-blame-cobol%2F


From: scott Ford
Sent: Friday, April 24, 2020 2:08 PM

See this url ...


http://secure-web.cisco.com/1DYCAeckpzqV94PQWw8dHuuJalhW0eVroAe-0-S4pJl_FnqGfZxS4EcWK7cCAl1oA09gJJKNMcHC1Be4KK3D-KcMIEVRVBeNOw5sf7565Z6e9CTYIm43a-oit3GGWnum7LgBTpYCxV6CAhgR9TuXipYHaUjUUPtd7BICMs1zfFGQQ8NhAeXHdXvHPrGdxzaQmTRfNi8vGWGKk4fg_G75au8H3Ja9AbLwRb2m8-upI9jYdmy1ZYdzYlRF2kzlwN155wAFEug02LCkZ5Bpk3IvSuxwzwd1UUyk_5NUmIqwMFmcDxZ8SpSnwFspncJTV1bLmByZAIVczBfj-JctXDA5Ta99YBqxx1tBpdl0qN5MWPGsz1CGAQ_Is1sLoRxy9Dl_fCLgMhLDvO5L8-EsVff2IiswF1xKvwUDiAEPcV0mOxz5c915mExQuVbCTDL0KTJQEtCF5dYTiss8HJIK_dzSG8g/http%3A%2F%2Fwww.wired.com.
   Can't File for Unemployment - Don�t Blame Cobol

-- gil

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN


--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN





--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

Re: IGYSC2025-W cobol message

[Mahesh KN]

Thanks Max,
Yes you are right. It was a problem with cics pre compiler. I got that resolved 
and now I have addressability.
But I am curious why the 2025 waring is issued at he declaration and not at the 
statement where it is supposed to show.
Thanks
Mahesh.

Sent from Outlook Mobile

From: IBM Mainframe Discussion List  on behalf of 
Massimo Biancucci 
Sent: Friday, April 24, 2020 6:18:50 PM
To: IBM-MAIN@LISTSERV.UA.EDU 
Subject: Re: IGYSC2025-W cobol message

Probably the program is a CICS program and it has been compiled with the
inline CICS precompile.

Usually (it depends on the options), precompiler adds the USING DFHCOMMAREA
automaGically.

That means, DFHCOMMAREA will have a real good address while SAS-C-BLOCK
won't.

Hope this helps.
Regards.
Max

Il giorno ven 24 apr 2020 alle ore 13:21 Mahesh KN  ha
scritto:

> thanks Max,
> i have more interesting code that looks like below.
>  15   *
>  16   *   L I N K A G E   S E C T I O N   *
>  17   *
>  18LINKAGE SECTION.
>  1901 DFHCOMMAREA.
>  20   05 A-C-BILL PIC S9(8) COMP.
>  2201 SAS-BLOCK.
>  23   05 B-C-BILL PIC S9(8) COMP.
>  24   *
>  25   *P R O C E D U R E   D I V I S I O N*
>  26   *
>  27PROCEDURE DIVISION.
>  28MOVE A-C-BILL to B-C-BILL.
>
> in the above case, i think both 9(8) comp fields are some addresses(which
> doesnt matter much anyway) . But i still get IGYSC2025 warning on line 22
> SAS-BLOCK field definition.
>
> 
> From: IBM Mainframe Discussion List  on behalf
> of Massimo Biancucci 
> Sent: Friday, April 24, 2020 2:58 PM
> To: IBM-MAIN@LISTSERV.UA.EDU 
> Subject: Re: IGYSC2025-W cobol message
>
> Hi,
>
> any area having not an address can be a potential problem.
>
> A sample of the code would have been better.
> Anyway look at this:
>
>  15   *
>
>  16   *   L I N K A G E   S E C T I O N   *
>
>  17   *
>
>  18LINKAGE SECTION.
>
>  1901 PARM.
>
>  20   05 PARM-PTR USAGE IS POINTER.
>
>  21
>
>  2201 QQ PIC X(2).
>
>  2301 QQ2 PIC X(2).
>
>  24   *
>
>  25   *P R O C E D U R E   D I V I S I O N*
>
>  26   *
>
>  27PROCEDURE DIVISION USING PARM.
>
>  28
>
>  29DISPLAY 'ZPLINKUS - INIZIO'
>
>  30DISPLAY QQ
>
>  31
>
>  32SET ADDRESS OF QQ2 TO PARM-PTR
>
>  33DISPLAY QQ2
>
>  34
>
>  35DISPLAY 'ZPLINKUS - FINE'
>
>  36
>
>  37GOBACK.
>
> ..
>
>
> 22  IGYSC2025-W   "QQ" or one of its subordinates was referenced, but
> "QQ" w
>   addressability.  This reference will not be resolved
> succe
> MessagesTotalInformationalWarningErrorSevere
>  Terminating
>
> As you can see compiler warns on QQ and not on QQ2.
>
> QQ will have not a valid address and this will lead to abend (if you're
> lucky) or to result error (difficult to diagnose).
> So you should be sure the variable address had been set before using it.
> Maybe compiler didn't understand a SET even though I think it's not so.
>
> I've lots of examples where "bad programs ran properly" on V4 and prior and
> abended on V5 or later because of bad addressed areas or misleaded
> parm-area length.
>
> Regards.
> Max
>
>
> <
> https://www.avast.com/sig-email?utm_medium=email&utm_source=link&utm_campaign=sig-email&utm_content=webmail
> >
> Mail
> priva di virus. www.avast.com
> <
> https://www.avast.com/sig-email?utm_medium=email&utm_source=link&utm_campaign=sig-email&utm_content=webmail
> >
> <#DAB4FAD8-2DD7-40BB-A1B8-4E2AA1F9FDF2>
>
> Il giorno ven 24 apr 2020 alle ore 09:51 Mahesh KN  ha
> scritto:
>
> > We are upgrading the Cobol to Cobol v 6.2.0. We have a program that was
> > compile on Cobol v4.* and probably the code was running fine. But our
> shop
> > has setup to take IGYSC2025 warnings seriously and not proceed with
> > compilation under Cobol V6.
> > So i am wondering how adsressability works if a