TABLE FILE ALL_LOGS
PRINT
LOGIN_DATE
LOGIN_MONTH
LOGIN_YEAR
LOGIN_DAY
LOG_STATE
SORT_DATE
OS_USERNAME
USERNAME
ALPHA_MONTH
MONTH
COMPUTE LCOUNTER/I3 = IF LOG_STATE EQ 'ON' THEN (LAST LCOUNTER + 1) ELSE (LAST LCOUNTER - 1);
COMPUTE ALPHA_MONTH/A3 = EDIT(LOGIN_MONTH);
COMPUTE MAXCURUSER/D3= LCOUNTER;
-*BY LOGIN_DATE
BY USERNAME
BY SORT_DATE NOPRINT
BY LOG_STATE NOPRINT
-*WHERE USERNAME EQ 'LMGS_PROD_APPUSER' OR 'AERO_PROD_APPUSER'
ON TABLE HOLD AS SORTED_LOGS
END
-*
-*
-***************************************************
-* Set up counter for multi users
-***************************************************
-*
-SET &COUNTER=1;
-SET &Multischema=&MASTER_SCHEMA;
-*
-*
-IF &Multischema.EXISTS THEN GOTO CHK4MUTLI ELSE GOTO DONEWMUTLI;
-*
-SET &MMultischema=&Multischema | ' , ' | &Multischema0;
-SET &MMultischema=MAX.&MMultischema;
-TYPE &MMultischema
-*
-*
-SET &Multischema=&Multischemas;
-CHK4MUTLI
-*
-*
-***************************************************
-* Set up output display format
-***************************************************
-*
-*
-IF &MASTER_OPUT EQ 'PPT' THEN GOTO TABLEFLD1;
-IF &MASTER_OPUT EQ 'EXCEL' THEN GOTO TABLEFLD1;
-IF &MASTER_OPUT EQ 'HTML' THEN GOTO GRAPHFLD1;
-*
-***************************************************
-* Run the graph for the full year, multi BA-BU report
-***************************************************
-*
-GRAPHFLD1
-*
GRAPH FILE SORTED_LOGS
-*
-INCLUDE header
-*
SUM
MAX.LCOUNTER AS 'Concurrent Users'
BY USERNAME AS 'User Names'
-*ACROSS LOGIN_MONTH AS 'Month'
ACROSS MONTH COLUMNS JAN AND FEB AND MAR AND APR AND MAY AND JUN AND JUL AND AUG AND SEP AND OCT AND NOV AND DEC
-*WHERE OS_USERNAME GT 2
-*
ON GRAPH SET LOOKGRAPH LINE
-*
-INCLUDE stylegraphyr
-*
-*
-GOTO MUTLIUSERCHK;
-*
-***************************************************
-* Display as Table *
-***************************************************
-*
-TABLEFLD1
-*
TABLE FILE SORTED_LOGS
-*
-INCLUDE header
-*
SUM
MAX.LCOUNTER AS 'Concurrent Users'
BY USERNAME AS 'User Names'
-*ACROSS LOGIN_MONTH AS 'Month'
ACROSS MONTH COLUMNS JAN AND FEB AND MAR AND APR AND MAY AND JUN AND JUL AND AUG AND SEP AND OCT AND NOV AND DEC
-*WHERE OS_USERNAME GT 2
-*
-INCLUDE output1
-*
-*
-GOTO MUTLIUSERCHK;
-*
-*
-***************************************************
-* Looping condition check for multi users *
-***************************************************
-*
-MUTLIUSERCHK
-*
-IF &&Multischemas0.EXISTS NE 1 THEN GOTO OUTLOOP;
-SET &COUNTER= &COUNTER+1;
-REPEAT CHK4MUTLI FOR &COUNTER FROM 2 TO &Multischema0;
-IF &Multischema0 GE 7 THEN GOTO OUTLOOP;
-OUTLOOP
-*
-DONEWMUTLI
-IF &Multischema0.EXISTS NE 1 THEN GOTO SKIPME;
-IF &Multischema0 LT 8 THEN GOTO SKIPME;
-SET &Multischema='Cannot List More Than 7';
-SKIPME
-*
-*
-IF &MASTER_OPUT EQ 'PPT' THEN GOTO NOOPDSPL;
-IF &MASTER_OPUT EQ 'EXCEL' THEN GOTO NOOPDSPL;
-IF &MASTER_OPUT EQ 'HTML' THEN GOTO OPDSPL;
-*
-OPDSPL
-*
-INCLUDE output1
-*
-NOOPDSPL
-*
-***************************************************
-* Display buttons and output format *
-***************************************************
-*
-*
-INCLUDE toggle_button1
-*
-*NCLUDE output1
-*
-EXIT
This does display, however, I only get one value to display only. Any Suggestions?
Thank you.
Production & Development: WebFocus 7.6.4