DGRRLU3 ;alb/aas - DG Replacement and Rehosting RPC for VADPT ;8/8/05 15:38
Source file <DGRRLU3.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| GETLIST(RESULT,PARAM) | ;
; Input: PARAM("TYPE")="ward" returns a list of wards ; PARAM("TYPE")="clinic" returns a list of clinics ; PARAM("TYPE")="provider" returns a list of providers ; PARAM("TYPE")="specialty" returns a list of specialties ; PARAM("VALUE")= Beginning lookup value or null to start ; at the beginning or end of the file. ; PARAM("MAXNUM")= Number of records to be returned. If a ; negative number, traverse backwards. |
|
| CLIST(ITEM,CHKVAL,VALUE,MAXNUM) | ;
|
|
| STATUS(IEN,CHKVAL) | ;
|
|
| WLIST(ITEM,VALUE,MAXNUM) | ;
; Input: VALUE - Beginning value or null to start at the beginning ; or end of the file. ; MAXNUM - Number of entries to be returned. Defaults to ; traversing forward but if MAXNUM is a negative ; number, traverses through the file backwards. |
|
| EXMTCH | ;Look for exact match
|
|
| PLIST(ITEM,VALUE,MAXNUM) | ;
|
|
| SLIST(ITEM,VALUE,MAXNUM) | ;Returns active specialties in Facility TreatingSpecialty (#45.7) file
|
|
| DISPLAY(RESULT) | ;
|
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
| RPC Name | Call Tags |
|---|---|
| DGRR GET LOOKUP TYPE LIST | GETLIST |
| FileNo | Call Tags |
|---|---|
| ^VA(200 - [#200] | LIST^DIC |
| ^DIC(42 - [#42] | LIST^DIC |
