Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Entry Points |  Interaction Calls
Print Page as PDF
Routine: PRCGU

Package: IFCAP

Routine: PRCGU


Information

PRCGU ;WIRMFO@ALTOONA/CTB PURGEMASTER UTILITY PROGRAM ;12/10/97 10:55 AM

Source Information

Source file <PRCGU.m>

Entry Points

Name Comments DBIA/ICR reference
V ;;5.1;IFCAP;;Oct 20, 2000
UPDATE ;
POS(DX,DY)
PERCENT ;
S(X)
TIME(X,Y) ;
BEGIN ;
END ;
CLOSE ;CLOSE ALL OPEN DEVICES OTHER THAN THE HOME DEVICE
MSG ;;PRINTS MESSAGE CONTAINED IN X. IF IT DOESNT FIT ON ONE LINE, X IS PRINTED ON THE NEXT LINE.
BRK
DIR() ;SET VARIABLE STRING RETURNING FROM DIR

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: IORC
  • Line Location: UPDATE+1
Function Call: WRITE
  • Prompt: CURSOR
  • Line Location: UPDATE+1
Function Call: WRITE
  • Prompt: !
  • Line Location: POS+0
Function Call: WRITE
  • Prompt: !!!,$FN($S(PERCENT=100:TREC,XCOUNT<0:0,1:XCOUNT),",")," of ",$FN(TREC,",")," ",ITEMS," processed. ",PERCENT,"% complete "
  • Line Location: PERCENT+7
Function Call: WRITE
  • Prompt: !
  • Line Location: TIME+5
Function Call: WRITE
  • Prompt: SEC_" Second"_$$S(SEC)_" "_Y_". "
  • Line Location: TIME+8
Function Call: WRITE
  • Prompt: !!
  • Line Location: BEGIN+5
Function Call: WRITE
  • Prompt: !,?25,"P E R C E N T C O M P L E T E",!!?18," 50 100",!,LINE,!?14,"|",?66,"|",!,LINE,!
  • Line Location: BEGIN+7
Function Call: WRITE
  • Prompt: !,"100% complete."_X,!
  • Line Location: END+2
Function Call: READ
  • Variable: X
  • Timeout: 2
  • Line Location: MSG+1
Function Call: WRITE
  • Prompt: $P(X,"*")
  • Line Location: MSG+1
Function Call: WRITE
  • Prompt: !,?(IOM-($L($P(X,"*"))+4))
  • Line Location: MSG+2
Info |  Source |  Entry Points |  Interaction Calls