ED Instruction and Edit Masks

[bobguo]

Code: Select all

                         00000       85 HEXTAB   EQU   *-C'0'             
0000F0 F0F1F2F3F4F5F6F7              86          DC    C'0123456789ABCDEF'

Code: Select all

HEXTAB   DC    C'0123456789ABCDEF'

what's the differences between them?

[steve-myers]

See Convert binary to hexadecimal digits

[bobguo]

Code: Select all

00007E                0007E 000F0    18          ORG   MAIN+C'0'         
0000F0                000F0 000F0    19          ORG   ,

the last question:
what's the value of the memory from 00007E to 0000F0?
can we access it? (i think i have the answer to it, keep on using ORG to relocate location counter).
thanks.

[steve-myers]

• what's the value of the memory from 00007E to 0000F0?
  It's whatever the Binder decides to put there; it's not defined.
• can we access it?
  Yes, but since it may not exist, you shouldn't try it. Consider

  Code: Select all

  PGM1     CSECT
         USING *,15
         SAVE  (14,1)
         TR    DATA,HEXTAB
         LA    0,L'DATA
         LA    1,DATA
         TPUT  (1),(0),R
         RETURN (14,1),RC=0
DATA     DC    X'F0FAFBF0'
         ORG   PGM1+C'0'
         ORG   ,
HEXTAB   EQU   *-C'0'
         DC    C'0123456789ABCDEF'
         END   ,
  and

  Code: Select all

  PGM2     CSECT
         USING *,15
         SAVE  (14,1)
         TR    DATA,HEXTAB
         LA    0,L'DATA
         LA    1,DATA
         TPUT  (1),(0),R
         RETURN (14,1),RC=0
         DC    100C'BLAH BLAH BLAH  '
DATA     DC    X'F0FAFBF0'
         ORG   PGM2+C'0'
         ORG   ,
HEXTAB   EQU   *-C'0'
         DC    C'0123456789ABCDEF'
         END   ,

  The point of the two ORG instructions before the HEXTAB definition is to make sure HEXTAB is addressable. There is empty space between DATA and the active part of HEXTAB in PGM1, but none in PGM2 Both programs assemble and run.

[bobguo]

though i have caught what this program's general purpose, but as one HLASM beginner, i don't know how to check its result.
under jes2, i can't see anything about it, or can somebody tell me how to refer to the message, which appeared on the terminal, sent by TPUT?
thanks.

[bobguo]

another one similar question, if i issued
WTO 'HELLO WORLD'
in the HLASM program, where can i find 'HELLO WORLD' appeared?

[steve-myers]

under jes2, i can't see anything about it, or can somebody tell me how to refer to the message, which appeared on the terminal, sent by TPUT?

The TSO terminal operator running the program. The TPUT macro is the lowest level macro that a program running in the TSO environment can use to display output at the terminal of the TSO user running the program. A TPUT macro issued by a batch program will not display anywhere.

WTO 'HELLO WORLD'
in the HLASM program, where can i find 'HELLO WORLD' appeared?

• In the JES2 JESMSGLG data set for the JES2 job running the program that issued the WTO macro.
• In the SYSLOG data set for the system where the job was run.