SDAMOWB ;ALB/CAW - Waiting Times Build Arrays; 8-NOV-93
Source file <SDAMOWB.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
STORE(HOW,DIV,CLIN,STOP,DATE,PAT) | ;save data in tmp variable
|
|
AUGMENT(WAIT,WAIT1,TOT,NODE) | ;increment summary node
|
|
MIN(X,X1) | ;difference between x & x1 in minutes
; for positive result, x is BEFORE x1 |
|
REJECT() | ;set x conditions for rejection
; returns: 1|reject or 0|meets selection criteria |
|
QTRJ | ||
EXTERN(SORTV,X) | ;returns the external value of sort variables
; SORTV: 1=CLINIC,2=STOP CODE,3=DAY OF WEEK ; X: Internal value |
|
SET(HOW,CLIN,STOP,DATE,PAT) | ; Set how the sort goes
; Input: HOW = which sort was selected ; CLIN = clinic ifn ; STOP = stop code ifn ; DATE = date in fm format ; PAT = patient ifn ; Output: LEVE1-LEVEL4 in external format |