Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Details
Print Page as PDF
Sub-Field: 63.09

Package: Lab Service

LAB DATA(#63)-->63.09

Sub-Field: 63.09


Information

Parent File Name Number Package
LAB DATA(#63) CYTOPATHOLOGY 63.09 Lab Service

Details

Field # Name Loc Type Details
.01 DATE/TIME SPECIMEN TAKEN 0;1 DATE
************************REQUIRED FIELD************************

  • INPUT TRANSFORM:  S %DT="ETX",%DT(0)="-N" D ^%DT K %DT S X=Y,DINUM=9999999-Y K:Y<1 X
  • OUTPUT TRANSFORM:  D D^LRU W ?0,"-------------------------------------------------------------------------------"
  • LAST EDITED:  JAN 20, 1985
  • HELP-PROMPT:  FUTURE DATE/TIME NOT ALLOWED
  • DESCRIPTION:  
    This is the date/time of collection of the specimen.
    DELETE AUTHORITY: @
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
.011 SPECIMEN SUBMITTED BY 0;5 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>30!($L(X)<1) X
  • LAST EDITED:  FEB 28, 1985
  • HELP-PROMPT:  ANSWER MUST BE 1-30 CHARACTERS IN LENGTH
  • DESCRIPTION:  
    This is the person submitting the specimen.
.012 SPECIMEN .1;0 Multiple #63.902 63.902

  • DESCRIPTION:  
    These are the specimens submitted.
.013 BRIEF CLINICAL HISTORY .2;0 WORD-PROCESSING #63.913

  • DESCRIPTION:  
    This is a brief clinical history of the specimen.
  • LAST EDITED:  FEB 27, 1985
.014 PREOPERATIVE DIAGNOSIS .3;0 WORD-PROCESSING #63.914

  • DESCRIPTION:  
    This is the pre-operative diagnosis.
.015 OPERATIVE FINDINGS .4;0 WORD-PROCESSING #63.905

  • DESCRIPTION:  
    These are the operative findings of the specimen.
.016 POSTOPERATIVE DIAGNOSIS .5;0 WORD-PROCESSING #63.906

  • DESCRIPTION:  
    This is the post-operative diagnosis.
.02 PATHOLOGIST/CYTOTECHNOLOGIST 0;2 POINTER TO NEW PERSON FILE (#200) NEW PERSON(#200)

  • INPUT TRANSFORM:  S DIC("S")="I $D(^VA(200,""AK.PROVIDER"",$P(^(0),U)))",D="AK.PROVIDER" D IX^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X
  • LAST EDITED:  FEB 05, 2004
  • HELP-PROMPT:  Enter the pathologist or cytotechnologist performing the examination. NOTE: A cytotech's name can be entered on negative GYN cases only.
  • DESCRIPTION:  
    This is the pathologist performing the examination.
  • SCREEN:  S DIC("S")="I $D(^VA(200,""AK.PROVIDER"",$P(^(0),U)))"
  • EXPLANATION:  Selection must be made from active PROVIDERS who hold the PROVIDER security key.
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
.021 CYTOTECH 0;4 POINTER TO NEW PERSON FILE (#200) NEW PERSON(#200)

  • LAST EDITED:  JUN 30, 1991
  • DESCRIPTION:  
    This is the technologist performing the test.
.03 DATE REPORT COMPLETED 0;3 DATE

  • INPUT TRANSFORM:  S %DT="EX" D ^%DT S X=Y K:Y<1 X I $D(X),X<$P($P(^LR(DA(1),"CY",DA,0),U,10),".") K X W !,"Report date completed must be after date received"
  • LAST EDITED:  MAR 12, 1990
  • DESCRIPTION:  
    This is the date the report was completed.
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
.06 CYTOPATH ACC # 0;6 FREE TEXT
************************REQUIRED FIELD************************

  • INPUT TRANSFORM:  K:$L(X)>15!($L(X)<5)!'(X?1ANP.ANP1" "2N1" "1N.N) X I $D(X),$D(LRAD),$D(LRABV),$D(^LR("ACYA",$E(LRAD,1,3),LRABV,X)) W $C(7),!,X," is already taken for ",LRABV,! K X
  • LAST EDITED:  DEC 14, 1995
  • HELP-PROMPT:  Answer must be 5-15 characters in length.
  • DESCRIPTION:  
    This is the accession number of the cytopathology specimen.
  • EXECUTABLE HELP:  W !,"Enter as prefix yr number (ex. CY 95 345)"
    UNEDITABLE
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
  • CROSS-REFERENCE:  63^ACYA^MUMPS
    1)= S X(1)=$S($D(LRAD):LRAD,1:$P(^LR(DA(1),"CY",DA,0),U,10)),X(2)=$S($D(LRABV):LRABV,1:$P(^LR(DA(1),"CY",DA,0),U,6)) S:X(1)&(X(2)]"") ^LR("ACYA",$E(X(1),1,3),X(2),$P(X," ",3),DA(1),DA)=""
    2)= S X(1)=$S($D(LRAD):LRAD,1:$P(^LR(DA(1),"CY",DA,0),U,10)),X(2)=$S($D(LRABV):LRABV,1:$P(^LR(DA(1),"CY",0),U,6)) K:X(1)&(X(2)]"") ^LR("ACYA",$E(X(1),1,3),X(2),$P(X," ",3),DA(1),DA)
    Cross references accessions by year and within year by accession area.
.07 PHYSICIAN 0;7 POINTER TO NEW PERSON FILE (#200) NEW PERSON(#200)

  • INPUT TRANSFORM:  S DIC("S")="I $D(^VA(200,""AK.PROVIDER"",$P(^(0),U))),$D(^XUSEC(""PROVIDER"",Y)),$$ACTIVE^XUSER(Y)",D="AK.PROVIDER" D IX^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X
  • LAST EDITED:  JUN 30, 1991
  • HELP-PROMPT:  Select the requesting provider.
  • DESCRIPTION:  
    This is the requesting provider.
  • SCREEN:  S DIC("S")="I $D(^VA(200,""AK.PROVIDER"",$P(^(0),U))),$D(^XUSEC(""PROVIDER"",Y)),$$ACTIVE^XUSER(Y)"
  • EXPLANATION:  Selection must be made from active PROVIDERS who hold the PROVIDER security key.
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
.08 PATIENT LOCATION 0;8 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>30!($L(X)<1) X
  • LAST EDITED:  JAN 31, 1983
  • HELP-PROMPT:  ANSWER MUST BE 2-30 CHARACTERS IN LENGTH
  • DESCRIPTION:  
    This is the requesting location.
.09 TYPIST 0;9 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>5!($L(X)<2) X
  • LAST EDITED:  JAN 24, 1991
  • HELP-PROMPT:  Answer must be 2-5 characters in length.
  • DESCRIPTION:  
    These are the initials of the typist entering the cytopathology data.
.1 DATE/TIME SPECIMEN RECEIVED 0;10 DATE
************************REQUIRED FIELD************************

  • INPUT TRANSFORM:  S %DT="ETX",%DT(0)="-N" D ^%DT K %DT S X=Y K:Y<1 X I $D(X),$D(LRH(2)),LRH(2)'=$E(X,1,3) K X W !,"Year received must be same as log-in year (",LRH(2)+1700,") "
  • LAST EDITED:  JAN 29, 1991
  • HELP-PROMPT:  FUTURE DATE/TIME NOT ALLOWED
  • DESCRIPTION:  
    This is the date/time the specimen was received.
  • EXECUTABLE HELP:  K DZ W ?5,"To delete accession enter '^'",!
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
  • CROSS-REFERENCE:  63^ACY^MUMPS
    1)= S ^LR("ACY",$E(X,1,30),DA(1),DA)=""
    2)= K ^LR("ACY",$E(X,1,30),DA(1),DA)
.101 REVIEWED BY PATHOLOGIST 0;12 SET

  • LAST EDITED:  AUG 04, 1987
  • HELP-PROMPT:  Enter 'YES' if case reviewed by pathologist.
  • DESCRIPTION:  
    YES identifies that the case has been reviewed by the pathologist.
.11 REPORT RELEASE DATE/TIME 0;11 DATE

  • INPUT TRANSFORM:  S %DT="ETXR",%DT(0)="N" D ^%DT K %DT S X=Y K:Y<1 X I $D(X),X<$P($P(^LR(DA(1),"CY",DA,0),U,3),".") K X W !,"Release date must not be before completed date (" S Y=$P(^(0),U,3) D DD^%DT W Y,")"
  • LAST EDITED:  FEB 19, 1999
  • HELP-PROMPT:  ONLY CURRENT DATE/TIME ALLOWED
  • DESCRIPTION:  
    Date report was released
  • EXECUTABLE HELP:  K DZ
    UNEDITABLE
  • NOTES:  XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
  • CROSS-REFERENCE:  63.09^AC^MUMPS
    1)= D ADD^LRWOMEN
    2)= D DEL^LRWOMEN
    This cross reference will send notification to the Women's Health Program when a Cytology specimen is Verified/Released from the Laboratory package.
  • FIELD INDEX:  AD (#556) MUMPS ACTION
    Short Descr: Notify HDR and others that this report is available.
    Description: This MUMPS cross-reference triggers the sending of this report to the Health Data Repository (HDR) and other subscribers when cytology results are released.
    Set Logic: D APQ^LA7HDR(DA(1),"CY",DA)
    Kill Logic: Q
    X(1): REPORT RELEASE DATE/TIME (63.09,.11) (Subscr 1) (forwards)
.13 RELEASED BY 0;13 POINTER TO NEW PERSON FILE (#200) NEW PERSON(#200)

  • LAST EDITED:  JUN 30, 1991
  • DESCRIPTION:  
    Name of individual who released report
.14 TC CODE 0;14 SET

  • LAST EDITED:  MAR 26, 1992
  • DESCRIPTION:  
    Tissue committee codes The meaning of each code is identified by each site.
.15 ORIGINAL RELEASE DATE 0;15 DATE

  • INPUT TRANSFORM:  S %DT="EX" D ^%DT S X=Y K:Y<1 X
  • LAST EDITED:  SEP 24, 1990
  • DESCRIPTION:  If report was modified after release the original release date
    is kept here.
.16 TIU REFERENCE DATE/TIME - CY .05;0 DATE Multiple #63.47 63.47

  • LAST EDITED:  AUG 28, 2001
  • DESCRIPTION:  
    This multiple stores TIU information for corresponding SF515 cytopathology reports that have been electronically signed and stored in TIU. This information is used to access the reports in TIU.
.17 DATE REPORT MODIFIED - CY .07;1 DATE

  • INPUT TRANSFORM:  S %DT="ESTX" D ^%DT S X=Y K:Y<1 X
  • LAST EDITED:  NOV 30, 2001
  • DESCRIPTION:  
    This is the date the report was modified if it was modified after it was electronically signed/released.
.171 PERSON MODIFYING TEXT .07;2 POINTER TO NEW PERSON FILE (#200) NEW PERSON(#200)

  • LAST EDITED:  NOV 30, 2001
  • DESCRIPTION:  
    Stores the DUZ of the person who modified the report AFTER it was electronically signed/released.
.172 DIAGNOSIS MODIFIED .07;3 SET

  • LAST EDITED:  NOV 30, 2001
  • DESCRIPTION:  
    1 = Diagnosis modified AFTER report was electronically signed/released.
.31 UID ORU;1 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>20!($L(X)<10) X
  • LAST EDITED:  NOV 22, 2005
  • HELP-PROMPT:  Answer must be 10-20 characters in length
  • DESCRIPTION:  This is the UID used by the HOST LEDI system for this order/accession.
    This field is used by LEDI software.
.32 ORDERING SITE ORU;2 POINTER TO INSTITUTION FILE (#4) INSTITUTION(#4)

  • LAST EDITED:  NOV 22, 2005
  • HELP-PROMPT:  Enter the site ordering the test.
  • DESCRIPTION:  This field contains the pointer to the INSTITUTION file for the Mailman domain location of the computer system. All LEDI results are returned to the Ordering computer system.
    Location to send LEDI HL7 result messages.
    This field is used by LEDI software.
.33 COLLECTING SITE ORU;3 POINTER TO INSTITUTION FILE (#4) INSTITUTION(#4)

  • LAST EDITED:  NOV 22, 2005
  • DESCRIPTION:  This field contains the pointer to the INSTITUTION file for the actual collection site. The ordering site is the MailMan location of the computer system. MailMan domain location and the
    collecting site may be different.
    This field is used by LEDI software.
.34 HOST UID ORU;4 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>20!($L(X)<10) X
  • LAST EDITED:  NOV 22, 2005
  • HELP-PROMPT:  Answer must be 10-20 characters in length
  • DESCRIPTION:  Each Order/Accession is given a HOST UID. The UID is stored in this location. If LEDI software is used to accession specimens, usually the collecting sites UID is used to track specimens. If
    the collecting UID conflicts with the HOST system number sequence, the HOST UID will be used instead of the collecting site's UID.
    This field is used by LEDI software.
.342 ORDERING SITE UID ORU;5 FREE TEXT

  • INPUT TRANSFORM:  K:$L(X)>20!($L(X)<10) X
  • LAST EDITED:  NOV 22, 2005
  • HELP-PROMPT:  Answer must be 10-20 characters in length
  • DESCRIPTION:  This field contains the collecting sites UID for this specimen.
    This field is used by LEDI software.
.345 RELEASING SITE RF;1 POINTER TO INSTITUTION FILE (#4) INSTITUTION(#4)

  • LAST EDITED:  JAN 29, 2009
  • HELP-PROMPT:  Enter the facility/site that is releasing this report.
  • DESCRIPTION:  This field indicates the site that released the clinical report. This field can be used to determine the information required to correctly indicate the address/location of the laboratory
    responsible for releasing the report.
.35 ORDERED TEST ORUT;0 Multiple #63.51 63.51

  • DESCRIPTION:  This subfile contains information about the ordered test(s) for this accession. The .01 field contains the ordered test NLT code requested by the clinical provider. If this test is a panel,
    all atomic tests within the panel will be associated with the ordered test using this NLT code.
.97 DELAYED REPORT COMMENT 97;0 Multiple #63.0997 63.0997

  • DESCRIPTION:  
    If a report is delayed, reason(s) for delay may be entered here. They will appear on the log book report and the clinician screen display.
.99 COMMENT 99;0 Multiple #63.908 63.908

  • LAST EDITED:  MAR 13, 1984
  • HELP-PROMPT:  ANSWER MUST BE 2-80 CHARACTERS IN LENGTH
  • DESCRIPTION:  
    These are comments on the cytopathology data.
1 GROSS DESCRIPTION 1;0 WORD-PROCESSING #63.91

  • LAST EDITED:  NOV 06, 1984
  • DESCRIPTION:  
    This is the gross description of the specimen.
  • LAST EDITED:  FEB 28, 1985
1.1 MICROSCOPIC EXAMINATION 1.1;0 WORD-PROCESSING #63.911

  • LAST EDITED:  JUL 16, 1993
  • DESCRIPTION:  
    This is the microscopic examination diagnosis.
  • LAST EDITED:  JUL 16, 1993
1.2 SUPPLEMENTARY REPORT 1.2;0 DATE Multiple #63.907 63.907

  • DESCRIPTION:  
    These are the supplementary reports on the specimen.
1.4 CYTOPATHOLOGY DIAGNOSIS 1.4;0 WORD-PROCESSING #63.903

  • DESCRIPTION:  
    Cytopathology diagnoses are entered here.
  • LAST EDITED:  JUL 16, 1993
4 DATE MICROSCOPIC EXAM MODIFIED 4;0 DATE Multiple #63.94 63.94

  • LAST EDITED:  JUL 16, 1993
  • DESCRIPTION:  
    These are the dates of the modification of the microscopic examination diagnosis.
5 DATE DIAGNOSIS MODIFIED 5;0 DATE Multiple #63.095 63.095

  • DESCRIPTION:  
    This is the date of the modification of the diagnosis field.
7 DATE GROSS DESCRIPTION CHANGED 7;0 DATE Multiple #63.097 63.097

  • DESCRIPTION:  
    These are the dates of change in the gross description field.
9 QA CODE 9;0 POINTER Multiple #63.099 63.099

  • SCREEN:  S DIC("S")="I $P(^(0),U,4)=""I"",$L($P(^(0),U))<3"
  • EXPLANATION:  Selects entries with less than 3 characters
10 CYTOPATH ORGAN/TISSUE 2;0 POINTER Multiple #63.912 63.912

  • DESCRIPTION:  
    This is the organ/tissue(s) being examined.
  • SCREEN:  S DIC("S")="I SEX[$P(^(0),U,3)"
  • EXPLANATION:  Selects when appropriate sex related organs
  • INDEXED BY:  CYTOPATH ORGAN/TISSUE (AC)
80 ICD DIAGNOSIS 3;0 POINTER Multiple #63.901 63.901

  • DESCRIPTION:  
    These are the IDC diagnosis of the specimen.
2005 IMAGE 2005;0 POINTER Multiple #63.92005 63.92005

  • DESCRIPTION:  
    Images associated with Cytopathology reports are stored in this multiple within the Cytopathology field of the Lab Data (#63) file.
Info |  Details