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* |