Hello everybody;
Is anyone knowing about this variable. This is in MVS environment ?

This message has been edited. Last edited by: Kerry,

Philippe,

Sorry, never heard of &FOCUOPC. However &FOCCPU exists. Also, it is not found in the documentation.

quote:

FOCCPU

I found this mainframe program in a dusty corner of my library:

-SET &CPU1 = &FOCCPU;

EXEC PROGRAMME
-RUN

-SET &CPU2 = &FOCCPU;

-SET &TOTCPU = (&CPU2 - &CPU1);
-SET &SECCPU = &TOTCPU / 1000;
-SET &CPUDEC = &TOTCPU - (&SECCPU * 1000);
-SET &MINCPU = &SECCPU / 60;
-SET &SECCPU = &SECCPU - (&MINCPU * 60);

-TYPE TEMPS CPU : &MINCPU MIN. &SECCPU,&CPUDEC SEC.

It appears &FOCCPU is the current time in milliseconds.

I also found it mentioned in the PDF version of the FOCUS for mainframe documentation:

FOCUS for Mainframe > Developing Applications (Version 7 Release 3) > Managing Flow of Control in an Application > Using Variables in a Procedure > System Variables

"&FOCCPU - milliseconds - Calculates the OS CPU time, for MVS only. In CMS, this returns the same value as &FOCTTIME"