IBM Mainframe Forum Index
 
Log In
 
IBM Mainframe Forum Index Mainframe: Search IBM Mainframe Forum: FAQ Register
 

rewrite same SAY line


IBM Mainframe Forums -> CLIST & REXX
Post new topic   Reply to topic
View previous topic :: View next topic  
Author Message
RazVorox

New User


Joined: 19 Oct 2022
Posts: 32
Location: Israel

PostPosted: Wed Jun 14, 2023 2:47 pm
Reply with quote

ok. this is strange one.
I run a basic rexx program. (batch, if it matters).
Code:

/* rexx */
say "hello rexx!"
return 0


and i get -
Quote:
"hello rexx!"
wonderful!
than, i add a few more "say" lines..
Code:

say "line 2"
say "line 3"
say "line 4"


now the question is -
say i want to put the cursor back
at the start of the first "hello rexx!" line,
and i want to rewrite that line.. is there a way to do it?

I have tried the
ADDRESS ISREDIT "(ROW,COL) = CURSOR"
approach. didn't work.
(based on this -
and a few others similar)

I have tried the
Code:
address ispexec "VGET (ZSCREENC ZSCREENI)"

approach, which worked, but still couldn't get the csr position,
or to move it.

I'm not talking about a panel.
just a basic output. instead of writing to the next line,
write OVER the same line.

My questions are -
1 - is it even possible?
2 - if so, where could i find a reference?

Thanks,
me.
Back to top
View user's profile Send private message
Pedro

Global Moderator


Joined: 01 Sep 2006
Posts: 2593
Location: Silicon Valley

PostPosted: Wed Jun 14, 2023 8:05 pm
Reply with quote

re: My questions are -
1 - is it even possible?
2 - if so, where could i find a reference?


No, it is not possible. The 3270 terminal has two modes: line mode or full screen mode. You can switch between the two, but it seems that you want something in-between.

The SAY operates in line mode, whereas that ISPEXEC stuff is going to be in fullscreen mode.

Since you are using rexx, you can use OUTTRAP to capture the linemode output then display that later in fullscreen mode via ISPF... you can then have some control over what is shown and cursor placement.
Back to top
View user's profile Send private message
RazVorox

New User


Joined: 19 Oct 2022
Posts: 32
Location: Israel

PostPosted: Wed Jun 14, 2023 8:27 pm
Reply with quote

Thanks for the reply sir.
I indeed aimed for something in between,
Trying to save myself the trouble of writing
panels just to pretty-fy my debug/user msgs.

Much obliged.

I also get it that it means that say is full line,
So I can forget about using strings with break-lines in
The middle, and than throwing them to a say debug-msg proc..

Oh well.. all part of the adaptation curve from open, to mf.
(Going to build a small pretty pop-up debug msg sys just
To get comfy with panels. )

Thanks a lot !! 🙏
Back to top
View user's profile Send private message
Willy Jensen

Active Member


Joined: 01 Sep 2015
Posts: 730
Location: Denmark

PostPosted: Wed Jun 14, 2023 10:10 pm
Reply with quote

You certainly can't do it in batch.
For online then most sites have a CLEAR or CLEARSCR command so you can do one SAY, then clear the screen and do the next SAY and so on.
Back to top
View user's profile Send private message
Pedro

Global Moderator


Joined: 01 Sep 2006
Posts: 2593
Location: Silicon Valley

PostPosted: Wed Jun 14, 2023 11:15 pm
Reply with quote

re: in batch

As I said earlier, you can use OUTTRAP to capture the line mode output. Create a separate exec that starts the trapping, then have it call your problem exec.

When the problem exec ends, you can stop the trap and process the lines and manipulate them in any way that you want, and finally write the results to the SYSPRINT file.
Back to top
View user's profile Send private message
daveporcelan

Active Member


Joined: 01 Dec 2006
Posts: 792
Location: Pennsylvania

PostPosted: Wed Jun 14, 2023 11:22 pm
Reply with quote

Throughout this whole string, the OP has not really stated what he is trying to achieve with this exercise.

He/she talks about batch, isredit commands, ispexec commands, pop-up panels.

Kind of all over the place.

Just saying
Back to top
View user's profile Send private message
Pedro

Global Moderator


Joined: 01 Sep 2006
Posts: 2593
Location: Silicon Valley

PostPosted: Wed Jun 14, 2023 11:26 pm
Reply with quote

re: strings with break lines

IMHO, I do NOT think it will work... but hex 25 is line feed in EBCIDIC.

Try something like this:
Code:
Say "part 1" x'25' "part two"


Or you could just use two SAY statements.


Character table: www.cs.umd.edu/~meesh/cmsc311/clin-cmsc311/Lectures/lecture6/ebcdic.html
Back to top
View user's profile Send private message
RazVorox

New User


Joined: 19 Oct 2022
Posts: 32
Location: Israel

PostPosted: Thu Jun 15, 2023 12:09 am
Reply with quote

Lol.. it doesn't.
Just to be sure I've also tried the ascii one,
The different '/n' version, and the `n version..

U guess I could hack it with some asm,
But.. it wasn't designed for that

Its my way of thinking that requires adjustment,
Not the code. Adapt to it. Don't fight it.

Re: Or you could just use two SAY statements

In the "open", what we would do is to run a basic
Debug proc with juat a printout cmd, hold an error msg enum
Table, and just "call dbg_msg 2134". So the inline /n was
Used as a pretty quick and dirty way to arrange the data
And add extra info.

I just need to re-adjust my conceptul thinking around
The MF, 3270 and the whole.. way of thinking.

Was fun trying though 😅😁

Again - thanks a bunch 🙏❤
Back to top
View user's profile Send private message
Pedro

Global Moderator


Joined: 01 Sep 2006
Posts: 2593
Location: Silicon Valley

PostPosted: Thu Jun 15, 2023 1:35 am
Reply with quote

In dbg_msg, split up the message text:
Code:
parse arg part1 '/n' part2
say part1
say part2
Back to top
View user's profile Send private message
View previous topic :: :: View next topic  
Post new topic   Reply to topic View Bookmarks
All times are GMT + 6 Hours
Forum Index -> CLIST & REXX

 


Similar Topics
Topic Forum Replies
No new posts Write line by line from two files DFSORT/ICETOOL 7
No new posts Reading dataset in Python - New Line ... All Other Mainframe Topics 22
No new posts Merge files with a key and insert a b... DFSORT/ICETOOL 6
No new posts Repeat a DD line- comment and insert ... CA Products 3
No new posts Best way to create an automated line ... TSO/ISPF 3
Search our Forums:

Back to Top