Global: ^LRO(69.2

FileMan FileNo	FileMan Filename	Package
69.2	LAB SECTION PRINT	Lab Service

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

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

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	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 ICD9CM 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.` LAST EDITED: `DEC 05, 1989` 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`

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

Customize PDF page

Package: Lab Service

Global: ^LRO(69.2

Information

Description

Directly Accessed By Routines, Total: 97

Accessed By FileMan Db Calls, Total: 16

Pointer To FileMan Files, Total: 7

Fields, Total: 31

Global Variables Directly Accessed

Local Variables

Legend: