TIULC1 ; SLC/JER - More computational functions ;11/01/03
Source file <TIULC1.m>
| Package | Total | Call Graph |
|---|---|---|
| Text Integration Utility | 3 | $$CLASS^TIUCNSLT $$NOW^TIULC ($$DATE,$$MIXED)^TIULS |
| Kernel | 2 | $$NS^XUAF4 (DE,EN)^XUSHSHP |
| Authorization Subscription | 1 | $$ISA^USRLM |
| Registration | 1 | $$SITE^VASITE |
| VA Fileman | 1 | $$GET1^DIQ |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| POSTSIGX | ||
| BEEP(USER) | ; Get beeper #'s
|
|
| FIXCODE(TIUTYP) | ; Get Error Resolution Code, support inheritance
|
|
| REASSIGN(TIUTYP) | ; Get Package Reassign Action, support inheritance
|
|
| VERIFYX | ||
| ONBRWSX | ||
| POSTSIGN(TIUTYP) | ; Get Post-Signature Code, support inheritance
|
|
| ONRTRCT(TIUTYP) | ; Get OnRetract Event, support inheritance
|
|
| COMMIT(TIUTYP) | ; Get Commitment action, support inheritance
|
|
| DIVISION(TIULOC) | ; Get Division
; Input -- TIULOC HOSPITAL LOCATION file (#44) IEN ; Output -- TIUIN INSTITUTION file (#4) IEN^ ; INSTITUTION file (#4) NAME |
|
| REFDATE(TIU,TIUDICDT) | ; Identify Reference date
|
|
| SUPPVSIX | ||
| PTNAME(DFN) | ; Resolve Patient Name
|
|
| WHATMPL(USER) | ; What List Template should a given user get?
|
|
| WHAX | ||
| REASSIX | ||
| DELETE(TIUTYP) | ; Get Delete Action, support inheritance
|
|
| ABBREV(DA) | ; Get abbreviaton for a document type or class
|
|
| DOCPRM(TIUTYP,TIUDPRM,TIUDA) | ; Get Document Parameters, support inheritance
|
|
| PNAME(DA) | ; Receives pointer to 8925.1, returns display name of
; document class |
|
| ENCRYPT(X,X1,X2) | ; Encrypt Text Strings
|
|
| POSTFILX | ||
| SUPPVSIT(TIUTYP) | ; Evaluate whether to suppress visit matching
|
|
| RELEASX | ||
| DECRYPT(X,X1,X2) | ; Decrypt Text Strings
|
|
| COMMITX | ||
| DOCCLASS(TIUTYP) | ; Given a document type, find its parent document class
|
|
| HASX | ||
| ISADDNDM(DA) | ; Evaluate whether a given record IS an addendum
|
|
| HASADDEN(DA,IDKIDFLG) | ; Evaluate whether a given record has addenda
; **100**: ; If +IDKIDFLG, check interdisciplinary kids of DA, as well as DA. |
|
| CLINDOC(TIUTYP,TIUDA) | ; Given a document type, find the Clinical Document
; subclass to which it belongs |
|
| WHOSIGNS(DA) | ; Evaluate who should be the expected signer
|
|
| PERSNAME(USER) | ; Receives pointer to 200, returns name field
|
|
| WHOCOSIG(DA) | ; Evaluate who should be the expected cosigner
|
|
| CLINDOX | ||
| VERIFY(TIUTYP) | ; Get Verification action, support inheritance
|
|
| ONRTRX | ||
| POSTFILE(TIUTYP) | ; Get Post-filing Code, support inheritance
|
|
| FIXCODX | ||
| ONBROWSE(TIUTYP) | ||
| DELETEX | ||
| RELEASE(TIUTYP) | ; Get Release Action, support inheritance
|
|
| REQVER(TIUTYP,TIUDA) | ; Does a given document type require verification
|
| FileNo | Call Tags |
|---|---|
| ^VA(200 - [#200] | GET1^DIQ |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^DPT - [#2] | PTNAME+1 |
| ^SC - [#44] | DIVISION+5 |
| ^TIU(8925 - [#8925] | WHOSIGNS+2, WHOCOSIG+2, HASADDEN+5, HASADDEN+6, HASADDEN+9, HASADDEN+11, HASADDEN+12, ISADDNDM+2, DOCPRM+3, CLINDOC+3 , REQVER+2 |
| ^TIU(8925.1 - [#8925.1] | HASADDEN+6, HASADDEN+12, ISADDNDM+2, PNAME+4, PNAME+5, PNAME+6, PNAME+8, PNAME+9, PNAME+11, PNAME+12 , ABBREV+1, DOCPRM+3, DOCPRM+11, POSTFILE+2, POSTFILE+4, FIXCODE+2, FIXCODE+4, DOCCLASS+1, CLINDOC+4, SUPPVSIT+2 , SUPPVSIT+3, SUPPVSIT+4, POSTSIGN+2, POSTSIGN+4, COMMIT+2, COMMIT+4, RELEASE+2, RELEASE+4, VERIFY+2, VERIFY+4 , DELETE+2, DELETE+4, REASSIGN+2, REASSIGN+4, ONBROWSE+2, ONBROWSE+4, ONRTRCT+2, ONRTRCT+4 |
| ^TIU(8925.95 - [#8925.95] | DOCPRM+4, DOCPRM+6, DOCPRM+7, DOCPRM+9, DOCPRM+10 |
| ^VA(200 - [#200] | BEEP+1 |
| Name | Line Occurrences |
|---|---|
| $$CLINDOC | CLINDOC+7 |
| $$COMMIT | COMMIT+5 |
| $$DELETE | DELETE+5 |
| $$FIXCODE | FIXCODE+7 |
| $$ISADDNDM | CLINDOC+3, REQVER+2 |
| $$ONBROWSE | ONBROWSE+5 |
| $$ONRTRCT | ONRTRCT+5 |
| $$POSTFILE | POSTFILE+5 |
| $$POSTSIGN | POSTSIGN+5 |
| $$REASSIGN | REASSIGN+5 |
| $$RELEASE | RELEASE+5 |
| $$SUPPVSIT | SUPPVSIT+5 |
| $$VERIFY | VERIFY+5 |
| CLINDOX | CLINDOC+5 |
| COMMITX | COMMIT+3 |
| DELETEX | DELETE+3 |
| DOCPRM | DOCPRM+12, REQVER+3 |
| FIXCODX | FIXCODE+3, FIXCODE+6 |
| HASX | HASADDEN+7 |
| ONBRWSX | ONBROWSE+3 |
| ONRTRX | ONRTRCT+3 |
| POSTFILX | POSTFILE+3 |
| POSTSIGX | POSTSIGN+3 |
| REASSIX | REASSIGN+3 |
| RELEASX | RELEASE+3 |
| SUPPVSIX | SUPPVSIT+2, SUPPVSIT+3 |
| VERIFYX | VERIFY+3 |
| WHAX | WHATMPL+2, WHATMPL+3, WHATMPL+4, WHATMPL+5 |
| Name | Field # of Occurrence |
|---|---|
| ^(3 | SUPPVSIT+3 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| DA | WHOSIGNS~, WHOSIGNS+2, WHOCOSIG~, WHOCOSIG+2, HASADDEN~, HASADDEN+5, HASADDEN+9, ISADDNDM~, ISADDNDM+2, PNAME~ , PNAME+3, PNAME+4, PNAME+5, PNAME+6, PNAME+11, PNAME+12, ABBREV~, ABBREV+1 |
| DFN | PTNAME~, PTNAME+1 |
| DUZ(2 | DIVISION+11 |
| IDKIDFLG | HASADDEN~, HASADDEN+7 |
| TIU | REFDATE~ |
| TIU("LDT" | REFDATE+2, REFDATE+3, REFDATE+5* |
| TIU12 | WHOSIGNS+1~, WHOSIGNS+2*, WHOSIGNS+3, WHOSIGNS+4, WHOCOSIG+1~, WHOCOSIG+2*, WHOCOSIG+3, WHOCOSIG+4, WHOCOSIG+6 |
| TIUBRWS | ONBROWSE+1~, ONBROWSE+2*, ONBROWSE+3, ONBROWSE+5*, ONBRWSX |
| TIUCOMM | COMMIT+1~, COMMIT+2*, COMMIT+3, COMMIT+5*, COMMITX |
| TIUDA | DOCPRM~, DOCPRM+3, CLINDOC~, CLINDOC+3, REQVER~, REQVER+2 |
| TIUDAD | DOCPRM+1~, DOCPRM+11*, DOCPRM+12, POSTFILE+1~, POSTFILE+4*, POSTFILE+5, FIXCODE+1~, FIXCODE+4*, FIXCODE+6, FIXCODE+7 , POSTSIGN+1~, POSTSIGN+4*, POSTSIGN+5, COMMIT+1~, COMMIT+4*, COMMIT+5, RELEASE+1~, RELEASE+4*, RELEASE+5, VERIFY+1~ , VERIFY+4*, VERIFY+5, DELETE+1~, DELETE+4*, DELETE+5, REASSIGN+1~, REASSIGN+4*, REASSIGN+5, ONBROWSE+1~, ONBROWSE+4* , ONBROWSE+5, ONRTRCT+1~, ONRTRCT+4*, ONRTRCT+5 |
| TIUDEL | DELETE+1~, DELETE+2*, DELETE+3, DELETE+5*, DELETEX |
| TIUDICDT | REFDATE~, REFDATE+4 |
| TIUDPRM | DOCPRM~, DOCPRM+12, REQVER+1~, REQVER+3 |
| TIUDPRM(0 | DOCPRM+2*, DOCPRM+6*, REQVER+4 |
| TIUDPRM(5 | DOCPRM+2*, DOCPRM+10* |
| TIUDVHL | DIVISION+4~, DIVISION+5*, DIVISION+6, DIVISION+7 |
| TIUFIX | FIXCODE+1~, FIXCODE+2*, FIXCODE+3, FIXCODE+7*, FIXCODX |
| TIUI | HASADDEN+3~, HASADDEN+4*, HASADDEN+5*, HASADDEN+6, DOCPRM+1~, DOCPRM+4*, DOCPRM+5, DOCPRM+6, DOCPRM+7, DOCPRM+9 , DOCPRM+10, CLINDOC+2~*, CLINDOC+4*, CLINDOC+5, CLINDOC+6, CLINDOC+7, SUPPVSIT+1~, SUPPVSIT+4*, SUPPVSIT+5 |
| TIUIN | DIVISION+4~, DIVISION+9*, DIVISION+10, DIVISION+11*, DIVISION+12 |
| TIUJ | HASADDEN+3~, HASADDEN+4*, HASADDEN+9*, HASADDEN+11, DOCPRM+8~*, DOCPRM+9*, DOCPRM+10 |
| TIUK | HASADDEN+3~, HASADDEN+10*, HASADDEN+11*, HASADDEN+12 |
| TIULOC | DIVISION~, DIVISION+5 |
| TIUMOM | PNAME+2~*, PNAME+4*, PNAME+5*, PNAME+6*, PNAME+7, PNAME+8, PNAME+9, PNAME+10 |
| TIUPOST | POSTFILE+1~, POSTFILE+2*, POSTFILE+3, POSTFILE+5*, POSTFILX, POSTSIGN+1~, POSTSIGN+2*, POSTSIGN+3, POSTSIGN+5*, POSTSIGX |
| TIURDT | REFDATE+1~, REFDATE+2*, REFDATE+4*, REFDATE+5, REFDATE+6 |
| TIUREASS | REASSIGN+1~, REASSIGN+2*, REASSIGN+3, REASSIGN+5*, REASSIX |
| TIUREL | RELEASE+1~, RELEASE+2*, RELEASE+3, RELEASE+5*, RELEASX |
| TIURTRCT | ONRTRCT+1~, ONRTRCT+2*, ONRTRCT+3, ONRTRCT+5*, ONRTRX |
| TIUSTN | DIVISION+4~, DIVISION+7*, DIVISION+8, DIVISION+9 |
| TIUTYP | DOCPRM~, DOCPRM+3*, DOCPRM+4, DOCPRM+11, POSTFILE~, POSTFILE+2, POSTFILE+4, FIXCODE~, FIXCODE+2, FIXCODE+4 , FIXCODE+6, DOCCLASS~, DOCCLASS+1, CLINDOC~, CLINDOC+3*, CLINDOC+4, CLINDOC+6, REQVER~, REQVER+2*, REQVER+3 , SUPPVSIT~, SUPPVSIT+2, SUPPVSIT+3, SUPPVSIT+4, POSTSIGN~, POSTSIGN+2, POSTSIGN+4, COMMIT~, COMMIT+2, COMMIT+4 , RELEASE~, RELEASE+2, RELEASE+4, VERIFY~, VERIFY+2, VERIFY+4, DELETE~, DELETE+2, DELETE+4, REASSIGN~ , REASSIGN+2, REASSIGN+4, ONBROWSE~, ONBROWSE+2, ONBROWSE+4, ONRTRCT~, ONRTRCT+2, ONRTRCT+4 |
| TIUVER | VERIFY+1~, VERIFY+2*, VERIFY+3, VERIFY+5*, VERIFYX |
| TIUY | HASADDEN+3~, HASADDEN+4*, HASADDEN+5, HASADDEN+6*, HASADDEN+7, HASADDEN+9, HASADDEN+11, HASADDEN+12*, HASX, ISADDNDM+1~* , ISADDNDM+2*, ISADDNDM+3, PNAME+2~, PNAME+8*, PNAME+9*, PNAME+11*, PNAME+12*, PNAME+13, CLINDOC+2~*, CLINDOC+6* , CLINDOC+7*, CLINDOX, REQVER+1~, REQVER+4*, REQVER+5, WHATMPL+1~, WHATMPL+2*, WHATMPL+3*, WHATMPL+4*, WHATMPL+5* , WHATMPL+6*, WHAX, SUPPVSIT+1~*, SUPPVSIT+2*, SUPPVSIT+3*, SUPPVSIT+4, SUPPVSIT+5*, SUPPVSIX, PTNAME+1~*, PTNAME+2* , PTNAME+3 |
| U | WHOSIGNS+3, WHOSIGNS+4, WHOCOSIG+3, WHOCOSIG+4, WHOCOSIG+6, HASADDEN+6, HASADDEN+12, ISADDNDM+2, PNAME+5, PNAME+6 , PNAME+8, PNAME+9, PNAME+11, PNAME+12, ABBREV+1, BEEP+1, DOCPRM+3, DOCPRM+10, CLINDOC+3, REQVER+2 , REQVER+4, REFDATE+5, SUPPVSIT+2, SUPPVSIT+3, PTNAME+1, DIVISION+5, DIVISION+8, DIVISION+9, DIVISION+11 |
| USER | PERSNAME~, PERSNAME+1, BEEP~, BEEP+1, WHATMPL~, WHATMPL+2, WHATMPL+3, WHATMPL+4, WHATMPL+5 |
| X | ENCRYPT~, ENCRYPT+2, DECRYPT~, DECRYPT+2, PERSNAME+1~*, PERSNAME+2 |
| X1 | ENCRYPT~, DECRYPT~ |
| X2 | ENCRYPT~, DECRYPT~ |
| Y | WHOSIGNS+1~, WHOSIGNS+3*, WHOSIGNS+4*, WHOSIGNS+5, WHOCOSIG+1~, WHOCOSIG+4*, WHOCOSIG+5*, WHOCOSIG+6*, WHOCOSIG+7 |