IBDFQSL2 ;ALB/CJM/AAS/MAF - ENCOUNTER FORM - Quick selection edit (cont.);12-Jun-95
Source file <IBDFQSL2.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| GETLST(FORM,BLOCK,LIST,INTRFACE,ARY,FILTER,COUNT) | ; -- returns any specified selection list for a clinic
; -- input FORM = ien of entry in 357 ; BLOCK = ien of entry in 357.1 ; LIST = ien of entry in 357.2 ; INTRFACE = name of selection list in package interface file ; ARY = name of array to return list in ; FILTER = predefined filters (optional, default = 1) ; 1 = must be selection list ; 2 = only visit cpts on list |
|
| COPYLIST(LIST,ARY,COUNT) | ;copies the entries from LIST to @ARY, starting subscript at COUNT+1
|
