Create AWStape file from DASD file

[גדי בן אבי]

Hi,
 
We have a client that has installed the VTA system fro Universal software.
 
Until now, we sent them cartridges with various files, now they want to receive 
the files in AWStape format.
 
I found a program called VTT2DISK that reads a tape and creates an AWStape file.
 
Does anyone know of a way to create the AWStape file directly from a file on 
DASD without writing to tape first?
 
TIA
 
Gadi

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html

Re: Can I know programmatically if a load module has been zapped?

[R.S.]

Paul Gilmartin wrote:

On Tue, 18 Mar 2008 10:53:44 -0500, David Eisenberg wrote:

Yikes!

Our programmers occasionally ZAP a load module in a test load library, which is
fine. When the time comes to promote the load module into a production load
library, however, I would like our change management package to prevent the
promotion of any load module which has been zapped. I'm prepared to do that
check programmatically via an exit, if I have a reasonable way of doing it.


Extract a secure checksum (e.g. SHA-1 from ICSF) when the load
module is generated, and verify it when it is moved into the
production load library.  RACF protect the following:  [...]


I like RACF, but in this case it is better to use some "changeman" 
package (Changeman ZMF, Endevour, etc.). In such scenario programmer 
provides a *source* and team leader (whoever responsible for the code) 
recompiles the code when promoting to upper environments. The roles and 
datasets can be RACF-protected, however it is up to the changeman to 
separater the duties and manage versions.

IMHO any other method is reinventing the wheel.

Just my $0.02
--
Radoslaw Skorupka
Lodz, Poland


--
BRE Bank SA
ul. Senatorska 18
00-950 Warszawa
www.brebank.pl

Sąd Rejonowy dla m. st. Warszawy 
XII Wydział Gospodarczy Krajowego Rejestru Sądowego, 
nr rejestru przedsiębiorców KRS 025237

NIP: 526-021-50-88
Według stanu na dzień 01.01.2008 r. kapitał zakładowy BRE Banku SA  wynosi 
118.642.672 złote i został w całości wpłacony.

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html

COBOL structure for XML generate

[Werner Kuehnel]

We're currently trying to generate XML output by a EntCOB program. 
Generally it works, however we couldn't yet manage to create the structure 
of 
 
in the following example:

 
 
 
 
 
 
 
 

Does anyone know the COBOL field structure to get the lines  ? 
Thanks,

Werner Kuehnel
Spezialist in der Abteilung Betrieb/Support

IMD-Gesellschaft für Informatik und Datenverarbeitung mbH 
Augustaanlage 66
68165 Mannheim

Tel: +49.621.457-4885, Fax: -4046
E-Mail: [EMAIL PROTECTED]

IMD-Gesellschaft für Informatik und Datenverarbeitung mbH 
Sitz Mannheim, Amtsgericht Mannheim HRB 7460
Geschäftsführer: Norbert Koch

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html

Re: Can forked/spawned address spaces be identified as such?

[Peter Relson]

As the ASSB fields mentioned are not programming interfaces, no additional
information will be provided as to their meaning and use.

Peter Relson
z/OS Core Technology Design

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html

ATL and MVS out of sync -IPL avoidance

[J Ellis]

I recently had a problem where the software and hardware control blocks in
my ts3500(3584) got out of sync. The short of it is, encryption got enabled
on the drives and the C06's got iml'd with the library active. We still had
one path to the drives, but lost the others. Flipping on encryption changed
the device characteristics enough that MVS didn't like it.
here is the message:

EE386I PATH(0900,C6) NOT BROUGHT ONLINE 991
IEE763I NAME= IECTDSR2 CODE= 0008   
IEA437I TAPE LIBRARY DEVICE 0900 (1-02) IS A DIFFERENT DEVICE   
TYPE THAN DEVICES PREVIOUSLY DEFINED IN THE SAME STRING.
THE DEVICE IS NOT ALLOWED ONLINE  .

Below are two procedures from IBM to help get you out of this without an
IPL. by the time we noticed it, the drives were in use so couldn't get them
offline. I used the DS QLIB delete and recovered. I had seen the first
procedure, vary all drive off, then on, then do a soft activate and vary on
again, but the DS QLIB library delete was a new one. A techdoc is being
created about this, #T1010801

Procedures to recover ATL drives without IPL

Procedure #1

1) MVS Vary the full range of drives off-line 
2) MVS Vary the full range of drives on-line  
this will get message
 IEA437I TAPE LIBRARY DEVICE(dev),ACTIVATE IODF=XX,IS REQUIRED  
  

3) Preform the software IODF activation   
4) MVS Vary  the full range of drives on-line 
 The drives should now be on-line and usable as encrypting devices.


Procedure #2

To avoid an IPL you can use the DS QL commands to remove the existing  
 control blocks then do an software activate to rebuild the CBs with the
 new correct values. The process is below. This should update the CBs   
 so that the devices can be varied on-line. 

 DELETE:
Indicates that QLIB should delete the INACTIVE control  blocks for library
LIBID and not affect the existing ACTIVE library definition. The DELETE
command is used
to remove incorrectly defined library control blocks so they can be rebuilt.
DEVSERV DELETE provides an alternative to the method described in
information   
APAR II09065, which requires two IODF activates. 

   The DEVSERV QLIB method is as follows:   
   1. Use QLIB DELETE to delete all of the devices  from the
incorrect control blocks.
   2. Use QLIB LIST to display that the INACTIVE control blocks have
been deleted. 
   3. Use ACTIVATE IODF to redefine the devices.
   4. Use QLIB LIST to display that the ACTIVE control blocks are
properly defined.  

 An example for your site:  

 DS QL,1,DELETE 
 *04 Reply 'YES' to delete the INACTIVE configuration for library   
 1, any other reply to quit.
 IEF196I Reply 'YES' to delete the INACTIVE configuration for   
 library 1, any other reply to quit.
 R 4,YES
 IEE459I 14.01.19 DEVSERV QLIB 490 Inactive configuration for library
1   successfully deleted

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html

ibm-main@bama.ua.edu

[John Eells]

Hey, the price is right:

Title: Plan your migration to z/OS V1.9!

Speakers:
- Gita Grube Berg, IBM z/OS Marketing
- Marna Walle, IBM z/OS System Build and Install Team

Broadcast date: March 27, 2008, 11 a.m., Eastern Daylight Time, 3:00 p.m 
Greenwich Mean Time


Developed for: Mainframe IT technical manager, operations manager, 
systems programmer


Technical level: Intermediate - advanced

It won’t be long before z/OS® V1.7 is a thing of the past … in fact, 
it’s less than six months away. While you may be tempted to wait and 
upgrade with the new IBM System z10 Enterprise Class Server, all z10 
functionality is supported now on z/OS V1.9. It’s time to move forward 
to stay within migration and coexistence guidelines supported by IBM.


Join us for this complimentary teleconference and you’ll learn how to 
identify migration issues, take advantage of z/OS best practices, and 
simplify migration to z/OS V1.9. This key release offers enhancements in 
areas of security; sophisticated policy-based networking; up to 64-way 
single image scalability; availability improvements for Parallel 
Sysplex®; improved application development with new System REXX™ and 
METAL C facilities; and improved economics for IPSec network encryption; 
XML parsing for DB2® 9 pureXML™ workloads; and, specialty engine 
exploitation. And of course, it also supports the new z10 server.


In this teleconference, we’ll discuss:

- Features that are new, changing and removed in V1.9, along with 
features that will be removed in the future

- Ordering and delivery options
- Coexistence, migration, fall-back and service policies
- Driving and target system requirements for both software and hardware
- BCP, Distributed File Service (DFS), DFSMS, ISPF, Language 
Environment, TSO/E, and z/OS UNIXŠ System Services


Register now: 
http://www.ibm.com/software/os/systemz/telecon/27mar/index.jsp?tcode=108AF85M&pcode=5x5


Join us after the teleconference for a live question and answer session. 
 This teleconference will also be available for replay after the event.


(Darren approved this posting [thanks, Big D].)

--
John Eells
z/OS Technical Marketing
IBM Poughkeepsie
[EMAIL PROTECTED]

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html

Re: Can forked/spawned address spaces be identified as such?

[McKown, John]

> -Original Message-
> From: IBM Mainframe Discussion List 
> [mailto:[EMAIL PROTECTED] On Behalf Of Support, DUNNIT 
> SYSTEMS LTD.
> Sent: Wednesday, March 19, 2008 4:11 AM
> To: IBM-MAIN@bama.ua.edu
> Subject: Can forked/spawned address spaces be identified as such?
> 
> 
> Are there any control block fields or flags within these 
> address spaces that 
> indentify them as being started by a fork or spawn action? 
> Are there different 
> indicators for forked versus spawned address spaces?
> 
> TIA,
> Jerry

Nobody else has asked, so I will. Why do you want to do this? I'm just
curious.

--
John McKown
Senior Systems Programmer
HealthMarkets
Keeping the Promise of Affordable Coverage
Administrative Services Group
Information Technology

The information contained in this e-mail message may be privileged
and/or confidential.  It is for intended addressee(s) only.  If you are
not the intended recipient, you are hereby notified that any disclosure,
reproduction, distribution or other use of this communication is
strictly prohibited and could, in certain circumstances, be a criminal
offense.  If you have received this e-mail in error, please notify the
sender by reply and delete this message without copying or disclosing
it. 

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html

Re: user catalog question

[Peter Ten Eyck]

There is no message on the console.

In the log of the job, there are messages for VSAM data sets problems.

I can summarize in the follow way:

How much DASD volume checking happens during a listct? We know that the 
VVDS  on a given volume is referenced for a VSAM data set listcat. What else?

What does it mean to run a listcat on a catalog that many of the entries 
contain the wrong volume?

Peter

 

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html

Stand alone Dump with ICC cards

[Andy White]

Is anyone out there using ICC for a z/OS console. We are switching over 
from our 3174's and started to use ICC consoles so I thought id ask our 
operator  to do a SAD from it. The first problem I had was I didn't change 
the SAD to use the new console (address 1300) I changed it had them we do 
it but we get  a xwait on the emulator, like it cant find the console. 

Here is what I have coded job ran with zero's, No wait state just sits 
there the system

 AMDSADMP IPL=D3390,VOLSER=AVE3EC,   X
   MINASID=ALL, X
   DDSPROMPT=YES,X
   OUTPUT=T1511,X
   REUSEDS=CHOICE,X
   CONSOLE=((1300,3278),(1310,3278)) 
 END 

Is there anything that needs to be coded for a ICC type of console to do a 
SAD? Thanks in advance.


Andy 
Internet: Mailto:[EMAIL PROTECTED]



The information contained in this message may be CONFIDENTIAL and is for the 
intended addressee only.  Any unauthorized use, dissemination of the 
information, or copying of this message is prohibited.  If you are not the 
intended addressee, please notify the sender immediately and delete this 
message.

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html

Re: COBOL structure for XML generate

[Steve Comstock]

Werner Kuehnel wrote:
We're currently trying to generate XML output by a EntCOB program. 
Generally it works, however we couldn't yet manage to create the structure 
of 
 
in the following example:


callMode="SWITCH" 
callTerm="TERM" 
stencilId="SCL12345"> 
 
 
 
 
 
 
 

Does anyone know the COBOL field structure to get the lines   id="..."   v="..."/>   ? 
Thanks,


Werner Kuehnel
Spezialist in der Abteilung Betrieb/Support


Werner,

You need to be at Enterprise COBOL V4R1; if you have
this version of the compiler, and compile with option
XMLPARSE(XMLSS), you can add the WITH ATTRIBUTES phrase
to your XML GENERATE statement; in this case, data items
that belong to a group are emitted as attributes of the
group they belong to. So if your COBOL structure was
something like this:

.
.
.
02 var.
   03 id pic x(9).
   03 v  pic x(10)
.
.
.


under the conditions I detailed above might solve your
problem. Let me know.


Our 2-day class "Enterprise COBOL Update II: Unicode
and XML Support" has been updated to include the
V4R1 level of the Enterprise COBOL compiler. Details at:

  http://www.trainersfriend.com/COBOL_Courses/d705descr.htm



Kind regards,

-Steve Comstock
The Trainer's Friend, Inc.

303-393-8716
http://www.trainersfriend.com

  z/OS Application development made easier
* Our classes include
   + How things work
   + Programming examples with realistic applications
   + Starter / skeleton code
   + Complete working programs
   + Useful utilities and subroutines
   + Tips and techniques

==> call or email to receive a free sample student handout <==

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html

Re: SYMDUMP Question

[Shmuel Metz (Seymour J.)]

Is the character set issue on your end or in the listserv?

In <[EMAIL PROTECTED]>, on 03/17/2008
   at 01:18 PM, Gary Green <[EMAIL PROTECTED]> said:

>Content-Type: text/plain; charset="iso-8859-1"
>MIME-Version: 1.0
>X-Origin: 205.203.128.142
>X-Mailer: AtMail 4.61 - 205.203.128.142 - [EMAIL PROTECTED]
>X-Antivirus: checked in 0.008sec at bama.ua.edu ([130.160.4.114]) by
>smf-clamd
> v1.2.1 - http://smfs.sf.net/
>Content-Transfer-Encoding: 8bit
>X-MIME-Autoconverted: from quoted-printable to 8bit by bama.ua.edu id
>  m2HHIxJG017147

Looks normal for Latin1.

>We canâ  t

The code points after "can" are E2 80 99, which I suspect is intended to
be UTF-8 but doesn't match the Content-Type header field. The expected
code point is '27'x.
 
-- 
 Shmuel (Seymour J.) Metz, SysProg and JOAT
 ISO position; see  
We don't care. We don't have to care, we're Congress.
(S877: The Shut up and Eat Your spam act of 2003)

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html

Re: ServerPac IYO (Installing Your Order)

[Shmuel Metz (Seymour J.)]

In <[EMAIL PROTECTED]>, on 03/18/2008
   at 10:32 AM, Mark Zelden <[EMAIL PROTECTED]> said:

>Does it bother anyone else that the orderhlq.SCPPLENU only contains a 
>PDF version now that you have to transfer to your workstation to read?

Yes.
 
-- 
 Shmuel (Seymour J.) Metz, SysProg and JOAT
 ISO position; see  
We don't care. We don't have to care, we're Congress.
(S877: The Shut up and Eat Your spam act of 2003)

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html

Re: SYMDUMP Question

[Gary Green]

I have no idea... ??? 

-Original Message-
From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED] On Behalf
Of Shmuel Metz (Seymour J.)
Sent: Thursday, March 20, 2008 8:09 AM
To: IBM-MAIN@bama.ua.edu
Subject: Re: SYMDUMP Question

Is the character set issue on your end or in the listserv?

In <[EMAIL PROTECTED]>, on 03/17/2008
   at 01:18 PM, Gary Green <[EMAIL PROTECTED]> said:

>Content-Type: text/plain; charset="iso-8859-1"
>MIME-Version: 1.0
>X-Origin: 205.203.128.142
>X-Mailer: AtMail 4.61 - 205.203.128.142 - 
>[EMAIL PROTECTED]
>X-Antivirus: checked in 0.008sec at bama.ua.edu ([130.160.4.114]) by 
>smf-clamd
> v1.2.1 - http://smfs.sf.net/
>Content-Transfer-Encoding: 8bit
>X-MIME-Autoconverted: from quoted-printable to 8bit by bama.ua.edu id
>  m2HHIxJG017147

Looks normal for Latin1.

>We canâ  t

The code points after "can" are E2 80 99, which I suspect is intended to be
UTF-8 but doesn't match the Content-Type header field. The expected code
point is '27'x.
 
-- 
 Shmuel (Seymour J.) Metz, SysProg and JOAT
 ISO position; see 
We don't care. We don't have to care, we're Congress.
(S877: The Shut up and Eat Your spam act of 2003)

--
For IBM-MAIN subscribe / signoff / archive access instructions, send email
to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the
archives at http://bama.ua.edu/archives/ibm-main.html


--
No virus found in this incoming message.
Checked by AVG. 
Version: 7.5.519 / Virus Database: 269.21.7/1335 - Release Date: 3/19/2008
9:54 AM

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html

Re: Unable To Delete Archived Dataset

[Lucy Arnold]

Can you just type a "u" next to the dataset, then reply 'N' when DMS asks
if you want to restore???


Lucy

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html

Define Pagespace -- SWAP vs NOSWAP?

[Chase, John]

Hi, All,

We're renovating our page dataset allocations (z/OS 1.7 -> 1.9) and
found that our previously-used DEFINE specs from "many moons ago" need
"tweaking" beyond space and volser;  specifically, SWAP vs NOSWAP.  From
reading the following:

SWAP|NOSWAP 
specifies whether page space is defined for
local system queue area (LSQA) pages or for pageable private area pages.
(Auxiliary storage management separates private area address space pages
into LSQA pages and pageable private area pages.) 

SWAP Specifies that the page space is a
high-speed data set used during a swap operation to store and retrieve
the set of LSQA pages owned by an address space. 

NOSWAP Indicates that the page space is a
conventional page space used to record pageable private area pages. 

It appears that we should take the default of NOSWAP for our LOCALs and
PLPA/COMMON datasets.  But since we don't currently "swap-out" address
spaces like "in the old days" (we don't have any specific SWAP
datasets), should we consider defining a subset of our new page datasets
with the SWAP parameter?  If so, how many or what proportion?  Since
nowadays just about everything is a "high-speed data set" (device),
would it make a measurable difference one way or the other?

Any advice / recommendations / caveats would be appreciated.

TIA,

-jc-


--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html

Re: Stand alone Dump with ICC cards

[Staller, Allan]

It is probably waiting for an interrupt from the device. Hit RESET/ENTER
and it should wake up..


Is anyone out there using ICC for a z/OS console. We are switching over 
from our 3174's and started to use ICC consoles so I thought id ask our 
operator  to do a SAD from it. The first problem I had was I didn't
change 
the SAD to use the new console (address 1300) I changed it had them we
do 
it but we get  a xwait on the emulator, like it cant find the console. 

Here is what I have coded job ran with zero's, No wait state just sits 
there the system

 AMDSADMP IPL=D3390,VOLSER=AVE3EC,
X
   MINASID=ALL, X
   DDSPROMPT=YES,X
   OUTPUT=T1511,X
   REUSEDS=CHOICE,X
   CONSOLE=((1300,3278),(1310,3278)) 
 END 

Is there anything that needs to be coded for a ICC type of console to do
a 
SAD? Thanks in advance.



--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html

Re: Define Pagespace -- SWAP vs NOSWAP?

[Mark Jacobs]

Chase, John wrote:
> Hi, All,
>
> We're renovating our page dataset allocations (z/OS 1.7 -> 1.9) and
> found that our previously-used DEFINE specs from "many moons ago" need
> "tweaking" beyond space and volser;  specifically, SWAP vs NOSWAP.  From
> reading the following:
>
>   SWAP|NOSWAP 
>   specifies whether page space is defined for
> local system queue area (LSQA) pages or for pageable private area pages.
> (Auxiliary storage management separates private area address space pages
> into LSQA pages and pageable private area pages.) 
>
>   SWAP Specifies that the page space is a
> high-speed data set used during a swap operation to store and retrieve
> the set of LSQA pages owned by an address space. 
>
>   NOSWAP Indicates that the page space is a
> conventional page space used to record pageable private area pages. 
>
> It appears that we should take the default of NOSWAP for our LOCALs and
> PLPA/COMMON datasets.  But since we don't currently "swap-out" address
> spaces like "in the old days" (we don't have any specific SWAP
> datasets), should we consider defining a subset of our new page datasets
> with the SWAP parameter?  If so, how many or what proportion?  Since
> nowadays just about everything is a "high-speed data set" (device),
> would it make a measurable difference one way or the other?
>
> Any advice / recommendations / caveats would be appreciated.
>
> TIA,
>
>   
SWAP type page datasets are long dead. The doc should have been changed
long ago to remove the reference.

-- 
Mark Jacobs
Time Customer Service
Tampa, FL


In accordance to the principles of Doublethink, it 
does not matter if the war is not real, or when it 
is, that victory is not possible. The war is not 
meant to be won. It is meant to be continuous.

The essential act of modern warfare is the destruction 
of the produce of human labor. A hierarchical society 
is only possible on the basis of poverty and ignorance. 
In principle, the war effort is always planned to
keep society on the brink of starvation. The war is waged 
by the ruling group against its own subjects. And its 
object is not victory over Eurasia or Eastasia, but to 
keep the very structure of society intact.

George Orwell - 1984

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html

Antwort: Re: COBOL structure for XML generate

[Werner Kuehnel]

Thanks Steve for your reply,
unfortunately our EntCOB version is 3.4, so I've to see how to get the 
latest release.
It may take some time to upgrade, but I'll keep you posted about the 
result.

Werner 

IBM Mainframe Discussion List  schrieb am 20.03.2008 
13:11:25:

> Werner Kuehnel wrote:
> > We're currently trying to generate XML output by a EntCOB program. 
> > Generally it works, however we couldn't yet manage to create the 
structure 
> > of 
> >  
> > in the following example:
> > 
> >  > callMode="SWITCH" 
> > callTerm="TERM" 
> > stencilId="SCL12345"> 
> >  
> >  
> >  
> >  
> >  
> >  
> >  
> > 
> > Does anyone know the COBOL field structure to get the lines> id="..."   v="..."/>   ? 
> > Thanks,
> > 
> > Werner Kuehnel
> > Spezialist in der Abteilung Betrieb/Support
> 
> Werner,
> 
> You need to be at Enterprise COBOL V4R1; if you have
> this version of the compiler, and compile with option
> XMLPARSE(XMLSS), you can add the WITH ATTRIBUTES phrase
> to your XML GENERATE statement; in this case, data items
> that belong to a group are emitted as attributes of the
> group they belong to. So if your COBOL structure was
> something like this:
> 
> .
> .
> .
> 02 var.
> 03 id pic x(9).
> 03 v  pic x(10)
> .
> .
> .
> 
> 
> under the conditions I detailed above might solve your
> problem. Let me know.
> 
> 
> Our 2-day class "Enterprise COBOL Update II: Unicode
> and XML Support" has been updated to include the
> V4R1 level of the Enterprise COBOL compiler. Details at:
> 
>http://www.trainersfriend.com/COBOL_Courses/d705descr.htm
> 
> 
> 
> Kind regards,
> 
> -Steve Comstock
> The Trainer's Friend, Inc.
> 
> 303-393-8716
> http://www.trainersfriend.com

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html

Re: Define Pagespace -- SWAP vs NOSWAP?

[Vernooy, C.P. - SPLXM]

"Chase, John" <[EMAIL PROTECTED]> wrote in message
news:<[EMAIL PROTECTED]
m>...
> Hi, All,
> 
> We're renovating our page dataset allocations (z/OS 1.7 -> 1.9) and
> found that our previously-used DEFINE specs from "many moons ago" need
> "tweaking" beyond space and volser;  specifically, SWAP vs NOSWAP.
From
> reading the following:
> 
>   SWAP|NOSWAP 
>   specifies whether page space is defined for
> local system queue area (LSQA) pages or for pageable private area
pages.
> (Auxiliary storage management separates private area address space
pages
> into LSQA pages and pageable private area pages.) 
> 
>   SWAP Specifies that the page space is a
> high-speed data set used during a swap operation to store and retrieve
> the set of LSQA pages owned by an address space. 
> 
>   NOSWAP Indicates that the page space is a
> conventional page space used to record pageable private area pages. 
> 
> It appears that we should take the default of NOSWAP for our LOCALs
and
> PLPA/COMMON datasets.  But since we don't currently "swap-out" address
> spaces like "in the old days" (we don't have any specific SWAP
> datasets), should we consider defining a subset of our new page
datasets
> with the SWAP parameter?  If so, how many or what proportion?  Since
> nowadays just about everything is a "high-speed data set" (device),
> would it make a measurable difference one way or the other?
> 
> Any advice / recommendations / caveats would be appreciated.
> 
> TIA,

SWAP datasets have been abandonned several z/OS releases ago.

Kees.
**
For information, services and offers, please visit our web site:
http://www.klm.com. This e-mail and any attachment may contain
confidential and privileged material intended for the addressee
only. If you are not the addressee, you are notified that no part
of the e-mail or any attachment may be disclosed, copied or
distributed, and that any other action related to this e-mail or
attachment is strictly prohibited, and may be unlawful. If you have
received this e-mail by error, please notify the sender immediately
by return e-mail, and delete this message. 

Koninklijke Luchtvaart Maatschappij NV (KLM), its subsidiaries
and/or its employees shall not be liable for the incorrect or
incomplete transmission of this e-mail or any attachments, nor
responsible for any delay in receipt.
Koninklijke Luchtvaart Maatschappij N.V. (also known as KLM Royal
Dutch Airlines) is registered in Amstelveen, The Netherlands, with
registered number 33014286 
**

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html

Re: Define Pagespace -- SWAP vs NOSWAP?

[Wayne Driscoll]

John,
Since in z/OS 1.8 and above there is no such thing as a physical swap of an
address space, I see no reason to use the SWAP parameter.

Wayne Driscoll
Product Developer
NOTE:  All opinions are strictly my own.




-Original Message-
From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED] On Behalf
Of Chase, John
Sent: Thursday, March 20, 2008 9:25 AM
To: IBM-MAIN@bama.ua.edu
Subject: Define Pagespace -- SWAP vs NOSWAP?

Hi, All,

We're renovating our page dataset allocations (z/OS 1.7 -> 1.9) and
found that our previously-used DEFINE specs from "many moons ago" need
"tweaking" beyond space and volser;  specifically, SWAP vs NOSWAP.  From
reading the following:

SWAP|NOSWAP 
specifies whether page space is defined for
local system queue area (LSQA) pages or for pageable private area pages.
(Auxiliary storage management separates private area address space pages
into LSQA pages and pageable private area pages.) 

SWAP Specifies that the page space is a
high-speed data set used during a swap operation to store and retrieve
the set of LSQA pages owned by an address space. 

NOSWAP Indicates that the page space is a
conventional page space used to record pageable private area pages. 

It appears that we should take the default of NOSWAP for our LOCALs and
PLPA/COMMON datasets.  But since we don't currently "swap-out" address
spaces like "in the old days" (we don't have any specific SWAP
datasets), should we consider defining a subset of our new page datasets
with the SWAP parameter?  If so, how many or what proportion?  Since
nowadays just about everything is a "high-speed data set" (device),
would it make a measurable difference one way or the other?

Any advice / recommendations / caveats would be appreciated.

TIA,

-jc-


--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html

Convert EBCDIC to ASCII in batch?

[McKown, John]

I cannot think of an easy way to do this, so I thought that I'd ask. I
want to copy a sequential file to another sequential file (both on DASD,
not tape!), translating the contents from EBCDIC (CP-037) to ASCII
(ISO8859-1). I can think of a way to do it using UNIX services, but I'm
hoping for a simplier method. The ASCII file is to be transferred to a
Windows system, so each line must end in CRLF.

Yes, I could use Dovetailed Technologies' "fromdsn" and "todsn" piped to
each other, but that seems "silly" to me.

--
John McKown
Senior Systems Programmer
HealthMarkets
Keeping the Promise of Affordable Coverage
Administrative Services Group
Information Technology

The information contained in this e-mail message may be privileged
and/or confidential.  It is for intended addressee(s) only.  If you are
not the intended recipient, you are hereby notified that any disclosure,
reproduction, distribution or other use of this communication is
strictly prohibited and could, in certain circumstances, be a criminal
offense.  If you have received this e-mail in error, please notify the
sender by reply and delete this message without copying or disclosing
it. 

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html

Re: Create AWStape file from DASD file

[Roger Bowler]

On Thu, 20 Mar 2008 09:29:51 +0200, GADI_B wrote:
>Does anyone know of a way to create the AWStape file directly from a file
>on DASD without writing to tape first?

The AWSSL utility by Reed H. Petty is what you are looking for.
It's distributed with Hercules and is documented in:
http://www.hercules-390.org/HerculesUserReference.pdf

AWSSL is also available from the CBT tape website:
http://www.cbttape.org/awstape.htm

Regards,
Roger Bowler
http://perso.wanadoo.fr/rbowler
Hercules "the people's mainframe"

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html

Re: MVS initiated FTP to Windows

[Betsy Jeffery]

We have just implemented a solution for such a transfer.  We are required to 
secure all data transfers internal or external.  For z/OS to Unix to Linux we 
use 
FTP over System SSL on the z/OS side, lftp and proftp on Unix / Linux 
respectively.  For Windows, our shop did not change to use a server that 
understands SSL/TLS, they use SSHTectia as an ftp server.  For z/OS to 
Windows, the z/OS side uses OpenSSH/sftp from IBM's Ported Tools.  The 
downside to this is the requirement to copy files in/out of USS as sftp doesn't 
understand MVS dataset formats.  It's extra JCL and disk.  There are other 
tools such as Dovetail's dspipes to help with this copying but we are not using 
them.  The sftp requires pub/private key exchange with the id's performing the 
transfer.  ssh-keygen is supported both on the Windows and z/OS-USS 
platforms.

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html

Re: Convert EBCDIC to ASCII in batch?

[Michael Knigge]

not tape!), translating the contents from EBCDIC (CP-037) to ASCII
(ISO8859-1). I can think of a way to do it using UNIX services, but I'm
hoping for a simplier method. The ASCII file is to be transferred to a
Windows system, so each line must end in CRLF.


Why do you want to convert it first and than transfer it? If you 
transfer the file via FTP in ASCII-Mode, the file is converted and CRLF 
is appended to each record.



Bye,
MK

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html

Re: Convert EBCDIC to ASCII in batch?

[GAVIN Darren * OPS EAS]

The FTP transfer can do the translation for you.

However if you want to translate via a program, something like the
following in Cobol.

01  WS-NUMERIC-FIELDS SYNCHRONIZED.   
 05  WS-POSPIC S9(9) COMP. 
 05  WS-POS2   PIC S9(9) COMP. 
 05  WS-POS3   PIC S9(9) COMP. 
 05  WS-LENPIC S9(9) COMP. 
 05  WS-SIZE   PIC S9(9) COMP. 

/*
* IN-TEXT and OUT-TEXT only need single character, as calling 
* program passes the actual length.   
**
 LINKAGE SECTION. 
 01  IN-TEXT   PIC X. 
 01  IN-LENPIC 9(9) COMP. 
 01  IN-TEXT2  PIC X. 
 01  IN-LEN2   PIC 9(9) COMP. 
 01  OUT-TEXT  PIC X. 
 01  OUT-LEN   PIC 9(9) COMP. 
 01  OUT-TEXT2 PIC X. 
 01  OUT-LEN2  PIC 9(9) COMP. 
 01  OUT-CHARS PIC S9(9) COMP.

/*
* Convert EBCDIC to ASCII, passes call to TCP/IP service for  
* conversion  
**
 1700-CONV-EBCDIC-TO-ASCII.   
  
 IF IN-LEN <= 0 AND IN-LEN > 32767
 PERFORM 9004-MSG-INV-INPUT THRU 9004-EXIT
 ELSE 
  
   IF OUT-LEN <= 0 AND OUT-LEN > 32767
   PERFORM 9005-MSG-INV-OUTPUT THRU 9005-EXIT 
   ELSE   
  
 IF IN-LEN NOT = OUT-LEN  
 PERFORM 9007-MSG-MISMATCH-LEN THRU 9007-EXIT 
  
 ELSE 
 MOVE IN-TEXT(1:IN-LEN) TO OUT-TEXT(1:OUT-LEN)
 MOVE OUT-LEN TO WS-LEN   
 CALL 'EZACIC04' USING OUT-TEXT WS-LEN
 END-IF   
   END-IF 
 END-IF.  
  
 1700-EXIT. EXIT. 

/*
* Convert ASCII to EBCDIC, passes call to TCP/IP service for  
* conversion  
**
 1800-CONV-ASCII-TO-EBCDIC.   
  
 IF IN-LEN <= 0 AND IN-LEN > 32767
 PERFORM 9004-MSG-INV-INPUT THRU 9004-EXIT
 ELSE 
  
   IF OUT-LEN <= 0 AND OUT-LEN > 32767
   PERFORM 9005-MSG-INV-OUTPUT THRU 9005-EXIT 
   ELSE   
  
 IF IN-LEN NOT = OUT-LEN  
 PERFORM 9007-MSG-MISMATCH-LEN THRU 9007-EXIT 
  
 ELSE 
 MOVE IN-TEXT(1:IN-LEN) TO OUT-TEXT(1:OUT-LEN)
 MOVE OUT-LEN TO WS-LEN   
 CALL 'EZACIC05' USING OUT-TEXT OUT-LEN   
 END-IF   
   END-IF 
 END-IF.  
  
 1800-EXIT. EXIT. 


Those 2 subroutines need DSN=SYS1.TCPIP.SEZATCP,DISP=SHR in the linklist
or the syslibs.   

Darren   

---

Re: Define Pagespace -- SWAP vs NOSWAP?

[Eric Bielefeld]

So, you're renovating your page datasets.  How do you do that?  Do you take a 
hammer and chisel and carve out some extra space on the disk?  (I couldn't 
resist - its almost Friday).

Actually, as others have pointed out, swap datasets are pretty much dead.  The 
paging algorithms have been changed to efficiently swap to the regular page 
datasets.  Just make sure that you leave them about two thirds empty during 
peak periods, which you can monitor using RMF reports.

Eric

 "Chase wrote: 
> Hi, All,
> 
> We're renovating our page dataset allocations (z/OS 1.7 -> 1.9) and
> found that our previously-used DEFINE specs from "many moons ago" need
> "tweaking" beyond space and volser;  specifically, SWAP vs NOSWAP.  From
> reading the following:
> 
>   SWAP|NOSWAP 
>   specifies whether page space is defined for
> local system queue area (LSQA) pages or for pageable private area pages.
> (Auxiliary storage management separates private area address space pages
> into LSQA pages and pageable private area pages.) 
> 
>   SWAP Specifies that the page space is a
> high-speed data set used during a swap operation to store and retrieve
> the set of LSQA pages owned by an address space. 
> 
>   NOSWAP Indicates that the page space is a
> conventional page space used to record pageable private area pages. 
> 
> It appears that we should take the default of NOSWAP for our LOCALs and
> PLPA/COMMON datasets.  But since we don't currently "swap-out" address
> spaces like "in the old days" (we don't have any specific SWAP
> datasets), should we consider defining a subset of our new page datasets
> with the SWAP parameter?  If so, how many or what proportion?  Since
> nowadays just about everything is a "high-speed data set" (device),
> would it make a measurable difference one way or the other?
> 
> Any advice / recommendations / caveats would be appreciated.
> 
> TIA,
> 
> -jc-
--
Eric Bielefeld
Systems Programmer
Aviva USA
Des Moines, Iowa
515-645-5153

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html

Re: Convert EBCDIC to ASCII in batch?

[Thompson, Steve]

-Original Message-
From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED] On
Behalf Of McKown, John
Sent: Thursday, March 20, 2008 10:04 AM
To: IBM-MAIN@bama.ua.edu
Subject: Convert EBCDIC to ASCII in batch?

I cannot think of an easy way to do this, so I thought that I'd ask. I
want to copy a sequential file to another sequential file (both on DASD,
not tape!), translating the contents from EBCDIC (CP-037) to ASCII
(ISO8859-1). I can think of a way to do it using UNIX services, but I'm
hoping for a simplier method. The ASCII file is to be transferred to a
Windows system, so each line must end in CRLF.


As far as I know, you can FTP the file with translation to the same
system. I haven't tried specifically what you are asking, but it seems
simple enough. And while you are doing it, you could just send it on to
the Windows system -- unless the Windows system has to pull it...

And, of course, you can do this with a batch job (using REXX, CLIST,
etc.), so anyone could invoke it.

Regards,
Steve Thompson

-- All opinions expressed by me are my own and may not necessarily
reflect those of my employer. --
 

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html

Re: Convert EBCDIC to ASCII in batch?

[Mark Zelden]

On Thu, 20 Mar 2008 10:04:11 -0500, McKown, John
<[EMAIL PROTECTED]> wrote:

>I cannot think of an easy way to do this, so I thought that I'd ask. I
>want to copy a sequential file to another sequential file (both on DASD,
>not tape!), translating the contents from EBCDIC (CP-037) to ASCII
>(ISO8859-1). I can think of a way to do it using UNIX services, but I'm
>hoping for a simplier method. The ASCII file is to be transferred to a
>Windows system, so each line must end in CRLF.
>

Write a program that uses ICONV()?I've used this program (don't 
recall where it came from):

 TITLE 'CONVERT FROM EBCDIC TO ASCII'
EB2ASCSECT   
*
 USING *,3   
 STM   14,12,12(13)  
 LR3,15  
 ST13,SAVEAREA+4 
 LA12,SAVEAREA   
 ST12,8(0,13)
 LR13,12 
 OPEN  (EFILE,(INPUT),AFILE,(OUTPUT))
 LH4,EFILE+82  GET LENGTH OF INPUT RECORD
READ EQU   * 
 GET   EFILE,WORKAREA
 XLATE WORKAREA,(4),TO=A 
 PUT   AFILE,WORKAREA
 B READ  
ENDEFILE CLOSE (EFILE,,AFILE)
GOBACK   L 13,SAVEAREA+4 
 LM14,12,12(13)  
 LA15,0  
 BR14
*
SAVEAREA DC18F'0'
*
AFILEDCB   DDNAME=AFILE,MACRF=PM,DSORG=PS
*
EFILEDCB   DDNAME=EFILE,MACRF=GM,DSORG=PS,EODAD=ENDEFILE 
*
WORKAREA DSCL32760   
*
 END   EB2AS 

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html

Re: Stand alone Dump with ICC cards

[Andy White]

Thanks we tried that a few times just got a xwait... Do you code in the 
macro below the 4 digit console that way? Thats what im wondering.
Andy 
Internet: Mailto:[EMAIL PROTECTED]


"IBM Mainframe Discussion List"  wrote on 03/20/2008 
10:28:36 AM:

> It is probably waiting for an interrupt from the device. Hit RESET/ENTER
> and it should wake up..
> 
> 
> Is anyone out there using ICC for a z/OS console. We are switching over 
> from our 3174's and started to use ICC consoles so I thought id ask our 
> operator  to do a SAD from it. The first problem I had was I didn't
> change 
> the SAD to use the new console (address 1300) I changed it had them we
> do 
> it but we get  a xwait on the emulator, like it cant find the console. 
> 
> Here is what I have coded job ran with zero's, No wait state just sits 
> there the system
> 
>  AMDSADMP IPL=D3390,VOLSER=AVE3EC,
> X
>MINASID=ALL, X
>DDSPROMPT=YES,X
>OUTPUT=T1511,X
>REUSEDS=CHOICE,X
>CONSOLE=((1300,3278),(1310,3278)) 
>  END 
> 
> Is there anything that needs to be coded for a ICC type of console to do
> a 
> SAD? Thanks in advance.
> 
>


The information contained in this message may be CONFIDENTIAL and is for the 
intended addressee only.  Any unauthorized use, dissemination of the 
information, or copying of this message is prohibited.  If you are not the 
intended addressee, please notify the sender immediately and delete this 
message.

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html

Re: Convert EBCDIC to ASCII in batch?

[Kirk Wolf]

Or you could use fromdsn with Co:Z to transfer and convert in one step (over
SSH).

// EXEC COZPROC,ARGS='[EMAIL PROTECTED]'
//STDIN DD *
  fromdsn -s IBM037 -t ISO8859-1 //MVS.DATASET > c:\data\myfile.txt
//

(the -s and -t are probably not necessary, the default will be to use the
default z/OS and windows codepages)

Kirk Wolf
Dovetailed Technologies
http://dovetail.com/coz


On Thu, Mar 20, 2008 at 10:04 AM, McKown, John <
[EMAIL PROTECTED]> wrote:

> I cannot think of an easy way to do this, so I thought that I'd ask. I
> want to copy a sequential file to another sequential file (both on DASD,
> not tape!), translating the contents from EBCDIC (CP-037) to ASCII
> (ISO8859-1). I can think of a way to do it using UNIX services, but I'm
> hoping for a simplier method. The ASCII file is to be transferred to a
> Windows system, so each line must end in CRLF.
>
> Yes, I could use Dovetailed Technologies' "fromdsn" and "todsn" piped to
> each other, but that seems "silly" to me.
>
> --
> John McKown
> Senior Systems Programmer
> HealthMarkets
> Keeping the Promise of Affordable Coverage
> Administrative Services Group
> Information Technology
>
> The information contained in this e-mail message may be privileged
> and/or confidential.  It is for intended addressee(s) only.  If you are
> not the intended recipient, you are hereby notified that any disclosure,
> reproduction, distribution or other use of this communication is
> strictly prohibited and could, in certain circumstances, be a criminal
> offense.  If you have received this e-mail in error, please notify the
> sender by reply and delete this message without copying or disclosing
> it.
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
> Search the archives at http://bama.ua.edu/archives/ibm-main.html
>

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html

Re: Define Pagespace -- SWAP vs NOSWAP?

[Edward Jaffe]

Eric Bielefeld wrote:

Actually, as others have pointed out, swap datasets are pretty much dead.  The 
paging algorithms have been changed to efficiently swap to the regular page 
datasets.


This is not what was done! The concept of "physical swap" was removed 
entirely. The operating system no longer performs that function.


--
Edward E Jaffe
Phoenix Software International, Inc
5200 W Century Blvd, Suite 800
Los Angeles, CA 90045
310-338-0400 x318
[EMAIL PROTECTED]
http://www.phoenixsoftware.com/

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html

Re: Convert EBCDIC to ASCII in batch?

[McKown, John]

> -Original Message-
> From: IBM Mainframe Discussion List 
> [mailto:[EMAIL PROTECTED] On Behalf Of Michael Knigge
> Sent: Thursday, March 20, 2008 10:27 AM
> To: IBM-MAIN@bama.ua.edu
> Subject: Re: Convert EBCDIC to ASCII in batch?
> 
> Why do you want to convert it first and than transfer it? If you 
> transfer the file via FTP in ASCII-Mode, the file is 
> converted and CRLF 
> is appended to each record.
> 
> 
> Bye,
> MK

I guess that I should have said why I am looking at this. We have an ftp
which fails consistently. Absolutely 100% reproducible. At the request
of the Windows server people, I transferred the same file to the same,
failing, server using BINARY mode. The file transfer succeeded. I
immediately tried doing the exact same file to the same server using
ASCII mode and it failed again. So, the next thing that the Windows
people are likely to say will be: "Since the BINARY transfer succeeded
and the ASCII one failed, the problem __must__ be with z/OS doing an
ASCII transfer! Why don't you just convert the file to ASCII on your
side, then do a BINARY ftp of the already converted file?" 

As we all know, z/OS is always the problem in a case such as this. This
despite the following facts: 
1) I can do the exact same transfer to another Windows ftp server just
fine, consistently; 
2) I can do the exact same transfer to a Linux server just fine; 
3) I cannot transfer the same file from my desktop to the "failing"
server (Windows desktop to Windows server); and 
4) I cannot transfer the file from the "successful" Windows server to
the "failing" Windows server (Windows server to Windows server).

In case 3, I got the file to my desktop via ftp. When I then tried to
ftp to the failing server, it failed. Oh, I also forgot to mention that
I can ftp smaller files. The file being transferred is around 9 gig in
size.

--
John McKown
Senior Systems Programmer
HealthMarkets
Keeping the Promise of Affordable Coverage
Administrative Services Group
Information Technology

The information contained in this e-mail message may be privileged
and/or confidential.  It is for intended addressee(s) only.  If you are
not the intended recipient, you are hereby notified that any disclosure,
reproduction, distribution or other use of this communication is
strictly prohibited and could, in certain circumstances, be a criminal
offense.  If you have received this e-mail in error, please notify the
sender by reply and delete this message without copying or disclosing
it. 

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html

Re: Convert EBCDIC to ASCII in batch?

[McKown, John]

> -Original Message-
> From: IBM Mainframe Discussion List 
> [mailto:[EMAIL PROTECTED] On Behalf Of Kirk Wolf
> Sent: Thursday, March 20, 2008 10:44 AM
> To: IBM-MAIN@bama.ua.edu
> Subject: Re: Convert EBCDIC to ASCII in batch?
> 
> 
> Or you could use fromdsn with Co:Z to transfer and convert in 
> one step (over
> SSH).
> 
> // EXEC COZPROC,ARGS='[EMAIL PROTECTED]'
> //STDIN DD *
>   fromdsn -s IBM037 -t ISO8859-1 //MVS.DATASET > c:\data\myfile.txt
> //
> 
> (the -s and -t are probably not necessary, the default will 
> be to use the
> default z/OS and windows codepages)
> 
> Kirk Wolf
> Dovetailed Technologies
> http://dovetail.com/coz

I decided to give this a look. OUCH, MY ACHING CPU! I used DTLSPAWN with
the commands:

fromdsn -l crlf -t 819 "//DD:INPUT1" |
todsn -b "//DD:OUTPUT1"

The job was using about 25% CPU, consistently, before I cancelled it.
The files are huge, about 16,000+ tracks. In our CPU critical shop, this
is just not going to fly. Oh, I had to use "todsn" because we just don't
have enough UNIX filesystem space to hold this stuff.

--
John McKown
Senior Systems Programmer
HealthMarkets
Keeping the Promise of Affordable Coverage
Administrative Services Group
Information Technology

The information contained in this e-mail message may be privileged
and/or confidential.  It is for intended addressee(s) only.  If you are
not the intended recipient, you are hereby notified that any disclosure,
reproduction, distribution or other use of this communication is
strictly prohibited and could, in certain circumstances, be a criminal
offense.  If you have received this e-mail in error, please notify the
sender by reply and delete this message without copying or disclosing
it. 

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html

Re: Convert EBCDIC to ASCII in batch?

[Mark Zelden]

On Thu, 20 Mar 2008 10:39:28 -0500, Mark Zelden <[EMAIL PROTECTED]>
wrote:

>On Thu, 20 Mar 2008 10:04:11 -0500, McKown, John
><[EMAIL PROTECTED]> wrote:
>
>>I cannot think of an easy way to do this, so I thought that I'd ask. I
>>want to copy a sequential file to another sequential file (both on DASD,
>>not tape!), translating the contents from EBCDIC (CP-037) to ASCII
>>(ISO8859-1). I can think of a way to do it using UNIX services, but I'm
>>hoping for a simplier method. The ASCII file is to be transferred to a
>>Windows system, so each line must end in CRLF.
>>
>
>Write a program that uses ICONV()?I've used this program (don't
>recall where it came from):
>



 BROWSESYS1.CEE.SCEEPROC(EDCICONV)Line  Col 001 080
 Command ===>  Scroll ===> CSR 
* Top of Data *
// 
//*  * 
//* OS/390 Language Environment  * 
//*  * 
//* Licensed Materials - Property of IBM.* 
//*  * 
//* 5645-001 * 
//*  * 
//* (C) Copyright IBM CORP. 1993, 1996 All Rights Reserved   * 
//*  * 
//* US GOVERNMENT USERS RESTRICTED RIGHTS - USE, * 
//* DUPLICATION OR DISCLOSURE RESTRICTED BY GSA ADP  * 
//* SCHEDULE CONTRACT WITH IBM CORP. * 
//*  * 
//* Status = JMWL650 * 
//*  * 
// 
//*  * 
//* EDCICONV --- INVOKE ICONV UTILITY TO CONVERT THE INPUT FILE FROM * 
//* THE SPECIFIED CODESET TO THE SPECIFIED CODESET.  * 
//*  * 
// 
//*  * 
//EDCICONV PROC INFILE=, < INPUT DATA SET  
//   REGSIZ='6144K', < ICONV REGION SIZE   
//   OUTFILE=,   < OUTPUT DATA SET 
//   FROMC=, < INPUT CODE SET NAME 
//   TOC=,   < OUTPUT CODE SET NAME
//   LIBPRFX='CEE'   < PREFIX FOR LIBRARY DSN  
//*
//EDCICONV  EXEC PGM=EDCICONV,REGION=®SIZ,  
//  PARM=('FROMCODE(&FROMC),TOCODE(&TOC)') 
//STEPLIB   DD DSNAME=&LIBPRFX..SCEERUN,DISP=SHR   
//SYSUT1DD DSNAME=&INFILE,DISP=SHR 
//SYSUT2DD DSNAME=&OUTFILE,DISP=SHR
//SYSPRINT  DD SYSOUT=*
//SYSIN DD DUMMY 

  

--
Mark Zelden
Sr. Software and Systems Architect - z/OS Team Lead
Zurich North America / Farmers Insurance Group - ZFUS G-ITO
mailto:[EMAIL PROTECTED]
z/OS Systems Programming expert at http://expertanswercenter.techtarget.com/
Mark's MVS Utilities: http://home.flash.net/~mzelden/mvsutil.html

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html

Re: Convert EBCDIC to ASCII in batch?

[McKown, John]

> -Original Message-
> From: IBM Mainframe Discussion List 
> [mailto:[EMAIL PROTECTED] On Behalf Of Mark Zelden
> Sent: Thursday, March 20, 2008 10:58 AM
> To: IBM-MAIN@bama.ua.edu
> Subject: Re: Convert EBCDIC to ASCII in batch?

[snip]

> 
>  BROWSESYS1.CEE.SCEEPROC(EDCICONV)Line 


[snip]
  
> 
> --
> Mark Zelden

Many thanks!

--
John McKown
Senior Systems Programmer
HealthMarkets
Keeping the Promise of Affordable Coverage
Administrative Services Group
Information Technology

The information contained in this e-mail message may be privileged
and/or confidential.  It is for intended addressee(s) only.  If you are
not the intended recipient, you are hereby notified that any disclosure,
reproduction, distribution or other use of this communication is
strictly prohibited and could, in certain circumstances, be a criminal
offense.  If you have received this e-mail in error, please notify the
sender by reply and delete this message without copying or disclosing
it. 

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html

Re: Convert EBCDIC to ASCII in batch?

[Kirk Wolf]

Thats curious.   The code uses the C library to do dataset I/O and of course
you would have pipe I/O between the processes.
One variable is whether you have Unicode Services enabled for these
codepages or not - we fall back to ICONV() if not, which can be more
expensive.  Might also be some LE (CEERUNOPTS)  tuning problem.  What DCBs
are the datasets?   I'd like to see if I can reproduce this problem.

Kirk

On Thu, Mar 20, 2008 at 10:53 AM, McKown, John <
[EMAIL PROTECTED]> wrote:

>
> I decided to give this a look. OUCH, MY ACHING CPU! I used DTLSPAWN with
> the commands:
>
> fromdsn -l crlf -t 819 "//DD:INPUT1" |
> todsn -b "//DD:OUTPUT1"
>
> The job was using about 25% CPU, consistently, before I cancelled it.
> The files are huge, about 16,000+ tracks. In our CPU critical shop, this
> is just not going to fly. Oh, I had to use "todsn" because we just don't
> have enough UNIX filesystem space to hold this stuff.
>
> --
> John McKown
> Senior Systems Programmer
> HealthMarkets
> Keeping the Promise of Affordable Coverage
> Administrative Services Group
> Information Technology
>
> The information contained in this e-mail message may be privileged
> and/or confidential.  It is for intended addressee(s) only.  If you are
> not the intended recipient, you are hereby notified that any disclosure,
> reproduction, distribution or other use of this communication is
> strictly prohibited and could, in certain circumstances, be a criminal
> offense.  If you have received this e-mail in error, please notify the
> sender by reply and delete this message without copying or disclosing
> it.
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
> Search the archives at http://bama.ua.edu/archives/ibm-main.html
>

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html

Re: Stand alone Dump with ICC cards

[Clifford McNeill]

Andy,
 
We use the ICC controllers for consoles and have not had a problem doing SA 
dumps.  Here is our console piece of the AMDSADMP macro.
 
 CONSOLE=((200,3278),(201,3278),(300,3278),(301,3278))
 
here is the ICC/OSA setup
 










Number
Name
IP Addr
Type
DHD
RSP
RTO











200
UTM10001
10.10.10.11
Console
Enable 600
Enable
10 Sec











201
UTM10002
10.10.10.13
Console
Enable 600
Enable
10 Sec











300
UTM10009
10.10.10.11
Console
Enable 600
Enable
10 Sec










301
UTM10010
10.10.10.42
Console
Enable 600
Enable
10 Sec
Cliff McNeill
MD Anderson Cancer Center
 
_
Connect and share in new ways with Windows Live.
http://www.windowslive.com/share.html?ocid=TXT_TAGHM_Wave2_sharelife_012008
--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html

Re: Convert EBCDIC to ASCII in batch?

[McKown, John]

> -Original Message-
> From: IBM Mainframe Discussion List 
> [mailto:[EMAIL PROTECTED] On Behalf Of Kirk Wolf
> Sent: Thursday, March 20, 2008 11:03 AM
> To: IBM-MAIN@bama.ua.edu
> Subject: Re: Convert EBCDIC to ASCII in batch?
> 
> 
> Thats curious.   The code uses the C library to do dataset 
> I/O and of course
> you would have pipe I/O between the processes.
> One variable is whether you have Unicode Services enabled for these
> codepages or not - we fall back to ICONV() if not, which can be more
> expensive.  Might also be some LE (CEERUNOPTS)  tuning 
> problem.  What DCBs
> are the datasets?   I'd like to see if I can reproduce this problem.
> 
> Kirk

Hum, I'll look at the UNICODE tables that I have. I don't have many
defined due to lack of interest. The input DCB is FB/15/27990. The
output DCB which I chose more or less randomly was VB/6000/6144. I think
that I need VB, but the LRECL and BLKSIZE are likely not too important.
Or maybe the LRECL should be 21?

--
John McKown
Senior Systems Programmer
HealthMarkets
Keeping the Promise of Affordable Coverage
Administrative Services Group
Information Technology

The information contained in this e-mail message may be privileged
and/or confidential.  It is for intended addressee(s) only.  If you are
not the intended recipient, you are hereby notified that any disclosure,
reproduction, distribution or other use of this communication is
strictly prohibited and could, in certain circumstances, be a criminal
offense.  If you have received this e-mail in error, please notify the
sender by reply and delete this message without copying or disclosing
it. 

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html

Re: Convert EBCDIC to ASCII in batch?

[Mark Zelden]

On Thu, 20 Mar 2008 10:57:30 -0500, Mark Zelden <[EMAIL PROTECTED]>
wrote:

>On Thu, 20 Mar 2008 10:39:28 -0500, Mark Zelden <[EMAIL PROTECTED]>
>wrote:
>
>>On Thu, 20 Mar 2008 10:04:11 -0500, McKown, John
>><[EMAIL PROTECTED]> wrote:
>>
>>>I cannot think of an easy way to do this, so I thought that I'd ask. I
>>>want to copy a sequential file to another sequential file (both on DASD,
>>>not tape!), translating the contents from EBCDIC (CP-037) to ASCII
>>>(ISO8859-1). I can think of a way to do it using UNIX services, but I'm
>>>hoping for a simplier method. The ASCII file is to be transferred to a
>>>Windows system, so each line must end in CRLF.
>>>
>>

>
>
>
> BROWSESYS1.CEE.SCEEPROC(EDCICONV) 



Here is a working sample:

//EDCICONV  EXEC PGM=EDCICONV,
//  PARM=('FROMCODE(IBM-037),TOCODE(ISO8859-1)')  
//STEPLIB   DD DSNAME=SYS1.CEE.SCEERUN,DISP=SHR   
//SYSUT1DD DSNAME=input_file,disp=shr 
//SYSUT2DD DSNAME=output_file,disp=(NEW,CATLG),...   
//SYSPRINT  DD SYSOUT=*   
//SYSIN DD DUMMY  


--
Mark Zelden
Sr. Software and Systems Architect - z/OS Team Lead
Zurich North America / Farmers Insurance Group - ZFUS G-ITO
mailto:[EMAIL PROTECTED]
z/OS Systems Programming expert at http://expertanswercenter.techtarget.com/
Mark's MVS Utilities: http://home.flash.net/~mzelden/mvsutil.html

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html

Re: Convert EBCDIC to ASCII in batch?

[GAVIN Darren * OPS EAS]

It sounds like a setup issue with the failing FTP server, if it works
fine to other ftp servers.



-Original Message-
From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED] On
Behalf Of McKown, John
Sent: Thursday, March 20, 2008 8:49 AM
To: IBM-MAIN@bama.ua.edu
Subject: Re: Convert EBCDIC to ASCII in batch?

> -Original Message-
> From: IBM Mainframe Discussion List 
> [mailto:[EMAIL PROTECTED] On Behalf Of Michael Knigge
> Sent: Thursday, March 20, 2008 10:27 AM
> To: IBM-MAIN@bama.ua.edu
> Subject: Re: Convert EBCDIC to ASCII in batch?
> 
> Why do you want to convert it first and than transfer it? If you 
> transfer the file via FTP in ASCII-Mode, the file is 
> converted and CRLF 
> is appended to each record.
> 
> 
> Bye,
> MK

I guess that I should have said why I am looking at this. We have an ftp
which fails consistently. Absolutely 100% reproducible. At the request
of the Windows server people, I transferred the same file to the same,
failing, server using BINARY mode. The file transfer succeeded. I
immediately tried doing the exact same file to the same server using
ASCII mode and it failed again. So, the next thing that the Windows
people are likely to say will be: "Since the BINARY transfer succeeded
and the ASCII one failed, the problem __must__ be with z/OS doing an
ASCII transfer! Why don't you just convert the file to ASCII on your
side, then do a BINARY ftp of the already converted file?" 

As we all know, z/OS is always the problem in a case such as this. This
despite the following facts: 
1) I can do the exact same transfer to another Windows ftp server just
fine, consistently; 
2) I can do the exact same transfer to a Linux server just fine; 
3) I cannot transfer the same file from my desktop to the "failing"
server (Windows desktop to Windows server); and 
4) I cannot transfer the file from the "successful" Windows server to
the "failing" Windows server (Windows server to Windows server).

In case 3, I got the file to my desktop via ftp. When I then tried to
ftp to the failing server, it failed. Oh, I also forgot to mention that
I can ftp smaller files. The file being transferred is around 9 gig in
size.

--
John McKown
Senior Systems Programmer
HealthMarkets
Keeping the Promise of Affordable Coverage
Administrative Services Group
Information Technology

The information contained in this e-mail message may be privileged
and/or confidential.  It is for intended addressee(s) only.  If you are
not the intended recipient, you are hereby notified that any disclosure,
reproduction, distribution or other use of this communication is
strictly prohibited and could, in certain circumstances, be a criminal
offense.  If you have received this e-mail in error, please notify the
sender by reply and delete this message without copying or disclosing
it. 

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html

Re: Convert EBCDIC to ASCII in batch?

[Paul Gilmartin]

On Thu, 20 Mar 2008 10:39:28 -0500, Mark Zelden wrote:
>
> XLATE WORKAREA,(4),TO=A
>
?!?!?!?!

Doesn't XLATE use the dreadful IGC0010C (IIRC) conversion table?

I might try (totally untested):

//STEP  EXEC  PGM=FTP,PARM='localhost (EXIT'
//TEMP   DD   DISP=(,PASS),DSN=&&TEMP,...
//INPUT  DD   *
  ...
  binary
  quote TYPE A
  quote site sbdataconn=(IBM-1047,ISO8859-1)
  get 'DATA.SET.NAME' DD:TEMP

... perhaps even followed by:

  close
  open windowshost
  ...
  binary
  put DD:TEMP windows.file
  quit

-- gil

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html

Re: Stand alone Dump with ICC cards

[Staller, Allan]

The coding for the SAD looks good to me. If all else fails, the HCM can
be used to control the SAD...


> It is probably waiting for an interrupt from the device. Hit
RESET/ENTER
> and it should wake up..
> 
> 
> Is anyone out there using ICC for a z/OS console. We are switching
over 
> from our 3174's and started to use ICC consoles so I thought id ask
our 
> operator  to do a SAD from it. The first problem I had was I didn't
> change 
> the SAD to use the new console (address 1300) I changed it had them we
> do 
> it but we get  a xwait on the emulator, like it cant find the console.

> 
> Here is what I have coded job ran with zero's, No wait state just sits

> there the system
> 
>  AMDSADMP IPL=D3390,VOLSER=AVE3EC,
> X
>MINASID=ALL, X
>DDSPROMPT=YES,X
>OUTPUT=T1511,X
>REUSEDS=CHOICE,X
>CONSOLE=((1300,3278),(1310,3278)) 
>  END 
> 
> Is there anything that needs to be coded for a ICC type of console to
do
> a 
> SAD? Thanks in advance.
> 
>


The information contained in this message may be CONFIDENTIAL and is for
the intended addressee only.  Any unauthorized use, dissemination of the
information, or copying of this message is prohibited.  If you are not
the intended addressee, please notify the sender immediately and delete
this message.

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html

Re: Convert EBCDIC to ASCII in batch?

[McKown, John]

> -Original Message-
> From: IBM Mainframe Discussion List 
> [mailto:[EMAIL PROTECTED] On Behalf Of GAVIN Darren * OPS EAS
> Sent: Thursday, March 20, 2008 11:17 AM
> To: IBM-MAIN@bama.ua.edu
> Subject: Re: Convert EBCDIC to ASCII in batch?
> 
> 
> It sounds like a setup issue with the failing FTP server, if it works
> fine to other ftp servers.

Actually, I think that I've found the problem. There appears to be a
firewall between the mainframe and the Windows box. The ftp which is
failing is large (small ftps succeed!) and my estimate is that it is
taking just a bit over 2 minutes to complete the data transfer. I think
the firewall is timing out the ftp control connection due to
"inactivity". I have so informed management. Maybe somebody there can
light a fire under the firewall people to get off their fundament and
actually look at it.

--
John McKown
Senior Systems Programmer
HealthMarkets
Keeping the Promise of Affordable Coverage
Administrative Services Group
Information Technology

The information contained in this e-mail message may be privileged
and/or confidential.  It is for intended addressee(s) only.  If you are
not the intended recipient, you are hereby notified that any disclosure,
reproduction, distribution or other use of this communication is
strictly prohibited and could, in certain circumstances, be a criminal
offense.  If you have received this e-mail in error, please notify the
sender by reply and delete this message without copying or disclosing
it. 

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html

Re: Convert EBCDIC to ASCII in batch?

[Mark Zelden]

On Thu, 20 Mar 2008 11:48:18 -0500, Paul Gilmartin <[EMAIL PROTECTED]> wrote:

>On Thu, 20 Mar 2008 10:39:28 -0500, Mark Zelden wrote:
>>
>> XLATE WORKAREA,(4),TO=A
>>
>?!?!?!?!
>
>Doesn't XLATE use the dreadful IGC0010C (IIRC) conversion table?
>

Yes.  

 BROWSESYS1.MACLIB(XLATE)   
 Command ===> 
.SVC SVC   103  ISSUE XLATE SVC 


But it has served me well in the past.   I didn't say it was the best nor only
option and suggested using ICONV() first.  

Mark
--
Mark Zelden
Sr. Software and Systems Architect - z/OS Team Lead
Zurich North America / Farmers Insurance Group - ZFUS G-ITO
mailto:[EMAIL PROTECTED]
z/OS Systems Programming expert at http://expertanswercenter.techtarget.com/
Mark's MVS Utilities: http://home.flash.net/~mzelden/mvsutil.html

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html

Re: Convert EBCDIC to ASCII in batch?

[Rick Fochtman]

---


Actually, I think that I've found the problem. There appears to be a
firewall between the mainframe and the Windows box. The ftp which is
failing is large (small ftps succeed!) and my estimate is that it is
taking just a bit over 2 minutes to complete the data transfer. I think
the firewall is timing out the ftp control connection due to
"inactivity". I have so informed management. Maybe somebody there can
light a fire under the firewall people to get off their fundament and
actually look at it.
 


---
In my experience, you're going to need a oxy-acetylene "Rosebud" to 
generate enough heat! :-)


--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html

Re: Convert EBCDIC to ASCII in batch?

[McKown, John]

> -Original Message-
> From: IBM Mainframe Discussion List 
> [mailto:[EMAIL PROTECTED] On Behalf Of Rick Fochtman
> Sent: Thursday, March 20, 2008 11:59 AM
> To: IBM-MAIN@bama.ua.edu
> Subject: Re: Convert EBCDIC to ASCII in batch?
> 
> 
> ---
> 
> >Actually, I think that I've found the problem. There appears to be a
> >firewall between the mainframe and the Windows box. The ftp which is
> >failing is large (small ftps succeed!) and my estimate is that it is
> >taking just a bit over 2 minutes to complete the data 
> transfer. I think
> >the firewall is timing out the ftp control connection due to
> >"inactivity". I have so informed management. Maybe somebody there can
> >light a fire under the firewall people to get off their fundament and
> >actually look at it.
> >  
> >
> ---
> In my experience, you're going to need a oxy-acetylene "Rosebud" to 
> generate enough heat! :-)

Well, my manager owns cattle and has a "hot shot" that he's not afraid
to use (did use it one time on a teenager who was trespassing and
arrogantly said "What you gonna do, old man?" - which is better than his
son who actually did shoot one with rock salt! - ah the joys of living
in Texas).

--
John McKown
Senior Systems Programmer
HealthMarkets
Keeping the Promise of Affordable Coverage
Administrative Services Group
Information Technology

The information contained in this e-mail message may be privileged
and/or confidential.  It is for intended addressee(s) only.  If you are
not the intended recipient, you are hereby notified that any disclosure,
reproduction, distribution or other use of this communication is
strictly prohibited and could, in certain circumstances, be a criminal
offense.  If you have received this e-mail in error, please notify the
sender by reply and delete this message without copying or disclosing
it. 

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html

Re: Convert EBCDIC to ASCII in batch?

[Howard Brazee]

On 20 Mar 2008 08:06:16 -0700, [EMAIL PROTECTED] (McKown,
John) wrote:

>I cannot think of an easy way to do this, so I thought that I'd ask. I
>want to copy a sequential file to another sequential file (both on DASD,
>not tape!), translating the contents from EBCDIC (CP-037) to ASCII
>(ISO8859-1). I can think of a way to do it using UNIX services, but I'm
>hoping for a simplier method. The ASCII file is to be transferred to a
>Windows system, so each line must end in CRLF.

Why not let the FTP handle it?

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html

Re: ICC

[Ron Wells]

do I need to put the IPaddr of term/emulator in conf...or will it> ICC>> 
pick up what is connecting to it??
Gather the LUname for 3270 has to be there and match on emulator setup...
But for oness defined as Console's ?? 

--
Email Disclaimer
This  E-mail  contains  confidential  information  belonging to the sender, 
which  may be legally privileged information.  This information is intended 
only  for  the use of the individual or entity addressed above.  If you are not 
 the  intended  recipient, or  an  employee  or  agent responsible for 
delivering it to the intended recipient, you are hereby notified that any 
disclosure,  copying, distribution, or the taking of any action in reliance on 
the contents of the E-mail or attached files is strictly prohibited.

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html

S0C4 Abend in RELEASE Command

[Eric Bielefeld]

I am trying to use the RELEASE command with PDS86.  I've used it in the past to 
release extents, and release space from PDS's and leave a certain amount of 
free space.  I keep getting an S0C4 abend at +X'364 into the module.  This is 
the CBT version that comes in load module format in file 035.  I then 
downloaded the source from file 296 and assembled it with the exact same 
results.  

Anyone have any ideas why this doesn't work?

--
Eric Bielefeld
Systems Programmer
Aviva USA
Des Moines, Iowa
515-645-5153

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html

testing

[Carlos A. Bodra]

testing

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html

Re: ICC

[Clifford McNeill]

Ron,
I think you are correct.  We put it there to ensure only specific devices will 
connect as consoles.
  Cliff McNeill



> Date: Thu, 20 Mar 2008 12:18:36 -0500> From: [EMAIL PROTECTED]> Subject: Re: 
> ICC> To: IBM-MAIN@bama.ua.edu> > do I need to put the IPaddr of term/emulator 
> in conf...or will it> ICC>> > pick up what is connecting to it??> Gather the 
> LUname for 3270 has to be there and match on emulator setup...> But for oness 
> defined as Console's ?? > > 
> --> Email 
> Disclaimer> This E-mail contains confidential information belonging to the 
> sender, which may be legally privileged information. This information is 
> intended only for the use of the individual or entity addressed above. If you 
> are not the intended recipient, or an employee or agent responsible for 
> delivering it to the intended recipient, you are hereby notified that any 
> disclosure, copying, distribution, or the taking of any action in reliance on 
> the contents of the E-mail or attached files is strictly prohibited.> > 
> --> For 
> IBM-MAIN subscribe / signoff / archive access instructions,> send email to 
> [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO> Search the archives at 
> http://bama.ua.edu/archives/ibm-main.html
_
Connect and share in new ways with Windows Live.
http://www.windowslive.com/share.html?ocid=TXT_TAGHM_Wave2_sharelife_012008
--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html

Re: S0C4 Abend in RELEASE Command

[John P Kalinich]

Eric Bielefeld of the IBM Mainframe Discussion List 
wrote on 03/20/2008 12:53:13 PM:

> I am trying to use the RELEASE command with PDS86.  I've used it in
> the past to release extents, and release space from PDS's and leave
> a certain amount of free space.  I keep getting an S0C4 abend at
> +X'364 into the module.  This is the CBT version that comes in load
> module format in file 035.  I then downloaded the source from file
> 296 and assembled it with the exact same results.
>
> Anyone have any ideas why this doesn't work?
>

Did you assemble with the following SETC?  I think it defaults to something
else.

&MVSLEV  SETC  'MVS220'

Regards,
John K

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html

Re: Convert EBCDIC to ASCII in batch?

[Todd Burch]

If this is a COBOL file, and you can FTP it to Windows in binary, along with
the copybook, I have a utility I wrote (runs on Unix and Windows) that will
convert those 16,000 tracks to ASCII text and you could time it with the
secondhand on your wristwatch.  

Todd

> -Original Message-
> From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED] On
> Behalf Of McKown, John
> Sent: Thursday, March 20, 2008 9:04 AM
> To: IBM-MAIN@bama.ua.edu
> Subject: Convert EBCDIC to ASCII in batch?
> 
> I cannot think of an easy way to do this, so I thought that I'd ask. I
> want to copy a sequential file to another sequential file (both on DASD,
> not tape!), translating the contents from EBCDIC (CP-037) to ASCII
> (ISO8859-1). I can think of a way to do it using UNIX services, but I'm
> hoping for a simplier method. The ASCII file is to be transferred to a
> Windows system, so each line must end in CRLF.
> 
 

No virus found in this outgoing message.
Checked by AVG. 
Version: 7.5.519 / Virus Database: 269.21.7/1335 - Release Date: 3/19/2008
9:54 AM
 

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html

How to Split a record ? (DFSORT ?)

[ITURIEL DO NASCIMENTO NETO]

LEGAL ADVICE This message is 
exclusively destined for the people to whom it is directed, and it can bear 
private and/or legally exceptional information. If you are not addressee of 
this message, since now you are advised to not release, copy, distribute, check 
or, otherwise, use the information contained in this message, because it is 
illegal. If you received this message by mistake, we ask you to return this 
email, making possible, as soon as possible, the elimination of its contents of 
your database, registrations or controls system. The message that bears any 
mandatory links, issued by someone who has no representation powers, shall be 
null or void.

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html

How to Split a record ? (DFSORT ?)

[ITURIEL DO NASCIMENTO NETO]

LEGAL ADVICE This message is 
exclusively destined for the people to whom it is directed, and it can bear 
private and/or legally exceptional information. If you are not addressee of 
this message, since now you are advised to not release, copy, distribute, check 
or, otherwise, use the information contained in this message, because it is 
illegal. If you received this message by mistake, we ask you to return this 
email, making possible, as soon as possible, the elimination of its contents of 
your database, registrations or controls system. The message that bears any 
mandatory links, issued by someone who has no representation powers, shall be 
null or void.

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html

How to Split a Record ? (DFSORT ?)

[ITURIEL DO NASCIMENTO NETO]

Hi all,

I'm sorry for reposting, but sometimes weird things happen to my
emails...

Once i have a dataset (80 positions), is there an easy way to split the
records, specifying the initial column  ?
Like this :
+---5---105---20




Generating (Split in column 13)
+---5---105---20







Thanks in advance.

Atenciosamente / Regards / Saludos 
Banco Bradesco S/A 
4254/DPCD Alphaville 
Engenharia de Software - Sistemas Operacionais Mainframes 
Ituriel do Nascimento Neto 
Tel: 55 11 4197-2021 Fax: 55 11 4197-2814 


AVISO LEGAL Esta mensagem é 
destinada exclusivamente para a(s) pessoa(s) a quem é dirigida, podendo conter 
informação confidencial e/ou legalmente privilegiada. Se você não for 
destinatário desta mensagem, desde já fica notificado de abster-se a divulgar, 
copiar, distribuir, examinar ou, de qualquer forma, utilizar a informação 
contida nesta mensagem, por ser ilegal. Caso você tenha recebido esta mensagem 
por engano, pedimos que nos retorne este E-Mail, promovendo, desde logo, a 
eliminação do seu conteúdo em sua base de dados, registros ou sistema de 
controle. Fica desprovida de eficácia e validade a mensagem que contiver 
vínculos obrigacionais, expedida por quem não detenha poderes de representação. 


LEGAL ADVICE This message is 
exclusively destined for the people to whom it is directed, and it can bear 
private and/or legally exceptional information. If you are not addressee of 
this message, since now you are advised to not release, copy, distribute, check 
or, otherwise, use the information contained in this message, because it is 
illegal. If you received this message by mistake, we ask you to return this 
email, making possible, as soon as possible, the elimination of its contents of 
your database, registrations or controls system. The message that bears any 
mandatory links, issued by someone who has no representation powers, shall be 
null or void.

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html

Re: S0C4 Abend in RELEASE Command

[Eric Bielefeld]

Thanks John,

That was it.  I figured it was something simple.  The correct setc was 
commented, so I reversed the two.

Eric

 John P Kalinich <[EMAIL PROTECTED]> wrote: 
> Eric Bielefeld of the IBM Mainframe Discussion List 
> wrote on 03/20/2008 12:53:13 PM:
> 
> > I am trying to use the RELEASE command with PDS86.  I've used it in
> > the past to release extents, and release space from PDS's and leave
> > a certain amount of free space.  I keep getting an S0C4 abend at
> > +X'364 into the module.  This is the CBT version that comes in load
> > module format in file 035.  I then downloaded the source from file
> > 296 and assembled it with the exact same results.
> >
> > Anyone have any ideas why this doesn't work?
> >
> 
> Did you assemble with the following SETC?  I think it defaults to something
> else.
> 
> &MVSLEV  SETC  'MVS220'
> 
> Regards,
> John K
--
Eric Bielefeld
Systems Programmer
Aviva USA
Des Moines, Iowa
515-645-5153

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html

Re: Define Pagespace -- SWAP vs NOSWAP?

[Jim Mulder]

IBM Mainframe Discussion List  wrote on 03/20/2008 
10:24:50 AM:

> We're renovating our page dataset allocations (z/OS 1.7 -> 1.9) and
> found that our previously-used DEFINE specs from "many moons ago" need
> "tweaking" beyond space and volser;  specifically, SWAP vs NOSWAP.  From
> reading the following:
> 
>  SWAP|NOSWAP 
>  specifies whether page space is defined for
> local system queue area (LSQA) pages or for pageable private area pages.
> (Auxiliary storage management separates private area address space pages
> into LSQA pages and pageable private area pages.) 
> 
>  SWAP Specifies that the page space is a
> high-speed data set used during a swap operation to store and retrieve
> the set of LSQA pages owned by an address space. 
> 
>  NOSWAP Indicates that the page space is a
> conventional page space used to record pageable private area pages. 
> 
> It appears that we should take the default of NOSWAP for our LOCALs and
> PLPA/COMMON datasets.  But since we don't currently "swap-out" address
> spaces like "in the old days" (we don't have any specific SWAP
> datasets), should we consider defining a subset of our new page datasets
> with the SWAP parameter?  If so, how many or what proportion?  Since
> nowadays just about everything is a "high-speed data set" (device),
> would it make a measurable difference one way or the other?
> 

  ASM support for SWAP data sets was removed in OS/390 2.10. 

Jim Mulder   z/OS System Test   IBM Corp.  Poughkeepsie,  NY

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html

S878 abend adding volumes to SMS in batch

[Chris Burgess]

I have been trying to add volumes to a SMS storage pool in batch using the 
JCL in the SYS1.SACBCNTL. In the first run it added about 150 volumes before 
abending with SYSTEM CODE=878. I added REGION=0M and I am seeing the 
same issue. Now when I add them via ISMF (only a couple) I am seeing 
SYSTEM COMPLETION CODE=028. Can anyone shed any light on this issue?

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html

Re: How to Split a Record ? (DFSORT ?)

[Reda, John]

-Original Message-
From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED] On Behalf Of 
ITURIEL DO NASCIMENTO NETO
Sent: Thursday, March 20, 2008 2:18 PM
To: IBM-MAIN@bama.ua.edu
Subject: How to Split a Record ? (DFSORT ?)



Once i have a dataset (80 positions), is there an easy way to split the
records, specifying the initial column  ?
Like this :
+---5---105---20




Generating (Split in column 13)
+---5---105---20









You can use a sort.

//SORTEXEC PGM=SORT
//SORTIN  DD   DSN=input.data.set.name,DISP=SHR
//SORTOUT DD   DSN=output.data.set.name,DISP=SHR
//SYSIN   DD   *
  SORT FIELDS=COPY   
  OUTFIL  OUTREC=(1,12,/,13,8)
//SYSOUT  DD   SYSOUT=*



John Reda
Syncsort, Inc. 

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html

Re: ICC

[Ron Wells]

Cliff ..

Thanks---just ried it and worked

--
Email Disclaimer
This  E-mail  contains  confidential  information  belonging to the sender, 
which  may be legally privileged information.  This information is intended 
only  for  the use of the individual or entity addressed above.  If you are not 
 the  intended  recipient, or  an  employee  or  agent responsible for 
delivering it to the intended recipient, you are hereby notified that any 
disclosure,  copying, distribution, or the taking of any action in reliance on 
the contents of the E-mail or attached files is strictly prohibited.

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html

Re: Define Pagespace -- SWAP vs NOSWAP?

[Eric Bielefeld]

As soon as I read your post, I remembered that they took out physical swap.  I 
am curious though - I know address spaces still get swapped out - how does that 
happen without a physical swap?  I used to know that at one time, but I can't 
remember.  

Eric

 Edward Jaffe <[EMAIL PROTECTED]> wrote: 
> Eric Bielefeld wrote:
> > Actually, as others have pointed out, swap datasets are pretty much dead.  
> > The paging algorithms have been changed to efficiently swap to the regular 
> > page datasets.
> 
> This is not what was done! The concept of "physical swap" was removed 
> entirely. The operating system no longer performs that function.
> 
> -- 
> Edward E Jaffe
> Phoenix Software International, Inc
> 5200 W Century Blvd, Suite 800
> Los Angeles, CA 90045
> 310-338-0400 x318
> [EMAIL PROTECTED]
> http://www.phoenixsoftware.com/
--
Eric Bielefeld
Systems Programmer
Aviva USA
Des Moines, Iowa
515-645-5153

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html

Re: Convert EBCDIC to ASCII in batch?

[Ed Finnell]

 
In a message dated 3/20/2008 1:43:25 P.M. Central Daylight Time,  
[EMAIL PROTECTED] writes:

(ISO8859-1). I can think of a way to do it using UNIX services, but  I'm
hoping for a simplier method. The ASCII file is to be transferred to  a
Windows system, so each line must end in CRLF.


>>
What about the free INFO-ZIP? Think it's one  of the samples.
ZIP the EBCDIC(and compress) transfer to WINDOZE binary and UNZIP to  
CODEPAGE of choice?
 







**Create a Home Theater Like the Pros. Watch the video on AOL 
Home.  
(http://home.aol.com/diy/home-improvement-eric-stromer?video=15?ncid=aolhom000301)

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html

Re: How to Split a Record ? (DFSORT ?)

[Schwarz, Barry A]

Look up the / operator in the BUILD or OUTREC parameter of the OUTFIL
statement in the DFSORT manual.

-Original Message-
From: ITURIEL DO NASCIMENTO NETO 
Sent: Thursday, March 20, 2008 11:18 AM
To: IBM-MAIN@bama.ua.edu
Subject: How to Split a Record ? (DFSORT ?)

Hi all,

I'm sorry for reposting, but sometimes weird things happen to my
emails...

Once i have a dataset (80 positions), is there an easy way to split the
records, specifying the initial column  ?
Like this :
+---5---105---20




Generating (Split in column 13)
+---5---105---20







--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html

Re: Convert EBCDIC to ASCII in batch?

[Arthur T.]

On 20 Mar 2008 11:49:31 -0700, in bit.listserv.ibm-main 
(Message-ID:<[EMAIL PROTECTED]>) 
[EMAIL PROTECTED] (Ed Finnell) wrote:


In a message dated 3/20/2008 1:43:25 P.M. Central Daylight 
Time,

[EMAIL PROTECTED] writes:

(ISO8859-1). I can think of a way to do it using UNIX 
services, but  I'm
hoping for a simplier method. The ASCII file is to be 
transferred to  a

Windows system, so each line must end in CRLF.


What about the free INFO-ZIP? Think it's one  of the 
samples.
ZIP the EBCDIC(and compress) transfer to WINDOZE binary 
and UNZIP to

CODEPAGE of choice?


 An excellent suggestion!  With the proper compression 
level, it should also improve total time.


 I seem to have the latest (non-beta) Info zip and 
unzip, but I don't see a codepage option.  However, the zip 
side has a "-a" option to convert from EBCDIC to ASCII (if 
run on EBCDIC machines).



--
I cannot receive mail at the address this was sent from.
To reply directly, send to ar23hur "at" intergate "dot" com

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html

Re: How to Split a Record ? (DFSORT ?)

[Frank Yaeger]

Here's a DFSORT job that will do what you asked for.  I assumed you wanted
the
output file to have LRECL=80 like the input file.  If not, change the 80:X
to n:X with
n equal to the output LRECL you want.

//S1EXEC  PGM=ICEMAN
//SYSOUTDD  SYSOUT=*
//SORTIN DD DSN=...  input file (FB/80)
//SORTOUT DD DSN=...  output file (FB/80)
//SYSINDD*
  OPTION COPY
  OUTFIL BUILD=(1,12,80:X,/,13,8)
/*

If you're not familiar with DFSORT and DFSORT's ICETOOL, I'd suggest
reading
through "z/OS DFSORT:  Getting Started".  It's an excellent tutorial, with
lots of
examples, that will show you how to use DFSORT, DFSORT's ICETOOL and
DFSORT Symbols.  You can access it online, along with all of the other
DFSORT
books, from:

www.ibm.com/servers/storage/support/software/sort/mvs/srtmpub.html

Frank Yaeger - DFSORT Development Team (IBM) - [EMAIL PROTECTED]
Specialties: PARSE, JFY, SQZ, ICETOOL, IFTHEN, OVERLAY, Symbols, Migration

 => DFSORT/MVS is on the Web at http://www.ibm.com/storage/dfsort/
-Original Message-
From: ITURIEL DO NASCIMENTO NETO
Sent: Thursday, March 20, 2008 11:18 AM
To: IBM-MAIN@bama.ua.edu
Subject: How to Split a Record ? (DFSORT ?)

Hi all,

I'm sorry for reposting, but sometimes weird things happen to my
emails...

Once i have a dataset (80 positions), is there an easy way to split the
records, specifying the initial column  ?
Like this :
+---5---105---20




Generating (Split in column 13)
+---5---105---20







--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html

Re: Define Pagespace -- SWAP vs NOSWAP?

[Edward Jaffe]

[EMAIL PROTECTED] wrote:

As soon as I read your post, I remembered that they took out physical swap.  I 
am curious though - I know address spaces still get swapped out - how does that 
happen without a physical swap?  I used to know that at one time, but I can't 
remember.
  


There is now logical swap only.

--
Edward E Jaffe
Phoenix Software International, Inc
5200 W Century Blvd, Suite 800
Los Angeles, CA 90045
310-338-0400 x318
[EMAIL PROTECTED]
http://www.phoenixsoftware.com/

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html

Re: Convert EBCDIC to ASCII in batch?

[Rick Fochtman]

-


Well, my manager owns cattle and has a "hot shot" that he's not afraid
to use (did use it one time on a teenager who was trespassing and
arrogantly said "What you gonna do, old man?" - which is better than his
son who actually did shoot one with rock salt! - ah the joys of living
in Texas).
 


-
I think I still have the scars from a double load of rock salt - right 
where the saddle meets the rider. Stealing watermelons one night and 
just got one leg over the fence and "BANG". Couldn't walk well for days; 
took three weeks to sit down.


Isn't it amazing that so many of us survived to adulthood?  :-)

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html

Re: Define Pagespace -- SWAP vs NOSWAP?

[Rick Fochtman]

As soon as I read your post, I remembered that they took out physical swap.  I am curious though - I know address spaces still get swapped out - how does that happen without a physical swap?  I used to know that at one time, but I can't remember.  
 


-
Eric, does "logical swap" ring any bells??

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html

Re: Can forked/spawned address spaces be identified as such?

[Support, DUNNIT SYSTEMS LTD.]

It's the Blue Meanies!!!

:-)

On Thu, 20 Mar 2008 07:39:05 -0400, Peter Relson <[EMAIL PROTECTED]> 
wrote:

>As the ASSB fields mentioned are not programming interfaces, no additional
>information will be provided as to their meaning and use.
>
>Peter Relson
>z/OS Core Technology Design

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html

Re: Stand alone Dump with ICC cards

[Richard Bond]

Don't know but why bother? I always use the SYSCONS (HMC operating system 
messages) for standalone dump console - works great for me anyway.

Dick

>>> "Andy White" <[EMAIL PROTECTED]> 3/20/2008 9:49:38 AM >>>

Is anyone out there using ICC for a z/OS console. We are switching over 
from our 3174's and started to use ICC consoles so I thought id ask our 
operator  to do a SAD from it. The first problem I had was I didn't change 
the SAD to use the new console (address 1300) I changed it had them we do 
it but we get  a xwait on the emulator, like it cant find the console. 

Here is what I have coded job ran with zero's, No wait state just sits 
there the system

 AMDSADMP IPL=D3390,VOLSER=AVE3EC,   X
   MINASID=ALL, X
   DDSPROMPT=YES,X
   OUTPUT=T1511,X
   REUSEDS=CHOICE,X
   CONSOLE=((1300,3278),(1310,3278)) 
 END 

Is there anything that needs to be coded for a ICC type of console to do a 
SAD? Thanks in advance.


Andy 
Internet: Mailto:[EMAIL PROTECTED]



The information contained in this message may be CONFIDENTIAL and is for the 
intended addressee only.  Any unauthorized use, dissemination of the 
information, or copying of this message is prohibited.  If you are not the 
intended addressee, please notify the sender immediately and delete this 
message.

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html
==
CONFIDENTIALITY NOTICE: This email contains information from the sender that 
may be CONFIDENTIAL, LEGALLY PRIVILEGED, PROPRIETARY or otherwise protected 
from disclosure. This email is intended for use only by the person or entity to 
whom it is addressed. If you are not the intended recipient, any use, 
disclosure, copying, distribution, printing, or any action taken in reliance on 
the contents of this email, is strictly prohibited. If you received this email 
in error, please contact the sending party by reply email, delete the email 
from your computer system and shred any paper copies.
 
Note to Patients: There are a number of risks you should consider before using 
e-mail to communicate with us. See our Privacy Policy and Henry Ford My Health 
at www.henryford.com for more detailed information. If you do not believe that 
our policy gives you the privacy and security protection you need, do not send 
e-mail or Internet communications to us.

==

Re: Define Pagespace -- SWAP vs NOSWAP?

[Rick Fochtman]

-

... and logical swap is basically about quiescing work - rather than 
freeing up the memory.
 



But I'll bet that logically swapped address spaces are the first 
"losers" if page stealing has to kick in.


--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html

Re: Define Pagespace -- SWAP vs NOSWAP?

[Mark Zelden]

On Thu, 20 Mar 2008 13:15:07 -0700, Edward Jaffe
<[EMAIL PROTECTED]> wrote:

>[EMAIL PROTECTED] wrote:
>> As soon as I read your post, I remembered that they took out physical
swap.  I am curious though - I know address spaces still get swapped out -
how does that happen without a physical swap?  I used to know that at one
time, but I can't remember.
>>
>
>There is now logical swap only.
>

Eric, If you have access to the SHARE web site, pick up session 2828 
from Tampa which should help to explain the changes in z/OS 1.8:

z/OS Internals: Real Storage Manager - Functions and Performance 
http://www.share.org/member_center/open_document.cfm?document=proceedings/SHARE_in_Tampa_Bay/S2828MH140131.pdf

Mark
--
Mark Zelden
Sr. Software and Systems Architect - z/OS Team Lead
Zurich North America / Farmers Insurance Group - ZFUS G-ITO
mailto:[EMAIL PROTECTED]
z/OS Systems Programming expert at http://expertanswercenter.techtarget.com/
Mark's MVS Utilities: http://home.flash.net/~mzelden/mvsutil.html

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html

Re: Define Pagespace -- SWAP vs NOSWAP?

[Gerhard Adam]

... and logical swap is basically about quiescing work - rather than 
freeing up the memory.




But I'll bet that logically swapped address spaces are the first "losers" 
if page stealing has to kick in.


Not true.  Since stealing is no longer associated with address spaces, but 
rather global storage use, this particular bias can't occur.


Adam 


--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html

Re: Stand alone Dump with ICC cards

[Skip Robinson]

HMC--defined to MVS as SYSCONS--works great on several levels. You don't
have to worry about...

-- Altered console configurations

-- Flaky tubes/PCs/controllers

-- Updating SAD procedures

We don't take many standalone dumps, but three changes in the past several
years have greatly improved reliability:

1, Use only SYSCONS (no more MCS consoles)

2. Use only DASD (no more tapes)

3. Set up LOAD profiles on the HMC exclusively for standalone dump.

.
.
JO.Skip Robinson
Southern California Edison Company
Electric Dragon Team Paddler
SHARE MVS Program Co-Manager
626-302-7535 Office
323-715-0595 Mobile
[EMAIL PROTECTED]


   
 Richard Bond  
 <[EMAIL PROTECTED]> 
 Sent by: IBM   To 
 Mainframe IBM-MAIN@bama.ua.edu
 Discussion Listcc 
 <[EMAIL PROTECTED] 
 .edu> Subject 
   Re: Stand alone Dump with ICC cards 
   
 03/20/2008 12:59  
 PM
   
   
 Please respond to 
   IBM Mainframe   
  Discussion List  
 <[EMAIL PROTECTED] 
   .edu>   
   
   




Don't know but why bother? I always use the SYSCONS (HMC operating system
messages) for standalone dump console - works great for me anyway.

Dick

>>> "Andy White" <[EMAIL PROTECTED]> 3/20/2008 9:49:38 AM >>>

Is anyone out there using ICC for a z/OS console. We are switching over
from our 3174's and started to use ICC consoles so I thought id ask our
operator  to do a SAD from it. The first problem I had was I didn't change
the SAD to use the new console (address 1300) I changed it had them we do
it but we get  a xwait on the emulator, like it cant find the console.

Here is what I have coded job ran with zero's, No wait state just sits
there the system

 AMDSADMP IPL=D3390,VOLSER=AVE3EC,   X
   MINASID=ALL, X
   DDSPROMPT=YES,X
   OUTPUT=T1511,X
   REUSEDS=CHOICE,X
   CONSOLE=((1300,3278),(1310,3278))
 END

Is there anything that needs to be coded for a ICC type of console to do a
SAD? Thanks in advance.


Andy
Internet: Mailto:[EMAIL PROTECTED]

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html

Re: Define Pagespace -- SWAP vs NOSWAP?

[Martin Packer]

... and logical swap is basically about quiescing work - rather than 
freeing up the memory.

Martin

Martin Packer
Performance Consultant
IBM United Kingdom Ltd
+44-20-8832-5167
+44-7802-245-584
[EMAIL PROTECTED]








Unless stated otherwise above:
IBM United Kingdom Limited - Registered in England and Wales with number 
741598. 
Registered office: PO Box 41, North Harbour, Portsmouth, Hampshire PO6 3AU






--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html

Re: Can forked/spawned address spaces be identified as such?

[Support, DUNNIT SYSTEMS LTD.]

John,

<[EMAIL PROTECTED]> wrote:
>Nobody else has asked, so I will. Why do you want to do this? I'm just
>curious.

I could tell you but I would have to kill you.

;)

Actually, I need to be able to determine what the original job name is.

Is the rule correct that every case - with no exceptions - of a 
forked/spawned address space has a single digit from 1 to 9 appended to the 
job name? If so, what happens after 9 such spawns?

In addition, in my case, I have a spawned Java job. I'm finding that the JBNI 
and JBNS fields of both the ASCB and the ASSB point to the following names:

JBNI. TESTJOB1 JBNS. BPXAS

Now my question is can I rely and JBNS=BPXAS to determine the parent 
address space's name is equal to the child address space's name minus the 
child's last job name character?

For those not familiar with BPXAS, here's a little copy and past from what I 
found:

Beginning with OS/390 Version 2 Release 4, OS/390 UNIX System Services 
changed from usingAPPC initiators to Workload Manager (WLM) controlled 
initiators. The initiator address space name isBPXAS instead of ASCHINT. 
BPXAS is a special initiator with special interfaces to WLM and UNIXSystem 
Services.Fork and spawn use a WLM service to get an address space to 
process a request. The WLM servicechecks its queue to see if there is an idle 
address space from a free pool of BPXAS address spacesthat are waiting for 
work. If there are no idle BPXAS address spaces, WLM determines whether a 
newone can be created based on system load. If the free pool is empty, an 
ASCRE is done using thename BPXAS as the procedure to start a new one. 
When a BPXAS address space is finished, theaddress space goes back into the 
free pool. After 30 minutes of being idle, the address space isterminated.The 
spawn service is another way to create a new process. It looks like fork(), 
except that the newprocess is not a copy of the parent process. The child 
process inherits file and socket descriptors, aswith the fork(). With a spawn, 
the child process can be created in the parent address space.


TIA,
Jerry

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html

Re: Convert EBCDIC to ASCII in batch?

[Paul Gilmartin]

On Thu, 20 Mar 2008 12:08:51 -0600, Todd Burch wrote:

>If this is a COBOL file, ...
>
What's a "COBOL file"?  And why does it matter?

I used to think bytes is bytes.

-- gil

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html

Re: Can forked/spawned address spaces be identified as such?

[Ted MacNEIL]

>Is the rule correct that every case - with no exceptions - of a forked/spawned 
>address space has a single digit from 1 to 9 appended to the 
job name?

No. Eight character jobnames are truncated to 7, and then the digit is added.

>If so, what happens after 9 such spawns?

We go alphabetic - A, B, C, ...

-
Too busy driving to stop for gas!

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html

Re: Can forked/spawned address spaces be identified as such?

[Shane]

I wouldn't have included the smiley.
Why aren't things like this exposed ???. And if they are, why aren't
they (publicly/freely) documented.

Shane ...

On Thu, 2008-03-20 at 15:25 -0500, Support, DUNNIT SYSTEMS LTD. wrote:
> It's the Blue Meanies!!!
> 
> :-)
> 
> On Thu, 20 Mar 2008 07:39:05 -0400, Peter Relson <[EMAIL PROTECTED]> 
> wrote:
> 
> >As the ASSB fields mentioned are not programming interfaces, no additional
> >information will be provided as to their meaning and use.

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html

Re: Can forked/spawned address spaces be identified as such?

[David Day]

Take a look at the SMF exits.  The description that follows is a cut and 
paste for the parameter descriptins for IEFUJI.  Word 5.


Hope this helps

   -Dave Day




.21.7.2 Parameter Descriptions

Register 1 points to the following list of addresses:


 Word 1
 Address of the common exit parameter area. For details on the parameter 
area, see Table 3 in topic 2.16.7.3.


 Word 2
 Address of a 20-byte area containing the programmer's name (in EBCDIC) 
from the JOB statement. This area is aligned left and padded with blanks if 
necessary.


 Word 3
 Address of a one-byte area indicating (in binary) the requested job 
selection priority. The value of this field equals the user-assigned 
priority of 0 to 14 (taken from the PRTY parameter on the JOB statement).


 Word 4
 Address of an area containing the accounting information from the JOB 
statement. (See "Accounting Information" in topic 2.16.7.4.)


 Word 5
 Address of a 4-character area that contains the name of the subsystem for 
the job being processed. Examples:


   a.. ASCH, JES2, or JES3 -- indicates the name of the subsystem that 
selected the job


   b.. OMVS -- indicates a forked or spawned address space

   c.. STC -- indicates a started task

   d.. TSO -- indicates a time sharing option task

   e.. The jobname -- used if it is four or fewer characters and none of 
the above apply




Note: The high-order bit is set in the address of the last parameter to 
indicate the end of the parameter list.
- Original Message - 
From: "Support, DUNNIT SYSTEMS LTD." <[EMAIL PROTECTED]>

Newsgroups: bit.listserv.ibm-main
To: 
Sent: Thursday, March 20, 2008 3:49 PM
Subject: Re: Can forked/spawned address spaces be identified as such?



John,

<[EMAIL PROTECTED]> wrote:

Nobody else has asked, so I will. Why do you want to do this? I'm just
curious.


I could tell you but I would have to kill you.

;)

Actually, I need to be able to determine what the original job name is.

Is the rule correct that every case - with no exceptions - of a
forked/spawned address space has a single digit from 1 to 9 appended to 
the

job name? If so, what happens after 9 such spawns?

In addition, in my case, I have a spawned Java job. I'm finding that the 
JBNI
and JBNS fields of both the ASCB and the ASSB point to the following 
names:


JBNI. TESTJOB1 JBNS. BPXAS

Now my question is can I rely and JBNS=BPXAS to determine the parent
address space's name is equal to the child address space's name minus the
child's last job name character?

For those not familiar with BPXAS, here's a little copy and past from what 
I

found:

Beginning with OS/390 Version 2 Release 4, OS/390 UNIX System Services
changed from usingAPPC initiators to Workload Manager (WLM) controlled
initiators. The initiator address space name isBPXAS instead of ASCHINT.
BPXAS is a special initiator with special interfaces to WLM and UNIXSystem
Services.Fork and spawn use a WLM service to get an address space to
process a request. The WLM servicechecks its queue to see if there is an 
idle

address space from a free pool of BPXAS address spacesthat are waiting for
work. If there are no idle BPXAS address spaces, WLM determines whether a
newone can be created based on system load. If the free pool is empty, an
ASCRE is done using thename BPXAS as the procedure to start a new one.
When a BPXAS address space is finished, theaddress space goes back into 
the
free pool. After 30 minutes of being idle, the address space 
isterminated.The
spawn service is another way to create a new process. It looks like 
fork(),

except that the newprocess is not a copy of the parent process. The child
process inherits file and socket descriptors, aswith the fork(). With a 
spawn,

the child process can be created in the parent address space.


TIA,
Jerry

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html 


--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html

Re: Can forked/spawned address spaces be identified as such?

[Support, DUNNIT SYSTEMS LTD.]

All you need is love.

On Fri, 21 Mar 2008 07:08:28 +1000, Shane <[EMAIL PROTECTED]> wrote:
>I wouldn't have included the smiley.

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html

Re: Can forked/spawned address spaces be identified as such?

[Support, DUNNIT SYSTEMS LTD.]

So is there any way to determine the original parent address space's name 
from within the child's address space?

TIA,
Jerry

On Thu, 20 Mar 2008 22:04:44 +, Ted MacNEIL <[EMAIL PROTECTED]> 
wrote:

>>Is the rule correct that every case - with no exceptions - of a 
forked/spawned address space has a single digit from 1 to 9 appended to the
>job name?
>
>No. Eight character jobnames are truncated to 7, and then the digit is added.
>
>>If so, what happens after 9 such spawns?
>
>We go alphabetic - A, B, C, ...

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html

Re: Can forked/spawned address spaces be identified as such?

[Ted MacNEIL]

>So is there any way to determine the original parent address space's name from 
>within the child's address space?

I have not been able to do it.
I have asked in the past and gotten no reliable answer.

-
Too busy driving to stop for gas!

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html

Re: Can forked/spawned address spaces be identified as such?

[Edward Jaffe]

Support, DUNNIT SYSTEMS LTD. wrote:
So is there any way to determine the original parent address space's name 
from within the child's address space?
  


BPXEKDA returns the structure mapped by BPXZODMV. OdmvPPID is the 
parent's Process ID.


--
Edward E Jaffe
Phoenix Software International, Inc
5200 W Century Blvd, Suite 800
Los Angeles, CA 90045
310-338-0400 x318
[EMAIL PROTECTED]
http://www.phoenixsoftware.com/

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html

Re: Can forked/spawned address spaces be identified as such?

[Support, DUNNIT SYSTEMS LTD.]

Edward,

Thanks. Will have to look into that method.

Jerry

On Thu, 20 Mar 2008 15:04:41 -0700, Edward Jaffe 
<[EMAIL PROTECTED]> wrote:

>Support, DUNNIT SYSTEMS LTD. wrote:
>> So is there any way to determine the original parent address space's name
>> from within the child's address space?
>>
>
>BPXEKDA returns the structure mapped by BPXZODMV. OdmvPPID is the
>parent's Process ID.

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html

Re: Convert EBCDIC to ASCII in batch?

[Ed Finnell]

 
In a message dated 3/20/2008 5:58:57 P.M. Central Daylight Time,  
[EMAIL PROTECTED] writes:

Isn't it amazing that so many of us survived to adulthood?   :-)


>>
'Fraid it's more serious these days. Had a  friend whose dad was in 
'retirement village' after spouse passed away and was  getting ready for dove 
season by 
cleaning his 12gauge and this guy kicks in  the front door! So he snaps the 
breach and 'Says, hard to miss at this range'  so the guy takes off running and 
made it about half way down the block before  dead centering the dempster 
dumpster. When the county mounties arrived they  wanted to know how many times 
he'd been shot? 'None, but he moved the dumpster  about eight inches with his 
head...'  








**Create a Home Theater Like the Pros. Watch the video on AOL 
Home.  
(http://home.aol.com/diy/home-improvement-eric-stromer?video=15?ncid=aolhom000301)

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html

Re: Define Pagespace -- SWAP vs NOSWAP?

[Patrick O'Keefe]

On Thu, 20 Mar 2008 13:36:25 -0700, Gerhard Adam 
<[EMAIL PROTECTED]> wrote:

>...
>> But I'll bet that logically swapped address spaces are the 
first "losers"
>> if page stealing has to kick in.
>
>Not true.  Since stealing is no longer associated with address spaces, 
but
>rather global storage use, this particular bias can't occur.
>...
 
But logical swapping and paging all stoprage for swappable 
address spaces still happens.

IRA203I 00% AUXILIARY STORAGE ALLOCATED TO OMPROUTE

What happens in such cases if the address space is nonswappable?

Pat O'Keefe

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html

Re: Can forked/spawned address spaces be identified as such?

[Tony Harminc]

On 20/03/2008, Support, DUNNIT SYSTEMS LTD. <[EMAIL PROTECTED]> wrote:

>  Actually, I need to be able to determine what the original job name is.

Keep in mind that UNIX allows the parent process to go away without
the child ending. In that case there will be no parent jobname. (Well
obviously there *was* one at one time, but its control blocks may be
long gone, and the address space reused.

>  In addition, in my case, I have a spawned Java job. I'm finding that the JBNI
>  and JBNS fields of both the ASCB and the ASSB point to the following names:
>
>  JBNI. TESTJOB1 JBNS. BPXAS
>
>  Now my question is can I rely and JBNS=BPXAS to determine the parent
>  address space's name is equal to the child address space's name minus the
>  child's last job name character?

I wouldn't muck with that stuff. IBM has changed the algorithm in the
past, and may do so again.

What is it you are really trying to accomplish? Why is it useful to
know the parent's jobname?

One thing you could do is call BPX1GPP to get the parent's PID, and
then use that to call BPX1GTH, which among other things can return the
jobname for that process. These are supported things to do.

Tony H.

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html

Re: Convert EBCDIC to ASCII in batch?

[WalterR]

McKown, John wrote:


I cannot think of an easy way to do this, so I thought that I'd ask. I
want to copy a sequential file to another sequential file (both on DASD,
not tape!), translating the contents from EBCDIC (CP-037) to ASCII
(ISO8859-1). I can think of a way to do it using UNIX services, but I'm
hoping for a simplier method. The ASCII file is to be transferred to a
Windows system, so each line must end in CRLF.

Yes, I could use Dovetailed Technologies' "fromdsn" and "todsn" piped to
each other, but that seems "silly" to me.

--
John McKown
Senior Systems Programmer
HealthMarkets
Keeping the Promise of Affordable Coverage
Administrative Services Group
Information Technology

The information contained in this e-mail message may be privileged
and/or confidential.  It is for intended addressee(s) only.  If you are
not the intended recipient, you are hereby notified that any disclosure,
reproduction, distribution or other use of this communication is
strictly prohibited and could, in certain circumstances, be a criminal
offense.  If you have received this e-mail in error, please notify the
sender by reply and delete this message without copying or disclosing
it. 


--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html

 

Write a program for the Enterprise PL/I compiler that uses the builtin 
PLIEBCDIC subroutine.  This would use one CALL per record.


Walter Rue

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html

Re: Convert EBCDIC to ASCII in batch?

[Todd Burch]

You're smart enough to know what a COBOL file is.  So I didn't word it
perfectly.   

Actually, it doesn't matter what produced the file, as long as the binary
file to be converted could be described by a file that looks like a
copybook.  ;)

Todd

> -Original Message-
> From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED] On
> Behalf Of Paul Gilmartin
> Sent: Thursday, March 20, 2008 2:58 PM
> To: IBM-MAIN@bama.ua.edu
> Subject: Re: Convert EBCDIC to ASCII in batch?
> 
> On Thu, 20 Mar 2008 12:08:51 -0600, Todd Burch wrote:
> 
> >If this is a COBOL file, ...
> >
> What's a "COBOL file"?  And why does it matter?
> 
> I used to think bytes is bytes.
> 
> -- gil
> 
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
> Search the archives at http://bama.ua.edu/archives/ibm-main.html
> 
> No virus found in this incoming message.
> Checked by AVG.
> Version: 7.5.519 / Virus Database: 269.21.7/1336 - Release Date: 3/20/2008
> 9:48 AM
> 

No virus found in this outgoing message.
Checked by AVG. 
Version: 7.5.519 / Virus Database: 269.21.7/1336 - Release Date: 3/20/2008
9:48 AM
 

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html

Re: Convert EBCDIC to ASCII in batch?

[Rick Fochtman]

-
'Fraid it's more serious these days. Had a friend whose dad was in 
'retirement village' after spouse passed away and was getting ready for 
dove season by cleaning his 12gauge and this guy kicks in the front 
door! So he snaps the breach and 'Says, hard to miss at this range' so 
the guy takes off running and made it about half way down the block 
before dead centering the dempster dumpster. When the county mounties 
arrived they wanted to know how many times he'd been shot? 'None, but he 
moved the dumpster about eight inches with his head...'

--
Isn't it great when some "street creep" finally get what he so richly 
deserves? Even better when he does it to himself! :-)


--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html

Re: Convert EBCDIC to ASCII in batch?

[Ed Finnell]

 
In a message dated 3/20/2008 10:03:51 P.M. Central Daylight Time,  
[EMAIL PROTECTED] writes:

Isn't it great when some "street creep" finally get what he so richly  
deserves? Even better when he does it to himself! :-)


>>
Almost as good as the VP who demanded 'all the  RMF reports' for the past 
week on their desk by 8:00 next morning. They had to  borrow a 3800 from 
production to produce all 32 cases but the deadline was  met. The VP didn't 
last very  
long...





**Create a Home Theater Like the Pros. Watch the video on AOL 
Home.  
(http://home.aol.com/diy/home-improvement-eric-stromer?video=15?ncid=aolhom000301)

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html

Gary Hussong is out of the office.

[Gary Hussong]

I will be out of the office starting  03/21/2008 and will not return until
03/25/2008.

I will respond to your message when I return. If this is an emergency you
can try send me a louts note text page.
--
"NOTICE:  The information contained in this electronic mail transmission is
intended by Convergys Corporation for the use of the named individual or
entity to which it is directed and may contain information that is
privileged or otherwise confidential.  If you have received this electronic
mail transmission in error, please delete it from your system without
copying or forwarding it, and notify the sender of the error by reply email
or by telephone (collect), so that the sender's address records can be
corrected."

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html