| 1 | QAMC0 ;HISC/DAD-CONDITION: DESCRIPTION ;2/10/92  07:33
 | 
|---|
| 2 |  ;;1.0;Clinical Monitoring System;;09/13/1993
 | 
|---|
| 3 |  ;
 | 
|---|
| 4 | EN1 ; *** CONDITION CODE
 | 
|---|
| 5 |  ;
 | 
|---|
| 6 |  ; This part of a condition routine generates the list of patients
 | 
|---|
| 7 |  ; who meet the requirements of the condition and optionally its
 | 
|---|
| 8 |  ; parameters (see below).  The list generated by the condition
 | 
|---|
| 9 |  ; should be of the following form:
 | 
|---|
| 10 |  ;  S ^UTILITY($J,"QAM CONDITION",QAMD1,DFN)=""
 | 
|---|
| 11 |  ;  S ^UTILITY($J,"QAM CONDITION",QAMD1,DFN,DATE/TIME(FM))=D0^D1^D2^...
 | 
|---|
| 12 |  ;   QAMD1     = The IEN of the condition in the CONDITION multiple
 | 
|---|
| 13 |  ;               in the QA MONITOR file (#743)
 | 
|---|
| 14 |  ;   DFN       = The IEN of a record in the PATIENT file (#2)
 | 
|---|
| 15 |  ;   DATE/TIME = The date/time in FileMan format for this condition
 | 
|---|
| 16 |  ;               If the condition has no date associated with it the
 | 
|---|
| 17 |  ;               variable QAMTODAY (see below) may be used
 | 
|---|
| 18 |  ;   D0,D1,D2  = The internal entry numbers to get to the data.
 | 
|---|
| 19 |  ;
 | 
|---|
| 20 |  ; The following variables may be used, but should NOT be changed
 | 
|---|
| 21 |  ;  QAMD0    = The IEN of a record in the QA MONITOR file (#743)
 | 
|---|
| 22 |  ;  QAMD1    = See above
 | 
|---|
| 23 |  ;  QAMTODAY = The date for which auto enroll is running
 | 
|---|
| 24 |  ;  QAMZERO  = The zero node of the monitor
 | 
|---|
| 25 |  ;  QAMONE   = The one node of the monitor
 | 
|---|
| 26 |  ; The following variables should NOT be used or changed
 | 
|---|
| 27 |  ;  QAMRANGE, QAQNBEG, QAQNEND, QAMARUN, QAMHISD0
 | 
|---|
| 28 |  ;
 | 
|---|
| 29 | EN2 ; *** PARAMETER CODE
 | 
|---|
| 30 |  ;
 | 
|---|
| 31 |  ; The parameter code section should ask the user any parameters
 | 
|---|
| 32 |  ; associated with the condition, e.g., Sex: M or F, Age: upper
 | 
|---|
| 33 |  ; lower limit, etc.  The parameters edit section should support
 | 
|---|
| 34 |  ; full FileMan editing conventions: add, edit, delete, and error
 | 
|---|
| 35 |  ; handling.  The entry point EN3^QAMUTL1 may be called to perform
 | 
|---|
| 36 |  ; the edit of a parameter. This routine uses a DIR call to get the
 | 
|---|
| 37 |  ; parameter.  If the edit of the involves a screened look up on a
 | 
|---|
| 38 |  ; file the entry point EN2^QAMUTL1 should be used.  For this call
 | 
|---|
| 39 |  ; the appropriate DIC variables should be set, also the DIR("?")
 | 
|---|
| 40 |  ; and DIR("??") variables may be used as well.
 | 
|---|
| 41 |  ; The required variables are:
 | 
|---|
| 42 |  ;  QAMPARAM = Node parameter should be stored in, P1,P2,P3,P4,P5
 | 
|---|
| 43 |  ;  DIR      = See FileMan documentation
 | 
|---|
| 44 |  ; Other variables:
 | 
|---|
| 45 |  ;  QAMD0, QAMD1 = Same as above
 | 
|---|
| 46 |  ;  QAMFIN = Do NOT use this variable or change it
 | 
|---|
| 47 |  ; Returned variables:
 | 
|---|
| 48 |  ;  DIRUT    = See FileMan documentation
 | 
|---|
| 49 |  ;  Y        = See FileMan documentation
 | 
|---|
| 50 |  ;             (Y="" if deleted or ^ or some problem with the edit)
 | 
|---|
| 51 |  ;  DIR is killed by this call
 | 
|---|