GMRCSTLM ;SLC/DCM,dee,MA - List Manager Format Routine - Get Active Consults by service - pending,active,scheduled,incomplete,etc. ;11/21/02 05:29
Source file <GMRCSTLM.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| EN | ;Ask for new service and date range
|
|
| ENOR(RETURN,GMRCSVC,GMRCDT1,GMRCDT2,GMRCSTAT,GMRCCTRL,GMRCARRN) | ;Entry point for GUI interface.
|
|
| ENORLM(GMRCARRN) | ;Entry point for List Manager interface.
; Input -- GMRCARRN List Template Array Name ; "CP": pending; "IFC": inter-facility ; Output - None |
|
| ENORSTR | ;Common part
|
|
| CAPTION | ;Set the List Mangager Caption Line
; Does GMRCCTRL contain 10 i.e. display line numbers ; or 20 i.e. display consult number |
|
| SVC | ;Loop on Service
|
|
| GROUPER | ||
| STAT | ||
| PRINTST | ||
| EXIT |
| RPC Name | Call Tags |
|---|---|
| GMRCSTLM SERVICE AND STATUS | ENOR |
| FileNo | Call Tags |
|---|---|
| ^DIC(4 - [#4] | GET1^DIQ |
