STANDARD DATA DICTIONARY #160 -- ONCOLOGY PATIENT FILE                                                            3/24/25    PAGE 1
STORED IN ^ONCO(160,  *** NO DATA STORED YET ***   SITE: WWW.BMIRWIN.COM   UCI: VISTA,VISTA                        (VERSION 2.2)   

DATA          NAME                  GLOBAL        DATA
ELEMENT       TITLE                 LOCATION      TYPE
-----------------------------------------------------------------------------------------------------------------------------------
Demographic and followup data concerning Oncology patients is stored in this file.  (Tumor-related data is stored in the Primary
File).  Data is NOT exported with this file, but it is populated on site.  



   APPLICATION GROUP(S): ONCO

POINTED TO BY: PATIENT NAME field (#.02) of the ONCOLOGY PRIMARY File (#165.5) 
               

CROSS
REFERENCED BY: CONTACT NAME(AACP), CONTACT NAME(AAPC), LAST FOLLOW-UP CONTACT(AC), CONTACT NAME(ACP), DUE FOLLOW-UP(AD), 
               SUSPENSE DATE(ADX), THE CONTACT(AE), FOLLOW-UP STATUS(AFS), CONTACT NAME(APC), STATUS(AS), NAME(B), 
               CENTRAL NO.(CN), SOURCE(D)

    LAST MODIFIED: NOV 21,2024@17:13:11

160,.01       NAME                   0;1          VARIABLE POINTER (Required)

              Patient's full name   
              FILE  ORDER  PREFIX    LAYGO  MESSAGE
                 2    1    P            n   VA Patient 
                 67   2    N            y   Non-VA or Ambiguous Patient 
                                         
              LAST EDITED:      APR 22, 1992 
              DESCRIPTION:      This field identifies the patient by establishing a pointer to either the VA Patient File, or, for
                                non-VA patients, to the Referral File.  Enter the patient's name to see if it is already on file. 
                                If not, you will need to enter the name, along with other identifiers, into the appropriate file.  
                                Contact your MAS representative if you have difficulty entering a new patient into the VA Patient
                                File.  

              GROUP:            ACOS-REQUIRED
              CROSS-REFERENCE:  160^B 
                                1)= S ^ONCO(160,"B",$E(X,1,30),DA)=""
                                2)= K ^ONCO(160,"B",$E(X,1,30),DA)
                                Regular "B" cross-reference on .01 field - variable pointer.  



160,.011      LAST NAME               ;  COMPUTED

              MUMPS CODE:       X ^DD(160,.011,9.3) S X=$P(X,",",1)
                                9.2 = S Y(160,.011,1)=$S($D(^ONCO(160,D0,0)):^(0),1:"")
                                9.3 = X ^DD(160,.011,9.2) S X=$P(Y(160,.011,1),U,1),C=$S(X="":-1,'$D(@(U_$P(X,";",2)_"0)")):-1,1:$P
                                (^(0),U,2)),X=$S(X="":X,'$D(^(+X,0)):"",1:$P(^(0),U,1)),Y=X,C=$S($D(^DD(+C,.01,0)):$P(^(0),U,2),1:"
                                D") D:X]"" Y^DIQ:C'["D" S X=Y,C=","
              ALGORITHM:        ONCOLASTNAME(NAME)
              DESCRIPTION:      Identifies the last name of the patient.  
                                 
                                For further information see FORDS page 39.  


160,.012      FIRST-LAST              ;  COMPUTED

              MUMPS CODE:       X ^DD(160,.012,9.3) S X=$$FLNAME^ONCFUNC(X)
                                9.2 = S Y(160,.012,1)=$S($D(^ONCO(160,D0,0)):^(0),1:"")
                                9.3 = X ^DD(160,.012,9.2) S X=$P(Y(160,.012,1),U,1),C=$S(X="":-1,'$D(@(U_$P(X,";",2)_"0)")):-1,1:$P
                                (^(0),U,2)),X=$S(X="":X,'$D(^(+X,0)):"",1:$P(^(0),U,1)),Y=X,C=$S($D(^DD(+C,.01,0)):$P(^(0),U,2),1:"
                                D") D:X]"" Y^DIQ:C'["D" S X=Y,C=","
              ALGORITHM:        ONCOFIRSTNAME LASTNAME(NAME)
              LAST EDITED:      MAY 24, 2001 
              DESCRIPTION:
                                RECORD THE PATIENT'S FIRST AND LAST NAME.  

              NOTES:            XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER


160,.013      C'LASTNAME              ;  COMPUTED

              MUMPS CODE:       S X=^ONCO(160,D0,0),Y="^"_$P($P(X,U,1),";",2)_+X_",0)",X=$S($D(@Y):$P(@Y,U,1),1:""),X=$P(X,",",1)
              ALGORITHM:        S X=^ONCO(160,D0,0),Y="^"_$P($P(X,U,1),";",2)_+X_",0)",X=$S($D(@Y):$P(@Y,U,1),1:""),X=$P(X,",",1)
              LAST EDITED:      MAR 08, 1996 
              DESCRIPTION:
                                RECORD PATIENT'S LAST NAME IF IT CONTAINS A C'.  


160,.014      SALUTATION              ;  COMPUTED

              MUMPS CODE:       S X=$S($D(^ONCO(160,D0,0)):$P(^(0),U,8),1:""),X=$S(X="2":"Ms",1:"Mr")
              ALGORITHM:        S X=$S($D(^ONCO(160,D0,0)):$P(^(0),U,8),1:""),X=$S(X="2":"Ms",1:"Mr")
              DESCRIPTION:
                                Looks at sex field, and determines how letter should be addressed.  


160,.015      MIDDLE NAME             ;  COMPUTED

              MUMPS CODE:       D MNI^ONCOES
              ALGORITHM:        D MNI^ONCOES
              LAST EDITED:      MAY 29, 2009 
              DESCRIPTION:      Identifies the middle name or middle initial of the patient.  
                                 
                                For further information see FORDS page 41.  


160,.111      STREET ADDRESS 1        ;  COMPUTED

              MUMPS CODE:       S X="" D SA1^ONCOES
              ALGORITHM:        S X="" D SA1^ONCOES
              LAST EDITED:      JUL 16, 1992 
              DESCRIPTION:
                                RECORD FIRST LINE OF PATIENT'S ADDRESS.  


160,.112      STREET ADDRESS 2        ;  COMPUTED

              MUMPS CODE:       D SA2^ONCOES
              ALGORITHM:        D SA2^ONCOES
              DESCRIPTION:
                                RECORD 2ND LINE OF PATIENT'S ADDRESS.  


160,.113      STREET ADDRESS 3        ;  COMPUTED

              MUMPS CODE:       D SA3^ONCOES
              ALGORITHM:        D SA3^ONCOES
              DESCRIPTION:
                                RECORD 3RD LINE OF PATIENT'S ADDRESS.  


160,.115      STATE                   ;  COMPUTED

              MUMPS CODE:       D ST^ONCOES
              ALGORITHM:        D ST^ONCOES
              DESCRIPTION:
                                RECORD THE PATIENT'S STATE OF RESIDENCE.  


160,.116      ZIP CODE                ;  COMPUTED

              MUMPS CODE:       S X="" D ZIP^ONCOES
              ALGORITHM:        S X="" D ZIP^ONCOES
              LAST EDITED:      JUL 16, 1991 
              DESCRIPTION:
                                RECORD THE PATIENT'S RESIDENCE ZIP CODE.  


160,.117      COUNTY                  ;  COMPUTED

              MUMPS CODE:       D CTY^ONCOES
              ALGORITHM:        D CTY^ONCOES
              LAST EDITED:      JUN 02, 2009 
              DESCRIPTION:
                                Computes the patient's current COUNTY of residence.  COUNTY is derived from COUNTY (2,.117).  


160,.118      ZIP-COUNTY              ;  COMPUTED

              MUMPS CODE:       S X="" D ZIPCT^ONCOES
              ALGORITHM:        D ZIPCT^ONCOES
              DESCRIPTION:
                                THIS IS A COMPUTED FIELD THAT BRINGS UPS THE COUNTY OF RESIDENCE COMPUTED FROM ZIP CODE.  


160,.119      PATIENT ADDRESS - CURRENT  ;  COMPUTED

              MUMPS CODE:       S X="" D ADD^ONCOES
              ALGORITHM:        S X="" D ADD^ONCOES
              LAST EDITED:      NOV 04, 2002 
              DESCRIPTION:      Identifies the patient's current address (number and street).  
                                 
                                For further information see FORDS page 49.  


160,.1191     PATIENT ADDRESS - CURRENT SUPP  ;  COMPUTED

              MUMPS CODE:       D SA3^ONCOES
              ALGORITHM:        D SA3^ONCOES
              DESCRIPTION:      Provides the ability to store additional address information such as the name of a place or
                                facility (ie, a nursing home or name of an apartment complex).  
                                 
                                For further information see FORDS page 50.  


160,.12       CTY                     ;  COMPUTED

              MUMPS CODE:       S X="" D CTY^ONCOES
              ALGORITHM:        S X="" D CTY^ONCOES
              DESCRIPTION:      This is the patient's county, retrieved from the PATIENT file (#2).  If the ONCOLOGY PATIENT file
                                is pointing to the REFERRAL file (#67), the CTY value will be null.  


160,.131      TELEPHONE               ;  COMPUTED

              MUMPS CODE:       D PH^ONCOES
              ALGORITHM:        D PH^ONCOES
              LAST EDITED:      NOV 04, 2002 
              DESCRIPTION:      Records the current telphone number with area code for the patient.  
                                 
                                For further information see FORDS page 55.  


160,.2        CONTACTS                ;  COMPUTED

              MUMPS CODE:       S X="" D CON^ONCOCON
              ALGORITHM:        S X="" D CON^ONCOCON
              DESCRIPTION:
                                THIS IS A COMPUTED FIELD FOR THE PATIENT'S CONTACTS.  


160,.21       NOK-INFO                ;  COMPUTED

              MUMPS CODE:       S X="" D NOK^ONCOCON
              ALGORITHM:        S X="" D NOK^ONCOCON
              DESCRIPTION:
                                THIS FIELD CONTAINS INFORMATION FOR THE PATIENT'S NEXT OF KIN.  


160,.211      NOK2-INFO               ;  COMPUTED

              MUMPS CODE:       S X="" D NOK2^ONCOCON
              ALGORITHM:        S X="" D NOK2^ONCOCON
              DESCRIPTION:
                                THIS FIELD CONTAINS INFORMATION RELATED TO THE PATIENT'S 2ND NEXT OF KIN.  


160,.212      RELATIVE                ;  COMPUTED

              MUMPS CODE:       S X="" D REL^ONCOCON
              ALGORITHM:        S X="" D REL^ONCOCON
              LAST EDITED:      MAY 21, 1991 
              DESCRIPTION:
                                THIS FIELD CONTAINS INFORMATION REGARDING THE NEXT OF KIN RELATIONSHIP TO THE PATIENT.  


160,.213      RELATIVE-2              ;  COMPUTED

              MUMPS CODE:       S X="" D REL2^ONCOCON
              ALGORITHM:        S X="" D REL2^ONCOCON
              DESCRIPTION:
                                THIS FIELD CONTAINS INFORMATION REGARDING THE 2ND NEXT OF KIN RELATIONSHIP TO THE PATIENT.  


160,.214      NOK                     ;  COMPUTED

              MUMPS CODE:       S X="" D NOKEO^ONCOCON
              ALGORITHM:        S X="" D NOKEO^ONCOCON
              DESCRIPTION:      This is the patient's next of kin, retrieved from either the PATIENT File (#2) or the REFERRAL File
                                (#67).  


160,1         ALIAS                   ;  COMPUTED

              MUMPS CODE:       S X="" D ALIAS^ONCOES
              ALGORITHM:        S X="" D ALIAS^ONCOES
              LAST EDITED:      FEB 28, 1992 
              DESCRIPTION:
                                COMPUTED FIELD BRINGING OVER ANY ALIAS LISTED IN THE MAS FILE FOR THE PATIENT.  


160,2         SSN                     ;  COMPUTED

              MUMPS CODE:       D SSN^ONCOES
              ALGORITHM:        D SSN^ONCOES
              LAST EDITED:      MAY 12, 2003 
              DESCRIPTION:      Records the patient's Social Security number.  
                                 
                                For further information see FORDS page 37.  


160,2.1       CSSN                    ;  COMPUTED

              MUMPS CODE:       S X=^ONCO(160,D0,0),Y="^"_$P($P(X,U,1),";",2)_+X_",0)",X=$S($D(@Y):$P(@Y,U,9),1:"")
              ALGORITHM:        S X=^ONCO(160,D0,0),Y="^"_$P($P(X,U,1),";",2)_+X_",0)",X=$S($D(@Y):$P(@Y,U,9),1:"")
              DESCRIPTION:
                                COMPUTED SOCIAL SECURITY NUMBER.  


160,3         DOB                     ;  COMPUTED

              MUMPS CODE:       D DOB^ONCOES
              ALGORITHM:        D DOB^ONCOES
              LAST EDITED:      MAY 12, 2003 
              DESCRIPTION:      Identifies the date of birth of the patient.  
                                 
                                For further information see FORDS page 57.  


160,3.1       DATE OF BIRTH (FILEMAN FORMAT)  ;  COMPUTED

              MUMPS CODE:       D DOB1^ONCOES
              ALGORITHM:        D DOB1^ONCOES
              LAST EDITED:      NOV 04, 2002 
              DESCRIPTION:
                                Identifies the date of birth of the patient in internal FileMan format.  


160,4         MEDICAL RECORD NUMBER   ;  COMPUTED

              MUMPS CODE:       D SSN^ONCOES
              ALGORITHM:        D SSN^ONCOES
              LAST EDITED:      FEB 12, 2003 
              DESCRIPTION:      Records the medical record number usually assigned by the reporting facility's health information
                                management (HIM) department.  
                                 
                                For further information see FORDS page 36.  


160,4.1       TERMINAL DIGIT          ;  COMPUTED

              MUMPS CODE:       S X="" D TRM^ONCOES
              ALGORITHM:        S X="" D TRM^ONCOES
              LAST EDITED:      OCT 31, 1990 
              DESCRIPTION:
                                COMPUTED FIELD TAKING THE LAST TWO DIGITS FROM THE PATIENT'S SOCIAL SECURITY NUMBER.  


160,5         REGIONAL NO.           0;3 FREE TEXT

              INPUT TRANSFORM:  K:$L(X)>8!($L(X)<1) X
              HELP-PROMPT:      ANSWER MUST BE 1-8 CHARACTERS IN LENGTH 
              DESCRIPTION:
                                Regional data set - One number per patient - Can be left blank.  


160,6         CENTRAL NO.            0;4 FREE TEXT

              SEER Case Number   
              INPUT TRANSFORM:  K:X[""""!($A(X)=45) X I $D(X) K:$L(X)>8!($L(X)<8)!'(X?8N) X I $D(X) I $D(^ONCO(160,"CN",X)) W !,*7,
                                "This has been used previously as a CENTRAL NUMBER" K X
              LAST EDITED:      SEP 23, 1988 
              HELP-PROMPT:      ANSWER MUST BE A UNIQUE COMBINATION OF 8 NUMBERS IN LENGTH AND CAN HAVE LEADING ZEROS 
              DESCRIPTION:      The case number is issued by the SEER participant to identify the person.  Each computer record
                                pertaining to the same person must have an identical case number.  It uses eight digits with
                                leading zeros as necessary.  

              SOURCE OF DATA:   SEER I.02
              GROUP:            SEER
              NOTES:            XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER

              CROSS-REFERENCE:  160^CN 
                                1)= S ^ONCO(160,"CN",$E(X,1,30),DA)=""
                                2)= K ^ONCO(160,"CN",$E(X,1,30),DA)
                                Indexes file by CENTRAL NO..  



160,7         PLACE OF BIRTH         0;5 POINTER TO GEOCODES FILE (#165.2) (Required)

              LAST EDITED:      NOV 04, 2002 
              DESCRIPTION:       Records the patient's place of birth.  
                                 
                                For further information see FORDS page 56.  

              GROUP:            ACOS

160,8         RACE 1                 0;6 POINTER TO RACE CODE FOR ONCOLOGY FILE (#164.46) (Required)

              INPUT TRANSFORM:  S DIC("S")="I Y'=88" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X
              LAST EDITED:      DEC 07, 2000 
              DESCRIPTION:       Identifies the primary race of the person.  
                                 
                                For further information see FORDS page 59.  

              SCREEN:           S DIC("S")="I Y'=88"
              EXPLANATION:      Select an entry from the RACE CODE FOR ONCOLOGY list

160,8.1       RACE 2                 0;15 POINTER TO RACE CODE FOR ONCOLOGY FILE (#164.46)

              LAST EDITED:      DEC 07, 2000 
              DESCRIPTION:       Identifies the patient's race.  
                                 
                                For further information see FORDS page 61.  


160,8.2       RACE 3                 0;16 POINTER TO RACE CODE FOR ONCOLOGY FILE (#164.46)

              LAST EDITED:      DEC 07, 2000 
              DESCRIPTION:       Identifies the patient's race.  
                                 
                                For further information see FORDS page 62.  
                                 


160,8.3       RACE 4                 0;17 POINTER TO RACE CODE FOR ONCOLOGY FILE (#164.46)

              LAST EDITED:      DEC 07, 2000 
              DESCRIPTION:       Identifies the patient's race.  
                                 
                                For further information see FORDS page 63.  


160,8.4       RACE 5                 0;18 POINTER TO RACE CODE FOR ONCOLOGY FILE (#164.46)

              LAST EDITED:      DEC 07, 2000 
              DESCRIPTION:       Identifies the patient's race.  
                                 
                                For further information see FORDS page 64.  


160,9         SPANISH ORIGIN         0;7 SET

                                '0' FOR Non-Spanish, non-Hispanic; 
                                '1' FOR Mexican; 
                                '2' FOR Puerto Rican; 
                                '3' FOR Cuban; 
                                '4' FOR South/Central American; 
                                '5' FOR Other specified Spanish/Hispanic; 
                                '6' FOR Spanish, Hispanic, Latino, NOS; 
                                '7' FOR Spanish surname only; 
                                '8' FOR Dominican Republic; 
                                '9' FOR Unknown/not stated; 
              LAST EDITED:      OCT 08, 2004 
              DESCRIPTION:       Identifies persons of Spanish or Hispanic origin.  
                                 
                                NOTE: Code 8 (Dominican Republic) is for use with patients who 
                                      were diagnosed with cancer on January 1, 2005, or later.  
                                 
                                For further information see FORDS page 65.  

              GROUP:            ACOS-RECOMMENDED

160,10        SEX                    0;8 SET (Required)

                                '1' FOR Male; 
                                '2' FOR Female; 
                                '3' FOR Other (intersex, disorders of sexual development/DSD); 
                                '4' FOR Transsexual, NOS; 
                                '5' FOR Transsexual, natal male; 
                                '6' FOR Transsexual, natal female; 
                                '9' FOR Not stated; 
              LAST EDITED:      MAR 07, 2017 
              HELP-PROMPT:      Record the patient's sex as noted in the medical record. 
              DESCRIPTION:       Identifies the sex of the patient.  
                                 
                                For further information see FORDS page 66.  


160,11        LRDFN                  0;2 NUMBER

              INPUT TRANSFORM:  K:+X'=X!(X>999999)!(X<1)!(X?.E1"."1N.N) X
              LAST EDITED:      JUN 18, 1991 
              HELP-PROMPT:      Type a Number between 1 and 999999, 0 Decimal Digits 
              DESCRIPTION:
                                COMPUTED FIELD WITH THE LABORATORY DATA FILE NUMBER.  


160,12        CURRENT OCCUPATION      ;  COMPUTED

              MUMPS CODE:       S X="" D OCC^ONCOES
              ALGORITHM:        S X="" D OCC^ONCOES
              DESCRIPTION:
                                This is the current occupation of the patient.  


160,13        RELIGION                ;  COMPUTED

              MUMPS CODE:       D REL^ONCOES
              ALGORITHM:        D REL^ONCOES
              LAST EDITED:      OCT 15, 1987 
              DESCRIPTION:
                                THE PATIENT'S RELIGION.  


160,14        MARITAL STATUS          ;  COMPUTED

              MUMPS CODE:       D MS^ONCOES
              ALGORITHM:        D MS^ONCOES
              DESCRIPTION:
                                COMPUTED FIELD LISTING THE PATIENT'S MARTIAL STATUS.  


160,15        STATUS                 1;1 SET

                                '0' FOR Dead; 
                                '1' FOR Alive; 
              LAST EDITED:      SEP 24, 2003 
              DESCRIPTION:
                                Record whether the patient is alive or dead.  

              TECHNICAL DESCR:  This field is referenced directly by UVS^ONCOCRF.  This field is referenced directly by
                                TRS^ONCOCOS.  

              CROSS-REFERENCE:  160^AS 
                                1)= S ^ONCO(160,"AS",$E(X,1,30),DA)=""
                                2)= K ^ONCO(160,"AS",$E(X,1,30),DA)
                                Indexes file by STATUS.  



160,15.1      LAST FOLLOW-UP CONTACT 1;6 POINTER TO ONCOLOGY CONTACT FILE (#165)

              LAST EDITED:      MAY 07, 1999 
              DESCRIPTION:
                                RECORDS THE PATIENT'S LAST FOLLOW-UP CONTACT.  

              CROSS-REFERENCE:  160^AC 
                                1)= S ^ONCO(160,"AC",$E(X,1,30),DA)=""
                                2)= K ^ONCO(160,"AC",$E(X,1,30),DA)
                                Creates a list of CONTACTs and the ONCOLOGY PATIENTs who use them.  



160,15.2      FOLLOW-UP STATUS       1;7 SET

                                '0' FOR Inactive; 
                                '1' FOR Active; 
                                '8' FOR LTF; 
              LAST EDITED:      JAN 05, 2000 
              DESCRIPTION:
                                RECORDS THE PATIENT'S FOLLOW UP STATUS.  

              CROSS-REFERENCE:  160^AFS 
                                1)= S ^ONCO(160,"AFS",$E(X,1,30),DA)=""
                                2)= K ^ONCO(160,"AFS",$E(X,1,30),DA)
                                Indexes file by FOLLOW-UP STATUS.  



160,16        DATE LAST CONTACT       ;  COMPUTED

              MUMPS CODE:       S X="" D DLC^ONCOCRF,DATEOT^ONCOES
              ALGORITHM:        S X="" D DLC^ONCOCRF,DATEOT^ONCOES
              LAST EDITED:      MAR 30, 2006 
              DESCRIPTION:
                                RECORDS THE PATIENT'S LAST DATE OF CONTACT.  


160,17        TOTAL PRIMARIES FOR PATIENT  ;  COMPUTED

              MUMPS CODE:       D PRICNT^ONCFUNC
              ALGORITHM:        D PRICNT^ONCFUNC
              LAST EDITED:      AUG 17, 2001 
              DESCRIPTION:       This field will display a division specific count of a patient's primaries.  
                                 


160,18.9      CAUSE OF DEATH/CANCER  1;12 SET

                                'D' FOR Directly related; 
                                'I' FOR Indirectly related; 
                                'N' FOR Not related; 
                                'U' FOR Unknown; 
              LAST EDITED:      APR 23, 1993 
              DESCRIPTION:
                                This field contains a code indicating whether the patient died as a result of cancer.  

              TECHNICAL DESCR:
                                This field is referenced directly by UVSALIVE^ONCOCRFA.  

              SCREEN:           S DIC("S")="I '$P($G(^ONCO(160,DA,1)),U)"
              EXPLANATION:      This field only applies to expired patients.

160,19        CAUSE OF DEATH         1;3 POINTER TO ICD DIAGNOSIS FILE (#80)

              OUTPUT TRANSFORM: S X=Y D SDOT^ONCFUNC
              LAST EDITED:      OCT 15, 2015 
              HELP-PROMPT:      Enter a valid ICD code. 
              DESCRIPTION:       Record the CAUSE OF DEATH listed on the death certificate.  Central registries are the primary
                                users of this data item.  Use the underlying CAUSE OF DEATH (ICD code) identified by state health
                                department.  
                                 

              TECHNICAL DESCR:
                                This field is referenced directly by UVSALIVE^ONCOCRFA.  

              GROUP:            SEER
              CROSS-REFERENCE:  ^^TRIGGER^160^19.1 
                                1)= K DIV S DIV=X,D0=DA,DIV(0)=D0 S Y(1)=$S($D(^ONCO(160,D0,1)):^(1),1:"") S X=$P(Y(1),U,14),X=X S 
                                DIU=X K Y S X="" S DIH=$G(^ONCO(160,DIV(0),1)),DIV=X S $P(^(1),U,14)=DIV,DIH=160,DIG=19.1 D ^DICR

                                2)= K DIV S DIV=X,D0=DA,DIV(0)=D0 S Y(1)=$S($D(^ONCO(160,D0,1)):^(1),1:"") S X=$P(Y(1),U,14),X=X S 
                                DIU=X K Y S X="" S DIH=$G(^ONCO(160,DIV(0),1)),DIV=X S $P(^(1),U,14)=DIV,DIH=160,DIG=19.1 D ^DICR

                                CREATE VALUE)= @
                                DELETE VALUE)= NO EFFECT
                                FIELD)= STATE DEATH CERT
                                When CAUSE OF DEATH field is stuffed, the STATE DEATH CERT field will be deleted.  



160,19.1      STATE DEATH CERT       1;14 SET

                                '7777' FOR State death certificate or listing not available; 
                                '7797' FOR State death cert available, cause of death not coded; 
              LAST EDITED:      APR 09, 1998 
              HELP-PROMPT:      Enter the status of the state death certificate. 
              DESCRIPTION:
                                This field stores special CAUSE OF DEATH values which are not ICD codes.  

              NOTES:            TRIGGERED by the CAUSE OF DEATH field of the ONCOLOGY PATIENT File 


160,20        ICD REVISION           1;4 SET

              ICD Revision for Death Code   
                                '0' FOR Patient alive at last follow-up; 
                                '8' FOR ICDA-8; 
                                '9' FOR ICD-9; 
              LAST EDITED:      SEP 23, 1987 
              DESCRIPTION:      This information will be provided by the central registry when backloading cases.  It refers to
                                which ICD coding scheme (see Field 19 'Cause of Death') used to code the cause of death.  

              TECHNICAL DESCR:
                                This field is referenced directly by UVSALIVE^ONCOCRFA and by UVSDEAD^ONCOCRFA.  

              SOURCE OF DATA:   SEER VI.03
              GROUP:            SEER

160,21        PLACE OF DEATH         1;5 POINTER TO GEOCODES FILE (#165.2)

              LAST EDITED:      JUL 14, 1998 
              DESCRIPTION:       Enter the place of death.  
                                 

              TECHNICAL DESCR:
                                This field is referenced directly by UVSALIVE^ONCOCRFA.  


160,22.9      AUTOPSY                1;13 SET

                                '0' FOR Patient alive; 
                                '1' FOR Autopsy performed; 
                                '2' FOR No autopsy performed; 
                                '9' FOR Patient expired, unknown if autopsy performed; 
              LAST EDITED:      FEB 07, 2000 
              DESCRIPTION:      This field contains a code indicating (if known) whether a post-mortem examination was performed on
                                the patient.  

              TECHNICAL DESCR:
                                This field is referenced directly by UVSALIVE^ONCOCRFA.  

              SCREEN:           S DIC("S")="I '$P($G(^ONCO(160,DA,1)),U)"
              EXPLANATION:      This field only applies to expired patients.

160,23        AUTOPSY DATE/TIME      1;9 DATE

              INPUT TRANSFORM:  S %DT="EST",%DT(0)="-NOW" D ^%DT S X=Y K:Y<1 X K %DT(0)
              OUTPUT TRANSFORM: S X=Y D DATEOT^ONCOES
              LAST EDITED:      DEC 19, 1996 
              DESCRIPTION:
                                RECORD THE DATE AND TIME OF AUTOPSY.  

              TECHNICAL DESCR:
                                This field is referenced directly by UVSALIVE^ONCOCRFA.  

              NOTES:            XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER


160,24        AUTOPSY #              1;10 FREE TEXT

              INPUT TRANSFORM:  K:$L(X)>15!($L(X)<1) X
              LAST EDITED:      AUG 02, 1990 
              HELP-PROMPT:      Answer must be 1-15 characters in length. 
              DESCRIPTION:
                                RECORD THE AUTOPSY SEQUENCE NUMBER, USUALLY STATED AS  A-90-XXXX.  

              TECHNICAL DESCR:
                                This field is referenced directly by UVSALIVE^ONCOCRFA.  


160,24.5      CARE CENTER AT DEATH   1;11 POINTER TO FACILITY FILE (#160.19)

              OUTPUT TRANSFORM: S:Y'="" Y=$S($D(^ONCO(160.19,Y,0)):$P(^(0),U,2),1:Y)
              LAST EDITED:      JUN 28, 1996 
              HELP-PROMPT:      Enter Facility where patient expired. 
              DESCRIPTION:
                                Facility caring for patient at the time of death.  

              TECHNICAL DESCR:
                                This field is referenced directly by UVSALIVE^ONCOCRFA.  


160,25        COMORBIDITY/COMPLICATION #1 0;19 POINTER TO ICD DIAGNOSIS FILE (#80)

              INPUT TRANSFORM:  S DIC("S")="D CC^ONCFUNC" D ^DIC K DIC S DIC=$G(DIE),X=+Y K:Y<0 X
              OUTPUT TRANSFORM: I Y'="" N ONCICD,CODE,SPACE S ONCICD=$$ICDDX^ICDCODE(Y) S:(ONCICD=-1) Y=-1 S:(Y'=-1) CODE=$P(ONCICD
                                ,U,2),SPACE=$S($L(CODE)=4:"   ",$L(CODE)=5:"  ",1:" "),Y=CODE_SPACE_$P(ONCICD,U,4)
              LAST EDITED:      JUN 08, 2012 
              DESCRIPTION:       Records the patient's preexisting medical conditions, factors influencing health status, and/or
                                complications during the patient's hospital stay for the treatment of this cancer using ICD-CM
                                codes.  All are considered secondary diagnoses.  
                                 
                                NOTE: If no comorbid conditions or complications were documented, 
                                      leave this field blank.  When this item is extracted for 
                                      export a blank value will be converted to "00000" as per 
                                      the NAACCR instructions. 
                                 
                                DO NOT record any neoplasms (ICD-CM codes 140-239.9) listed as secondary diagnoses for this data
                                item.  
                                 
                                DO NOT record causes of injury and poisoning unrelated to the patient's medical care (ICD-CM codes
                                E800-E869.9, E880-E929.9, or E950-E999).  
                                 
                                DO NOT record the following factors influencing health status and contact with health services
                                (ICD-CM codes V01-V07.1, V07.4-V09.91, V16-V21.9, V23.2-V25.3, V25.5-V43.89, V46-V50.4, or
                                V50.8-V83.89).  
                                 
                                For further information see FORDS pages 69-70.  

              SCREEN:           S DIC("S")="D CC^ONCFUNC"
              EXPLANATION:      Record the patient's 1st pre-existing condition and/or complication using the ICD-CM codes.  If no 
                                comorbid conditions or complications were documented, leave this item blank.  Blank values will be 
                                converted to "00000" for NAACCR export.

160,25.1      COMORBIDITY/COMPLICATION #2 0;20 POINTER TO ICD DIAGNOSIS FILE (#80)

              INPUT TRANSFORM:  S DIC("S")="D CC^ONCFUNC" D ^DIC K DIC S DIC=$G(DIE),X=+Y K:Y<0 X
              OUTPUT TRANSFORM: I Y'="" N ONCICD,CODE,SPACE S ONCICD=$$ICDDX^ICDCODE(Y) S:(ONCICD=-1) Y=-1 S:(Y'=-1) CODE=$P(ONCICD
                                ,U,2),SPACE=$S($L(CODE)=4:"   ",$L(CODE)=5:"  ",1:" "),Y=CODE_SPACE_$P(ONCICD,U,4)
              LAST EDITED:      JUN 08, 2012 
              DESCRIPTION:       Records the patient's preexisting medical conditions, factors influencing health status, and/or
                                complications during the patient's hospital stay for the treatment of this cancer.  Both are
                                considered secondary diagnoses.  
                                 
                                DO NOT record any neoplasms (ICD-CM codes 140-239.9) listed as secondary diagnoses for this data
                                item.  
                                 
                                DO NOT record causes of injury and poisoning unrelated to the patient's medical care (ICD-CM codes
                                E800-E869.9, E880-E929.9, or E950-E999).  
                                 
                                DO NOT record the following factors influencing health status and contact with health services
                                (ICD-CM codes V01-V07.1, V07.4-V09.91, V16-V21.9, V23.2-V25.3, V25.5-V43.89, V46-V50.4, or
                                V50.8-V83.89).  
                                 
                                For further information see FORDS page 71.  

              SCREEN:           S DIC("S")="D CC^ONCFUNC"
              EXPLANATION:      Record the patient's 2nd pre-existing condition and/or complication using ICD-CM codes.  If no como
                                rbid conditions or complications were documented, leave this item blank.

160,25.2      COMORBIDITY/COMPLICATION #3 0;21 POINTER TO ICD DIAGNOSIS FILE (#80)

              INPUT TRANSFORM:  S DIC("S")="D CC^ONCFUNC" D ^DIC K DIC S DIC=$G(DIE),X=+Y K:Y<0 X
              OUTPUT TRANSFORM: I Y'="" N ONCICD,CODE,SPACE S ONCICD=$$ICDDX^ICDCODE(Y) S:(ONCICD=-1) Y=-1 S:(Y'=-1) CODE=$P(ONCICD
                                ,U,2),SPACE=$S($L(CODE)=4:"   ",$L(CODE)=5:"  ",1:" "),Y=CODE_SPACE_$P(ONCICD,U,4)
              LAST EDITED:      JUN 08, 2012 
              DESCRIPTION:       Records the patient's preexisting medical conditions, factors influencing health status, and/or
                                complications during the patient's hospital stay for the treatment of this cancer.  Both are
                                considered secondary diagnoses.  
                                 
                                DO NOT record any neoplasms (ICD-CM codes 140-239.9) listed as secondary diagnoses for this data
                                item.  
                                 
                                DO NOT record causes of injury and poisoning unrelated to the patient's medical care (ICD-CM codes
                                E800-E869.9, E880-E929.9, or E950-E999).  
                                 
                                DO NOT record the following factors influencing health status and contact with health services
                                (ICD-CM codes V01-V07.1, V07.4-V09.91, V16-V21.9, V23.2-V25.3, V25.5-V43.89, V46-V50.4, or
                                V50.8-V83.89).  
                                 
                                For further information see FORDS page 72.  

              SCREEN:           S DIC("S")="D CC^ONCFUNC"
              EXPLANATION:      Record the patient's 3rd pre-existing condition and/or complication using ICD-CM codes.  If no como
                                rbid conditions or complications were documented, leave this item blank.

160,25.3      COMORBIDITY/COMPLICATION #4 0;22 POINTER TO ICD DIAGNOSIS FILE (#80)

              INPUT TRANSFORM:  S DIC("S")="D CC^ONCFUNC" D ^DIC K DIC S DIC=$G(DIE),X=+Y K:Y<0 X
              OUTPUT TRANSFORM: I Y'="" N ONCICD,CODE,SPACE S ONCICD=$$ICDDX^ICDCODE(Y) S:(ONCICD=-1) Y=-1 S:(Y'=-1) CODE=$P(ONCICD
                                ,U,2),SPACE=$S($L(CODE)=4:"   ",$L(CODE)=5:"  ",1:" "),Y=CODE_SPACE_$P(ONCICD,U,4)
              LAST EDITED:      JUN 08, 2012 
              DESCRIPTION:       Records the patient's preexisting medical conditions, factors influencing health status, and/or
                                complications during the patient's hospital stay for the treatment of this cancer.  Both are
                                considered secondary diagnoses.  
                                 
                                DO NOT record any neoplasms (ICD-CM codes 140-239.9) listed as secondary diagnoses for this data
                                item.  
                                 
                                DO NOT record causes of injury and poisoning unrelated to the patient's medical care (ICD-CM codes
                                E800-E869.9, E880-E929.9, or E950-E999).  
                                 
                                DO NOT record the following factors influencing health status and contact with health services
                                (ICD-CM codes V01-V07.1, V07.4-V09.91, V16-V21.9, V23.2-V25.3, V25.5-V43.89, V46-V50.4, or
                                V50.8-V83.89).  
                                 
                                For further information see FORDS page 73.  

              SCREEN:           S DIC("S")="D CC^ONCFUNC"
              EXPLANATION:      Record the patient's 4th pre-existing condition and/or complication using ICD-CM codes.  If no como
                                rbid conditions or complications were documented, leave this item blank.

160,25.4      COMORBIDITY/COMPLICATION #5 0;23 POINTER TO ICD DIAGNOSIS FILE (#80)

              INPUT TRANSFORM:  S DIC("S")="D CC^ONCFUNC" D ^DIC K DIC S DIC=$G(DIE),X=+Y K:Y<0 X
              OUTPUT TRANSFORM: I Y'="" N ONCICD,CODE,SPACE S ONCICD=$$ICDDX^ICDCODE(Y) S:(ONCICD=-1) Y=-1 S:(Y'=-1) CODE=$P(ONCICD
                                ,U,2),SPACE=$S($L(CODE)=4:"   ",$L(CODE)=5:"  ",1:" "),Y=CODE_SPACE_$P(ONCICD,U,4)
              LAST EDITED:      JUN 08, 2012 
              DESCRIPTION:       Records the patient's preexisting medical conditions, factors influencing health status, and/or
                                complications during the patient's hospital stay for the treatment of this cancer.  Both are
                                considered secondary diagnoses.  
                                 
                                DO NOT record any neoplasms (ICD-CM codes 140-239.9) listed as secondary diagnoses for this data
                                item.  
                                 
                                DO NOT record causes of injury and poisoning unrelated to the patient's medical care (ICD-CM codes
                                E800-E869.9, E880-E929.9, or E950-E999).  
                                 
                                DO NOT record the following factors influencing health status and contact with health services
                                (ICD-CM codes V01-V07.1, V07.4-V09.91, V16-V21.9, V23.2-V25.3, V25.5-V43.89, V46-V50.4, or
                                V50.8-V83.89).  
                                 
                                For further information see FORDS page 74.  

              SCREEN:           S DIC("S")="D CC^ONCFUNC"
              EXPLANATION:      Record the patient's 5th pre-existing condition and/or complication using ICD-CM codes.  If no como
                                rbid conditions or complications were documented, leave this item blank.

160,25.5      COMORBIDITY/COMPLICATION #6 0;24 POINTER TO ICD DIAGNOSIS FILE (#80)

              INPUT TRANSFORM:  S DIC("S")="D CC^ONCFUNC" D ^DIC K DIC S DIC=$G(DIE),X=+Y K:Y<0 X
              OUTPUT TRANSFORM: I Y'="" N ONCICD,CODE,SPACE S ONCICD=$$ICDDX^ICDCODE(Y) S:(ONCICD=-1) Y=-1 S:(Y'=-1) CODE=$P(ONCICD
                                ,U,2),SPACE=$S($L(CODE)=4:"   ",$L(CODE)=5:"  ",1:" "),Y=CODE_SPACE_$P(ONCICD,U,4)
              LAST EDITED:      JUN 08, 2012 
              DESCRIPTION:       Records the patient's preexisting medical conditions, factors influencing health status, and/or
                                complications during the patient's hospital stay for the treatment of this cancer.  Both are
                                considered secondary diagnoses.  
                                 
                                DO NOT record any neoplasms (ICD-CM codes 140-239.9) listed as secondary diagnoses for this data
                                item.  
                                 
                                DO NOT record causes of injury and poisoning unrelated to the patient's medical care (ICD-CM codes
                                E800-E869.9, E880-E929.9, or E950-E999).  
                                 
                                DO NOT record the following factors influencing health status and contact with health services
                                (ICD-CM codes V01-V07.1, V07.4-V09.91, V16-V21.9, V23.2-V25.3, V25.5-V43.89, V46-V50.4, or
                                V50.8-V83.89).  
                                 
                                For further information see FORDS page 75.  

              SCREEN:           S DIC("S")="D CC^ONCFUNC"
              EXPLANATION:      Record the patient's 6th pre-existing condition and/or complication using ICD-CM codes.  If no como
                                rbid conditions or complications were documented, leave this item blank.

160,25.6      COMORBIDITY/COMPLICATION #7 0;28 POINTER TO ICD DIAGNOSIS FILE (#80)

              INPUT TRANSFORM:  S DIC("S")="D CC^ONCFUNC" D ^DIC K DIC S DIC=$G(DIE),X=+Y K:Y<0 X
              OUTPUT TRANSFORM: I Y'="" N ONCICD,CODE,SPACE S ONCICD=$$ICDDX^ICDCODE(Y) S:(ONCICD=-1) Y=-1 S:(Y'=-1) CODE=$P(ONCICD
                                ,U,2),SPACE=$S($L(CODE)=4:"   ",$L(CODE)=5:"  ",1:" "),Y=CODE_SPACE_$P(ONCICD,U,4)
              LAST EDITED:      JUN 08, 2012 
              DESCRIPTION:       Records the patient's preexisting medical conditions, factors influencing health status, and/or
                                complications during the patient's hospital stay for the treatment of this cancer.  Both are
                                considered secondary diagnoses.  
                                 
                                DO NOT record any neoplasms (ICD-CM codes 140-239.9) listed as secondary diagnoses for this data
                                item.  
                                        
                                DO NOT record causes of injury and poisoning unrelated to the patient's medical care (ICD-CM codes
                                E800-E869.9, E880-E929.9, or E950-E999).  
                                        
                                DO NOT record the following factors influencing health status and contact with health services
                                (ICD-CM codes V01-V07.1, V07.4-V09.91, V16-V21.9, V23.2-V25.3, V25.5-V43.89, V46-V50.4, or
                                V50.8-V83.89).  
                                        
                                For further information see FORDS page 75A.  

              SCREEN:           S DIC("S")="D CC^ONCFUNC"
              EXPLANATION:      Record the patient's 7th pre-existing condition and/or complication using ICD-CM codes.  If no como
                                rbid conditions or complications were documented, leave this item blank.

160,25.7      COMORBIDITY/COMPLICATION #8 0;29 POINTER TO ICD DIAGNOSIS FILE (#80)

              INPUT TRANSFORM:  S DIC("S")="D CC^ONCFUNC" D ^DIC K DIC S DIC=$G(DIE),X=+Y K:Y<0 X
              OUTPUT TRANSFORM: I Y'="" N ONCICD,CODE,SPACE S ONCICD=$$ICDDX^ICDCODE(Y) S:(ONCICD=-1) Y=-1 S:(Y'=-1) CODE=$P(ONCICD
                                ,U,2),SPACE=$S($L(CODE)=4:"   ",$L(CODE)=5:"  ",1:" "),Y=CODE_SPACE_$P(ONCICD,U,4)
              LAST EDITED:      JUN 08, 2012 
              DESCRIPTION:       Records the patient's preexisting medical conditions, factors influencing health status, and/or
                                complications during the patient's hospital stay for the treatment of this cancer.  Both are
                                considered secondary diagnoses.  
                                 
                                DO NOT record any neoplasms (ICD-CM codes 140-239.9) listed as secondary diagnoses for this data
                                item.  
                                 
                                DO NOT record causes of injury and poisoning unrelated to the patient's medical care (ICD-CM codes
                                E800-E869.9, E880-E929.9, or E950-E999).  
                                 
                                DO NOT record the following factors influencing health status and contact with health services
                                (ICD-CM codes V01-V07.1, V07.4-V09.91, V16-V21.9, V23.2-V25.3, V25.5-V43.89, V46-V50.4, or
                                V50.8-V83.89).  
                                 
                                For further information see FORDS page 75B.  

              SCREEN:           S DIC("S")="D CC^ONCFUNC"
              EXPLANATION:      Record the patient's 8th pre-existing condition and/or complication using ICD-CM codes.  If no como
                                rbid conditions or complications were documented, leave this item blank.

160,25.8      COMORBIDITY/COMPLICATION #9 0;30 POINTER TO ICD DIAGNOSIS FILE (#80)

              INPUT TRANSFORM:  S DIC("S")="D CC^ONCFUNC" D ^DIC K DIC S DIC=$G(DIE),X=+Y K:Y<0 X
              OUTPUT TRANSFORM: I Y'="" N ONCICD,CODE,SPACE S ONCICD=$$ICDDX^ICDCODE(Y) S:(ONCICD=-1) Y=-1 S:(Y'=-1) CODE=$P(ONCICD
                                ,U,2),SPACE=$S($L(CODE)=4:"   ",$L(CODE)=5:"  ",1:" "),Y=CODE_SPACE_$P(ONCICD,U,4)
              LAST EDITED:      JUN 08, 2012 
              DESCRIPTION:       Records the patient's preexisting medical conditions, factors influencing health status, and/or
                                complications during the patient's hospital stay for the treatment of this cancer.  Both are
                                considered secondary diagnoses.  
                                 
                                DO NOT record any neoplasms (ICD-CM codes 140-239.9) listed as secondary diagnoses for this data
                                item.  
                                 
                                DO NOT record causes of injury and poisoning unrelated to the patient's medical care (ICD-CM codes
                                E800-E869.9, E880-E929.9, or E950-E999).  
                                 
                                DO NOT record the following factors influencing health status and contact with health services
                                (ICD-CM codes V01-V07.1, V07.4-V09.91, V16-V21.9, V23.2-V25.3, V25.5-V43.89, V46-V50.4, or
                                V50.8-V83.89).  
                                 
                                For further information see FORDS page 75C.  

              SCREEN:           S DIC("S")="D CC^ONCFUNC"
              EXPLANATION:      Record the patient's 9th pre-existing condition and/or complication using ICD-CM codes.  If no como
                                rbid conditions or complications were documented, leave this item blank.

160,25.9      COMORBIDITY/COMPLICATION #10 0;31 POINTER TO ICD DIAGNOSIS FILE (#80)

              INPUT TRANSFORM:  S DIC("S")="D CC^ONCFUNC" D ^DIC K DIC S DIC=$G(DIE),X=+Y K:Y<0 X
              OUTPUT TRANSFORM: I Y'="" N ONCICD,CODE,SPACE S ONCICD=$$ICDDX^ICDCODE(Y) S:(ONCICD=-1) Y=-1 S:(Y'=-1) CODE=$P(ONCICD
                                ,U,2),SPACE=$S($L(CODE)=4:"   ",$L(CODE)=5:"  ",1:" "),Y=CODE_SPACE_$P(ONCICD,U,4)
              LAST EDITED:      JUN 08, 2012 
              DESCRIPTION:       Records the patient's preexisting medical conditions, factors influencing health status, and/or
                                complications during the patient's hospital stay for the treatment of this cancer.  Both are
                                considered secondary diagnoses.  
                                 
                                DO NOT record any neoplasms (ICD-CM codes 140-239.9) listed as secondary diagnoses for this data
                                item.  
                                 
                                DO NOT record causes of injury and poisoning unrelated to the patient's medical care (ICD-CM codes
                                E800-E869.9, E880-E929.9, or E950-E999).  
                                 
                                DO NOT record the following factors influencing health status and contact with health services
                                (ICD-CM codes V01-V07.1, V07.4-V09.91, V16-V21.9, V23.2-V25.3, V25.5-V43.89, V46-V50.4, or
                                V50.8-V83.89).  
                                 
                                For further information see FORDS page 75D.  

              SCREEN:           S DIC("S")="D CC^ONCFUNC"
              EXPLANATION:      Record the patient's 10th pre-existing condition and/or complication using ICD-CM codes.  If no com
                                orbid conditions or complications were documented, leave this item blank.

160,25.91     SECONDARY DIAGNOSIS #1 3;1 POINTER TO ICD DIAGNOSIS FILE (#80)

              INPUT TRANSFORM:  S DIC("S")="D SDIAG^ONCFUNC" D ^DIC K DIC S DIC=$G(DIE),X=+Y K:Y<0 X
              OUTPUT TRANSFORM: S X=Y D SDOT^ONCFUNC
              LAST EDITED:      OCT 14, 2015 
              HELP-PROMPT:      Enter a valid ICD-10-CM code. 
              DESCRIPTION:       Records the patient's preexisting medical conditions, factors influencing health status, and/or
                                complications during the patient's hospital stay for the treatment of this cancer using ICD-10-CM
                                codes.  All are considered secondary diagnoses.  
                                 
                                NOTE: If no comorbid conditions or complications were documented, 
                                      leave this field blank.  When this item is extracted for 
                                      export a blank value will be converted to "0000000" as per 
                                      the NAACCR instructions. 

              SCREEN:           S DIC("S")="D SDIAG^ONCFUNC"
              EXPLANATION:      Record the patient's 1st pre-existing condition and/or complication using ICD-10-CM code.

160,25.92     SECONDARY DIAGNOSIS #2 3;2 POINTER TO ICD DIAGNOSIS FILE (#80)

              INPUT TRANSFORM:  S DIC("S")="D SDIAG^ONCFUNC" D ^DIC K DIC S DIC=$G(DIE),X=+Y K:Y<0 X
              OUTPUT TRANSFORM: S X=Y D SDOT^ONCFUNC
              LAST EDITED:      OCT 14, 2015 
              HELP-PROMPT:      Enter a valid ICD-10-CM code. 
              DESCRIPTION:      Records the patient's preexisting medical conditions, factors influencing health status, and/or
                                complications during the patient's hospital stay for the treatment of this cancer using ICD-10-CM
                                codes.  All are considered secondary diagnoses.  
                                 
                                NOTE: If no comorbid conditions or complications were documented, 
                                      leave this field blank. 

              SCREEN:           S DIC("S")="D SDIAG^ONCFUNC"
              EXPLANATION:      Record the patient's 2nd pre-existing condition and/or complication using ICD-10-CM code.

160,25.93     SECONDARY DIAGNOSIS #3 3;3 POINTER TO ICD DIAGNOSIS FILE (#80)

              INPUT TRANSFORM:  S DIC("S")="D SDIAG^ONCFUNC" D ^DIC K DIC S DIC=$G(DIE),X=+Y K:Y<0 X
              OUTPUT TRANSFORM: S X=Y D SDOT^ONCFUNC
              LAST EDITED:      OCT 14, 2015 
              HELP-PROMPT:      Enter a valid ICD-10-CM code. 
              DESCRIPTION:      Records the patient's preexisting medical conditions, factors influencing health status, and/or
                                complications during the patient's hospital stay for the treatment of this cancer using ICD-10-CM
                                codes.  All are considered secondary diagnoses.  
                                 
                                NOTE: If no comorbid conditions or complications were documented, 
                                      leave this field blank. 

              SCREEN:           S DIC("S")="D SDIAG^ONCFUNC"
              EXPLANATION:      Record the patient's 3rd pre-existing condition and/or complication using the ICD-10-CM code.

160,25.94     SECONDARY DIAGNOSIS #4 3;4 POINTER TO ICD DIAGNOSIS FILE (#80)

              INPUT TRANSFORM:  S DIC("S")="D SDIAG^ONCFUNC" D ^DIC K DIC S DIC=$G(DIE),X=+Y K:Y<0 X
              OUTPUT TRANSFORM: S X=Y D SDOT^ONCFUNC
              LAST EDITED:      OCT 14, 2015 
              HELP-PROMPT:      Enter a valid ICD-10-CM code. 
              DESCRIPTION:      Records the patient's preexisting medical conditions, factors influencing health status, and/or
                                complications during the patient's hospital stay for the treatment of this cancer using ICD-10-CM
                                codes.  All are considered secondary diagnoses.  
                                 
                                NOTE: If no comorbid conditions or complications were documented, 
                                      leave this field blank. 

              SCREEN:           S DIC("S")="D SDIAG^ONCFUNC"
              EXPLANATION:      Record the patient's 4th pre-existing condition and/or complication using the ICD-10-CM code.

160,25.95     SECONDARY DIAGNOSIS #5 3;5 POINTER TO ICD DIAGNOSIS FILE (#80)

              INPUT TRANSFORM:  S DIC("S")="D SDIAG^ONCFUNC" D ^DIC K DIC S DIC=$G(DIE),X=+Y K:Y<0 X
              OUTPUT TRANSFORM: S X=Y D SDOT^ONCFUNC
              LAST EDITED:      OCT 14, 2015 
              HELP-PROMPT:      Enter a valid ICD-10-CM code. 
              DESCRIPTION:      Records the patient's preexisting medical conditions, factors influencing health status, and/or
                                complications during the patient's hospital stay for the treatment of this cancer using ICD-10-CM
                                codes.  All are considered secondary diagnoses.  
                                 
                                NOTE: If no comorbid conditions or complications were documented, 
                                      leave this field blank. 

              SCREEN:           S DIC("S")="D SDIAG^ONCFUNC"
              EXPLANATION:      Record the patient's 5th pre-existing condition and/or complication using the ICD-10-CM code.

160,25.96     SECONDARY DIAGNOSIS #6 3;6 POINTER TO ICD DIAGNOSIS FILE (#80)

              INPUT TRANSFORM:  S DIC("S")="D SDIAG^ONCFUNC" D ^DIC K DIC S DIC=$G(DIE),X=+Y K:Y<0 X
              OUTPUT TRANSFORM: S X=Y D SDOT^ONCFUNC
              LAST EDITED:      OCT 14, 2015 
              HELP-PROMPT:      Enter a valid ICD-10-CM code. 
              DESCRIPTION:      Records the patient's preexisting medical conditions, factors influencing health status, and/or
                                complications during the patient's hospital stay for the treatment of this cancer using ICD-10-CM
                                codes.  All are considered secondary diagnoses.  
                                 
                                NOTE: If no comorbid conditions or complications were documented, 
                                      leave this field blank. 

              SCREEN:           S DIC("S")="D SDIAG^ONCFUNC"
              EXPLANATION:      Record the patient's pre-existing condition and/or complication using the ICD-10-CM code.

160,25.97     SECONDARY DIAGNOSIS #7 3;7 POINTER TO ICD DIAGNOSIS FILE (#80)

              INPUT TRANSFORM:  S DIC("S")="D SDIAG^ONCFUNC" D ^DIC K DIC S DIC=$G(DIE),X=+Y K:Y<0 X
              OUTPUT TRANSFORM: S X=Y D SDOT^ONCFUNC
              LAST EDITED:      OCT 14, 2015 
              HELP-PROMPT:      Enter a valid ICD-10-CM code. 
              DESCRIPTION:      Records the patient's preexisting medical conditions, factors influencing health status, and/or
                                complications during the patient's hospital stay for the treatment of this cancer using ICD-10-CM
                                codes.  All are considered secondary diagnoses.  
                                 
                                NOTE: If no comorbid conditions or complications were documented, 
                                      leave this field blank. 

              SCREEN:           S DIC("S")="D SDIAG^ONCFUNC"
              EXPLANATION:      Record the patient's pre-existing condition and/or complication using the ICD-10-CM code.

160,25.98     SECONDARY DIAGNOSIS #8 3;8 POINTER TO ICD DIAGNOSIS FILE (#80)

              INPUT TRANSFORM:  S DIC("S")="D SDIAG^ONCFUNC" D ^DIC K DIC S DIC=$G(DIE),X=+Y K:Y<0 X
              OUTPUT TRANSFORM: S X=Y D SDOT^ONCFUNC
              LAST EDITED:      OCT 14, 2015 
              HELP-PROMPT:      Enter a valid ICD-10-CM code. 
              DESCRIPTION:      Records the patient's preexisting medical conditions, factors influencing health status, and/or
                                complications during the patient's hospital stay for the treatment of this cancer using ICD-10-CM
                                codes.  All are considered secondary diagnoses.  
                                 
                                NOTE: If no comorbid conditions or complications were documented, 
                                      leave this field blank. 

              SCREEN:           S DIC("S")="D SDIAG^ONCFUNC"
              EXPLANATION:      Record the patient's pre-existing condition and/or complication using the ICD-10-CM code.

160,25.99     SECONDARY DIAGNOSIS #9 3;9 POINTER TO ICD DIAGNOSIS FILE (#80)

              INPUT TRANSFORM:  S DIC("S")="D SDIAG^ONCFUNC" D ^DIC K DIC S DIC=$G(DIE),X=+Y K:Y<0 X
              OUTPUT TRANSFORM: S X=Y D SDOT^ONCFUNC
              LAST EDITED:      OCT 14, 2015 
              HELP-PROMPT:      Enter a valid ICD-10-CM code. 
              DESCRIPTION:      Records the patient's preexisting medical conditions, factors influencing health status, and/or
                                complications during the patient's hospital stay for the treatment of this cancer using ICD-10-CM
                                codes.  All are considered secondary diagnoses.  
                                 
                                NOTE: If no comorbid conditions or complications were documented, 
                                      leave this field blank. 

              SCREEN:           S DIC("S")="D SDIAG^ONCFUNC"
              EXPLANATION:      Record the patient's pre-existing condition and/or complication using the ICD-10-CM code.

160,25.9901   SECONDARY DIAGNOSIS #10 3;10 POINTER TO ICD DIAGNOSIS FILE (#80)

              INPUT TRANSFORM:  S DIC("S")="D SDIAG^ONCFUNC" D ^DIC K DIC S DIC=$G(DIE),X=+Y K:Y<0 X
              OUTPUT TRANSFORM: S X=Y D SDOT^ONCFUNC
              LAST EDITED:      OCT 14, 2015 
              HELP-PROMPT:      Enter a valid ICD-10-CM code. 
              DESCRIPTION:      Records the patient's preexisting medical conditions, factors influencing health status, and/or
                                complications during the patient's hospital stay for the treatment of this cancer using ICD-10-CM
                                codes.  All are considered secondary diagnoses.  
                                 
                                NOTE: If no comorbid conditions or complications were documented, 
                                      leave this field blank. 

              SCREEN:           S DIC("S")="D SDIAG^ONCFUNC"
              EXPLANATION:      Record the patient's pre-existing condition and/or complication using ICD-10-CM code.

160,27        DUE FOLLOW-UP          1;2 DATE

              INPUT TRANSFORM:  S %DT="E" D ^%DT S X=Y K:Y<1 X
              LAST EDITED:      JUL 25, 1990 
              HELP-PROMPT:      Date patient is DUE for follow-UP.  FOR DF REPORT, ENTER THE DATE OF THE NEXT SCHEDULED FOLLOW UP 
                                IN MONTH YEAR FORMAT.  EXAMPLE: SEPT 2014 (FOR CASES DUE FOR FOLLOW-UP SEPT 1 THROUGH SEPT 30, 
                                2014) 
              DESCRIPTION:
                                RECORDS THE DATE OF THE NEXT SCHEDULED FOLLOW UP.  

              CROSS-REFERENCE:  160^AD 
                                1)= S ^ONCO(160,"AD",$E(X,1,30),DA)=""
                                2)= K ^ONCO(160,"AD",$E(X,1,30),DA)
                                Indexes file by DUE FOLLOW-UP.  



160,29        DATE@TIME OF DEATH     1;8 DATE

              INPUT TRANSFORM:  S %DT="EST",%DT(0)="-NOW" D ^%DT S X=Y K:Y<1 X K %DT(0)
              OUTPUT TRANSFORM: S X=Y D DATEOT^ONCOES
              LAST EDITED:      FEB 05, 1996 
              HELP-PROMPT:      Enter the date of death or approximate date. 
              DESCRIPTION:
                                RECORD THE DATE AND TIME OF DEATH.  

              TECHNICAL DESCR:
                                This field is referenced directly by UVSALIVE^ONCOCRFA and by UVSDEAD^ONCOCRFA.  

              NOTES:            XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER


160,29.1      DOD                     ;  COMPUTED DATE

              MUMPS CODE:       S X="" D DOD^ONCOCRF
              ALGORITHM:        S X="" D DOD^ONCOCRF
              LAST EDITED:      NOV 02, 1990 
              DESCRIPTION:
                                COMPUTED FIELD FOR DATE OF DEATH.  


160,31        PATH/AUTOPSY (GROSS & MICRO) 4;0   WORD-PROCESSING #160.031   (NOWRAP)

              LAST EDITED:      APR 05, 1990 
              TECHNICAL DESCR:
                                This field is referenced directly by UVSALIVE^ONCOCRFA.  


                LAST EDITED:      SEP 17, 1990 
                DESCRIPTION:
                                  Allows entry of Autopsy findings from Autopsy Report - both Gross and Micro.  




160,32        DESC                    ;  COMPUTED

              MUMPS CODE:       S X=$S($P($G(^ONCO(160,D0,2)),U,3)="":0,1:1)
              ALGORITHM:        CUSTOM CODED
              LAST EDITED:      MAY 26, 1992 
              DESCRIPTION:
                                SUSPENSE COMPUTED FIELD.  

              NOTES:            XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER


160,33.1      SUSPENSE ADMIT DATE     ;  COMPUTED

              MUMPS CODE:       D SAD^ONCOCON
              ALGORITHM:        D SAD^ONCOCON
              LAST EDITED:      AUG 26, 2009 
              DESCRIPTION:
                                This field displays the patient's admission date.  


160,33.2      SUSPENSE DISCHARGE DATE  ;  COMPUTED

              MUMPS CODE:       D SDD^ONCOCON
              ALGORITHM:        D SDD^ONCOCON
              LAST EDITED:      APR 17, 2009 
              DESCRIPTION:
                                This field displays the patient's discharge date.  


160,33.3      SUSPENSE EPISODE OF CARE  ;  COMPUTED

              MUMPS CODE:       S X="" D SEC^ONCOCON
              ALGORITHM:        S X="" D SEC^ONCOCON
              DESCRIPTION:
                                This field records the episode of care leading to this suspense entry.  


160,33.6      PRIORITY               0;9 NUMBER

              INPUT TRANSFORM:  K:+X'=X!(X>10)!(X<1)!(X?.E1"."1N.N) X
              LAST EDITED:      JAN 27, 1992 
              HELP-PROMPT:      Type a Number between 1 and 10, 0 Decimal Digits 
              DESCRIPTION:
                                RECORDS PRECEDENCE STRUCTURE.  


160,34        LAST EPISODE of CARE    ;  COMPUTED

              MUMPS CODE:       S X="" D LEC^ONCOCON
              ALGORITHM:        S X="" D LEC^ONCOCON
              DESCRIPTION:
                                This field records the last episode of care.  


160,34.1      LAST ADMIT DATE         ;  COMPUTED

              MUMPS CODE:       D LAD^ONCOCON
              ALGORITHM:        D LAD^ONCOCON
              LAST EDITED:      FEB 26, 2010 
              DESCRIPTION:
                                Computes last admission date.  


160,34.2      LAST DISCHARGE DATE     ;  COMPUTED

              MUMPS CODE:       D LDD^ONCOCON
              ALGORITHM:        D LDD^ONCOCON
              LAST EDITED:      FEB 26, 2010 
              DESCRIPTION:
                                Computes last discharge date.  


160,36        LOST TO FOLLOWUP        ;  BOOLEAN COMPUTED

              MUMPS CODE:       S Y(160,36,1)=$S($D(^ONCO(160,D0,1)):^(1),1:""),X1=DT,X2=$P(Y(160,36,1),U,2) D:X2 ^%DTC:X1 S X=X>91
                                .25 S:X $P(^ONCO(160,D0,1),U,7)=8
              ALGORITHM:        (TODAY-#27)>91.25
              LAST EDITED:      AUG 09, 1991 
              DESCRIPTION:      COMPUTED FOR FOR PATIENTS THAT ARE LOST TO FOLLOW UP, OCCURS WHEN THE PATIENTS LAST FOLLOW UP
                                ATTEMPT/CONTACT IS OVER 15 MONTHS.  

              NOTES:            XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER


160,37        MONTHS DELINQUENT       ;  COMPUTED

              MUMPS CODE:       S Y(160,37,1)=$S($D(^ONCO(160,D0,1)):^(1),1:""),X1=DT,X2=$P(Y(160,37,1),U,2) D:X2 ^%DTC:X1 S X=$S(X
                                >91.25:(X/30.4167),1:""),X=$P(X,".")
              ALGORITHM:        S X=""
              DESCRIPTION:
                                COMPUTED FOR GIVEN TIME FRAME THE PATIENT FOLLOW UP IS DELINQUENT.  


160,38        TOBACCO HISTORY        8;2 SET

                                'Y' FOR Yes; 
                                'N' FOR No; 
                                'U' FOR Unknown; 
                                '0' FOR Never used; 
                                '1' FOR Cigarette smoker, current; 
                                '2' FOR Cigar/Pipe smoker, current; 
                                '3' FOR Snuff/Chew/Smokeless, current; 
                                '4' FOR Combination use, current; 
                                '5' FOR Previous use; 
                                '9' FOR Unknown; 
              LAST EDITED:      JUN 21, 1999 
              DESCRIPTION:       Code the patient's past or current use of tobacco.  
                                 

              SCREEN:           S DIC("S")="D TAHIST^ONCOOT I ((ACDT=1999)&(NUM=1))!((ACDT=0)&(NUM=0))"
              EXPLANATION:      Use codes 0-9 for patients accessed in 1999 or later.  Use codes Y, N and U for patients accessed p
                                rior to 1999.

160,39        ALCOHOL HISTORY        8;3 SET

                                'Y' FOR Yes; 
                                'N' FOR No; 
                                'U' FOR Unknown; 
                                '0' FOR No history of alcohol use; 
                                '1' FOR Current use of alcohol; 
                                '2' FOR Past history of alcohol use; 
                                '9' FOR Alcohol usage unknown; 
              LAST EDITED:      JUN 21, 1999 
              DESCRIPTION:       Code the patient's past or current consumption of alcoholic beverages including wine or beer.  
                                 

              SCREEN:           S DIC("S")="D TAHIST^ONCOOT I ((ACDT=1999)&(NUM=1))!((ACDT=0)&(NUM=0))"
              EXPLANATION:      Use codes 0-9 for patients accessed in 1999 or later.  Use codes Y, N and U for patients accessed p
                                rior to 1999.

160,40        TOBACCO USAGE          5;0 SET Multiple #160.02 (Add New Entry without Asking)

              DESCRIPTION:
                                DESCRIBES PATIENT TOBACCO USE.  


160.02,.01      TYPE OF TOBACCO USER   0;1 SET (Multiply asked)

                                  '1' FOR CIGARETTE; 
                                  '2' FOR CIGARS; 
                                  '3' FOR PIPE; 
                                  '4' FOR CHEWING TOBACCO; 
                                  '5' FOR SNUFF; 
                                  '6' FOR MARIJUANA; 
                                  '7' FOR MORE THAN 1 TYPE; 
                                  '8' FOR UNKNOWN; 
                LAST EDITED:      JUN 20, 1990 
                DESCRIPTION:
                                  This is the code that describes the patient's tobacco use.  


160.02,1        PACK-YEARS             0;2 NUMBER

                INPUT TRANSFORM:  S:X["U" X="U" Q:X="U"  K:+X'=X!(X>400)!(X<0)!(X?.E1"."1N.N) X
                OUTPUT TRANSFORM: S:Y="U" Y="Unknown"
                LAST EDITED:      AUG 27, 1993 
                HELP-PROMPT:      Enter the # of packs smoked per day times # of years, 0 to 400; or U for Unknown 
                DESCRIPTION:      Enter the number of packs smoked per day times the number of years.  
                                   Example: 2 packs per day for 10 years equals 20 pack-years.  

                NOTES:            XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER


160.02,2        YR QUIT TOBACCO USE    0;3 DATE

                INPUT TRANSFORM:  S:X["U" X="U" Q:X="U"  S %DT="E",%DT(0)="-NOW" D ^%DT S X=Y K:Y<1 X K %DT(0)
                OUTPUT TRANSFORM: S Y=$S(Y'="U":Y,1:"Unknown") D:Y?1.N DD^%DT
                LAST EDITED:      DEC 19, 1996 
                DESCRIPTION:
                                  This is the year in which the patient quit using tobacco.  

                NOTES:            XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER




160,41        ALCOHOL USAGE          6;0 SET Multiple #160.041 (Add New Entry without Asking)

              DESCRIPTION:
                                DESCRIBES PATIENT ALCOHOL USE.  


160.041,.01     TYPE OF ALCOHOL USER   0;1 SET (Multiply asked)

                                  'B' FOR BEER; 
                                  'W' FOR WINE; 
                                  'H' FOR HARD LIQUOR; 
                                  'M' FOR MODERATE/SOCIAL; 
                                  'S' FOR SERIOUS/HEAVY; 
                                  'U' FOR UNKNOWN; 
                LAST EDITED:      JAN 06, 1992 
                DESCRIPTION:
                                  This is a code indicating the kind or frequency of patient's alcohol consumption.  


160.041,1       YRS OF ALCOHOL USE     0;2 NUMBER

                INPUT TRANSFORM:  S:X["U" X="U" Q:X="U"  K:+X'=X!(X>99)!(X<0)!(X?.E1"."1N.N) X
                OUTPUT TRANSFORM: S:Y="U" Y="Unknown"
                LAST EDITED:      FEB 12, 1992 
                HELP-PROMPT:      Type a Number between 0 and 99, or "U","Unk" for Unknown 
                DESCRIPTION:
                                  This is the number of years that patient consumed alcohol.  

                NOTES:            XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER


160.041,2       DRINKS PER DAY         0;3 NUMBER

                INPUT TRANSFORM:  S:X["U" X="U" Q:X="U"  K:+X'=X!(X>999)!(X<0)!(X?.E1"."1N.N) X
                OUTPUT TRANSFORM: S:Y="U" Y="Unknown"
                LAST EDITED:      AUG 27, 1993 
                HELP-PROMPT:       Enter amount of alcohol consumed per day in whiskey equivalents. 
                DESCRIPTION:
                                  Number of whiskey equivalents consumed per day.  

                TECHNICAL DESCR:
                                  This field allows for the entry of alcohol consumption in terms of whiskey equivalents.  

                EXECUTABLE HELP:  I X="??" D ^ONCOHELP ;S XQH="ONCO DRINKS/DAY" D EN^XQH
                NOTES:            XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER


160.041,3       YR QUIT DRINKING       0;4 DATE

                INPUT TRANSFORM:  S:X["U" S="U" Q:X="U"  S %DT="E",%DT(0)="-NOW" D ^%DT S X=Y K:Y<1 X K %DT(0)
                OUTPUT TRANSFORM: S Y=$S(Y="U":"Unknown",1:Y) D:Y?1.N DD^%DT
                LAST EDITED:      DEC 19, 1996 
                DESCRIPTION:
                                  This is the year in which patient stopped consuming alcohol, if applicable.  

                NOTES:            XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER




160,42        OCCUPATION             7;0 Multiple #160.042 (Add New Entry without Asking)

              DESCRIPTION:
                                 Information about the patient's usual occupation, also known as usual type of job or work.  


160.042,.01     USUAL OCCUPATION       0;1 FREE TEXT (Multiply asked)

                INPUT TRANSFORM:  K:$L(X)>100!($L(X)<1) X
                LAST EDITED:      JUL 23, 2010 
                HELP-PROMPT:      Answer must be 1-100 characters in length. 
                DESCRIPTION:       Record the patient's usual occupation (that is, the kind of work performed during most of the
                                  patient's working life before diagnosis of this tumor).  Do NOT record "retired".  
                                   
                                  If usual occupation is not available or is unknown, record the patient's current or most recent
                                  occupation or any known occupation.  

                CROSS-REFERENCE:  160.042^B 
                                  1)= S ^ONCO(160,DA(1),7,"B",$E(X,1,30),DA)=""
                                  2)= K ^ONCO(160,DA(1),7,"B",$E(X,1,30),DA)


160.042,1       YEARS IN OCCUPATION    0;2 NUMBER

                INPUT TRANSFORM:  K:+X'=X!(X>99)!(X<0)!(X?.E1"."1N.N) X
                LAST EDITED:      SEP 18, 1987 
                HELP-PROMPT:      Type a Number between 0 and 99, 0 Decimal Digits 
                DESCRIPTION:
                                  Duration of employment in a given occupation in years.  


160.042,2       LAST DATE IN OCCUPATION 0;3 DATE

                INPUT TRANSFORM:  S %DT="E",%DT(0)="-NOW" D ^%DT S X=Y K:Y<1 X K %DT(0)
                LAST EDITED:      DEC 19, 1996 
                DESCRIPTION:
                                  Last date of employment in a given occupation.  

                NOTES:            XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER


160.042,3       USUAL INDUSTRY         0;4 FREE TEXT

                INPUT TRANSFORM:  K:$L(X)>40!($L(X)<3) X
                LAST EDITED:      JUN 28, 2000 
                HELP-PROMPT:      Answer must be 3-40 characters in length. 
                DESCRIPTION:       Record the primary type of activity carried on by the business/industry where the patient was
                                  employed for the most number of years before diagnosis of this tumor.  
                                   
                                  If the primary activity carried on at the location where the patient worked is unknown, it may be
                                  sufficient to record the name of the company (with city and town) for which the patient performed
                                  his/her usual occupation.  
                                   
                                  If current or most recent occupation, rather than usual occupation was recorded, record the
                                  patient's current or most recent business/industry.  
                                   




160,43        FAMILY HISTORY OF CANCER 8;1 SET

                                '0' FOR No; 
                                '1' FOR Yes; 
                                '9' FOR Unknown; 
              LAST EDITED:      FEB 14, 2002 
              DESCRIPTION:       FAMILY HISTORY OF CANCER records whether the patient has a family history of any reportable
                                malignancy.  


160,44        FAMILY MEMBER WITH CANCER 9;0 SET Multiple #160.044 (Add New Entry without Asking)

              DESCRIPTION:
                                Multiple for family members with cancer.  


160.044,.01     FAMILY MEMBER WITH CANCER 0;1 SET (Multiply asked)

                                  'F' FOR FATHER; 
                                  'M' FOR MOTHER; 
                                  'B' FOR BROTHER; 
                                  'S' FOR SISTER; 
                                  'U' FOR UNCLE; 
                                  'A' FOR AUNT; 
                                  'NI' FOR NIECE; 
                                  'NE' FOR NEPHEW; 
                                  'D' FOR DISTANT RELATION; 
                                  'I' FOR IN-LAWS; 
                                  'H' FOR HUSBAND; 
                                  'W' FOR WIFE; 
                                  'C' FOR CHILD; 
                                  'N' FOR NOT KNOWN; 
                                  'GM' FOR GRANDMOTHER; 
                                  'GF' FOR GRANDFATHER; 
                LAST EDITED:      JAN 31, 1990 
                DESCRIPTION:
                                  Family member with cancer.  


160.044,1       CANCER                 0;2 POINTER TO COMMON CANCERS FILE (#164.4)

                LAST EDITED:      MAR 18, 2002 
                DESCRIPTION:
                                  This is the location of the family member's cancer, from the COMMON CANCERS File.  




160,45        TODAY'S DATE            ;  COMPUTED DATE

              MUMPS CODE:       D NOW^%DTC S Y=$P(%,".") D DD^%DT S X=Y K Y
              ALGORITHM:        TODAY
              LAST EDITED:      FEB 20, 1992 
              DESCRIPTION:
                                TODAY IS... TODAY'S DATE.  


160,46        HISTORY-FOLLOWUP        ;  COMPUTED

              MUMPS CODE:       S X="" D FHC^ONCODLF
              ALGORITHM:        S X="" D FHC^ONCODLF
              LAST EDITED:      AUG 11, 1990 
              DESCRIPTION:
                                COMPUTES A REPORT OF THE PATIENTS FOLLOW UP HISTORY.  


160,47        EMPLOYMENT STATUS       ;  COMPUTED

              MUMPS CODE:       S X="" D EMP^ONCOES
              ALGORITHM:        S X="" D EMP^ONCOES
              LAST EDITED:      JUL 16, 1992 
              DESCRIPTION:
                                This field indicates the patient's employment status.  


160,48        EXPOSURE AGENT ORANGE  0;10 SET

                                'Y' FOR Yes - during military service; 
                                'N' FOR No exposure documented in medical record; 
                                'U' FOR Unknown if exposure OR unknown if exposure was military or non-military; 
                                'O' FOR Occupational exposure ONLY; 
              LAST EDITED:      AUG 06, 2024 
              HELP-PROMPT:      Record if the patient was exposed to Agent Orange. 
              DESCRIPTION:       Record if the patient was exposed to Agent Orange.  
                                 


160,49        ICD-O TOPOGRAPHY LIST   ;  COMPUTED

              MUMPS CODE:       D ONCPRI^ONCOCOM
              ALGORITHM:        D ONCPRI^ONCOCOM
              LAST EDITED:      SEP 05, 2001 
              DESCRIPTION:      This field displays a list of the patient's ICD-O topographies.  It was created for use by the
                                PHYSICIAN DOT MATRIX and PHYSICIAN LASER PRINTER  form letters in the FOLLOW-UP FORM LETTER file
                                (165.1). 


160,50        EXPOSURE IONIZING RADIATION 0;11 SET

                                'Y' FOR Yes - during military service; 
                                'N' FOR No exposure documented in medical record; 
                                'U' FOR Unknown if exposure OR unknown if exposure was military vs non-military; 
                                'O' FOR Occupational exposure ONLY; 
              LAST EDITED:      AUG 06, 2024 
              HELP-PROMPT:      Record if the patient was exposed to Ionizing Radiation. 
              DESCRIPTION:       Record if the patient was exposed to Ionizing Radiation.  
                                 


160,51        PERSIAN GULF SERVICE   0;12 SET

                                'Y' FOR Yes; 
                                'N' FOR No; 
                                'U' FOR Unknown; 
              LAST EDITED:      NOV 24, 2008 
              HELP-PROMPT:      Record if the patient served in the Persian Gulf. 
              DESCRIPTION:
                                Record if the patient served in the Persian Gulf.  


160,52        EXPOSURE CHEMICAL      0;13 SET

                                'Y' FOR Yes - during military service; 
                                'N' FOR No exposure documented in medical record; 
                                'U' FOR Unknown if exposure OR unknown if exposure was military vs non-military; 
                                'O' FOR Occupational exposure ONLY; 
              LAST EDITED:      AUG 06, 2024 
              DESCRIPTION:       Record if the patient was exposed to chemicals.  
                                 


160,53        LAB CASEFINDING REPORT  ;  COMPUTED

              MUMPS CODE:       S X="" D LAB^ONCOCOC
              ALGORITHM:        S X="" D LAB^ONCOCOC
              LAST EDITED:      JAN 31, 1992 
              DESCRIPTION:
                                PRINTS A REPORT OF CASES FOUND THRU THE AUTOMATIC CASEFINDING OPTION FOR LABORATORY.  


160,54        PTF CASEFINDING REPORT  ;  COMPUTED

              MUMPS CODE:       S X="" D PTF^ONCOCOC
              ALGORITHM:        S X="" D PTF^ONCOCOC
              DESCRIPTION:      PRINTS A REPORT OF CASES FOUND THRU THE AUTOMATIC CASEFINDING OPTION FOR THE MAS PATIENT TREATMENT
                                FILE (PTF).  


160,55        LEBANON SERVICE        0;25 SET

                                'Y' FOR Yes; 
                                'N' FOR No; 
                                'U' FOR Unknown; 
              LAST EDITED:      MAR 04, 2009 
              HELP-PROMPT:      Record if the patient served in Lebanon 
              DESCRIPTION:
                                Record if the patient served in Lebanon.  


160,56        SOMALIA SERVICE        0;26 SET

                                'Y' FOR Yes; 
                                'N' FOR No; 
                                'U' FOR Unknown; 
              LAST EDITED:      JUL 18, 2002 
              DESCRIPTION:
                                Record if the patient served in Somalia.  


160,58        RADIOLOGY CASEFINDING REPORT  ;  COMPUTED

              MUMPS CODE:       S X="" D RAD^ONCOCOC
              ALGORITHM:        S X="" D RAD^ONCOCOC
              DESCRIPTION:
                                REPORTS THE FINDINGS OF OPTION: RADIOLOGY CASEFINDING.  


160,59        NO PRIMARY              ;  COMPUTED

              MUMPS CODE:       S X=$S($D(^ONCO(165.5,"C",D0)):"",1:1)
              ALGORITHM:        S X=$S($D(^ONCO(165.5,"C",DA)):"",1:1)
              LAST EDITED:      SEP 30, 1992 
              DESCRIPTION:
                                A COMPUTED FIELD STATING THAT THE PATIENT HAS NOT HAD A PRIMARY TUMOR ENTERED INTO THE FILE.  

              NOTES:            XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER


160,60        PID#                    ;  COMPUTED

              MUMPS CODE:       S X="" D PID0^ONCOCOM
              ALGORITHM:        S X="" D PID0^ONCOCOM
              DESCRIPTION:
                                COMPUTED FIELD FOR PATIENT IDENTIFICATION NUMBER.  


160,61        EXPOSURE ASBESTOS      0;14 SET

                                'Y' FOR Yes - during military service; 
                                'N' FOR No exposure documented in medical record; 
                                'U' FOR Unknown if exposure OR unknown if exposure was military vs non-military; 
                                'O' FOR Occupational exposure ONLY; 
              LAST EDITED:      AUG 06, 2024 
              DESCRIPTION:       Record if the patient was exposed to asbestos.  
                                 


160,62        VIETNAM SERVICE        0;32 SET

                                'Y' FOR Yes; 
                                'N' FOR No; 
                                'U' FOR Unknown; 
              LAST EDITED:      NOV 24, 2008 
              HELP-PROMPT:      Record if the patient served in Vietnam. 
              DESCRIPTION:
                                Record if the patient served in Vietnam.  


160,63        GRENADA SERVICE        0;33 SET

                                'Y' FOR Yes; 
                                'N' FOR No; 
                                'U' FOR Unknown; 
              LAST EDITED:      NOV 24, 2008 
              HELP-PROMPT:      Record if the patient served in Grenada. 
              DESCRIPTION:
                                Record if the patient served in Grenada.  


160,64        PANAMA SERVICE         0;34 SET

                                'Y' FOR Yes; 
                                'N' FOR No; 
                                'U' FOR Unknown; 
              LAST EDITED:      NOV 24, 2008 
              HELP-PROMPT:      Record if the patient served in Panama. 
              DESCRIPTION:
                                Record if the patient served in Panama.  


160,65        YUGOSLAVIA SERVICE     0;35 SET

                                'Y' FOR Yes; 
                                'N' FOR No; 
                                'U' FOR Unknown; 
              LAST EDITED:      NOV 24, 2008 
              HELP-PROMPT:      Record if the patient served in Yugoslavia. 
              DESCRIPTION:
                                Record if the patient served in Yugoslavia.  


160,66        IRAQ (OIF) SERVICE     0;36 SET

                                'Y' FOR Yes; 
                                'N' FOR No; 
                                'U' FOR Unknown; 
              LAST EDITED:      APR 09, 2009 
              HELP-PROMPT:      Record if the patient served in Iraq (OIF). 
              DESCRIPTION:
                                Record if the patient served in Iraq (OIF).  

              TECHNICAL DESCR:  If the patient had OIF service, a default value of "Yes" will be provided.  
                                 
                                This default value is derived in the following way: 
                                 
                                1) A call is made to SVC^VADPT.  2) If VASV(11) is > 0, the variable OIF is set to "Yes".  3) The
                                variable OIF is then used as a default in a ^DIE call from ^ONCPAT.  


160,67        AFGHANISTAN (OEF) SERVICE 0;37 SET

                                'Y' FOR Yes; 
                                'N' FOR No; 
                                'U' FOR Unknown; 
              LAST EDITED:      APR 09, 2009 
              HELP-PROMPT:      Record if the patient served in Afghanistan (OEF). 
              DESCRIPTION:
                                Record if the patient served in Afghanistan (OEF).  

              TECHNICAL DESCR:  If the patient had OEF service, a default value of "Yes" will be provided.  
                                 
                                This default value is derived in the following way: 
                                 
                                1) A call is made to SVC^VADPT.  2) If VASV(12) is > 0, the variable OEF is set to "Yes".  3) The
                                variable OEF is then used as a default in a ^DIE call from ^ONCPAT.  


160,68        BRANCH OF SERVICE       ;  COMPUTED

              MUMPS CODE:       D BS^ONCOES
              ALGORITHM:        D BS^ONCOES
              LAST EDITED:      MAY 15, 2009 
              DESCRIPTION:
                                Computes the SERVICE BRANCH [LAST] (#2,.325) value for this patient.  


160,69        CLASS CATEGORY          ;  COMPUTED

              MUMPS CODE:       D CC^ONCOCOM
              ALGORITHM:        D CC^ONCOCOM
              LAST EDITED:      JUN 28, 2011 
              DESCRIPTION:      This field will compute a value of either 0 or 1.  
                                 
                                0 = All ONCOLOGY PRIMARY (#165.5) records for this patient have a CLASS 
                                    CATEGORY (#165.5,.042) value of 0 (NONANALYTIC).  
                                 
                                1 = At least one ONCOLOGY PRIMARY (#165.5) record for this patient has a 
                                    CLASS CATEGORY (#165.5,.042) value of 1 (ANALYTIC).  
                                 
                                The default value is 0.  


160,69.1      ANALYTIC REQUIRING FOLLOWUP  ;  COMPUTED

              MUMPS CODE:       D ARF^ONCOCOM
              ALGORITHM:        D ARF^ONCOCOM
              LAST EDITED:      OCT 07, 2014 
              DESCRIPTION:      This field will compute a value of either 0 or 1.  
                                 
                                0 = All ONCOLOGY PRIMARY (#165.5) records for this patient have a 
                                     CLASS OF CASE (#165.5,.04) value of "00" or greater than "22", 
                                     meaning either Analytic ("30" and above) or NOT Requiring 
                                     Follow-up ("00").  
                                 
                                1 = At least one ONCOLOGY PRIMARY (#165.5) record for this patient has 
                                     a CLASS OF CASE (#165.5,.04) value in the range "10" thru "22", 
                                      meaning Analytic cases Requiring Follow-Up.  
                                 
                                The default value is 0.  


160,70        MULTIPLE TUMOR STATUS (DEATH)  ;  COMPUTED

              MUMPS CODE:       S X="" D MTS^ONCOCOF
              ALGORITHM:        S X="" D MTS^ONCOCOF
              LAST EDITED:      JAN 03, 2000 
              DESCRIPTION:      This field allows for the display of all tumor statuses for expired patients having multiple
                                primaries.  


160,71        BIRTH SURNAME          1;15 FREE TEXT

              INPUT TRANSFORM:  K:$L(X)>40!($L(X)<2) X
              MAXIMUM LENGTH:   40
              LAST EDITED:      MAY 28, 2021 
              HELP-PROMPT:      Answer must be 2-40 characters in length. 
              DESCRIPTION:      The last name (surname) of patients at birth, regardless of gender or marital status, this data
                                item is introduced in 2021 as a gender-neutral replacement for the NAACCR data item Name-Maiden
                                [2390].  


160,72        EXPOSURE BURN PIT      1;16 SET

                                'Y' FOR Yes - during military service; 
                                'N' FOR No exposure documented in medical record; 
                                'U' FOR Unknown if exposure OR unknown if exposure was military vs non-military; 
                                'O' FOR Occupational exposure ONLY; 
              LAST EDITED:      AUG 06, 2024 
              HELP-PROMPT:      Enter Yes, No, Unknown or Occupational exposure ONLY 
              DESCRIPTION:
                                This field records if the patient was exposed to burn pit(s).  


160,73        EXPOSURE OTHER TOXIC   1;17 SET

                                'Y' FOR Yes - during military service; 
                                'N' FOR No exposure documented in medical record; 
                                'U' FOR Unknown if exposure OR unknown if exposure was military vs non-military; 
                                'O' FOR Occupational exposure ONLY; 
              LAST EDITED:      AUG 06, 2024 
              HELP-PROMPT:      Yes, No, Unknown or Occupational exposure ONLY 
              DESCRIPTION:
                                This field records if the patient was exposed to any other toxic materials.  


160,75        SUSPENSE               SUS;0 DATE Multiple #160.075 (Add New Entry without Asking)

              LAST EDITED:      MAY 23, 2000 
              DESCRIPTION:       This multiple field stores the SUSPENSE data for each division where the patient is on SUSPENSE.  
                                 


160.075,.01     SUSPENSE DATE          0;1 DATE

                INPUT TRANSFORM:  S %DT="EX",%DT(0)="-NOW" D ^%DT S X=Y K:Y<1 X K %DT(0)
                OUTPUT TRANSFORM: N XD S XD=Y D DD^ONCOCON S Y=XD
                LAST EDITED:      AUG 27, 2009 
                HELP-PROMPT:      Enter the date the patient was entered into the SUSPENSE sub-file. 
                DESCRIPTION:       Identifies the date the patient was entered as a potential 'case' to be registered in the Tumor
                                  Registry.  

                NOTES:            XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER

                CROSS-REFERENCE:  160.075^B 
                                  1)= S ^ONCO(160,DA(1),"SUS","B",$E(X,1,30),DA)=""
                                  2)= K ^ONCO(160,DA(1),"SUS","B",$E(X,1,30),DA)

                CROSS-REFERENCE:  160^ADX 
                                  1)= S ^ONCO(160,"ADX",$E(X,1,30),DA(1),DA)=""
                                  2)= K ^ONCO(160,"ADX",$E(X,1,30),DA(1),DA)
                                  3)= DO NOT DELETE
                                   This is a REGULAR cross-reference by SUSPENSE DATE multiple on the WHOLE FILE.  
                                   


                CROSS-REFERENCE:  ^^TRIGGER^160.075^12 
                                1)= K DIV S DIV=X,D0=DA(1),DIV(0)=D0,D1=DA,DIV(1)=D1 S Y(1)=$S($D(^ONCO(160,D0,"SUS",D1,0)):^(0),1:
                                "") S X=$P(Y(1),U,13),X=X S DIU=X K Y S X=DIV S X=DIV,X=$E(X,1,5)_0_0 S:'X X="" X ^DD(160.075,.01,1
                                ,3,1.4)

                                1.4)= S DIH=$G(^ONCO(160,DIV(0),"SUS",DIV(1),0)),DIV=X S $P(^(0),U,13)=DIV,DIH=160.075,DIG=12 D ^DI
                                CR

                                2)= Q

                                CREATE VALUE)= MONTH(SUSPENSE DATE)
                                DELETE VALUE)= NO EFFECT
                                FIELD)= SUSPENSE MONTH


160.075,1       DATE ENTERED         0;2 DATE

                INPUT TRANSFORM:S %DT="ETX",%DT(0)="-NOW" D ^%DT S X=Y K:Y<1 X K %DT(0)
                OUTPUT TRANSFORM:S X=Y D DATEOT^ONCOES
                LAST EDITED:    MAY 18, 2000 
                DESCRIPTION:    All cases other than in-situs of the cervix uteri must be followed annually.  If information on
                                persons with an in-situ of the cervix uteri is received, the follow-up information should be
                                updated.  

                NOTES:          XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER


160.075,2       SOURCE               0;3 SET

                                'LS' FOR SURGICAL PATHOLOGY; 
                                'LC' FOR CYTOPATHOLOGY; 
                                'LE' FOR ELECTRON MICROSCOPY; 
                                'LA' FOR AUTOPSY; 
                                'PT' FOR PTF FILE; 
                                'RA' FOR RADIOLOGY; 
                                'SE' FOR MANUAL ENTRY; 
                                'DI' FOR DISEASE INDEX; 
                LAST EDITED:    APR 07, 2010 
                HELP-PROMPT:    Enter the source from which the suspense entry has been derived. 
                DESCRIPTION:
                                 Records the source or origin of the suspense entry.  

                CROSS-REFERENCE:160^D 
                                1)= S ^ONCO(160,"D",$E(X,1,30),DA(1),DA)=""
                                2)= K ^ONCO(160,"D",$E(X,1,30),DA(1),DA)
                                 This is a REGULAR cross reference by SOURCE multiple on the WHOLE FILE.  
                                 



160.075,3       DIVISION             0;4 POINTER TO INSTITUTION FILE (#4)

                INPUT TRANSFORM:S DIC("S")="I $D(^ONCO(160.1,""C"",Y))" D ^DIC K DIC S DIC=DIE,X=+Y K:Y<0 X I $D(X),$D(^ONCO(160,DA
                                (1),"SUS","C",X)) W !!,"This patient is already on suspense for ",$P(^DIC(4,X,0),U,1),! K X
                LAST EDITED:    JUL 18, 2000 
                DESCRIPTION:     When a patient is in 'suspense', DIVISION identifies the facility which is responsible for
                                analyzing this case for entry into the registry.  
                                 
                                When a patient is not in 'suspense', DIVISION is blank.  
                                 
                                NOTE: This field is for 'suspense' purposes only.  It does NOT 
                                      indicate the overall ownership of the patient's record by a 
                                      particular facility.  
                                 

                SCREEN:         S DIC("S")="I $D(^ONCO(160.1,""C"",Y))"
                EXPLANATION:    
                NOTES:          XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER

                CROSS-REFERENCE:160.075^C 
                                1)= S ^ONCO(160,DA(1),"SUS","C",$E(X,1,30),DA)=""
                                2)= K ^ONCO(160,DA(1),"SUS","C",$E(X,1,30),DA)


160.075,4       LAB MORPHOLOGY       0;5 POINTER TO MORPHOLOGY FIELD FILE (#61.1)

                LAST EDITED:    MAY 10, 2000 
                DESCRIPTION:     Pointer to the file containing the MORPHOLOGY codes for pathology.  
                                 


160.075,5       ORGAN/TISSUE         0;6 POINTER TO TOPOGRAPHY FIELD FILE (#61)

                LAST EDITED:    MAY 10, 2000 
                DESCRIPTION:     Pointer to describe the type of tissue or organic material being diagnosed.  
                                 


160.075,6       RADIOLOGICAL PROCEDURE 0;7 POINTER TO RAD/NUC MED PROCEDURES FILE (#71)

                LAST EDITED:    MAY 10, 2000 
                DESCRIPTION:     Points to the RAD/NUC MED PROCEDURES file (#71) to record the radiology procedures codes.  
                                 


160.075,7       PTF DISCHARGE        0;8 DATE

                INPUT TRANSFORM:S %DT="ETX",%DT(0)="-NOW" D ^%DT S X=Y K:Y<1 X K %DT(0)
                LAST EDITED:    MAY 18, 2000 
                DESCRIPTION:     Records the date/time a (PTF) patient is discharged.  
                                 

                NOTES:          XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER


160.075,8       ICD9                 0;9 POINTER TO ICD DIAGNOSIS FILE (#80)

                LAST EDITED:    MAY 10, 2000 
                DESCRIPTION:     This field is a pointer to the ICD DIAGNOSIS file (#80) which contains a listing of the
                                International Classification of Diseases (ICD) codes, clinical modification, 9th revision.  
                                 


160.075,9       PTF CODE             0;10 SET

                                '1' FOR 1; 
                LAST EDITED:    MAY 10, 2000 
                DESCRIPTION:     Diagnosis codes for patient discharged from active hospitalization.  
                                 


160.075,10      ICDO MORPHOLOGY CODE 0;11 POINTER TO ICD-O-2 MORPHOLOGY FILE (#164.1)

                LAST EDITED:    MAY 10, 2000 
                DESCRIPTION:     Pointer to the ICDO MORPHOLOGY file (#164.1) which contains the morphology/histology codes in the
                                International Calssification of Diseases (ICD) for Oncology, 2nd edition, 1990.  
                                 


160.075,11      TEST TIME            0;12 NUMBER

                INPUT TRANSFORM:K:+X'=X!(X>9999999.999999)!(X<.999999)!(X?.E1"."7N.N) X
                LAST EDITED:    MAY 10, 2000 
                HELP-PROMPT:    Type a Number between .999999 and 9999999.999999, 6 Decimal Digits 
                DESCRIPTION:     Records the time a test was performed.  
                                 


160.075,12      SUSPENSE MONTH       0;13 DATE

                INPUT TRANSFORM:S %DT="E" D ^%DT S X=Y K:Y<1 X
                LAST EDITED:    AUG 10, 2000 
                DESCRIPTION:     SUSPENSE MONTH is the month and year of the SUSPENSE DATE.  
                                 

                NOTES:          TRIGGERED by the SUSPENSE DATE field of the SUSPENSE sub-field of the ONCOLOGY PATIENT File 


160.075,13      DISEASE CODE         0;14 POINTER TO DISEASE FIELD FILE (#61.4)

                LAST EDITED:    MAR 29, 2002 
                DESCRIPTION:    Some LAB casefinding cases will be found not in the LAB Morphology (61.1) file but in the LAB
                                Disease Field (61.4) file.  




160,100       SITE & DATE DX          ;  COMPUTED

              MUMPS CODE:       S X="" D SDD^ONCOCOM
              ALGORITHM:        S X="" D SDD^ONCOCOM
              LAST EDITED:      JUN 22, 1990 
              DESCRIPTION:
                                COMPUTED FIELD WITH VALUES OF SITE AND DATE OF DIAGNOSIS.  


160,300       DOCUMENT               D;0 SET Multiple #160.05 (Add New Entry without Asking)

              DESCRIPTION:
                                RECORDS SOURCE DOCUMENT.  


160.05,.01      DOCUMENT               0;1 SET (Multiply asked)

                                  '0' FOR Operative report; 
                                  '1' FOR Chemotherapy record; 
                                  '2' FOR Radiotherapy summary; 
                                  '3' FOR Pathology report; 
                                  '4' FOR Hospital summary; 
                                  '5' FOR Death certificate; 
                                  '6' FOR Autopsy report; 
                                  '7' FOR Medical record; 
                                  '8' FOR Special; 
                LAST EDITED:      OCT 28, 1987 
                DESCRIPTION:
                                  This is the code indicating the kind of source document.  


160.05,1        HOSPITAL               0;2 POINTER TO INSTITUTION FILE (#4)

                LAST EDITED:      JUL 12, 1988 
                DESCRIPTION:
                                  This is the institution providing the source document.  


160.05,2        STATUS                 0;3 SET

                                  '0' FOR Not obtained; 
                                  '1' FOR Request; 
                                  '2' FOR Pending; 
                                  '3' FOR Obtained; 
                LAST EDITED:      OCT 28, 1987 
                DESCRIPTION:
                                  This indicates whether the document has been requested and/or obtained.  


160.05,3        TEXT                   0;4 FREE TEXT

                INPUT TRANSFORM:  K:$L(X)>50!($L(X)<1) X
                LAST EDITED:      OCT 28, 1987 
                HELP-PROMPT:      ANSWER MUST BE 1-50 CHARACTERS IN LENGTH 
                DESCRIPTION:
                                  This is a free text comment.  




160,400       FOLLOW-UP              F;0 DATE Multiple #160.04 (Add New Entry without Asking)

              DESCRIPTION:       FOLLOW-UP of cancer patients provides the following data needed for survival analysis:  the vital
                                status of the patient, the date the vital status was determined, and the underlying cause of death,
                                if the person has died.  SEER requires that this information be updated annually for living
                                patients.  
                                 

              GROUP:            ACOS-REQUIRED

160.04,.01      DATE OF LAST CONTACT OR DEATH 0;1 DATE

                INPUT TRANSFORM:  S %DT="EX" D ^%DT S X=Y K:Y<1 X
                OUTPUT TRANSFORM: S X=Y D DATEOT^ONCOES
                LAST EDITED:      MAR 27, 2023 
                HELP-PROMPT:      Record the last date on which the patient was known to be alive or the date of death. 
                DESCRIPTION:       Records the date of last contact with the patient or the date of death.  
                                   
                                  For further information see FORDS page 199.  

                GROUP:            ACOS-REQUIRED
                NOTES:            XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER

                CROSS-REFERENCE:  160.04^AA^MUMPS 
                                  1)= D SLF^ONCOCRF ;TRIGGER DATE LAST CONTACT #16
                                  2)= D KLF^ONCOCRF ;RESET DATE LAST CONTACT #16, STATUS #15, DATE OF DEATH #29
                                  Maintains the DATE OF LAST CONTACT, STATUS, and DATE OF DEATH fields.  


                CROSS-REFERENCE:  160.04^B 
                                  1)= S ^ONCO(160,DA(1),"F","B",$E(X,1,30),DA)=""
                                  2)= K ^ONCO(160,DA(1),"F","B",$E(X,1,30),DA)
                                  Regular B cross-reference.  


                CROSS-REFERENCE:  160.04^AE^MUMPS 
                                  1)= Q
                                  2)= D KTSM^ONCOFTS:$D(ONCOSTAT)
                                  This cross-reference will kill the TUMOR STATUS entries on the ONCOLOGY PRIMARY File that
                                  correspond to this follow-up.  (Setting of these entries is done directly by a call to
                                  SETTS^ONCOU55 in routine ONCOAIS.) 



160.04,1        VITAL STATUS           0;2 SET (Required)

                                  '0' FOR Dead; 
                                  '1' FOR Alive; 
                LAST EDITED:      FEB 11, 2003 
                DESCRIPTION:       Records the vital status of the patient as of the date entered in DATE OF LAST CONTACT OR DEATH.  
                                   
                                  For further information see FORDS page 200.  

                GROUP:            ACOS-REQUIRED
                CROSS-REFERENCE:  160.04^AC^MUMPS 
                                  1)= D SVS^ONCOCRF ;TRIGGER STATUS #15, DATE OF DEATH #29
                                  2)= D KVS^ONCOCRF ;RESET STATUS #15, DATE OF DEATH #29
                                  Maintains the STATUS and DATE OF DEATH Fields.  



160.04,3        FOLLOW-UP SOURCE       0;4 SET (Required)

                                  '0' FOR Reported hospitalization; 
                                  '1' FOR Readmission; 
                                  '2' FOR Physician; 
                                  '3' FOR Patient; 
                                  '4' FOR Department of Motor Vehicles; 
                                  '5' FOR Medicare/Medicaid file; 
                                  '7' FOR Death certificate; 
                                  '8' FOR Other; 
                                  '9' FOR Unknown; 
                LAST EDITED:      FEB 11, 2003 
                DESCRIPTION:       Records the source from which the latest follow-up information was obtained.  
                                   
                                  For further information see FORDS page 203.  

                EXECUTABLE HELP:  I X="??" S XQH="ONCO FOLLOW-UP METHOD" D EN^XQH

160.04,4        QUALITY OF SURVIVAL    0;5 SET (Required)

                Quality of Survival   
                                  '0' FOR Normal; 
                                  '1' FOR Symptomatic & Ambulatory; 
                                  '2' FOR More than 50% Ambulatory; 
                                  '3' FOR Less than 50% Ambulatory; 
                                  '4' FOR Bedridden; 
                                  '8' FOR Not applicable, dead; 
                                  '9' FOR Unknown or unspecified; 
                LAST EDITED:      SEP 07, 1989 
                DESCRIPTION:
                                  This is the code describing the patient's quality of survival.  

                GROUP:            ACOS-RECOMMENDED

160.04,5        COMMENTS               1;0   WORD-PROCESSING #160.45

                DESCRIPTION:
                                  This is a comment on the follow-up.  


                  LAST EDITED:      SEP 18, 1987 
                  DESCRIPTION:
                                    This is the word-processing text of the comment.  




160.04,6        NEXT FOLLOW-UP SOURCE    0;6 SET (Required)

                                    '0' FOR Chart requisition; 
                                    '1' FOR Physician letter; 
                                    '2' FOR Contact letter; 
                                    '3' FOR Phone call; 
                                    '4' FOR Other hospital contact; 
                                    '5' FOR Other, NOS; 
                                    '8' FOR Foreign residents (not followed); 
                                    '9' FOR Not followed; 
                  LAST EDITED:      FEB 11, 2003 
                  DESCRIPTION:       Identifies the method planned for the next follow-up, 
                                     
                                    For further information see FORDS page 204.  

                  CROSS-REFERENCE:  160.04^AD^MUMPS 
                                    1)= D SDF^ONCOCRF
                                    2)= D KDF^ONCOCRF
                                    Maintains the DUE FOLLOW-UP Field.  



160.04,7        UNUSUAL FOLLOW-UP METHOD 0;7 SET

                                    '0' FOR 1st unusual method; 
                                    '1' FOR 1st unusual method; 
                                    '2' FOR 2nd unusual method; 
                  LAST EDITED:      MAR 22, 1990 
                  HELP-PROMPT:      Enter specially defined unusual method code. 
                  DESCRIPTION:
                                    This describes any follow-up method not in ordinary use.  


160.04,8        ENTRY STATUS             0;8 SET

                                    '1' FOR COMPLETE; 
                  LAST EDITED:      MAR 24, 1990 
                  DESCRIPTION:
                                    This indicates whether entry is complete.  


160.04,9        MULTIPLE PRIMARY STATUS   ;  COMPUTED

                  MUMPS CODE:       Q:$G(HSFLAG)  S X="",FDAT=$P(^(0),U,1) D MTS^ONCOCOF K FDAT
                  ALGORITHM:        Q:$G(HSFLAG)  S X="",FDAT=$P(^(0),U,1) D MTS^ONCOCOF K FDAT
                  LAST EDITED:      APR 29, 1993 
                  DESCRIPTION:
                                    This indicates whether there are multiple primaries for the patient.  


160.04,10       FOLLOWING REGISTRY       0;9 POINTER TO FACILITY FILE (#160.19)

                  OUTPUT TRANSFORM: I Y'="" S Y=$P($G(^ONCO(160.19,Y,0)),U,2)
                  LAST EDITED:      DEC 09, 1999 
                  DESCRIPTION:       Records the facility identification number of the registry responsible for following the
                                    patient.  
                                     
                                    For further information see FORDS page 202.  


160.04,11       REGISTRAR                0;10 POINTER TO NEW PERSON FILE (#200)

                  LAST EDITED:      MAR 07, 2000 
                  DESCRIPTION:       This field contains the name of the REGISTRAR who intially created this FOLLOW-UP record.  
                                     


160.04,12       DATE ENTERED             0;11 DATE

                  INPUT TRANSFORM:  S %DT="EX" D ^%DT S X=Y K:Y<1 X
                  OUTPUT TRANSFORM: S X=Y D DATEOT^ONCOES
                  LAST EDITED:      OCT 26, 2005 
                  DESCRIPTION:       This field contains the date on which this FOLLOW-UP record was initially entered.  
                                     




160,410       FOLLOW-UP ATTEMPTS     A;0 DATE Multiple #160.06 (Add New Entry without Asking)

              DESCRIPTION:
                                RECORDS THE DATE AND TIME A FOLLOW UP ATTEMPT IS MADE.  


160.06,.01      FOLLOW-UP ATTEMPT DATE 0;1 DATE

                INPUT TRANSFORM:  S %DT="E",%DT(0)="-NOW" D ^%DT S X=Y K:Y<1 X K %DT(0)
                LAST EDITED:      DEC 19, 1996 
                DESCRIPTION:
                                  This is the date and time on which a follow-up was attempted.  

                NOTES:            XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER

                CROSS-REFERENCE:  160.06^AC^MUMPS 
                                  1)= S X=9999999-X,^ONCO(160,DA(1),"A","AC",X,DA)=""
                                  2)= S X=9999999-X K ^ONCO(160,DA(1),"A","AC",X,DA)
                                  Indexes file by FOLLOW-UP ATTEMPT DATE.  



160.06,1        TYPE                   0;2 SET

                                  '1' FOR Chart Review; 
                                  '2' FOR Phone Contact; 
                                  '3' FOR Letter Contact; 
                                  '8' FOR Other; 
                LAST EDITED:      MAR 07, 1988 
                HELP-PROMPT:      How will you be obtaining follow-up information? 
                DESCRIPTION:
                                  This is the code indicating how follow-up information will be obtained.  


160.06,2        THE CONTACT            0;3 POINTER TO ONCOLOGY CONTACT FILE (#165) (Required)

                LAST EDITED:      MAY 07, 1999 
                HELP-PROMPT:      The contacts on file for this patient are: 
                DESCRIPTION:
                                  This is the person or institution with whom follow-up will be attempted.  

                EXECUTABLE HELP:  D HP^ONCOFLF
                CROSS-REFERENCE:  160^AE^MUMPS 
                                  1)= S ^ONCO(160,"AE",X,DA(1))=""
                                  2)= K ^ONCO(160,"AE",X,DA(1))
                                  Creates a list of CONTACTs and the ONCOLOGY PATIENTs who use them.  



160.06,3        RESULT                 0;4 SET

                                  '1' FOR Successful; 
                                  '2' FOR Unsuccessful; 
                                  '8' FOR Pending; 
                                  '9' FOR Unknown; 
                LAST EDITED:      FEB 22, 1992 
                DESCRIPTION:
                                  This indicates whether the follow-up attempt was successful.  

                CROSS-REFERENCE:  160.06^ALF^MUMPS 
                                  1)= D SLC^ONCOCRA
                                  2)= D KLC^ONCOCRA
                                  Maintains last followup contact.  



160.06,4        REMARKS                0;5 FREE TEXT

                INPUT TRANSFORM:  K:$L(X)>50!($L(X)<1) X
                LAST EDITED:      DEC 23, 1987 
                HELP-PROMPT:      ANSWER MUST BE 1-50 CHARACTERS IN LENGTH 
                DESCRIPTION:
                                  This is a free text comment.  


160.06,5        ENTRY STATUS           0;6 SET

                                  '1' FOR COMPLETE; 
                LAST EDITED:      JAN 06, 1992 
                DESCRIPTION:
                                  This indicates whether the follow-up attempt was completed.  


160.06,6        LETTER TYPE            0;7 POINTER TO FOLLOW-UP FORM LETTER FILE (#165.1)

                LAST EDITED:      FEB 05, 2009 
                HELP-PROMPT:      Enter the appropriate LETTER TYPE for this contact. 
                DESCRIPTION:
                                  Records the type of follow-up letter to be generated.  




160,420       FOLLOW-UP CONTACT      C;0 SET Multiple #160.03

              DESCRIPTION:
                                RECORDS THE CONTACT TYPE FOR A FOLLOW UP ATTEMPT.  


160.03,.01      TYPE OF FOLLOW-UP CONTACT 0;1 SET

                                  'PT' FOR Patient; 
                                  'MD' FOR Physician; 
                                  'NOK' FOR Next of Kin; 
                                  'KIN' FOR Other Kin; 
                                  'GR' FOR Guardian; 
                                  'SO' FOR Significant Other; 
                                  'FR' FOR Friend; 
                                  'HOSP' FOR Hospital; 
                                  'NH' FOR Nursing Home; 
                                  'HP' FOR Hospice; 
                                  'TR' FOR Tumor Registrar; 
                                  'INST' FOR Institution; 
                                  'OTH' FOR Other; 
                LAST EDITED:      JUL 19, 1992 
                HELP-PROMPT:      Enter the type of contact (use quotes to enter a second of one type, e.g. "MD") 
                DESCRIPTION:
                                  This is the type of follow-up contact.  

                EXECUTABLE HELP:  D TYP^ONCOFUM
                CROSS-REFERENCE:  160.03^B 
                                  1)= S ^ONCO(160,DA(1),"C","B",$E(X,1,30),DA)=""
                                  2)= K ^ONCO(160,DA(1),"C","B",$E(X,1,30),DA)


160.03,1        CONTACT NAME           0;2 POINTER TO ONCOLOGY CONTACT FILE (#165) (Required)

                LAST EDITED:      AUG 06, 1992 
                HELP-PROMPT:      Enter the name of the follow-up contact 
                DESCRIPTION:
                                  This is the name of the person or institution.  

                EXECUTABLE HELP:  D NAM^ONCOFUM
                CROSS-REFERENCE:  160^ACP^MUMPS 
                                  1)= S ^ONCO(165,"ACP",X,DA(1))=""
                                  2)= K ^ONCO(165,"ACP",X,DA(1))
                                  Creates a list under Contact file of contact, patient relationship originating from the Oncology
                                  patient contact multiple pointing to the contact file.  


                CROSS-REFERENCE:  160^APC^MUMPS 
                                  1)= S ^ONCO(165,"APC",DA(1),X)=""
                                  2)= K ^ONCO(165,"APC",DA(1),X)
                                  This creates a list under the Contact file of patients, and associated contacts as created under
                                  the contact multiple of Oncology patient file.  


                CROSS-REFERENCE:  160^AACP^MUMPS 
                                  1)= S ^ONCO(160,"ACP",X,DA(1))=""
                                  2)= K ^ONCO(160,"ACP",X,DA(1))
                                  3)= DO NOT DELETE
                                  Creates follow-up list of contacts and patients followed.  


                CROSS-REFERENCE:  160^AAPC^MUMPS 
                                  1)= S ^ONCO(160,"APC",DA(1),X)=""
                                  2)= K ^ONCO(160,"APC",DA(1),X)
                                  3)= DO NOT DELETE
                                  Creates a list of follow-up contacts for a particular patient.  





160,1000      HOSPITAL NAME           ;  COMPUTED

              MUMPS CODE:       S X="" D NM^ONCOCOF
              ALGORITHM:        S X="" D NM^ONCOCOF
              LAST EDITED:      JUN 30, 1991 
              DESCRIPTION:
                                THE NAME OF THE INSTITUTION RENDERING CARE.  


160,1000.1    C. HOSPITAL NAME        ;  COMPUTED

              MUMPS CODE:       X $P(^DD(160,1000,0),U,5,99) S Y(160,1000.1,1)=X S X=Y(160,1000.1,1),X=$J("",$S($D(DIWR)+$D(DIWL)=2
                                :DIWR-DIWL+1,$D(IOM):IOM,1:80)-$L(X)\2-$X)_X
              ALGORITHM:        CENTER(#1000)
              LAST EDITED:      JUN 30, 1991 
              DESCRIPTION:
                                COMPUTED FIELD CENTERING THE INSTITUTION NAME.  


160,1001      HOSPITAL STREET ADDRESS  ;  COMPUTED

              MUMPS CODE:       S X="" D ADD^ONCOCOF
              ALGORITHM:        S X="" D ADD^ONCOCOF
              LAST EDITED:      JUL 16, 1991 
              DESCRIPTION:
                                This is the street address of the hospital.  


160,1001.1    C. HOSPITAL STREET ADDRESS  ;  COMPUTED

              MUMPS CODE:       X $P(^DD(160,1001,0),U,5,99) S Y(160,1001.1,1)=X S X=Y(160,1001.1,1),X=$J("",$S($D(DIWR)+$D(DIWL)=2
                                :DIWR-DIWL+1,$D(IOM):IOM,1:80)-$L(X)\2-$X)_X
              ALGORITHM:        CENTER(#1001)
              DESCRIPTION:
                                This is the hospital street address centered for display.  


160,1002      HOSPITAL CITY,ST ZIP    ;  COMPUTED

              MUMPS CODE:       S X="" D ZIP^ONCOCOF
              ALGORITHM:        S X="" D ZIP^ONCOCOF
              LAST EDITED:      JUL 16, 1991 
              DESCRIPTION:
                                COMPUTED FIELD LISTING THE INSTITUTIONS' NAME, CITY, STATE AND ZIP CODE.  


160,1002.1    C. HOSPITAL CITY,ST ZIP  ;  COMPUTED

              MUMPS CODE:       X $P(^DD(160,1002,0),U,5,99) S Y(160,1002.1,1)=X S X=Y(160,1002.1,1),X=$J("",$S($D(DIWR)+$D(DIWL)=2
                                :DIWR-DIWL+1,$D(IOM):IOM,1:80)-$L(X)\2-$X)_X
              ALGORITHM:        CENTER(#1002)
              LAST EDITED:      JUN 30, 1991 
              DESCRIPTION:
                                This is the city, state, and ZIP Code of the hospital centered for display.  


160,1003      STATE HOSPITAL NUMBER   ;  COMPUTED

              MUMPS CODE:       S X=$P($G(^ONCO(160.1,^DD("SITE",1),1)),U,3)
              ALGORITHM:        S X=X
              LAST EDITED:      JUL 16, 1991 
              DESCRIPTION:
                                RECORDS THE IDENTIFICATION NUMBER ASSIGNED TO THE INSTITUTION BY THE STATE.  


160,1004      Tumor Registrar         ;  COMPUTED

              MUMPS CODE:       S X=$P($G(^ONCO(160.1,^DD("SITE",1),1)),U)
              ALGORITHM:        S X=X
              LAST EDITED:      AUG 29, 1991 
              DESCRIPTION:
                                COMPUTED FIELD FOR THE NAME OF THE TUMOR REGISTRAR ACCESSIONING CASES.  


160,1004.5    TR PHONE NUMBER         ;  COMPUTED

              MUMPS CODE:       S X=$P($G(^ONCO(160.1,^DD("SITE",1),1)),U,2)
              ALGORITHM:        S X=X
              DESCRIPTION:
                                THE TUMOR REGISTRARS TELEPHONE NUMBER.  


160,1005      CONVERTED              10;1 SET

                                'Y' FOR YES; 
                                'N' FOR NO; 
              LAST EDITED:      FEB 02, 1996 
              DESCRIPTION:      If this field is "YES" it means that this Record has had the pointer in field 24.5 converted from a
                                pointer to the ONCOLOGY CONTACT File (165) to a pointer to the new ACOS NUMBER file (160.19)
                                already, and should not be converted.  


160,1006      SOURCE COMORBIDITY     10;2 SET

                                '0' FOR NA; 
                                '1' FOR Facility face sheet; 
                                '2' FOR Linkage to facility/hosp discharge data set; 
                                '3' FOR Linkage to Medicare/Medicaid data set; 
                                '4' FOR Linkage with another claims data set; 
                                '5' FOR Combination of two or more sources above; 
                                '9' FOR Other source; 
              LAST EDITED:      OCT 07, 2011 
              HELP-PROMPT:      Enter the data source from which comorbidities/complications were collected. 
              DESCRIPTION:      This data item is the record of the data source from which comorbidities/complications were
                                collected.  It refers back to standard NAACCR data item # 3110, 3120, 3130, 3140, 3150, 3160, 3161,
                                3162, 3163, and 3164.  


160,1007      TOBACCO USE CIGARETTE  8;9 SET

                                '0' FOR Never used; 
                                '1' FOR Current user; 
                                '2' FOR Former user, quit within 1 year of DATE DX; 
                                '3' FOR Former user, quit > 1 year prior to DATE DX; 
                                '4' FOR Former user, unknown when quit; 
                                '9' FOR Unknown/not stated/no smoking specifics; 
              LAST EDITED:      OCT 07, 2011 
              HELP-PROMPT:      Enter the patient's past or current use of cigarettes. 
              DESCRIPTION:
                                 Records the patient's past or current use of cigarettes.  


160,1008      TOBACCO USE OTHER SMOKE 8;10 SET

                                '0' FOR Never used; 
                                '1' FOR Current user; 
                                '2' FOR Former user, quit within 1 year of DATE DX; 
                                '3' FOR Former user, quit > 1 year prior to DATE DX; 
                                '4' FOR Former user, unknown when quit; 
                                '9' FOR Unknown/not stated/no smoking specifics; 
              LAST EDITED:      OCT 07, 2011 
              HELP-PROMPT:      Enter the patient's past or current use of smoking tobacco products other than cigarettes. 
              DESCRIPTION:       Records the patient's past or current use of smoking tobacco products other than cigarettes (e.g.
                                pipes, cigars, kreteks).  
                                 
                                NOTE: For recording smokeless tobacco product use, see 
                                      TOBACCO USE SMOKELESS.  


160,1009      TOBACCO USE SMOKELESS  8;11 SET

                                '0' FOR Never used; 
                                '1' FOR Current user; 
                                '2' FOR Former user, quit within 1 year of DATE DX; 
                                '3' FOR Former user, quit > 1 year prior to DATE DX; 
                                '4' FOR Former user, unknown when quit; 
                                '9' FOR Unknown/not stated/no smoking specifics; 
              LAST EDITED:      OCT 07, 2011 
              HELP-PROMPT:      Enter the patient's past or current use of smokeless tobacco products. 
              DESCRIPTION:       Records the patient's past or current use of smokeless tobacco products (e.g. chewing tobacco,
                                snuff, etc.).  


160,1010      TOBACCO USE, NOS       8;12 SET

                                '0' FOR Never used; 
                                '1' FOR Current user; 
                                '2' FOR Former user, quit within 1 year of DATE DX; 
                                '3' FOR Former user, quit > 1 year prior to DATE DX; 
                                '4' FOR Former user, unknown when quit; 
                                '9' FOR Unknown/not stated/no smoking specifics; 
              LAST EDITED:      OCT 07, 2011 
              HELP-PROMPT:      Enter the patient's past or current use of tobacco, NOS. 
              DESCRIPTION:
                                 Records the patient's past or current use of tobacco, NOS (not otherwise specified).  


160,1011      HEIGHT                  ;  COMPUTED

              MUMPS CODE:       D HEIGHT^ONCHTWT
              ALGORITHM:        D HEIGHT^ONCHTWT
              LAST EDITED:      OCT 12, 2011 
              DESCRIPTION:      Computes patient's height value from the GMRV VITAL MEASUREMENT (#120.5) file via the supported IA
                                #1120 GMRVUTL.  


160,1012      WEIGHT                  ;  COMPUTED

              MUMPS CODE:       D WEIGHT^ONCHTWT
              ALGORITHM:        D WEIGHT^ONCHTWT
              LAST EDITED:      OCT 20, 2011 
              DESCRIPTION:      Computes patient's weight value from the GMRV VITAL MEASUREMENT (#120.5) file via the supported IA
                                #1120 GMRVUTL.  



      FILES POINTED TO                      FIELDS

COMMON CANCERS (#164.4)           FAMILY MEMBER WITH CANCER:CANCER (#1)

DISEASE FIELD (#61.4)             SUSPENSE:DISEASE CODE (#13)

FACILITY (#160.19)                CARE CENTER AT DEATH (#24.5)
                                  FOLLOW-UP:FOLLOWING REGISTRY (#10)

FOLLOW-UP FORM LETTER (#165.1)    FOLLOW-UP ATTEMPTS:LETTER TYPE (#6)

GEOCODES (#165.2)                 PLACE OF BIRTH (#7)
                                  PLACE OF DEATH (#21)

ICD DIAGNOSIS (#80)               CAUSE OF DEATH (#19)
                                  COMORBIDITY/COMPLICATION #1 (#25)
                                  COMORBIDITY/COMPLICATION #2 (#25.1)
                                  COMORBIDITY/COMPLICATION #3 (#25.2)
                                  COMORBIDITY/COMPLICATION #4 (#25.3)
                                  COMORBIDITY/COMPLICATION #5 (#25.4)
                                  COMORBIDITY/COMPLICATION #6 (#25.5)
                                  COMORBIDITY/COMPLICATION #7 (#25.6)
                                  COMORBIDITY/COMPLICATION #8 (#25.7)
                                  COMORBIDITY/COMPLICATION #9 (#25.8)
                                  COMORBIDITY/COMPLICATION #10 (#25.9)
                                  SECONDARY DIAGNOSIS #1 (#25.91)
                                  SECONDARY DIAGNOSIS #2 (#25.92)
                                  SECONDARY DIAGNOSIS #3 (#25.93)
                                  SECONDARY DIAGNOSIS #4 (#25.94)
                                  SECONDARY DIAGNOSIS #5 (#25.95)
                                  SECONDARY DIAGNOSIS #6 (#25.96)
                                  SECONDARY DIAGNOSIS #7 (#25.97)
                                  SECONDARY DIAGNOSIS #8 (#25.98)
                                  SECONDARY DIAGNOSIS #9 (#25.99)
                                  SECONDARY DIAGNOSIS #10 (#25.9901)
                                  SUSPENSE:ICD9 (#8)

ICD-O-2 MORPHOLOGY (#164.1)       SUSPENSE:ICDO MORPHOLOGY CODE (#10)

INSTITUTION (#4)                  DOCUMENT:HOSPITAL (#1)
                                  SUSPENSE:DIVISION (#3)

MORPHOLOGY FIELD (#61.1)          SUSPENSE:LAB MORPHOLOGY (#4)

NEW PERSON (#200)                 FOLLOW-UP:REGISTRAR (#11)

ONCOLOGY CONTACT (#165)           LAST FOLLOW-UP CONTACT (#15.1)
                                  FOLLOW-UP CONTACT:CONTACT NAME (#1)
                                  FOLLOW-UP ATTEMPTS:THE CONTACT (#2)

PATIENT (#2)                      NAME (#.01)

RACE CODE FOR ONCOLOGY (#164.46)  RACE 1 (#8)
                                  RACE 2 (#8.1)
                                  RACE 3 (#8.2)
                                  RACE 4 (#8.3)
                                  RACE 5 (#8.4)

RAD/NUC MED PROCEDURES (#71)      SUSPENSE:RADIOLOGICAL PROCEDURE (#6)

REFERRAL PATIENT (#67)            NAME (#.01)

TOPOGRAPHY FIELD (#61)            SUSPENSE:ORGAN/TISSUE (#5)



INPUT TEMPLATE(S):
ONCO DEATH                    MAR 11, 2011@08:39  USER #0    
     Template specific to death information only; input when date of death
     of patient has been ascertained - final follow-up for patient.
ONCO FOLL ATTEMPT             FEB 26, 1992@14:45  USER #0    
     Attempt a follow-up allows user to keep track of follow-up attempts and
     generate the printing of a letter, or post a follow-up.
ONCO FOLL-ADD CONTACT         MAR 07, 2006@12:10  USER #0    
     Allows for the addition a contact for a patient creating a relationship
     between the patient and the contact file. Contacts are deleted at time
     of death by separate option.
ONCO FOLLOWUP                 JUL 23, 2010@09:32  USER #0    
     Template used to post a follow-up for a patient and record status.
      
     DEVELOPERS NOTE:  For consistent functionality, line FOLDR^ONCOFUL must
     be identical to the 160.04 node(s) in this template.

PRINT TEMPLATE(S):
ONCO CASEFINDING REPORT       MAY 24, 1992@22:42  USER #0                                                    [ONCO CASEFINDING-HDR]
ONCO CASEFINDING-HDR          DEC 22, 1999@15:51  USER #0                                                                         @
ONCO DELINQUENT(LTF) LIST     AUG 23, 2021@12:16  USER #0                                           [ONCO DELINQUENT(LTF) LIST HDR]
ONCO DELINQUENT(LTF) LIST HDR OCT 05, 2011@09:32  USER #0                                                                         @
ONCO DELINQUENT(LTF) LIST2    MAY 02, 2011@09:16  USER #0                                          [ONCO DELINQUENT(LTF) LIST2 HDR]
ONCO DELINQUENT(LTF) LIST2 HDRMAY 02, 2011@09:10  USER #0                                                                         @
ONCO DUE FOLLOWUP             AUG 24, 2021@11:35  USER #0                                                   [ONCO DUE FOLLOWUP-HDR]
ONCO DUE FOLLOWUP-HDR         OCT 05, 2011@08:48  USER #0                                                                         @
ONCO DUE FOLLOWUP2            APR 29, 2011@13:06  USER #0                                                  [ONCO DUE FOLLOWUP2-HDR]
ONCO DUE FOLLOWUP2-HDR        APR 29, 2011@13:25  USER #0                                                                         @
ONCO F/U HISTORY (NEW)        OCT 27, 1993@13:59  USER #0                                               [ONCO FOLLOWUP HISTORY-HDR]
ONCO FOLLOW-UP STATUS LIST    MAR 17, 1998@10:07  USER #0                                            ONCOLOGY FOLLOW-UP STATUS LIST
ONCO FOLLOWUP HISTORY         FEB 03, 2000@15:55  USER #0                                               [ONCO FOLLOWUP HISTORY-HDR]
ONCO FOLLOWUP HISTORY-HDR     MAR 04, 1997@09:42  USER #0                                                                         @
ONCO FOLLOWUP PATIENT RPT     FEB 26, 1992@15:04  USER #0                                           [ONCO FOLLOWUP PATIENT RPT-HDR]
ONCO FOLLOWUP PATIENT RPT-HDR MAR 04, 1997@10:01  USER #0                                                                         @
ONCO FOLLOWUP STATUS RPT      SEP 09, 1999@11:33  USER #0                                            ONCOLOGY FOLLOW-UP STATUS LIST
ONCO LAB-CASEFINDING REPORT   SEP 17, 1991@12:36  USER #0                                                [ONCO LAB-CASEFINDING-HDR]
ONCO LAB-CASEFINDING-HDR      JUN 20, 2005@15:53  USER #0                                                                         @
ONCO PATIENT INDX-ACOS        APR 11, 2001@10:20  USER #0                                              [ONCO PATIENT INDX-ACOS-HDR]
ONCO PATIENT INDX-ACOS-HDR    JUN 21, 2005@11:58  USER #0                                                                         @
     HEADER TEMPLATE for ACOS Patient Index in 132 column format.
ONCO PATIENT INDX-EOVA132     APR 17, 2000@09:37  USER #0                                                     ONCOLOGY PATIENT LIST
ONCO PATIENT INDX80           SEP 09, 1999@11:19  USER #0                                                     ONCOLOGY PATIENT LIST
ONCO PATIENT ONLY             FEB 18, 2010@09:54  USER #0                                                   [ONCO PATIENT ONLY-HDR]
     Oncology Patient listing with Last Admit and Discharge dates.
ONCO PATIENT ONLY-HDR         NOV 01, 1999@09:30  USER #0                                                                         @
     HEADER FOR Oncology patient list with Last Admit and Last Discharge date.
ONCO PTF-CASEFINDING RPT      FEB 03, 1992        USER #0                                                [ONCO PTF-CASEFINDING-HDR]
ONCO PTF-CASEFINDING-HDR      JUN 17, 2005@14:55  USER #0                                                                         @
ONCO RAD-CASEFINDING RPT      FEB 04, 1992@21:02  USER #0                                                [ONCO RAD-CASEFINDING-HDR]
ONCO RAD-CASEFINDING-HDR      OCT 11, 2006@11:16  USER #0                                                                         @
     Header for Radiology Casefinding Search.
ONCO SUSPENSE                 MAY 07, 2009@12:29  USER #0                                                       [ONCO SUSPENSE-HDR]
ONCO SUSPENSE-HDR             MAY 02, 2012@09:19  USER #0                                                                         @
ONCO XCONTACT LIST            AUG 31, 2010@10:11  USER #0    ^ONCOXCL                                                             @
ONCO XDEATH INFO              MAR 11, 2011@08:43  USER #0    ^ONCOXDI                                                             @
ONCO XPATIENT CONTACTS        MAY 06, 1992@17:11  USER #0    ^ONCOXPC                                         ONCOLOGY PATIENT LIST
ONCO XPATIENT DATA            JUL 01, 1998@13:22  USER #0    ^ONCOXP1                                                             @
ONCO XPATIENT INFO            NOV 08, 2000@14:23  USER #0    ^ONCOXPI                                         ONCOLOGY PATIENT LIST
ONCO XPATIENT STATUS          JAN 05, 2000@10:04  USER #0    ^ONCOXPU                                           PATIENT STATUS LIST

SORT TEMPLATE(S):
ONCO CASEFINDING REPORT       AUG 04, 1992@14:00  USER #0                      'ONCO CASEFINDING REPORT' Print Template always used
SORT BY: +SOURCE//     From 'L'  To 'LZ'
  WITHIN SOURCE, SORT BY: @SUSPENSE DATE//    (User is asked range)
    WITHIN SUSPENSE DATE, SORT BY: @NAME//

ONCO DELINQUENT(LTF) LIST     OCT 08, 2014@09:40  USER #0                                             '' Print Template always used
SORT BY: @'ANALYTIC REQUIRING FOLLOWUP// (ANALYTIC REQUIRING FOLLOWUP equals 1)
  WITHIN ANALYTIC REQUIRING FOLLOWUP, SORT BY: ONCOLOGY PRIMARY://
  ONCOLOGY PRIMARY FIELD: ANALYTIC PRIMARY REQ FOLLOWUP// (ANALYTIC PRIMARY REQ FOLLOWUP equals 1)
    WITHIN ANALYTIC PRIMARY REQ FOLLOWUP, SORT BY: @'BLOST TO FOLLOWUP;L1// (LOST TO FOLLOWUP)
      WITHIN LOST TO FOLLOWUP, SORT BY: DUE FOLLOW-UP;C35;S1// (DUE FOLLOW-UP not null)

ONCO DUE FOLLOWUP             OCT 08, 2014@15:24  USER #0                                             '' Print Template always used
SORT BY: DUE FOLLOW-UP;C30;S1//    (User is asked range)
  WITHIN DUE FOLLOW-UP, SORT BY: @NAME// (NAME not null)
    WITHIN NAME, SORT BY: ONCOLOGY PRIMARY://
    ONCOLOGY PRIMARY FIELD: ANALYTIC PRIMARY REQ FOLLOWUP// (ANALYTIC PRIMARY REQ FOLLOWUP equals 1)

ONCO FOLLOWUP HISTORY         AUG 11, 1990@19:05  USER #0                        'ONCO FOLLOWUP HISTORY' Print Template always used

ONCO FOLLOWUP PATIENT RPT     APR 11, 1991        USER #0                    'ONCO FOLLOWUP PATIENT RPT' Print Template always used
     Use to select entry for corresponding tied Print template.

ONCO FOLLOWUP STATUS RPT      JUL 15, 1997@13:42  USER #0                     'ONCO FOLLOWUP STATUS RPT' Print Template always used
SORT BY: STATUS="Alive";L1// (STATUS=""Alive"")
  WITHIN STATUS="Alive", SORT BY: +#FOLLOW-UP STATUS//    (User is asked range)
    WITHIN FOLLOW-UP STATUS, SORT BY: NAME// (NAME not null)

ONCO LAB-CASEFINDING REPORT   FEB 10, 1992@15:50  USER #0                  'ONCO LAB-CASEFINDING REPORT' Print Template always used
SORT BY: +SOURCE//     From 'L'  To 'LA'
  WITHIN SOURCE, SORT BY: @SUSPENSE DATE//     From 'JAN 1990@99:00'  To 'SEP 22,1992@99:00'
    WITHIN SUSPENSE DATE, SORT BY: @NAME//

ONCO LOSTTOFOLLOWUP           JAN 09, 1992@12:52  USER #0      FOLLOW-UP STATUS EQUALS 8^(LTF)

ONCO PATIENT ONLY             JAN 05, 2000@15:37  USER #0                                             '' Print Template always used
SORT BY: @INTERNAL(#30)//    (User is asked range)
  WITHIN INTERNAL(#30), SORT BY: @NO PRIMARY;L1// (NO PRIMARY not null)
    WITHIN NO PRIMARY, SORT BY: NAME// (NAME not null)

ONCO PTF-CASEFINDING RPT      FEB 03, 1992@09:28  USER #0                     'ONCO PTF-CASEFINDING RPT' Print Template always used
SORT BY: @SOURCE//     From 'PA'  To 'PZ^PZ'
  WITHIN SOURCE, SORT BY: @SUSPENSE DATE//     From 'JAN 1900@88:88:88'  To 'SEP 22,1992'

ONCO RAD-CASEFINDING RPT      FEB 04, 1992@21:00  USER #0                     'ONCO RAD-CASEFINDING RPT' Print Template always used
SORT BY: @SOURCE//     From 'RA'  To 'RZ^RZ'
  WITHIN SOURCE, SORT BY: @SUSPENSE DATE//     From 'JAN 1900@88:88:88'  To 'SEP 22,1992'

ONCOS BLACK-FEMALES           JUL 27, 1992@02:52  USER #0      SEX EQUALS 2^Female     and RACE EQUALS "02"^Black

ONCOS BLACK-MALES             JUL 27, 1992@02:51  USER #0      SEX EQUALS 1^Male     and RACE EQUALS "02"^Black

ONCOS RACE=BLACK              JUL 27, 1992@02:49  USER #0      RACE EQUALS "02"^Black

ONCOS RACE=WHITE              JUL 27, 1992@02:48  USER #0      RACE EQUALS "01"^White NOS

ONCOS SEX=FEMALE              JUL 27, 1992@02:48  USER #0      SEX EQUALS 2^Female

ONCOS SEX=MALE                MAR 09, 1994@11:55  USER #0      SEX EQUALS 1^Male

ONCOS WHITE-FEMALES           JUL 27, 1992@02:52  USER #0      SEX EQUALS 2^Female     and RACE EQUALS "01"^White NOS

ONCOS WHITE-MALES             JUL 27, 1992@02:50  USER #0      SEX EQUALS 1^Male     and RACE EQUALS "01"^White NOS


FORM(S)/BLOCK(S):