ORAMSET ; ISL/JER - Anticoagulation Setup ;11/20/14 11:12
Source file <ORAMSET.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
SET | ; Enter Parameters
|
|
SETDIV | ; Enter Site Parameters
|
|
SETCLIN | ; Enter Clinic Parameters
|
|
TIMEOUT(T0) | ; Evaluate whether TED^XPAREDIT timed-out (since it NEWs DTOUT and DIRUT)
|
|
GETCLINS(RESULT) | ; Get Clinics
|
|
CLIN4PT(RESULT,ORAMDFN) | ; Get the Clinic which is following the patient
|
|
GET(RESULT,ORAMENT,ORVDT) | ; Get Parameters
|
|
INDICS(RESULT,ORVDT) | ; RPC To Get indications for care
|
|
GETDIV() | ; get division
|
|
SELDIV() | ; select division
|
|
SELLOC() | ; select hospital location
|
|
GOODLOC(LOC) | ; Returns 1 if ^SC hospital location IFN LOC is good, else 0
|
|
GETPARM(X) | ; Get parameter as IEN^NAME
|
|
GETCMPDT(CODESYS) | ; Returns compare date for indication set-up
|
|
ISCODEOK(CODE,CODESYS) | ; Boolean - is code active as of compare date for code system
|
Name | Line Occurrences |
---|---|
Function Call: WRITE |
|
RPC Name | Call Tags |
---|---|
ORAMSET GET | GET |
ORAMSET GETCLINS | GETCLINS |
ORAMSET INDICS | INDICS |
FileNo | Call Tags |
---|---|
^DIC(4 - [#4] | GET1^DIQ |