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 |  Naked Globals |  Local Variables |  All
Print Page as PDF
Routine: LRMIXPD

Package: Lab Service

Routine: LRMIXPD


Information

LRMIXPD ; IHS/DIR/FJE - LAB DESCRIPTIONS 2/6/91 08:23 ;

Source Information

Source file <LRMIXPD.m>

Entry Points

Name Comments DBIA/ICR reference
EXPND ;expands lab description from LRMISTF1
SWITCH
PN ;checks for positive or negative entry from LRMISTF1
CHECK

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: " (",$E(%S,1,$L(%S)-1),")"
  • Line Location: EXPND+2
Function Call: WRITE
  • Prompt: $C(7),!," ... TOO LONG ... Expanded text is limited to 68 characters."
  • Line Location: CHECK+0
Function Call: WRITE
  • Prompt: $C(7),!,"Enter 'N' for NEGATIVE or 'P' for POSITIVE"
  • Line Location: PN+1
Function Call: WRITE
  • Prompt: " (",$S(X="P":"POSITIVE",1:"NEGATIVE"),")"
  • Line Location: PN+2

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^LAB(62.5 - [#62.5] SWITCH

Label References

Name Line Occurrences
CHECK EXPND+2
SWITCH CHECK

Naked Globals

Name Field # of Occurrence
^(9 SWITCH

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
%L EXPND+3!, CHECK*
%S EXPND+2*, EXPND+3!, CHECK*
%Z EXPND+3!, CHECK*, SWITCH*
>> I CHECK*, SWITCH
>> LRSCREEN SWITCH
U SWITCH
X EXPND+1!, EXPND+2*, CHECK!, SWITCH, PN+1!, PN+2
>> Y CHECK*, SWITCH*
Info |  Source |  Entry Points |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All