Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All
Print Page as PDF
Routine: LRAPWEA

Package: Lab Service

Routine: LRAPWEA


Information

LRAPWEA ; IHS/DIR/FJE - EM GRIDS SCANNED/PRINTS MADE 18:04 ; [ 1/12/92 ]

Source Information

Source file <LRAPWEA.m>

Call Graph

Call Graph Total: 2

Package Total Call Graph
Lab Service 1 DA^LRU  
VA Fileman 1 (,DD)^%DT  

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Lab Service 1 LRAPWE  

Entry Points

Name Comments DBIA/ICR reference
NPM
CK
GS
CK1
NGS
PM

External References

Name Field # of Occurrence
^%DT GS, PM
DD^%DT CK, CK1
DA^LRU GS, PM

Interaction Calls

Name Line Occurrences
Function Call: READ
  • Prompt: "Select *BLOCK ID#: "
  • Formatting: !
  • Timeout: DTIME
  • Variable: LRX
  • Line Location: LRAPWEA+5
Function Call: WRITE
  • Prompt: $C(7)," Select a number from 1 to ",LR
  • Line Location: LRAPWEA+5
Function Call: READ
  • Timeout: DTIME
  • Variable: X
  • Line Location: NGS+0
Function Call: WRITE
  • Prompt: !!,"TOTAL NUMBER of grids scanned:",LRZ(8),$S(LRZ(8):"//",1:"")
  • Line Location: NGS+0
Function Call: WRITE
  • Prompt: $C(7),!,$G(^(3))
  • Line Location: NGS+0
Function Call: WRITE
  • Prompt: $C(7),!,"Total number of grids scanned cannot exceed number of grids prepared"
  • Line Location: NGS+1
Function Call: WRITE
  • Prompt: $C(7),!,"Total number of grids scanned cannot be less than previous count (",LRZ(1),")"
  • Line Location: NGS+2
Function Call: WRITE
  • Prompt: !
  • Line Location: PM+0
Function Call: WRITE
  • Prompt: $C(7),!,"No prints can be made if no grids prepared."
  • Line Location: NPM+0
Function Call: READ
  • Timeout: DTIME
  • Variable: X
  • Line Location: NPM+1
Function Call: WRITE
  • Prompt: !!,"TOTAL NUMBER of prints made:",LRZ(10),$S(LRZ(10):"//",1:"")
  • Line Location: NPM+1
Function Call: WRITE
  • Prompt: $C(7),!,$G(^(3))
  • Line Location: NPM+1
Function Call: WRITE
  • Prompt: $C(7),!,"Total number of prints made cannot be less than previous count (",LRZ(2),")"
  • Line Location: NPM+2
Function Call: WRITE
  • Prompt: $C(7),!?3,"Date/time grids scanned ("
  • Line Location: CK+0
Function Call: WRITE
  • Prompt: Y,") cannot be before",!?3,"Date/time grids prepared"
  • Line Location: CK+0
Function Call: WRITE
  • Prompt: " (",Y,")"
  • Condition for execution: Y]""
  • Line Location: CK+0
Function Call: WRITE
  • Prompt: $C(7),!?3,"Date/time prints made ("
  • Line Location: CK1+0
Function Call: WRITE
  • Prompt: Y,") cannot be before",!?3,"Date/time grids prepared"
  • Line Location: CK1+0
Function Call: WRITE
  • Prompt: " (",Y,")"
  • Condition for execution: Y]""
  • Line Location: CK1+0

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DD(63.20211 NGS, NPM+1
^LR - [#63] LRAPWEA+6, GS, GS+1*, NGS+3*, PM, PM+1*, NPM+3*

Label References

Name Line Occurrences
CK GS
CK1 PM
GS LRAPWEA+6, GS
LRAPWEA LRAPWEA+5, LRAPWEA+6
NGS NGS, NGS+1, NGS+2
NPM NPM+1, NPM+2
PM LRAPWEA+6, PM

Naked Globals

Name Field # of Occurrence
^(0 GS, PM
^(3 NGS, NPM+1
^(4 NGS, NPM+1

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
%DT GS*!, PM*!
%DT("A" GS*, PM*
%DT("B" GS*, PM*
%DT(0 GS*, PM*
>> A LRAPWEA+6*, GS, GS+1, NGS+3, PM, PM+1, NPM+3
>> B LRAPWEA+6*, GS, GS+1, NGS+3, PM, PM+1, NPM+3
DTIME LRAPWEA+5, NGS, NPM+1
>> E LRAPWEA+6*, GS, GS+1, NGS+3, PM, PM+1, NPM+3
>> LR LRAPWEA+5
>> LR( LRAPWEA+5, LRAPWEA+6, GS+1*, NGS+1, NGS+3*, PM+1*, NPM, NPM+3*
>> LR(2 LRAPWEA+4, LRAPWEA+6
>> LRDFN LRAPWEA+6, GS, GS+1, NGS+3, PM, PM+1, NPM+3
>> LRI LRAPWEA+6, GS, GS+1, NGS+3, PM, PM+1, NPM+3
>> LRSS LRAPWEA+6, GS, GS+1, NGS+3, PM, PM+1, NPM+3
>> LRV LRAPWEA+6
>> LRW GS, GS+1, NGS+3, PM, PM+1, NPM+3
>> LRX LRAPWEA+4*, LRAPWEA+5*, LRAPWEA+6, GS+1, NGS+1, NGS+3, PM+1, NPM, NPM+3
>> LRZ(1 LRAPWEA+6*, NGS+2
>> LRZ(10 LRAPWEA+6*, NPM+1, NPM+2*
>> LRZ(2 LRAPWEA+6*, NPM+2
>> LRZ(4 GS*, PM*, CK, CK1
>> LRZ(8 LRAPWEA+6*, NGS
U LRAPWEA+5, LRAPWEA+6, GS, GS+1, NGS, NGS+1, NGS+3, PM, PM+1, NPM
, NPM+1, NPM+3
>> X LRAPWEA+6*, NGS*, NGS+1, NGS+2, NGS+3, NPM+1*, NPM+2, NPM+3
>> Y GS*, GS+1, PM*, PM+1, CK*, CK1*
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All