Re: Assembler courses

2022-09-17 Thread Tom Brennan

On 9/17/2022 9:25 PM, Brian Westerman wrote:

I had to take Latin as well, and while I never used it directly trying to 
communicate with anyone, it has been a great help over the years.  Plus, it 
makes me not sound as dumb as I really am.


Uh oh, maybe that's my problem :)  I never learned any Latin other than 
the little bit I heard in church as a kid, right before they decided to 
switch to English.  Dominus vobiscum.


As for programming, I seem to do better starting at the bottom, with 
instructions, registers, PSW bits and such, and moving up from there. 
Higher level languages and especially Object Oriented code tend to 
confuse me.


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


Re: Assembler courses

2022-09-17 Thread Brian Westerman
I had to take Latin as well, and while I never used it directly trying to 
communicate with anyone, it has been a great help over the years.  Plus, it 
makes me not sound as dumb as I really am.

Brian

On Sat, 17 Sep 2022 22:52:14 -0400, David Spiegel  
wrote:

>Hi Bob,
>Based upon your remarks, it seems as if you're unfamiliar with Exits and
>reading dumps.
>BTW, I took Latin in high school and it helped me (albeit indirectly).
>
>Regards,
>David
>
>On 2022-09-17 15:17, Bob T Roller wrote:
>> Learning assembler is like taking latin in high school. It might help you on 
>> Jeopardy but will not be of much help in real life. I took assembler in 
>> college & never used it and never worked at an employer that used it. That’s 
>> a dozen+ employers over 45 years.
>>
>> Sent from Proton Mail for iOS
>>
>> On Fri, Sep 16, 2022 at 10:11 PM, Gary Weinhold  wrote:
>>
>>> To help a person who has COBOL and C language experience learn to write 
>>> assembler, I would like them to learn from the start both reentrant and 
>>> baseless coding techniques. Is there training available that assumes the 
>>> instruction set available on the z12 is the starting point and that teaches 
>>> reentrancy as the norm?
>>>
>>> (Cross-posted to IBM-Main and Assembler-list)
>>>
>>> Gary Weinhold
>>> Senior Application Architect
>>> DATAKINETICS | Data Performance & Optimization
>>> Phone:+1.613.523.5500 x216
>>> Email: weinh...@dkl.com
>>> Visit us online at 
>>> https://nam12.safelinks.protection.outlook.com/?url=http%3A%2F%2Fwww.dkl.com%2Fdata=05%7C01%7C%7Cc03efab1acfe44465b9b08da98e15252%7C84df9e7fe9f640afb435%7C1%7C0%7C637990391038892669%7CUnknown%7CTWFpbGZsb3d8eyJWIjoiMC4wLjAwMDAiLCJQIjoiV2luMzIiLCJBTiI6Ik1haWwiLCJXVCI6Mn0%3D%7C3000%7C%7C%7Csdata=ZW%2Bot6AWCsE8Db7W11%2FQq469TCD4HqYUpz3LZONyOyI%3Dreserved=0
>>> E-mail Notification: The information contained in this email and any 
>>> attachments is confidential and may be subject to copyright or other 
>>> intellectual property protection. If you are not the intended recipient, 
>>> you are not authorized to use or disclose this information, and we request 
>>> that you notify us by reply mail or telephone and delete the original 
>>> message from your mail system.
>>>
>>> --
>>> For IBM-MAIN subscribe / signoff / archive access instructions,
>>> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>> --
>> For IBM-MAIN subscribe / signoff / archive access instructions,
>> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>
>--
>For IBM-MAIN subscribe / signoff / archive access instructions,
>send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

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


Re: Assembler courses

2022-09-17 Thread Larry Chenevert
I used the Struble book also, at La Tech in the '70's (probably '75 or 
so).  Mine is of the second printing in 1971 and has a 1969 copyright 
and it is still on my bookshelf.  It is based on the 360; the transition 
from 360 to 370 was easy in those days..   The price stamped on the 
title page is $11.95 -- La Tech Bookstore Cashier #4.  I think I got my 
money's worth from it.



On 9/17/2022 8:15 PM, Gibney, Dave wrote:

The course I took in 370 assembler out of the Struble book made learning COBOL 
At my 1st job (a paying internship) a trivial matter. Never looked back. I 
haven't counted the languages I've had occasion to use (or many  I guess modify 
existing code in) in the last 42ish years.

I credit the Assembler course with the reason I've had a job all this time. And 
I've told the professor so. And, yes, I very rarely write it any more, but it's 
been handy at times.



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


Re: Assembler courses

2022-09-17 Thread David Spiegel

Hi Bob,
Based upon your remarks, it seems as if you're unfamiliar with Exits and 
reading dumps.

BTW, I took Latin in high school and it helped me (albeit indirectly).

Regards,
David

On 2022-09-17 15:17, Bob T Roller wrote:

Learning assembler is like taking latin in high school. It might help you on 
Jeopardy but will not be of much help in real life. I took assembler in college 
& never used it and never worked at an employer that used it. That’s a dozen+ 
employers over 45 years.

Sent from Proton Mail for iOS

On Fri, Sep 16, 2022 at 10:11 PM, Gary Weinhold  wrote:


To help a person who has COBOL and C language experience learn to write 
assembler, I would like them to learn from the start both reentrant and 
baseless coding techniques. Is there training available that assumes the 
instruction set available on the z12 is the starting point and that teaches 
reentrancy as the norm?

(Cross-posted to IBM-Main and Assembler-list)

Gary Weinhold
Senior Application Architect
DATAKINETICS | Data Performance & Optimization
Phone:+1.613.523.5500 x216
Email: weinh...@dkl.com
Visit us online at 
https://nam12.safelinks.protection.outlook.com/?url=http%3A%2F%2Fwww.dkl.com%2Fdata=05%7C01%7C%7Cc03efab1acfe44465b9b08da98e15252%7C84df9e7fe9f640afb435%7C1%7C0%7C637990391038892669%7CUnknown%7CTWFpbGZsb3d8eyJWIjoiMC4wLjAwMDAiLCJQIjoiV2luMzIiLCJBTiI6Ik1haWwiLCJXVCI6Mn0%3D%7C3000%7C%7C%7Csdata=ZW%2Bot6AWCsE8Db7W11%2FQq469TCD4HqYUpz3LZONyOyI%3Dreserved=0
E-mail Notification: The information contained in this email and any 
attachments is confidential and may be subject to copyright or other 
intellectual property protection. If you are not the intended recipient, you 
are not authorized to use or disclose this information, and we request that you 
notify us by reply mail or telephone and delete the original message from your 
mail system.

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

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


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


Full screen zap that works on PDS/e

2022-09-17 Thread Brian Westerman
Hi,

Is anyone aware of a version of the Fullscreen zap program that works on load 
modules in a PDS/e dataset?

I looked through the CBTTAPE but can't find one that supports PDS/e datasets.

Brian

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


Re: Assembler courses

2022-09-17 Thread Gibney, Dave
The course I took in 370 assembler out of the Struble book made learning COBOL 
At my 1st job (a paying internship) a trivial matter. Never looked back. I 
haven't counted the languages I've had occasion to use (or many  I guess modify 
existing code in) in the last 42ish years.

I credit the Assembler course with the reason I've had a job all this time. And 
I've told the professor so. And, yes, I very rarely write it any more, but it's 
been handy at times.

> -Original Message-
> From: IBM Mainframe Discussion List  On
> Behalf Of Bob T Roller
> Sent: Saturday, September 17, 2022 1:30 PM
> To: IBM-MAIN@LISTSERV.UA.EDU
> Subject: Re: Assembler courses
> > 
> I learned PL/I, WATFIV, FORTRAN, GPSS, assembler, and a few other
> languages in college. Never used any of them. COBOL was an elective, which
> I took, and used extensively for 25 years. One professor, when asked what
> JCL was by a fellow student, said it’s unimportant and will be irrelevant. JCL
> was probably the most important & used “language” of my career. Which I
> learned via the EDS OPD program.
> 
> Sent from Proton Mail for iOS
> 
> On Sat, Sep 17, 2022 at 3:29 PM, Farley, Peter x23353 <031df298a9da-
> dmarc-requ...@listserv.ua.edu> wrote:
> 
> > My experience was the opposite of yours over a few more years (50). I
> learned assembler early via OJT at one of my first permanent jobs, and got to
> use it more and more as I moved to other employers. Knowing assembler got
> me in the door at more than one of those employers.
> >
> > It was the FORTRAN I learned in engineering college that I never used
> anywhere else.
> >
> > Peter
> >
> > -Original Message-
> > From: IBM Mainframe Discussion List  On
> Behalf Of Bob T Roller
> > Sent: Saturday, September 17, 2022 3:17 PM
> > To: IBM-MAIN@LISTSERV.UA.EDU
> > Subject: Re: Assembler courses
> >
> > Learning assembler is like taking latin in high school. It might help you on
> Jeopardy but will not be of much help in real life. I took assembler in 
> college
> & never used it and never worked at an employer that used it. That’s a
> dozen+ employers over 45 years.
> >
> > Sent from Proton Mail for iOS
> >
> > On Fri, Sep 16, 2022 at 10:11 PM, Gary Weinhold 
> wrote:
> >
> >> To help a person who has COBOL and C language experience learn to
> write assembler, I would like them to learn from the start both reentrant and
> baseless coding techniques. Is there training available that assumes the
> instruction set available on the z12 is the starting point and that teaches
> reentrancy as the norm?
> >>
> >> (Cross-posted to IBM-Main and Assembler-list)
> >>
> >> Gary Weinhold
> >> Senior Application Architect
> >> DATAKINETICS | Data Performance & Optimization
> >> Phone:+1.613.523.5500 x216
> >> Email: weinh...@dkl.com
> > --
> >
> > This message and any attachments are intended only for the use of the
> addressee and may contain information that is privileged and confidential. If
> the reader of the message is not the intended recipient or an authorized
> representative of the intended recipient, you are hereby notified that any
> dissemination of this communication is strictly prohibited. If you have
> received this communication in error, please notify us immediately by e-mail
> and delete the message and any attachments from your system.
> >
> > --
> > For IBM-MAIN subscribe / signoff / archive access instructions,
> > send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
> 
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

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


Re: Assembler courses

2022-09-17 Thread Charles Mills
> didn't like all the up-front code that had to be in a program for it to run.

I see two lines of "up-front."

#include 
int main() {
   printf("Hello, World!");
   return 0;
}

Charles


-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Bob Bridges
Sent: Saturday, September 17, 2022 2:56 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Assembler courses

Never used PASCAL?  I'm surprised.  I haven't learned it yet, but when I first 
heard about it (it had associative arrays, which I thought of as pretty darned 
cool) I was fascinated.  But for the first few years it was all BASIC, PL/1, a 
little FORTRAN.  Later it was all COBOL and CLIST.  Nowadays it's all REXX and 
various flavors of Visual Basic.  Though I've never learned it myself, I had 
the impression that PASCAL is in pretty wide use.

I bought myself a C compiler at one point, but tried it and never took it up 
again; didn't like all the up-front code that had to be in a program for it to 
run.

(My very first employer handed me a task to write a Backgammon game in FORTRAN. 
 It turns out I like writing such things, and my ancient memory tells me the 
program I wrote played pretty well.  I never did figure out why in the world 
they wanted it, though.  And it occurs to me now that maybe they meant only a 
program that would allow two humans to play against each other.)

---
Bob Bridges, robhbrid...@gmail.com, cell 336 382-7313

/* Justice: When you get what you deserve
Mercy: When you don't get what you deserve
Grace: When you get what you don't deserve */

-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of Joe 
Monk
Sent: Saturday, September 17, 2022 17:38

My GE 1101 (1st level Gen Engineering) class was PASCAL programming on a 
DecSystem running TOPS20.

Never used it again.

--- On Sat, Sep 17, 2022 at 3:55 PM Brian Westerman < 
brian_wester...@syzygyinc.com> wrote:
> ME Too!!   I can't remember ever using my Fortran after the class was
> over.  Luckily the instructor also offered an assembler class that he 
> taught "on the side" for an extra $50.  I still use the stuff he 
> taught us almost every day.
>
> --- On Sat, 17 Sep 2022 19:29:01 +, Farley, Peter x23353 < 
> >I learned assembler early via OJT at one of my first permanent jobs, and 
> got to use it more and more as I moved to other employers.  Knowing 
> assembler got me in the door at more than one of those employers.
> >
> >It was the FORTRAN I learned in engineering college that I never used
> anywhere else.

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

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


Re: Assembler courses

2022-09-17 Thread rpinion865
Delac, that's a name I've not heard in a long, long time (Obi wan Kenobi).

Sent from Proton Mail mobile

 Original Message 
On Sep 17, 2022, 10:40 PM, Bob Bridges wrote:

> A textiles company that hired me in 1980 started me out with two DELTAK 
> courses (I sat in a room with video tapes for a few days), one in COBOL and 
> the other in JCL. Got a solid grounding in both, and to this day it's a 
> mystery to me how many professional mainframers can't do JCL. Many of them 
> can modify an existing job, by replacing a DSN for example, and think that's 
> adequate. Admittedly I prefer to write foreground commands than submit 
> everything in batch. But sheesh, how is it possible to do this job without 
> being able to write JCL? --- Bob Bridges, robhbrid...@gmail.com, cell 336 
> 382-7313 /* I grew up in a WASP household, and my wife grew up in a Cuban 
> household. If a WASP wedding is scheduled to start at 2pm Saturday, the bride 
> will come down the aisle at 2:03pm, no matter whatWhereas in a typical 
> Cuban wedding, the phrase "2pm" is translated as "possibly this weekend". I 
> believe that the Cuban community will not be affected by the Millennium Bug 
> until the year 2004 at the earliest. -from "Time Out!" by Dave Barry */ 
> -Original Message- From: IBM Mainframe Discussion List  On Behalf Of 
> Bob T Roller Sent: Saturday, September 17, 2022 16:30 I learned PL/I, WATFIV, 
> FORTRAN, GPSS, assembler, and a few other languages in college. Never used 
> any of them. COBOL was an elective, which I took, and used extensively for 25 
> years. One professor, when asked what JCL was by a fellow student, said it’s 
> unimportant and will be irrelevant. JCL was probably the most important & 
> used “language” of my career. Which I learned via the EDS OPD program. 
> -- For 
> IBM-MAIN subscribe / signoff / archive access instructions, send email to 
> lists...@listserv.ua.edu with the message: INFO IBM-MAIN

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


Re: Assembler courses

2022-09-17 Thread Mike Schwab
Nows your chance.  https://gunkies.org/wiki/Running_TOPS-20_V4.1_under_SIMH

On Sat, Sep 17, 2022 at 4:38 PM Joe Monk  wrote:
>
> My GE 1101 (1st level Gen Engineering) class was PASCAL programming on a
> DecSystem running TOPS20.
>
> Never used it again.
>
> Joe
>
> On Sat, Sep 17, 2022 at 3:55 PM Brian Westerman <
> brian_wester...@syzygyinc.com> wrote:
>
> > ME Too!!   I can't remember ever using my Fortran after the class was
> > over.  Luckily the instructor also offered an assembler class that he
> > taught "on the side" for an extra $50.  I still use the stuff he taught us
> > almost every day.
> >
> > Brian
> >
> > On Sat, 17 Sep 2022 19:29:01 +, Farley, Peter x23353 <
> > peter.far...@broadridge.com> wrote:
> >
> > >My experience was the opposite of yours over a few more years (50).  I
> > learned assembler early via OJT at one of my first permanent jobs, and got
> > to use it more and more as I moved to other employers.  Knowing assembler
> > got me in the door at more than one of those employers.
> > >
> > >It was the FORTRAN I learned in engineering college that I never used
> > anywhere else.
> > >
> > >Peter
> > >
> > >-Original Message-
> > >From: IBM Mainframe Discussion List  On Behalf
> > Of Bob T Roller
> > >Sent: Saturday, September 17, 2022 3:17 PM
> > >To: IBM-MAIN@LISTSERV.UA.EDU
> > >Subject: Re: Assembler courses
> > >
> > >Learning assembler is like taking latin in high school. It might help you
> > on Jeopardy but will not be of much help in real life. I took assembler in
> > college & never used it and never worked at an employer that used it.
> > That’s a dozen+ employers over 45 years.
> > >
> > >Sent from Proton Mail for iOS
> > >
> > >On Fr , Sep 16, 2022 at 10:11 PM, Gary Weinhold  wrote:
> > >
> > >> To help a person who has COBOL and C language experience learn to write
> > assembler, I would like them to learn from the start both reentrant and
> > baseless coding techniques. Is there training available that assumes the
> > instruction set available on the z12 is the starting point and that teaches
> > reentrancy as the norm?
> > >>
> > >> (Cross-posted to IBM-Main and Assembler-list)
> > >>
> > >> Gary Weinhold
> > >> Senior Application Architect
> > >> DATAKINETICS | Data Performance & Optimization
> > >> Phone:+1.613.523.5500 x216
> > >> Email: weinh...@dkl.com
> > >--
> > >
> > >This message and any attachments are intended only for the use of the
> > addressee and may contain information that is privileged and confidential.
> > If the reader of the message is not the intended recipient or an authorized
> > representative of the intended recipient, you are hereby notified that any
> > dissemination of this communication is strictly prohibited. If you have
> > received this communication in error, please notify us immediately by
> > e-mail and delete the message and any attachments from your system.
> > >
> > >
> > >--
> > >For IBM-MAIN subscribe / signoff / archive access instructions,
> > >send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
> >
> > --
> > For IBM-MAIN subscribe / signoff / archive access instructions,
> > send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
> >
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN



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

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


Re: Assembler courses

2022-09-17 Thread Bob Bridges
Never used PASCAL?  I'm surprised.  I haven't learned it yet, but when I first 
heard about it (it had associative arrays, which I thought of as pretty darned 
cool) I was fascinated.  But for the first few years it was all BASIC, PL/1, a 
little FORTRAN.  Later it was all COBOL and CLIST.  Nowadays it's all REXX and 
various flavors of Visual Basic.  Though I've never learned it myself, I had 
the impression that PASCAL is in pretty wide use.

I bought myself a C compiler at one point, but tried it and never took it up 
again; didn't like all the up-front code that had to be in a program for it to 
run.

(My very first employer handed me a task to write a Backgammon game in FORTRAN. 
 It turns out I like writing such things, and my ancient memory tells me the 
program I wrote played pretty well.  I never did figure out why in the world 
they wanted it, though.  And it occurs to me now that maybe they meant only a 
program that would allow two humans to play against each other.)

---
Bob Bridges, robhbrid...@gmail.com, cell 336 382-7313

/* Justice: When you get what you deserve
Mercy: When you don't get what you deserve
Grace: When you get what you don't deserve */

-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of Joe 
Monk
Sent: Saturday, September 17, 2022 17:38

My GE 1101 (1st level Gen Engineering) class was PASCAL programming on a 
DecSystem running TOPS20.

Never used it again.

--- On Sat, Sep 17, 2022 at 3:55 PM Brian Westerman < 
brian_wester...@syzygyinc.com> wrote:
> ME Too!!   I can't remember ever using my Fortran after the class was
> over.  Luckily the instructor also offered an assembler class that he 
> taught "on the side" for an extra $50.  I still use the stuff he 
> taught us almost every day.
>
> --- On Sat, 17 Sep 2022 19:29:01 +, Farley, Peter x23353 < 
> >I learned assembler early via OJT at one of my first permanent jobs, and 
> got to use it more and more as I moved to other employers.  Knowing 
> assembler got me in the door at more than one of those employers.
> >
> >It was the FORTRAN I learned in engineering college that I never used
> anywhere else.

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


Re: dfsort - microseconds (STCK/TOD)

2022-09-17 Thread Sri h Kolusu
Stefan,

I just realized that you are actually missing the arithmetic operator MOD 
(which gives the remainder after the divide).  I also realized that you have 
TEMP fields(unhex of TOD) in between which you really don’t need in the final 
output. So I put the temp fields at the end of build (position 450 on wards)

You need to change it slightly to ensure the temp fields are at the end.

So please change your IFTHEN=(WHEN=NONE to the following. ( I roughly 
calculated that your NONE condition is building around 445 bytes. So, I chose 
position 450 to put the hex values and then use position 470 to convert the 
value to binary and then get the microseconds correctly.  I highlighted the 
changes in RED.

IFTHEN=(WHEN=NONE,
BUILD=(1,8,C'{',
   C'"MFSOURCETYPE":"CSFA",',
   C'"TRNSTCK":"',
   393,8,DC1,EDIT=(-TT-TT),C'T',
   393,8,TC1,EDIT=(TT:TT:TT),
   C'.',
   C'MICROS',
   C'+:00',C'",',
   C'"ELAMICS":"',
   (517,8,BI,SUB,393,8,BI),DIV,+4096,C'",',
   C'"TRNARVD":"',117,4,TRAN=HEX,C'",',
   C'"TRNARVTH":"',587,4,TRAN=HEX,C'",',
   C'"TRNIMSID":"',25,4,C'",',
   C'"TRNSMFID":"',29,4,C'",',
   C'"TRNJOBNM":"',37,8,C'",',
   C'"TRNPSBNM":"',61,8,C'",',
   C'"TRNCODE":"',69,8,C'",',
   C'"TRNESSID":"',77,4,C'",',
   C'"TRNLTERM":"',125,8,C'",',
   C'"TRNTCPU":"',
   509,8,BI,DIV,+4096,EDIT=(.TT),C'",',
   C'"TRNSTCKE":"',
   517,8,DC1,EDIT=(-TT-TT),C'T',
   517,8,TC4,EDIT=(TT:TT:TT.TT),C'+:00',C'",',
C'"UOW":"',615,32,TRAN=HEX,C'",',
C'}',
450:C'0',393,8,HEX))

  OUTREC IFTHEN=(WHEN=(09,16,CH,EQ,C'{"MFSOURCETYPE":'),
  OVERLAY=(470:450,14,TRAN=UNHEX,
   063:450,07,BI,MOD,+1000,M11,LENGTH=6,
   450:17X,
   470:07X))

  OUTFIL BUILD=(9,1100,SQZ=(SHIFT=LEFT))
/*

Thanks,
Kolusu
DFSORT Development
IBM Corporation



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


Re: Assembler courses

2022-09-17 Thread Joe Monk
My GE 1101 (1st level Gen Engineering) class was PASCAL programming on a
DecSystem running TOPS20.

Never used it again.

Joe

On Sat, Sep 17, 2022 at 3:55 PM Brian Westerman <
brian_wester...@syzygyinc.com> wrote:

> ME Too!!   I can't remember ever using my Fortran after the class was
> over.  Luckily the instructor also offered an assembler class that he
> taught "on the side" for an extra $50.  I still use the stuff he taught us
> almost every day.
>
> Brian
>
> On Sat, 17 Sep 2022 19:29:01 +, Farley, Peter x23353 <
> peter.far...@broadridge.com> wrote:
>
> >My experience was the opposite of yours over a few more years (50).  I
> learned assembler early via OJT at one of my first permanent jobs, and got
> to use it more and more as I moved to other employers.  Knowing assembler
> got me in the door at more than one of those employers.
> >
> >It was the FORTRAN I learned in engineering college that I never used
> anywhere else.
> >
> >Peter
> >
> >-Original Message-
> >From: IBM Mainframe Discussion List  On Behalf
> Of Bob T Roller
> >Sent: Saturday, September 17, 2022 3:17 PM
> >To: IBM-MAIN@LISTSERV.UA.EDU
> >Subject: Re: Assembler courses
> >
> >Learning assembler is like taking latin in high school. It might help you
> on Jeopardy but will not be of much help in real life. I took assembler in
> college & never used it and never worked at an employer that used it.
> That’s a dozen+ employers over 45 years.
> >
> >Sent from Proton Mail for iOS
> >
> >On Fr , Sep 16, 2022 at 10:11 PM, Gary Weinhold  wrote:
> >
> >> To help a person who has COBOL and C language experience learn to write
> assembler, I would like them to learn from the start both reentrant and
> baseless coding techniques. Is there training available that assumes the
> instruction set available on the z12 is the starting point and that teaches
> reentrancy as the norm?
> >>
> >> (Cross-posted to IBM-Main and Assembler-list)
> >>
> >> Gary Weinhold
> >> Senior Application Architect
> >> DATAKINETICS | Data Performance & Optimization
> >> Phone:+1.613.523.5500 x216
> >> Email: weinh...@dkl.com
> >--
> >
> >This message and any attachments are intended only for the use of the
> addressee and may contain information that is privileged and confidential.
> If the reader of the message is not the intended recipient or an authorized
> representative of the intended recipient, you are hereby notified that any
> dissemination of this communication is strictly prohibited. If you have
> received this communication in error, please notify us immediately by
> e-mail and delete the message and any attachments from your system.
> >
> >
> >--
> >For IBM-MAIN subscribe / signoff / archive access instructions,
> >send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>

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


Re: Assembler courses

2022-09-17 Thread Brian Westerman
ME Too!!   I can't remember ever using my Fortran after the class was over.  
Luckily the instructor also offered an assembler class that he taught "on the 
side" for an extra $50.  I still use the stuff he taught us almost every day.

Brian  

On Sat, 17 Sep 2022 19:29:01 +, Farley, Peter x23353 
 wrote:

>My experience was the opposite of yours over a few more years (50).  I learned 
>assembler early via OJT at one of my first permanent jobs, and got to use it 
>more and more as I moved to other employers.  Knowing assembler got me in the 
>door at more than one of those employers.
>
>It was the FORTRAN I learned in engineering college that I never used anywhere 
>else.
>
>Peter
>
>-Original Message-
>From: IBM Mainframe Discussion List  On Behalf Of 
>Bob T Roller
>Sent: Saturday, September 17, 2022 3:17 PM
>To: IBM-MAIN@LISTSERV.UA.EDU
>Subject: Re: Assembler courses
>
>Learning assembler is like taking latin in high school. It might help you on 
>Jeopardy but will not be of much help in real life. I took assembler in 
>college & never used it and never worked at an employer that used it. That’s a 
>dozen+ employers over 45 years.
>
>Sent from Proton Mail for iOS
>
>On Fr , Sep 16, 2022 at 10:11 PM, Gary Weinhold  wrote:
>
>> To help a person who has COBOL and C language experience learn to write 
>> assembler, I would like them to learn from the start both reentrant and 
>> baseless coding techniques. Is there training available that assumes the 
>> instruction set available on the z12 is the starting point and that teaches 
>> reentrancy as the norm?
>>
>> (Cross-posted to IBM-Main and Assembler-list)
>>
>> Gary Weinhold
>> Senior Application Architect
>> DATAKINETICS | Data Performance & Optimization
>> Phone:+1.613.523.5500 x216
>> Email: weinh...@dkl.com
>--
>
>This message and any attachments are intended only for the use of the 
>addressee and may contain information that is privileged and confidential. If 
>the reader of the message is not the intended recipient or an authorized 
>representative of the intended recipient, you are hereby notified that any 
>dissemination of this communication is strictly prohibited. If you have 
>received this communication in error, please notify us immediately by e-mail 
>and delete the message and any attachments from your system.
>
>
>--
>For IBM-MAIN subscribe / signoff / archive access instructions,
>send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

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


Re: Assembler courses

2022-09-17 Thread Bob Bridges
A textiles company that hired me in 1980 started me out with two DELTAK courses 
(I sat in a room with video tapes for a few days), one in COBOL and the other 
in JCL.  Got a solid grounding in both, and to this day it's a mystery to me 
how many professional mainframers can't do JCL.  Many of them can modify an 
existing job, by replacing a DSN for example, and think that's adequate.

Admittedly I prefer to write foreground commands than submit everything in 
batch.  But sheesh, how is it possible to do this job without being able to 
write JCL?

---
Bob Bridges, robhbrid...@gmail.com, cell 336 382-7313

/* I grew up in a WASP household, and my wife grew up in a Cuban household.  If 
a WASP wedding is scheduled to start at 2pm Saturday, the bride will come down 
the aisle at 2:03pm, no matter whatWhereas in a typical Cuban wedding, the 
phrase "2pm" is translated as "possibly this weekend".  I believe that the 
Cuban community will not be affected by the Millennium Bug until the year 2004 
at the earliest.  -from "Time Out!" by Dave Barry */

-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of Bob 
T Roller
Sent: Saturday, September 17, 2022 16:30

I learned PL/I, WATFIV, FORTRAN, GPSS, assembler, and a few other languages in 
college. Never used any of them. COBOL was an elective, which I took, and used 
extensively for 25 years. One professor, when asked what JCL was by a fellow 
student, said it’s unimportant and will be irrelevant. JCL was probably the 
most important & used “language” of my career. Which I learned via the EDS OPD 
program.

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


Re: Assembler courses

2022-09-17 Thread Bob T Roller
I learned PL/I, WATFIV, FORTRAN, GPSS, assembler, and a few other languages in 
college. Never used any of them. COBOL was an elective, which I took, and used 
extensively for 25 years. One professor, when asked what JCL was by a fellow 
student, said it’s unimportant and will be irrelevant. JCL was probably the 
most important & used “language” of my career. Which I learned via the EDS OPD 
program.

Sent from Proton Mail for iOS

On Sat, Sep 17, 2022 at 3:29 PM, Farley, Peter x23353 
<031df298a9da-dmarc-requ...@listserv.ua.edu> wrote:

> My experience was the opposite of yours over a few more years (50). I learned 
> assembler early via OJT at one of my first permanent jobs, and got to use it 
> more and more as I moved to other employers. Knowing assembler got me in the 
> door at more than one of those employers.
>
> It was the FORTRAN I learned in engineering college that I never used 
> anywhere else.
>
> Peter
>
> -Original Message-
> From: IBM Mainframe Discussion List  On Behalf Of 
> Bob T Roller
> Sent: Saturday, September 17, 2022 3:17 PM
> To: IBM-MAIN@LISTSERV.UA.EDU
> Subject: Re: Assembler courses
>
> Learning assembler is like taking latin in high school. It might help you on 
> Jeopardy but will not be of much help in real life. I took assembler in 
> college & never used it and never worked at an employer that used it. That’s 
> a dozen+ employers over 45 years.
>
> Sent from Proton Mail for iOS
>
> On Fri, Sep 16, 2022 at 10:11 PM, Gary Weinhold  wrote:
>
>> To help a person who has COBOL and C language experience learn to write 
>> assembler, I would like them to learn from the start both reentrant and 
>> baseless coding techniques. Is there training available that assumes the 
>> instruction set available on the z12 is the starting point and that teaches 
>> reentrancy as the norm?
>>
>> (Cross-posted to IBM-Main and Assembler-list)
>>
>> Gary Weinhold
>> Senior Application Architect
>> DATAKINETICS | Data Performance & Optimization
>> Phone:+1.613.523.5500 x216
>> Email: weinh...@dkl.com
> --
>
> This message and any attachments are intended only for the use of the 
> addressee and may contain information that is privileged and confidential. If 
> the reader of the message is not the intended recipient or an authorized 
> representative of the intended recipient, you are hereby notified that any 
> dissemination of this communication is strictly prohibited. If you have 
> received this communication in error, please notify us immediately by e-mail 
> and delete the message and any attachments from your system.
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

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


Re: Assembler courses

2022-09-17 Thread Bob Bridges
I'm with Mr Farley on this, or at least I would be if I had ever actually 
learned HLASM.  I know assembler programmers who've been very useful in 
different projects I've been part of - and in my world (security, I mean) it's 
even more helpful because occasionally one wants to write or update an exit.

I actually have written quite a bit in assembler, but it was a little on an old 
Motorola chip and a lot on the PDP-10; nothing for IBM mainframes.  Yet, I 
should say; I still have ambitions that way.  There are routines I'd write to 
interact with REXX if I had the knowledge.

---
Bob Bridges, robhbrid...@gmail.com, cell 336 382-7313

/* Back in the old days, most families were close-knit.  Grown children and 
their parents continued to live together, under the same roof, sometimes in the 
same small, crowded room, year in and year out, until they died, frequently by 
strangulation.  -Dave Barry */

-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
Farley, Peter x23353
Sent: Saturday, September 17, 2022 15:29

My experience was the opposite of yours over a few more years (50).  I learned 
assembler early via OJT at one of my first permanent jobs, and got to use it 
more and more as I moved to other employers.  Knowing assembler got me in the 
door at more than one of those employers.

It was the FORTRAN I learned in engineering college that I never used anywhere 
else.

-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of Bob 
T Roller
Sent: Saturday, September 17, 2022 3:17 PM


Learning assembler is like taking latin in high school. It might help you on 
Jeopardy but will not be of much help in real life. I took assembler in college 
& never used it and never worked at an employer that used it. That’s a dozen+ 
employers over 45 years.

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


Re: Output redirection

2022-09-17 Thread Bob Bridges
I don't know what technique you used to direct the RLIST output to a file,
so I can't guess why you got that message.  My own solution for things like
this is a REXX that I named DISP (and it's been reïnvented by many
mainframers and named different things) that uses OUTTRAP to capture the
command response and then write it to a dataset.  My own version uses a
temporary DSN; that way I can have several such outputs active at once and I
don't have to worry about what it's named; if I want to save it after
viewing, I can just use the ISPF CRE or REP command.

I use DISP frequently with lengthy TSO HELP commands, and always with RACF
commands.  'Twould look like this with your command:

  ==> tso disp rlist unixmap * all

If you can run RLIST in the foreground you should be able to use DISP with
it just as well.

---
Bob Bridges, robhbrid...@gmail.com, cell 336 382-7313

/* Back in the old days, most families were close-knit.  Grown children and
their parents continued to live together, under the same roof, sometimes in
the same small, crowded room, year in and year out, until they died,
frequently by strangulation.  -Dave Barry */


-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of
Phil Smith III
Sent: Saturday, September 17, 2022 10:48

I had cause to use RLIST UNIXMAP * ALL, but the output was voluminous. "No
problem", thinks I, "I'll just redirect it to a file". But that only got me
some truncated output plus:
IKJ56652I You attempted to run an authorized command or program.  This is
not supported under the Dynamic TSO Environment.

FOMF0139I Authorized commands are not supported

Is there an easy way to run such a command and send the output to a data
set?

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


Re: Assembler courses

2022-09-17 Thread Farley, Peter x23353
Great link Mike, thanks.  I'll be passing that one on to people I know who 
might be interested in learning at least the basics.

Peter

-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
Mike Beer
Sent: Saturday, September 17, 2022 2:27 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: AW: Assembler courses

This could be interesting:
https://urldefense.com/v3/__https://github.com/adelosa/learnasm370__;!!Ebr-cpPeAnfNniQ8HSAI-g_K5b7VKg!I2imP9wOmcYJDEMYAGWcpDH5l3cYWjvbUpgzAh8aDfMqV7jLx7t2SYvXmMixpVVFu8sRvImdrWgxeeqmMQ$
  

best regards
Mike

-Ursprüngliche Nachricht-
Von: IBM Mainframe Discussion List  Im Auftrag von
Mike Hochee
Gesendet: Saturday, September 17, 2022 20:11
An: IBM-MAIN@LISTSERV.UA.EDU
Betreff: Re: Assembler courses

Hey Gary, 

I can't recommend these folks as I haven't actually used their services, but
know they offer some assembler courses (including 'advanced', whatever that
means). I've also heard that both BMC and Rocket utilize their training,
unconfirmed.  Anyway... 

Darren Surch COO Interskill Learning
O:214.459.6322   M:469.826.1811   dsu...@interskill.com

HTH,
Mike 

-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of
Gary Weinhold
Sent: Friday, September 16, 2022 10:12 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Assembler courses

To help a person who has COBOL and C language experience learn to write
assembler, I would like them to learn from the start both reentrant and
baseless coding techniques.  Is there training available that assumes the
instruction set available on the z12 is the starting point and that teaches
reentrancy as the norm?

(Cross-posted to IBM-Main and Assembler-list)

Gary Weinhold
Senior Application Architect
DATAKINETICS | Data Performance & Optimization
Phone:+1.613.523.5500 x216
Email: weinh...@dkl.com
--

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

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


Re: Assembler courses

2022-09-17 Thread Farley, Peter x23353
My experience was the opposite of yours over a few more years (50).  I learned 
assembler early via OJT at one of my first permanent jobs, and got to use it 
more and more as I moved to other employers.  Knowing assembler got me in the 
door at more than one of those employers.

It was the FORTRAN I learned in engineering college that I never used anywhere 
else.

Peter

-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of Bob 
T Roller
Sent: Saturday, September 17, 2022 3:17 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Assembler courses

Learning assembler is like taking latin in high school. It might help you on 
Jeopardy but will not be of much help in real life. I took assembler in college 
& never used it and never worked at an employer that used it. That’s a dozen+ 
employers over 45 years.

Sent from Proton Mail for iOS

On Fri, Sep 16, 2022 at 10:11 PM, Gary Weinhold  wrote:

> To help a person who has COBOL and C language experience learn to write 
> assembler, I would like them to learn from the start both reentrant and 
> baseless coding techniques. Is there training available that assumes the 
> instruction set available on the z12 is the starting point and that teaches 
> reentrancy as the norm?
>
> (Cross-posted to IBM-Main and Assembler-list)
>
> Gary Weinhold
> Senior Application Architect
> DATAKINETICS | Data Performance & Optimization
> Phone:+1.613.523.5500 x216
> Email: weinh...@dkl.com
--

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


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


Re: Assembler courses

2022-09-17 Thread Bob T Roller
Learning assembler is like taking latin in high school. It might help you on 
Jeopardy but will not be of much help in real life. I took assembler in college 
& never used it and never worked at an employer that used it. That’s a dozen+ 
employers over 45 years.

Sent from Proton Mail for iOS

On Fri, Sep 16, 2022 at 10:11 PM, Gary Weinhold  wrote:

> To help a person who has COBOL and C language experience learn to write 
> assembler, I would like them to learn from the start both reentrant and 
> baseless coding techniques. Is there training available that assumes the 
> instruction set available on the z12 is the starting point and that teaches 
> reentrancy as the norm?
>
> (Cross-posted to IBM-Main and Assembler-list)
>
> Gary Weinhold
> Senior Application Architect
> DATAKINETICS | Data Performance & Optimization
> Phone:+1.613.523.5500 x216
> Email: weinh...@dkl.com
> Visit us online at www.DKL.com
> E-mail Notification: The information contained in this email and any 
> attachments is confidential and may be subject to copyright or other 
> intellectual property protection. If you are not the intended recipient, you 
> are not authorized to use or disclose this information, and we request that 
> you notify us by reply mail or telephone and delete the original message from 
> your mail system.
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

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


Re: Output redirection

2022-09-17 Thread Phil Smith III
Peter Sylvester wrote:
>A batch job might be your friend?

 

Well duh! I should have thought of that. For anyone else who might be as
thick as I am:
//REDIRECT JOB MSGLEVEL=(1,1),MSGCLASS=A,NOTIFY=

// EXEC PGM=IKJEFT01

//SYSPRINT DD SYSOUT=*

//SYSTSPRT DD DISP=SHR,DSN=PHS.PDS.DATA(REDIRECT)

//SYSTSIN DD *

RLIST UNIXMAP * ALL

 

Now I can just change the command at the bottom to capture other output.

 

Thanks again!


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


PSP for Crypto Express 8s

2022-09-17 Thread Lennie Dymoke-Bradshaw
I see that IBM are publishing PSP buckets online. For example I found the
following,

https://www.ibm.com/support/pages/upgrade-zosv2r5-subset-icsf77d2

 

I am looking to see if there is one for the Crypto Express 8s.

Does anyone know how to see a list of PSP buckets, or how to find a specific
one?

 

Thanks in advance,

 



Lennie Dymoke-Bradshaw

  https://rsclweb.com 


'Dance like no one is watching. Encrypt like everyone is.'

 

 

 

 

 


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


AW: Assembler courses

2022-09-17 Thread Mike Beer
This could be interesting:
https://github.com/adelosa/learnasm370

best regards
Mike

-Ursprüngliche Nachricht-
Von: IBM Mainframe Discussion List  Im Auftrag von
Mike Hochee
Gesendet: Saturday, September 17, 2022 20:11
An: IBM-MAIN@LISTSERV.UA.EDU
Betreff: Re: Assembler courses

Hey Gary, 

I can't recommend these folks as I haven't actually used their services, but
know they offer some assembler courses (including 'advanced', whatever that
means). I've also heard that both BMC and Rocket utilize their training,
unconfirmed.  Anyway... 

Darren Surch COO Interskill Learning
O:214.459.6322   M:469.826.1811   dsu...@interskill.com

HTH,
Mike 

-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of
Gary Weinhold
Sent: Friday, September 16, 2022 10:12 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Assembler courses

Caution! This message was sent from outside your organization.

To help a person who has COBOL and C language experience learn to write
assembler, I would like them to learn from the start both reentrant and
baseless coding techniques.  Is there training available that assumes the
instruction set available on the z12 is the starting point and that teaches
reentrancy as the norm?

(Cross-posted to IBM-Main and Assembler-list)





Gary Weinhold
Senior Application Architect
DATAKINETICS | Data Performance & Optimization
Phone:+1.613.523.5500 x216
Email: weinh...@dkl.com
Visit us online at www.DKL.com
E-mail Notification: The information contained in this email and any
attachments is confidential and may be subject to copyright or other
intellectual property protection. If you are not the intended recipient, you
are not authorized to use or disclose this information, and we request that
you notify us by reply mail or telephone and delete the original message
from your mail system.



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

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

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


Re: Assembler courses

2022-09-17 Thread Mike Hochee
Hey Gary, 

I can't recommend these folks as I haven't actually used their services, but 
know they offer some assembler courses (including 'advanced', whatever that 
means). I've also heard that both BMC and Rocket utilize their training, 
unconfirmed.  Anyway... 

Darren Surch COO Interskill Learning
O:214.459.6322   M:469.826.1811   dsu...@interskill.com

HTH, 
Mike 

-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
Gary Weinhold
Sent: Friday, September 16, 2022 10:12 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Assembler courses

Caution! This message was sent from outside your organization.

To help a person who has COBOL and C language experience learn to write 
assembler, I would like them to learn from the start both reentrant and 
baseless coding techniques.  Is there training available that assumes the 
instruction set available on the z12 is the starting point and that teaches 
reentrancy as the norm?

(Cross-posted to IBM-Main and Assembler-list)





Gary Weinhold
Senior Application Architect
DATAKINETICS | Data Performance & Optimization
Phone:+1.613.523.5500 x216
Email: weinh...@dkl.com
Visit us online at www.DKL.com
E-mail Notification: The information contained in this email and any 
attachments is confidential and may be subject to copyright or other 
intellectual property protection. If you are not the intended recipient, you 
are not authorized to use or disclose this information, and we request that you 
notify us by reply mail or telephone and delete the original message from your 
mail system.



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

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


Re: dfsort - microseconds (STCK/TOD)

2022-09-17 Thread Sri h Kolusu
Stefan,

Right off the bat, the reason you are having an issue is that you are only 
formatting the timestamp when=NONE condition ie. the data does NOT contain 
X'FA' or X'00' in position 9, but then you used another OUTREC overlay 
irrespective of the condition.

You also don't need another pass of data to overlay the contents of the 
microseconds

So get rid off

COPY FROM(OUT3) TO(OUT4) USING(CTL3)

And move CTL3CNTL to the end of CTL2CNTL with the following  (untested cards my 
flight is in next 2 hours and I will be offline)

OUTREC IFTHEN=(WHEN=(9,16,CH,EQ,C'{"MFSOURCETYPE":'),
  OVERLAY=(103:083,14,TRAN=UNHEX,
   063:103,7,BI,+100,M11,LENGTH=6))

OUTFIL BUILD=(9,1100,SQZ=(SHIFT=LEFT))


PS : Also that is a very old techinque to compare files and match them. Look Up 
JOINKEYS and it can be done a Single pass of data


Thanks,
 Kolusu
DFSORT Development
IBM Corporation

-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
Stefan Lezzi
Sent: Saturday, September 17, 2022 7:32 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: [EXTERNAL] Re: dfsort - microseconds (STCK/TOD)

That's a kind offer, but please don't look at the (un)elegance of the code. 
This made a different thread :-) Just search for TRNSTCK and OVERLAY, at the 
end.

//TOOLINDD *
 COPY FROM(IN)USING(CTL1)
 COPY FROM(OUT)  TO(OUT2) USING(CTL2)
 SPLICE FROM(OUT2) TO(OUT3) ON(1,8,ZD) WITHANY -
   WITH(500,300) WITH(800,300)
 COPY FROM(OUT3) TO(OUT4) USING(CTL3)
//CTL1CNTL  DD *
 INCLUDE COND=(5,1,CH,EQ,X'FA')
 OUTFIL FNAMES=OUT,VTOF,
 BUILD=(SEQNUM,8,ZD,5,992,/,SEQNUM,8,ZD,993,56,/,
 BUILD=(SEQNUM,8,ZD,5,992,/,SEQNUM,8,ZD,993,56,/,
   SEQNUM,8,ZD,1049,56,/,
   SEQNUM,8,ZD,1105,56,/,
   SEQNUM,8,ZD,1161,56,/,
   SEQNUM,8,ZD,1217,56,/,
   SEQNUM,8,ZD,1273,56,/,
   SEQNUM,8,ZD,1329,56,/,
   SEQNUM,8,ZD,1385,56,/,
   SEQNUM,8,ZD,1441,56,/,
   SEQNUM,8,ZD,1497,56)
//CTL2CNTL  DD *
 INCLUDE COND=(9,1,CH,EQ,X'FA',OR,
  (9,1,BI,EQ,UC,AND,
  10,1,BI,EQ,UC,AND,9,6,BI,NE,C'ALLDBS'),OR,9,1,BI,EQ,X'00')
 INREC IFTHEN=(WHEN=(9,1,BI,EQ,UC,AND,
  10,1,BI,EQ,UC,AND,9,6,BI,NE,C'ALLDBS'),
  BUILD=(1,8,500C' ',
  C'"DB2":"DB2",',
  C'"DBTPLAN":"',9,8,C'",',
  C'"DB2SEL":"',21,4,BI,C'",',
  C'"DB2OPEN":"',25,4,BI,C'",',
  C'"DB2ISRT":"',29,4,BI,C'",',
  C'"DB2DLET":"',33,4,BI,C'",',
  C'"DB2UPD":"',37,4,BI,C'",',
  C'"DB2DDL":"',41,2,BI,C'",',
  C'"DB2DYN":"',43,2,BI,C'",',
  C'"DB2CTRL":"',45,2,BI,C'",',
  C'"DB2OTHER":"',47,2,BI,C'",',
  C'"DB2SSID":"',49,4,C'",',
  C'}'),
  HIT=NEXT),
 IFTHEN=(WHEN=(9,1,BI,EQ,X'00'),
  BUILD=(1,8,800C' ',
  C'"MQ":"MQ",',
  C'"MQGET":"',21,4,BI,C'",',
  C'"MQPUT":"',25,4,BI,C'",',
  C'"MQPUT1":"',29,4,BI,C'",',
  C'"MQSET":"',33,4,BI,C'",',
  C'"MQOPEN":"',37,2,BI,C'",',
  C'"MQCLOSE":"',39,2,BI,C'",',
  C'"MQBACK":"',41,2,BI,C'",',
  C'"MQCMT":"',43,2,BI,C'",',
  C'"MQCONN":"',45,2,BI,C'",',
  C'"MQDISC":"',47,2,BI,C'",',
  C'"MQSSID":"',49,4,C'",',
  C'"MQINQ":"',53,2,BI,C'",',
  C'"MQUNKN":"',55,2,BI,C'",',
  C'}',200C' '),
  HIT=NEXT),
  HIT=NEXT),
 IFTHEN=(WHEN=NONE,
  BUILD=(1,8,C'{',
  C'"MFSOURCETYPE":"CSFA",',
  C'"TRNSTCK":"',393,8,DC1,EDIT=(-TT-TT),C'T',
 393,8,TC1,EDIT=(TT:TT:TT),
 C'.',
 63:6X,
 X,
 83:C'0',
 393,08,HEX,
  C'+:00',C'",',
  C'"ELAMICS":"',(517,8,BI,SUB,393,8,BI),DIV,+4096,C'",',
  C'"TRNARVD":"',117,4,TRAN=HEX,C'",',
  C'"TRNARVTH":"',587,4,TRAN=HEX,C'",',
  C'"TRNIMSID":"',25,4,C'",',
  C'"TRNSMFID":"',29,4,C'",',
  C'"TRNJOBNM":"',37,8,C'",',
  C'"TRNPSBNM":"',61,8,C'",',
  C'"TRNCODE":"',69,8,C'",',
  C'"TRNESSID":"',77,4,C'",',
  C'"TRNLTERM":"',125,8,C'",',
  C'"TRNTCPU":"',509,8,BI,DIV,+4096,EDIT=(.TT),C'",',
  C'"TRNSTCKE":"',517,8,DC1,EDIT=(-TT-TT),C'T',
  517,8,TC4,EDIT=(TT:TT:TT.TT),C'+:00',C'",',
  C'"UOW":"',615,32,TRAN=HEX,C'",',
  C'}'))
//CTL3CNTL  DD *
 OUTREC OVERLAY=(103:83,14,TRAN=UNHEX,
 63:103,7,BI,+100,M11,LENGTH=6)
 OUTREC BUILD=(9,1100,SQZ=(SHIFT=LEFT))

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


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


Re: Output redirection

2022-09-17 Thread Peter Sylvester

A batch job might be your friend?

starting with something like

// EXEC PGM=IKJEFT01
//SYSTSPRT DD SYSOUT=*,HOLD=YES
//SYSTSIN DD *
RLIST UNIXMAP * ALL


On 17/09/2022 16:48, Phil Smith III wrote:

I had cause to use RLIST UNIXMAP * ALL, but the output was voluminous. "No
problem", thinks I, "I'll just redirect it to a file". But that only got me
some truncated output plus:
IKJ56652I You attempted to run an authorized command or program.  This is
not supported under the Dynamic TSO Environment.

FOMF0139I Authorized commands are not supported

  


Is there an easy way to run such a command and send the output to a data
set?


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


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


Output redirection

2022-09-17 Thread Phil Smith III
I had cause to use RLIST UNIXMAP * ALL, but the output was voluminous. "No
problem", thinks I, "I'll just redirect it to a file". But that only got me
some truncated output plus:
IKJ56652I You attempted to run an authorized command or program.  This is
not supported under the Dynamic TSO Environment.

FOMF0139I Authorized commands are not supported

 

Is there an easy way to run such a command and send the output to a data
set?


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


Re: dfsort - microseconds (STCK/TOD)

2022-09-17 Thread Stefan Lezzi
That's a kind offer, but please don't look at the (un)elegance of the code. 
This made a different thread :-)
Just search for TRNSTCK and OVERLAY, at the end.

//TOOLINDD * 
 COPY FROM(IN)USING(CTL1)
 COPY FROM(OUT)  TO(OUT2) USING(CTL2)
 SPLICE FROM(OUT2) TO(OUT3) ON(1,8,ZD) WITHANY -
  
   WITH(500,300) WITH(800,300)
 COPY FROM(OUT3) TO(OUT4) USING(CTL3)
//CTL1CNTL  DD * 
 INCLUDE COND=(5,1,CH,EQ,X'FA')  
 OUTFIL FNAMES=OUT,VTOF, 
 BUILD=(SEQNUM,8,ZD,5,992,/,SEQNUM,8,ZD,993,56,/,
 BUILD=(SEQNUM,8,ZD,5,992,/,SEQNUM,8,ZD,993,56,/,   
   SEQNUM,8,ZD,1049,56,/,   
   SEQNUM,8,ZD,1105,56,/,   
   SEQNUM,8,ZD,1161,56,/,   
   SEQNUM,8,ZD,1217,56,/,   
   SEQNUM,8,ZD,1273,56,/,   
   SEQNUM,8,ZD,1329,56,/,   
   SEQNUM,8,ZD,1385,56,/,   
   SEQNUM,8,ZD,1441,56,/,   
   SEQNUM,8,ZD,1497,56) 
//CTL2CNTL  DD *
 INCLUDE COND=(9,1,CH,EQ,X'FA',OR,  
  (9,1,BI,EQ,UC,AND,
  10,1,BI,EQ,UC,AND,9,6,BI,NE,C'ALLDBS'),OR,9,1,BI,EQ,X'00')
   
 INREC IFTHEN=(WHEN=(9,1,BI,EQ,UC,AND,  
  10,1,BI,EQ,UC,AND,9,6,BI,NE,C'ALLDBS'),   
   
  BUILD=(1,8,500C' ',   
  C'"DB2":"DB2",',  
  C'"DBTPLAN":"',9,8,C'",', 
  C'"DB2SEL":"',21,4,BI,C'",',  
  C'"DB2OPEN":"',25,4,BI,C'",', 
  C'"DB2ISRT":"',29,4,BI,C'",', 
  C'"DB2DLET":"',33,4,BI,C'",', 
  C'"DB2UPD":"',37,4,BI,C'",',  
  C'"DB2DDL":"',41,2,BI,C'",',  
  C'"DB2DYN":"',43,2,BI,C'",',  
  C'"DB2CTRL":"',45,2,BI,C'",', 
  C'"DB2OTHER":"',47,2,BI,C'",',
  C'"DB2SSID":"',49,4,C'",',
  C'}'),
  HIT=NEXT),

 IFTHEN=(WHEN=(9,1,BI,EQ,X'00'),

  BUILD=(1,8,800C' ',   
  C'"MQ":"MQ",',
  C'"MQGET":"',21,4,BI,C'",',   
  C'"MQPUT":"',25,4,BI,C'",',   
  C'"MQPUT1":"',29,4,BI,C'",',  
  C'"MQSET":"',33,4,BI,C'",',   
  C'"MQOPEN":"',37,2,BI,C'",',  
  C'"MQCLOSE":"',39,2,BI,C'",', 
  C'"MQBACK":"',41,2,BI,C'",',  
  C'"MQCMT":"',43,2,BI,C'",',   
  C'"MQCONN":"',45,2,BI,C'",',  
  C'"MQDISC":"',47,2,BI,C'",',  
  C'"MQSSID":"',49,4,C'",', 
  C'"MQINQ":"',53,2,BI,C'",',   
  C'"MQUNKN":"',55,2,BI,C'",',  
  C'}',200C' '),
  HIT=NEXT),
  HIT=NEXT),
 
 IFTHEN=(WHEN=NONE,  
  BUILD=(1,8,C'{',   
  C'"MFSOURCETYPE":"CSFA",', 
  C'"TRNSTCK":"',393,8,DC1,EDIT=(-TT-TT),C'T',   
 393,8,TC1,EDIT=(TT:TT:TT),  
 C'.',   
 63:6X,  
 X,  
 83:C'0',
 393,08,HEX, 
  C'+:00',C'",', 
  C'"ELAMICS":"',(517,8,BI,SUB,393,8,BI),DIV,+4096,C'",',
  C'"TRNARVD":"',117,4,TRAN=HEX,C'",',   
  C'"TRNARVTH":"',587,4,TRAN=HEX,C'",',  
  C'"TRNIMSID":"',25,4,C'",',
  C'"TRNSMFID":"',29,4,C'",',   

Re: Strange FTP behavior

2022-09-17 Thread Jake Anderson
Ftp trace didn't show any error causing zero transfer

On Sat, Sep 17, 2022, 4:03 PM Michael Babcock  wrote:

> Jake, did you add TRACE to the PARM on the EXEC PGM=FTP statement?
>
> On Sat, Sep 17, 2022 at 6:27 AM Jake Anderson 
> wrote:
>
> > Hello
> >
> > Cross posted
> >
> > I was able to create the user with RESTRICTED attribute
> >
> > I have given a surrogate access to a STC owner is to the ID which I
> created
> > with RESTRICTED attribute
> >
> > Here when we submit job with USER=EXTBATCH
> > It internally does a FTP to a Linux server. For connecting the Linux
> using
> > FTP we are using ID created in Linux which is wmMF01
> >
> > The FTP logon is successful but when it tries to do a get operation on an
> > existing file in Linux to mainframe then it doesn't transfer instead it
> > gives zero bytes transferred
> >
> > To isolate the issue I tried to run the same batch using my own Mainframe
> > ID and wmMF01 but I was able to transfer the ID fron Linux to mainframe
> > without any problem.
> >
> > Unfortunately this is not even throwing any error message to debug and I
> > know that this is due to the RESTRICTED ATTRIBUTE
> >
> > There were some more case studies I did
> >
> > 1 ) When I submit the JCL with USER=EXTBATCH the transfer works
> > perfectly fine
> >
> > I did enable FTP DEBUG ALL but no message is displayed about zero bytes
> > getting transferred
> >
> > I hope I am missing some BPX racf profile for which the started task
> owner
> > is supposed to be permitted and I am not sure what BPX profile will allow
> > the FTP to take place
> >
> > EXTBATCH has OMVS segment, Started task owner too has OMVS segment and
> it's
> > default groups too have GID
> >
> > Could someone please point to a right direction on troubleshooting this
> in
> > detail
> >
> > Jake
> >
> > --
> > For IBM-MAIN subscribe / signoff / archive access instructions,
> > send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
> >
> --
> Michael Babcock
> OneMain Financial
> z/OS Systems Programmer, Lead
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>

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


Re: z/OSMF and Health Checker butting heads

2022-09-17 Thread Peter Relson

Do you know exactly what would please the Health Checker?  I


What would please Health Checker is the converse of the explanation of what it 
did not like.
As has already been discussed, it does not like a console that is "configured 
to have a multi-system message scope and either all routing codes or all 
routing codes except routing code 11".  So if you are going to use multi-system 
scope, you just don't want ROUTCODE of All, or All except 11. You surely don't 
want ROUTCODE of None (since I'm thinking that that would mean you wouldn't get 
anything with a routcode; maybe you'd get things with descriptor code and no 
routcode, I don't know).

I don't think that the sample is trying to identify a "minimum" or "correct" 
value. That might well be site-dependent and up to you to decide what you want.

In any case, I will pass this along.

Peter Relson
z/OS Core Technology Design


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


Re: dfsort - microseconds (STCK/TOD)

2022-09-17 Thread Sri h Kolusu
>> But to be honest, I don't get the math right (positions/offsets/length). I 
>> always end up with something like this:

Stefan,

Looking at the output data you have shown, I am guessing that you used OVERLAY 
to write the time stamp and you have the existing data still in their original 
positions.

Use INREC BUILD to build all the fields you wanted and then use overlay on 
OUTREC to put the microseconds portion.

If you can show me the complete cards, I probably can see what needs to be 
done. 


Thanks,
Kolusu
DFSORT Development
IBM Corporation


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


Re: dfsort - microseconds (STCK/TOD)

2022-09-17 Thread Stefan Lezzi
I was prepared to be challenged by such questions :-)
Anyway, for my purpose it's not yet so important (and a I can always "correct" 
the time in a splunk search).

Anyway II, I suppose that, here again, I needed deep dfsort (lab) knowledge, if 
possible at all, to have CVTLSO and CVTLDTO available in dfsort?

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


Re: dfsort - microseconds (STCK/TOD)

2022-09-17 Thread Paul Gilmartin
On Fri, 16 Sep 2022 11:18:14 -0500, Stefan Lezzi wrote:
>
>I want to format a STCK/TOD with microseconds, but I found only the method to 
>format it with hundredths of a second:
>
>C'"TRNSTCK":"',393,8,DC1,EDIT=(-TT-TT),C'T',
>   393,8,TC4,EDIT=(TT:TT:TT.TT),C'+00:00',C'",',
> 
What time scale do you want?  IBM recommends that (E)TOT be set to
TAI minus 10 seconds.  The practice varies from site to site.

If you want TAI, add ten seconds to TOD.

If you want UTC, subtract CVTLSO from TOD.

If you want local time, subtract CVTLSO and add CVTLDTO to TOD.

What do you want to happen if CVTLSO and/or CVTLDTO change
between recording of the data and your DFSORT run?


>And I know how to calculated an elapsed time in microseconds:
>
>C'"ELAMICS":"',(517,8,BI,SUB,393,8,BI),DIV,+4096,C'",',

-- 
gil

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


Re: Assembler courses

2022-09-17 Thread Steve Smith
I don't know of any material that supports your goal, but I definitely
agree with you that it's a good idea.  In particular, starting with
relative branches and immediate instructions will make them better
programmers from the start.

As for reentrancy, I might start with a macro set that provides
prolog/epilog code (e.g. LE has these).  At the beginning, treat them as
black boxes, but explain what they do and how they work later on.  You can
(probably must) expand on linkage conventions at some length.  But starting
with the "rule" that you shouldn't modify your program, even though you
*can* shouldn't be a huge additional burden.

Of course, you didn't say you wanted advice on creating your own.  Good
luck.

sas

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


Re: Strange FTP behavior

2022-09-17 Thread Michael Babcock
Jake, did you add TRACE to the PARM on the EXEC PGM=FTP statement?

On Sat, Sep 17, 2022 at 6:27 AM Jake Anderson 
wrote:

> Hello
>
> Cross posted
>
> I was able to create the user with RESTRICTED attribute
>
> I have given a surrogate access to a STC owner is to the ID which I created
> with RESTRICTED attribute
>
> Here when we submit job with USER=EXTBATCH
> It internally does a FTP to a Linux server. For connecting the Linux using
> FTP we are using ID created in Linux which is wmMF01
>
> The FTP logon is successful but when it tries to do a get operation on an
> existing file in Linux to mainframe then it doesn't transfer instead it
> gives zero bytes transferred
>
> To isolate the issue I tried to run the same batch using my own Mainframe
> ID and wmMF01 but I was able to transfer the ID fron Linux to mainframe
> without any problem.
>
> Unfortunately this is not even throwing any error message to debug and I
> know that this is due to the RESTRICTED ATTRIBUTE
>
> There were some more case studies I did
>
> 1 ) When I submit the JCL with USER=EXTBATCH the transfer works
> perfectly fine
>
> I did enable FTP DEBUG ALL but no message is displayed about zero bytes
> getting transferred
>
> I hope I am missing some BPX racf profile for which the started task owner
> is supposed to be permitted and I am not sure what BPX profile will allow
> the FTP to take place
>
> EXTBATCH has OMVS segment, Started task owner too has OMVS segment and it's
> default groups too have GID
>
> Could someone please point to a right direction on troubleshooting this in
> detail
>
> Jake
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>
-- 
Michael Babcock
OneMain Financial
z/OS Systems Programmer, Lead

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


Strange FTP behavior

2022-09-17 Thread Jake Anderson
Hello

Cross posted

I was able to create the user with RESTRICTED attribute

I have given a surrogate access to a STC owner is to the ID which I created
with RESTRICTED attribute

Here when we submit job with USER=EXTBATCH
It internally does a FTP to a Linux server. For connecting the Linux using
FTP we are using ID created in Linux which is wmMF01

The FTP logon is successful but when it tries to do a get operation on an
existing file in Linux to mainframe then it doesn't transfer instead it
gives zero bytes transferred

To isolate the issue I tried to run the same batch using my own Mainframe
ID and wmMF01 but I was able to transfer the ID fron Linux to mainframe
without any problem.

Unfortunately this is not even throwing any error message to debug and I
know that this is due to the RESTRICTED ATTRIBUTE

There were some more case studies I did

1 ) When I submit the JCL with USER=EXTBATCH the transfer works
perfectly fine

I did enable FTP DEBUG ALL but no message is displayed about zero bytes
getting transferred

I hope I am missing some BPX racf profile for which the started task owner
is supposed to be permitted and I am not sure what BPX profile will allow
the FTP to take place

EXTBATCH has OMVS segment, Started task owner too has OMVS segment and it's
default groups too have GID

Could someone please point to a right direction on troubleshooting this in
detail

Jake

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


Re: dfsort - microseconds (STCK/TOD)

2022-09-17 Thread Stefan Lezzi
Hi Kolusu,

That's perfectly what I was looking for, many thanks!

But to be honest, I don't get the math right (positions/offsets/length).
I always end up with something like this:

--+5+6+7+8+9+0+
2022-09-12T13:55:27. 3871979727001140 008B8834963471C+00 A»h o

using this code (analogues to your example):

C'"TRNSTCK":"',393,8,DC1,EDIT=(-TT-TT),C'T',
   393,8,TC1,EDIT=(TT:TT:TT),   
   C'.',
   63:6X,   
   X,   
   83:C'0', 
   393,08,HEX,
and
 OUTREC OVERLAY=(103:83,14,TRAN=UNHEX, 
 63:103,7,BI,+100,M11,LENGTH=6)

Probably, it's just a silly error/misunderstanding of mine.
If the figures, that you have posted are correct, I'll have to do my part of 
the work correctly!

Stefan

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


Re: Assembler courses

2022-09-17 Thread Joe Monk
I would suggest you start by writing subroutines that can be called  by a
COBOL program. This is how I learned.

Take a COBOL driver program, and instead of writing paragraphs to do the
functions, call an assembler routine. This will help you to learn linkage.
Learn to process passed variables, etc.

Once you have that down, changing to re-entrancy and baseless coding is
merely a matter of changing subroutines you already have and know.

Joe

On Fri, Sep 16, 2022 at 9:12 PM Gary Weinhold  wrote:

> To help a person who has COBOL and C language experience learn to write
> assembler, I would like them to learn from the start both reentrant and
> baseless coding techniques.  Is there training available that assumes the
> instruction set available on the z12 is the starting point and that teaches
> reentrancy as the norm?
>
> (Cross-posted to IBM-Main and Assembler-list)
>
>
>
>
>
> Gary Weinhold
> Senior Application Architect
> DATAKINETICS | Data Performance & Optimization
> Phone:+1.613.523.5500 x216
> Email: weinh...@dkl.com
> Visit us online at www.DKL.com
> E-mail Notification: The information contained in this email and any
> attachments is confidential and may be subject to copyright or other
> intellectual property protection. If you are not the intended recipient,
> you are not authorized to use or disclose this information, and we request
> that you notify us by reply mail or telephone and delete the original
> message from your mail system.
>
>
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>

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