Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Entry Points |  Interaction Calls
Print Page as PDF
Routine: ONCOU0A

Package: Oncology

Routine: ONCOU0A


Information

ONCOU0A ;WISC/MLH - ONCOLOGY PATIENT FILE UTILITIES - Fix follow ups for expired patients ;6/21/93 09:18

Source Information

Source file <ONCOU0A.m>

Entry Points

Name Comments DBIA/ICR reference
FIXFOR(ONCOWRT) ; correct erroneous 'foreign resident' status for exp pats
; ONCOWRT defined if output desired
INITSYA() ; find level of ^TMP on which to put SYA and initialize
CHKSTAT(ONCOP,ONCOF,ONCOLVL,ONCOWRT) ; look at follow-up record for patient ONCOP, follow-up ONCOF
; if we need to change and ONCOLVL defined, back up on ^TMP("ONCOFIXFOR",ONCOLVL)
; ONCOWRT is defined if we want dots for the user
WRT(ONCORES) ; output results array

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: "."
  • Line Location: CHKSTAT+12
Function Call: WRITE
  • Prompt: !!,"Oncology patients processed: ",?35,$J(ONCORES(1),6),!,"Follow-ups processed: ",?35,$J(ONCORES(2),6),!,"Follow-ups corrected: ",?35,$J(ONCORES(3),6),!!
  • Line Location: WRT+2
Info |  Source |  Entry Points |  Interaction Calls