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 |  FileMan Files Accessed Via FileMan Db Call
Print Page as PDF
Routine: ONCOSINP

Package: Oncology

Routine: ONCOSINP


Information

ONCOSINP ;WASH ISC/SRR,MLH-INPUT SUBROUTINES FOR ONCOS ;11/1/93 12:16

Source Information

Source file <ONCOSINP.m>

Entry Points

Name Comments DBIA/ICR reference
GETFILE ;lookup file, get file number & global reference
GETTEMPL ;get a search template
ASK
Z
X ;D GETYES E Q:Y=-1 G GT2
GT2
HP1
W
GT1
GETYES ;get a yes/no response

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"FILE: ",X
  • Line Location: GETFILE+4
Function Call: WRITE
  • Prompt: !,"SEARCH TEMPLATE: ",Y
  • Line Location: GETTEMPL+4
Function Call: WRITE
  • Prompt: !,"Sorry, ",$P(Y,U,2)," must be a SEARCH template"
  • Line Location: X+1
Function Call: WRITE
  • Prompt: !!,?10,$P(Y,U,2)_" does not have stored entries",!?10,"you must run FM Search Option for this template.",!!
  • Line Location: X+2
Function Call: WRITE
  • Prompt: !!?10,"REMINDER: Run Define Search Criteria Option"
  • Line Location: X+3
Function Call: WRITE
  • Prompt: !,?10,"to be sure selected entries are up-to-date!!",!
  • Line Location: X+4
Function Call: WRITE
  • Prompt: !
  • Line Location: X+5
Function Call: WRITE
  • Prompt: !
  • Line Location: GT2+0
Function Call: WRITE
  • Prompt: !!?10,"Using a Search Template will restrict cases.",!
  • Line Location: HP1+0
Function Call: WRITE
  • Prompt: ?10,"It will act as a filter using only those cases",!
  • Line Location: HP1+1
Function Call: WRITE
  • Prompt: ?10,"that fit the criteria you have selected."
  • Line Location: HP1+2
Function Call: WRITE
  • Prompt: W
  • Line Location: W+0
Function Call: WRITE
  • Prompt: !!,?10,"YOU MUST have FIRST GENERATED the Search Template using the",!?10,"DS Option to create the necessary 'TRUE' entries!",!!
  • Line Location: W+0
Function Call: READ
  • Variable: X
  • Timeout: DTIME
  • Line Location: GETYES+7
Function Call: WRITE
  • Prompt: !,Y
  • Line Location: GETYES+7
Function Call: WRITE
  • Prompt: *7
  • Line Location: GETYES+11
Function Call: WRITE
  • Prompt: !,"Enter 'y' or 'n' or '^' to abort."
  • Line Location: GETYES+12
Function Call: WRITE
  • Prompt: " (Yes)"
  • Line Location: GETYES+13
Function Call: WRITE
  • Prompt: " (No)"
  • Line Location: GETYES+14

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^DIBT - [#.401] Classic Fileman Calls
^DIC - [#1] Classic Fileman Calls
Info |  Source |  Entry Points |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call