|
Post by George on Jul 7, 2022 10:36:47 GMT -5
OK, I guess I was mmistaken in where LOC positioned things, if the screen must be moved, the located line is placed at the top. The TOP operand just forces the line to the top, even though it may be currently visible on the screen.
So many subtleties going on, no wonder the code is full of little tweaks everywhere. I can remember the early years, there seemed to be a constant stream of user comments like "well ISPF does this, and SPFLite doesn't, why not?"
George
|
|
|
Post by Stefan on Jul 7, 2022 10:39:35 GMT -5
Stefan: Yes a simple L .10 should place line 10 as the 2nd line, same way that FIND positions things. I'll have to check it out. If I find and fix it, my bet is it will break LOC-TOP. BTW, I posted a TP.MACRO further back that maintains the column position after positioning. Nobody commented on it. George
Ahh, sorry, I missed that TP.MACRO altogether.
Mine look like plagerism now :-)
I'm wary of Set_TopScrn_Lptr() and also Set_Csr() to a degree as they tend to be unreliable if another action later in the MACRO moves the cursor. But in this case, there's nothing else except HALT afterwards.
|
|
|
Post by George on Jul 7, 2022 15:36:08 GMT -5
|
|
|
Post by arnoldtrembley on Jul 8, 2022 2:38:25 GMT -5
Thanks, Robert and Stefan!
I have downloaded LOC-TOP-V3.MACRO and I'm using that version now.
If I issue that version in the edit window, rather than on the line prefix, after the current line becomes the top line the cursor is positioned to the same column in the edit window on the current line. That could be handy.
Thanks again for all you help!!
|
|
|
Post by George on Jul 8, 2022 11:10:03 GMT -5
Robert: And the line
DIM CURSOR_LNUM AS LONG = Get_LNum(CURSOR_LPTR)
is no longer needed either.
George
|
|
|
Post by George on Jul 8, 2022 13:41:45 GMT -5
Robert: I can't remember the acronym for it, even though I spent many hours staring at micro-fiche (remember that?) of IBM source code, but they started a process of replacing old normal Assembler with this macro based, hi-level replacement.
And yes, some eager beaver decided to have IEFBR14 recoded in it. Well, IEFBR14 is, by nature fully RENT, REUS, REFR, so it generated a full blown do-nothing program with a full re-entrant opening and closing sequence. Needless to say it was many more instructions than the SR R15, R15 and BR R14 original. It never made it out the door, but the macro version made the rounds on the internal IBM forums.
George
[UPDATE]
Remembered the language name - is was PL/S - Programming Language / Systems
[/UPDATE]
|
|
|
Post by arnoldtrembley on Jul 8, 2022 23:17:19 GMT -5
Thanks, Robert. I have LOC-TOP-V4 downloaded now. And for your reading pleasure: en.wikipedia.org/wiki/IBM_PL/S I've heard of it, but never used it. I think the current version is called PL/X and IBM still uses it. Apparently you can now license it, but it's probably not cheap. Kind regards,
|
|