PXRMGECU ;SLC/AGP,JVS - CLINICAL REMINDERS ;Oct 17, 2022@10:07:20
Source file <PXRMGECU.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
FINISHED(DFN,ANS) | ;Delete 801.5 entries if finished
|
|
CON(IEN,DFN) | ;CHECK TO see if 2 DIA ARE DONE to display consult
|
|
DEL(NOTEIEN) | ;Delete HF and 801.5 Called from DELETE^TIUEDI1
|
|
API(RESULT,IEN,DFN,VISIT,WHERE,NOTEIEN) | ;
|
|
CHECKGEC(IEN) | ;
|
|
GECDT(DFN,GEC,VISIT,NOTEIEN) | ;Get Date/Time from file
|
|
NEWADD | ;-Set Data into File 801.5 and 801.55 (history)
|
|
CURADD | ;-Set Data into File 801.5 and 801.55 (history)
|
|
STATUS(DFN) | ;Evaluate The status of the Referral
|
|
EVAL(DFN,GEC,WHERE) | ;Evaluate for missing dialogs
|
|
T | ;TEXT
|
FileNo | Call Tags |
---|---|
^PXRMD(801.5 - [#801.5] | Classic Fileman Calls |