Highlighted
Absent Member.
Absent Member.
192 views

[archive] Screen displays and c$system calls

[Migrated content. Thread originally posted on 27 May 2008]

Hello
Will system calls affect screen displays?
In the following perform loop a counter is incremented and displayed on a floating screen. When I add a system call to the loop the counter stays at 1 on the screen even thought is is being incremented in the loop. Any ideas on why this is happening?
Thanks.
perform acu-waitscrn-scrn.
move 0 to emo-records
perform with test after until filename = spaces
add 1 to emo-records
modify waitscrn-la-2, title = emo-records
call "C$system" using vbprog, "8"
giving vbprog-status
end-call
if vbprog-status not = 0
display message box
"vb program failed " vbprog-status
end-if
end-perform.
destroy waitscrn-handle.
0 Likes
2 Replies
Highlighted
Absent Member.
Absent Member.

RE: [archive] Screen displays and c$system calls

I see you are calling system with "8". When using C$SYSTEM calls we make a habit of calling like so:

CALL "C$SYSTEM"
USING CMD-LINE, 96
GIVING EXIT-STATUS
END-CALL.

Where 96 is made up of the following:

CSYS-HIDDEN (value 32)
CSYS-SHELL (value 64)

Try using some of the other flags to see if you can supress any of the I/O that may be caused by the system call...
0 Likes
Highlighted
Absent Member.
Absent Member.

RE: [archive] Screen displays and c$system calls

Thanks, Mikalodeon
I have tried most of the other flags without success. I will give 96 a try.
0 Likes
The opinions expressed above are the personal opinions of the authors, not of Micro Focus. By using this site, you accept the Terms of Use and Rules of Participation. Certain versions of content ("Material") accessible here may contain branding from Hewlett-Packard Company (now HP Inc.) and Hewlett Packard Enterprise Company. As of September 1, 2017, the Material is now offered by Micro Focus, a separately owned and operated company. Any reference to the HP and Hewlett Packard Enterprise/HPE marks is historical in nature, and the HP and Hewlett Packard Enterprise/HPE marks are the property of their respective owners.