Tek-Tips is the largest IT community on the Internet today!

Members share and learn making Tek-Tips Forums the best source of peer-reviewed technical information on the Internet!

  • Congratulations TouchToneTommy on being selected by the Tek-Tips community for having the most helpful posts in the forums last week. Way to Go!

Rexx display spinner

Status
Not open for further replies.

iadithot

Programmer
Jul 24, 2006
18
US
I am very new to Rexx programming. But thanks to your forum I am slowly making progress.

While I am looping through the edits I want to display a count of the number of changes so the user can see that the macro is still running. I am using a simple SAY command to display the count. The problem is when there are hundreds of changes. The users get inundated with pages and pages of counts.

Is there a way to make successive SAY commands display on the same line on the users terminal?

Thanks for any help.

Kirby Haley
 
There is with ISPF DISPLAY facilities. The method is to CONTROL DISPLAY LOCK the display:
Code:
   "ADDPOP ROW(5) COLUMN(5)"
   do clx = 1 to 450
      "CONTROL DISPLAY LOCK"
      "DISPLAY PANEL(COUNTER)"
   end
   "REMPOP"

Panel COUNTER looks like
Code:
)ATTR
    +  TYPE(TEXT)
    %  TYPE(OUTPUT)   INTENS(HIGH)
)BODY WINDOW(9,3)
+
%CLX
+
)END

Frank Clarke
Tampa Area REXX Programmers' Alliance
REXX Language Assn Listmaster
 
Thanks Frank. I'm an application programmer not a system programmer. So I have not programmed the ISPF Panels before. As soon as I read up in them I'll give your suggestion a try.

I'm assuming the place to learn about the ISPF Panels is the ISPF Users Guide. Does anyone know of a better source?
 
The 'Dialog Developer's Guide' and 'ISPF Services'.

The first explains all about building panels, skeletons, etc; the second reveals how to crank them.


Frank Clarke
Tampa Area REXX Programmers' Alliance
REXX Language Assn Listmaster
 
Status
Not open for further replies.

Part and Inventory Search

Sponsor

Back
Top