Routine: BLRRLEVT

Information

BLRRLEVT ;cmi/anch/maw - BLR Reference Lab Event ; 13-Oct-2017 14:04 ; MAW

Source Information

Call Graph

Call Graph Total: 10

Package	Total	Call Graph
IHS Changes To Lab	6	BILL^BLRAG05C $$COM^BLRRLCOM ($$ACC,$$BTP,$$CLIENT,$$ORD,BILL,CLIENTG,DX)^BLRRLEDI (PRTLC,SHIPMAN)^BLRRLEVN CLIENT^BLRRLHL ADDDX^BLRRLHL2
VA Fileman	4	UPDATE^DIE ^DIK $$GET1^DIQ ^DIR

Caller Graph

Caller Graph Total: 4

Package	Total	Caller Graph
IHS Changes To Lab	4	BLRAG05 BLREVTQ BLRRLEV2 BLRRLEVN

Entry Points

Name	Comments	DBIA/ICR reference
ACC	;EP - cmi/flag/maw added the following for ref lab accessions
SETAO(RO,TS)	;-- setup the ask at order array from whats in the BLRRLO global
SENDOUT(AC,LRT)	;-- check if a valid sendout test
CHECKMAP(INST,TS)	;-- there can be multiple entries mapped
CLNAO(L,T)	;-- clean ot the ask at order questions
FLAO(RLC,T,RL,ACC,LEDI)	;-- file the ask at order questions
DISAAQ(BLRCNT,TIEN,AAQ)	;-- display the ask at order questions
CODE(RL,TST)
TMPSET(BLRSHP)	;-- setup the array for the shipping manifest
LEDI	;-- LEDI III insurance stuff
AAA
LEDIAAA	;-- ledi ask at order question
NOMAP(RL,TST,LOC)	;-- check if the test is mapped

External References

Name	Field # of Occurrence
BILL^BLRAG05C	AAA+13
$$COM^BLRRLCOM	LEDIAAA+1, AAA
$$ACC^BLRRLEDI	LEDI+40, ACC+31
$$BTP^BLRRLEDI	LEDI+53
$$CLIENT^BLRRLEDI	LEDI+43
$$ORD^BLRRLEDI	LEDI+39, ACC+30
BILL^BLRRLEDI	LEDI+52, AAA+34
CLIENTG^BLRRLEDI	AAA+24, AAA+26, AAA+31
DX^BLRRLEDI	LEDI+51, AAA+32
PRTLC^BLRRLEVN	LEDI+36, AAA+23
SHIPMAN^BLRRLEVN	AAA+63
CLIENT^BLRRLHL	AAA+24, AAA+26
ADDDX^BLRRLHL2	AAA+39
UPDATE^DIE	FLAO+15
^DIK	CLNAO+4
$$GET1^DIQ	NOMAP+3, NOMAP+4
^DIR	LEDIAAA+5, AAA+3, DISAAQ+11, DISAAQ+17

Name	Line Occurrences
Function Call: WRITE	Prompt: !,A_") ",$P(AAQ(TIEN,A),U,2),?50,$P(AAQ(TIEN,A),U,3) Line Location: DISAAQ+5
Function Call: WRITE	Prompt: ! Line Location: DISAAQ+6
Routine Call	DIE Line Location: FLAO+15
Routine Call	DIR Line Location: LEDIAAA+5 AAA+3 DISAAQ+11 DISAAQ+17

FileNo	Call Tags
^SC - [#44]	GET1^DIQ
^BLRSITE - [#9009029]	GET1^DIQ

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^BLRRL - [#9009026]	ACC+19, CODE+2, CODE+4, CODE+5
^BLRRL("ALP"	CODE+3, NOMAP+6
^BLRRLO - [#9009026.3]	LEDI+33, SETAO+3, SETAO+4, CLNAO+1, AAA+20
^BLRRLO("ACC"	LEDI+32, ACC+31, AAA+19
^BLRRLO("B"	LEDI+27, ACC+29
^BLRSITE - [#9009029]	LEDI+10, LEDI+23, LEDI+48, LEDI+49, SENDOUT+5, ACC+1, ACC+8, ACC+14, ACC+15, ACC+16 , AAA+28, AAA+33, AAA+38
^BLRSITE("ACC"	SENDOUT+11, ACC+24
^DPT - [#2]	AAA+60, AAA+61
^LAB(60 - [#60]	SENDOUT+8, SENDOUT+9
^LAHM(62.9 - [#62.9]	NOMAP+4, CHECKMAP+3, CHECKMAP+4
^LR - [#63]	AAA+57, AAA+58
^LRO(68 - [#68]	ACC+22, ACC+28, AAA+51, AAA+55
^SC - [#44]	LEDI+8, LEDI+9, ACC+6, ACC+7
^TMP("BLRRL"	TMPSET+6, TMPSET+13, TMPSET+21, TMPSET+27

Name	Line Occurrences
$$CHECKMAP	NOMAP+5
$$NOMAP	LEDI+25, ACC+18
AAA	AAA+4
CLNAO	FLAO+1, AAA+5
DISAAQ	LEDIAAA+7, AAA+5
FLAO	LEDIAAA+8, AAA+6
LEDI	ACC+1
LEDIAAA	LEDI+42, LEDIAAA+6

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
A	DISAAQ+1~, DISAAQ+3*, DISAAQ+5
AAQ	DISAAQ~
AAQ(	DISAAQ+3, DISAAQ+5, DISAAQ+15, DISAAQ+16
AC	SENDOUT~, SENDOUT+1, SENDOUT+11
ACC	FLAO~, FLAO+11
ACCA	SENDOUT+3~, SENDOUT+9*, SENDOUT+10, SENDOUT+11
ADA	SETAO+1~, SETAO+3, SETAO+4, SETAO+6, SENDOUT+7~, SENDOUT+8, SENDOUT+9
ANS	SETAO+1~, SETAO+5, SETAO+6, FLAO+3~, FLAO+7, FLAO+13
AREA	SENDOUT+3~
BLRA	LEDI+1~, LEDI+40, LEDI+41, ACC+31
>> BLRAGUI	LEDI+49, LEDI+52, LEDI+53, ACC+12, AAA+34, AAA+47, AAA+63
BLRALTDZ	LEDI+9, LEDI+10, LEDI+11, LEDI+23, LEDI+48, LEDI+49, SENDOUT+5, ACC+1, ACC+7, ACC+8 , ACC+9, ACC+13, ACC+14!, ACC+15!, ACC+16, ACC+24, AAA+28, AAA+33, AAA+38
>> BLRASFLG	LEDI+43, LEDI+44, AAA+30, AAA+36
BLRB	LEDI+1~, LEDI+48, LEDI+52, AAA+33, AAA+34
>> BLRBT	LEDI+53, AAA+13, AAA+14
BLRC	LEDI+1~, LEDI+43*
BLRCNT	LEDIAAA+7, AAA+5, DISAAQ~, DISAAQ+1~, DISAAQ+2, DISAAQ+4, DISAAQ+9
BLRDA	TMPSET+1~, TMPSET+2, TMPSET+3, TMPSET+5, TMPSET+6, TMPSET+7~, TMPSET+8, TMPSET+9, TMPSET+10, TMPSET+12 , TMPSET+13, TMPSET+14~, TMPSET+15, TMPSET+16, TMPSET+17, TMPSET+19, TMPSET+20, TMPSET+21, TMPSET+22~, TMPSET+23 , TMPSET+24, TMPSET+25, TMPSET+26, TMPSET+27
BLRDATA	TMPSET+1~, TMPSET+5, TMPSET+6, TMPSET+7~, TMPSET+12, TMPSET+13, TMPSET+14~, TMPSET+20, TMPSET+21, TMPSET+22~ , TMPSET+26, TMPSET+27
BLRDFLG	LEDI+50!, AAA+29!
BLRDXS	LEDI+50!, AAA+29!
BLRIEN	TMPSET+7~, TMPSET+10, TMPSET+11, TMPSET+12, TMPSET+13, TMPSET+14~, TMPSET+17, TMPSET+18, TMPSET+19, TMPSET+20 , TMPSET+21, TMPSET+22~, TMPSET+25*, TMPSET+26, TMPSET+27
>> BLRINS	LEDI+52, LEDI+53*, AAA+34
>> BLRLCLNT(	LEDI+37, AAA+24, AAA+25
BLRLDIO	ACC+3~
>> BLRLEDI	LEDI+3*
BLRNORD	LEDI+31~, LEDI+33, LEDI+34, LEDI+35, LEDI+36, LEDI+37, LEDI+38, AAA+18~, AAA+20, AAA+21 , AAA+22, AAA+23, AAA+24, AAA+25
BLRNORDI	LEDI+31~, LEDI+32, LEDI+33, AAA+18~, AAA+19, AAA+20
BLRO	LEDI+27, LEDI+39, LEDI+54!, LEDIAAA+8, ACC+29, ACC+30, AAA+5, AAA+6
BLROEN	TMPSET+14~, TMPSET+19*, TMPSET+20, TMPSET+21, TMPSET+22~
>> BLROPT	LEDI+28, ACC+12, AAA+15, AAA+47
>> BLRORDLC(	LEDI+35, AAA+22
>> BLRPHASE	LEDI+22, ACC+4, ACC+10
>> BLRRDA	CODE+3*, CODE+4, CODE+5
BLRRL	ACC+2!
BLRRL(	AAA+53*
BLRRL("ACCCHECK"	ACC+21, ACC+22, ACC+23, ACC+24
BLRRL("ALTDUZ2"	ACC+13*, ACC+14!, ACC+15!
BLRRL("BILL T	YPE" , LEDI+53, AAA+13, AAA+14*, AAA+40
BLRRL("LRTS"	ACC+25*, ACC+26, AAA, AAA+5
BLRRL("ORD"	AAA+52*
BLRRL("PAT"	ACC+20*
BLRRL("RL"	LEDI+23, LEDI+24, LEDI+25, ACC+16, ACC+17, ACC+18, ACC+19, ACC+24
BLRRL("RLE"	ACC+19*
BLRRLC	LEDI+2!, LEDI+46!, LEDI+54!, SETAO+2!, LEDIAAA+7, LEDIAAA+8, ACC+2!, AAA+5, AAA+6
BLRRLC(	SETAO+6, DISAAQ+19
BLRRLC(0	LEDIAAA+1, LEDIAAA+3, AAA, AAA+1
>> BLRRLCLA	AAA+26
>> BLRRLCNT	ACC+32*
>> BLRRLSUC	LEDIAAA+1, AAA
BLRSHP	TMPSET~
BLRSHP(	TMPSET+2, TMPSET+5, TMPSET+8, TMPSET+10, TMPSET+12, TMPSET+15, TMPSET+17, TMPSET+19, TMPSET+20, TMPSET+23 , TMPSET+25, TMPSET+26
BLRSHPC	CODE+1!, CODE+5*, CODE+8
BLRTCODE	CODE+1!, CODE+3, CODE+4*, CODE+6, CODE+7, CODE+8
>> BLRTS	LEDI+4, LEDI+25, LEDI+42, LEDIAAA+1, LEDIAAA+7, LEDIAAA+8, ACC+27, AAA+5, AAA+6, AAA+7 , AAA+8
>> BLRTSTDA	AAA+8*, AAA+53
>> BT	LEDI+53*
DA	CLNAO+1*, CLNAO+5!
DA(1	CLNAO+2*, CLNAO+3
DATA	SETAO+1~, SETAO+4*, SETAO+5
>> DFN	LEDI+36, LEDI+39, LEDI+40, ACC+20, ACC+30, ACC+31, AAA+23
DIK	CLNAO+3*, CLNAO+5!
DIR	DISAAQ+8!, DISAAQ+14!
DIR("A"	LEDIAAA+4, AAA+2, DISAAQ+10, DISAAQ+15
DIR("B"	LEDIAAA+4, AAA+2, DISAAQ+16*
DIR(0	LEDIAAA+4, AAA+2, DISAAQ+9, DISAAQ+15
>> DIRUT	DISAAQ+12, DISAAQ+18
DOB	AAA+49!, AAA+60*
DUZ(2	LEDI+9, LEDI+10, LEDI+23, LEDI+48, LEDI+49, SENDOUT+5, ACC+1, ACC+8, ACC+16, ACC+24 , AAA+28, AAA+33, AAA+38
FDA	FLAO+2~, FLAO+16!
FDA(	FLAO+10, FLAO+11, FLAO+12, FLAO+13, FLAO+14*
FERR	FLAO+2~, FLAO+16!
FIENS	FLAO+2~, FLAO+9*, FLAO+10, FLAO+11, FLAO+12, FLAO+13, FLAO+14, FLAO+16!
IEN	NOMAP+2~
INST	CHECKMAP~, CHECKMAP+3
L	CLNAO~, CLNAO+1, CLNAO+2
LEDI	FLAO~, FLAO+1
LOC	NOMAP~, NOMAP+3
>> LRAA	ACC+21, ACC+28, AAA+51, AAA+55
>> LRACC	ACC+22
>> LRAD	ACC+28, AAA+51, AAA+55
>> LRAN	ACC+28, AAA+51, AAA+55
>> LRCDT	LEDI+40, LEDI+52, ACC+31, AAA+34
>> LRDUZ(2	LEDI+11, ACC+9
>> LRLLOC	LEDI+36, AAA+23
>> LRODT	LEDI+36, AAA+23
>> LROLLOC	LEDI+7, LEDI+8, LEDI+9, LEDI+25, ACC+5, ACC+6, ACC+7, ACC+18
>> LRORD	LEDI+27, LEDI+34, LEDI+38, LEDI+39, LEDI+40, LEDI+43, LEDI+51, LEDI+52, LEDI+53, ACC+28 , ACC+29, ACC+30, ACC+31, AAA+21, AAA+26, AAA+31, AAA+32, AAA+34, AAA+39
>> LRPRAC	LEDI+36, AAA+23
>> LRQUIET	LEDI+28, LEDIAAA+3, AAA+1, AAA+12, AAA+15, AAA+26, AAA+28, AAA+38
LRT	SENDOUT~, SENDOUT+1, SENDOUT+8, SENDOUT+9
>> LRTS	LEDI+4, ACC+18, ACC+25, ACC+27
>> LRTSORU	LEDI+4, ACC+25, ACC+27
>> LRTSTS	LEDI+4, LEDI+36, AAA+23
>> LRUID	LEDI+32, LEDI+36, LEDI+40, LEDI+43, LEDI+52, LEDIAAA+8, ACC+31, AAA+6, AAA+19, AAA+23 , AAA+24, AAA+26, AAA+31, AAA+34
MAPPED	NOMAP+2~, NOMAP+4, NOMAP+5*
MATCH	SENDOUT+3~, SENDOUT+4, SENDOUT+8, SENDOUT+11, SENDOUT+12, CHECKMAP+1~, CHECKMAP+2, CHECKMAP+4, CHECKMAP+5
MDA	CHECKMAP+1~, CHECKMAP+3*, CHECKMAP+4
ORDLINST	NOMAP+2~, NOMAP+3*, NOMAP+4, NOMAP+5
ORDNUM	AAA+50~, AAA+51*, AAA+52, AAA+53, AAA+63
PA	AAA+54~, AAA+58*, AAA+59, AAA+60, AAA+61
PAI	AAA+54~, AAA+55*, AAA+56, AAA+57, AAA+58
QUES	SETAO+1~, SETAO+5, SETAO+6, FLAO+3~, FLAO+6, FLAO+12
RDA	FLAO+3~, FLAO+4*, FLAO+5, FLAO+6, FLAO+7, FLAO+8
RES	DISAAQ+7~, DISAAQ+13*, DISAAQ+15, DISAAQ+16, DISAAQ+19
RIEN	FLAO+3~, FLAO+5*, FLAO+6, FLAO+7, FLAO+8
RL	FLAO~, FLAO+1, FLAO+9, SENDOUT+3~, SENDOUT+5*, SENDOUT+6, CODE~, CODE+2, CODE+3, CODE+4 , CODE+5, NOMAP~, NOMAP+6
RLC	FLAO~
RLC(	FLAO+4, FLAO+5, FLAO+6, FLAO+7, FLAO+8
RO	SETAO~, SETAO+3, SETAO+4
RSC	SETAO+1~, SETAO+5, SETAO+6, FLAO+3~, FLAO+8, FLAO+14
SEX	AAA+49!, AAA+61*
T	FLAO~, FLAO+1, FLAO+10, CLNAO~, CLNAO+1
TIEN	DISAAQ~, DISAAQ+3, DISAAQ+5, DISAAQ+15, DISAAQ+16, DISAAQ+19
TS	SETAO~, SETAO+3, CHECKMAP~, CHECKMAP+4
TST	SETAO+1~, SETAO+5*, SETAO+6, CODE~, CODE+3, NOMAP~, NOMAP+5, NOMAP+6
U	LEDI+8, LEDI+9, LEDI+33, LEDI+48, LEDI+49, SETAO+5, SETAO+6, LEDIAAA+1, FLAO+6, FLAO+7 , FLAO+8, SENDOUT+9, ACC+1, ACC+6, ACC+7, ACC+14, ACC+15, ACC+19, AAA, AAA+20 , AAA+28, AAA+33, AAA+38, AAA+55, AAA+57, AAA+58, AAA+60, AAA+61, CODE+4, CODE+5 , CODE+8, DISAAQ+5, DISAAQ+15, DISAAQ+16, DISAAQ+19
>> XQY0	LEDIAAA+1, AAA
>> Y	LEDIAAA+6, AAA+4, DISAAQ+13, DISAAQ+19

Customize PDF page

Package: IHS Changes To Lab

Routine: BLRRLEVT

Information

Source Information

Call Graph

Call Graph Total: 10

Caller Graph

Caller Graph Total: 4

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Local Variables

Legend: