TIULX ; SLC/JER - CROSS-REFERENCE LIBRARY FUNCTIONS ;03/07/23 12:32
Source file <TIULX.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
ALOCP(DA) | ; Should record be included in daily print queue by location?
; Receives DA = record # in 8925 |
|
APTP(DA) | ; Should record be included in daily print queue by patient?
; Receives DA = record # in 8925 |
|
AAUP(DA) | ; Should record be included in daily print queue by author?
; Receives DA = record # in 8925 |
|
BELONGS(TIUDA,CLASS) | ; Evaluate whether a given document belongs to a
; particular document class |
|
ISA(DA,CLASS) | ; Evaluate whether a given document type is a member of a
; particular document class ; Receives DA = record # in 8925.1, and ; CLASS = record # of class in 8925.1 |
|
ISPN(DA) | ; Evaluate whether a given document is a Progress Note
; Receives DA = record # in 8925.1 |
|
ISCWAD(DA) | ; Evaluate whether a given title is a CWAD
|
|
ISDS(DA) | ; Evaluate whether a given document is a Discharge Summary
; Receives DA = record # in 8925.1 |
|
TRNSFRM(RTYPE,FLD,X) | ; Executes Transform code for a given header field
|
|
TRNSFRMX | ||
MENUS | ; Evaluate/enforce user's menu display preference
|
|
XTRASIGN(TIUY,TIUDA) | ; Get list of extra signers for a document
|
|
ASKSIGN(TIUY) | ; Identify which Signature to edit
|
|
PICK(LOW,HIGH,PROMPT,TYPE) | ; List selection
|
|
CWAD | ; Entry action for CWAD protocol
|
|
IDSIGNRS(TIUY,TIUDA,LIST) | ; add/remove additional signers (#8925.7) ajb *355
; .TIUY return location, pass by reference ; TIUDA document IEN from #8925 ; LIST(#) IEN^name^[REMOVE] |
|
REMSIGNR(TIUDA,TIUDUZ) | ; remove user from TIU MULTIPLE SIGNATURE (#8925.7)
|
|
GETSIGNR(TIUY,TIUDA) | ; RPC to Get list of extra signers for a document
|
|
HASDS(DFN,VSTR) | ; Does an admission have a Discharge Summary?
|
|
NEEDSIG(TIUY,USER,CLASS) | ||
TITLIENS | ; Get IENs of DDEF entries that have type Title
; in Document Definition file 8925.1 |
|
HASDOCMT(DFN) | ;Does patient have ANY entries in TIU DOCUMENT file 8925?
|
Name | Line Occurrences |
---|---|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
RPC Name | Call Tags |
---|---|
TIU GET ADDITIONAL SIGNERS | GETSIGNR |
TIU UPDATE ADDITIONAL SIGNERS | IDSIGNRS |
FileNo | Call Tags |
---|---|
^VA(200 - [#200] | FIND1^DIC |
^TIU(8925.7 - [#8925.7] | Classic Fileman Calls |