Re: GTTERM assistance

[Tony Harminc]

On Tue, 1 Nov 2022 at 17:16, Colin Paice  wrote:

> I think I read that IBM was going to drop SNA in a future release os z/OS ,
> if so would it be wise to continue down this path?
>

I can't imagine that IBM is going to "drop SNA" any time soon - too much
still depends on it, and it's hard to see the upside. They might as well
drop JCL or TSO. Anything that talks to a 3270 (except local non-SNA
channel-attached) is using SNA. What they could do is to write a purely TCP
version of TCAS, and slide it in the same way TSO/VTAM existed in parallel
with TSO TCAM 40-ish years ago. But this would still have a bunch of the
SNA attributes to it.

What has for all practical purposes already been dropped is "SNA on the
wire". There are no more Front End Processors (3705 and descendants) , and
I haven't seen an actual LAN Channel Station (LCS) or even an emulation of
one for many years. I think the newer (OSA) interfaces till support SNA,
but is anyone using them that way?

So how does SNA traffic get onto a network in the modern world? I think the
only practical answer is encapsulating it in IP traffic, and I think that
means Enterprise Extender and such.

In any case, there's nothing wrong with writing SNA programs for fun. The
OP said nothing about marketing it.

Tony H.

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

Re: GTTERM assistance

[Michael Stein]

> Any assistance would be greatly appreciated.
>
> I am working on a SNA interface for a batch framework. This is mostly just
> a massive learning exercise that will likely never be utilized, but I have
> learned SO much while working on this project (currently 6 years in the
> making).

I'm confused about what this is part of.  Is this a TSO program
or something else (saying SNA? VTAM APPL?).  

I ask that because as far as I know GTTERM is TSO only.  But
you got return code 0 so perhaps the GTTERM is being issued
from TSO.
 
> The address space accepts terminals with MOD2 terminals and everything

"Terminals" plural.  A TSO session with more than one?

> I check register 15 after the SVC, and it is zero. But the SVC parameter
> values are still zero.

When using MF=L and MF=E macro forms, usually it's necessary to copy
an MF=L list into the DSECT area before using the MF=E form...

This is not true for all macros, but perhaps for GTTERM.

So somewhere in the source should be a GTTERM MF=L and then it should
be copied (MVC) into GTTLIST in the DSECT before issuing the GTTERM
MF=(E,GTTLIST).  I'd suggest looking at the full expansion of the GTTERM
(both MF=L and MF=E) to see if this is needed.

Other points:

> WORKREG  EQU   R3
> SESSREG  EQU   R5

I've only used 16 registers R0->R15.  You can do what you want but I'd
be very careful that additional register equates didn't result in some
duplicate register usage.  I saw some IBM source which had:

  R15   EQU  R9

I'd prefer better comments, or when trivial, no comment.   As an
example:

>  LRR2,R1   SAVE REGISTER 2

This appears backwards, saving R1 in R2.   Also R2 is a problematic
register as some hardware instructions alter it without it being specified
(TRT translate and test at least).  I'd be careful when I used it and
treat it as a bit less temporary than R0, R1, R14, R15.

More comments on comments (& register usage):
 
>  LRR6,WORKREG  LOAD REGISTER
>  LAR8,0SET DUMMY FROM ADDRESS
>  XRR9,R9   SET PADDING TO LOW VALUES
>  MVCL  R6,R8   INITIALIZE AREA

I'd suggest something like:

   LRR6,WORKREG  @ workarea to clear, len in R7
   SRR15,R15
   MVCL  R6,R14

The contents of R14 don't matter for the MVCL as the length in R15 is zero.

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

AW: SPF/SE is available for free

[Michael Knigge]

Not that good.

Every row in the editor has a grey line above and under the row... 


Bye,
Michael




Mit freundlichen Grüßen 

Michael Knigge
Software Engineer 


Rühmkorffstraße 5 
30163 Hannover 

Telefon: +49 511 330 998 23 
Fax: +49 511 330 998 65 
michael.kni...@set.de 
https://set.de 
Hinweise zum Datenschutz: https://set.de/datenschutz

Handelsregister: Amtsgericht Hannover HRB 52778 
​Geschäftsführer: Dr.-Ing. Tobias Baum, Dr.-Ing. Arthur Brack


-Ursprüngliche Nachricht-
Von: IBM Mainframe Discussion List  Im Auftrag von 
Jay Maynard
Gesendet: Dienstag, 1. November 2022 15:35
An: IBM-MAIN@LISTSERV.UA.EDU
Betreff: Re: SPF/SE is available for free

Thank you for preserving this and making it available.

One question: You say it's picky about fonts...how well does it work with 
Ricardo Banffy's outstanding 3270 font, available at
https://deu01.safelinks.protection.outlook.com/?url=https%3A%2F%2Fgithub.com%2Frbanffy%2F3270font&data=05%7C01%7CMichael.Knigge%40SET.DE%7Ccd3ab3739bd14106700808dabc164787%7C42ae95ffd7a840de97e0322d94113a4e%7C0%7C0%7C638029101127967676%7CUnknown%7CTWFpbGZsb3d8eyJWIjoiMC4wLjAwMDAiLCJQIjoiV2luMzIiLCJBTiI6Ik1haWwiLCJXVCI6Mn0%3D%7C3000%7C%7C%7C&sdata=fWlv5GFFJ0w7QQIU9e4lrKJa3CjFNXAONTuKiA0Sxw0%3D&reserved=0
 ?

On Tue, Nov 1, 2022 at 9:22 AM Michael Knigge  wrote:

> FYI:
>
> I guess some of you guys use SPF/SE (SPF SourceEdit) from Command 
> Technology. The editor was developed by Tim Tetivia, who unfortunately 
> died in 2022 as a result of a corona infection. With some research and 
> help from other SPF users (namely Peter aka Verizon), it was possible 
> to contact Tim's wife Bonnie. She gave us permission to distribute the 
> editor for free (sadly the source code is “lost” forever).
>
> On my GitHub 
> (https://deu01.safelinks.protection.outlook.com/?url=https%3A%2F%2Fgit
> hub.com%2Fmichaelknigge%2Fspf-editor&data=05%7C01%7CMichael.Knigge
> %40SET.DE%7Ccd3ab3739bd14106700808dabc164787%7C42ae95ffd7a840de97e0322
> d94113a4e%7C0%7C0%7C638029101127967676%7CUnknown%7CTWFpbGZsb3d8eyJWIjoiMC4wLjAwMDAiLCJQIjoiV2luMzIiLCJBTiI6Ik1haWwiLCJXVCI6Mn0%3D%7C3000%7C%7C%7C&sdata=Qtf2hQbn5i6W9EHnD%2F%2BhvOQuBzbhx6hXZ%2FTk7Fg11QM%3D&reserved=0)
>  I made some releases available, together with product keys. I also provide a 
> “professional” installer created with InnoSetup that installs SPF/SE together 
> with some useful macros, file profiles and color schemes (a color scheme that 
> makes SPF/SE look like ISPF).
>
> The original releases can be found here:
> https://deu01.safelinks.protection.outlook.com/?url=https%3A%2F%2Fgith
> ub.com%2Fmichaelknigge%2Fspf-editor%2Ftree%2Fmain%2Fbinaries&data=
> 05%7C01%7CMichael.Knigge%40SET.DE%7Ccd3ab3739bd14106700808dabc164787%7
> C42ae95ffd7a840de97e0322d94113a4e%7C0%7C0%7C638029101127967676%7CUnkno
> wn%7CTWFpbGZsb3d8eyJWIjoiMC4wLjAwMDAiLCJQIjoiV2luMzIiLCJBTiI6Ik1haWwiL
> CJXVCI6Mn0%3D%7C3000%7C%7C%7C&sdata=gGwdplvFoQGVw0Zv2DYk%2FxNOZQr6
> DY%2BCCPhVSjVQT5c%3D&reserved=0
>
> My installers can be found here:
> https://deu01.safelinks.protection.outlook.com/?url=https%3A%2F%2Fgith
> ub.com%2Fmichaelknigge%2Fspf-editor%2Freleases&data=05%7C01%7CMich
> ael.Knigge%40SET.DE%7Ccd3ab3739bd14106700808dabc164787%7C42ae95ffd7a84
> 0de97e0322d94113a4e%7C0%7C0%7C638029101127967676%7CUnknown%7CTWFpbGZsb
> 3d8eyJWIjoiMC4wLjAwMDAiLCJQIjoiV2luMzIiLCJBTiI6Ik1haWwiLCJXVCI6Mn0%3D%
> 7C3000%7C%7C%7C&sdata=oTlp7mvueca3HSfeQLjDvrtdjL88lAo7C42qLK6T5m8%
> 3D&reserved=0
>
>
> Bye,
> Michael
>
>
>
> Mit freundlichen Grüßen
>
> Michael Knigge
> Software Engineer
>
> SET GmbH
> Rühmkorffstraße 5
> 30163 Hannover
>
> Telefon: +49 511 330 998 23
> Fax: +49 511 330 998 65
> michael.kni...@set.de
> https://deu01.safelinks.protection.outlook.com/?url=https%3A%2F%2Fset.
> de%2F&data=05%7C01%7CMichael.Knigge%40SET.DE%7Ccd3ab3739bd14106700
> 808dabc164787%7C42ae95ffd7a840de97e0322d94113a4e%7C0%7C0%7C63802910112
> 7967676%7CUnknown%7CTWFpbGZsb3d8eyJWIjoiMC4wLjAwMDAiLCJQIjoiV2luMzIiLC
> JBTiI6Ik1haWwiLCJXVCI6Mn0%3D%7C3000%7C%7C%7C&sdata=PiF5eFB59TdHyus
> VMM7rxeEG7HVPRioycSSz47BFmhY%3D&reserved=0
> Hinweise zum Datenschutz: 
> https://deu01.safelinks.protection.outlook.com/?url=https%3A%2F%2Fset.
> de%2Fdatenschutz&data=05%7C01%7CMichael.Knigge%40SET.DE%7Ccd3ab373
> 9bd14106700808dabc164787%7C42ae95ffd7a840de97e0322d94113a4e%7C0%7C0%7C
> 638029101127967676%7CUnknown%7CTWFpbGZsb3d8eyJWIjoiMC4wLjAwMDAiLCJQIjo
> iV2luMzIiLCJBTiI6Ik1haWwiLCJXVCI6Mn0%3D%7C3000%7C%7C%7C&sdata=%2BH
> Jwy3uxqSi99Ttr1noVhytolzdRwnrTelMSpm6Njpc%3D&reserved=0
>
> Handelsregister: Amtsgericht Hannover HRB 52778
> ​Geschäftsführer: Dr.-Ing. Tobias Baum, Dr.-Ing. Arthur Brack
>
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions, send 
> email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>


--
Jay Maynard

-

AW: SPF/SE is available for free

[Michael Knigge]

My pleasure

I personally use SPF/SE nearly every day. We have a product that processes 
print files and we also support z/OS - for this reason we often have to handle 
files from z/OS Record oriented files with RECFM=VB  SPF/SE can handle 
them like a charm


Bye,
Michel



Mit freundlichen Grüßen 

Michael Knigge
Software Engineer 


Rühmkorffstraße 5 
30163 Hannover 

Telefon: +49 511 330 998 23 
Fax: +49 511 330 998 65 
michael.kni...@set.de 
https://set.de 
Hinweise zum Datenschutz: https://set.de/datenschutz

Handelsregister: Amtsgericht Hannover HRB 52778 
​Geschäftsführer: Dr.-Ing. Tobias Baum, Dr.-Ing. Arthur Brack


-Ursprüngliche Nachricht-
Von: IBM Mainframe Discussion List  Im Auftrag von 
Mike Shaw
Gesendet: Dienstag, 1. November 2022 16:08
An: IBM-MAIN@LISTSERV.UA.EDU
Betreff: Re: SPF/SE is available for free

Michael,

Thank you for this gift to our community. I used SPF/PC and SPF/SE extensively 
in the past and thought it was gone forever.

Mike Shaw
MVS/QuickRef Support Group
Chicago-Soft, Ltd.


On Tue, Nov 1, 2022 at 10:22 AM Michael Knigge 
wrote:

> FYI:
>
> I guess some of you guys use SPF/SE (SPF SourceEdit) from Command 
> Technology. The editor was developed by Tim Tetivia, who unfortunately 
> died in 2022 as a result of a corona infection. With some research and 
> help from other SPF users (namely Peter aka Verizon), it was possible 
> to contact Tim's wife Bonnie. She gave us permission to distribute the 
> editor for free (sadly the source code is “lost” forever).
>
> On my GitHub 
> (https://deu01.safelinks.protection.outlook.com/?url=https%3A%2F%2Fgit
> hub.com%2Fmichaelknigge%2Fspf-editor&data=05%7C01%7CMichael.Knigge
> %40SET.DE%7C48315463358e43127aba08dabc1b00eb%7C42ae95ffd7a840de97e0322
> d94113a4e%7C0%7C0%7C638029121421943898%7CUnknown%7CTWFpbGZsb3d8eyJWIjoiMC4wLjAwMDAiLCJQIjoiV2luMzIiLCJBTiI6Ik1haWwiLCJXVCI6Mn0%3D%7C3000%7C%7C%7C&sdata=z5KDWQuQuallNJN0XwqDdZ5Z7KgaZQJvb%2BWCBMRP6Bo%3D&reserved=0)
>  I made some releases available, together with product keys. I also provide a 
> “professional” installer created with InnoSetup that installs SPF/SE together 
> with some useful macros, file profiles and color schemes (a color scheme that 
> makes SPF/SE look like ISPF).
>
> The original releases can be found here:
> https://deu01.safelinks.protection.outlook.com/?url=https%3A%2F%2Fgith
> ub.com%2Fmichaelknigge%2Fspf-editor%2Ftree%2Fmain%2Fbinaries&data=
> 05%7C01%7CMichael.Knigge%40SET.DE%7C48315463358e43127aba08dabc1b00eb%7
> C42ae95ffd7a840de97e0322d94113a4e%7C0%7C0%7C638029121421943898%7CUnkno
> wn%7CTWFpbGZsb3d8eyJWIjoiMC4wLjAwMDAiLCJQIjoiV2luMzIiLCJBTiI6Ik1haWwiL
> CJXVCI6Mn0%3D%7C3000%7C%7C%7C&sdata=TdncdHXb9Ub8LU0Up%2F5jN8qk0O%2
> F1t7N9Z5NO6nBebKY%3D&reserved=0
>
> My installers can be found here:
> https://deu01.safelinks.protection.outlook.com/?url=https%3A%2F%2Fgith
> ub.com%2Fmichaelknigge%2Fspf-editor%2Freleases&data=05%7C01%7CMich
> ael.Knigge%40SET.DE%7C48315463358e43127aba08dabc1b00eb%7C42ae95ffd7a84
> 0de97e0322d94113a4e%7C0%7C0%7C638029121421943898%7CUnknown%7CTWFpbGZsb
> 3d8eyJWIjoiMC4wLjAwMDAiLCJQIjoiV2luMzIiLCJBTiI6Ik1haWwiLCJXVCI6Mn0%3D%
> 7C3000%7C%7C%7C&sdata=l3opIg4%2B%2F7rwUGiEVoBrfKGt%2BmFmD2U9dNW5t%
> 2Bn2%2BUY%3D&reserved=0
>
>
> Bye,
> Michael
>
>
>
> Mit freundlichen Grüßen
>
> Michael Knigge
> Software Engineer
>
> SET GmbH
> Rühmkorffstraße 5
> 30163 Hannover
>
> Telefon: +49 511 330 998 23
> Fax: +49 511 330 998 65
> michael.kni...@set.de
> https://deu01.safelinks.protection.outlook.com/?url=https%3A%2F%2Fset.
> de%2F&data=05%7C01%7CMichael.Knigge%40SET.DE%7C48315463358e43127ab
> a08dabc1b00eb%7C42ae95ffd7a840de97e0322d94113a4e%7C0%7C0%7C63802912142
> 1943898%7CUnknown%7CTWFpbGZsb3d8eyJWIjoiMC4wLjAwMDAiLCJQIjoiV2luMzIiLC
> JBTiI6Ik1haWwiLCJXVCI6Mn0%3D%7C3000%7C%7C%7C&sdata=i9ZYEXSjKiWWWD8
> Ah%2BIWQf5W6BVbU2oiFoLb4r1aZcA%3D&reserved=0
> Hinweise zum Datenschutz: 
> https://deu01.safelinks.protection.outlook.com/?url=https%3A%2F%2Fset.
> de%2Fdatenschutz&data=05%7C01%7CMichael.Knigge%40SET.DE%7C48315463
> 358e43127aba08dabc1b00eb%7C42ae95ffd7a840de97e0322d94113a4e%7C0%7C0%7C
> 638029121421943898%7CUnknown%7CTWFpbGZsb3d8eyJWIjoiMC4wLjAwMDAiLCJQIjo
> iV2luMzIiLCJBTiI6Ik1haWwiLCJXVCI6Mn0%3D%7C3000%7C%7C%7C&sdata=IaAb
> 9I%2FFy3zdJxOncvPXvx%2BG1qGR6%2Fio0igW%2FjfZ5HU%3D&reserved=0
>
> Handelsregister: Amtsgericht Hannover HRB 52778
> ​Geschäftsführer: Dr.-Ing. Tobias Baum, Dr.-Ing. Arthur Brack
>
>
> --
> 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 IB

Re: GTTERM assistance

[Seymour J Metz]

Te MF=L would be in place of the other MF=L, not in addition to it.

Also, check the forward chain.


From: IBM Mainframe Discussion List  on behalf of 
Brian Chapman 
Sent: Tuesday, November 1, 2022 4:13 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: GTTERM assistance

Shmuel,

All I see is that your save area code is bad

Thanks. I'm not sure how that 64 bit save area code got stuck in there.

What's in SESSBLK?

SESSBLK is just a user control block with the 'session' variables. The
values for SESSPRI and SESSALT and SESSATTR are still zero after the SVC
call.

I would probably have written something like

GTTLIST  GTTERM PRMSZE=SESSPRI,ALTSZE=SESSALT,ATTRIB=SESSATTR, *
   MF=(E,GTTLIST)

for documentation, but AFAIK that wouldn't affect the length.

I'm not sure I understand. I get an assembly error with "Previously defined
symbol' when I re-use the GTTLIST label.


Thank you,

Brian Chapman


On Tue, Nov 1, 2022 at 3:42 PM Seymour J Metz  wrote:

> All I see is that your save area code is bad, but that shouldn't affect
> the returned values from GTTERM. What's in SESSBLK?
>
> I would probably have written something like
>
> GTTLIST  GTTERM PRMSZE=SESSPRI,ALTSZE=SESSALT,ATTRIB=SESSATTR, *
>MF=(E,GTTLIST)
>
> for documentation, but AFAIK that wouldn't affect the length.
>
>
> --
> Shmuel (Seymour J.) Metz
> http://mason.gmu.edu/~smetz3
>
> 
> From: IBM Mainframe Discussion List [IBM-MAIN@LISTSERV.UA.EDU] on behalf
> of Brian Chapman [bchapma...@gmail.com]
> Sent: Tuesday, November 1, 2022 2:45 PM
> To: IBM-MAIN@LISTSERV.UA.EDU
> Subject: GTTERM assistance
>
> Hello all,
>
> Any assistance would be greatly appreciated.
>
> I am working on a SNA interface for a batch framework. This is mostly just
> a massive learning exercise that will likely never be utilized, but I have
> learned SO much while working on this project (currently 6 years in the
> making).
>
> The address space accepts terminals with MOD2 terminals and everything
> displays great. However, I would like to support larger terminal sizes. My
> first hurdle is GTTERM. I understand that my program should be in  RMODE24
> and AMODE24. The program is assembled with AMODE 31, but performs a SAM24
> and SAM31 before and after the SVC call. The dynamic storage area for the
> program is also acquired below the line.
>
> I check register 15 after the SVC, and it is zero. But the SVC parameter
> values are still zero.
>
> Here is my source:
>
>  REGEQU
>  COPY  SESSBLK
> *
> WORKAREA DSECT
> WORKNAME DSCL8
> SAVEAREA DS18F
> SAVERC   DSF
> SAVEPARM DSF
> *
> GTTLIST  GTTERM MF=L
> *
> WORKLEN  EQU   *-WORKAREA
> *
> WORKREG  EQU   R3
> SESSREG  EQU   R5
> *
> PORTTC04 CSECT
> PORTTC04 AMODE 31
> PORTTC04 RMODE 24
>  STM   R14,R12,12(R13) SAVE REGISTERS
>  LRR12,R15 ESTABLISH BASE
>  USING PORTTC04,R12*
>  B START
> *
>  DCCL9'PORTTC04'
>  DCCL9'&SYSDATC'
>  DCCL5'&SYSTIME'
> *
> STARTDS0H
>  LRR2,R1   SAVE REGISTER 2
>  LHI   R7,WORKLEN  LOAD WORK AREA LENGTH
>  GETMAIN RU,LV=(R7),LOC=BELOW
>  LRWORKREG,R1  *
>  USING WORKAREA,WORKREGSET ADDRESSIBILITY
> *
>  LRR6,WORKREG  LOAD REGISTER
>  LAR8,0SET DUMMY FROM ADDRESS
>  XRR9,R9   SET PADDING TO LOW VALUES
>  MVCL  R6,R8   INITIALIZE AREA
> *
>  STR13,SAVEAREA+4  CHAIN CALLER'S SAVEAREA ADDRESS
>  LAR13,SAVEAREA
>  STR13,SAVEAREA+8  SAVE CURRENT SAVEAREA ADDRESS
>  MVC   SAVEAREA(4),=CL4'F4SA'
>  MVC   WORKNAME(8),=CL8'PORTTC04'
> *
> GETLINK  DS0H
>  LRR1,R2   RESTORE REGISTER 2
>  STR1,SAVEPARM
>  LTSESSREG,4(R1)   GET ADDRESS OF SESSBLK
>  BZBADLINK NO LINKAGE PASSED
>  USING SESSBLK,SESSREG SET ADDRESSIBILITY
> *
> GETTERM  DS0H
>  SAM24
> *
>  GTTERM PRMSZE=SESSPRI,ALTSZE=SESSALT,ATTRIB=SESSATTR, *
>MF=(E,GTTLIST)
> *
>  ABEND 91,DUMP
>  SAM31
> *
>  LTR   R15,R15
>  BNZ   BADRC
> *
>  STR15,SESSATTR+4
> *
>  B RETURN
> *
> BADRCDS0H
>  WTO   'PORTTC04 BAD GTTERM RC'
>  MVHI  SAVERC,16   SET BAD RETURN CODE
>  ABEND 98,DUMP
> *
> BADLINK  DS0H
>  WTO   'PORTTC04 INVALID LINKAGE PARAMETERS'
>  MVHI  SAVERC,16   SET BAD RETURN CODE
>  ABEND 99,DUMP
> *
> RETURN   DS0H
>  L R13,SAVEAREA+4  RESTORE R13
>  L R2,SAVERC   LOAD RC
> *
>

AW: SPF/SE is available for free

[Michael Knigge]

Jay,

I've got the following information.


Hello Michael. I contacted his wife and she told me that Tim’s SPF s/w is “gone 
forever”.  Apparently he PW protected it and when she tried to break the PW, it 
self destructed. In any case, according to her, there is no hope for any data 
recovery. Very disappointing.



Sorry

Michael


Mit freundlichen Grüßen 

Michael Knigge
Software Engineer 


Rühmkorffstraße 5 
30163 Hannover 

Telefon: +49 511 330 998 23 
Fax: +49 511 330 998 65 
michael.kni...@set.de 
https://set.de 
Hinweise zum Datenschutz: https://set.de/datenschutz

Handelsregister: Amtsgericht Hannover HRB 52778 
​Geschäftsführer: Dr.-Ing. Tobias Baum, Dr.-Ing. Arthur Brack


-Ursprüngliche Nachricht-
Von: IBM Mainframe Discussion List  Im Auftrag von 
Jay Maynard
Gesendet: Dienstag, 1. November 2022 20:23
An: IBM-MAIN@LISTSERV.UA.EDU
Betreff: Re: SPF/SE is available for free

Hm. According to the README on the Github site, the source code was stored 
encrypted...are the encrypted files still in existence? Perhaps they can be 
obtained and decrypted. It's a long shot, to be sure, but definitely worth a 
try.

On Tue, Nov 1, 2022 at 9:22 AM Michael Knigge  wrote:

> FYI:
>
> I guess some of you guys use SPF/SE (SPF SourceEdit) from Command 
> Technology. The editor was developed by Tim Tetivia, who unfortunately 
> died in 2022 as a result of a corona infection. With some research and 
> help from other SPF users (namely Peter aka Verizon), it was possible 
> to contact Tim's wife Bonnie. She gave us permission to distribute the 
> editor for free (sadly the source code is “lost” forever).
>
> On my GitHub 
> (https://deu01.safelinks.protection.outlook.com/?url=https%3A%2F%2Fgit
> hub.com%2Fmichaelknigge%2Fspf-editor&data=05%7C01%7CMichael.Knigge
> %40SET.DE%7C107f1872bc0d41b5c4b808dabc3e943b%7C42ae95ffd7a840de97e0322
> d94113a4e%7C0%7C0%7C638029274209270954%7CUnknown%7CTWFpbGZsb3d8eyJWIjoiMC4wLjAwMDAiLCJQIjoiV2luMzIiLCJBTiI6Ik1haWwiLCJXVCI6Mn0%3D%7C3000%7C%7C%7C&sdata=UkFakvxRN4BeEqsvFfV69VHm%2Bh%2BLHcuvPoHlylpfQ5U%3D&reserved=0)
>  I made some releases available, together with product keys. I also provide a 
> “professional” installer created with InnoSetup that installs SPF/SE together 
> with some useful macros, file profiles and color schemes (a color scheme that 
> makes SPF/SE look like ISPF).
>
> The original releases can be found here:
> https://deu01.safelinks.protection.outlook.com/?url=https%3A%2F%2Fgith
> ub.com%2Fmichaelknigge%2Fspf-editor%2Ftree%2Fmain%2Fbinaries&data=
> 05%7C01%7CMichael.Knigge%40SET.DE%7C107f1872bc0d41b5c4b808dabc3e943b%7
> C42ae95ffd7a840de97e0322d94113a4e%7C0%7C0%7C638029274209270954%7CUnkno
> wn%7CTWFpbGZsb3d8eyJWIjoiMC4wLjAwMDAiLCJQIjoiV2luMzIiLCJBTiI6Ik1haWwiL
> CJXVCI6Mn0%3D%7C3000%7C%7C%7C&sdata=72c0vMp0cnYAEn0ndiD3erKrqzDdKq
> bk88UVb7d1zik%3D&reserved=0
>
> My installers can be found here:
> https://deu01.safelinks.protection.outlook.com/?url=https%3A%2F%2Fgith
> ub.com%2Fmichaelknigge%2Fspf-editor%2Freleases&data=05%7C01%7CMich
> ael.Knigge%40SET.DE%7C107f1872bc0d41b5c4b808dabc3e943b%7C42ae95ffd7a84
> 0de97e0322d94113a4e%7C0%7C0%7C638029274209270954%7CUnknown%7CTWFpbGZsb
> 3d8eyJWIjoiMC4wLjAwMDAiLCJQIjoiV2luMzIiLCJBTiI6Ik1haWwiLCJXVCI6Mn0%3D%
> 7C3000%7C%7C%7C&sdata=cmek7LxjD%2FAC6CaTUiKgp5IgJciku6tMYgKJGo30us
> 0%3D&reserved=0
>
>
> Bye,
> Michael
>
>
>
> Mit freundlichen Grüßen
>
> Michael Knigge
> Software Engineer
>
> SET GmbH
> Rühmkorffstraße 5
> 30163 Hannover
>
> Telefon: +49 511 330 998 23
> Fax: +49 511 330 998 65
> michael.kni...@set.de
> https://deu01.safelinks.protection.outlook.com/?url=https%3A%2F%2Fset.
> de%2F&data=05%7C01%7CMichael.Knigge%40SET.DE%7C107f1872bc0d41b5c4b
> 808dabc3e943b%7C42ae95ffd7a840de97e0322d94113a4e%7C0%7C0%7C63802927420
> 9270954%7CUnknown%7CTWFpbGZsb3d8eyJWIjoiMC4wLjAwMDAiLCJQIjoiV2luMzIiLC
> JBTiI6Ik1haWwiLCJXVCI6Mn0%3D%7C3000%7C%7C%7C&sdata=Qa6BgaMyvDRa012
> wMfoI%2Bia3De1nv5Iswh447dDGQjE%3D&reserved=0
> Hinweise zum Datenschutz: 
> https://deu01.safelinks.protection.outlook.com/?url=https%3A%2F%2Fset.
> de%2Fdatenschutz&data=05%7C01%7CMichael.Knigge%40SET.DE%7C107f1872
> bc0d41b5c4b808dabc3e943b%7C42ae95ffd7a840de97e0322d94113a4e%7C0%7C0%7C
> 638029274209270954%7CUnknown%7CTWFpbGZsb3d8eyJWIjoiMC4wLjAwMDAiLCJQIjo
> iV2luMzIiLCJBTiI6Ik1haWwiLCJXVCI6Mn0%3D%7C3000%7C%7C%7C&sdata=C%2B
> Q6A%2BWvfbcnfs7IqKMn0BVQkVkaW%2B0rNh0RFFKrfUY%3D&reserved=0
>
> Handelsregister: Amtsgericht Hannover HRB 52778
> ​Geschäftsführer: Dr.-Ing. Tobias Baum, Dr.-Ing. Arthur Brack
>
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions, send 
> email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>


--
Jay Maynard

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

Re: GTTERM assistance

[Colin Paice]

I think I read that IBM was going to drop SNA in a future release os z/OS ,
if so would it be wise to continue down this path?
Colin

On Tue, 1 Nov 2022 at 20:14, Brian Chapman  wrote:

> Shmuel,
>
> All I see is that your save area code is bad
>
> Thanks. I'm not sure how that 64 bit save area code got stuck in there.
>
> What's in SESSBLK?
>
> SESSBLK is just a user control block with the 'session' variables. The
> values for SESSPRI and SESSALT and SESSATTR are still zero after the SVC
> call.
>
> I would probably have written something like
>
> GTTLIST  GTTERM PRMSZE=SESSPRI,ALTSZE=SESSALT,ATTRIB=SESSATTR, *
>MF=(E,GTTLIST)
>
> for documentation, but AFAIK that wouldn't affect the length.
>
> I'm not sure I understand. I get an assembly error with "Previously defined
> symbol' when I re-use the GTTLIST label.
>
>
> Thank you,
>
> Brian Chapman
>
>
> On Tue, Nov 1, 2022 at 3:42 PM Seymour J Metz  wrote:
>
> > All I see is that your save area code is bad, but that shouldn't affect
> > the returned values from GTTERM. What's in SESSBLK?
> >
> > I would probably have written something like
> >
> > GTTLIST  GTTERM PRMSZE=SESSPRI,ALTSZE=SESSALT,ATTRIB=SESSATTR, *
> >MF=(E,GTTLIST)
> >
> > for documentation, but AFAIK that wouldn't affect the length.
> >
> >
> > --
> > Shmuel (Seymour J.) Metz
> > http://mason.gmu.edu/~smetz3
> >
> > 
> > From: IBM Mainframe Discussion List [IBM-MAIN@LISTSERV.UA.EDU] on behalf
> > of Brian Chapman [bchapma...@gmail.com]
> > Sent: Tuesday, November 1, 2022 2:45 PM
> > To: IBM-MAIN@LISTSERV.UA.EDU
> > Subject: GTTERM assistance
> >
> > Hello all,
> >
> > Any assistance would be greatly appreciated.
> >
> > I am working on a SNA interface for a batch framework. This is mostly
> just
> > a massive learning exercise that will likely never be utilized, but I
> have
> > learned SO much while working on this project (currently 6 years in the
> > making).
> >
> > The address space accepts terminals with MOD2 terminals and everything
> > displays great. However, I would like to support larger terminal sizes.
> My
> > first hurdle is GTTERM. I understand that my program should be in
> RMODE24
> > and AMODE24. The program is assembled with AMODE 31, but performs a SAM24
> > and SAM31 before and after the SVC call. The dynamic storage area for the
> > program is also acquired below the line.
> >
> > I check register 15 after the SVC, and it is zero. But the SVC parameter
> > values are still zero.
> >
> > Here is my source:
> >
> >  REGEQU
> >  COPY  SESSBLK
> > *
> > WORKAREA DSECT
> > WORKNAME DSCL8
> > SAVEAREA DS18F
> > SAVERC   DSF
> > SAVEPARM DSF
> > *
> > GTTLIST  GTTERM MF=L
> > *
> > WORKLEN  EQU   *-WORKAREA
> > *
> > WORKREG  EQU   R3
> > SESSREG  EQU   R5
> > *
> > PORTTC04 CSECT
> > PORTTC04 AMODE 31
> > PORTTC04 RMODE 24
> >  STM   R14,R12,12(R13) SAVE REGISTERS
> >  LRR12,R15 ESTABLISH BASE
> >  USING PORTTC04,R12*
> >  B START
> > *
> >  DCCL9'PORTTC04'
> >  DCCL9'&SYSDATC'
> >  DCCL5'&SYSTIME'
> > *
> > STARTDS0H
> >  LRR2,R1   SAVE REGISTER 2
> >  LHI   R7,WORKLEN  LOAD WORK AREA LENGTH
> >  GETMAIN RU,LV=(R7),LOC=BELOW
> >  LRWORKREG,R1  *
> >  USING WORKAREA,WORKREGSET ADDRESSIBILITY
> > *
> >  LRR6,WORKREG  LOAD REGISTER
> >  LAR8,0SET DUMMY FROM ADDRESS
> >  XRR9,R9   SET PADDING TO LOW VALUES
> >  MVCL  R6,R8   INITIALIZE AREA
> > *
> >  STR13,SAVEAREA+4  CHAIN CALLER'S SAVEAREA ADDRESS
> >  LAR13,SAVEAREA
> >  STR13,SAVEAREA+8  SAVE CURRENT SAVEAREA ADDRESS
> >  MVC   SAVEAREA(4),=CL4'F4SA'
> >  MVC   WORKNAME(8),=CL8'PORTTC04'
> > *
> > GETLINK  DS0H
> >  LRR1,R2   RESTORE REGISTER 2
> >  STR1,SAVEPARM
> >  LTSESSREG,4(R1)   GET ADDRESS OF SESSBLK
> >  BZBADLINK NO LINKAGE PASSED
> >  USING SESSBLK,SESSREG SET ADDRESSIBILITY
> > *
> > GETTERM  DS0H
> >  SAM24
> > *
> >  GTTERM PRMSZE=SESSPRI,ALTSZE=SESSALT,ATTRIB=SESSATTR, *
> >MF=(E,GTTLIST)
> > *
> >  ABEND 91,DUMP
> >  SAM31
> > *
> >  LTR   R15,R15
> >  BNZ   BADRC
> > *
> >  STR15,SESSATTR+4
> > *
> >  B RETURN
> > *
> > BADRCDS0H
> >  WTO   'PORTTC04 BAD GTTERM RC'
> >  MVHI  SAVERC,16   SET BAD RETURN CODE
> >  ABEND 98,DUMP
> > *
> > BADLINK  DS0H
> >  WTO   'PORTTC04 INVALID LINKAGE PARAMETERS'
> >  MVHI  SAVERC,16   SET BA

Shift work (was End of several eras)

[Bob Bridges]

Nothing to do with mainframe machines per se, but at various jobs I was 
assigned to second shift and found it suited me to the ground.  I could sleep 
late, get up and get a leisurely lunch, wander off to work, work until late (I 
was always a night owl), then come back to my hotel room and watch TV for a 
while before going to bed when I felt like it.  The only thing I missed was 
prime-time TV, and I didn't miss it much.

I had a contract once with Bell Atlantic (this was back after Ma Bell was 
broken up but before competition took over) and because I typically worked late 
anyway they asked me to switch my hours and attend a daily software meeting on 
behalf of the department; I didn't have much to say, but I could listen and 
take notes and record any questions my boss would have to answer.  It was a 
large meeting, with thirty or forty attendants crowding into the meeting room 
and a few dozen more calling in by phone, and the guy who ran the meeting was a 
master at keeping things on track and on-topic.  Started at eighteen-something 
and ran for an hour or so.  So I'd show up for work around eleven, stay until 
midnight or so, and relax the rest of the time.  Not a very stressful job.

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

/* Keep clear of concealment -- keep clear of the need of concealment.  It is 
an awful hour when the first necessity of hiding something comes.  The whole 
life is different thenceforth.  When there are questions to be feared and eyes 
to be avoided and subjects which must not be touched, the bloom of life is 
gone.  -Phillips Brooks (1835-1893) */

-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
Carmen Vitullo
Sent: Tuesday, November 1, 2022 13:51

...loved 3rd shift at the time

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

Re: GTTERM assistance

[Brian Chapman]

Shmuel,

All I see is that your save area code is bad

Thanks. I'm not sure how that 64 bit save area code got stuck in there.

What's in SESSBLK?

SESSBLK is just a user control block with the 'session' variables. The
values for SESSPRI and SESSALT and SESSATTR are still zero after the SVC
call.

I would probably have written something like

GTTLIST  GTTERM PRMSZE=SESSPRI,ALTSZE=SESSALT,ATTRIB=SESSATTR, *
   MF=(E,GTTLIST)

for documentation, but AFAIK that wouldn't affect the length.

I'm not sure I understand. I get an assembly error with "Previously defined
symbol' when I re-use the GTTLIST label.


Thank you,

Brian Chapman


On Tue, Nov 1, 2022 at 3:42 PM Seymour J Metz  wrote:

> All I see is that your save area code is bad, but that shouldn't affect
> the returned values from GTTERM. What's in SESSBLK?
>
> I would probably have written something like
>
> GTTLIST  GTTERM PRMSZE=SESSPRI,ALTSZE=SESSALT,ATTRIB=SESSATTR, *
>MF=(E,GTTLIST)
>
> for documentation, but AFAIK that wouldn't affect the length.
>
>
> --
> Shmuel (Seymour J.) Metz
> http://mason.gmu.edu/~smetz3
>
> 
> From: IBM Mainframe Discussion List [IBM-MAIN@LISTSERV.UA.EDU] on behalf
> of Brian Chapman [bchapma...@gmail.com]
> Sent: Tuesday, November 1, 2022 2:45 PM
> To: IBM-MAIN@LISTSERV.UA.EDU
> Subject: GTTERM assistance
>
> Hello all,
>
> Any assistance would be greatly appreciated.
>
> I am working on a SNA interface for a batch framework. This is mostly just
> a massive learning exercise that will likely never be utilized, but I have
> learned SO much while working on this project (currently 6 years in the
> making).
>
> The address space accepts terminals with MOD2 terminals and everything
> displays great. However, I would like to support larger terminal sizes. My
> first hurdle is GTTERM. I understand that my program should be in  RMODE24
> and AMODE24. The program is assembled with AMODE 31, but performs a SAM24
> and SAM31 before and after the SVC call. The dynamic storage area for the
> program is also acquired below the line.
>
> I check register 15 after the SVC, and it is zero. But the SVC parameter
> values are still zero.
>
> Here is my source:
>
>  REGEQU
>  COPY  SESSBLK
> *
> WORKAREA DSECT
> WORKNAME DSCL8
> SAVEAREA DS18F
> SAVERC   DSF
> SAVEPARM DSF
> *
> GTTLIST  GTTERM MF=L
> *
> WORKLEN  EQU   *-WORKAREA
> *
> WORKREG  EQU   R3
> SESSREG  EQU   R5
> *
> PORTTC04 CSECT
> PORTTC04 AMODE 31
> PORTTC04 RMODE 24
>  STM   R14,R12,12(R13) SAVE REGISTERS
>  LRR12,R15 ESTABLISH BASE
>  USING PORTTC04,R12*
>  B START
> *
>  DCCL9'PORTTC04'
>  DCCL9'&SYSDATC'
>  DCCL5'&SYSTIME'
> *
> STARTDS0H
>  LRR2,R1   SAVE REGISTER 2
>  LHI   R7,WORKLEN  LOAD WORK AREA LENGTH
>  GETMAIN RU,LV=(R7),LOC=BELOW
>  LRWORKREG,R1  *
>  USING WORKAREA,WORKREGSET ADDRESSIBILITY
> *
>  LRR6,WORKREG  LOAD REGISTER
>  LAR8,0SET DUMMY FROM ADDRESS
>  XRR9,R9   SET PADDING TO LOW VALUES
>  MVCL  R6,R8   INITIALIZE AREA
> *
>  STR13,SAVEAREA+4  CHAIN CALLER'S SAVEAREA ADDRESS
>  LAR13,SAVEAREA
>  STR13,SAVEAREA+8  SAVE CURRENT SAVEAREA ADDRESS
>  MVC   SAVEAREA(4),=CL4'F4SA'
>  MVC   WORKNAME(8),=CL8'PORTTC04'
> *
> GETLINK  DS0H
>  LRR1,R2   RESTORE REGISTER 2
>  STR1,SAVEPARM
>  LTSESSREG,4(R1)   GET ADDRESS OF SESSBLK
>  BZBADLINK NO LINKAGE PASSED
>  USING SESSBLK,SESSREG SET ADDRESSIBILITY
> *
> GETTERM  DS0H
>  SAM24
> *
>  GTTERM PRMSZE=SESSPRI,ALTSZE=SESSALT,ATTRIB=SESSATTR, *
>MF=(E,GTTLIST)
> *
>  ABEND 91,DUMP
>  SAM31
> *
>  LTR   R15,R15
>  BNZ   BADRC
> *
>  STR15,SESSATTR+4
> *
>  B RETURN
> *
> BADRCDS0H
>  WTO   'PORTTC04 BAD GTTERM RC'
>  MVHI  SAVERC,16   SET BAD RETURN CODE
>  ABEND 98,DUMP
> *
> BADLINK  DS0H
>  WTO   'PORTTC04 INVALID LINKAGE PARAMETERS'
>  MVHI  SAVERC,16   SET BAD RETURN CODE
>  ABEND 99,DUMP
> *
> RETURN   DS0H
>  L R13,SAVEAREA+4  RESTORE R13
>  L R2,SAVERC   LOAD RC
> *
>  LHI   R0,WORKLEN  LOAD WORK AREA LENGTH
>  FREEMAIN RU,LV=(R0),A=(WORKREG)
> *
>  LRR15,R2  LOAD RC FROM R2
>  L R14,12(R13) RESTORE R14
>  LMR0,R12,20(R13)  RESTORE R0-R12 (RETAIN R15)
>  BRR14 

Re: SPF/SE is available for free

[Robert Prins]

You might want to try DOSBox-X, 

Robert

On Tue, 1 Nov 2022 at 19:03, Schmitt, Michael 
wrote:

> The problem with SPF/PC in DOSBox isn't memory management, it was
> something about text modes. The problem was that DOSBox was created for
> running DOS games, not text applications like SPF/PC. I don't have DOSBox
> installed right now, but I /think/ the problem was that DOSBox running
> SPF/PC was slow, because it was treating the window as a graphic image
> instead of as text. So you lost the whole point of SPF/PC which was
> lighting fast response time.
>
> I think I've got my SPF history mixed up.
>
> SPF/Win was released. One version was from 1995.
>
>
> SPF/Professional was from 1996 or so. I think it was SPF/Win renamed, with
> integration with CA-Realia and Micro Focus Workbench. Plus it could run
> ISPF dialogs! That's the version I beta tested.
>
> I'm running SPF/Pro 5.0.Beta3 Dialog Developer Edition. Does this mean
> that CTC never released SPF/Pro?
>
> I have the files for SPF/Pro, and the original install media (micro floppy
> of course).
>
>
> SPF/SourceEdit was from 1997, and dropped REXX for having the macros in C.
> Which meant that you it isn't compatible with z/OS REXX macros at all. And
> it dropped the emulation of the ISPF dialog manager.
>
> I really don't know why CTC made the big break from SPF/Pro to SPF/SE. I
> still like SPF/Pro much better, but as I said, it crashes on newer Windows
> more than SPF/SE (which for version 3.5 also crashes).  SPF/Pro just now
> crashed on me with MEM_BAD_POINTER from SmartHeap Library.
>
>
> -Original Message-
> From: IBM Mainframe Discussion List  On Behalf
> Of Schmitt, Michael
> Sent: Tuesday, November 1, 2022 10:56 AM
> To: IBM-MAIN@LISTSERV.UA.EDU
> Subject: Re: SPF/SE is available for free
>
> Cool!
>
> I still use SPF/SE, in fact was using it just yesterday. But I have SPF/SE
> 3.5 build 614 so yours is a lot newer.
>
> CTC had different iterations of the product:
>
>  - SPF/PC: ran in DOS, but used special memory management to edit larger
> files. SPF/PC can still run under DOSBox but not very well
>
>  - SPF/Win: SPF for Windows. I think I beta tested it but it was never
> released?
>
>  - SPF/Professional: The first released SPF for Windows? Still runs but
> crashes sometimes
>
>  - SPF/SE
>
> In my opinion, the best SPF was SPF/Pro:
>
>  - Closer emulation of ISPF Edit than SPF/SE
>  - Runs REXX Edit Macros
>
> -Original Message-
> From: IBM Mainframe Discussion List  On Behalf
> Of Michael Knigge
> Sent: Tuesday, November 1, 2022 9:22 AM
> To: IBM-MAIN@LISTSERV.UA.EDU
> Subject: SPF/SE is available for free
>
> FYI:
>
> I guess some of you guys use SPF/SE (SPF SourceEdit) from Command
> Technology. The editor was developed by Tim Tetivia, who unfortunately died
> in 2022 as a result of a corona infection. With some research and help from
> other SPF users (namely Peter aka Verizon), it was possible to contact
> Tim's wife Bonnie. She gave us permission to distribute the editor for free
> (sadly the source code is “lost” forever).
>
> On my GitHub (
> https://clicktime.symantec.com/15tStaqvHaWmhJEwKL5vF?h=k8C7L5Qfruh4B5XLObxAA9jbAcEwjGal4BxXv4aqqBA=&u=https://clicktime.symantec.com/15uBY2TEUMBPKjdD7Gs5P?h=wCfUoHcHszVrATO96Ke5bYHZd6rw1qtnd_p7Srrdf4U=&u=https://github.com/michaelknigge/spf-editor%29
> I made some releases available, together with product keys. I also provide
> a “professional” installer created with InnoSetup that installs SPF/SE
> together with some useful macros, file profiles and color schemes (a color
> scheme that makes SPF/SE look like ISPF).
>
> The original releases can be found here:
> https://clicktime.symantec.com/15tT4FEVCosxXBtnQStDV?h=a42samARJUjgBVHNnAkLJC62sUfwYr-r52P2hTOol2s=&u=https://clicktime.symantec.com/15uBhgqoPaYa9dH4CPfNd?h=oEt5eCV4ImsXasjn5RS9LX6t0lpHrAtuLb67MZ-D1ek=&u=https://github.com/michaelknigge/spf-editor/tree/main/binaries
>
> My installers can be found here:
> https://clicktime.symantec.com/15tSyR3CkCCN7F4rrtV4s?h=JETYbGTlNFfLh2RSQ0-u8IF48iTbmm4wmhcTxO4DALQ=&u=https://clicktime.symantec.com/15uBcreWvxryjgT8eqGE1?h=s5UECHYEIYvYIKLamz_1q2dsbFSHwWlvBKGx2Noi7eU=&u=https://github.com/michaelknigge/spf-editor/releases
>
>
> Bye,
> Michael
>
>
>
> Mit freundlichen Grüßen
>
> Michael Knigge
> Software Engineer
>
> SET GmbH
> Rühmkorffstraße 5
> 30163 Hannover
>
> Telefon: +49 511 330 998 23
> Fax: +49 511 330 998 65
> michael.kni...@set.de
>
> https://clicktime.symantec.com/15tT95RmfRZYw8ihx1HN7?h=7ofgJ9w9U3b-adSx3AxSaLomMG-qA7Pwc3Crx6mjfBM=&u=https://clicktime.symantec.com/15uBnX35rCEAZa6yjx4XF?h=0_3vNBl_wuwArMnd3yB_OPkLgsYQwSCJMddoBoNGNu8=&u=https://set.de
> Hinweise zum Datenschutz:
> https://clicktime.symantec.com/15tTDud483F9M5YdVZgWj?h=0L9dIKHdM3HSaykOpjBgBycNV_YAIf0fbanoNNOpkT4=&u=https://clicktime.symantec.com/15uBsMENJoukyWvuHWTfs?h=zDuxYaHBfvX0CehSFQOu_Uq4hOxfnZH736IjWf3cwxA=&u=https://set.de/datenschutz
>
> Handelsre

Re: SYSTEM REXX use

[Dana Mitchell]

F AXR,REXXTEST
AXR0500I AXREXX OUTPUT DISPLAY 889
EXECNAME=REXXTEST REQTOKEN=4000DC57E5671A5C6E10   
Test Message  




On Tue, 1 Nov 2022 18:15:59 +, Seymour J Metz  wrote:

>Where does the output of say go?

Thanks

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

Re: GTTERM assistance

[Seymour J Metz]

All I see is that your save area code is bad, but that shouldn't affect the 
returned values from GTTERM. What's in SESSBLK? 

I would probably have written something like

GTTLIST  GTTERM PRMSZE=SESSPRI,ALTSZE=SESSALT,ATTRIB=SESSATTR, *
   MF=(E,GTTLIST)

for documentation, but AFAIK that wouldn't affect the length.


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


From: IBM Mainframe Discussion List [IBM-MAIN@LISTSERV.UA.EDU] on behalf of 
Brian Chapman [bchapma...@gmail.com]
Sent: Tuesday, November 1, 2022 2:45 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: GTTERM assistance

Hello all,

Any assistance would be greatly appreciated.

I am working on a SNA interface for a batch framework. This is mostly just
a massive learning exercise that will likely never be utilized, but I have
learned SO much while working on this project (currently 6 years in the
making).

The address space accepts terminals with MOD2 terminals and everything
displays great. However, I would like to support larger terminal sizes. My
first hurdle is GTTERM. I understand that my program should be in  RMODE24
and AMODE24. The program is assembled with AMODE 31, but performs a SAM24
and SAM31 before and after the SVC call. The dynamic storage area for the
program is also acquired below the line.

I check register 15 after the SVC, and it is zero. But the SVC parameter
values are still zero.

Here is my source:

 REGEQU
 COPY  SESSBLK
*
WORKAREA DSECT
WORKNAME DSCL8
SAVEAREA DS18F
SAVERC   DSF
SAVEPARM DSF
*
GTTLIST  GTTERM MF=L
*
WORKLEN  EQU   *-WORKAREA
*
WORKREG  EQU   R3
SESSREG  EQU   R5
*
PORTTC04 CSECT
PORTTC04 AMODE 31
PORTTC04 RMODE 24
 STM   R14,R12,12(R13) SAVE REGISTERS
 LRR12,R15 ESTABLISH BASE
 USING PORTTC04,R12*
 B START
*
 DCCL9'PORTTC04'
 DCCL9'&SYSDATC'
 DCCL5'&SYSTIME'
*
STARTDS0H
 LRR2,R1   SAVE REGISTER 2
 LHI   R7,WORKLEN  LOAD WORK AREA LENGTH
 GETMAIN RU,LV=(R7),LOC=BELOW
 LRWORKREG,R1  *
 USING WORKAREA,WORKREGSET ADDRESSIBILITY
*
 LRR6,WORKREG  LOAD REGISTER
 LAR8,0SET DUMMY FROM ADDRESS
 XRR9,R9   SET PADDING TO LOW VALUES
 MVCL  R6,R8   INITIALIZE AREA
*
 STR13,SAVEAREA+4  CHAIN CALLER'S SAVEAREA ADDRESS
 LAR13,SAVEAREA
 STR13,SAVEAREA+8  SAVE CURRENT SAVEAREA ADDRESS
 MVC   SAVEAREA(4),=CL4'F4SA'
 MVC   WORKNAME(8),=CL8'PORTTC04'
*
GETLINK  DS0H
 LRR1,R2   RESTORE REGISTER 2
 STR1,SAVEPARM
 LTSESSREG,4(R1)   GET ADDRESS OF SESSBLK
 BZBADLINK NO LINKAGE PASSED
 USING SESSBLK,SESSREG SET ADDRESSIBILITY
*
GETTERM  DS0H
 SAM24
*
 GTTERM PRMSZE=SESSPRI,ALTSZE=SESSALT,ATTRIB=SESSATTR, *
   MF=(E,GTTLIST)
*
 ABEND 91,DUMP
 SAM31
*
 LTR   R15,R15
 BNZ   BADRC
*
 STR15,SESSATTR+4
*
 B RETURN
*
BADRCDS0H
 WTO   'PORTTC04 BAD GTTERM RC'
 MVHI  SAVERC,16   SET BAD RETURN CODE
 ABEND 98,DUMP
*
BADLINK  DS0H
 WTO   'PORTTC04 INVALID LINKAGE PARAMETERS'
 MVHI  SAVERC,16   SET BAD RETURN CODE
 ABEND 99,DUMP
*
RETURN   DS0H
 L R13,SAVEAREA+4  RESTORE R13
 L R2,SAVERC   LOAD RC
*
 LHI   R0,WORKLEN  LOAD WORK AREA LENGTH
 FREEMAIN RU,LV=(R0),A=(WORKREG)
*
 LRR15,R2  LOAD RC FROM R2
 L R14,12(R13) RESTORE R14
 LMR0,R12,20(R13)  RESTORE R0-R12 (RETAIN R15)
 BRR14 RETURN TO CALLER
*
 LTORG
*
 END

I added the ABEND 91 instruction to produce a dump. Register 3 contains the
SVC plist.

The SESSBLK contains the SESSPRI, SESSALT, and SESSATTR fields (addressed
by register 5).

Here are the dump contents:

Program PORTTC04 issued an SVC 13 (ABEND) code U0091

at address _7A5C, offset B4 in Program PORTTC04



Registers when request issued.

0 _8000 1 _805B 2 _000943C8 3 _
0002CF48
4 _362BC048 5 _0002CBF0 6 _B5D08928 7
_B5D08A28
8 _ 9 _ A _40404040 B
_
C _800079A8 D _0002CF50 E _B5FA5C56 F
_


Last Instruction: SVC  13  ABEND

   Instruction has no operands



PSW when request issued: 078D1000 7A5E

   PER-Mask . . . . . . . . . . OFF

   DAT Mode . . . . . . . . . . ON

   I/O Mask . . .

Re: SPF/SE is available for free

[rpinion865]

Slightly off topic, at one time I had a Linux ISPF editor.  I don't remember 
the name.  I installed it under S/390 Linux.  This would have been some time 
between 2002 and 2010.




Sent with Proton Mail secure email.

--- Original Message ---
On Tuesday, November 1st, 2022 at 3:23 PM, Jay Maynard  
wrote:


> Hm. According to the README on the Github site, the source code was stored
> encrypted...are the encrypted files still in existence? Perhaps they can be
> obtained and decrypted. It's a long shot, to be sure, but definitely worth
> a try.
> 
> On Tue, Nov 1, 2022 at 9:22 AM Michael Knigge michael.kni...@set.de wrote:
> 
> > FYI:
> > 
> > I guess some of you guys use SPF/SE (SPF SourceEdit) from Command
> > Technology. The editor was developed by Tim Tetivia, who unfortunately died
> > in 2022 as a result of a corona infection. With some research and help from
> > other SPF users (namely Peter aka Verizon), it was possible to contact
> > Tim's wife Bonnie. She gave us permission to distribute the editor for free
> > (sadly the source code is “lost” forever).
> > 
> > On my GitHub (https://github.com/michaelknigge/spf-editor) I made some
> > releases available, together with product keys. I also provide a
> > “professional” installer created with InnoSetup that installs SPF/SE
> > together with some useful macros, file profiles and color schemes (a color
> > scheme that makes SPF/SE look like ISPF).
> > 
> > The original releases can be found here:
> > https://github.com/michaelknigge/spf-editor/tree/main/binaries
> > 
> > My installers can be found here:
> > https://github.com/michaelknigge/spf-editor/releases
> > 
> > Bye,
> > Michael
> > 
> > Mit freundlichen Grüßen
> > 
> > Michael Knigge
> > Software Engineer
> > 
> > SET GmbH
> > Rühmkorffstraße 5
> > 30163 Hannover
> > 
> > Telefon: +49 511 330 998 23tel:+49 511 330 998 23
> > Fax: +49 511 330 998 65tel:+49 511 330 998 65
> > michael.knigge@set.demailto:michael.kni...@set.de
> > https://set.de
> > Hinweise zum Datenschutz: https://set.de/datenschutz
> > 
> > Handelsregister: Amtsgericht Hannover HRB 52778
> > Geschäftsführer: Dr.-Ing. Tobias Baum, Dr.-Ing. Arthur Brack
> > 
> > --
> > For IBM-MAIN subscribe / signoff / archive access instructions,
> > send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
> 
> 
> 
> --
> Jay Maynard
> 
> --
> 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: SPF/SE is available for free

[Jay Maynard]

Hm. According to the README on the Github site, the source code was stored
encrypted...are the encrypted files still in existence? Perhaps they can be
obtained and decrypted. It's a long shot, to be sure, but definitely worth
a try.

On Tue, Nov 1, 2022 at 9:22 AM Michael Knigge  wrote:

> FYI:
>
> I guess some of you guys use SPF/SE (SPF SourceEdit) from Command
> Technology. The editor was developed by Tim Tetivia, who unfortunately died
> in 2022 as a result of a corona infection. With some research and help from
> other SPF users (namely Peter aka Verizon), it was possible to contact
> Tim's wife Bonnie. She gave us permission to distribute the editor for free
> (sadly the source code is “lost” forever).
>
> On my GitHub (https://github.com/michaelknigge/spf-editor) I made some
> releases available, together with product keys. I also provide a
> “professional” installer created with InnoSetup that installs SPF/SE
> together with some useful macros, file profiles and color schemes (a color
> scheme that makes SPF/SE look like ISPF).
>
> The original releases can be found here:
> https://github.com/michaelknigge/spf-editor/tree/main/binaries
>
> My installers can be found here:
> https://github.com/michaelknigge/spf-editor/releases
>
>
> Bye,
> Michael
>
>
>
> Mit freundlichen Grüßen
>
> Michael Knigge
> Software Engineer
>
> SET GmbH
> Rühmkorffstraße 5
> 30163 Hannover
>
> Telefon: +49 511 330 998 23
> Fax: +49 511 330 998 65
> michael.kni...@set.de
> https://set.de
> Hinweise zum Datenschutz: https://set.de/datenschutz
>
> Handelsregister: Amtsgericht Hannover HRB 52778
> ​Geschäftsführer: Dr.-Ing. Tobias Baum, Dr.-Ing. Arthur Brack
>
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>


-- 
Jay Maynard

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

Re: SPF/SE is available for free

[Schmitt, Michael]

The problem with SPF/PC in DOSBox isn't memory management, it was something 
about text modes. The problem was that DOSBox was created for running DOS 
games, not text applications like SPF/PC. I don't have DOSBox installed right 
now, but I /think/ the problem was that DOSBox running SPF/PC was slow, because 
it was treating the window as a graphic image instead of as text. So you lost 
the whole point of SPF/PC which was lighting fast response time.

I think I've got my SPF history mixed up.

SPF/Win was released. One version was from 1995.


SPF/Professional was from 1996 or so. I think it was SPF/Win renamed, with 
integration with CA-Realia and Micro Focus Workbench. Plus it could run ISPF 
dialogs! That's the version I beta tested.

I'm running SPF/Pro 5.0.Beta3 Dialog Developer Edition. Does this mean that CTC 
never released SPF/Pro?

I have the files for SPF/Pro, and the original install media (micro floppy of 
course).


SPF/SourceEdit was from 1997, and dropped REXX for having the macros in C. 
Which meant that you it isn't compatible with z/OS REXX macros at all. And it 
dropped the emulation of the ISPF dialog manager.

I really don't know why CTC made the big break from SPF/Pro to SPF/SE. I still 
like SPF/Pro much better, but as I said, it crashes on newer Windows more than 
SPF/SE (which for version 3.5 also crashes).  SPF/Pro just now crashed on me 
with MEM_BAD_POINTER from SmartHeap Library.


-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
Schmitt, Michael
Sent: Tuesday, November 1, 2022 10:56 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: SPF/SE is available for free

Cool!

I still use SPF/SE, in fact was using it just yesterday. But I have SPF/SE 3.5 
build 614 so yours is a lot newer.

CTC had different iterations of the product:

 - SPF/PC: ran in DOS, but used special memory management to edit larger files. 
SPF/PC can still run under DOSBox but not very well

 - SPF/Win: SPF for Windows. I think I beta tested it but it was never released?

 - SPF/Professional: The first released SPF for Windows? Still runs but crashes 
sometimes

 - SPF/SE

In my opinion, the best SPF was SPF/Pro:

 - Closer emulation of ISPF Edit than SPF/SE
 - Runs REXX Edit Macros

-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
Michael Knigge
Sent: Tuesday, November 1, 2022 9:22 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: SPF/SE is available for free

FYI:

I guess some of you guys use SPF/SE (SPF SourceEdit) from Command Technology. 
The editor was developed by Tim Tetivia, who unfortunately died in 2022 as a 
result of a corona infection. With some research and help from other SPF users 
(namely Peter aka Verizon), it was possible to contact Tim's wife Bonnie. She 
gave us permission to distribute the editor for free (sadly the source code is 
“lost” forever).

On my GitHub 
(https://clicktime.symantec.com/15tStaqvHaWmhJEwKL5vF?h=k8C7L5Qfruh4B5XLObxAA9jbAcEwjGal4BxXv4aqqBA=&u=https://clicktime.symantec.com/15uBY2TEUMBPKjdD7Gs5P?h=wCfUoHcHszVrATO96Ke5bYHZd6rw1qtnd_p7Srrdf4U=&u=https://github.com/michaelknigge/spf-editor%29
 I made some releases available, together with product keys. I also provide a 
“professional” installer created with InnoSetup that installs SPF/SE together 
with some useful macros, file profiles and color schemes (a color scheme that 
makes SPF/SE look like ISPF).

The original releases can be found here: 
https://clicktime.symantec.com/15tT4FEVCosxXBtnQStDV?h=a42samARJUjgBVHNnAkLJC62sUfwYr-r52P2hTOol2s=&u=https://clicktime.symantec.com/15uBhgqoPaYa9dH4CPfNd?h=oEt5eCV4ImsXasjn5RS9LX6t0lpHrAtuLb67MZ-D1ek=&u=https://github.com/michaelknigge/spf-editor/tree/main/binaries

My installers can be found here: 
https://clicktime.symantec.com/15tSyR3CkCCN7F4rrtV4s?h=JETYbGTlNFfLh2RSQ0-u8IF48iTbmm4wmhcTxO4DALQ=&u=https://clicktime.symantec.com/15uBcreWvxryjgT8eqGE1?h=s5UECHYEIYvYIKLamz_1q2dsbFSHwWlvBKGx2Noi7eU=&u=https://github.com/michaelknigge/spf-editor/releases


Bye,
Michael



Mit freundlichen Grüßen

Michael Knigge
Software Engineer

SET GmbH
Rühmkorffstraße 5
30163 Hannover

Telefon: +49 511 330 998 23
Fax: +49 511 330 998 65
michael.kni...@set.de
https://clicktime.symantec.com/15tT95RmfRZYw8ihx1HN7?h=7ofgJ9w9U3b-adSx3AxSaLomMG-qA7Pwc3Crx6mjfBM=&u=https://clicktime.symantec.com/15uBnX35rCEAZa6yjx4XF?h=0_3vNBl_wuwArMnd3yB_OPkLgsYQwSCJMddoBoNGNu8=&u=https://set.de
Hinweise zum Datenschutz: 
https://clicktime.symantec.com/15tTDud483F9M5YdVZgWj?h=0L9dIKHdM3HSaykOpjBgBycNV_YAIf0fbanoNNOpkT4=&u=https://clicktime.symantec.com/15uBsMENJoukyWvuHWTfs?h=zDuxYaHBfvX0CehSFQOu_Uq4hOxfnZH736IjWf3cwxA=&u=https://set.de/datenschutz

Handelsregister: Amtsgericht Hannover HRB 52778
​Geschäftsführer: Dr.-Ing. Tobias Baum, Dr.-Ing. Arthur Brack


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

GTTERM assistance

[Brian Chapman]

Hello all,

Any assistance would be greatly appreciated.

I am working on a SNA interface for a batch framework. This is mostly just
a massive learning exercise that will likely never be utilized, but I have
learned SO much while working on this project (currently 6 years in the
making).

The address space accepts terminals with MOD2 terminals and everything
displays great. However, I would like to support larger terminal sizes. My
first hurdle is GTTERM. I understand that my program should be in  RMODE24
and AMODE24. The program is assembled with AMODE 31, but performs a SAM24
and SAM31 before and after the SVC call. The dynamic storage area for the
program is also acquired below the line.

I check register 15 after the SVC, and it is zero. But the SVC parameter
values are still zero.

Here is my source:

 REGEQU
 COPY  SESSBLK
*
WORKAREA DSECT
WORKNAME DSCL8
SAVEAREA DS18F
SAVERC   DSF
SAVEPARM DSF
*
GTTLIST  GTTERM MF=L
*
WORKLEN  EQU   *-WORKAREA
*
WORKREG  EQU   R3
SESSREG  EQU   R5
*
PORTTC04 CSECT
PORTTC04 AMODE 31
PORTTC04 RMODE 24
 STM   R14,R12,12(R13) SAVE REGISTERS
 LRR12,R15 ESTABLISH BASE
 USING PORTTC04,R12*
 B START
*
 DCCL9'PORTTC04'
 DCCL9'&SYSDATC'
 DCCL5'&SYSTIME'
*
STARTDS0H
 LRR2,R1   SAVE REGISTER 2
 LHI   R7,WORKLEN  LOAD WORK AREA LENGTH
 GETMAIN RU,LV=(R7),LOC=BELOW
 LRWORKREG,R1  *
 USING WORKAREA,WORKREGSET ADDRESSIBILITY
*
 LRR6,WORKREG  LOAD REGISTER
 LAR8,0SET DUMMY FROM ADDRESS
 XRR9,R9   SET PADDING TO LOW VALUES
 MVCL  R6,R8   INITIALIZE AREA
*
 STR13,SAVEAREA+4  CHAIN CALLER'S SAVEAREA ADDRESS
 LAR13,SAVEAREA
 STR13,SAVEAREA+8  SAVE CURRENT SAVEAREA ADDRESS
 MVC   SAVEAREA(4),=CL4'F4SA'
 MVC   WORKNAME(8),=CL8'PORTTC04'
*
GETLINK  DS0H
 LRR1,R2   RESTORE REGISTER 2
 STR1,SAVEPARM
 LTSESSREG,4(R1)   GET ADDRESS OF SESSBLK
 BZBADLINK NO LINKAGE PASSED
 USING SESSBLK,SESSREG SET ADDRESSIBILITY
*
GETTERM  DS0H
 SAM24
*
 GTTERM PRMSZE=SESSPRI,ALTSZE=SESSALT,ATTRIB=SESSATTR, *
   MF=(E,GTTLIST)
*
 ABEND 91,DUMP
 SAM31
*
 LTR   R15,R15
 BNZ   BADRC
*
 STR15,SESSATTR+4
*
 B RETURN
*
BADRCDS0H
 WTO   'PORTTC04 BAD GTTERM RC'
 MVHI  SAVERC,16   SET BAD RETURN CODE
 ABEND 98,DUMP
*
BADLINK  DS0H
 WTO   'PORTTC04 INVALID LINKAGE PARAMETERS'
 MVHI  SAVERC,16   SET BAD RETURN CODE
 ABEND 99,DUMP
*
RETURN   DS0H
 L R13,SAVEAREA+4  RESTORE R13
 L R2,SAVERC   LOAD RC
*
 LHI   R0,WORKLEN  LOAD WORK AREA LENGTH
 FREEMAIN RU,LV=(R0),A=(WORKREG)
*
 LRR15,R2  LOAD RC FROM R2
 L R14,12(R13) RESTORE R14
 LMR0,R12,20(R13)  RESTORE R0-R12 (RETAIN R15)
 BRR14 RETURN TO CALLER
*
 LTORG
*
 END

I added the ABEND 91 instruction to produce a dump. Register 3 contains the
SVC plist.

The SESSBLK contains the SESSPRI, SESSALT, and SESSATTR fields (addressed
by register 5).

Here are the dump contents:

Program PORTTC04 issued an SVC 13 (ABEND) code U0091

at address _7A5C, offset B4 in Program PORTTC04



Registers when request issued.

0 _8000 1 _805B 2 _000943C8 3 _
0002CF48
4 _362BC048 5 _0002CBF0 6 _B5D08928 7
_B5D08A28
8 _ 9 _ A _40404040 B
_
C _800079A8 D _0002CF50 E _B5FA5C56 F
_


Last Instruction: SVC  13  ABEND

   Instruction has no operands



PSW when request issued: 078D1000 7A5E

   PER-Mask . . . . . . . . . . OFF

   DAT Mode . . . . . . . . . . ON

   I/O Mask . . . . . . . . . . ON

   External Mask. . . . . . . . ON

   PSW Key. . . . . . . . . . . 8

   EC Mode. . . . . . . . . . . ON

   Machine-Check Mask . . . . . ON

   Wait State . . . . . . . . . OFF

   Problem State. . . . . . . . ON

   Address Space Control. . . . Primary ASC Mode
   Condition Code . . . . . . . 1
   Program Mask . . . . . . . . 0
   Addressing Mode. . . . . . . 24 bit
   Instruction Address. . . . . 007A5E

The program's dynamic storage area:

Address  Offset from _0002C000Origin STORAGE 0001
0002CF48 000F48 D7D6D9E3 E3C3F0F4 C6F4E2C1 000945C0 *PORTTC04F4SA.. {* R3
0002CF58 000F58 0002CF50  0

Re: SYSTEM REXX use

[Gibney, Dave]

SYSLOG, There's a msg id I could give you, if I had a system

> -Original Message-
> From: IBM Mainframe Discussion List  On
> Behalf Of Seymour J Metz
> Sent: Tuesday, November 01, 2022 11:16 AM
> To: IBM-MAIN@LISTSERV.UA.EDU
> Subject: Re: SYSTEM REXX use
> 
> 
> Where does the output of say go?
> 
> Thanks.
> 
> 
> 
> From: IBM Mainframe Discussion List  on
> behalf of ITschak Mugzach 
> Sent: Tuesday, November 1, 2022 2:12 PM
> To: IBM-MAIN@LISTSERV.UA.EDU
> Subject: Re: SYSTEM REXX use
> 
> Seymour,
> 
> TSO is supported by SystemRexx, including OMVS. The modify command will
> always route the exec to run under axr stc having TSO=YES.
> 
> Best
> ITschak
> 
> Sa
> בתאריך יום ג׳, 1 בנוב׳ 2022 ב-18:16 מאת Seymour J Metz :
> 
> > You can submit a MODIFY AXR command from TSO, but the code doesn't
> run in
> > the TSO address space and doesn't have access to TSO services.
> >
> > 
> > From: IBM Mainframe Discussion List  on
> behalf
> > of Kenneth J. Kripke <046fa3a8ef80-dmarc-
> requ...@listserv.ua.edu>
> > Sent: Monday, October 31, 2022 9:36 AM
> > To: IBM-MAIN@LISTSERV.UA.EDU
> > Subject: SYSTEM REXX use
> >
> > Hello;
> >
> >  I am looking at the capabilities of SYSTEM REXX on a Z/OS system.  I
> > am
> > not familiar with how to invoke it and so forth.
> >
> > Can functions be called from a TSO REXX environment, and, if so, how do I
> > establish a connection to AXR?
> >
> >
> >
> > Kenneth J. Kripke
> >
> >
> >
> > k.kri...@comcast.net 
> >
> >
> >
> >
> > --
> > For IBM-MAIN subscribe / signoff / archive access instructions,
> > send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
> >
> > --
> > For IBM-MAIN subscribe / signoff / archive access instructions,
> > send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
> >
> 
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
> 
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

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

Re: SYSTEM REXX use

[Seymour J Metz]

Where does the output of say go?

Thanks.



From: IBM Mainframe Discussion List  on behalf of 
ITschak Mugzach 
Sent: Tuesday, November 1, 2022 2:12 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: SYSTEM REXX use

Seymour,

TSO is supported by SystemRexx, including OMVS. The modify command will
always route the exec to run under axr stc having TSO=YES.

Best
ITschak

Sa
בתאריך יום ג׳, 1 בנוב׳ 2022 ב-18:16 מאת Seymour J Metz :

> You can submit a MODIFY AXR command from TSO, but the code doesn't run in
> the TSO address space and doesn't have access to TSO services.
>
> 
> From: IBM Mainframe Discussion List  on behalf
> of Kenneth J. Kripke <046fa3a8ef80-dmarc-requ...@listserv.ua.edu>
> Sent: Monday, October 31, 2022 9:36 AM
> To: IBM-MAIN@LISTSERV.UA.EDU
> Subject: SYSTEM REXX use
>
> Hello;
>
>  I am looking at the capabilities of SYSTEM REXX on a Z/OS system.  I
> am
> not familiar with how to invoke it and so forth.
>
> Can functions be called from a TSO REXX environment, and, if so, how do I
> establish a connection to AXR?
>
>
>
> Kenneth J. Kripke
>
>
>
> k.kri...@comcast.net 
>
>
>
>
> --
> 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: SPF/SE is available for free

[Seymour J Metz]

True, but Tritus paid much more attention to ISPF compatibility, and TSPF is 
still my preferred editor on my desktop.


From: IBM Mainframe Discussion List  on behalf of 
Grant Taylor <023065957af1-dmarc-requ...@listserv.ua.edu>
Sent: Tuesday, November 1, 2022 12:14 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: SPF/SE is available for free

On 11/1/22 9:56 AM, Schmitt, Michael wrote:
> CTC had different iterations of the product:
>
>   - SPF/PC: ran in DOS, but used special memory management to edit larger 
> files. SPF/PC can still run under DOSBox but not very well

N.B. My boxed copy of version 4.0 of SPF/PC states that it is "for OS/2
and DOS".  So SFP/PC apparently ran in OS/2 as well.



--
Grant. . . .
unix || die

--
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: SYSTEM REXX use

[ITschak Mugzach]

Seymour,

TSO is supported by SystemRexx, including OMVS. The modify command will
always route the exec to run under axr stc having TSO=YES.

Best
ITschak

Sa
בתאריך יום ג׳, 1 בנוב׳ 2022 ב-18:16 מאת Seymour J Metz :

> You can submit a MODIFY AXR command from TSO, but the code doesn't run in
> the TSO address space and doesn't have access to TSO services.
>
> 
> From: IBM Mainframe Discussion List  on behalf
> of Kenneth J. Kripke <046fa3a8ef80-dmarc-requ...@listserv.ua.edu>
> Sent: Monday, October 31, 2022 9:36 AM
> To: IBM-MAIN@LISTSERV.UA.EDU
> Subject: SYSTEM REXX use
>
> Hello;
>
>  I am looking at the capabilities of SYSTEM REXX on a Z/OS system.  I
> am
> not familiar with how to invoke it and so forth.
>
> Can functions be called from a TSO REXX environment, and, if so, how do I
> establish a connection to AXR?
>
>
>
> Kenneth J. Kripke
>
>
>
> k.kri...@comcast.net 
>
>
>
>
> --
> 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: End of several eras

[Carmen Vitullo]

Love the stories, I graduated from Vo-tech as an RPG / COBOL programmer 
thinking I'd get a job easy as a programmer, not so, but a good learning 
experience as an operator they to production control, to now a sysprog.


 I started in 1977 working for a large retailer, no IMS but CICS , SII 
(Senden) or as I think it morphed into, connect direct and D3 (DataLink) 
to poll the stores for cash register data and send markdown and 
inventory data to the stores after that data was processed.


loved 3rd shift at the time.

As an operator if Senden came down we had a blue light that would come 
on in the computer room, blue light special, Monday early AM before the 
stores opened was the time to re calibrate the automated voice response 
system (Wavetech) system for the stores.


so many stories good and bad.

Carmen

On 11/1/2022 12:35 PM, willie bunter wrote:

  I feel nostalgic after I read your post.  Get this, I started in 1978 and I 
worked on an OS/360.  I was an IMS DB/DC tech. running batch (via BMP) and 
batch jobs which updated the database.  One problem I often encountered - the 
IMS/DC would abend because log tapes (dual logging) due to a STC tape drive 
(6250's) had a problem. IMS/DC had to stay down until I had to copied the log 
tape to another because the EOF was not written.  The phones would be ringing 
off the hook because IMS/DC was down.
Those were the days.amen.

 On Monday, October 31, 2022 at 05:50:37 p.m. EDT, Gibney, Dave 
<03b5261cfd78-dmarc-requ...@listserv.ua.edu> wrote:
  
  I just shutdown our z/OS 2.3 system(s) for the last time.

When I came to school in 1976, the computer was described as  "loosely coupled 
370s". My exposure was via remote cardreader/printer.
When I started working here in 1981, there were still folks that had rewired 
boards for what they had before that.
End of 2019, we moved from a 10 year old z9 to MFaaS with FNTS in Omaha.

Dave Gibney
Information Technology Services
Washington State University


--
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

--
Carmen

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

Re: End of several eras

[willie bunter]

 I feel nostalgic after I read your post.  Get this, I started in 1978 and I 
worked on an OS/360.  I was an IMS DB/DC tech. running batch (via BMP) and 
batch jobs which updated the database.  One problem I often encountered - the 
IMS/DC would abend because log tapes (dual logging) due to a STC tape drive 
(6250's) had a problem. IMS/DC had to stay down until I had to copied the log 
tape to another because the EOF was not written.  The phones would be ringing 
off the hook because IMS/DC was down.
Those were the days.amen. 

On Monday, October 31, 2022 at 05:50:37 p.m. EDT, Gibney, Dave 
<03b5261cfd78-dmarc-requ...@listserv.ua.edu> wrote:  
 
 I just shutdown our z/OS 2.3 system(s) for the last time.
When I came to school in 1976, the computer was described as  "loosely coupled 
370s". My exposure was via remote cardreader/printer.
When I started working here in 1981, there were still folks that had rewired 
boards for what they had before that.
End of 2019, we moved from a 10 year old z9 to MFaaS with FNTS in Omaha.

Dave Gibney
Information Technology Services
Washington State University


--
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: SPF/SE is available for free

[Paul Gorlinsky]

Grant, Are you aware that Apple’s OS is a certified Unix OS?

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

Re: SYSTEM REXX use

[Seymour J Metz]

You can submit a MODIFY AXR command from TSO, but the code doesn't run in the 
TSO address space and doesn't have access to TSO services.


From: IBM Mainframe Discussion List  on behalf of 
Kenneth J. Kripke <046fa3a8ef80-dmarc-requ...@listserv.ua.edu>
Sent: Monday, October 31, 2022 9:36 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: SYSTEM REXX use

Hello;

 I am looking at the capabilities of SYSTEM REXX on a Z/OS system.  I am
not familiar with how to invoke it and so forth.

Can functions be called from a TSO REXX environment, and, if so, how do I
establish a connection to AXR?



Kenneth J. Kripke



k.kri...@comcast.net 




--
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: SPF/SE is available for free

[Grant Taylor]

On 11/1/22 9:56 AM, Schmitt, Michael wrote:

CTC had different iterations of the product:

  - SPF/PC: ran in DOS, but used special memory management to edit larger 
files. SPF/PC can still run under DOSBox but not very well


N.B. My boxed copy of version 4.0 of SPF/PC states that it is "for OS/2 
and DOS".  So SFP/PC apparently ran in OS/2 as well.




--
Grant. . . .
unix || die

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

Re: SPF/SE is available for free

[Grant Taylor]

On 11/1/22 9:56 AM, Schmitt, Michael wrote:

CTC had different iterations of the product:

  - SPF/PC: ran in DOS, but used special memory management to edit larger 
files. SPF/PC can still run under DOSBox but not very well


I have a boxed coy of SPF/PC.  Does, or can, Bonnie's gift extend to the 
SPF/PC files that I have?  If so, I'd be happy to get copies of them to 
the proper parties to grow the collection.




--
Grant. . . .
unix || die

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

Re: Dynamic LPA Services

[Rob Scott]

Paul,

I very much doubt that the csvdylpa workarea is in common storage. It is much 
more likely to be in an authorised private subpool.

You can check by inspecting the output subpool value returned by the service.

Rob Scott
Rocket Software

From: IBM Mainframe Discussion List  on behalf of 
esst...@juno.com 
Sent: Monday, October 31, 2022 5:06:55 PM
To: IBM-MAIN@LISTSERV.UA.EDU 
Subject: Dynamic LPA Services

EXTERNAL EMAIL





Hello
.
Regarding CSVDYLPA REQUEST=ADD
.
The documentation states:
.Modules added to the system via dynamic LPA processing are placed into CSA or 
ECSA storage.
.
Further more It is expected that the caller will free the work area, using 
either FREEMAIN or STORAGE RELEASE, after processing it.
.
Does this mean the work area used by CSVDYLPA is also acquired from CSA/ECSA 
storage since the caller is responsible for freeing the storage
occupied by the "work area" ?
.
Paul -

.

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



Rocket Software, Inc. and subsidiaries ? 77 Fourth Avenue, Waltham MA 02451 ? 
Main Office Toll Free Number: +1 855.577.4323
Contact Customer Support: 
https://my.rocketsoftware.com/RocketCommunity/RCEmailSupport
Unsubscribe from Marketing Messages/Manage Your Subscription Preferences - 
http://www.rocketsoftware.com/manage-your-email-preferences
Privacy Policy - http://www.rocketsoftware.com/company/legal/privacy-policy


This communication and any attachments may contain confidential information of 
Rocket Software, Inc. All unauthorized use, disclosure or distribution is 
prohibited. If you are not the intended recipient, please notify Rocket 
Software immediately and destroy all copies of this communication. Thank you.

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

Re: SPF/SE is available for free

[Schmitt, Michael]

Cool!

I still use SPF/SE, in fact was using it just yesterday. But I have SPF/SE 3.5 
build 614 so yours is a lot newer.

CTC had different iterations of the product:

 - SPF/PC: ran in DOS, but used special memory management to edit larger files. 
SPF/PC can still run under DOSBox but not very well

 - SPF/Win: SPF for Windows. I think I beta tested it but it was never released?

 - SPF/Professional: The first released SPF for Windows? Still runs but crashes 
sometimes

 - SPF/SE

In my opinion, the best SPF was SPF/Pro:

 - Closer emulation of ISPF Edit than SPF/SE
 - Runs REXX Edit Macros

-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
Michael Knigge
Sent: Tuesday, November 1, 2022 9:22 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: SPF/SE is available for free

FYI:

I guess some of you guys use SPF/SE (SPF SourceEdit) from Command Technology. 
The editor was developed by Tim Tetivia, who unfortunately died in 2022 as a 
result of a corona infection. With some research and help from other SPF users 
(namely Peter aka Verizon), it was possible to contact Tim's wife Bonnie. She 
gave us permission to distribute the editor for free (sadly the source code is 
“lost” forever).

On my GitHub 
(https://clicktime.symantec.com/15tStaqvHaWmhJEwKL5vF?h=k8C7L5Qfruh4B5XLObxAA9jbAcEwjGal4BxXv4aqqBA=&u=https://github.com/michaelknigge/spf-editor)
 I made some releases available, together with product keys. I also provide a 
“professional” installer created with InnoSetup that installs SPF/SE together 
with some useful macros, file profiles and color schemes (a color scheme that 
makes SPF/SE look like ISPF).

The original releases can be found here: 
https://clicktime.symantec.com/15tT4FEVCosxXBtnQStDV?h=a42samARJUjgBVHNnAkLJC62sUfwYr-r52P2hTOol2s=&u=https://github.com/michaelknigge/spf-editor/tree/main/binaries

My installers can be found here: 
https://clicktime.symantec.com/15tSyR3CkCCN7F4rrtV4s?h=JETYbGTlNFfLh2RSQ0-u8IF48iTbmm4wmhcTxO4DALQ=&u=https://github.com/michaelknigge/spf-editor/releases


Bye,
Michael



Mit freundlichen Grüßen

Michael Knigge
Software Engineer

SET GmbH
Rühmkorffstraße 5
30163 Hannover

Telefon: +49 511 330 998 23
Fax: +49 511 330 998 65
michael.kni...@set.de
https://clicktime.symantec.com/15tT95RmfRZYw8ihx1HN7?h=7ofgJ9w9U3b-adSx3AxSaLomMG-qA7Pwc3Crx6mjfBM=&u=https://set.de
Hinweise zum Datenschutz: 
https://clicktime.symantec.com/15tTDud483F9M5YdVZgWj?h=0L9dIKHdM3HSaykOpjBgBycNV_YAIf0fbanoNNOpkT4=&u=https://set.de/datenschutz

Handelsregister: Amtsgericht Hannover HRB 52778
​Geschäftsführer: Dr.-Ing. Tobias Baum, Dr.-Ing. Arthur Brack


--
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: SPF/SE is available for free

[Mike Shaw]

Michael,

Thank you for this gift to our community. I used SPF/PC and SPF/SE
extensively in the past and thought it was gone forever.

Mike Shaw
MVS/QuickRef Support Group
Chicago-Soft, Ltd.


On Tue, Nov 1, 2022 at 10:22 AM Michael Knigge 
wrote:

> FYI:
>
> I guess some of you guys use SPF/SE (SPF SourceEdit) from Command
> Technology. The editor was developed by Tim Tetivia, who unfortunately died
> in 2022 as a result of a corona infection. With some research and help from
> other SPF users (namely Peter aka Verizon), it was possible to contact
> Tim's wife Bonnie. She gave us permission to distribute the editor for free
> (sadly the source code is “lost” forever).
>
> On my GitHub (https://github.com/michaelknigge/spf-editor) I made some
> releases available, together with product keys. I also provide a
> “professional” installer created with InnoSetup that installs SPF/SE
> together with some useful macros, file profiles and color schemes (a color
> scheme that makes SPF/SE look like ISPF).
>
> The original releases can be found here:
> https://github.com/michaelknigge/spf-editor/tree/main/binaries
>
> My installers can be found here:
> https://github.com/michaelknigge/spf-editor/releases
>
>
> Bye,
> Michael
>
>
>
> Mit freundlichen Grüßen
>
> Michael Knigge
> Software Engineer
>
> SET GmbH
> Rühmkorffstraße 5
> 30163 Hannover
>
> Telefon: +49 511 330 998 23
> Fax: +49 511 330 998 65
> michael.kni...@set.de
> https://set.de
> Hinweise zum Datenschutz: https://set.de/datenschutz
>
> Handelsregister: Amtsgericht Hannover HRB 52778
> ​Geschäftsführer: Dr.-Ing. Tobias Baum, Dr.-Ing. Arthur Brack
>
>
> --
> 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: SPF/SE is available for free

[Jay Maynard]

Thank you for preserving this and making it available.

One question: You say it's picky about fonts...how well does it work with
Ricardo Banffy's outstanding 3270 font, available at
https://github.com/rbanffy/3270font ?

On Tue, Nov 1, 2022 at 9:22 AM Michael Knigge  wrote:

> FYI:
>
> I guess some of you guys use SPF/SE (SPF SourceEdit) from Command
> Technology. The editor was developed by Tim Tetivia, who unfortunately died
> in 2022 as a result of a corona infection. With some research and help from
> other SPF users (namely Peter aka Verizon), it was possible to contact
> Tim's wife Bonnie. She gave us permission to distribute the editor for free
> (sadly the source code is “lost” forever).
>
> On my GitHub (https://github.com/michaelknigge/spf-editor) I made some
> releases available, together with product keys. I also provide a
> “professional” installer created with InnoSetup that installs SPF/SE
> together with some useful macros, file profiles and color schemes (a color
> scheme that makes SPF/SE look like ISPF).
>
> The original releases can be found here:
> https://github.com/michaelknigge/spf-editor/tree/main/binaries
>
> My installers can be found here:
> https://github.com/michaelknigge/spf-editor/releases
>
>
> Bye,
> Michael
>
>
>
> Mit freundlichen Grüßen
>
> Michael Knigge
> Software Engineer
>
> SET GmbH
> Rühmkorffstraße 5
> 30163 Hannover
>
> Telefon: +49 511 330 998 23
> Fax: +49 511 330 998 65
> michael.kni...@set.de
> https://set.de
> Hinweise zum Datenschutz: https://set.de/datenschutz
>
> Handelsregister: Amtsgericht Hannover HRB 52778
> ​Geschäftsführer: Dr.-Ing. Tobias Baum, Dr.-Ing. Arthur Brack
>
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>


-- 
Jay Maynard

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

SPF/SE is available for free

[Michael Knigge]

FYI:

I guess some of you guys use SPF/SE (SPF SourceEdit) from Command Technology. 
The editor was developed by Tim Tetivia, who unfortunately died in 2022 as a 
result of a corona infection. With some research and help from other SPF users 
(namely Peter aka Verizon), it was possible to contact Tim's wife Bonnie. She 
gave us permission to distribute the editor for free (sadly the source code is 
“lost” forever).

On my GitHub (https://github.com/michaelknigge/spf-editor) I made some releases 
available, together with product keys. I also provide a “professional” 
installer created with InnoSetup that installs SPF/SE together with some useful 
macros, file profiles and color schemes (a color scheme that makes SPF/SE look 
like ISPF).

The original releases can be found here: 
https://github.com/michaelknigge/spf-editor/tree/main/binaries

My installers can be found here: 
https://github.com/michaelknigge/spf-editor/releases


Bye,
Michael



Mit freundlichen Grüßen

Michael Knigge
Software Engineer

SET GmbH
Rühmkorffstraße 5
30163 Hannover

Telefon: +49 511 330 998 23
Fax: +49 511 330 998 65
michael.kni...@set.de
https://set.de
Hinweise zum Datenschutz: https://set.de/datenschutz

Handelsregister: Amtsgericht Hannover HRB 52778
​Geschäftsführer: Dr.-Ing. Tobias Baum, Dr.-Ing. Arthur Brack


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

Re: SYSTEM REXX use

[Wendell Lovewell]

Hi Ken. 

You may probably(?) already have an AXR00 PARMLIB member (or some other suffix, 
pointed to from IEASYSxx via the AXR=(xx) parameter.

The AXRxx member lets you define a prefix character (like $ for JES2) that 
provides an alternative to using F AXR,rexxname:

/***/
  
/* THIS IS A SAMPLE AXR00   MEMBER OF SYS1.PARMLIB  */  
/***/
  
CPF('@',SYSPLEX)/* 1st char is SYSREXX prefix char */
AXRUSER(IBMUSER)

REXXLIB ADD DSN(USER.SAXREXEC) 
REXXLIB ADD DSN(ADCD.&SYSVER..SAXREXEC)
REXXLIB ADD DSN(SYS1.SAXREXEC)
--

With the above version of AXR00 in use, system rexx routines can be stored in 
any of the 3 REXXLIB libraries listed.  And they can be started by just 
entering "@rexxname".

So if I have a system Rexx routine named TCPTRACE, instead of starting it with 
F AXR,TCPTRACE, I can just type @TCPTRACE START 10.1.1.1

I don't believe TSO facilities are available, so this may not be what you're 
looking for. 

Hth.

~Wendell Lovewell

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

[Public] RE: EXTERNAL: Re: End of several eras

[Crawford, Robert C.]

I learned a lot from the CICS source code IBM distributed for years.  I learned 
how to hash, build segmented tables, how to build linked lists, all techniques 
I incorporated in my programs to make them dynamic and resilient.

Robert Crawford
Mainframe Management
United Services Automobile Association
(210) 913-3822

“Nothing can be beautiful which is not true."
John Ruskin
Please send requests to mainframe management through our front door at  
go/mfmfrontdoor

-Original Message-
From: IBM Mainframe Discussion List  On Behalf Of 
Brian Westerman
Sent: Monday, October 31, 2022 11:47 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: EXTERNAL: Re: End of several eras

I agree, I can't possibly convey how much I learned from some old IBM fiche 
that I had access to in the computer center when I just started college.  The 
first really important thing I wrote (I was 17) were mods to pass the condition 
codes from step to step within JES2 and then send the highest one to the 
console and syslog at job end.  I later learned that others had done the same 
thing, and long before me, but I learned a lot.  That code didn't work with the 
first version of MVS I was exposed to after college, so it was followed by 
doing that same thing with two jes exits and then even later writing our 
companies Automation software that pulls the condition codes from the same 
fields they were placed in originally way back then.

Everything I have written over the years is still based on concepts and 
techniques that I first learned by looking at the code in the IBM fiche.

I had an extra advantage in that I worked for IBM throughout that same time and 
was able to see some truly spectacular coding techniques and I am truly 
thankful for that opportunity.

I realize that IBM wanted to keep nefarious people from copying the code, but I 
think that we lost a great deal of experience and expertise when we lost access 
to the code.  Some of those techniques are just not around for people to 
examine and learn from, and that's very sad.

Brian



On Mon, 31 Oct 2022 19:42:50 -0400, David Spiegel  
wrote:

>Hi Tom,
>1983, eh?
>The same year as the (expletive deleted) OCO policy.
>I've seen IBM-lifers defend it on this forum, yet, it still did
>not/does not make sense.
>
>Regards,
>David
>

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

USAA Classification: Public

Disclaimer: This email and any attachments are the property of USAA and may 
contain confidential and/or privileged material. If you are not the intended 
recipient, any use, disclosure or copying of this email or any attachments is 
unauthorized. If you received this email in error, please immediately notify 
the sender and delete the email and any attachments from your computer.


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

Re: End of several eras

[Seymour J Metz]

Back in the 7090 era I read the code for FAP, and it sorted the symbol table 
using a binary radix sort bearing the comment "This is the world's best known 
test of the sense indicators." I thought that the code was really slick, and 
these days I would have called it k3wl.

The slickest thing that I saw in OS/360 was code testing successive bits using 
BXH and BXLE.

Yes, access to assembly listing of the system made life much better.


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


From: IBM Mainframe Discussion List [IBM-MAIN@LISTSERV.UA.EDU] on behalf of 
Brian Westerman [brian_wester...@syzygyinc.com]
Sent: Tuesday, November 1, 2022 12:46 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: End of several eras

I agree, I can't possibly convey how much I learned from some old IBM fiche 
that I had access to in the computer center when I just started college.  The 
first really important thing I wrote (I was 17) were mods to pass the condition 
codes from step to step within JES2 and then send the highest one to the 
console and syslog at job end.  I later learned that others had done the same 
thing, and long before me, but I learned a lot.  That code didn't work with the 
first version of MVS I was exposed to after college, so it was followed by 
doing that same thing with two jes exits and then even later writing our 
companies Automation software that pulls the condition codes from the same 
fields they were placed in originally way back then.

Everything I have written over the years is still based on concepts and 
techniques that I first learned by looking at the code in the IBM fiche.

I had an extra advantage in that I worked for IBM throughout that same time and 
was able to see some truly spectacular coding techniques and I am truly 
thankful for that opportunity.

I realize that IBM wanted to keep nefarious people from copying the code, but I 
think that we lost a great deal of experience and expertise when we lost access 
to the code.  Some of those techniques are just not around for people to 
examine and learn from, and that's very sad.

Brian



On Mon, 31 Oct 2022 19:42:50 -0400, David Spiegel  
wrote:

>Hi Tom,
>1983, eh?
>The same year as the (expletive deleted) OCO policy.
>I've seen IBM-lifers defend it on this forum, yet, it still did not/does
>not make sense.
>
>Regards,
>David
>

--
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: End of several eras

[Seymour J Metz]

That's complicated. To begin with, even in the OS/360 days IBM did not provide 
source code for OS or DOS service that they distributed as object code, 
although they did provide microfiche of the assembly listings. CP-67 and later 
VM/370, of course, got service as source updates, as did HASP and ASP. Does 
anybody know whether TSS service included source. Theoretically you could 
update the optional source to include service changes in the microfiche, but 
that really wasn't practical, and AKAIK most installations relied on zaps. But 
the fiche was still a good way to fill gaps in the documentation.

The launch of OCO (ptui!) was piecemeal; over time IBM dropped more and more 
code from the optional source and microfiche, and did not provide them at all 
for new components. As I recall, some optional source and microfiche was still 
available in 1983.


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


From: IBM Mainframe Discussion List [IBM-MAIN@LISTSERV.UA.EDU] on behalf of Tom 
Brennan [t...@tombrennansoftware.com]
Sent: Tuesday, November 1, 2022 2:10 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: End of several eras

I had worked on PC's and Computervision graphic machines prior to 1983,
and everything there was already OCO I think, so I didn't know any
better when IBM went OCO.  I rarely looked at the fiche, but it was
really interesting to see PL/X (I think it was called) compiled into
assembler code.  I do remember one time where (with someone else's help)
we found the cause of an error by looking at the fiche and reported it
to IBM - with our own fix of course :)

FYI: 
https://secure-web.cisco.com/1L0J3UPOYaof-tqaybpTvvUJmgIjikHRp1YdQuIjDvcOdWCtuV4kB9spBv8TmmSzRSWXGiIxYTCOsLxTYX3Ojqfc7cQ_9pNA8lq4Gq5oTnpEZRd1JmggvZSoUBV41SVHYqMOpIKtPJHI8OTn7zWlLGLJhAgdaSJNnc62rAcZo5TueNHuX5xBj7m6ser7Nj9YzZhCkKGhVmBzGG3DQqjESkT42CHWwitzn-r4BDQbVxzqgiKj9ZIhumoTHihmnQ1RvsQMOugq3Lixc0367yuuxMBMbyn4KYsOAl_POK3XrdujiuvvMRqOp-uMqyYuMzJkzoQ4o9V1uZabqPhxmJhLAS1wH2P1BIK1RLv6SBHTJVtx7xKRP8QgxTm97EYpXCjlrY_zEGjSlbjCPinF4XtBgdq5vx9iGYlAGBqlMsakvjfRCJkJwSok4FQVRRnGV3w3q/https%3A%2F%2Fen.wikipedia.org%2Fwiki%2FComputervision

On 10/31/2022 4:42 PM, David Spiegel wrote:
> Hi Tom,
> 1983, eh?
> The same year as the (expletive deleted) OCO policy.
> I've seen IBM-lifers defend it on this forum, yet, it still did not/does
> not make sense.
>
> Regards,
> David
>
> On 2022-10-31 19:31, Tom Brennan wrote:
>> I get it... I just heard from an old co-worker that sometime this
>> month they shut down the mainframe in Southern California that I
>> worked on from 1983 to 2013.  That was my first exposure to an IBM
>> mainframe, and I think XA had just come out and people were busy
>> fixing programs to work in AMODE 31.  There was a rack full of MVS
>> microfiche and a viewer at each desk.  If we needed to send a dump to
>> IBM we had to create a tape and carry it across the street to the mail
>> room.
>>
>> On 10/31/2022 2:50 PM, Gibney, Dave wrote:
>>> I just shutdown our z/OS 2.3 system(s) for the last time.
>>> When I came to school in 1976, the computer was described as "loosely
>>> coupled 370s". My exposure was via remote cardreader/printer.
>>> When I started working here in 1981, there were still folks that had
>>> rewired boards for what they had before that.
>>> End of 2019, we moved from a 10 year old z9 to MFaaS with FNTS in Omaha.
>>>
>>> Dave Gibney
>>> Information Technology Services
>>> Washington State University
>>>
>>>
>>> --
>>> For IBM-MAIN subscribe / signoff / archive access instructions,
>>> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>>>
>>>
>>
>> --
>> For IBM-MAIN subscribe / signoff / archive access instructions,
>> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>
>

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

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

Re: End of several eras

[David Spiegel]

Hi Tom,
That is one of the arguments for non-OCO. Customers would have the 
ability to suggest code improvement/fixes, much like Open Source today 
(which IBM schizophrenically) supports.
Another IBM mistake was to not make PL/X (or PL/AS) publicly available. 
While I am mentioning IBM mistakes, the biggest ongoing mistake is to 
not allow z/OS to be run on any hardware other than which was licensed.
Yes, I am familiar with the "our lawyers will not permit this" argument 
-- poppycock! The industry is screaming for fresh blood, yet, the golden 
goose is being starved. SMH.


Regards,
David

On 2022-11-01 02:10, Tom Brennan wrote:
I had worked on PC's and Computervision graphic machines prior to 
1983, and everything there was already OCO I think, so I didn't know 
any better when IBM went OCO.  I rarely looked at the fiche, but it 
was really interesting to see PL/X (I think it was called) compiled 
into assembler code.  I do remember one time where (with someone 
else's help) we found the cause of an error by looking at the fiche 
and reported it to IBM - with our own fix of course :)


FYI: 
https://nam12.safelinks.protection.outlook.com/?url=https%3A%2F%2Fen.wikipedia.org%2Fwiki%2FComputervision&data=05%7C01%7C%7C9dfd073ea4474c70061c08dabbcfc0b0%7C84df9e7fe9f640afb435%7C1%7C0%7C638028798269830521%7CUnknown%7CTWFpbGZsb3d8eyJWIjoiMC4wLjAwMDAiLCJQIjoiV2luMzIiLCJBTiI6Ik1haWwiLCJXVCI6Mn0%3D%7C3000%7C%7C%7C&sdata=mMUmAGv0jBlnt5ML237RZCH7jEd5FDWlbJTROyDEo28%3D&reserved=0


On 10/31/2022 4:42 PM, David Spiegel wrote:

Hi Tom,
1983, eh?
The same year as the (expletive deleted) OCO policy.
I've seen IBM-lifers defend it on this forum, yet, it still did 
not/does not make sense.


Regards,
David

On 2022-10-31 19:31, Tom Brennan wrote:
I get it... I just heard from an old co-worker that sometime this 
month they shut down the mainframe in Southern California that I 
worked on from 1983 to 2013.  That was my first exposure to an IBM 
mainframe, and I think XA had just come out and people were busy 
fixing programs to work in AMODE 31.  There was a rack full of MVS 
microfiche and a viewer at each desk.  If we needed to send a dump 
to IBM we had to create a tape and carry it across the street to the 
mail room.


On 10/31/2022 2:50 PM, Gibney, Dave wrote:

I just shutdown our z/OS 2.3 system(s) for the last time.
When I came to school in 1976, the computer was described as 
"loosely coupled 370s". My exposure was via remote cardreader/printer.
When I started working here in 1981, there were still folks that 
had rewired boards for what they had before that.
End of 2019, we moved from a 10 year old z9 to MFaaS with FNTS in 
Omaha.


Dave Gibney
Information Technology Services
Washington State University


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




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


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




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


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

Re: Crypto Express question

[Frank Swarbrick]

I'm specifically referring to payment card crypto functions, like PIN 
validation, chip cryptogram stuff, etc.

From: IBM Mainframe Discussion List  on behalf of 
Timothy Sipples 
Sent: Monday, October 31, 2022 12:08 AM
To: IBM-MAIN@LISTSERV.UA.EDU 
Subject: Re: Crypto Express question

Frank Swarbrick wrote:
> I do think that having an internal crypto card is quite a benefit,
>and CCA/ICSF is generally quite nice to work with.  That being
>said, not having to work with any crypto processing at all is even
>nicer.

"Not having to work with any crypto processing" isn't a viable option, not if 
you want even trivial security.

— — — — —
Timothy Sipples
Senior Architect
Digital Assets, Industry Solutions, and Cybersecurity
IBM zSystems/LinuxONE, Asia-Pacific
sipp...@sg.ibm.com


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

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