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

Package: Automated Information Collection System

Routine: IBDFDE4


Information

IBDFDE4 ;ALB/AAS - AICS Manual Data Entry, process multiple choice fields ; 29-APR-96IOIN

Source Information

Source file <IBDFDE4.m>

Entry Points

Name Comments DBIA/ICR reference
MULT(RESULT,IBDF) ; -- Procedure
; -- Manual Data entry routine for Multiple Choice Fields
; Input : Result := call by reference, used to output results
; IBDF("IEN") := pointer to hand print file (359.94)
; IBDF("PI") := pointer to input package interface
; IBDF("DFN") := pointer to patient
; IBDF("CLINIC") := pointer to hospital location
OVER ; -- ask or re-ask for selection(s) from list
MCOVER ;
MULTQ ;
ASKYN(DIR) ; -- input dir
ASKYNQ
TEST ;

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: " Deleted!"
  • Line Location: OVER+17
Function Call: WRITE
  • Prompt: $E(X,$L(GOTO)+1,$L(X))
  • Line Location: OVER+23
Function Call: WRITE
  • Prompt: " ?? ",$C(7),"Not Found"
  • Line Location: OVER+47
Function Call: WRITE
  • Prompt: $E(X,$L(GOTO)+1,$L(X))
  • Line Location: ASKYN+11
Info |  Source |  Entry Points |  Interaction Calls