Print Page as PDF
GMTSLRPE ROUTINE ICR (2770)

GMTSLRPE ROUTINE    ICR (2770)

Name Value
NUMBER 2770
IA # 2770
DATE CREATED 1999/03/05
CUSTODIAL PACKAGE HEALTH SUMMARY
CUSTODIAL ISC Salt Lake City
USAGE Controlled Subscription
TYPE Routine
DBIC APPROVAL STATUS APPROVED
ROUTINE GMTSLRPE
NAME GMTSLRPE ROUTINE
GENERAL DESCRIPTION
The Women's Health package requests permission to call
the GMTSLRPE routine at the XTRCT line label. This routine returns cytology
data extracted from the LAB DATA file (#63) of the Laboratory package.
STATUS Active
DURATION Till Otherwise Agreed
ID GMTSLRPE
COMPONENT/ENTRY POINT
COMPONENT/ENTRY POINT VARIABLES
XTRCT
VARIABLES TYPE VARIABLES DESCRIPTION
LRDFN Input
This is the internal entry number of a LAB DATA (#63)
file entry that identifies the patient. It is not the variable DFN, rather it
is the value of +^DPT(DFN,"LR").
GMTS1 Input
A reverse FileMan date/time (e.g., 7009695.8955) used
as the start of a search of the LAB DATA (#63) file.
GMTS2 Input
A reverse FileMan date/time (e.g., 7019695.8955) used
as the end of a search of the LAB DATA (#63) file.
MAX Input
An integer value which indicates the maximum number
of entries to return.  For example, if MAX=10 and more than 10 tests were
found in the date/time range, then the 10 most recent test entries will be
returned.
TMP("LRCY",$J, Output
The cytology data for all entries found will be
returned in the temporary global ^TMP("LRA",$J). The data layout for that
global is:

S ^TMP("LRCY",$J,sub1,0)=DATE/TIME SPECIMEN TAKEN^CYTOPATH ACC#
S ^TMP("LRCY",$J,sub1,1)="Site/Specimen" literal^REPORT RELEASE DATE/TIME
S ^TMP("LRCY",$J,sub1,1,sub2)=Site/Specimen text
S ^TMP("LRCY",$J,sub1,"AH",sub2)=Brief Clinical History text
S ^TMP("LRCY",$J,sub1,"G",sub2)=Gross Description text
S ^TMP("LRCY",$J,sub1,"MI",sub2)=Microscopic exam text
S ^TMP("LRCY",$J,sub1,"SR",sub2,0)=Supplementary Report text
S ^TMP("LRCY",$J,sub1,"SR",sub2,sub3)=Supplementary Report text
S ^TMP("LRCY",$J,sub1,"NDX",sub2)=Cytology Diagnosis
SUBSCRIBING PACKAGE
SUBSCRIBING PACKAGE ISC
WOMEN'S HEALTH Hines
MYHEALTHEVET
ORDER ENTRY/RESULTS REPORTING
MAIL MESSAGE 29183431