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

Entry Points

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

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"QUICK REVIEW"
  • Line Location: LRCKF68+2
Function Call: WRITE
  • Prompt: !!
  • Line Location: LRCKF68+2
Function Call: WRITE
  • Prompt: @IOF
  • Condition for execution: $E(IOST,1,2)="P-"
  • Line Location: LRCKF68+2
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
Info |  Source |  Entry Points |  Interaction Calls