STANDARD DATA DICTIONARY #165 -- ONCOLOGY CONTACT FILE 9/29/25 PAGE 1
STORED IN ^ONCO(165, *** NO DATA STORED YET *** SITE: WWW.BMIRWIN.COM UCI: VISTA,VISTA (VERSION 2.2)
DATA NAME GLOBAL DATA
ELEMENT TITLE LOCATION TYPE
-----------------------------------------------------------------------------------------------------------------------------------
File for Oncology contacts. Populated by the user, partly automatically by Follow-up options, and by the user. Used only for
patient follow-up.
APPLICATION GROUP(S): ONCO
IDENTIFIED BY: TYPE (#1)[R]
POINTED TO BY: LAST FOLLOW-UP CONTACT field (#15.1) of the ONCOLOGY PATIENT File (#160)
CONTACT NAME field (#1) of the FOLLOW-UP CONTACT sub-field (#160.03) of the ONCOLOGY PATIENT File (#160)
THE CONTACT field (#2) of the FOLLOW-UP ATTEMPTS sub-field (#160.06) of the ONCOLOGY PATIENT File (#160)
GOVERNMENT AGENCY field (#.01) of the GOVERNMENT AGENCY sub-field (#160.13) of the ONCOLOGY SITE PARAMETERS File
(#160.1)
PRIMARY SURGEON field (#2) of the ONCOLOGY PRIMARY File (#165.5)
FOLLOWING PHYSICIAN field (#2.1) of the ONCOLOGY PRIMARY File (#165.5)
MANAGING PHYSICIAN field (#2.2) of the ONCOLOGY PRIMARY File (#165.5)
PHYSICIAN #3 field (#2.3) of the ONCOLOGY PRIMARY File (#165.5)
PHYSICIAN #4 field (#2.4) of the ONCOLOGY PRIMARY File (#165.5)
PHYSICIAN STAGING field (#66) of the ONCOLOGY PRIMARY File (#165.5)
CROSS
REFERENCED BY: CONTACT(B), TYPE(BT), VA HOSPITAL #(C), NPI(F)
LAST MODIFIED: JUL 13,2023@20:27:07
165,.01 CONTACT 0;1 FREE TEXT (Required)
INPUT TRANSFORM: K:$L(X)>30!($L(X)<3) X I $D(X) K:X'?1AN.ANP X
LAST EDITED: JUL 16, 1992
HELP-PROMPT: Answer must be 3-30 characters in length.
DESCRIPTION:
FREE TEXT FIELD FOR RECORDING THE CONTACT.
DELETE TEST: .01,0)= I 1 ;deletion only permitted with ^DIK
NOTES: XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
CROSS-REFERENCE: 165^B
1)= S ^ONCO(165,"B",$E(X,1,30),DA)=""
2)= K ^ONCO(165,"B",$E(X,1,30),DA)
165,.011 FIRST-LAST ; COMPUTED
MUMPS CODE: S Y(165,.011,1)=$S($D(^ONCO(165,D0,0)):^(0),1:"") S X=$P(Y(165,.011,1),U,1),X=$P(X,",",2)_" "_$P(X,
",",1)
ALGORITHM: ONCOFIRSTNAME LASTNAME(CONTACT)
DESCRIPTION:
COMPUTED FIELD RECORDING THE FIRST NAME AND THEN LAST NAME OF CONTACT.
165,.111 STREET ADDRESS 1 .11;1 FREE TEXT (Required)
INPUT TRANSFORM: K:$L(X)>30!($L(X)<2) X
LAST EDITED: MAY 05, 1992
HELP-PROMPT: Answer must be 2-30 characters in length.
DESCRIPTION:
Primary street address for contact - ususally only one needed
165,.112 STREET ADDRESS 2 .11;2 FREE TEXT
INPUT TRANSFORM: K:$L(X)>30!($L(X)<2) X
LAST EDITED: DEC 23, 1987
HELP-PROMPT: ANSWER MUST BE 2-30 CHARACTERS IN LENGTH
DESCRIPTION:
SECOND LINE OF CONTACT ADDRESS.
165,.113 STREET ADDRESS 3 .11;3 FREE TEXT
INPUT TRANSFORM: K:$L(X)>30!($L(X)<2) X
LAST EDITED: DEC 23, 1987
HELP-PROMPT: ANSWER MUST BE 2-30 CHARACTERS IN LENGTH
DESCRIPTION:
THIRD LINE OF CONTACT STREET ADDRESS.
165,.114 CITY .11;4 FREE TEXT
INPUT TRANSFORM: K:$L(X)>30!($L(X)<1) X
LAST EDITED: AUG 07, 2009
HELP-PROMPT: Answer must be 1-30 characters in length.
DESCRIPTION:
Identifies the contact's city of residence.
NOTES: TRIGGERED by the ZIP CODE field of the ONCOLOGY CONTACT File
165,.115 STATE .11;5 POINTER TO STATE FILE (#5)
LAST EDITED: AUG 07, 2009
HELP-PROMPT: Enter the contact's state of residence.
DESCRIPTION:
Identifies the contact's state of residence.
NOTES: TRIGGERED by the ZIP CODE field of the ONCOLOGY CONTACT File
165,.119 ZIP CODE .11;9 POINTER TO ZIP CODE FILE (#5.11) (Required)
OUTPUT TRANSFORM: S Y=$S(Y="":Y,$D(^VIC(5.11,Y,0))#2:$P(^(0),U,2)_","_$P(^DIC(5,$P(^VIC(5.1,$P(^VIC(5.11,Y,0),U,3),0)
,U,2),0),U,2)_" "_$P(^VIC(5.11,Y,0),U,1),1:"")
LAST EDITED: MAY 05, 1992
HELP-PROMPT: Enter correct Zipcode
DESCRIPTION:
POINTS TO THE ZIP CODE FILE.
165,.1211 TEMPORARY ADDRESS 1 .121;1 FREE TEXT
INPUT TRANSFORM: K:$L(X)>30!($L(X)<2) X
LAST EDITED: DEC 23, 1987
HELP-PROMPT: ANSWER MUST BE 2-30 CHARACTERS IN LENGTH
DESCRIPTION:
FREE TEXT FIELD FOR RECORDING A CONTACTS TEMPORARY ADDRESS.
165,.1212 TEMPORARY ADDRESS 2 .121;2 FREE TEXT
INPUT TRANSFORM: K:$L(X)>30!($L(X)<2) X
LAST EDITED: DEC 23, 1987
HELP-PROMPT: ANSWER MUST BE 2-30 CHARACTERS IN LENGTH
DESCRIPTION:
FREE TEXT FIELD FOR RECORDING A SECOND TEMPORARY ADDRESS.
165,.1213 TEMPORARY ADDRESS 3 .121;3 FREE TEXT
INPUT TRANSFORM: K:$L(X)>30!($L(X)<2) X
LAST EDITED: DEC 23, 1987
HELP-PROMPT: ANSWER MUST BE 2-30 CHARACTERS IN LENGTH
DESCRIPTION:
FREE TEXT FIELD FOR RECORDING A THIRD TEMPORARY ADDRESS.
165,.1217 START DATE OF TEMP ADDRESS .121;7 DATE
INPUT TRANSFORM: S %DT="EX" D ^%DT S X=Y K:Y<1 X
LAST EDITED: DEC 23, 1987
DESCRIPTION:
RECORDS THE DATE A TEMPORARY ADDRESS IS IN USE.
165,.1218 END DATE OF TEMP ADDRESS .121;8 DATE
INPUT TRANSFORM: S %DT="EX" D ^%DT S X=Y K:Y<1 X
LAST EDITED: DEC 23, 1987
DESCRIPTION:
RECORDS THE ENDING DATE FOR THE TEMPORARY ADDRESS.
165,.1219 TEMPORARY ZIP CODE .121;9 POINTER TO ZIP CODE FILE (#5.11)
OUTPUT TRANSFORM: S Y=$S(Y="":Y,$D(^VIC(5.11,Y,0))#2:$P(^(0),U,2)_","_$P(^DIC(5,$P(^VIC(5.1,$P(^VIC(5.11,Y,0),U,3),0)
,U,2),0),U,2)_" "_$P(^VIC(5.11,Y,0),U,1),1:"")
LAST EDITED: NOV 21, 1988
DESCRIPTION:
POINTS TO THE ZIP CODE FILE FOR THE TEMPORARY ADDRESS.
165,.131 PHONE .13;1 FREE TEXT
INPUT TRANSFORM: K:$L(X)>20!($L(X)<4) X
LAST EDITED: DEC 23, 1987
HELP-PROMPT: ANSWER MUST BE 4-20 CHARACTERS IN LENGTH
DESCRIPTION:
TELEPHONE NUMBER
165,.132 OFFICE PHONE .13;2 FREE TEXT
INPUT TRANSFORM: K:$L(X)>20!($L(X)<4) X
LAST EDITED: DEC 23, 1987
HELP-PROMPT: ANSWER MUST BE 4-20 CHARACTERS IN LENGTH
DESCRIPTION:
RECORDS A CONTACT'S OFFICE/BUSINESS TELEPHONE NUMBER.
165,.133 PHONE #3 .13;3 FREE TEXT
INPUT TRANSFORM: K:$L(X)>20!($L(X)<4) X
LAST EDITED: DEC 23, 1987
HELP-PROMPT: ANSWER MUST BE 4-20 CHARACTERS IN LENGTH
DESCRIPTION:
RECORDS ADDITIONAL TELEPHONE NUMBER FOR CONTACT.
165,.134 PHONE #4 .13;4 FREE TEXT
INPUT TRANSFORM: K:$L(X)>20!($L(X)<4) X
LAST EDITED: DEC 23, 1987
HELP-PROMPT: ANSWER MUST BE 4-20 CHARACTERS IN LENGTH
DESCRIPTION:
RECORDS ADDITIONAL TELEPHONE NUMBER FOR CONTACT.
165,1 TYPE 0;2 SET (Required)
'1' FOR PATIENT;
'2' FOR PHYSICIAN;
'3' FOR CONTACT PERSON;
'4' FOR INSTITUTION;
'5' FOR OTHER;
'6' FOR GOVERNMENT AGENCY;
LAST EDITED: JUN 10, 1992
HELP-PROMPT: Contact Type will be linked to Letter Type
DESCRIPTION:
RECORDS THE TYPE OF CONTACT.
CROSS-REFERENCE: 165^BT^MUMPS
1)= S ^ONCO(165,"B"_X,$P(^ONCO(165,DA,0),U),DA)=""
2)= K ^ONCO(165,"B"_X,$P(^ONCO(165,DA,0),U),DA)
Indexes the file by contact type.
165,2 TITLE 0;3 FREE TEXT
INPUT TRANSFORM: K:$L(X)>10!($L(X)<1) X
LAST EDITED: DEC 23, 1987
HELP-PROMPT: ANSWER MUST BE 1-10 CHARACTERS IN LENGTH
DESCRIPTION:
RECORDS THE TITLE OF THE CONTACT: MR., MRS., MISS, ETC.
165,3 COMMENTS 0;4 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:
FREE TEXT FIELD FOR RECORDING ANY COMMENTS REGARDING THE CONTACT.
165,99 VA HOSPITAL # VA;2 POINTER TO INSTITUTION FILE (#4)
LAST EDITED: JUN 10, 1992
HELP-PROMPT: Select corresponding entry in Institution file
DESCRIPTION:
Pointer to institution file to provide link with Va station number.
CROSS-REFERENCE: 165^C
1)= S ^ONCO(165,"C",$E(X,1,30),DA)=""
2)= K ^ONCO(165,"C",$E(X,1,30),DA)
Provides lookup by VA Station number - giving user look and feel of DHCP.
165,100 VA PROVIDER # VA;1 POINTER TO NEW PERSON FILE (#200)
LAST EDITED: JUN 10, 1992
HELP-PROMPT: Select corresponding entry in New Person File
DESCRIPTION:
Pointer to New Person file to provide a link to single identity.
165,101 NPI 0;5 FREE TEXT (Required)
INPUT TRANSFORM: K:$L(X)>10!($L(X)<10)!'(X?10N) X
MAXIMUM LENGTH: 10
LAST EDITED: JUN 05, 2023
HELP-PROMPT: Enter the NPI for the physician, answer must be 10 characters in length.
DESCRIPTION:
The NPI (National Provider Identifier) for the physician.
NOTES: XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
CROSS-REFERENCE: 165^F
1)= S ^ONCO(165,"F",$E(X,1,30),DA)=""
2)= K ^ONCO(165,"F",$E(X,1,30),DA)
This cross-reference allows for ONCOLOGY CONTACT look-up by NPI.
165,102 POSTAL CODE CONVERSION FLAG 0;6 SET
'1' FOR Converted;
'2' FOR Unconverted;
LAST EDITED: AUG 24, 2010
HELP-PROMPT: Enter 1 (Converted) if POSTAL CODE has been converted.
DESCRIPTION: Indicates that POSTAL CODE (.119) values have been converted from pointers to ZIP CODE (5.11) to
free-text postal code values.
FILES POINTED TO FIELDS
INSTITUTION (#4) VA HOSPITAL # (#99)
NEW PERSON (#200) VA PROVIDER # (#100)
STATE (#5) STATE (#.115)
ZIP CODE (#5.11) ZIP CODE (#.119)
TEMPORARY ZIP CODE (#.1219)
INPUT TEMPLATE(S):
ONCO UPDATE CONTACT AUG 29, 2007@15:31 USER #0
PRINT TEMPLATE(S):
ONCO CONTACT LIST-A APR 22, 2009@11:34 USER #0 ONCOLOGY CONTACT LIST
ONCO CONTACT LIST-T APR 22, 2009@11:54 USER #0 ONCOLOGY CONTACT LIST
SORT TEMPLATE(S):
ONCO CONTACT LIST-A AUG 15, 1992@21:50 USER #0 'ONCO CONTACT LIST-A' Print Template always used
SORT BY: CONTACT// (User is asked range)
ONCO CONTACT LIST-T AUG 16, 1992@08:51 USER #0 'ONCO CONTACT LIST-T' Print Template always used
SORT BY: #TYPE// (User is asked range)
WITHIN TYPE, SORT BY: CONTACT// (CONTACT not null)
FORM(S)/BLOCK(S):