TIUEDIT ; SLC/JER - Enter/Edit a Document ;01-Aug-2011 11:29;MGH
Source file <TIUEDIT.m>
Package | Total | Call Graph |
---|---|---|
Text Integration Utility | 21 | ADDENDUM^TIUADD (ADDENDEL,ALERTDEL)^TIUALRT $$CLASS^TIUCP DELIRT^TIUDIRT (DELAUDIT,DELCOMP)^TIUEDI1 ($$GETENTRY,$$GETEXIT,EXSTNOTE)^TIUEDI2 $$GETRECNW^TIUEDI3 (ASKOK,DIE,GETVST,SETTL)^TIUEDI4 MAIN^TIUEDIM PRINT^TIUEPRNT $$PATIENT^TIULA ($$COMMIT,$$DELETE,$$PNAME,DOCPRM)^TIULC1 ($$PERSPRF,SETPARM)^TIULE $$EMPTYDOC^TIULF $$ISA^TIULX QUE^TIUPXAP1 EDSIG^TIURS ($$CLASS,ENTEROP)^TIUSROI (RELEASE,VERIFY)^TIUT $$READ^TIUU DEFER^TIUVSIT |
Authorization Subscription | 1 | $$ISA^USRLM |
IHS Mods To Text Integration Utilities | 1 | VNOTE^BTIUPCC |
Kernel | 1 | $$UP^XLFSTR |
Registration | 1 | FULL^VALM1 |
VA Fileman | 1 | ^DIE |
Name | Comments | DBIA/ICR reference |
---|---|---|
MAIN(TIUCLASS,SUCCESS,DFN,TIUTITLE,EVNTFLAG,NOSAVE,TIUNDA,TIUSNGL,TIUCHNG) | ; Create new document(s)
; May branch off to edit existing docmt instead of creating new one. ; Call with: [TIUCLASS] --> pointer to file (8925) corresponding to ; the class (e.g., Progress Notes=3) ; from which to select a title ; [by ref] [SUCCESS] --> Boolean flag returned as IFN when a ; record is created, or 0 when record ; creation fails ; [DFN] --> IEN in patient file (#2) ; [TIUTITLE] --> Pointer or NAME or PTR^NAME of the ; TITLE from file 8925.1 to be used as ; the default. ; [EVNTFLAG] --> Boolean flag for visit prompt (0 to ; prompt, 1 to force event type visit) ; [NOSAVE] --> Boolean flag to suppress saving the data ; (e.g., when testing new Boilerplates ; using DDEF action TRY, etc.). ; [by ref] [TIUNDA] --> array of form: TIUNDA(IFN)="". ; Used in SHOW NOTES ACROSS PATIENTS. ; See TIURC, which sets TIUONCE. ; Also used in TIUEDIM, for mult pts. ; [TIUSNGL] --> Boolean flag to create only ONE note ; regardless of multiple pt preference. ; [by ref] [TIUCHNG] --> If received, passes back TIUCHNG array, ; which collects info across records about ; actions taken. Used in feedback ; msgs to user. ; Other variables: ; sets [TIUTYP] --> array with form similar to that of XQORNOD: ; TIUTYP = title IFN ; TIUTYP(1) = 1^title IFN^title name, ; where 1 for us is just a positive # ; sets [TIUBY] --> used in some input templates to BYpass fields. ; Called by: ; Outpt Pharmacy, Consults, ... |
|
DELETE(TIUDA,PROMPT,MSG,HUSH) | ; Delete record
|
Name | Field # of Occurrence |
---|---|
VNOTE^BTIUPCC | MAIN+105 |
^DIE | DELETE+10 |
ADDENDUM^TIUADD | MAIN+88 |
ADDENDEL^TIUALRT | DELETE+14 |
ALERTDEL^TIUALRT | DELETE+14 |
$$CLASS^TIUCP | MAIN+94 |
DELIRT^TIUDIRT | DELETE+5 |
DELAUDIT^TIUEDI1 | DELETE+12 |
DELCOMP^TIUEDI1 | DELETE+12 |
$$GETENTRY^TIUEDI2 | MAIN+67 |
$$GETEXIT^TIUEDI2 | MAIN+114 |
EXSTNOTE^TIUEDI2 | MAIN+58 |
$$GETRECNW^TIUEDI3 | MAIN+82 |
ASKOK^TIUEDI4 | MAIN+74 |
DIE^TIUEDI4 | MAIN+91 |
GETVST^TIUEDI4 | MAIN+71 |
SETTL^TIUEDI4 | MAIN+62 |
MAIN^TIUEDIM | MAIN+43 |
PRINT^TIUEPRNT | MAIN+119 |
$$PATIENT^TIULA | MAIN+52 |
$$COMMIT^TIULC1 | MAIN+107 |
$$DELETE^TIULC1 | DELETE+7 |
$$PNAME^TIULC1 | MAIN+122, DELETE+11 |
DOCPRM^TIULC1 | MAIN+66 |
$$PERSPRF^TIULE | MAIN+41 |
SETPARM^TIULE | MAIN+40 |
$$EMPTYDOC^TIULF | MAIN+95 |
$$ISA^TIULX | MAIN+64, MAIN+94 |
QUE^TIUPXAP1 | MAIN+103 |
EDSIG^TIURS | MAIN+112 |
$$CLASS^TIUSROI | MAIN+64 |
ENTEROP^TIUSROI | MAIN+64 |
RELEASE^TIUT | MAIN+109 |
VERIFY^TIUT | MAIN+110 |
$$READ^TIUU | DELETE+3 |
DEFER^TIUVSIT | MAIN+102 |
$$ISA^USRLM | MAIN+58 |
FULL^VALM1 | MAIN+58 |
$$UP^XLFSTR | MAIN+123 |
Name | Line Occurrences |
---|---|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Routine Call |
|
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^TIU(8925 - [#8925] | MAIN+94, DELETE+2, DELETE+4!, DELETE+13! |
Name | Line Occurrences |
---|---|
DELETE | MAIN+95 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
>> BTIURPT | MAIN+46 |
CANEDIT | MAIN+47~, MAIN+82, MAIN+87 |
DA | MAIN+81~, MAIN+82*, MAIN+83, MAIN+88, MAIN+91, MAIN+94, MAIN+95, MAIN+97, MAIN+98, MAIN+102 , MAIN+105, MAIN+109, MAIN+110, MAIN+112, MAIN+115*, MAIN+119, DELETE+9* |
DFN | MAIN~, MAIN+50*, MAIN+51, MAIN+52*, MAIN+58, MAIN+64, MAIN+71, MAIN+72!, MAIN+74!, MAIN+82 , MAIN+105, MAIN+120! |
DIDEL | DELETE+1~, DELETE+9* |
DIE | DELETE+1~, DELETE+9* |
>> DIROUT | MAIN+60 |
DIRUT | MAIN+36~ |
DR | DELETE+1~, DELETE+9* |
DTOUT | MAIN+36~, MAIN+60 |
DUOUT | MAIN+36~, MAIN+60 |
DUZ | MAIN+41, MAIN+58, MAIN+82, DELETE+4, DELETE+13 |
EVNTFLAG | MAIN~, MAIN+38*, MAIN+71 |
HUSH | DELETE~, DELETE+10, DELETE+11 |
MSG | DELETE~, DELETE+3 |
NOSAVE | MAIN~, MAIN+43, MAIN+46, MAIN+58, MAIN+125 |
>> ORVP | MAIN+43, MAIN+46, MAIN+50, MAIN+125 |
PROMPT | DELETE~, DELETE+3 |
SUCCESS | MAIN~, MAIN+97* |
TIU | MAIN+47~, MAIN+71, MAIN+74, MAIN+76, MAIN+82 |
TIU("STOP" | MAIN+102 |
TIU("VISIT" | MAIN+105 |
TIU("VSTR" | MAIN+72, MAIN+74 |
TIUADD | MAIN+89~ |
TIUASK | MAIN+35~, MAIN+74, MAIN+76 |
TIUBY | MAIN+37~, MAIN+47~, MAIN+74 |
TIUCHK | MAIN+35~ |
TIUCHNG | MAIN~, MAIN+43, MAIN+88 |
TIUCHNG("DELETE" | MAIN+95* |
TIUCLASS | MAIN~, MAIN+43, MAIN+54*, MAIN+62, MAIN+122 |
TIUCMMTX | MAIN+47~, MAIN+107*, MAIN+108 |
TIUD0 | DELETE+1~, DELETE+2*, DELETE+11 |
TIUDA | MAIN+35~, DELETE~, DELETE+2, DELETE+4, DELETE+5, DELETE+9, DELETE+12, DELETE+13, DELETE+14 |
TIUDELX | DELETE+1~, DELETE+7*, DELETE+8 |
TIUDFLT | MAIN+36~ |
TIUDPRM | MAIN+35~, MAIN+66, MAIN+82 |
TIUDPRM(0 | MAIN+102, MAIN+119 |
TIUEDIT | MAIN+35~, MAIN+47~ |
TIUENTRY | MAIN+37~, MAIN+67*, MAIN+68 |
TIUEXIT | MAIN+37~, MAIN+114*, MAIN+115 |
TIULMETH | MAIN+36~ |
TIUNDA | MAIN~, MAIN+43 |
TIUNDA( | MAIN+98* |
TIUNEW | MAIN+47~, MAIN+82, MAIN+87, MAIN+95 |
>> TIUONCE | MAIN+98 |
TIUOUT | MAIN+35~, MAIN+43, MAIN+46, MAIN+51*, MAIN+60*, MAIN+62*, MAIN+69 |
TIUPNAME | MAIN+37~, MAIN+122*, MAIN+123*, MAIN+125 |
TIUPREF | MAIN+36~, MAIN+41*, MAIN+43 |
TIUPRM0 | MAIN+36~, MAIN+40 |
TIUPRM1 | MAIN+37~ |
TIUPRM3 | MAIN+37~ |
TIUQUIT | MAIN+89~, MAIN+91, MAIN+92, MAIN+94, MAIN+96 |
TIUREL | MAIN+35~ |
TIUSNGL | MAIN~, MAIN+43, MAIN+46, MAIN+125 |
TIUST | MAIN+37~ |
TIUTDA | MAIN+89~, MAIN+115* |
TIUTITLE | MAIN~, MAIN+62, MAIN+121! |
TIUTYP | MAIN+35~, MAIN+47~, MAIN+62, MAIN+64, MAIN+66, MAIN+67, MAIN+71, MAIN+72!, MAIN+74!, MAIN+94 |
TIUTYP(1 | MAIN+82, MAIN+107, MAIN+114 |
TIUTYPE | DELETE+1~, DELETE+2*, DELETE+7 |
TIUVKILL | DELETE+1~ |
TIUVMETH | MAIN+36~ |
TIUVSIT | DELETE+1~, DELETE+2* |
TIUY | MAIN+35~ |
U | MAIN+43, MAIN+94, MAIN+102, MAIN+107, MAIN+114, MAIN+119, DELETE+2 |
VADM | MAIN+47~ |
VAIN | MAIN+47~ |
>> VALMAR | MAIN+58, MAIN+95 |
>> VALMBCK | MAIN+95* |