TIULC1 ; SLC/JER - More computational functions ;Feb 24, 2022@08:28:13
Source file <TIULC1.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
ENCRYPT(X,X1,X2) | ; Encrypt Text Strings
|
|
DECRYPT(X,X1,X2) | ; Decrypt Text Strings
|
|
WHOSIGNS(DA) | ; Evaluate who should be the expected signer
|
|
WHOCOSIG(DA) | ; Evaluate who should be the expected cosigner
|
|
HASADDEN(DA,IDKIDFLG) | ; Evaluate whether a given record has addenda
; **100**: ; If +IDKIDFLG, check interdisciplinary kids of DA, as well as DA. |
|
HASX | ||
ISADDNDM(DA) | ; Evaluate whether a given record IS an addendum
|
|
PNAME(DA) | ; Receives pointer to 8925.1, returns display name of
; document class |
|
ABBREV(DA) | ; Get abbreviaton for a document type or class
|
|
PERSNAME(USER) | ; Receives pointer to 200, returns name field
|
|
BEEP(USER) | ; Get beeper #'s
|
|
DOCPRM(TIUTYP,TIUDPRM,TIUDA) | ; Get Document Parameters, support inheritance
|
|
POSTFILE(TIUTYP) | ; Get Post-filing Code, support inheritance
|
|
POSTFILX | ||
FIXCODE(TIUTYP) | ; Get Error Resolution Code, support inheritance
|
|
FIXCODX | ||
DOCCLASS(TIUTYP) | ; Given a document type, find its parent document class
|
|
CLINDOC(TIUTYP,TIUDA) | ; Given a document type, find the Clinical Document
; subclass to which it belongs |
|
CLINDOX | ||
REQVER(TIUTYP,TIUDA) | ; Does a given document type require verification
|
|
REFDATE(TIU,TIUDICDT) | ; Identify Reference date
|
|
WHATMPL(USER) | ; What List Template should a given user get?
|
|
WHAX | ||
SUPPVSIT(TIUTYP) | ; Evaluate whether to suppress visit matching
|
|
SUPPVSIX | ||
PTNAME(DFN) | ; Resolve Patient Name
|
|
POSTSIGN(TIUTYP) | ; Get Post-Signature Code, support inheritance
|
|
POSTSIGX | ||
COMMIT(TIUTYP) | ; Get Commitment action, support inheritance
|
|
COMMITX | ||
RELEASE(TIUTYP) | ; Get Release Action, support inheritance
|
|
RELEASX | ||
VERIFY(TIUTYP) | ; Get Verification action, support inheritance
|
|
VERIFYX | ||
DELETE(TIUTYP) | ; Get Delete Action, support inheritance
|
|
DELETEX | ||
REASSIGN(TIUTYP) | ; Get Package Reassign Action, support inheritance
|
|
REASSIX | ||
ONBROWSE(TIUTYP) | ; Get OnBrowse Event, support inheritance
|
|
ONBRWSX | ||
ONRTRCT(TIUTYP) | ; Get OnRetract Event, support inheritance
|
|
ONRTRX | ||
DIVISION(TIULOC) | ; Get Division
; Input -- TIULOC HOSPITAL LOCATION file (#44) IEN ; Output -- TIUIN INSTITUTION file (#4) IEN^ ; INSTITUTION file (#4) NAME |
FileNo | Call Tags |
---|---|
^VA(200 - [#200] | GET1^DIQ |
^TIU(8925.1 - [#8925.1] | FIND1^DIC |