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: LRVER

Package: Lab Service

Routine: LRVER


Information

LRVER ;DALOI/CJS/FHS - LAB ROUTINE DATA VERIFICATION ; 22-Oct-2013 09:22 ; MKK

Source Information

Source file <LRVER.m>

Call Graph

Call Graph Total: 17

Package Total Call Graph
Lab Service 12 (,STD,STOP)^LRCAPV  ^LRCAPV2  SLOWK^LRFASTS  END^LRMIEDZ  ^LRMIEDZ2  P15^LROE1  ^LRPARAM  ^LRVER1  
(,$$SELPL,CMTDSP,UID)^LRVERA  ADATE^LRWU  $$SELBY^LRWU4  (DUZ,PT)^LRX  
VA Fileman 3 YMD^%DTC  YN^DICN  ^DIR  
IHS Changes To Lab 1 $$ISPIMS^BLRUTIL  
Kernel 1 ($$FMTE,$$NOW)^XLFDT  

Caller Graph

Caller Graph Total: 4

Package Total Caller Graph
Lab Service 4 LRENTER  LRFASTS  LRSTUF  LRVR  

Entry Points

Name Comments DBIA/ICR reference
LREND
SLOW
SLOQ ;
YN
REV ; Ask if user wants to review data before and after editing
WLN1
L10
L11
NEXT ;
DAT
QUIT ;
WLN ; I LRVBY=2 S:LRAN<1 LRUID="" S:$L(LRAN) LRUID=$P($G(^LRO(68,LRAA,1,LRAD,1,LRAN,.3)),"^") D UID^LRVERA G LREND:LRUID="" G WLN1
VERDIS ; Prevent test not selected by the user with verified data
; entered from being displayed on the editing screens.
EP ; EP -- IHS/OIT/MKK - LR*5.2*1033

External References

Name Field # of Occurrence
YMD^%DTC DAT+2
$$ISPIMS^BLRUTIL SLOQ+11
YN^DICN YN
^DIR WLN+8, REV+7, VERDIS+8
^LRCAPV EP+16
STD^LRCAPV QUIT+2
STOP^LRCAPV SLOQ+1
^LRCAPV2 SLOQ+1
SLOWK^LRFASTS L11
END^LRMIEDZ SLOW+5
^LRMIEDZ2 SLOW+5
P15^LROE1 WLN1+17
^LRPARAM EP+1
^LRVER1 L11, L11+1
^LRVERA EP+11
$$SELPL^LRVERA EP+13
CMTDSP^LRVERA EP+8
UID^LRVERA EP+11, WLN+1
ADATE^LRWU DAT
$$SELBY^LRWU4 EP+10
DUZ^LRX SLOW+3
PT^LRX WLN1+4
$$FMTE^XLFDT WLN1+15
$$NOW^XLFDT WLN1+20

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"Accession does not exist."
  • Line Location: WLN1+0
Function Call: WRITE
  • Prompt: !,"Accession's LRDFN invalid."
  • Line Location: WLN1+2
Function Call: WRITE
  • Prompt: !,PNM,?30,SSN
  • Line Location: WLN1+5
Function Call: WRITE
  • Prompt: !,PNM,?30,HRCN
  • Line Location: WLN1+7
Function Call: WRITE
  • Prompt: !
  • Line Location: WLN1+10
Function Call: WRITE
  • Prompt: !,">>>>ERROR - NO POINTER TO FILE #63 - PLEASE NOTIFY SYSTEM MANAGER<<<<<",!
  • Line Location: WLN1+28
Function Call: WRITE
  • Prompt: !,">>>>ERROR - NO ENTRY IN FILE #63 - PLEASE NOTIFY SYSTEM MANAGER<<<<<",!
  • Line Location: WLN1+31
Function Call: WRITE
  • Prompt: !,"This Order # has not been collected",$C(7)
  • Line Location: WLN1+33
Function Call: WRITE
  • Prompt: !,"You cannot verify an accession which has not been collected.",$C(7)
  • Line Location: WLN1+34
Function Call: WRITE
  • Prompt: !,"LAST IN WORK LIST"
  • Line Location: NEXT+2
Routine Call
  • DIR
  • Line Location:
    • WLN+8
    • REV+7
    • VERDIS+8

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^LAB(69.9 - [#69.9] SLOW+4, DAT+2
^LR - [#63] WLN1+4, WLN1+30
^LRO(68 - [#68] EP+16, SLOW, DAT+4, DAT+5, WLN+1, WLN1, WLN1+1, WLN1+3, WLN1+9, WLN1+11
, WLN1+13, WLN1+20, WLN1+22, WLN1+23, WLN1+26, LREND, NEXT+1, QUIT+2
^LRO(69 - [#69] WLN1+33, WLN1+34
^TMP("LR" LREND+1!, SLOQ+4!
^XTMP("LRCAP" QUIT+1!

Label References

Name Line Occurrences
@( SLOQ+11
L10 L11+2
L11 DAT+3
LREND WLN+1, WLN+9
NEXT L11+1, WLN1, WLN1+2, WLN1+22, WLN1+24, WLN1+29, WLN1+32, WLN1+33, WLN1+34
QUIT EP+5, EP+7, EP+12, EP+14, EP+16, SLOW+5, SLOW+7, DAT+3, L10+1
REV EP+4
VERDIS EP+6
WLN L10+1, WLN+11, WLN1, WLN1+2, WLN1+22, WLN1+24, WLN1+27, WLN1+30, WLN1+33, WLN1+34
WLN1 DAT+3, WLN+1
YN YN

Naked Globals

Name Field # of Occurrence
^( WLN1+1, WLN1+33
^(0 WLN1+1, WLN1+4, WLN1+9
^(1 SLOW+4
^(2 DAT+5, LREND*
^(3 DAT+4, WLN1+20*

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
% YN*, SLOQ+2!
%DT WLN1+14~, SLOQ+4!
%DT("B" WLN1+15*
%H DAT+2*, SLOQ+4!
%X SLOQ+4!
%Y SLOQ+4!
A SLOQ+2!
AGE SLOQ+2!
B SLOQ+4!
C SLOQ+4!
D SLOQ+4!
D0 SLOQ+5!
D1 SLOQ+2!
DA SLOQ+4!
DFN WLN1+4*, SLOQ+2!
DIC EP+3!, L10!, SLOQ+2!
DIE SLOQ+2!
DIR WLN+4!, WLN+8!, SLOQ+2!, REV+1~, VERDIS+2~
DIR("?" WLN+6*, REV+4*, REV+5*, REV+6*, VERDIS+5*, VERDIS+6*, VERDIS+7*
DIR("A" WLN+6*, REV+3*, VERDIS+4*
DIR("B" WLN+7*, REV+2*, VERDIS+3*
DIR(0 WLN+5*, REV+2*, VERDIS+3*
DIROUT REV+1~, VERDIS+2~
DIRUT WLN+4!, WLN+9, REV+1~, REV+8, VERDIS+2~, VERDIS+9
DL SLOQ+2!
DLAYGO SLOQ+2!
DOB SLOQ+2!
DQ SLOQ+2!
DR SLOQ+2!, SLOQ+4!
DTOUT WLN+4!, REV+1~, VERDIS+2~
DUOUT EP+3!, YN*, WLN+4!, REV+1~, VERDIS+2~
DUZ SLOW+3, QUIT+1
DUZ(2 EP+13, EP+15
DX SLOQ+2!
G SLOQ+4!
G1 SLOQ+4!
G2 SLOQ+4!
G4 SLOQ+4!
GLB SLOQ+5!
HRCN WLN1+7, SLOQ+9!
I DAT+4*, SLOQ+2!
J SLOQ+2!
LRA1 WLN1+14~, WLN1+16*, WLN1+18
LRA2 WLN1+14~, WLN1+16*, WLN1+18
LRA3 WLN1+14~, WLN1+16*, WLN1+18
LRAA EP+9*, EP+12, EP+16, SLOW, DAT+4, DAT+5, WLN+1, WLN1, WLN1+1, WLN1+3
, WLN1+9, WLN1+11, WLN1+13, WLN1+16, WLN1+18*, WLN1+20, WLN1+22, WLN1+23, WLN1+26, LREND
, NEXT+1, QUIT+2, SLOQ+5!
LRAB L10!
LRACC SLOQ+2!
LRACD SLOQ+4!
LRAD EP+9*, DAT, DAT+1, DAT+4, DAT+5, WLN+1, WLN1, WLN1+1, WLN1+3, WLN1+9
, WLN1+11, WLN1+13, WLN1+16, WLN1+18*, WLN1+20, WLN1+22, WLN1+23, WLN1+26, LREND, NEXT+1
, SLOQ+2!
LRAL SLOQ+10!
LRALERT SLOQ+10!
LRALL SLOQ+2!
LRAN EP+9*, DAT+3, DAT+4*, DAT+5*, WLN+1, WLN+3*, WLN+7, WLN+10*, WLN+11, WLN1
, WLN1+1, WLN1+3, WLN1+9, WLN1+11, WLN1+13, WLN1+16, WLN1+18*, WLN1+20, WLN1+22, WLN1+23
, WLN1+26, LREND, NEXT+1*, NEXT+2*, SLOQ+2!
LRAOD SLOQ+4!
LRCDT WLN1+11*, WLN1+15, WLN1+19, WLN1+23*, WLN1+24*, SLOQ+2!
LRCFL SLOQ+5!
LRCMTDSP SLOQ+5!
LRCNT SLOQ+5!
LRCODE SLOQ+5!
LRCODEN SLOQ+5!
LRCSQ QUIT+1!, QUIT+2
LRCSQQ SLOQ+14!
LRCW EP+2*, SLOQ+2!
LRCWT SLOQ+5!
LRDAT SLOQ+2!
LRDEL L10!
LRDFN WLN1+1*, WLN1+2, WLN1+4, WLN1+30, SLOQ+2!
LRDIYCNT SLOQ+10!
LRDPF WLN1+4*, WLN1+9, SLOQ+2!
LRDUZ EP+15~
LRDUZ(2 EP+15*
LRDV SLOQ+2!
LRDVF SLOQ+2!
LREAL SLOQ+2!
LREDIT SLOQ+2!
LREDT SLOQ+4!
LREND EP+2*, EP+5, EP+7, EP+16, DAT+3, L10+1, LREND+1*, NEXT+2*, SLOQ+2!, REV+8*
, VERDIS+9*
LREXEC SLOQ+4!
>> LRFASTS L11
LRFLG SLOQ+2!
LRFP L10!
LRGVP SLOQ+4!
LRI SLOQ+5!
LRIDIV SLOQ+12!
LRIDT WLN1+26*, WLN1+27, WLN1+30, SLOQ+2!
LRINI SLOQ+2!
LRIOZERO SLOQ+4!
LRLCT SLOQ+2!
LRLDT L10!
LRLLOC SLOQ+2!
LRM LREND+1!, SLOQ+4!
LRMA SLOQ+4!
LRMAX2 SLOQ+5!
LRMAXX SLOQ+5!
LRMETH SLOQ+2!
>> LRMIDEF SLOW+4*
>> LRMIOTH SLOW+4*
LRMX SLOQ+5!
LRNAME L10!, SLOQ+4!
LRNDISP SLOQ+10!, VERDIS+10*
LRNG L10!
LRNG2 SLOQ+2!
LRNG3 SLOQ+2!
LRNG4 SLOQ+3!
LRNG5 SLOQ+3!
LRNOCODE SLOQ+10!
LRNOW SLOQ+5!
LRNT SLOQ+3!
LRNTN SLOQ+3!
LRNX SLOQ+3!
LRODT WLN1+1*, WLN1+33, WLN1+34, SLOQ+3!
LRODTSV SLOQ+5!
LROLLOC SLOQ+12!
LRORD WLN1+1*, LREND+1!, SLOQ+4!
LRORIFN SLOQ+12!
LROUTINE SLOQ+3!
LROWLE SLOQ+3!
LRP SLOQ+5!
LRPANEL EP+2*, SLOQ+10!
>> LRPARAM EP+16
LRPER EP+3!, SLOQ+2!, REV+9*
LRPLOC SLOQ+4!
LRPN SLOQ+5!
LRPRAC SLOQ+12!
>> LRPTP SLOW+4*
LRQC SLOQ+5!
LRRB SLOQ+12!
LRREP SLOQ+10!
LRSA SLOQ+4!
LRSAMP SLOQ+3!
LRSB SLOQ+4!
LRSD SLOQ+12!
LRSDT SLOQ+4!
LRSET L10!
LRSN WLN1+1*, WLN1+33, WLN1+34, SLOQ+3!
LRSNSV SLOQ+5!
LRSPEC SLOQ+2!
LRSPN SLOQ+5!
LRSS SLOW*, SLOW+2, SLOW+7, SLOQ+3!
LRSSC SLOQ+5!
LRSSCX SLOQ+5!
LRSSP SLOQ+3!
LRSSQ SLOQ+4!
LRSTATUS WLN1+16*, SLOQ+10!
LRSTD SLOQ+5!
LRSUB SLOQ+3!
LRSUFO SLOQ+14!
LRT SLOQ+5!
LRTEC SLOW+3*, SLOQ+3!
LRTEST L10!
LRTIM SLOQ+10!
LRTIME SLOQ+5!
LRTK SLOQ+4!
LRTM60 DAT+2*, SLOQ+10!
LRTN SLOQ+3!
LRTNSV SLOQ+5!
LRTREA SLOQ+12!
LRTS SLOQ+3!
LRTT SLOQ+12!
LRTX L10!, SLOQ+4!
LRTY SLOQ+5!
LRUID EP+2*, WLN+1*, WLN1+3*, SLOQ+12!
LRUN SLOQ+10!
LRURG SLOQ+4!
LRUSI SLOW+3, SLOQ+3!
LRUSNM SLOQ+3!
LRVBY EP+10~*, EP+11, EP+12, WLN+1
LRVERVER L10!
LRVF SLOQ+2!
LRVOL SLOQ+4!
LRVRM SLOQ+4!
LRWDTL SLOQ+4!
LRWRD WLN1+9, SLOQ+3!
LRX SLOQ+10!
LRXD SLOQ+3!
LRXDH SLOQ+4!
LRXDP SLOQ+3!
N SLOQ+4!
NAME SLOQ+14!
NODE SLOQ+5!
NODE0 SLOQ+5!
NOW SLOQ+5!
PNM WLN1+7, SLOQ+3!
POP SLOQ+4!
S SLOQ+3!
S2 SLOQ+5!
SEX SLOQ+3!
SSN SLOQ+3!
T L10!
T1 SLOQ+4!
U EP+16, SLOW, SLOW+4, DAT+2, DAT+4, DAT+5, WLN1+1, WLN1+4, WLN1+9, WLN1+11
, WLN1+13, WLN1+20, WLN1+22, WLN1+23, WLN1+26, WLN1+34, LREND, QUIT+2
>> VA("BID" SLOQ+3!
>> VA("PID" SLOQ+3!
W SLOQ+10!
X EP+13*, EP+14, EP+15, SLOW+3*, DAT+2, SLOQ+3!, REV+1~, VERDIS+2~
X1 SLOQ+3!
X2 SLOQ+3!
X3 SLOQ+3!
X9 SLOQ+4!
Y L10!, WLN+10, SLOQ+3!, SLOQ+5!, SLOQ+10!, REV+1~, REV+9, VERDIS+2~, VERDIS+10
Z L10!, SLOQ+3!, SLOQ+10!
Z1 SLOQ+4!, SLOQ+10!
Z2 SLOQ+4!, SLOQ+10!
ZTSK SLOQ+5!
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All