Routine: LRCKF68

Package	Total	Call Graph
Lab Service	2	LOG^LRCKF DD^LRX
Kernel	1	^%ZISC
VA Fileman	1	YN^DICN

Package	Total	Caller Graph
Lab Service	1	LRCKF

Entry Points

External References

Name	Field # of Occurrence
^%ZISC	LRCKF68+3
YN^DICN	LRCKF68+3
LOG^LRCKF	LRCKF68+3
DD^LRX	NAME+1

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !,"QUICK REVIEW" Line Location: LRCKF68+3
Function Call: WRITE	Prompt: !! Line Location: LRCKF68+3
Function Call: WRITE	Prompt: @IOF Condition for execution: $E(IOST,1,2)="P-" Line Location: LRCKF68+3
Function Call: WRITE	Prompt: !," CHECKING FILE 68" Line Location: ENT+1
Function Call: WRITE	Prompt: !! Line Location: ENT+3
Function Call: WRITE	Prompt: @IOF Condition for execution: $E(IOST,1,2)="P-" Line Location: ENT+3
Function Call: WRITE	Prompt: !,"** ACCESSION AREA # "_LRAA_" IS CORRUPTED **",! Line Location: LRAD+0
Function Call: WRITE	Prompt: W Condition for execution: $Y'<IOSL @IOF W !,"ACCESSION AREA: ",$P(LR0,U) I '$L($P(LR0,U,2)) Line Location: LRAD+1
Function Call: WRITE	Prompt: !?5,"F- Missing the LR SUBSCRIPT entry." Line Location: LRAD+1
Function Call: WRITE	Prompt: !?5,"W- Missing print order." Line Location: LRAD+2
Function Call: WRITE	Prompt: !?5,"F- Has no ABBREVIATION." Line Location: LRAD+3
Function Call: WRITE	Prompt: !?5,"W- missing the Clean up field." Line Location: LRAD+4
Function Call: WRITE	Prompt: !?5,"F- BAD common accession # pointer to the accession file." Line Location: LRAD+5
Function Call: WRITE	Prompt: !?5,"F- BAD accession transform pointer to the execute code file." Line Location: LRAD+6
Function Call: WRITE	Prompt: !?5,"F- Accession transform field and execute code file don't match." Line Location: LRAD+7
Function Call: WRITE	Prompt: !?5,"F- BAD verification code pointer to the execute code file." Line Location: LRAD+8
Function Call: WRITE	Prompt: !?5,"F- Verification code and execute code file don't match." Line Location: LRAD+9
Function Call: WRITE	Prompt: !!,"ACCESSION AREA: ",$P(^LRO(68,LRAA,0),U)," for date: ",Y Line Location: NAME+1
Function Call: WRITE	Prompt: !,"ACCESSION: ",LRACC Line Location: NAME+2
Function Call: WRITE	Prompt: !?5,"F- Entry ",LRDFN," in ^LR( is missing." Line Location: CHK68+2
Function Call: WRITE	Prompt: !?5,"F- Does not have an ACCESSION." Line Location: CHK68+3
Function Call: WRITE	Prompt: !?5,"W- Does not have an LRORDER number." Line Location: CHK68+5
Function Call: WRITE	Prompt: !?5,"W- Does not have an Order on file." Line Location: CHK68+6
Function Call: WRITE	Prompt: !?5,"F- BAD pointer to test file (60)." Line Location: TEST+0
Function Call: WRITE	Prompt: !?5,"F- BAD pointer to urgency file (62.05)." Line Location: TEST+1
Function Call: WRITE	Prompt: !?5,"W- Accession points to a load/work list entry that is missing" Line Location: TEST+3
Function Call: WRITE	Prompt: !?5,"W- Load/work list (",LRLL,";",LRTRAY,";",LRCUP,") doesn't point back to here. (",$P(L,U,1,3),")" Line Location: TEST+4
Function Call: WRITE	Prompt: !?5,"F- BAD pointer to the specimen file (61)." Line Location: SPEC+0
Function Call: WRITE	Prompt: !?5,"F- BAD pointer to collection file (62)." Line Location: SPEC+1
Function Call: WRITE	Prompt: !?5,"F- BAD instrument pointer to the auto instrument file." Line Location: INST+0
Function Call: WRITE	Prompt: !?5,"F- BAD control name pointer to the control name file." Line Location: INST+1

Name	Line Occurrences (* Changed, ! Killed)
^LAB(60 - [#60]	TEST
^LAB(61 - [#61]	SPEC
^LAB(62 - [#62]	SPEC+1
^LAB(62.05 - [#62.05]	TEST+1
^LAB(62.07 - [#62.07]	LRAD+6, LRAD+7, LRAD+8, LRAD+9
^LAB(62.3 - [#62.3]	INST+1
^LAB(62.4 - [#62.4]	INST
^LR - [#63]	CHK68+1, CHK68+2
^LRO(68 - [#68]	ENT+2, LRAD, LRAD+1, LRAD+5, LRAD+7, LRAD+9, LRAD+10, LRAD+11, LRAN, NAME+1 , CHK68, CHK68+1, CHK68+7, CHK68+8, INST+1
^LRO(68.2 - [#68.2]	TEST+2
^LRO(69 - [#69]	CHK68+6

Name	Field # of Occurrence
^(	LRAD+7, LRAD+9, LRAD+10, CHK68+1, CHK68+7, CHK68+8, INST+1
^(0	LRAD+10, CHK68+1, CHK68+7, CHK68+8, TEST+2, INST+1

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> %	LRCKF68+3*
>> E	NAME, CHK68+2, CHK68+3, CHK68+5, CHK68+6, TEST, TEST+1, TEST+3, TEST+4, SPEC , SPEC+1*
>> E(8	ENT+1, NAME
>> I	ENT+1*
IO	ENT+1
IOF	LRCKF68+3, ENT+3, LRAD, LRAD+1, NAME+1
IOSL	LRAD, LRAD+1, NAME+1
IOST	LRCKF68+3, ENT+3
>> L	TEST+2*, TEST+3, TEST+4
>> LA	CHK68+1*, CHK68+6
>> LR0	LRAD+1*, LRAD+2, LRAD+3, LRAD+4, LRAD+5, LRAD+6, LRAD+7, LRAD+8, LRAD+9
>> LRAA	ENT+2*, LRAD, LRAD+1, LRAD+7, LRAD+9, LRAD+10, LRAD+11, LRAN, NAME+1, CHK68 , CHK68+1, CHK68+7, CHK68+8, TEST+4, INST+1
>> LRACC	NAME+2, CHK68+1, CHK68+3
>> LRAD	LRAD+11*, LRAN, NAME+1, CHK68, CHK68+1, CHK68+7, CHK68+8, TEST+4
>> LRAN	LRAN*, CHK68, CHK68+1, CHK68+3, CHK68+7, CHK68+8, TEST+4
>> LRCKW	LRAD+4, CHK68+5, CHK68+6
>> LRCT	INST+1*
>> LRCTRL	CHK68+1*, CHK68+4
>> LRCUP	TEST+2*, TEST+4
>> LRDFN	CHK68+1*, CHK68+2
>> LREND	LRCKF68+3
>> LRIN	LRAD+10*, INST+1
>> LRLL	TEST+2*, TEST+4
>> LRORDER	CHK68+1*, CHK68+5
LRPACC	ENT+1, ENT+3!, NAME+2
LRPWDT	ENT+1, ENT+3!, NAME+1
LRPWL	ENT+1, ENT+3!, NAME+1
LRQUICK	LRCKF68+3*, ENT+3!, LRAD+11
>> LRTRAY	TEST+2*, TEST+4
>> T	CHK68+7, CHK68+8
U	ENT+1*, LRAD+1, LRAD+2, LRAD+3, LRAD+4, LRAD+5, LRAD+6, LRAD+7, LRAD+8, LRAD+9 , NAME+1, CHK68+1, CHK68+6, TEST+1, TEST+2, TEST+4, SPEC+1
>> X	LRAD+10, CHK68+7, CHK68+8, TEST, TEST+1, TEST+2, SPEC, SPEC+1, INST, INST+1
>> Y	NAME+1, TEST+2
>> ZTRTN	LRCKF68+3*

Customize PDF page

Package: Lab Service

Routine: LRCKF68

Information

Source Information

Call Graph

Call Graph Total: 4

Caller Graph

Caller Graph Total: 1

Entry Points

External References

Interaction Calls

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend:

Name	Line Occurrences
CHK68	LRAN
ENT	LRCKF68+3
INST	LRAD+10
LRAD	ENT+2
LRAN	LRAD+11
NAME	CHK68+2, CHK68+3, CHK68+5, CHK68+6, TEST, TEST+1, TEST+3, TEST+4, SPEC, SPEC+1
SPEC	CHK68+8
TEST	CHK68+7