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

Package: Lab Service

Routine: LRCKF60


Information

LRCKF60 ;SLC/RWF - CHECK FILE 60 ;4/4/89 20:36 ;

Source Information

Source file <LRCKF60.m>

Entry Points

Name Comments DBIA/ICR reference
ENT ;from LRCKF
END
NAME
CHK
C2 ;I $P(LA0,U,6),$D(^LRO(68,+$P(LA0,U,6),0))[0 D NAME W "F- BAD pointer to the Accession file."
PANEL
SPEC
COLSAMP
LROKCS
CAP

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!
  • Line Location: LRCKF60+2
Function Call: WRITE
  • Prompt: @IOF
  • Condition for execution: $E(IOST,1,2)="P-"
  • Line Location: LRCKF60+2
Function Call: WRITE
  • Prompt: !," CHECKING LAB TEST FILE ^LAB(60 ",!," DD VERSION is ",$S($D(^DD(60,0,"VR"))#2:^("VR"),1:"Missing"),!
  • Line Location: ENT+1
Function Call: WRITE
  • Prompt: !!
  • Line Location: END+0
Function Call: WRITE
  • Prompt: @IOF
  • Condition for execution: $E(IOST,1,2)="P-"
  • Line Location: END+0
Function Call: WRITE
  • Prompt: !!,$P(^LAB(60,DA,0),U)
  • Line Location: NAME+0
Function Call: WRITE
  • Prompt: !,?5
  • Line Location: NAME+1
Function Call: WRITE
  • Prompt: !!,"ENTRY ",DA," HAS NO ZERO NODE.. REMOVED"
  • Line Location: CHK+0
Function Call: WRITE
  • Prompt: "F- A test can NOT be Atomic and Cosmic at the same time."
  • Line Location: CHK+3
Function Call: WRITE
  • Prompt: "W- Atomic test has no site/specimen, therefore no units or range."
  • Line Location: CHK+4
Function Call: WRITE
  • Prompt: "F- Test MUST have a HIGHEST URGENCY ALLOWED value."
  • Line Location: CHK+5
Function Call: WRITE
  • Prompt: "F- Atomic test has a location but not a DATA NAME."
  • Line Location: CHK+6
Function Call: WRITE
  • Prompt: "F- The data name field must be re-entered to set up location & field."
  • Line Location: CHK+7
Function Call: WRITE
  • Prompt: "F- BAD Data name."
  • Line Location: CHK+8
Function Call: WRITE
  • Prompt: "F- Needs a print name entered."
  • Line Location: CHK+10
Function Call: WRITE
  • Prompt: "F- BAD print code."
  • Line Location: CHK+11
Function Call: WRITE
  • Prompt: "W- Does not have a print order."
  • Line Location: CHK+12
Function Call: WRITE
  • Prompt: "F- BAD pointer to the Accession file."
  • Line Location: C2+0
Function Call: WRITE
  • Prompt: "F- BAD Lab collection sample pointer to the Collection sample file."
  • Line Location: C2+1
Function Call: WRITE
  • Prompt: "F- BAD pointer to the Procedure file."
  • Line Location: C2+2
Function Call: WRITE
  • Prompt: "F- BAD Edit code pointer to the Execute code file."
  • Line Location: C2+3
Function Call: WRITE
  • Prompt: "F- BAD 'Batch data code' pointer to the execute code file."
  • Line Location: C2+4
Function Call: WRITE
  • Prompt: "F- BAD pointer in panel.. "
  • Line Location: PANEL+0
Function Call: WRITE
  • Prompt: "F- Test is on it's own panel. (infinite loop)"
  • Line Location: PANEL+1
Function Call: WRITE
  • Prompt: "F- BAD entry in specimen/site subfile. ",LRSSP
  • Line Location: SPEC+0
Function Call: WRITE
  • Prompt: "F- BAD specimen/site subfile pointer to file #61."
  • Line Location: SPEC+1
Function Call: WRITE
  • Prompt: "F- BAD type of delta check pointer."
  • Line Location: SPEC+2
Function Call: WRITE
  • Prompt: "F- BAD collection sample pointer to file #62."
  • Line Location: COLSAMP+0
Function Call: WRITE
  • Prompt: "F- BAD required comment pointer to execute code file."
  • Line Location: COLSAMP+1
Function Call: WRITE
  • Prompt: "W- ",$S(LRLCS:"LAB ",1:""),"Collection sample ",$P(^LAB(62,+X,0),U)," does not have a matching Site/Specimen entry."
  • Line Location: LROKCS+2
Info |  Source |  Entry Points |  Interaction Calls