TIUEDIT ; SLC/JER - Enter/Edit a Document ; 6/11/2002
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 |
| Kernel | 1 | $$UP^XLFSTR |
| List Manager | 1 | FULL^VALM1 |
| VA FileMan | 1 | ^DIE |
| action | A | extended action | Ea | event driver | Ed | subscriber | Su | protocol | O | limited protocol | LP | run routine | RR | broker | B | edit | E | server | Se | P | screenman | SM | inquire | I |
| 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 |
|---|---|
| ^DIE | DELETE+10 |
| ADDENDUM^TIUADD | MAIN+83 |
| ADDENDEL^TIUALRT | DELETE+14 |
| ALERTDEL^TIUALRT | DELETE+14 |
| $$CLASS^TIUCP | MAIN+89 |
| DELIRT^TIUDIRT | DELETE+5 |
| DELAUDIT^TIUEDI1 | DELETE+12 |
| DELCOMP^TIUEDI1 | DELETE+12 |
| $$GETENTRY^TIUEDI2 | MAIN+62 |
| $$GETEXIT^TIUEDI2 | MAIN+106 |
| EXSTNOTE^TIUEDI2 | MAIN+54 |
| $$GETRECNW^TIUEDI3 | MAIN+77 |
| ASKOK^TIUEDI4 | MAIN+69 |
| DIE^TIUEDI4 | MAIN+86 |
| GETVST^TIUEDI4 | MAIN+66 |
| SETTL^TIUEDI4 | MAIN+57 |
| MAIN^TIUEDIM | MAIN+43 |
| PRINT^TIUEPRNT | MAIN+111 |
| $$PATIENT^TIULA | MAIN+51 |
| $$COMMIT^TIULC1 | MAIN+99 |
| $$DELETE^TIULC1 | DELETE+7 |
| $$PNAME^TIULC1 | MAIN+113, DELETE+11 |
| DOCPRM^TIULC1 | MAIN+61 |
| $$PERSPRF^TIULE | MAIN+41 |
| SETPARM^TIULE | MAIN+40 |
| $$EMPTYDOC^TIULF | MAIN+90 |
| $$ISA^TIULX | MAIN+59, MAIN+89 |
| QUE^TIUPXAP1 | MAIN+98 |
| EDSIG^TIURS | MAIN+104 |
| $$CLASS^TIUSROI | MAIN+59 |
| ENTEROP^TIUSROI | MAIN+59 |
| RELEASE^TIUT | MAIN+101 |
| VERIFY^TIUT | MAIN+102 |
| $$READ^TIUU | DELETE+3 |
| DEFER^TIUVSIT | MAIN+97 |
| $$ISA^USRLM | MAIN+54 |
| FULL^VALM1 | MAIN+54 |
| $$UP^XLFSTR | MAIN+114 |
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Routine Call |
|
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^TIU(8925 - [#8925] | MAIN+89, DELETE+2, DELETE+4!, DELETE+13! |
| Name | Line Occurrences |
|---|---|
| DELETE | MAIN+90 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| CANEDIT | MAIN+46~, MAIN+77, MAIN+82 |
| DA | MAIN+76~, MAIN+77*, MAIN+78, MAIN+83, MAIN+86, MAIN+89, MAIN+90, MAIN+92, MAIN+93, MAIN+97 , MAIN+101, MAIN+102, MAIN+104, MAIN+107*, MAIN+111, DELETE+9* |
| DFN | MAIN~, MAIN+49*, MAIN+50, MAIN+51*, MAIN+54, MAIN+59, MAIN+66, MAIN+67!, MAIN+69!, MAIN+77 , MAIN+112! |
| DIDEL | DELETE+1~, DELETE+9* |
| DIE | DELETE+1~, DELETE+9* |
| >> DIROUT | MAIN+55 |
| DIRUT | MAIN+36~ |
| DR | DELETE+1~, DELETE+9* |
| DTOUT | MAIN+36~, MAIN+55 |
| DUOUT | MAIN+36~, MAIN+55 |
| DUZ | MAIN+41, MAIN+54, MAIN+77, DELETE+4, DELETE+13 |
| EVNTFLAG | MAIN~, MAIN+38*, MAIN+66 |
| HUSH | DELETE~, DELETE+10, DELETE+11 |
| MSG | DELETE~, DELETE+3 |
| NOSAVE | MAIN~, MAIN+43, MAIN+45, MAIN+54, MAIN+116 |
| >> ORVP | MAIN+43, MAIN+45, MAIN+49, MAIN+116 |
| PROMPT | DELETE~, DELETE+3 |
| SUCCESS | MAIN~, MAIN+92* |
| TIU | MAIN+46~, MAIN+66, MAIN+69, MAIN+71, MAIN+77 |
| TIU("STOP" | MAIN+97 |
| TIU("VSTR" | MAIN+67, MAIN+69 |
| TIUADD | MAIN+84~ |
| TIUASK | MAIN+35~, MAIN+69, MAIN+71 |
| TIUBY | MAIN+37~, MAIN+46~, MAIN+69 |
| TIUCHK | MAIN+35~ |
| TIUCHNG | MAIN~, MAIN+43, MAIN+83 |
| TIUCHNG("DELETE" | MAIN+90* |
| TIUCLASS | MAIN~, MAIN+43, MAIN+53*, MAIN+54, MAIN+57, MAIN+113 |
| TIUCMMTX | MAIN+46~, MAIN+99*, MAIN+100 |
| 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+61, MAIN+77 |
| TIUDPRM(0 | MAIN+97, MAIN+111 |
| TIUEDIT | MAIN+35~, MAIN+46~ |
| TIUENTRY | MAIN+37~, MAIN+62*, MAIN+63 |
| TIUEXIT | MAIN+37~, MAIN+106*, MAIN+107 |
| TIULMETH | MAIN+36~ |
| TIUNDA | MAIN~, MAIN+43 |
| TIUNDA( | MAIN+93* |
| TIUNEW | MAIN+46~, MAIN+77, MAIN+82, MAIN+90 |
| >> TIUONCE | MAIN+93 |
| TIUOUT | MAIN+35~, MAIN+43, MAIN+45, MAIN+50*, MAIN+55*, MAIN+57*, MAIN+64 |
| TIUPNAME | MAIN+37~, MAIN+113*, MAIN+114*, MAIN+116 |
| TIUPREF | MAIN+36~, MAIN+41*, MAIN+43 |
| TIUPRM0 | MAIN+36~, MAIN+40 |
| TIUPRM1 | MAIN+37~ |
| TIUPRM3 | MAIN+37~ |
| TIUQUIT | MAIN+84~, MAIN+86, MAIN+87, MAIN+89, MAIN+91 |
| TIUREL | MAIN+35~ |
| TIUSNGL | MAIN~, MAIN+43, MAIN+45, MAIN+116 |
| TIUST | MAIN+37~ |
| TIUTDA | MAIN+84~, MAIN+107* |
| TIUTITLE | MAIN~, MAIN+57 |
| TIUTYP | MAIN+35~, MAIN+46~, MAIN+57, MAIN+59, MAIN+61, MAIN+62, MAIN+66, MAIN+67!, MAIN+69!, MAIN+89 |
| TIUTYP(1 | MAIN+77, MAIN+99, MAIN+106 |
| 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+89, MAIN+97, MAIN+99, MAIN+106, MAIN+111, DELETE+2 |
| VADM | MAIN+46~ |
| VAIN | MAIN+46~ |
| >> VALMAR | MAIN+54, MAIN+90 |
| >> VALMBCK | MAIN+90* |