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 |  Global Variables Directly Accessed |  Label References |  Local Variables  | All
Print Page as PDF
Routine: RMPRCOR

Package: Prosthetics

Routine: RMPRCOR


Information

RMPRCOR ;PHX/HPL - RECALCULATES TOTAL HOURS FOR LAB JOB FOR FILE 660 ;03/12/96

Source Information

Source file <RMPRCOR.m>

Entry Points

Name Comments DBIA/ICR reference
DOIT ;LOOPS THROUGH FILE 660, USES "C" X-REFF IN FILE 664.3 TO FIND
LKAT660 ;$ORDER THROUGH FILE 660
SM6643 ;$ORDER THROUGH FILE 664.3
SUMIT ;SUM THE ENTRIES
EXIT ;COMMON EXIT

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"DONE RECALCULATING !"
  • Line Location: EXIT+2

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^RMPR(660 - [#660] LKAT660+2, LKAT660+3, LKAT660+6*
^RMPR(664.3 - [#664.3] SM6643+1, SUMIT+2

Label References

Name Line Occurrences
EXIT LKAT660+7
SM6643 LKAT660+5
SUMIT SM6643+3

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
HRS SUMIT+1~, SUMIT+2*
LP LKAT660+1*, LKAT660+2*, LKAT660+3, LKAT660+4, SM6643+1, EXIT+1!
>> RDA SM6643+2*, SUMIT+2
RLP LKAT660+1*, SM6643+1*, SM6643+2, EXIT+1!
>> RMDA SUMIT+2*
RMLP SM6643+3*, SUMIT+2*, EXIT+1!
>> RMPRDA LKAT660+4*, LKAT660+6
>> THRS LKAT660+2*, LKAT660+6, SUMIT+2*
U LKAT660+6, SUMIT+2
Info |  Source |  Entry Points |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables  | All