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 |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All
Print Page as PDF
Routine: LRAPWR1

Package: Lab Service

Routine: LRAPWR1


Information

LRAPWR1 ; IHS/DIR/FJE - STUFF CYTOPATH SCREENED SLIDES 10:39 ; [ 5/5/93 ]

Source Information

Source file <LRAPWR1.m>

Call Graph

Call Graph Total: 3

Package Total Call Graph
Lab Service 2 YN^LRU  X^LRUWK  
VA Fileman 1 ^DIC  

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Lab Service 1 LRAPWR  

Entry Points

Name Comments DBIA/ICR reference
A
CK
SET
CAP
CAP1
CY
B

External References

Name Field # of Occurrence
^DIC CAP1+2
YN^LRU A+1, CAP1+5
X^LRUWK CY

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"Is this a rescreen of a negative Gyn Pap Smear "
  • Line Location: A+1
Function Call: WRITE
  • Prompt: $C(7),!!,"No WKLD CODES to select for ",$P(^LAB(62.07,LRF,0),U)," in EXECUTE CODE file."
  • Line Location: CAP1+0
Function Call: WRITE
  • Prompt: $C(7),!,"No WKLD CODES selected."
  • Line Location: CAP1+3
Function Call: WRITE
  • Prompt: !,$J(B,2),?6,$P(X,U,2),?16,$P(X,U)
  • Line Location: CAP1+4
Function Call: WRITE
  • Prompt: !!,$C(7),"No WKLD codes selected. Try again."
  • Line Location: CAP1+5
Function Call: WRITE
  • Prompt: $C(7),!,"WKLD Codes 88580.000, 88578.000 and 88596.000 must be entered in WKLD CODE File (#64)."
  • Line Location: CY+2
Function Call: WRITE
  • Prompt: $C(7),!,"No entry in MORPHOLOGY File (#61.1) for SNOMED code: ",X
  • Line Location: CY+3
Routine Call
  • DIC
  • Line Location:
    • CAP1+2

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^LAB(62.07 - [#62.07] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^LAB(60 - [#60] A+1, B+3, B+4
^LAB(61.1 - [#61.1] CY+3
^LAB(62.07 - [#62.07] CAP1, CAP1+1, CAP1+2
^LAM - [#64] CAP1+4
^LAM("E" CY+1
^LR - [#63] CK, CK+1, CK+2
^LRO(68 - [#68] A+1, B, B+1, B+2, SET*, CAP, CAP+1
^TMP($J B+3, CAP1!, CAP1+2*, CAP1+3, CAP1+4, CAP1+6

Label References

Name Line Occurrences
A LRAPWR1+4
B A
CAP A+1, B+4, CAP1+6, CK+4
CAP1 B+3, CAP1+5
CK CAP1+1
SET A+1, B+3, CK+4

Naked Globals

Name Field # of Occurrence
^( B+4, CAP1+4, CAP1+6, CK+2
^(0 A+1, B*, B+1*, B+2*, B+3, CAP*, CAP+1*, CK

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> % A+1*, CAP1+5*
>> A LRAPWR1+4*, CAP1+4*, CK+2*
>> B LRAPWR1+4*, CAP1+4*
DIC CAP1+2*!
DIC("A" CAP1+2*
DIC(0 CAP1+2*
DUZ B+1, CAP
DUZ(2 CAP
>> E LRAPWR1+4*
>> LR LRAPWR1+4*
>> LR( LRAPWR1+4
>> LRA CAP1+2*, CY+1*, CY+2, CY+3
>> LRA(1 A+1*, B+4*, CAP, CAP+1, CAP1+6*, CK+4*
>> LRAA A+1, B, B+1, B+2, SET, CAP, CAP+1
>> LRAD A+1, B, B+1, B+2, SET, CAP, CAP+1
>> LRAN A+1, B, B+1, B+2, SET, CAP, CAP+1
>> LRC A+1*, B+4*, CAP, CAP+1, CAP1+6*, CK+2*, CK+3
>> LRC(3 B+4*
>> LRDFN CK, CK+1, CK+2
>> LRF B+3*, CAP1, CAP1+1, CAP1+2
>> LRF( CK+2, CY+3*
>> LRG A+1, CY*
>> LRI CK, CK+1, CK+2
>> LRK LRAPWR1+4*, A, B+1, CAP
>> LRN CY+1*, CY+2, CY+3
>> LRR A+1, CY+1*, CY+2
>> LRSS CK, CK+1, CK+2
LRT LRAPWR1+4*, A+1, B+1, B+2, B+3, B+4, SET, CAP, CAP+1, CY!
>> LRX(6 LRAPWR1+4*, A, B+4, CAP1+2, CK+4
U CAP1, CAP1+2, CAP1+4
>> X LRAPWR1+4*, B+1*, CAP*, CAP+1*, CAP1+4*, CK*, CK+1*, CK+2, CY*, CY+3*
Y CAP1+1, CAP1+2, CK*, CK+1*, CK+2*, CK+3*, CK+4!, CY*, CY+1*, CY+2*
, CY+3*
>> Z CY+3*
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All