Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Desc |  Directly Accessed By Routines |  Accessed By FileMan Db Calls |  Pointed To By FileMan Files |  Pointer To FileMan Files |  Fields |  ICR |  External References |  Global Variables Directly Accessed |  Naked Globals |  Local Variables  | All
Print Page as PDF
Global: ^ONCO(160

Package: Oncology

Global: ^ONCO(160


Information

FileMan FileNo FileMan Filename Package
160 ONCOLOGY PATIENT Oncology

Description

Directly Accessed By Routines, Total: 123

Package Total Routines
Oncology 113 FOLLOW-UP    FOLLOW-UP ATTEMPTS    FOLLOW-UP CONTACT    OCCUPATION    ONC2PS05    ONC2PS17    ONCACDU1    ONCACDU2
ONCBPC6    ONCBPC8A    ONCBRP0    ONCBRP7    ONCBRP9B    ONCCPC7    ONCCPC9B    ONCFUNC
ONCGPC0    ONCHPC6    ONCHPC8A    ONCHTWT    ONCIPC6    ONCIPC8C    ONCMPC6    ONCMPC9B
ONCNPC6    ONCNPC8B    ONCO ANNUAL HIST/SITE/ICDO    ONCO DELINQUENT(LTF) LIST    ONCO DUE FOLLOWUP    ONCO FOLLOWUP STATUS RPT    ONCO ICDO-SITE132    ONCO ICDO-SITE80
ONCO PATIENT ONLY    ONCO SITE/GP80    ONCOAID    ONCOANC0    ONCOCFP    ONCOCKI    ONCOCOC    ONCOCOM
ONCOCOS    ONCOCRA    ONCOFTS    ONCOFUL    ONCOPA1    ONCOPA3    ONCOPFX    SUSPENSE
^ONCO(169.99    ONCOPRT    ONCOU0    ^ONCO(165.5    ONCOAI    ONCOAIF    ONCOAIM    ONCOAIQ
ONCOAIS    ONCOAS    ONCOCFL1    ONCOCFR    ONCOCOF    ONCOCON    ONCOCOP    ONCOCRF
ONCOCRFA    ONCODLF    ONCODSP    ONCOEDC    ONCOENV    ONCOES    ONCOFDP    ONCOFLF
ONCOFUM    ONCOFUP    ONCOPA3A    ONCOTNM2    ONCOU    ONCOU0A    ONCOU55B    ONCOUK
ONCOW1    ONCOW11    ONCOX11    ONCOX2    ONCOX21    ONCOX3    ONCOXA2    ONCOXCL
ONCOXDI    ONCOXNC    ONCOXPU    ONCP2P6    ^ONCO(160    ONCOXP1    ONCOXPC    ONCOXPI
ONCOXU    ONCOY58    ONCP2P8B    ONCPAT1    ONCPDI    ONCPL    ONCPPC7    ONCPPC9B
ONCPST44    ONCQA    ONCSCHMA    ONCSCHMS    ONCSPC6    ONCSPC8A    ONCSRVRP    ONCTPC6
ONCTPC8A    
Health Summary 1 GMTSONE    

Accessed By FileMan Db Calls, Total: 71

Package Total Routines
Oncology 70 ONC2PS05    ONCACD1    ONCACDU1    ONCACDU2    ONCBPC1    ONCBPC6    ONCBPC8    ONCBRP1
ONCBRP2    ONCBRP3    ONCBRP5A    ONCBRP7    ONCBRP9    ONCCPC1    ONCCPC7    ONCCPC9
ONCEDIT2    ONCHPC1    ONCHPC6    ONCHPC8    ONCHPC8A    ONCIPC1    ONCIPC6    ONCIPC8
ONCIPC8C    ONCMPC1    ONCMPC6    ONCMPC9    ONCNPC1    ONCNPC6    ONCNPC8    ONCOAI
ONCOAIF    ONCOAIP    ONCOAIQ    ONCOAS    ONCOCFL    ONCOCFL1    ONCOCFP    ONCOCFR
ONCOCOS    ONCOCRF    ONCOEDC    ONCOES    ONCOFDP    ONCOFUL    ONCOFUP    ONCOGEN
ONCOPA1    ONCOPAR    ONCOPMA    ONCOPRT    ONCOU    ONCOUK    ONCOUTC    ONCP2P1
ONCP2P6    ONCP2P8    ONCPAT    ONCPDI    ONCPPC1    ONCPPC7    ONCPPC9    ONCPTHST
ONCSPC1    ONCSPC6    ONCSPC8    ONCTPC1    ONCTPC6    ONCTPC8    
Health Summary 1 GMTSONE    

Pointed To By FileMan Files, Total: 1

Package Total FileMan Files
Oncology 1 ONCOLOGY PRIMARY(#165.5)[.02]    

Pointer To FileMan Files, Total: 16

Package Total FileMan Files
Oncology 7 FACILITY(#160.19)[24.5, #160.04(10)]    ICD-O-2 MORPHOLOGY(#164.1)[#160.075(10)]    COMMON CANCERS(#164.4)[#160.044(1)]    RACE CODE FOR ONCOLOGY(#164.46)[8, 8.1, 8.2, 8.3, 8.4]    ONCOLOGY CONTACT(#165)[15.1, #160.03(1), #160.06(2)]
FOLLOW-UP FORM LETTER(#165.1)[#160.06(6)]    GEOCODES(#165.2)[7, 21]    
Lab Service 4 TOPOGRAPHY FIELD(#61)[#160.075(5)]    MORPHOLOGY FIELD(#61.1)[#160.075(4)]    DISEASE FIELD(#61.4)[#160.075(13)]    REFERRAL PATIENT(#67)[.01]    
Kernel 2 INSTITUTION(#4)[#160.05(1), #160.075(3)]    NEW PERSON(#200)[#160.04(11)]    
DRG Grouper 1 ICD DIAGNOSIS(#80)[19, 25, 25.1, 25.2, 25.3, 25.4, 25.5, 25.6, 25.7, 25.8, 25.9, 25.91, 25.92, 25.93, 25.94, 25.95, 25.96, 25.97, 25.98, 25.99, 25.9901, #160.075(8)]    
Radiology Nuclear Medicine 1 RAD/NUC MED PROCEDURES(#71)[#160.075(6)]    
Registration 1 PATIENT(#2)[.01]    

Fields, Total: 151

Field # Name Loc Type Details
.01 NAME 0;1 VARIABLE POINTER
************************REQUIRED FIELD************************
PATIENT(#2)  REFERRAL PATIENT(#67)  

  • 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.
.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.
.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
.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'.
.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.
.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.
.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.
.112 STREET ADDRESS 2 COMPUTED

  • MUMPS CODE:  D SA2^ONCOES
  • ALGORITHM:  D SA2^ONCOES
  • DESCRIPTION:  
    RECORD 2ND LINE OF PATIENT'S ADDRESS.
.113 STREET ADDRESS 3 COMPUTED

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

  • MUMPS CODE:  D ST^ONCOES
  • ALGORITHM:  D ST^ONCOES
  • DESCRIPTION:  
    RECORD THE PATIENT'S STATE OF RESIDENCE.
.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.
.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).
.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.
.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.
.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.
.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.
.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.
.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.
.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.
.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.
.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.
.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.
.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).
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.
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.
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.
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.
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.
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.
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.
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.
6 CENTRAL NO. 0;4 FREE TEXT

  • 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..
7 PLACE OF BIRTH 0;5 POINTER TO GEOCODES FILE (#165.2)
************************REQUIRED FIELD************************
GEOCODES(#165.2)

  • LAST EDITED:  NOV 04, 2002
  • DESCRIPTION:  Records the patient's place of birth.
    For further information see FORDS page 56.
  • GROUP:  ACOS
8 RACE 1 0;6 POINTER TO RACE CODE FOR ONCOLOGY FILE (#164.46)
************************REQUIRED FIELD************************
RACE CODE FOR ONCOLOGY(#164.46)

  • 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
8.1 RACE 2 0;15 POINTER TO RACE CODE FOR ONCOLOGY FILE (#164.46) RACE CODE FOR ONCOLOGY(#164.46)

  • LAST EDITED:  DEC 07, 2000
  • DESCRIPTION:  Identifies the patient's race.
    For further information see FORDS page 61.
8.2 RACE 3 0;16 POINTER TO RACE CODE FOR ONCOLOGY FILE (#164.46) RACE CODE FOR ONCOLOGY(#164.46)

  • LAST EDITED:  DEC 07, 2000
  • DESCRIPTION:  Identifies the patient's race.
    For further information see FORDS page 62.
8.3 RACE 4 0;17 POINTER TO RACE CODE FOR ONCOLOGY FILE (#164.46) RACE CODE FOR ONCOLOGY(#164.46)

  • LAST EDITED:  DEC 07, 2000
  • DESCRIPTION:  Identifies the patient's race.
    For further information see FORDS page 63.
8.4 RACE 5 0;18 POINTER TO RACE CODE FOR ONCOLOGY FILE (#164.46) RACE CODE FOR ONCOLOGY(#164.46)

  • LAST EDITED:  DEC 07, 2000
  • DESCRIPTION:  Identifies the patient's race.
    For further information see FORDS page 64.
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
10 SEX 0;8 SET
************************REQUIRED FIELD************************
  • '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.
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.
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.
13 RELIGION COMPUTED

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

  • MUMPS CODE:  D MS^ONCOES
  • ALGORITHM:  D MS^ONCOES
  • DESCRIPTION:  
    COMPUTED FIELD LISTING THE PATIENT'S MARTIAL STATUS.
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.
15.1 LAST FOLLOW-UP CONTACT 1;6 POINTER TO ONCOLOGY CONTACT FILE (#165) ONCOLOGY CONTACT(#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.
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.
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.
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.
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.
19 CAUSE OF DEATH 1;3 POINTER TO ICD DIAGNOSIS FILE (#80) ICD DIAGNOSIS(#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.
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
20 ICD REVISION 1;4 SET
  • '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
21 PLACE OF DEATH 1;5 POINTER TO GEOCODES FILE (#165.2) GEOCODES(#165.2)

  • LAST EDITED:  JUL 14, 1998
  • DESCRIPTION:  Enter the place of death.
  • TECHNICAL DESCR:  
    This field is referenced directly by UVSALIVE^ONCOCRFA.
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.
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
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.
24.5 CARE CENTER AT DEATH 1;11 POINTER TO FACILITY FILE (#160.19) FACILITY(#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.
25 COMORBIDITY/COMPLICATION #1 0;19 POINTER TO ICD DIAGNOSIS FILE (#80) ICD DIAGNOSIS(#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.
25.1 COMORBIDITY/COMPLICATION #2 0;20 POINTER TO ICD DIAGNOSIS FILE (#80) ICD DIAGNOSIS(#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 comorbid conditions or complications were documented, leave this item blank.
25.2 COMORBIDITY/COMPLICATION #3 0;21 POINTER TO ICD DIAGNOSIS FILE (#80) ICD DIAGNOSIS(#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 comorbid conditions or complications were documented, leave this item blank.
25.3 COMORBIDITY/COMPLICATION #4 0;22 POINTER TO ICD DIAGNOSIS FILE (#80) ICD DIAGNOSIS(#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 comorbid conditions or complications were documented, leave this item blank.
25.4 COMORBIDITY/COMPLICATION #5 0;23 POINTER TO ICD DIAGNOSIS FILE (#80) ICD DIAGNOSIS(#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 comorbid conditions or complications were documented, leave this item blank.
25.5 COMORBIDITY/COMPLICATION #6 0;24 POINTER TO ICD DIAGNOSIS FILE (#80) ICD DIAGNOSIS(#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 comorbid conditions or complications were documented, leave this item blank.
25.6 COMORBIDITY/COMPLICATION #7 0;28 POINTER TO ICD DIAGNOSIS FILE (#80) ICD DIAGNOSIS(#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 comorbid conditions or complications were documented, leave this item blank.
25.7 COMORBIDITY/COMPLICATION #8 0;29 POINTER TO ICD DIAGNOSIS FILE (#80) ICD DIAGNOSIS(#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 comorbid conditions or complications were documented, leave this item blank.
25.8 COMORBIDITY/COMPLICATION #9 0;30 POINTER TO ICD DIAGNOSIS FILE (#80) ICD DIAGNOSIS(#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 comorbid conditions or complications were documented, leave this item blank.
25.9 COMORBIDITY/COMPLICATION #10 0;31 POINTER TO ICD DIAGNOSIS FILE (#80) ICD DIAGNOSIS(#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 comorbid conditions or complications were documented, leave this item blank.
25.91 SECONDARY DIAGNOSIS #1 3;1 POINTER TO ICD DIAGNOSIS FILE (#80) ICD DIAGNOSIS(#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.
25.92 SECONDARY DIAGNOSIS #2 3;2 POINTER TO ICD DIAGNOSIS FILE (#80) ICD DIAGNOSIS(#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.
25.93 SECONDARY DIAGNOSIS #3 3;3 POINTER TO ICD DIAGNOSIS FILE (#80) ICD DIAGNOSIS(#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.
25.94 SECONDARY DIAGNOSIS #4 3;4 POINTER TO ICD DIAGNOSIS FILE (#80) ICD DIAGNOSIS(#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.
25.95 SECONDARY DIAGNOSIS #5 3;5 POINTER TO ICD DIAGNOSIS FILE (#80) ICD DIAGNOSIS(#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.
25.96 SECONDARY DIAGNOSIS #6 3;6 POINTER TO ICD DIAGNOSIS FILE (#80) ICD DIAGNOSIS(#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.
25.97 SECONDARY DIAGNOSIS #7 3;7 POINTER TO ICD DIAGNOSIS FILE (#80) ICD DIAGNOSIS(#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.
25.98 SECONDARY DIAGNOSIS #8 3;8 POINTER TO ICD DIAGNOSIS FILE (#80) ICD DIAGNOSIS(#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.
25.99 SECONDARY DIAGNOSIS #9 3;9 POINTER TO ICD DIAGNOSIS FILE (#80) ICD DIAGNOSIS(#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.
25.9901 SECONDARY DIAGNOSIS #10 3;10 POINTER TO ICD DIAGNOSIS FILE (#80) ICD DIAGNOSIS(#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.
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.
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
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.
31 PATH/AUTOPSY (GROSS & MICRO) 4;0 WORD-PROCESSING #160.031

  • 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.
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
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.
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.
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.
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.
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.
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.
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.
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
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.
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 prior to 1999.
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 prior to 1999.
40 TOBACCO USAGE 5;0 SET Multiple #160.02 160.02

  • DESCRIPTION:  
    DESCRIBES PATIENT TOBACCO USE.
41 ALCOHOL USAGE 6;0 SET Multiple #160.041 160.041

  • DESCRIPTION:  
    DESCRIBES PATIENT ALCOHOL USE.
42 OCCUPATION 7;0 Multiple #160.042 160.042

  • DESCRIPTION:  
    Information about the patient's usual occupation, also known as usual type of job or work.
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.
44 FAMILY MEMBER WITH CANCER 9;0 SET Multiple #160.044 160.044

  • DESCRIPTION:  
    Multiple for family members with cancer.
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.
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.
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.
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.
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).
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.
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.
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.
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.
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).
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.
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.
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.
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
60 PID# COMPUTED

  • MUMPS CODE:  S X="" D PID0^ONCOCOM
  • ALGORITHM:  S X="" D PID0^ONCOCOM
  • DESCRIPTION:  
    COMPUTED FIELD FOR PATIENT IDENTIFICATION NUMBER.
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.
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.
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.
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.
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.
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.
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.
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.
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.
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.
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.
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].
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).
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.
75 SUSPENSE SUS;0 DATE Multiple #160.075 160.075

  • LAST EDITED:  MAY 23, 2000
  • DESCRIPTION:  This multiple field stores the SUSPENSE data for each division where the patient is on SUSPENSE.
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.
300 DOCUMENT D;0 SET Multiple #160.05 160.05

  • DESCRIPTION:  
    RECORDS SOURCE DOCUMENT.
400 FOLLOW-UP F;0 DATE Multiple #160.04 160.04

  • 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
410 FOLLOW-UP ATTEMPTS A;0 DATE Multiple #160.06 160.06

  • DESCRIPTION:  
    RECORDS THE DATE AND TIME A FOLLOW UP ATTEMPT IS MADE.
420 FOLLOW-UP CONTACT C;0 SET Multiple #160.03 160.03

  • DESCRIPTION:  
    RECORDS THE CONTACT TYPE FOR A FOLLOW UP ATTEMPT.
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.
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.
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.
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.
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.
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.
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.
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.
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.
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.
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.
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.
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.
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.).
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).
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.
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.

ICR, Total: 1

ICR LINK Subscribing Package(s) Fields Referenced Description
ICR #2924
  • Health Summary
    		•  The ONCOLOGY PATIENT (160) file "B" cross-reference isused to look up a patient in the ONCOLOGY PATIENT file. If the look-up issuccessful, the patient's ONCOLOGY PRIMARY (165.5) data is retrieved. (SeeDBIA 2888)

    External References

    Name Field # of Occurrence
    ^%DT 23+1, 27+1, 29+1
    DD^%DT 45+1
    ^%DTC 36+1, 37+1
    NOW^%DTC 45+1
    ^DIC 8+1, 25+1, 25.1+1, 25.2+1, 25.3+1, 25.4+1, 25.5+1, 25.6+1, 25.7+1, 25.8+1
    , 25.9+1, 25.91+1, 25.92+1, 25.93+1, 25.94+1, 25.95+1, 25.96+1, 25.97+1, 25.98+1, 25.99+1
    , 25.9901+1
    ^DICR 19(XREF 1S), 19(XREF 1K)
    Y^DIQ .011OF9.3+1, .012OF9.3+1
    $$ICDDX^ICDCODE 25OT+1, 25.1OT+1, 25.2OT+1, 25.3OT+1, 25.4OT+1, 25.5OT+1, 25.6OT+1, 25.7OT+1, 25.8OT+1, 25.9OT+1
    $$FLNAME^ONCFUNC .012+1
    PRICNT^ONCFUNC 17+1
    SDOT^ONCFUNC 19OT+1, 25.91OT+1, 25.92OT+1, 25.93OT+1, 25.94OT+1, 25.95OT+1, 25.96OT+1, 25.97OT+1, 25.98OT+1, 25.99OT+1
    , 25.9901OT+1
    HEIGHT^ONCHTWT 1011+1
    WEIGHT^ONCHTWT 1012+1
    LAB^ONCOCOC 53+1
    PTF^ONCOCOC 54+1
    RAD^ONCOCOC 58+1
    ADD^ONCOCOF 1001+1
    MTS^ONCOCOF 70+1
    NM^ONCOCOF 1000+1
    ZIP^ONCOCOF 1002+1
    ARF^ONCOCOM 69.1+1
    CC^ONCOCOM 69+1
    ONCPRI^ONCOCOM 49+1
    PID0^ONCOCOM 60+1
    SDD^ONCOCOM 100+1
    CON^ONCOCON .2+1
    LAD^ONCOCON 34.1+1
    LDD^ONCOCON 34.2+1
    LEC^ONCOCON 34+1
    NOK^ONCOCON .21+1
    NOK2^ONCOCON .211+1
    NOKEO^ONCOCON .214+1
    REL^ONCOCON .212+1
    REL2^ONCOCON .213+1
    SAD^ONCOCON 33.1+1
    SDD^ONCOCON 33.2+1
    SEC^ONCOCON 33.3+1
    DLC^ONCOCRF 16+1
    DOD^ONCOCRF 29.1+1
    FHC^ONCODLF 46+1
    ADD^ONCOES .119+1
    ALIAS^ONCOES 1+1
    BS^ONCOES 68+1
    CTY^ONCOES .117+1, .12+1
    DATEOT^ONCOES 16+1, 23OT+1, 29OT+1
    DOB^ONCOES 3+1
    DOB1^ONCOES 3.1+1
    EMP^ONCOES 47+1
    MNI^ONCOES .015+1
    MS^ONCOES 14+1
    OCC^ONCOES 12+1
    PH^ONCOES .131+1
    REL^ONCOES 13+1
    SA1^ONCOES .111+1
    SA2^ONCOES .112+1
    SA3^ONCOES .113+1, .1191+1
    SSN^ONCOES 2+1, 4+1
    ST^ONCOES .115+1
    TRM^ONCOES 4.1+1
    ZIP^ONCOES .116+1
    ZIPCT^ONCOES .118+1

    Global Variables Directly Accessed

    Name Line Occurrences  (* Changed,  ! Killed)
    ^DD( .011OF9.3+1, .012OF9.3+1
    ^DD("SITE" 1003+1, 1004+1, 1004.5+1
    ^DD(160 .011+1, .011OF9.3+1, .012+1, .012OF9.3+1, 1000.1+1, 1001.1+1, 1002.1+1
    ^ONCO(160 - [#160] .01(XREF 1S), .01(XREF 1K), .011OF9.2+1, .012OF9.2+1, .013+1, .014+1, 2.1+1, 6+1, 6(XREF 1S), 6(XREF 1K)
    , 15(XREF 1S), 15(XREF 1K), 15.1(XREF 1S), 15.1(XREF 1K), 15.2(XREF 1S), 15.2(XREF 1K), 19(XREF 1S), 19(XREF 1K), 27(XREF 1S), 27(XREF 1K)
    , 32+1, 36+1*, 37+1
    ^ONCO(160.1 - [#160.1] 1003+1, 1004+1, 1004.5+1
    ^ONCO(160.19 - [#160.19] 24.5OT+1
    ^ONCO(165.5 - [#165.5] 59+1

    Naked Globals

    Name Field # of Occurrence
    ^( .011OF9.3+1, .012OF9.3+1
    ^(0 .011OF9.2+1, .011OF9.3+1, .012OF9.2+1, .012OF9.3+1, .014+1, 24.5OT+1
    ^(1 19(XREF 1S), 19(XREF 1K), 36+1, 37+1

    Local Variables

    Legend:

    >> Not killed explicitly
    * Changed
    ! Killed
    ~ Newed

    Name Field # of Occurrence
    >> % 45+1
    >> %DT 23+1*, 27+1*, 29+1*
    >> %DT(0 23+1*!, 29+1*!
    >> C .011OF9.3+1*, .012OF9.3+1*
    CODE 25OT+1~*, 25.1OT+1~*, 25.2OT+1~*, 25.3OT+1~*, 25.4OT+1~*, 25.5OT+1~*, 25.6OT+1~*, 25.7OT+1~*, 25.8OT+1~*, 25.9OT+1~*
    >> D0 .011OF9.2+1, .012OF9.2+1, .013+1, .014+1, 2.1+1, 19(XREF 1S), 19(XREF 1K), 32+1, 36+1, 37+1
    , 59+1
    >> DA .01(XREF 1S), .01(XREF 1K), 6(XREF 1S), 6(XREF 1K), 15(XREF 1S), 15(XREF 1K), 15.1(XREF 1S), 15.1(XREF 1K), 15.2(XREF 1S), 15.2(XREF 1K)
    , 19(XREF 1S), 19(XREF 1K), 27(XREF 1S), 27(XREF 1K)
    DIC 8+1!*, 25+1!*, 25.1+1!*, 25.2+1!*, 25.3+1!*, 25.4+1!*, 25.5+1!*, 25.6+1!*, 25.7+1!*, 25.8+1!*
    , 25.9+1!*, 25.91+1!*, 25.92+1!*, 25.93+1!*, 25.94+1!*, 25.95+1!*, 25.96+1!*, 25.97+1!*, 25.98+1!*, 25.99+1!*
    , 25.9901+1!*
    DIC("S" 8+1*, 8SCR+1*, 18.9SCR+1*, 22.9SCR+1*, 25+1*, 25SCR+1*, 25.1+1*, 25.1SCR+1*, 25.2+1*, 25.2SCR+1*
    , 25.3+1*, 25.3SCR+1*, 25.4+1*, 25.4SCR+1*, 25.5+1*, 25.5SCR+1*, 25.6+1*, 25.6SCR+1*, 25.7+1*, 25.7SCR+1*
    , 25.8+1*, 25.8SCR+1*, 25.9+1*, 25.9SCR+1*, 25.91+1*, 25.91SCR+1*, 25.92+1*, 25.92SCR+1*, 25.93+1*, 25.93SCR+1*
    , 25.94+1*, 25.94SCR+1*, 25.95+1*, 25.95SCR+1*, 25.96+1*, 25.96SCR+1*, 25.97+1*, 25.97SCR+1*, 25.98+1*, 25.98SCR+1*
    , 25.99+1*, 25.99SCR+1*, 25.9901+1*, 25.9901SCR+1*, 38SCR+1*, 39SCR+1*
    >> DIE 8+1, 25+1, 25.1+1, 25.2+1, 25.3+1, 25.4+1, 25.5+1, 25.6+1, 25.7+1, 25.8+1
    , 25.9+1, 25.91+1, 25.92+1, 25.93+1, 25.94+1, 25.95+1, 25.96+1, 25.97+1, 25.98+1, 25.99+1
    , 25.9901+1
    >> DIG 19(XREF 1S), 19(XREF 1K)
    >> DIH 19(XREF 1S), 19(XREF 1K)
    >> DIU 19(XREF 1S), 19(XREF 1K)
    DIV 19(XREF 1S), 19(XREF 1K)
    DIV(0 19(XREF 1S), 19(XREF 1K)
    >> DIWL 1000.1+1, 1001.1+1, 1002.1+1
    >> DIWR 1000.1+1, 1001.1+1, 1002.1+1
    DT 36+1, 37+1
    IOM 1000.1+1, 1001.1+1, 1002.1+1
    ONCICD 25OT+1~*, 25.1OT+1~*, 25.2OT+1~*, 25.3OT+1~*, 25.4OT+1~*, 25.5OT+1~*, 25.6OT+1~*, 25.7OT+1~*, 25.8OT+1~*, 25.9OT+1~*
    SPACE 25OT+1~*, 25.1OT+1~*, 25.2OT+1~*, 25.3OT+1~*, 25.4OT+1~*, 25.5OT+1~*, 25.6OT+1~*, 25.7OT+1~*, 25.8OT+1~*, 25.9OT+1~*
    U .011OF9.3+1, .012OF9.3+1, .013+1, .014+1, 2.1+1, 19(XREF 1S), 19(XREF 1K), 24.5OT+1, 25OT+1, 25.1OT+1
    , 25.2OT+1, 25.3OT+1, 25.4OT+1, 25.5OT+1, 25.6OT+1, 25.7OT+1, 25.8OT+1, 25.9OT+1, 32+1, 36+1
    , 37+1, 1000.1+1, 1001.1+1, 1002.1+1, 1003+1, 1004+1, 1004.5+1
    X .01(XREF 1S), .01(XREF 1K), .011+1*, .011OF9.3+1*, .012+1*, .012OF9.3+1*, .013+1*, .014+1*, .111+1*, .116+1*
    , .118+1*, .119+1*, .12+1*, .2+1*, .21+1*, .211+1*, .212+1*, .213+1*, .214+1*, 1+1*
    , 2.1+1*, 4.1+1*, 5+1!, 6+1!, 6(XREF 1S), 6(XREF 1K), 8+1*!, 11+1!, 12+1*, 15(XREF 1S)
    , 15(XREF 1K), 15.1(XREF 1S), 15.1(XREF 1K), 15.2(XREF 1S), 15.2(XREF 1K), 16+1*, 19OT+1*, 19(XREF 1S), 19(XREF 1K), 23+1*!
    , 23OT+1*, 24+1!, 25+1*!, 25.1+1*!, 25.2+1*!, 25.3+1*!, 25.4+1*!, 25.5+1*!, 25.6+1*!, 25.7+1*!
    , 25.8+1*!, 25.9+1*!, 25.91+1*!, 25.91OT+1*, 25.92+1*!, 25.92OT+1*, 25.93+1*!, 25.93OT+1*, 25.94+1*!, 25.94OT+1*
    , 25.95+1*!, 25.95OT+1*, 25.96+1*!, 25.96OT+1*, 25.97+1*!, 25.97OT+1*, 25.98+1*!, 25.98OT+1*, 25.99+1*!, 25.99OT+1*
    , 25.9901+1*!, 25.9901OT+1*, 27+1*!, 27(XREF 1S), 27(XREF 1K), 29+1*!, 29OT+1*, 29.1+1*, 32+1*, 33.3+1*
    , 33.6+1!, 34+1*, 36+1*, 37+1*, 45+1*, 46+1*, 47+1*, 53+1*, 54+1*, 58+1*
    , 59+1*, 60+1*, 70+1*, 71+1!, 100+1*, 1000+1*, 1000.1+1*, 1001+1*, 1001.1+1*, 1002+1*
    , 1002.1+1*, 1003+1*, 1004+1*, 1004.5+1*
    >> X1 36+1*, 37+1*
    >> X2 36+1*, 37+1*
    Y .011OF9.3+1*, .012OF9.3+1*, .013+1*, 2.1+1*, 8+1, 19OT+1, 19(XREF 1S), 19(XREF 1K), 23+1, 23OT+1
    , 24.5OT+1*, 25+1, 25OT+1*, 25.1+1, 25.1OT+1*, 25.2+1, 25.2OT+1*, 25.3+1, 25.3OT+1*, 25.4+1
    , 25.4OT+1*, 25.5+1, 25.5OT+1*, 25.6+1, 25.6OT+1*, 25.7+1, 25.7OT+1*, 25.8+1, 25.8OT+1*, 25.9+1
    , 25.9OT+1*, 25.91+1, 25.91OT+1, 25.92+1, 25.92OT+1, 25.93+1, 25.93OT+1, 25.94+1, 25.94OT+1, 25.95+1
    , 25.95OT+1, 25.96+1, 25.96OT+1, 25.97+1, 25.97OT+1, 25.98+1, 25.98OT+1, 25.99+1, 25.99OT+1, 25.9901+1
    , 25.9901OT+1, 27+1, 29+1, 29OT+1, 45+1*!
    Y(0 19OT+1*, 23OT+1*, 24.5OT+1*, 25OT+1*, 25.1OT+1*, 25.2OT+1*, 25.3OT+1*, 25.4OT+1*, 25.5OT+1*, 25.6OT+1*
    , 25.7OT+1*, 25.8OT+1*, 25.9OT+1*, 25.91OT+1*, 25.92OT+1*, 25.93OT+1*, 25.94OT+1*, 25.95OT+1*, 25.96OT+1*, 25.97OT+1*
    , 25.98OT+1*, 25.99OT+1*, 25.9901OT+1*, 29OT+1*
    Y(1 19(XREF 1S), 19(XREF 1K)
    Y(160 .011OF9.2+1*, .011OF9.3+1, .012OF9.2+1*, .012OF9.3+1, 36+1*, 37+1*, 1000.1+1*, 1001.1+1*, 1002.1+1*
    Info |  Desc |  Directly Accessed By Routines |  Accessed By FileMan Db Calls |  Pointed To By FileMan Files |  Pointer To FileMan Files |  Fields |  ICR |  External References |  Global Variables Directly Accessed |  Naked Globals |  Local Variables  | All