Re: Inspecting and extracting from /OS transportable files on other platforms?

2021-02-03 Thread Radoslaw Skorupka

W dniu 03.02.2021 o 21:40, Tony Harminc pisze:

On Sat, 30 Jan 2021 at 11:36, Bernd Oppolzer  wrote:

Am 30.01.2021 um 00:39 schrieb Tony Harminc:

On Fri, 29 Jan 2021 at 18:21, Radoslaw Skorupka  wrote:


Few remarks:

...

4. Source code EBCDIC-ASCII translation. Example: I hate REXX
translation. REXX use || characters while in CP852 it should be !!.
Simple translation corrupts REXX code. C code is corrupted as well.

The | character is at the same code point X'7C' in CP852 (ISO Latin-2)
as it is in CP819 (ISO Latin-1) and most other European language CPs.
The ! character is at X'21' in CP852 and most others. So your problem
is with neither REXX nor with CP852 - it's presumably with some bad
translation table in your FTP or TN3270 or...

The problem is not at the client side (ASCII codepages);
the problem is that the EBCDIC codepages in Europe have the
exclamation point (!) at the place, where the American EBCDIC has |,
and so, if you transfer from an European EBCDIC codepage (273, for
example), which is standard here in Europe, you will get exclamation points
instead of | on the PC.

But this is still a problem of using the wrong translation table - not
of REXX or of EBCDIC or ASCII (ISO) code pages. All of the mentioned
CPs contain both the | and ! characters, so any translation that
changes one character to another is wrong. (I understand some historic
reasons for intentionally mistranslating - mostly because various
terminals could not enter or display certain characters. But in the
days of terminal emulators, there is surely no longer any excuse.)


Yes and no.
It can be fixed by customization of translation tables. At least for 
REXX code. However it will break translation of regular text with 
punctuations. So, one has to choose: REXX or regular text.
More the responsibility of terminal emulator user is to ...use it. When 
installing PCOMM I have no customization questions with regard to 
translation tables - installation program recognize my Windows locale 
and follow it.
After I installed PCOMM, Nexus or other emulator I can use IND$FILE or 
simply copy-paste. Both methods work - the EBCDIC text is translated to 
ASCII and vice versa. Almost all characters. A, B, C, space - it will be 
translated correctly.
However exclamation mark and | will not be translated as REXX code 
require. Can I change translation tables for the above processes? Yes, 
at least in PCOMM I remember how to do it. But this is quite nonstandard 
operation.
Last but not least: there is still need to recognize the purpose of 
transmitted content - is it REXX code or just a text.


That's why I strongly prefer to use XMIT format for REXX sources. 
Nothing will be lost in translation, because there is no translation.


--
Radoslaw Skorupka
(looking for new job)
Lodz, Poland

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


RBINTCOD+1 == SVC Number

2021-02-03 Thread Joseph Reichman
Hi

 

I was writing a SVC Screen routine for more than one SVC is the SVC number
in the PRB (who issued the SVC ) meaning I would have to RBLINKB to the prv
RB 

And check RBFTP for zeros To see the SVC number

 



 


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


Re: DE entry on Load Link XCTL and ATTACH

2021-02-03 Thread Joseph Reichman
Thanks 



> On Feb 3, 2021, at 8:26 AM, Peter Relson  wrote:
> 
> The directory entry (DE) starts with a name. If this is an alias, it would 
> generally also elsewhere in the DE have the name of the "major".
> 
> Those are the only names within a DE.
> 
> I don't know what is the "first name".
> 
> Peter Relson
> z/OS Core Technology Design
> 
> 
> --
> 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: IGZ0099C Internal error CLLE-GPCB was detected in module IGZCEV19

2021-02-03 Thread Farley, Peter x23353
Those certainly look like messages from LE runtime modules for COBOL support.

I have found in the past that "internal error" messages are infrequently 
documented (if at all) anywhere but in the source code, so you may have to 
start a case with IBM to find out what they really mean.

HTH

Peter

-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
Binyamin Dissen
Sent: Wednesday, February 3, 2021 3:47 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: IGZ0099C Internal error CLLE-GPCB was detected in module IGZCEV19

I am receiving message

IGZ0099C Internal error CLLE-GPCB was detected in module IGZCEV19

after compiling a COBOL/ASSEMBLER system with COBOL V6.2

The LE manual does not include these values for the IGZ0099C message. Where 
might this be documented?

--

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


IGZ0099C Internal error CLLE-GPCB was detected in module IGZCEV19

2021-02-03 Thread Binyamin Dissen
I am receiving message

IGZ0099C Internal error CLLE-GPCB was detected in module IGZCEV19

after compiling a COBOL/ASSEMBLER system with COBOL V6.2

The LE manual does not include these values for the IGZ0099C message. Where
might this be documented?

--
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: Inspecting and extracting from /OS transportable files on other platforms?

2021-02-03 Thread Tony Harminc
On Sat, 30 Jan 2021 at 11:36, Bernd Oppolzer  wrote:
>
> Am 30.01.2021 um 00:39 schrieb Tony Harminc:
> > On Fri, 29 Jan 2021 at 18:21, Radoslaw Skorupka  
> > wrote:
> >
> >> Few remarks:
> > ...
> >> 4. Source code EBCDIC-ASCII translation. Example: I hate REXX
> >> translation. REXX use || characters while in CP852 it should be !!.
> >> Simple translation corrupts REXX code. C code is corrupted as well.
> > The | character is at the same code point X'7C' in CP852 (ISO Latin-2)
> > as it is in CP819 (ISO Latin-1) and most other European language CPs.
> > The ! character is at X'21' in CP852 and most others. So your problem
> > is with neither REXX nor with CP852 - it's presumably with some bad
> > translation table in your FTP or TN3270 or...
>
> The problem is not at the client side (ASCII codepages);
> the problem is that the EBCDIC codepages in Europe have the
> exclamation point (!) at the place, where the American EBCDIC has |,
> and so, if you transfer from an European EBCDIC codepage (273, for
> example), which is standard here in Europe, you will get exclamation points
> instead of | on the PC.

But this is still a problem of using the wrong translation table - not
of REXX or of EBCDIC or ASCII (ISO) code pages. All of the mentioned
CPs contain both the | and ! characters, so any translation that
changes one character to another is wrong. (I understand some historic
reasons for intentionally mistranslating - mostly because various
terminals could not enter or display certain characters. But in the
days of terminal emulators, there is surely no longer any excuse.)

Tony H.

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


Re: zero-length PC section, the binder, and resulting AMODE/RMODE

2021-02-03 Thread Thomas David Rivers

Thomas David Rivers wrote:



I could find nothing in the "Program Management: Advanced Facilities"
doc that indicated an AMODE flag value of B'00' is any different/special
verses B'01' (it is surprising that there are 2 AMODE 24 options there.)


I _did_ find a parenthentical comment in the book "z/OS MVS Programming:
Assembler Services Guide", in the section titled "Linkage editor
and binder support of AMDOE and RMODE", in the sub-section of
"Linkage editor RMODE processing".  It says:

  The linkage editor determines the RMODE of each CSECT. If the RMODEs
  are all the same, the linkage editor assigns that RMODE to the load 
module.
  If the RMODEs are not the same (ignoring the RMODE specification on 
common
  sections), the more restrictive value, RMODE 24, is chosen as the 
load module's RMODE.



So - it seems any RMODE specification on a common section (empty or not, 
I suppose)

is ignored.

I didn't (yet) find a similar statement about AMODE...

Just wanted to leave this here for the future.

  - Dave R. -

--
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: utility for dataset backups

2021-02-03 Thread Carmen Vitullo
OK, got ya Bill, I missed that :(  
   
Carmen Vitullo 

   

-Original Message-

From: Bill 
To: IBM-MAIN 
Date: Wednesday, 3 February 2021 9:52 AM CST
Subject: Re: utility for dataset backups

the restore and message was: 
RESTORE INDD(TAPE80) - 
DS(INCL(SYS2.DB2X.DSNLOAD.A)) - 
REPLACE 
ADR101I (R/I)-RI01 (01), TASKID 001 HAS BEEN ASSIGNED TO COMMAND 'RESTORE ' 
ADR109I (R/I)-RI01 (01), 2021.033 05:35:38 INITIAL SCAN OF USER CONTROL 
STATEMEN 
ADR016I (001)-PRIME(01), RACF LOGGING OPTION IN EFFECT FOR THIS TASK 

ADR006I (001)-STEND(01), 2021.033 05:35:38 EXECUTION BEGINS 

ADR780I (001)-TDDS (01), THE INPUT DUMP DATA SET BEING PROCESSED IS IN LOGICAL 
D 
VERSION 2 RELEASE 2 MODIFICATION LEVEL 0 ON 2021..032 12 

ADR415W (001)-TDLOG(01), NO DATA SETS WERE COPIED, DUMPED, OR RESTORED FROM ANY 

ADR487W (001)-TDLOG(01), DATA SET SYS2.DB2X.DSNLOAD.A NOT ON LOGICALLY 
FORMATTED 

But as I said, I realized it was a simple mistake in that the dataset I 
specified was not included in the backup. 
Bill 

-- 
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: utility for dataset backups

2021-02-03 Thread Bill Giannelli
the restore and message was:
  RESTORE INDD(TAPE80)- 
DS(INCL(SYS2.DB2X.DSNLOAD.A)) - 
REPLACE 
ADR101I (R/I)-RI01 (01), TASKID 001 HAS BEEN ASSIGNED TO COMMAND 'RESTORE ' 
ADR109I (R/I)-RI01 (01), 2021.033 05:35:38 INITIAL SCAN OF USER CONTROL STATEMEN
ADR016I (001)-PRIME(01), RACF LOGGING OPTION IN EFFECT FOR THIS TASK

ADR006I (001)-STEND(01), 2021.033 05:35:38 EXECUTION BEGINS 

ADR780I (001)-TDDS (01), THE INPUT DUMP DATA SET BEING PROCESSED IS IN LOGICAL D
 VERSION 2 RELEASE 2 MODIFICATION LEVEL 0 ON 2021.032 12

ADR415W (001)-TDLOG(01), NO DATA SETS WERE COPIED, DUMPED, OR RESTORED FROM ANY 

ADR487W (001)-TDLOG(01), DATA SET SYS2.DB2X.DSNLOAD.A NOT ON LOGICALLY FORMATTED

But as I said, I realized it was a simple mistake in that the dataset I 
specified was not included in the backup.
Bill

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


Re: utility for dataset backups

2021-02-03 Thread Carmen Vitullo
Bill you showed the backup control cards, but not the restore control cards. 
can you show the output from the failed restore, specifically the ADR** error 
message?  
  
also, are you attempting to restore datasets that already exist?  
Carmen Vitullo 

   

-Original Message-

From: Bill 
To: IBM-MAIN 
Date: Wednesday, 3 February 2021 8:09 AM CST
Subject: utility for dataset backups

I am preparing for a DB2 v12 upgrade. I need to backup and restore form (if 
necessary) the "runtime libraries". What utilities are normally used? I have 
been having issues with DFSMS ADRDSSU. My restores failed. Also having issues 
with EMCSNAP as I am not familiar with it. 
thanks 
Bill 

-- 
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: utility for dataset backups

2021-02-03 Thread David Spiegel

Hi Bill,
The EXCLUDEs seem unnecessary.

Regards,
David

On 2021-02-03 09:34, Bill Giannelli wrote:

I think my issue was that my control specification did not capture all the 
datasets I needed. I have now modified it with masks as follows and it seems to 
capture all the datasets I need now:
  
DUMP   OUTDD(TAPE80) -

 OPT(4) ALLDATA(*)  ALLEXCPSPHERE TOL(ENQF)-
 DATASET(INCLUDE(DB2X.DSNDB*.DSNDB0*-
 DB2X.DX11.BSDS*.**, -
 DB2X.DX11.LOGCOPY1.DS02,-
 DB2X.DX11.LOGCOPY2.DS02,-
 DB2X.DX12.BSDS*.**, -
 DB2X.DX12.LOGCOPY1.DS03,-
 DB2X.DX12.LOGCOPY2.DS03,-
 SYS2.DB2X.DSN*.**   -
 SYS2.DB2X.S*,   -
 SYS2.DB2X.S*.**,-
)  -
 EXCLUDE(DB2X.DX11.ARCLG*.**,-
 DB2X.DX12.ARCLG*.**,-
))

--
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: utility for dataset backups

2021-02-03 Thread Bill Giannelli
I think my issue was that my control specification did not capture all the 
datasets I needed. I have now modified it with masks as follows and it seems to 
capture all the datasets I need now:
 
DUMP   OUTDD(TAPE80) -   
OPT(4) ALLDATA(*)  ALLEXCPSPHERE TOL(ENQF)-  
DATASET(INCLUDE(DB2X.DSNDB*.DSNDB0*- 
DB2X.DX11.BSDS*.**, -
DB2X.DX11.LOGCOPY1.DS02,-
DB2X.DX11.LOGCOPY2.DS02,-
DB2X.DX12.BSDS*.**, -
DB2X.DX12.LOGCOPY1.DS03,-
DB2X.DX12.LOGCOPY2.DS03,-
SYS2.DB2X.DSN*.**   -
SYS2.DB2X.S*,   -
SYS2.DB2X.S*.**,-
   )  -  
EXCLUDE(DB2X.DX11.ARCLG*.**,-
DB2X.DX12.ARCLG*.**,-
   ))

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


Re: utility for dataset backups

2021-02-03 Thread David Spiegel

Hi Bill,
Can you please include your //SYSPRINT to see the error messages?

Regards,
David

On 2021-02-03 09:08, Bill Giannelli wrote:

I am preparing for a DB2 v12 upgrade. I need to backup and restore form (if necessary) 
the "runtime libraries". What utilities are normally used? I have been having 
issues with DFSMS ADRDSSU. My restores failed. Also having issues with EMCSNAP as I am 
not familiar with it.
thanks
Bill

--
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: utility for dataset backups

2021-02-03 Thread Chris Hoelscher
GOOD DAY

I have always used adrdssu - in fact we perform a fallback/reinstall drill in a 
sandbox
We have not experienced any non-self-inflicted issues

What is the actual problem?

Chris Hoelscher
Lead Sys DBA 
IBM Global Technical Services on assignmemt to Humana Inc.
T 502.476.2538  or 502.407.7266

-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
Bill Giannelli
Sent: Wednesday, February 3, 2021 9:09 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: [IBM-MAIN] utility for dataset backups

[External Email: Use caution with links and attachments]


I am preparing for a DB2 v12 upgrade. I need to backup and restore form (if 
necessary) the "runtime libraries". What utilities are normally used? I have 
been having issues with DFSMS ADRDSSU. My restores failed. Also having issues 
with EMCSNAP as I am not familiar with it.
thanks
Bill

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

The information transmitted is intended only for the person or entity to which 
it is addressed
and may contain CONFIDENTIAL material.  If you receive this 
material/information in error,
please contact the sender and delete or destroy the material/information.

Humana Inc. and its subsidiaries comply with applicable Federal civil rights 
laws and
do not discriminate on the basis of race, color, national origin, ancestry, 
age, disability, sex,
marital status, gender, sexual orientation, gender identity, or religion. 
Humana Inc. and its subsidiaries do not
exclude people or treat them differently because of race, color, national 
origin, ancestry, age,
disability, sex, marital status, gender, sexual orientation, gender identity, 
or religion.

English: ATTENTION: If you do not speak English, language assistance services, 
free
of charge, are available to you. Call 1‐877‐320‐1235 (TTY: 711).

Español (Spanish): ATENCIÓN: Si habla español, tiene a su disposición servicios
gratuitos de asistencia lingüística. Llame al 1‐877‐320‐1235 (TTY: 711).

繁體中文(Chinese):注意:如果您使用繁體中文,您可以免費獲得語言援助
服務。請致電 1‐877‐320‐1235 (TTY: 711)。

Kreyòl Ayisyen (Haitian Creole): ATANSION: Si w pale Kreyòl Ayisyen, gen sèvis 
èd
pou lang ki disponib gratis pou ou. Rele 1‐877‐320‐1235 (TTY: 711).

Polski (Polish): UWAGA: Jeżeli mówisz po polsku, możesz skorzystać z bezpłatnej
pomocy językowej. Zadzwoń pod numer 1‐877‐320‐1235 (TTY: 711).

한국어 (Korean): 주의: 한국어를 사용하시는 경우, 언어 지원 서비스를 무료로
이용하실 수 있습니다. 1‐877‐320‐1235 (TTY: 711)번으로 전화해 주십시오.


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


utility for dataset backups

2021-02-03 Thread Bill Giannelli
I am preparing for a DB2 v12 upgrade. I need to backup and restore form (if 
necessary) the "runtime libraries". What utilities are normally used? I have 
been having issues with DFSMS ADRDSSU. My restores failed. Also having issues 
with EMCSNAP as I am not familiar with it.
thanks
Bill 

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


Re: AW: X3270 or c3270 on mac

2021-02-03 Thread Dave Jones
Can anyone here recommend a good TN3270 emulator for Linux that supports APA 
(a.k.a GDDM style) graphics like PCOMM can?
Thanks/
DJ

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


Re: DE entry on Load Link XCTL and ATTACH

2021-02-03 Thread Peter Relson
The directory entry (DE) starts with a name. If this is an alias, it would 
generally also elsewhere in the DE have the name of the "major".

Those are the only names within a DE.

I don't know what is the "first name".

Peter Relson
z/OS Core Technology Design


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


Re: STORAGE KEY of loaded executable

2021-02-03 Thread Peter Relson
It's not so much the instruction cache but rather the instruction pipeline 
that might need to be flushed.
As Ed Jaffe pointed out, anything done speculatively needs to be, and is, 
re-evaluated (in general, thrown away and re-done).

Peter Relson
z/OS Core Technology Design


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


Re: Learning the basics of SMP/E

2021-02-03 Thread Bill Johnson
 
For anything SMP/E, I would quiz the ultimate expert, Kurt Quackenbush of IBM.  
Over the years, I attended his presentations at Share and learned more there 
than all the experts on the list combined. He also is kind enough to accept 
direct emails.
An IBM fanboy

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