Hello Rick,
Here is a REXX that I used to calculate the addresses on the z/VSE USSTAB. Works well. Mike Pace sent this to the list. Here's a rexx exec I use to calculate HEX address from a given row and column /* ********* ******************************************************** *\ Name: BUFADDR Version: 1.0 Author: M.Pace Function: Calculate the buffer address from a row and column Comments: This is for a 80 column screen only. History: \* ********* ******************************************************** */ arg row col buffaddr = ((row - 1) * 80) + (col - 1) hex = d2x(buffaddr) bin = x2b(hex) bin8 = right(bin,12,'0') h1 = '11' || right(bin8,6) h2 = '11' || left(bin8,6) b1 = b2x(h1) b2 = b2x(h2) say b2 b1 exit 0 Ed Martin Aultman Health Foundation 330-363-5050 ext 35050 -----Original Message----- From: The IBM z/VM Operating System [mailto:[email protected]] On Behalf Of Alan Altmark Sent: Thursday, October 21, 2010 4:00 PM To: [email protected] Subject: Re: VTAM USSMSG10 buffer location assistance On Thursday, 10/21/2010 at 02:23 EDT, Rick Barlow <[email protected]> wrote: > I am looking for someone who can point me to a reference that might help me to > modify a USSMSG10 screen that is coded using screen buffer locations. Before > anyone comments on still having VTAM on VM, let me say that the reason we are > doing this is to add a message to the screen to inform the users that VTAM is > going away - soon. I know that the declarations probably include a 3270 data > stream command and a location within the screen buffer. I am trying to locate > documentation that might help. I am including a brief code snippet. > > DC X'11C14F1D60' Line 2 Col 1 Normal > DC C'@' > DC X'11C16F' Line 2 Col 32 > DC C'DATA CENTER NORTH' > * > DC X'11C2F7' Line 3 Col 24 > DC C'TEST AND DEVELOPMENT SYSTEM (CDC)' > > Can anyone point me to documentation or a possible contact who might be able to > steer me in the right direction?
