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: QAOSPCL0

Package: Occurrence Screen

Routine: QAOSPCL0


Information

QAOSPCL0 ;HISC/DAD-CLINICAL REVIEWER WORKSHEET (PART 1) ;2/12/93 15:16

Source Information

Source file <QAOSPCL0.m>

Entry Points

Name Comments DBIA/ICR reference
DONE
EXIT ;
LOOP1 ;
HEAD ;
INSTR
PAUSE ;

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,QAOSHEAD
  • Line Location: QAOSPCL0+9
Function Call: WRITE
  • Prompt: !!,QAOSHEAD
  • Line Location: QAOSPCL0+11
Function Call: WRITE
  • Prompt: !!,$J(QAOSNUM,3),$S(QAOSS0=QAOSPRIM:" (Y)/ N",1:" Y / N")
  • Line Location: LOOP1+3
Function Call: WRITE
  • Prompt: !
  • Condition for execution: FLAG
  • Line Location: LOOP1+4
Function Call: WRITE
  • Prompt: ?15,^UTILITY($J,"W",DIWL,QA,0)
  • Line Location: LOOP1+4
Function Call: WRITE
  • Prompt: !!?23,"CLINICAL REVIEW WORKSHEET (PART 1)",?68,TODAY,!?68,"PAGE: ",PAGE
  • Line Location: HEAD+2
Function Call: WRITE
  • Prompt: !!,"Instructions: Review the medical record and answer the following by circling",!,"the appropriate 'Y' or 'N'. Record any comments at the end of the worksheet.",!,UNDL
  • Line Location: INSTR+0
Info |  Source |  Entry Points |  Interaction Calls