******************************************
* DATE: 04/22/91 TIME: 13:41:46
* PROFILER Author: F. C. Wampler
* Copyright (c) F. C. Wampler 1991
* Lag Correction: 0.0044
******************************************
 BIGMENU    3   0.086 SET PROCEDURE TO LIB.PRG
 BIGMENU    4   0.056 DO WORKLOG
Lapsed time BIGMENU Module: 0.141 sec. Line count: 2 (Lines/sec: 14.1)
 WORKLOG  227   0.058 SET TALK OFF
 WORKLOG  228   0.002 SET SAFETY OFF
 WORKLOG  229   0.005 DO startlog
Lapsed time WORKLOG Module: 0.064 sec. Line count: 3 (Lines/sec: 47.0)
 STARTLOG  206   0.060 use sys_info
 STARTLOG  207   0.002 if !ok
 STARTLOG  212   0.011 repl date with date()
 STARTLOG  213   0.007 use
 STARTLOG  214   0.002 return
Lapsed time STARTLOG Module: 0.080 sec. Line count: 5 (Lines/sec: 62.5)
 WORKLOG  230   0.005 SET CLOCK ON
 WORKLOG  231   0.099 DO help_on
Lapsed time WORKLOG Module: 0.103 sec. Line count: 2 (Lines/sec: 19.3)
Lapsed time BIGMENU.PRG: 0.441 sec. (Time Uncorrected)
 HELP_ON  438   0.003 PUBLIC helpfile,F1,F10
 HELP_ON  440   0.002 f10="ON KEY LABEL F10 keyboard chr(23)"
 HELP_ON  441   0.031 &f10
 HELP_ON  442   0.001 helpfile=[help]  &&(the name of your HELP DATABASE)
 HELP_ON  443   0.162 SET HELP TO &helpfile
 HELP_ON  445   0.001 DO userhelp WITH helpfile,PROGRAM(),alias(),UPPER(VARREAD())"
 HELP_ON  446   0.028 &f1
 HELP_ON  448   0.017 DO PUTHELP WITH helpfile,PROGRAM(),alias(),UPPER(VARREAD())
Lapsed time HELP_ON Module: 0.242 sec. Line count: 8 (Lines/sec: 33.0)
Lapsed time LIB.PRG: 0.277 sec. (Time Uncorrected)
 WORKLOG  232   0.002 mcolor=[w+/BG,N+/BG,n/BG,N/BG,N/w*,W+/N,W+/gb,w+/n,W+/N*,W/N*,+]
 WORKLOG  233   0.172 DEFINE POPUP worklog FROM 03,25 SHADOW COLOR &mcolor
 WORKLOG  234   0.004 DEFINE BAR  1 OF worklog PROMPT "\   SELECT " MESSAGE ""
 WORKLOG  235   0.002 DEFINE BAR  2 OF worklog PROMPT "\- " MESSAGE ""
 WORKLOG  236   0.002 DEFINE BAR  3 OF worklog PROMPT " \<WORK LOG " MESSAGE "Work with daily log."
 WORKLOG  237   0.003 DEFINE BAR  4 OF worklog PROMPT " \<REPORTS " MESSAGE "Print reports."
 WORKLOG  238   0.002 DEFINE BAR  5 OF worklog PROMPT "\- " MESSAGE ""
 WORKLOG  239   0.003 DEFINE BAR  6 OF worklog PROMPT "\- " MESSAGE ""
 WORKLOG  240   0.003 DEFINE BAR  7 OF worklog PROMPT "\- " MESSAGE ""
 WORKLOG  241   0.003 DEFINE BAR  8 OF worklog PROMPT " \<MAINTENANCE " MESSAGE "Reindex database - takes a while."
 WORKLOG  242   0.004 DEFINE BAR  9 OF worklog PROMPT "\- " MESSAGE ""
 WORKLOG  243   0.002 DEFINE BAR 10 OF worklog PROMPT "\- " MESSAGE ""
 WORKLOG  244   0.003 DEFINE BAR 11 OF worklog PROMPT "\- " MESSAGE ""
 WORKLOG  245   0.004 DEFINE BAR 12 OF worklog PROMPT "\- " MESSAGE ""
 WORKLOG  246   0.003 DEFINE BAR 13 OF worklog PROMPT "\- " MESSAGE ""
 WORKLOG  247   0.003 DEFINE BAR 14 OF worklog PROMPT "\- " MESSAGE ""
 WORKLOG  248   0.003 DEFINE BAR 15 OF worklog PROMPT " \<QUIT " MESSAGE ""
 WORKLOG  249   0.039 ON SELECTION POPUP worklog DEACTIVATE POPUP
 WORKLOG  250   0.002 DO WHILE .T.
 WORKLOG  251   0.059 DO clrscr WITH 'g'
Lapsed time WORKLOG Module: 0.310 sec. Line count: 20 (Lines/sec: 64.5)
Lapsed time BIGMENU.PRG: 0.398 sec. (Time Uncorrected)
 CLRSCR   15   0.003 IF param()=0
 CLRSCR   18   0.001 oldcolor=set('color')
 CLRSCR   19   0.002 xcolor=LEFT(oldcolor,AT('/',oldcolor))+xcolor
 CLRSCR   20   0.024 SET COLOR TO &xcolor
 CLRSCR   21   0.021 CLEAR
 CLRSCR   22   0.017 SET COLOR TO &oldcolor
 CLRSCR   23   0.029 RETURN []
Lapsed time CLRSCR Module: 0.094 sec. Line count: 7 (Lines/sec: 74.3)
Lapsed time LIB.PRG: 0.125 sec. (Time Uncorrected)
 WORKLOG  252   1.089 ACTIVATE POPUP worklog
 WORKLOG  252   0.006 ACTIVATE POPUP worklog
 WORKLOG  253   0.001 mcholog = BAR()
 WORKLOG  254   0.002 DO CASE
 WORKLOG  255   0.001 CASE LASTKEY()=27
 WORKLOG  257   0.001 CASE mcholog =  1
 WORKLOG  259   0.002 CASE mcholog =  2
 WORKLOG  261   0.001 CASE mcholog =  3
 WORKLOG  263   0.035 DO workmain
Lapsed time WORKLOG Module: 1.134 sec. Line count: 9 (Lines/sec: 7.9)
 WORKMAIN  313   0.002 CLEAR WIND
 WORKMAIN  314   0.002 SET DELE ON
 WORKMAIN  315   0.025 SET TALK OFF
 WORKMAIN  316   0.002 SET SAFETY OFF
 WORKMAIN  317   0.004 SET COLOR TO /bg,,r
 WORKMAIN  318   0.002 SET COLOR of SCHEME 10 TO gr+/n,gr+/b,g+/b,gr+/n,w/b
 WORKMAIN  319   0.020 CLEAR
 WORKMAIN  320   0.072 = zero_fun()
Lapsed time WORKMAIN Module: 0.126 sec. Line count: 8 (Lines/sec: 63.5)
Lapsed time BIGMENU.PRG: 1.335 sec. (Time Uncorrected)
 ZERO_FUN  636   0.017 FOR i=1 to fkmax()
 ZERO_FUN  637   0.068 SET FUNC i TO []
 ZERO_FUN  638   0.016 ENDFOR
 ZERO_FUN  637   0.041 SET FUNC i TO []
 ZERO_FUN  638   0.015 ENDFOR
 ZERO_FUN  637   0.039 SET FUNC i TO []
 ZERO_FUN  638   0.016 ENDFOR
 ZERO_FUN  637   0.040 SET FUNC i TO []
 ZERO_FUN  638   0.016 ENDFOR
 ZERO_FUN  637   0.039 SET FUNC i TO []
 ZERO_FUN  638   0.015 ENDFOR
 ZERO_FUN  637   0.041 SET FUNC i TO []
 ZERO_FUN  638   0.016 ENDFOR
 ZERO_FUN  637   0.039 SET FUNC i TO []
 ZERO_FUN  638   0.016 ENDFOR
 ZERO_FUN  637   0.039 SET FUNC i TO []
 ZERO_FUN  638   0.016 ENDFOR
 ZERO_FUN  637   0.039 SET FUNC i TO []
 ZERO_FUN  638   0.016 ENDFOR
 ZERO_FUN  637   0.038 SET FUNC i TO []
 ZERO_FUN  638   0.016 ENDFOR
 ZERO_FUN  637   0.040 SET FUNC i TO []
 ZERO_FUN  638   0.016 ENDFOR
 ZERO_FUN  637   0.039 SET FUNC i TO []
 ZERO_FUN  638   0.015 ENDFOR
 ZERO_FUN  639   0.044 RETURN []
Lapsed time ZERO_FUN Module: 0.742 sec. Line count: 26 (Lines/sec: 35.0)
Lapsed time LIB.PRG: 0.856 sec. (Time Uncorrected)
 WORKMAIN  321   0.018 =INSMODE(.t.)
 WORKMAIN  322   0.015 =NUMLOCK(.f.)
 WORKMAIN  323   0.016 =CAPSLOCK(.f.)
 WORKMAIN  324   0.024 ON KEY LABEL F2 SHOW WINDOW one
 WORKMAIN  325   0.010 ON KEY LABEL F3 SHOW WINDOW two
 WORKMAIN  326   0.011 ON KEY LABEL F4 SHOW WINDOW three
 WORKMAIN  327   0.010 ON KEY LABEL F5 SHOW WINDOW four
 WORKMAIN  328   0.001 F5=[on key label f5 show window four]
 WORKMAIN  329   0.011 ON KEY LABEL F6 SHOW WINDOW EDIT
 WORKMAIN  330   0.011 ON KEY LABEL F7 SHOW WINDOW FIND
 WORKMAIN  331   0.011 ON KEY LABEL F8 SHOW WINDOW five
 WORKMAIN  332   0.009 ON KEY LABEL F9 SHOW WINDOW add
 WORKMAIN  333   0.011 ON KEY LABEL F10 SHOW WINDOW QUIT
 WORKMAIN  334   0.012 ON KEY LABEL ctrl-pgup GO TOP
 WORKMAIN  335   0.012 ON KEY LABEL ctrl-pgdn GO bott
 WORKMAIN  336   0.010 ON KEY LABEL ctrl-A SHOW WINDOW six
 WORKMAIN  337   0.012 ON KEY LABEL ctrl-M SHOW WINDOW seven
 WORKMAIN  338   0.026 DO defwnd
Lapsed time WORKMAIN Module: 0.223 sec. Line count: 18 (Lines/sec: 80.7)
 DEFWND  683   0.006 DEFINE WINDOW attop FROM 0,0 TO 0,79 NONE COLOR W+/b
 DEFWND  685  -0.048 COLOR w+/g,,g/g NONE
 DEFWND  687   0.068 COLOR w+/g,,g/g NONE
 DEFWND  689   0.002 COLOR w+/g,,g/g NONE
 DEFWND  691   0.002 COLOR w+/g,,g/g NONE
 DEFWND  693   0.002 COLOR w+/rg,,/r SHAD NONE
 DEFWND  695   0.002 COLOR w+/rg,,/r NONE SHAD
 DEFWND  696   0.002 DEFINE WINDOW add FROM 3,55 TO 3,64 COLOR w+/r,,/r NONE SHAD
 DEFWND  698   0.002 COLOR w+/g,,g/g NONE SHAD
 DEFWND  700   0.003 COLOR w+/g,,g/g NONE
 DEFWND  702   0.002 COLOR w+/g,,g/g NONE
 DEFWND  704   0.003 COLOR w+/g,,g/g NONE
 DEFWND  705   0.006 ACTI WINDOW attop
 DEFWND  706   0.003 ?? [F1=HELP ^PgUp=Top ^PgDn=Bottom]
 DEFWND  707   0.004 ACTI WINDOW one
 DEFWND  708   0.003 ?? [ F2 Work log]
 DEFWND  709   0.004 ACTI WINDOW two
 DEFWND  710   0.002 ??[ F3 Charges]
 DEFWND  711   0.004 ACTI WINDOW three
 DEFWND  712   0.003 ??[ F4 Employee]
 DEFWND  713   0.004 ACTI WINDOW four
 DEFWND  714   0.003 ??[ F5 Tests]
 DEFWND  715   0.003 ACTI WINDOW five
 DEFWND  716   0.002 ??[ F8 Active]
 DEFWND  717   0.002 ACTI WINDOW six NOSHOW
 DEFWND  718   0.004 ?? [List Test ^A]
 DEFWND  719   0.004 ACTI WINDOW EDIT
 DEFWND  720   0.002 ?? [ F6 Edit ]
 DEFWND  721   0.004 ACTI WINDOW QUIT
 DEFWND  722   0.002 ?? [ F10 Quit]
 DEFWND  723   0.005 ACTI WINDOW FIND
 DEFWND  724   0.002 ?? [ F7 Find]
 DEFWND  725   0.005 ACTI WINDOW add
 DEFWND  726   0.003 ?? [ F9 Add]
 DEFWND  727   0.004 ACTI WINDOW seven
 DEFWND  728   0.002 ?? [ ^M Menu ]
 DEFWND  729   0.001 ACTI SCREEN
 DEFWND  730   0.121 RETURN
Lapsed time DEFWND Module: 0.233 sec. Line count: 38 (Lines/sec: 163.2)
 WORKMAIN  339   0.008 CLOSE DATA
 WORKMAIN  340   0.005 SELE 0
 WORKMAIN  341   0.056 USE listtest
 WORKMAIN  342   0.012 REPL ALL include WITH .f.
 WORKMAIN  344   0.056 SET INDEX TO listtest
 WORKMAIN  345   0.003 SELE 0
 WORKMAIN  346   0.089 USE labtest
 WORKMAIN  348   0.069 SET INDEX TO labtest
 WORKMAIN  349   0.002 SELE 0
 WORKMAIN  350   0.029 USE charge
 WORKMAIN  351   0.002 SELE 0
 WORKMAIN  352   0.069 USE worklog
 WORKMAIN  354   0.066 SET INDEX TO ftrl
 WORKMAIN  355   0.045 GO bott
 WORKMAIN  356   0.001 lastnum=ftrl
 WORKMAIN  357   0.121 SKIP -7
 WORKMAIN  358   0.001 SELE 0
 WORKMAIN  359   0.048 USE employee
 WORKMAIN  360   0.015 SELE labtest
 WORKMAIN  361   0.004 currwind=[WORK LOG]
 WORKMAIN  362   0.001 lastwind=currwind
 WORKMAIN  363   0.001 DO WHILE .t.
 WORKMAIN  364   0.001 DO CASE
 WORKMAIN  365   0.003 CASE !WEXIST(currwind)
 WORKMAIN  366   0.002 IF !WEXIST([WORK LOG])
 WORKMAIN  367   0.033 DO worktmp
Lapsed time WORKMAIN Module: 0.732 sec. Line count: 26 (Lines/sec: 35.5)
 WORKTMP  517   0.004 SELE worklog
 WORKTMP  518   0.004 DEFINE WINDOW temp FROM 4,0 TO 15,79 FLOAT GROW SYST ZOOM
 WORKTMP  549   0.803 WINDOW temp NOWAIT COLOR SCHEME 10 TITLE [WORK LOG] SAVE NOEDIT
 WORKTMP  550   0.118 RELEA WINDOW temp
 WORKTMP  551   0.001 currwind=[WORK LOG]
 WORKTMP  552   0.035 RETURN
Lapsed time WORKTMP Module: 0.963 sec. Line count: 6 (Lines/sec: 6.2)
 WORKMAIN  368   0.001 ENDIF
 WORKMAIN  369   0.003 IF !WEXIST([CHARGE CODES])
 WORKMAIN  370   0.006 DO chgtmp
Lapsed time WORKMAIN Module: 0.009 sec. Line count: 3 (Lines/sec: 340.9)
 CHGTMP  555   0.002 SELE charge
 CHGTMP  556   0.002 DEFINE WINDOW temp FROM 16,0 TO 24,38 FLOAT GROW SYST ZOOM
 CHGTMP  560   0.136 WINDOW temp NOWAIT COLOR SCHEME 10 TITLE [CHARGE CODES] SAVE
 CHGTMP  561   0.028 RELEA WINDOW temp
 CHGTMP  562   0.002 currwind=[CHARGE]
 CHGTMP  563   0.028 RETURN
Lapsed time CHGTMP Module: 0.196 sec. Line count: 6 (Lines/sec: 30.6)
 WORKMAIN  371   0.002 ENDIF
 WORKMAIN  372   0.003 IF !WEXIST([TESTS REQUIRED])
 WORKMAIN  373   0.009 DO labtmp
Lapsed time WORKMAIN Module: 0.013 sec. Line count: 3 (Lines/sec: 234.3)
 LABTMP  590   0.003 SELE labtest
 LABTMP  591   0.003 DEFINE WINDOW temp FROM 16,0 TO 24,38 FLOAT GROW SYST ZOOM
 LABTMP  597   0.179 SAVE
 LABTMP  598   0.029 RELEA WINDOW temp
 LABTMP  599   0.001 currwind=[TESTS REQUIRED]
 LABTMP  600   0.029 RETURN
Lapsed time LABTMP Module: 0.242 sec. Line count: 6 (Lines/sec: 24.8)
 WORKMAIN  374   0.002 ENDIF
 WORKMAIN  375   0.002 IF !WEXIST([LIST TEST])
 WORKMAIN  376   0.006 DO listtmp
Lapsed time WORKMAIN Module: 0.009 sec. Line count: 3 (Lines/sec: 340.9)
 LISTTMP  603   0.003 SELE listtest
 LISTTMP  604   0.002 DEFINE WINDOW temp FROM 16,40 TO 24,79 FLOAT GROW SYST ZOOM
 LISTTMP  608   0.232 WINDOW temp NOWAIT  TITLE [LIST TEST] SAVE COLOR n/bg,,gr+/n,,w/n
 LISTTMP  609   0.027 RELEA WINDOW temp
 LISTTMP  610   0.074 currwind=[LIST TEST]
Lapsed time LISTTMP Module: 0.336 sec. Line count: 5 (Lines/sec: 14.8)
 WORKMAIN  377   0.002 ENDIF
 WORKMAIN  378   0.003 IF !WEXIST([EMPLOYEE])
 WORKMAIN  379   0.007 DO emptmp
Lapsed time WORKMAIN Module: 0.011 sec. Line count: 3 (Lines/sec: 277.7)
 EMPTMP  566   0.002 SELE employee
 EMPTMP  567   0.002 DEFINE WINDOW temp FROM 16,40 TO 24,79 FLOAT GROW SYST ZOOM
 EMPTMP  584   0.274 WINDOW temp NOWAIT COLOR SCHEME 10 TITLE [EMPLOYEE] SAVE
 EMPTMP  585   0.028 RELEA WINDOW temp
 EMPTMP  586   0.002 currwind=[EMPLOYEE]
 EMPTMP  587   0.015 RETURN
Lapsed time EMPTMP Module: 0.321 sec. Line count: 6 (Lines/sec: 18.7)
 WORKMAIN  380   0.002 ENDIF
 WORKMAIN  381   0.001 currwind=lastwind
 WORKMAIN  382   0.002 LOOP
 WORKMAIN  364   0.002 DO CASE
 WORKMAIN  365   0.003 CASE !WEXIST(currwind)
 WORKMAIN  383   0.001 CASE currwind=[WORK LOG]
 WORKMAIN  384   0.001 SELE worklog
 WORKMAIN  385   0.007 HIDE WINDOW tests
 WORKMAIN  386   0.008 HIDE WINDOW LIST
 WORKMAIN  387   0.030 HIDE WINDOW six
 WORKMAIN  388   0.042 SHOW WINDOW WORK TOP
 WORKMAIN  389   0.001 lastwind=UPPER(WONTOP())
 WORKMAIN  390   0.030 BROWSE last
 WORKMAIN  390   0.067 BROWSE last
 WORKMAIN  390   3.698 BROWSE last
 WORKMAIN  391   0.001 CASE currwind=[CHARGE CODES]
 WORKMAIN  396   0.001 CASE currwind=[TESTS REQUIRED]
 WORKMAIN  415   0.001 CASE currwind=[EMPLOYEE]
 WORKMAIN  420   0.002 CASE currwind=[LIST TEST]
 WORKMAIN  426   0.001 OTHERWISE
 WORKMAIN  429   0.002 ENDCASE
 WORKMAIN  430   0.003 IF !WEXIST(lastwind)
 WORKMAIN  433   0.002 currwind=UPPER(WONTOP())
 WORKMAIN  434   0.001 DO CASE
 WORKMAIN  435   0.002 CASE currwind=[ONE]
 WORKMAIN  437   0.001 CASE currwind=[TWO]
 WORKMAIN  439   0.001 CASE currwind=[THREE]
 WORKMAIN  441   0.001 CASE currwind=[FOUR]
 WORKMAIN  443   0.002 CASE currwind=[FIVE]
 WORKMAIN  446   0.001 CASE currwind=[SIX]
 WORKMAIN  449   0.002 CASE currwind=[ADD]
 WORKMAIN  469   0.002 CASE currwind=[EDIT]
 WORKMAIN  480   0.001 CASE currwind=[SEVEN]
 WORKMAIN  481   0.002 currwind=lastwind
 WORKMAIN  482   0.066 DO optmenu
Lapsed time WORKMAIN Module: 3.976 sec. Line count: 35 (Lines/sec: 8.8)
 OPTMENU  792   0.018 DEFINE POPUP optmenu FROM 03,60 SHADOW &&COLOR SCHEME 2
 OPTMENU  793   0.003 DEFINE BAR  1 OF optmenu PROMPT "\     SELECT " MESSAGE ""
 OPTMENU  794   0.002 DEFINE BAR  2 OF optmenu PROMPT "\- " MESSAGE ""
 OPTMENU  795   0.002 DEFINE BAR  3 OF optmenu PROMPT " \<WORK LOG " MESSAGE ""
 OPTMENU  796   0.002 DEFINE BAR  4 OF optmenu PROMPT " \<CHARGES " MESSAGE ""
 OPTMENU  797   0.002 DEFINE BAR  5 OF optmenu PROMPT " \<EMPLOYEE " MESSAGE ""
 OPTMENU  798   0.004 DEFINE BAR  6 OF optmenu PROMPT " \<TESTS REQUIRED " MESSAGE ""
 OPTMENU  799   0.002 DEFINE BAR  7 OF optmenu PROMPT " \<LIST OF TESTS " MESSAGE ""
 OPTMENU  800   0.001 if !lastwind=[TESTS REQUIRED]
 OPTMENU  801   0.002 DEFINE BAR  8 OF optmenu PROMPT " E\<DIT "+lastwind MESSAGE ""
 OPTMENU  802   0.001 endif
 OPTMENU  803   0.003 DEFINE BAR  9 OF optmenu PROMPT " \<ADD "+lastwind MESSAGE ""
 OPTMENU  804   0.001 IF lastwind=[LIST TEST]
 OPTMENU  807   0.002 DEFINE bar 10 of optmenu PROMPT "\-"
 OPTMENU  808   0.001 ENDIF
 OPTMENU  809   0.002 DEFINE BAR 11 OF optmenu PROMPT "\- " MESSAGE ""
 OPTMENU  810   0.039 DEFINE BAR 12 OF optmenu PROMPT "\- " MESSAGE ""
 OPTMENU  811   0.002 DEFINE BAR 13 OF optmenu PROMPT "\- " MESSAGE ""
 OPTMENU  812   0.003 DEFINE BAR 14 OF optmenu PROMPT "\- " MESSAGE ""
 OPTMENU  813   0.003 DEFINE BAR 15 OF optmenu PROMPT "\- " MESSAGE ""
 OPTMENU  814   0.003 DEFINE BAR 16 OF optmenu PROMPT "\- " MESSAGE ""
 OPTMENU  815   0.003 DEFINE BAR 17 OF optmenu PROMPT " \<QUIT " MESSAGE ""
 OPTMENU  816   0.067 ON SELECTION POPUP optmenu DEACTIVATE POPUP
 OPTMENU  818   0.001 DO WHILE .T.
 OPTMENU  819   2.573 ACTIVATE POPUP optmenu TOP
 OPTMENU  819   0.009 ACTIVATE POPUP optmenu TOP
 OPTMENU  820   0.002 mchoopt = BAR()
 OPTMENU  821   0.001 DO CASE
 OPTMENU  822   0.002 CASE LASTKEY()=27
 OPTMENU  824   0.001 CASE mchoopt =  1
 OPTMENU  826  -0.000 CASE mchoopt =  2
 OPTMENU  828   0.005 CASE mchoopt =  3
 OPTMENU  832   0.001 CASE mchoopt =  4
 OPTMENU  836   0.001 CASE mchoopt =  5
 OPTMENU  840   0.001 CASE mchoopt =  6
 OPTMENU  844  -0.000 CASE mchoopt =  7
 OPTMENU  848   0.005 CASE mchoopt =  8
 OPTMENU  859   0.002 CASE mchoopt =  9
 OPTMENU  861   0.001 DO CASE
 OPTMENU  862   0.001 CASE lastwind=[LIST TEST]
 OPTMENU  864   0.001 CASE lastwind=[WORK LOG]
 OPTMENU  865   0.002 APPEND BLANK
 OPTMENU  869   0.021 charge WITH charge.charge
Lapsed time OPTMENU Module: 2.781 sec. Line count: 43 (Lines/sec: 15.4)
Lapsed time BIGMENU.PRG: 10.926 sec. (Time Uncorrected)
 MAKEID  465   0.005 RETURN sqz(VAL(int_id()))
Lapsed time MAKEID Module: 0.005 sec. Line count: 1 (Lines/sec: 217.3)
 INT_ID  456   0.004 id=LTRIM(STR(DATE()-CTOD([07/04/87]))) +LTRIM(STR(second()*10,6))
 INT_ID  457   0.014 RETURN m.id
Lapsed time INT_ID Module: 0.017 sec. Line count: 2 (Lines/sec: 116.2)
 SQZ  562   0.002 PRIVATE cntr,retval,workval
 SQZ  563   0.003 IF TYPE('num')=[C]
 SQZ  571   0.002 retval=[]
 SQZ  572   0.002 workval=num
 SQZ  573   0.001 cntr=1
 SQZ  574   0.001 DO WHILE cntr<=4
 SQZ  575   0.002 retval=CHR(MOD(workval,221)+33)+retval
 SQZ  576   0.001 workval=INT(workval/221)
 SQZ  577  -0.000 cntr=cntr+1
 SQZ  578   0.002 ENDDO
 SQZ  575   0.001 retval=CHR(MOD(workval,221)+33)+retval
 SQZ  576   0.002 workval=INT(workval/221)
 SQZ  577   0.002 cntr=cntr+1
 SQZ  578   0.001 ENDDO
 SQZ  575   0.003 retval=CHR(MOD(workval,221)+33)+retval
 SQZ  576   0.001 workval=INT(workval/221)
 SQZ  577   0.001 cntr=cntr+1
 SQZ  578  -0.000 ENDDO
 SQZ  575   0.001 retval=CHR(MOD(workval,221)+33)+retval
 SQZ  576   0.001 workval=INT(workval/221)
 SQZ  577   0.002 cntr=cntr+1
 SQZ  578  -0.000 ENDDO
 SQZ  579   0.001 ENDIF
 SQZ  580   0.007 RETURN (m.retval)
Lapsed time SQZ Module: 0.029 sec. Line count: 24 (Lines/sec: 816.3)
Lapsed time LIB.PRG: 0.170 sec. (Time Uncorrected)
 OPTMENU  870   0.002 lastnum=ftrl
 OPTMENU  871   0.002 DO labtmp
Lapsed time OPTMENU Module: 0.003 sec. Line count: 2 (Lines/sec: 625.0)
 LABTMP  590   0.216 SELE labtest
 LABTMP  591   0.003 DEFINE WINDOW temp FROM 16,0 TO 24,38 FLOAT GROW SYST ZOOM
 LABTMP  597   0.446 SAVE
 LABTMP  598   0.080 RELEA WINDOW temp
 LABTMP  599   0.002 currwind=[TESTS REQUIRED]
 LABTMP  600   0.040 RETURN
Lapsed time LABTMP Module: 0.785 sec. Line count: 6 (Lines/sec: 7.6)
 OPTMENU  872   0.002 CASE lastwind=[CHARGE CODES]
 OPTMENU  874   0.001 CASE lastwind=[EMPLOYEE]
 OPTMENU  876   0.002 CASE lastwind=[TESTS REQUIRED]
 OPTMENU  878   0.001 ENDCASE
 OPTMENU  879   0.001 EXIT
 OPTMENU  906   0.003 RELEA POPUP optmenu
 OPTMENU  907   0.019 ACTI WIND attop
 OPTMENU  908   0.029 RETURN
Lapsed time OPTMENU Module: 0.055 sec. Line count: 8 (Lines/sec: 145.9)
 WORKMAIN  483   0.003 CASE currwind=[FIND]
 WORKMAIN  492   0.001 CASE currwind=[ATTOP]
 WORKMAIN  495   0.002 CASE currwind=[QUIT]
 WORKMAIN  497   0.002 ENDCASE
 WORKMAIN  498   0.002 ENDDO
 WORKMAIN  364   0.001 DO CASE
 WORKMAIN  365   0.003 CASE !WEXIST(currwind)
 WORKMAIN  383   0.001 CASE currwind=[WORK LOG]
 WORKMAIN  391   0.001 CASE currwind=[CHARGE CODES]
 WORKMAIN  396   0.031 CASE currwind=[TESTS REQUIRED]
 WORKMAIN  397   0.001 SELE listtest
 WORKMAIN  398   0.034 SHOW WINDOW six
 WORKMAIN  399   0.017 SHOW WINDOW LIST
 WORKMAIN  400   0.001 SELE labtest
 WORKMAIN  401   0.025 SHOW WINDOW tests TOP
 WORKMAIN  402   0.001 lastwind=UPPER(WONTOP())
 WORKMAIN  403   0.002 IF !seek(worklog.log_id)
 WORKMAIN  404   0.001 APPEND BLANK
 WORKMAIN  405   0.005 REPL log_id WITH worklog.log_id
 WORKMAIN  406   0.001 ENDIF
 WORKMAIN  407   0.032 BROWSE last KEY worklog.log_id
 WORKMAIN  407   0.068 BROWSE last KEY worklog.log_id
 WORKMAIN  407   2.962 BROWSE last KEY worklog.log_id
 WORKMAIN  408   0.002 SEEK worklog.log_id
 WORKMAIN  409   0.106 sum no*defhrs TO tothrs WHILE log_id=worklog.log_id
 WORKMAIN  410   0.002 SEEK worklog.log_id
 WORKMAIN  411   0.004 sum no TO totnum WHILE log_id=worklog.log_id
 WORKMAIN  412   0.002 SELE worklog
 WORKMAIN  413   0.006 REPL est_hrs WITH m.tothrs,no_samp WITH m.totnum
 WORKMAIN  414   0.036 SELE labtest
 WORKMAIN  415   0.001 CASE currwind=[EMPLOYEE]
 WORKMAIN  420   0.002 CASE currwind=[LIST TEST]
 WORKMAIN  426   0.001 OTHERWISE
 WORKMAIN  429   0.003 ENDCASE
 WORKMAIN  430   0.002 IF !WEXIST(lastwind)
 WORKMAIN  433   0.002 currwind=UPPER(WONTOP())
 WORKMAIN  434   0.001 DO CASE
 WORKMAIN  435   0.002 CASE currwind=[ONE]
 WORKMAIN  437   0.001 CASE currwind=[TWO]
 WORKMAIN  439   0.001 CASE currwind=[THREE]
 WORKMAIN  441   0.002 CASE currwind=[FOUR]
 WORKMAIN  443   0.001 CASE currwind=[FIVE]
 WORKMAIN  446   0.001 CASE currwind=[SIX]
 WORKMAIN  449   0.002 CASE currwind=[ADD]
 WORKMAIN  469   0.001 CASE currwind=[EDIT]
 WORKMAIN  480   0.001 CASE currwind=[SEVEN]
 WORKMAIN  483   0.002 CASE currwind=[FIND]
 WORKMAIN  492   0.001 CASE currwind=[ATTOP]
 WORKMAIN  495   0.001 CASE currwind=[QUIT]
 WORKMAIN  497   0.002 ENDCASE
 WORKMAIN  498   0.002 ENDDO
 WORKMAIN  364   0.001 DO CASE
 WORKMAIN  365   0.003 CASE !WEXIST(currwind)
 WORKMAIN  383   0.001 CASE currwind=[WORK LOG]
 WORKMAIN  391   0.001 CASE currwind=[CHARGE CODES]
 WORKMAIN  396   0.002 CASE currwind=[TESTS REQUIRED]
 WORKMAIN  415   0.002 CASE currwind=[EMPLOYEE]
 WORKMAIN  420   0.001 CASE currwind=[LIST TEST]
 WORKMAIN  421   0.002 SELE listtest
 WORKMAIN  422   0.024 HIDE WINDOW six
 WORKMAIN  423   0.117 SHOW WINDOW LIST TOP
 WORKMAIN  424   0.002 lastwind=UPPER(WONTOP())
 WORKMAIN  425   0.030 BROW last
 WORKMAIN  425   2.172 BROW last
 WORKMAIN  426   0.001 OTHERWISE
 WORKMAIN  429   0.001 ENDCASE
 WORKMAIN  430   0.003 IF !WEXIST(lastwind)
 WORKMAIN  433   0.002 currwind=UPPER(WONTOP())
 WORKMAIN  434   0.001 DO CASE
 WORKMAIN  435   0.001 CASE currwind=[ONE]
 WORKMAIN  437   0.002 CASE currwind=[TWO]
 WORKMAIN  439   0.001 CASE currwind=[THREE]
 WORKMAIN  441   0.001 CASE currwind=[FOUR]
 WORKMAIN  443   0.002 CASE currwind=[FIVE]
 WORKMAIN  446   0.001 CASE currwind=[SIX]
 WORKMAIN  449   0.001 CASE currwind=[ADD]
 WORKMAIN  469   0.002 CASE currwind=[EDIT]
 WORKMAIN  480   0.001 CASE currwind=[SEVEN]
 WORKMAIN  483   0.002 CASE currwind=[FIND]
 WORKMAIN  492   0.001 CASE currwind=[ATTOP]
 WORKMAIN  495   0.001 CASE currwind=[QUIT]
 WORKMAIN  497   0.002 ENDCASE
 WORKMAIN  498   0.001 ENDDO
 WORKMAIN  364   0.001 DO CASE
 WORKMAIN  365   0.004 CASE !WEXIST(currwind)
 WORKMAIN  383   0.001 CASE currwind=[WORK LOG]
 WORKMAIN  391   0.001 CASE currwind=[CHARGE CODES]
 WORKMAIN  396   0.002 CASE currwind=[TESTS REQUIRED]
 WORKMAIN  397   0.001 SELE listtest
 WORKMAIN  398   0.029 SHOW WINDOW six
 WORKMAIN  399   0.010 SHOW WINDOW LIST
 WORKMAIN  400   0.048 SELE labtest
 WORKMAIN  401   0.083 SHOW WINDOW tests TOP
 WORKMAIN  402   0.001 lastwind=UPPER(WONTOP())
 WORKMAIN  403   0.003 IF !seek(worklog.log_id)
 WORKMAIN  407   0.031 BROWSE last KEY worklog.log_id
 WORKMAIN  407   0.047 BROWSE last KEY worklog.log_id
 WORKMAIN  407   4.531 BROWSE last KEY worklog.log_id
 WORKMAIN  408   0.002 SEEK worklog.log_id
 WORKMAIN  409   0.012 sum no*defhrs TO tothrs WHILE log_id=worklog.log_id
 WORKMAIN  410   0.002 SEEK worklog.log_id
 WORKMAIN  411   0.004 sum no TO totnum WHILE log_id=worklog.log_id
 WORKMAIN  412   0.002 SELE worklog
 WORKMAIN  413   0.006 REPL est_hrs WITH m.tothrs,no_samp WITH m.totnum
 WORKMAIN  414   0.034 SELE labtest
 WORKMAIN  415   0.001 CASE currwind=[EMPLOYEE]
 WORKMAIN  420   0.002 CASE currwind=[LIST TEST]
 WORKMAIN  426   0.002 OTHERWISE
 WORKMAIN  429   0.001 ENDCASE
 WORKMAIN  430   0.003 IF !WEXIST(lastwind)
 WORKMAIN  433   0.002 currwind=UPPER(WONTOP())
 WORKMAIN  434   0.001 DO CASE
 WORKMAIN  435   0.001 CASE currwind=[ONE]
 WORKMAIN  437   0.002 CASE currwind=[TWO]
 WORKMAIN  439   0.001 CASE currwind=[THREE]
 WORKMAIN  441   0.001 CASE currwind=[FOUR]
 WORKMAIN  443   0.002 CASE currwind=[FIVE]
 WORKMAIN  446   0.001 CASE currwind=[SIX]
 WORKMAIN  449   0.002 CASE currwind=[ADD]
 WORKMAIN  450   0.002 currwind=lastwind
 WORKMAIN  451   0.001 DO CASE
 WORKMAIN  452   0.001 CASE lastwind=[LIST TEST]
 WORKMAIN  454   0.001 CASE lastwind=[WORK LOG]
 WORKMAIN  462   0.038 CASE lastwind=[CHARGE CODES]
 WORKMAIN  464   0.001 CASE lastwind=[EMPLOYEE]
 WORKMAIN  466   0.005 CASE lastwind=[TESTS REQUIRED]
 WORKMAIN  467   0.036 DO addtest
Lapsed time WORKMAIN Module: 10.683 sec. Line count: 127 (Lines/sec: 11.8)
 ADDTEST  744   0.003 oldarea=select()
 ADDTEST  745   0.022 SELE listtest
 ADDTEST  746   0.003 GO TOP
 ADDTEST  747   0.002 SCAN FOR include
 ADDTEST  748   0.003 SELE (oldarea)
 ADDTEST  749   0.002 SEEK worklog.log_id
 ADDTEST  750   0.001 IF !EMPTY(test)
 ADDTEST  754   0.006 listtest.hour
 ADDTEST  755   0.047 SELE listtest
 ADDTEST  756   0.002 ENDSCAN
 ADDTEST  757   0.062 REPL ALL include WITH .f.
 ADDTEST  758   0.002 GO TOP
 ADDTEST  759   0.002 SELE (oldarea)
 ADDTEST  760   0.066 RETURN
Lapsed time ADDTEST Module: 0.217 sec. Line count: 14 (Lines/sec: 64.3)
 WORKMAIN  468   0.002 ENDCASE
 WORKMAIN  469   0.001 CASE currwind=[EDIT]
 WORKMAIN  480   0.001 CASE currwind=[SEVEN]
 WORKMAIN  483   0.001 CASE currwind=[FIND]
 WORKMAIN  492   0.002 CASE currwind=[ATTOP]
 WORKMAIN  495   0.001 CASE currwind=[QUIT]
 WORKMAIN  497   0.002 ENDCASE
 WORKMAIN  498   0.001 ENDDO
 WORKMAIN  364   0.001 DO CASE
 WORKMAIN  365   0.003 CASE !WEXIST(currwind)
 WORKMAIN  383   0.001 CASE currwind=[WORK LOG]
 WORKMAIN  391   0.001 CASE currwind=[CHARGE CODES]
 WORKMAIN  396   0.001 CASE currwind=[TESTS REQUIRED]
 WORKMAIN  397   0.002 SELE listtest
 WORKMAIN  398   0.026 SHOW WINDOW six
 WORKMAIN  399   0.008 SHOW WINDOW LIST
 WORKMAIN  400   0.002 SELE labtest
 WORKMAIN  401   0.025 SHOW WINDOW tests TOP
 WORKMAIN  402   0.002 lastwind=UPPER(WONTOP())
 WORKMAIN  403   0.002 IF !seek(worklog.log_id)
 WORKMAIN  407   0.031 BROWSE last KEY worklog.log_id
 WORKMAIN  407   0.067 BROWSE last KEY worklog.log_id
 WORKMAIN  407   3.821 BROWSE last KEY worklog.log_id
 WORKMAIN  408   0.047 SEEK worklog.log_id
 WORKMAIN  409   0.012 sum no*defhrs TO tothrs WHILE log_id=worklog.log_id
 WORKMAIN  410   0.002 SEEK worklog.log_id
 WORKMAIN  411   0.005 sum no TO totnum WHILE log_id=worklog.log_id
 WORKMAIN  412   0.001 SELE worklog
 WORKMAIN  413   0.005 REPL est_hrs WITH m.tothrs,no_samp WITH m.totnum
 WORKMAIN  414   0.036 SELE labtest
 WORKMAIN  415   0.001 CASE currwind=[EMPLOYEE]
 WORKMAIN  420   0.001 CASE currwind=[LIST TEST]
 WORKMAIN  426   0.001 OTHERWISE
 WORKMAIN  429   0.001 ENDCASE
 WORKMAIN  430   0.004 IF !WEXIST(lastwind)
 WORKMAIN  433   0.002 currwind=UPPER(WONTOP())
 WORKMAIN  434   0.001 DO CASE
 WORKMAIN  435   0.001 CASE currwind=[ONE]
 WORKMAIN  437   0.002 CASE currwind=[TWO]
 WORKMAIN  439   0.001 CASE currwind=[THREE]
 WORKMAIN  441   0.001 CASE currwind=[FOUR]
 WORKMAIN  443   0.001 CASE currwind=[FIVE]
 WORKMAIN  446   0.001 CASE currwind=[SIX]
 WORKMAIN  449   0.001 CASE currwind=[ADD]
 WORKMAIN  469   0.002 CASE currwind=[EDIT]
 WORKMAIN  480   0.002 CASE currwind=[SEVEN]
 WORKMAIN  483   0.001 CASE currwind=[FIND]
 WORKMAIN  492   0.002 CASE currwind=[ATTOP]
 WORKMAIN  495   0.001 CASE currwind=[QUIT]
 WORKMAIN  497   0.001 ENDCASE
 WORKMAIN  498   0.001 ENDDO
 WORKMAIN  364   0.001 DO CASE
 WORKMAIN  365   0.004 CASE !WEXIST(currwind)
 WORKMAIN  383   0.001 CASE currwind=[WORK LOG]
 WORKMAIN  384   0.001 SELE worklog
 WORKMAIN  385   0.008 HIDE WINDOW tests
 WORKMAIN  386   0.008 HIDE WINDOW LIST
 WORKMAIN  387   0.025 HIDE WINDOW six
 WORKMAIN  388   0.299 SHOW WINDOW WORK TOP
 WORKMAIN  389   0.002 lastwind=UPPER(WONTOP())
 WORKMAIN  390   0.038 BROWSE last
 WORKMAIN  390   4.856 BROWSE last
 WORKMAIN  390   0.082 BROWSE last
Lapsed time WORKMAIN Module: 9.441 sec. Line count: 63 (Lines/sec: 6.6)
Lapsed time BIGMENU.PRG: 22.152 sec. (Time Uncorrected)
 USERHELP  618   0.078 SET TOPIC TO xmatch=PROGRAM-DBF-VARREAD
 USERHELP  621   0.625 HELP
 USERHELP  621   0.118 HELP
 USERHELP  621   6.426 HELP
 USERHELP  622  11.107 RETURN
Lapsed time USERHELP Module: 18.352 sec. Line count: 5 (Lines/sec: 0.2)
Lapsed time LIB.PRG: 18.374 sec. (Time Uncorrected)
 WORKMAIN  390   0.131 BROWSE last
Lapsed time WORKMAIN Module: 0.131 sec. Line count: 1 (Lines/sec: 7.6)
Lapsed time BIGMENU.PRG: 0.135 sec. (Time Uncorrected)
 PUTHELP  505   0.021 KEY = PROGRAM-DBF-VARREAD
 PUTHELP  509   0.083 SET HELP TO
 PUTHELP  510   0.021 oldarea=select()
 PUTHELP  512   0.022 SELE 0
 PUTHELP  514   0.037 USE (helpfile)
 PUTHELP  516   0.022 SHAD FLOAT
 PUTHELP  517   0.056 ACTI WINDOW scrblnk
 PUTHELP  520   0.022 ZOOM CLOSE FLOAT GROW SHAD
 PUTHELP  522   0.024 LOCATE FOR xmatch=m.KEY
 PUTHELP  524   0.021 IF ! FOUND()
 PUTHELP  529   0.166 @ 0,1 SAY [TOPIC ] GET xtopic PICT [@!]
 PUTHELP  530   0.027 @ 1,1 SAY [MATCH ]+xmatch
 PUTHELP  531   0.175 READ
 PUTHELP  531   0.126 READ
 PUTHELP  531   2.838 READ
 PUTHELP  533   0.022 IF []=TRIM(xtopic)
 PUTHELP  538   0.485 MODI MEMO xinfo WINDOW xviewport
 PUTHELP  538   0.054 MODI MEMO xinfo WINDOW xviewport
 PUTHELP  538   2.995 MODI MEMO xinfo WINDOW xviewport
 PUTHELP  539   0.021 CLOSE MEMO xinfo
 PUTHELP  540   0.021 ENDIF
 PUTHELP  542   0.024 USE
 PUTHELP  544   0.377 SET HELP TO &helpfile
 PUTHELP  545   0.060 RELEA WINDOW scrblnk,xviewport
 PUTHELP  546   0.021 SELE (oldarea)
 PUTHELP  547   0.085 RETURN
Lapsed time PUTHELP Module: 7.816 sec. Line count: 26 (Lines/sec: 3.3)
Lapsed time LIB.PRG: 7.930 sec. (Time Uncorrected)
 WORKMAIN  390   3.209 BROWSE last
 WORKMAIN  391   0.004 CASE currwind=[CHARGE CODES]
 WORKMAIN  396   0.001 CASE currwind=[TESTS REQUIRED]
 WORKMAIN  415   0.001 CASE currwind=[EMPLOYEE]
 WORKMAIN  420   0.003 CASE currwind=[LIST TEST]
 WORKMAIN  426   0.001 OTHERWISE
 WORKMAIN  429   0.002 ENDCASE
 WORKMAIN  430   0.003 IF !WEXIST(lastwind)
 WORKMAIN  431   0.055 EXIT
 WORKMAIN  499   0.009 ON KEY LABEL F2
 WORKMAIN  500   0.004 ON KEY LABEL F3
 WORKMAIN  501   0.005 ON KEY LABEL F4
 WORKMAIN  502   0.004 ON KEY LABEL F5
 WORKMAIN  503   0.006 ON KEY LABEL F6
 WORKMAIN  504   0.005 ON KEY LABEL F7
 WORKMAIN  505   0.005 ON KEY LABEL F8
 WORKMAIN  506   0.004 ON KEY LABEL F9
 WORKMAIN  507   0.005 ON KEY LABEL F10
 WORKMAIN  508   0.005 ON KEY LABEL ctrl-pgup
 WORKMAIN  509   0.008 ON KEY LABEL ctrl-pgdn
 WORKMAIN  510   0.005 ON KEY LABEL ctrl-A
 WORKMAIN  511   0.005 ON KEY LABEL ctrl-M
 WORKMAIN  512   1.077 CLOSE DATA
 WORKMAIN  513   0.018 CLEAR WIND
 WORKMAIN  514   0.671 REST MACR
Lapsed time WORKMAIN Module: 5.105 sec. Line count: 25 (Lines/sec: 4.8)
 WORKLOG  264   0.001 CASE mcholog =  4
 WORKLOG  267   0.001 CASE mcholog =  5
 WORKLOG  269   0.002 CASE mcholog =  6
 WORKLOG  271   0.001 CASE mcholog =  7
 WORKLOG  273   0.001 CASE mcholog =  8
 WORKLOG  276   0.002 CASE mcholog =  9
 WORKLOG  278   0.001 CASE mcholog = 10
 WORKLOG  280   0.001 CASE mcholog = 11
 WORKLOG  282  -0.000 CASE mcholog = 12
 WORKLOG  284   0.001 CASE mcholog = 13
 WORKLOG  286   0.002 CASE mcholog = 14
 WORKLOG  288   0.001 CASE mcholog = 15
 WORKLOG  291   0.002 ENDCASE
 WORKLOG  292   0.002 ENDDO
 WORKLOG  251   0.014 DO clrscr WITH 'g'
Lapsed time WORKLOG Module: 0.026 sec. Line count: 15 (Lines/sec: 576.9)
Lapsed time BIGMENU.PRG: 5.307 sec. (Time Uncorrected)
 CLRSCR   15   0.008 IF param()=0
 CLRSCR   18   0.003 oldcolor=set('color')
 CLRSCR   19   0.001 xcolor=LEFT(oldcolor,AT('/',oldcolor))+xcolor
 CLRSCR   20   0.056 SET COLOR TO &xcolor
 CLRSCR   21   0.021 CLEAR
 CLRSCR   22   0.032 SET COLOR TO &oldcolor
 CLRSCR   23   0.015 RETURN []
Lapsed time CLRSCR Module: 0.133 sec. Line count: 7 (Lines/sec: 52.5)
Lapsed time LIB.PRG: 0.164 sec. (Time Uncorrected)
 WORKLOG  252   0.478 ACTIVATE POPUP worklog
 WORKLOG  252   0.005 ACTIVATE POPUP worklog
 WORKLOG  253   0.001 mcholog = BAR()
 WORKLOG  254   0.002 DO CASE
 WORKLOG  255   0.001 CASE LASTKEY()=27
 WORKLOG  257   0.001 CASE mcholog =  1
 WORKLOG  259   0.001 CASE mcholog =  2
 WORKLOG  261   0.001 CASE mcholog =  3
 WORKLOG  264   0.001 CASE mcholog =  4
 WORKLOG  267   0.001 CASE mcholog =  5
 WORKLOG  269   0.002 CASE mcholog =  6
 WORKLOG  271   0.001 CASE mcholog =  7
 WORKLOG  273   0.001 CASE mcholog =  8
 WORKLOG  276   0.001 CASE mcholog =  9
 WORKLOG  278   0.001 CASE mcholog = 10
 WORKLOG  280   0.001 CASE mcholog = 11
 WORKLOG  282   0.002 CASE mcholog = 12
 WORKLOG  284   0.001 CASE mcholog = 13
 WORKLOG  286   0.002 CASE mcholog = 14
 WORKLOG  288   0.002 CASE mcholog = 15
 WORKLOG  290   0.001 EXIT
 WORKLOG  293   0.052 USE sys_info
 WORKLOG  294   0.004 REPL ok WITH .t.
 WORKLOG  295   0.015 CLOSE DATA
 WORKLOG  296   0.003 CLEAR WIND
 WORKLOG  297   0.003 RELEASE POPUP worklog
 WORKLOG  298   0.020 DO help_off
Lapsed time WORKLOG Module: 0.593 sec. Line count: 27 (Lines/sec: 45.5)
Lapsed time BIGMENU.PRG: 0.712 sec. (Time Uncorrected)
 HELP_OFF  418   0.116 ON KEY LABEL F1
 HELP_OFF  419   0.005 ON KEY LABEL shift-f1
 HELP_OFF  420   0.004 ON KEY LABEL F10
 HELP_OFF  421   0.012 if file('foxhelp.dbf')
 HELP_OFF  422   0.116 SET HELP TO foxhelp
 HELP_OFF  423   0.001 endif
 HELP_OFF  424   0.236 REST MACRO
 HELP_OFF  425   0.018 RETURN
Lapsed time HELP_OFF Module: 0.505 sec. Line count: 8 (Lines/sec: 15.8)
Lapsed time LIB.PRG: 0.540 sec. (Time Uncorrected)
 WORKLOG  299   0.004 RETURN

******************************************
* DATE: 04/22/91 TIME: 13:43:10
* PROFILER Author: F. C. Wampler
* Copyright (c) F. C. Wampler 1991
******************************************