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

SAY backslash within ISPF


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

Active User


Joined: 29 Oct 2010
Posts: 201
Location: Toronto, ON, Canada

PostPosted: Wed Jun 09, 2021 4:08 am
Reply with quote

The below REXX code
Code:
line = 'Slash / Backslash \'
SAY line

will display correctly if run from the TSO ready prompt:
Code:
Slash / Backslash \

but will show a colon ":" instead of "\" if run in ISPF
Code:
Slash / Backslash :
***

Any ideas why? I have searched using google and no luck.
Back to top
View user's profile Send private message
Pedro

Global Moderator


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

PostPosted: Wed Jun 09, 2021 9:20 am
Reply with quote

Can you explain "if run in ISPF" in more detail? Where is this SAY instruction and how do you execute it?

--
My guess is some kind of codepage issue.
Back to top
View user's profile Send private message
Marso

REXX Moderator


Joined: 13 Mar 2006
Posts: 1349
Location: Israel

PostPosted: Wed Jun 09, 2021 11:49 am
Reply with quote

Maybe check the Terminal Type under ISPF Settings
Back to top
View user's profile Send private message
Willy Jensen

Active User


Joined: 01 Sep 2015
Posts: 472
Location: Denmark

PostPosted: Wed Jun 09, 2021 12:49 pm
Reply with quote

In ISPF 7.3 check the value for variable ZTERMCID. Mine show 01047 and I can SAY backslashes.
Back to top
View user's profile Send private message
Joerg.Findeisen

Active Member


Joined: 15 Aug 2015
Posts: 518
Location: Bamberg, Germany

PostPosted: Wed Jun 09, 2021 12:51 pm
Reply with quote

I would assume that ISPF in BATCH is TS's problem.
Back to top
View user's profile Send private message
jerryte

Active User


Joined: 29 Oct 2010
Posts: 201
Location: Toronto, ON, Canada

PostPosted: Wed Jun 09, 2021 6:53 pm
Reply with quote

The Rexx exec is in a pds allocated to SYSPROC dd. If I execute this using "TSO" exec-name from any ispf panel or using option 6 then I see ":" instead of "\".
ZTERMCID = 0037 I assume this is a codepage.
Back to top
View user's profile Send private message
sergeyken
Warnings : 2

Senior Member


Joined: 29 Apr 2008
Posts: 1084

PostPosted: Wed Jun 09, 2021 7:21 pm
Reply with quote

The used terminal emulator may affect the visuality of characters.

I would try too:
Code:
 Say ‘/ is in hex ‘ C2X(‘/‘)
 Say ‘\ is in hex ‘ C2X(‘\’)
Back to top
View user's profile Send private message
Willy Jensen

Active User


Joined: 01 Sep 2015
Posts: 472
Location: Denmark

PostPosted: Wed Jun 09, 2021 8:06 pm
Reply with quote

is it just you, or do all your colleagues have the same issue?
Back to top
View user's profile Send private message
Willy Jensen

Active User


Joined: 01 Sep 2015
Posts: 472
Location: Denmark

PostPosted: Wed Jun 09, 2021 8:24 pm
Reply with quote

what is your ZTERMCS value?
Back to top
View user's profile Send private message
Joerg.Findeisen

Active Member


Joined: 15 Aug 2015
Posts: 518
Location: Bamberg, Germany

PostPosted: Thu Jun 10, 2021 3:37 pm
Reply with quote

Willy Jensen wrote:
what is your ZTERMCS value?

It should be 0695 for most installations.
Back to top
View user's profile Send private message
Pedro

Global Moderator


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

PostPosted: Thu Jun 10, 2021 9:38 pm
Reply with quote

Can you edit the rexx program and show us the hex value of the '\' character?
Back to top
View user's profile Send private message
jerryte

Active User


Joined: 29 Oct 2010
Posts: 201
Location: Toronto, ON, Canada

PostPosted: Thu Jun 10, 2021 9:50 pm
Reply with quote

ZTERMCS = 0697. It is not modifiable
In the settings the Terminal Type is "4" 3278A
Code:
line = 'Slash / Backslash \'
98984747E98A8464C889A98A84E7
39550E0D2312801021322312800D
----------------------------
SAY line
ECE4989844444444444444444444
2180395500000000000000000000
----------------------------

Hex value for backslash is E0
Back to top
View user's profile Send private message
Willy Jensen

Active User


Joined: 01 Sep 2015
Posts: 472
Location: Denmark

PostPosted: Fri Jun 11, 2021 12:40 am
Reply with quote

Well, you can set both codepage and charset with the ISPSTART command.
However I just tried ispstart panel(isr@prim) CHARSET(697) and I could not reproduce the problem.
I have screen format 3 (max) and terminal type 7 (3278CF). I tried term type 4 and still could not reproduce the problem.
Back to top
View user's profile Send private message
jerryte

Active User


Joined: 29 Oct 2010
Posts: 201
Location: Toronto, ON, Canada

PostPosted: Fri Jun 11, 2021 1:51 am
Reply with quote

I coded a simple COBOL program to DISPLAY a backslash. This works properly when run in batch but when run using TSO CALL within ISPF then the same issue. Somehow it is ISPF that is changing the character.
Back to top
View user's profile Send private message
Willy Jensen

Active User


Joined: 01 Sep 2015
Posts: 472
Location: Denmark

PostPosted: Fri Jun 11, 2021 1:54 am
Reply with quote

what happens when you run it from TSO READY (no ISPF)?
Back to top
View user's profile Send private message
jerryte

Active User


Joined: 29 Oct 2010
Posts: 201
Location: Toronto, ON, Canada

PostPosted: Fri Jun 11, 2021 1:59 am
Reply with quote

Willy Jensen wrote:
what happens when you run it from TSO READY (no ISPF)?
It displays the backslash.
It is ISPF that is translating the character but not sure why or where to fix this.
Back to top
View user's profile Send private message
Pedro

Global Moderator


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

PostPosted: Fri Jun 11, 2021 10:02 am
Reply with quote

Admittedly, I am weak on codepage issues because I remember only using codepage 037 (or was it 1047?). So I searched for ZTERMCS as was suggested by Willy.

I found these other variables that might come into play:
ZTERMCP (terminal code page)
ZTERMCS (terminal character set)
ZTERMCID (terminal CCSID)

What are your settings?
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 ISPF Panel commands DDLIST /LISTBOX TSO/ISPF 11
No new posts Am Getting a vertical line in ISPF SC... TSO/ISPF 3
No new posts ISPF Edit Macro with profile commands... TSO/ISPF 14
No new posts ISPF skeleton that has IF/THEN/DO sta... TSO/ISPF 15
No new posts RegEX search in ISPF editor TSO/ISPF 4
Search our Forums:

Back to Top