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 |  Pointer To FileMan Files |  Fields |  Global Variables Directly Accessed |  Local Variables |  All
Print Page as PDF
Global: ^LRO(69.2

Package: Lab Service

Global: ^LRO(69.2


Information

FileMan FileNo FileMan Filename Package
69.2 LAB SECTION PRINT Lab Service

Description

Directly Accessed By Routines, Total: 95

Package Total Routines
Lab Service 92 FILE ENTRY    INTERIM REPORT NUMBER    LR411PST    LR7OGO    LR7OSAP2    LR7OSBR    LRAPAUSR    LRAPDA
LRAPDSR    LRAPED    LRAPLG    LRAPMV    LRAPQ    LRAPS2    LRAPSWK    LRAPWU
LRAUSM    LRBLDA    LRBLDAA    LRBLDELT    LRBLDK    LRBLDL    LRBLDR    LRBLDR1
LRBLDRR1    LRBLJLA    LRBLJLG    LRBLJLG1    LRBLJPP    LRBLJW    LRBLPEW    LRBLPTR1
LRBLST    LRBLTX    LRBLTXA    LRCYPCT    LRDFN    LRSPRPT    LRSPT    LRUA
LRUD    LRUDIT    LRUL    LRUMD    LRUMDU1    SLIDE LABEL    TEST TO DISPLAY    ^LRO(69.2
ENTRY NUMBER    LRAP    LRAPBR    LRAPD    LRAPDEL    LRAPHDR    LRAPL    LRAPM
LRAPMRL1    LRAPT    LRAURPT    LRBLDEL    LRBLDEX    LRBLDEX1    LRBLDLG    LRBLJPA
LRBLJPA1    LRBLPA    LRBLPBR    LRBLPC    LRBLPC1    LRBLPCS1    LRBLPD    LRBLPQA
LRBLPX    LRBLU    LRBLY    LRSETUP    LRSPRPT1    LRSPRPT2    LRUDEL    LRUMD1
LRUMD2    LRUMDF    LRUMDM    LRUMDP    LRUMDS    LRUMDU    LRUTL    LRUWLF
SUBFILE FIELD NAME    TEST    TEST TO PRINT    TOPOGRAPHY CATEGORY    
Patient Chart 2 BPC7OGO    BPCLIPL    
Local Area Programs 1 AZAXDPM2    

Accessed By FileMan Db Calls, Total: 16

Package Total Routines
Lab Service 16 LRAP    LRAPAUSR    LRAPBR2    LRAPHDR    LRAPMV    LRAPSNMD    LRAURPT    LRBLDAA
LRBLJLA    LRBLJPP    LRBLST    LRBLTX    LRBLU    LRUDIT    LRUMD1    LRUMD2

Pointer To FileMan Files, Total: 7

Package Total FileMan Files
Lab Service 5 LABORATORY TEST(#60)[#69.34(.01), #69.36(.01), #69.62(.01), #69.63(.01)]    TOPOGRAPHY FIELD(#61)[#69.34(.02), #69.61(.01), #69.62(.02), #69.63(.02)]    MORPHOLOGY FIELD(#61.1)[#69.212(.01)]    LAB DATA(#63)[#69.27(.01), #69.3(.01)]    ACCESSION(#68)[.01]    
Kernel 1 NEW PERSON(#200)[#69.28(.01), #69.31(.04)]    
Registration 1 VA PATIENT(#2)[#69.3(.06)]    

Fields, Total: 31

Field # Name Loc Type Details
.01 NAME 0;1 POINTER TO ACCESSION FILE (#68)
************************REQUIRED FIELD************************
ACCESSION(#68)

  • INPUT TRANSFORM:  I $D(X) S DINUM=X
  • LAST EDITED:  JUL 30, 1992
  • DESCRIPTION:  
    The name of the Lab section print pointed to the Accession file.
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
  • CROSS-REFERENCE:  69.2^B
    1)= S ^LRO(69.2,"B",$E(X,1,30),DA)=""
    2)= K ^LRO(69.2,"B",$E(X,1,30),DA)
.02 ABBREVIATION 0;2 FREE TEXT
************************REQUIRED FIELD************************

  • INPUT TRANSFORM:  K:$L(X)>5!($L(X)<2)!'(X?.AN) X
  • LAST EDITED:  JAN 16, 1987
  • HELP-PROMPT:  ANSWER MUST BE 2-5 CHARACTERS IN LENGTH
  • DESCRIPTION:  
    Abbreviation to the name of the Lab section print
  • CROSS-REFERENCE:  69.2^C
    1)= S ^LRO(69.2,"C",$E(X,1,30),DA)=""
    2)= K ^LRO(69.2,"C",$E(X,1,30),DA)
.03 REPORT HEADER 1 0;3 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>50!($L(X)<1) X
  • LAST EDITED:  MAR 18, 1985
  • HELP-PROMPT:  ANSWER MUST BE 1-50 CHARACTERS IN LENGTH
  • DESCRIPTION:  
    First header in path report after Post operative Diagnosis.  The routine used is LRSPRPT (CY/EM/SP patient report).
  • EXECUTABLE HELP:  W !,"Enter the heading you want displayed when path report is printed.",!
.04 REPORT HEADER 2 0;4 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>50!($L(X)<1) X
  • LAST EDITED:  MAR 18, 1985
  • HELP-PROMPT:  ANSWER MUST BE 1-50 CHARACTERS IN LENGTH
  • DESCRIPTION:  
    Second header in path report after Post operative Diagnosis.  The routine used is LRSPRPT (CY/EM/SP patient report).
  • EXECUTABLE HELP:  W !,"Enter the heading you want displayed when path report is printed.",!
.05 PRINT SNOMED/ICD CODES 0;5 SET
  • '1' FOR LOWER CASE;
  • '0' FOR UPPER CASE;

  • LAST EDITED:  JUL 09, 1986
  • DESCRIPTION:  
    If lower case is to be printed for SNOMED and ICDCM codes enter 1 or LOWER CASE.
.06 GROSS DESCRIPTION SPACING 0;6 SET
  • 'D' FOR DOUBLE;
  • 'S' FOR SINGLE;

  • LAST EDITED:  AUG 09, 1985
  • DESCRIPTION:  
    If double spacing, gross descriptions for anatomic path microscopic examinations will be double spaced, otherwise single spacing will be used.
.07 LINES IN A LABEL 0;7 NUMBER

  • INPUT TRANSFORM:  K:+X'=X!(X>20)!(X<5)!(X?.E1"."1N.N) X
  • LAST EDITED:  MAY 29, 1986
  • HELP-PROMPT:  TYPE A WHOLE NUMBER BETWEEN 5 AND 20
  • DESCRIPTION:  The number of lines from the top of one label to the top of the
    next label.  This is used as the default value when printing
    various labels.
.08 ACCESSION PREFIX 0;8 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>3!($L(X)<1) X
  • HELP-PROMPT:  ANSWER MUST BE 1-3 CHARACTERS IN LENGTH
  • DESCRIPTION:  If accession prefix is entered the path report will
    have the accession number printed as follows:
    PREFIX yr accession#
    Ex. If S entered for the prefix, accession # is 123 and year 87
    the path report will print the accession as S87 123
    If you want a space after S enter a space after the 'S'.
    To eliminate the prefix and date delete the entry. (ex. S//@ ).
.09 PRINT SF-515 LINES 0;9 SET
  • '0' FOR NO;
  • '1' FOR YES;

  • LAST EDITED:  JUL 13, 1988
  • DESCRIPTION:  YES- Prints all dashed lines in the SF-515 form
    NO- Does not print all lines
.1 ASK TC CODES 0;10 SET
  • '1' FOR YES;
  • '0' FOR NO;
  • '1' FOR yes;
  • '0' FOR no;

  • LAST EDITED:  DEC 05, 1989
  • DESCRIPTION:  
    Allows coding cases for tissue committee
.11 ROUTINE PROCEDURE 1 0;11 NUMBER

  • INPUT TRANSFORM:  K:+X'=X!(X>99)!(X<0)!(X?.E1"."1N.N) X
  • LAST EDITED:  DEC 23, 1991
  • HELP-PROMPT:  Type a Number between 0 and 99, 0 Decimal Digits
  • DESCRIPTION:  Number of times procedure is routinely performed.
    For EM the number of thick sections made per block.
.12 ROUTINE PROCEDURE 2 0;12 NUMBER

  • INPUT TRANSFORM:  K:+X'=X!(X>99)!(X<0)!(X?.E1"."1N.N) X
  • HELP-PROMPT:  Type a Number between 0 and 99, 0 Decimal Digits
  • DESCRIPTION:  Number of times routine procedure is performed.
    For EM the number of grids routinely made per block.
.13 REPORT HEADER 3 0;13 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>30!($L(X)<1) X
  • LAST EDITED:  FEB 01, 1993
  • HELP-PROMPT:  Answer must be 1-30 characters in length.
  • DESCRIPTION:  Third header in path report after Post operative Diagnosis. The routine used is LRSPRPT CY/EM/SP patient report).
    For surgical pathology this header will be the frozen section report.
.14 REPORT HEADER 4 0;14 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>30!($L(X)<1) X
  • LAST EDITED:  JUL 15, 1993
  • HELP-PROMPT:  Answer must be 1-30 characters in length.
  • DESCRIPTION:  Fourth header in path report after post op dx.
    The routine used is LRSPRPT.
    For surgical pathology this header will be the diagnosis field.
.21 NEW PG FOR SUPPLEMENTARY RPT .2;1 SET
  • '1' FOR YES;
  • '0' FOR NO;
  • '1' FOR yes;
  • '0' FOR no;

  • LAST EDITED:  SEP 28, 1993
  • DESCRIPTION:  
    If a page feed is wanted before printing the supplementary report a 'YES' is entered.
.3 SLIDE LABEL .3;0 Multiple #69.22 69.22

  • DESCRIPTION:  
    Enter the name of the type of preparation or technique used for specimens.
1 INCOMPLETE REPORTS QUEUE 1;0 Multiple #69.21 69.21

  • DESCRIPTION:  Here are stored the temporary list of specimens logged-in for printing at time of microscopic exam. The report will contain all past specimens with their SNOMED coding in free text form for Surg path, cytopath, and EM.
    If there are gross descriptions they will be part of the print-out.
2 COMPLETED REPORTS QUEUE 2;0 Multiple #69.23 69.23

  • DESCRIPTION:  This is a temporary list of final path reports to be printed on demand.
    Entries automatically are entered when the microscopic diagnoses or supplementary are entered for Surg path, Cytopath or Electron microscopy.
3 INTERIM REPORT NUMBER 3;0 Multiple #69.29 69.29

  • DESCRIPTION:  
    This field contains the numeric sequence of this particular interim report.
4 REPORTS ON DEMAND 4;0 POINTER Multiple #69.27 69.27

  • DESCRIPTION:  
    Name of the report on demand from the Lab Data file
5 ENTRY NUMBER 5;0 Multiple #69.24 69.24

  • DESCRIPTION:  
    Entry number to appropriate file
6 GENERIC LIST 6;0 Multiple #69.26 69.26

  • DESCRIPTION:  
    Generic label name
7 USER REQUEST LIST 7;0 POINTER Multiple #69.28 69.28

  • DESCRIPTION:  
    Names of users from file 200
8 FILE 8;0 Multiple #69.31 69.31

  • DESCRIPTION:  
    Files for temporary lists of entries.
9 LABELS 9;0 Multiple #69.25 69.25

  • DESCRIPTION:  
    ID number of label
10 SNOMED & TC CODING 10;0 WORD-PROCESSING #69.38

  • DESCRIPTION:  
    Text entered here will appear on the preliminary pathology report after the cum path summary.
11 TOPOGRAPHY CATEGORY 11;0 Multiple #69.211 69.211

  • DESCRIPTION:  
    SNOMED coded topography categories
  • IDENTIFIED BY:  COMMENT(#.02)[R]
12 MORPHOLOGY ENTRY 12;0 POINTER Multiple #69.212 69.212

  • DESCRIPTION:  
    SNOMED morphology entries
60 TEST LIST NUMBER 60;0 Multiple #69.33 69.33

  • DESCRIPTION:  
    The list number for a group of selected lab tests.
61 TOPOGRAPHY 61;0 POINTER Multiple #69.61 69.61

  • DESCRIPTION:  For entries the most recent results of tests selected below will be displayed or printed.
    Ex. You may want to know the results of selected chemistries for a patient who has just had a liver biopsy.  Topography entered would be LIVER
    For blood bank the tests entered will be displayed whenever a
    crossmatch is ordered or when components are displayed.
999 DATA CHANGE DATE 999;0 DATE Multiple #69.299 69.299

  • DESCRIPTION:  
    Date of the Data change

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^LRO(69.2 - [#69.2] .01(XREF 1S), .01(XREF 1K), .02(XREF 1S), .02(XREF 1K)

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> DA .01(XREF 1S), .01(XREF 1K), .02(XREF 1S), .02(XREF 1K)
>> DINUM .01+1*
X .01+1, .01(XREF 1S), .01(XREF 1K), .02+1!, .02(XREF 1S), .02(XREF 1K), .03+1!, .04+1!, .07+1!, .08+1!
, .11+1!, .12+1!, .13+1!, .14+1!
Info |  Desc |  Directly Accessed By Routines |  Accessed By FileMan Db Calls |  Pointer To FileMan Files |  Fields |  Global Variables Directly Accessed |  Local Variables |  All