Routine: ONCOPRT

Information

ONCOPRT ;HINES OIFO/GWB - OncoTrax reports ;05/03/12

Source file <ONCOPRT.m>

Name	Comments	DBIA/ICR reference
SUS	;[SP Print Suspense List by Suspense Date (132c)]
DI	;[DI Disease Index]
DISUS	;Add DISEASE INDEX case to suspense
DNP	;[NP Oncology Patient List-NO Primaries/Suspense]
ABI	;[NC Print Abstract NOT Complete List]
PFH	;[FH Patient Follow-up History]
DUF	;[DF Print Due Follow-up List by Month Due]
DEL	;[LF Print Delinquent (LTF) List]
PFTD(IEN)	;DTDX before 2004 not included in followup
DIR	;DIR
FST	;[SR Follow-up Status Report by Patient (132c)]
PFR	;[FR Individual Follow-up Report]
ACOS80	;[AA Accession Register-ACOS (80c)]
AC80ST	;[AS Accession Register-Site (80c)]
EOAC	;[AE Accession Register-EOVA (132c)]
HA	;Help for Accession Registers
ACOSPT	;[PA Patient Index-ACOS (132c)]
PAT80	;[PS Patient Index-Site (80c)]
EOVA	;[PE Patient Index-EOVA (132c)]
ICD80	;[IN Primary ICDO Listing (80c)]
SIT80	;[SG Primary Site/GP Listing (80c)]
ICD132	;[IW Primary ICDO Listing (132c)]
PAT	;ONCOLOGY PATIENT (160) lookup
PRT60	;Print ONCOLOGY PATIENT (160) file
PRT655	;Print ONCOLOGY PRIMARY (165.5) file
EX	;Exit
CLEANUP	;Cleanup

Name	Line Occurrences
Function Call: WRITE	Prompt: ! Line Location: DI+7
Function Call: WRITE	Prompt: ! Line Location: ABI+1
Function Call: WRITE	Prompt: ! Line Location: DUF+1
Function Call: WRITE	Prompt: !!?5,"FOLLOW-UP STATUS will be changed from ""Active"" to ""LTF""." Line Location: DEL+3
Function Call: WRITE	Prompt: !?5,"After 15 months the patient is considered LOST TO FOLLOW-UP." Line Location: DEL+4
Function Call: WRITE	Prompt: ! Line Location: DEL+5
Function Call: WRITE	Prompt: ! Line Location: FST+1
Function Call: WRITE	Prompt: !!?3,"For a complete register:" Line Location: HA+1
Function Call: WRITE	Prompt: !?5,"START WITH ACC/SEQ NUMBER: FIRST// <Enter>" Line Location: HA+2
Function Call: WRITE	Prompt: !!?3,"For a single accession year (e.g. 1999):" Line Location: HA+3
Function Call: WRITE	Prompt: !,?5,"START WITH ACC/SEQ NUMBER: FIRST// 1999-00000" Line Location: HA+4
Function Call: WRITE	Prompt: !,?5,"GO TO ACC/SEQ NUMBER: LAST// 1999-99999" Line Location: HA+5
Function Call: WRITE	Prompt: !!?3,"For a single patient (e.g. 1999-00001):" Line Location: HA+6
Function Call: WRITE	Prompt: !,?5,"START WITH ACC/SEQ NUMBER: FIRST// 1999-00001/00" Line Location: HA+7
Function Call: WRITE	Prompt: !,?5,"GO TO ACC/SEQ NUMBER: LAST// 1999-00001/99" Line Location: HA+8
Function Call: WRITE	Prompt: ! Line Location: HA+9
Function Call: WRITE	Prompt: ! Line Location: PAT+1
Function Call: WRITE	Prompt: ! Line Location: PAT+3

FileNo	Call Tags
^ONCO(160 - [#160]	Classic Fileman Calls
^ONCO(165.5 - [#165.5]	Classic Fileman Calls
^AUPNVSIT - [#9000010]	GET1^DIQ
^AUPNVPOV - [#9000010.07]	Classic Fileman Calls, GET1^DIQ