Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Desc |  Directly Accessed By Routines |  Accessed By FileMan Db Calls |  Pointed To By FileMan Files |  Pointer To FileMan Files |  Fields |  ICR |  External References |  Global Variables Directly Accessed |  Naked Globals |  Local Variables |  All
Print Page as PDF
Global: ^LAB(61.3

Package: Lab Service

Global: ^LAB(61.3


Information

FileMan FileNo FileMan Filename Package
61.3 FUNCTION FIELD Lab Service

Description

Directly Accessed By Routines, Total: 38

Package Total Routines
Lab Service 34 LR7OSAP2    LR7OSBB1    LR7OSBR1    LRAPBK1    LRAPPF1    LRAPS1    LRAPS2    LRBLDEX1
LRBLDPA2    LRBLDPH    LRBLJA    LRBLJA1    LRBLJL    LRBLJPA2    LRBLJPH    LRBLPAB
LRBLPBR1    LRBLPD    LRBLPD1    LRBLPE    LRBLPEW    LRBLPR1    LRBLPUS    LRBLPUS1
LRBLPX    LRBLPX1    LRBLS    LRBLU    LRDPA2    WKLD CODE    ^LAB(61.3    LRPXAPIU
LRUCNBB    SYNONYMS    
IHS Changes To Lab 3 BLRLINKO    BLRLINKP    BLRLINKR    
Patient Care Component 1 APCHS3F    

Accessed By FileMan Db Calls, Total: 3

Package Total Routines
Lab Service 3 LRBLDA1    LRBLS    LRBLU    

Pointed To By FileMan Files, Total: 8

Package Total FileMan Files
Lab Service 4 FUNCTION FIELD(#61.3)[.04]    LAB DATA(#63)[#63.011(.01), #63.0112(.01), #63.0114(.01), #63.012(.01), #63.013(.01), #63.016(.01), #63.075(.01), #63.13(.01), #63.14(.01), #63.141(.01), #63.25(.01), #63.285(.01), #63.46(.01), #63.85(.01), #63.985(.01)]
BLOOD INVENTORY(#65)[#65.04(.01), #65.05(.01), #65.08(.01), #65.09(.01)]    BLOOD DONOR(#65.5)[#65.56(.01), #65.57(.01), #65.58(.01), #65.59(.01)]    
IHS Patient 2 V BLOOD BANK(#9000010.31)[.05]    V PATHOLOGY(#9000010.24)[#9000010.2424(.01)]    
IHS Changes To Lab 1 IHS LAB TRANSACTION LOG(#9009022)[1403]    
Medicine 1 SYMPTOM(#695.5)[1]    

Pointer To FileMan Files, Total: 3

Package Total FileMan Files
Lab Service 3 FUNCTION FIELD(#61.3)[.04]    LAB JOURNAL(#95)[#61.32(2)]    WKLD CODE(#64)[#61.34(.01)]    

Fields, Total: 11

Field # Name Loc Type Details
.01 NAME 0;1 FREE TEXT
************************REQUIRED FIELD************************

  • INPUT TRANSFORM:  K:$L(X)>30!($L(X)<1)!'(X'?1P.E)!(X'?.ANP) X
  • LAST EDITED:  FEB 09, 1989
  • HELP-PROMPT:  ANSWER MUST BE 1-30 CHARACTERS IN LENGTH
  • DESCRIPTION:  
    The name of the function.
  • DELETE TEST:  1,0)= I '$D(^XUSEC("LRLIASON",DUZ))
  • CROSS-REFERENCE:  61.3^B
    1)= S ^LAB(61.3,"B",$E(X,1,30),DA)=""
    2)= K ^LAB(61.3,"B",$E(X,1,30),DA)
.04 CORRESPONDING ANTIGEN/ANTIBODY 0;4 POINTER TO FUNCTION FIELD FILE (#61.3) FUNCTION FIELD(#61.3)

  • INPUT TRANSFORM:  S DIC("S")="I $P(^(0),U,5)=""AN""!($P(^(0),U,5)=""AB"")" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X
  • LAST EDITED:  SEP 27, 1987
  • DESCRIPTION:  
    Indicate which antigen or antibody that may be known by another name.
  • SCREEN:  S DIC("S")="I $P(^(0),U,5)=""AN""!($P(^(0),U,5)=""AB"")"
  • EXPLANATION:  SELECTS ONLY RED BLOOD CELL ANTIGENS OR ANTIODIES
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
.06 COMPATIBILITY FACTOR 0;6 NUMBER

  • INPUT TRANSFORM:  K:+X'=X!(X>1)!(X<0)!(X?.E1"."4N.N) X
  • LAST EDITED:  MAR 12, 1989
  • HELP-PROMPT:  Type a Number between 0 and 1, 3 Decimal Digits
  • DESCRIPTION:  If an antigen enter the incidence (as a decimal)
    in the population.  If an antibody enter the
    frequency the corresponding antigen is absent
    in the population.
2 SNOMED CODE 0;2 FREE TEXT
************************REQUIRED FIELD************************

  • INPUT TRANSFORM:  K:$L(X)>15!($L(X)<2)!'(X?.AN)!(X?1"F-".E)!(X?1"F"1N.E) X I $D(X) S Y=$O(^LAB(61.3,"C",X,0)) I Y>0 K:'$D(^LAB(61.3,Y,0)) ^LAB(61.3,"C",X,Y) I $D(^LAB(61.3,Y,0)) K X W *7,!," ALREADY AN ENTRY",! Q
  • LAST EDITED:  MAR 15, 2013
  • HELP-PROMPT:  ANSWER MUST BE 2-15 CHARACTERS IN LENGTH
  • DESCRIPTION:  
    The characters following "F-" in the SNOMED reference book.
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
  • CROSS-REFERENCE:  61.3^C
    1)= S ^LAB(61.3,"C",$E(X,1,30),DA)=""
    2)= K ^LAB(61.3,"C",$E(X,1,30),DA)
2.5 SECTION 0;3 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>30!($L(X)<2) X
  • HELP-PROMPT:  GB=general body EM=endocrine/metabolism RE=reproduction IM=immune HE=hem DU=digest/urinary CR=cardiovas/resp NM=nervous/musc PS=psyche/sexual EE=ent EF=environmental/forensic
  • DESCRIPTION:  
    The function's area by body system.
3 SYNONYMS 1;0 Multiple #61.31 61.31

  • DESCRIPTION:  
    This is a multiple field.  Enter synonyms or common misspellings of this function.
4 IDENTIFIER 0;5 SET
  • 'AN' FOR BLOOD GROUP ANTIGEN;
  • 'AB' FOR BLOOD GROUP ANTIBODY;
  • 'HL' FOR HLA ANTIGEN;

  • LAST EDITED:  JUL 31, 1984
  • DESCRIPTION:  
    This is a blood bank identifier.
  • CROSS-REFERENCE:  61.3^E
    1)= S ^LAB(61.3,"E",$E(X,1,30),DA)=""
    2)= K ^LAB(61.3,"E",$E(X,1,30),DA)
5 JOURNAL REFERENCE JR;0 Multiple #61.32 61.32

  • DESCRIPTION:  
    This is a multiple field.  You may enter Journal references that apply to this function.
6 ABBREVIATION 0;7 FREE TEXT

  • INPUT TRANSFORM:  K:X[""""!($A(X)=45) X I $D(X) K:$L(X)>5!($L(X)<1) X
  • LAST EDITED:  OCT 15, 1985
  • HELP-PROMPT:  ANSWER MUST BE 1-5 CHARACTERS IN LENGTH
  • DESCRIPTION:  
    This is a 1 to 5 character abbreviation for this function which is used as a unique code for it.
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
  • CROSS-REFERENCE:  61.3^B^MNEMONIC
    1)= S ^LAB(61.3,"B",$E(X,1,30),DA)=1
    2)= K ^LAB(61.3,"B",$E(X,1,30),DA)
7 COMMENT 7;0 WORD-PROCESSING #61.37

  • DESCRIPTION:  
    If there are some additional comments which should be associated the function to assist the user.
500 WKLD CODE 9;0 POINTER Multiple #61.34 61.34

  • DESCRIPTION:  
    If additional workload codes should be counted every time this function is performed, enter them here.
  • IDENTIFIED BY:  WKLD CODE NUMBER(#.02)

ICR, Total: 1

ICR LINK Subscribing Package(s) Fields Referenced Description
ICR #10132 NAME (.01).
Access: Read w/Fileman

External References

Name Field # of Occurrence
^DIC .04+1

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^LAB(61.3 - [#61.3] .01(XREF 1S), .01(XREF 1K), 2+1!, 2(XREF 1S), 2(XREF 1K), 4(XREF 1S), 4(XREF 1K), 6(XREF 1S), 6(XREF 1K)
^XUSEC("LRLIASON" .01DEL1+1

Naked Globals

Name Field # of Occurrence
^("0" ID1+1, ID2+1

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> DA .01(XREF 1S), .01(XREF 1K), 2(XREF 1S), 2(XREF 1K), 4(XREF 1S), 4(XREF 1K), 6(XREF 1S), 6(XREF 1K)
DIC .04+1!*
DIC("S" .04+1*, .04SCR+1*
>> DIE .04+1
DUZ .01DEL1+1
U ID1+1, ID2+1
X .01+1!, .01(XREF 1S), .01(XREF 1K), .04+1*!, .06+1!, 2+1!, 2(XREF 1S), 2(XREF 1K), 2.5+1!, 4(XREF 1S)
, 4(XREF 1K), 6+1!, 6(XREF 1S), 6(XREF 1K)
>> Y .04+1, 2+1*
Info |  Desc |  Directly Accessed By Routines |  Accessed By FileMan Db Calls |  Pointed To By FileMan Files |  Pointer To FileMan Files |  Fields |  ICR |  External References |  Global Variables Directly Accessed |  Naked Globals |  Local Variables |  All