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

Package: Lab Service

Routine: LRCKF68


Information

LRCKF68 ;SLC/RWF - CHECK FILE 68 ; 8/27/87 10:32 ;

Source Information

Source file <LRCKF68.m>

Call Graph

Call Graph Total: 4

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

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Lab Service 1 LRCKF  

Entry Points

Name Comments DBIA/ICR reference
LRAN
NAME
LRAD
ENT ;from LRCKF
CHK68
TEST
INST
SPEC

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

Global Variables Directly Accessed

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

Label References

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

Naked Globals

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

Local Variables

Legend:

>> 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*
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All