TIUMOBJ ;XAN/AJB - MEDICATION OBJECT ;Aug 29, 2025@06:54:59
Source file <TIUMOBJ.m>
| Package | Total | Call Graph |
|---|---|---|
| Pharmacy Data Management | 4 | ZERO^PSS50 DRGIEN^PSS50P7 ZERO^PSS52P6 (PSS431,PSS436)^PSS55 |
| Outpatient Pharmacy | 3 | PEN^PSO5241 RX^PSO52API OCL^PSOORRL |
| Kernel | 2 | ($$FMADD,$$FMTE)^XLFDT ($$REPLACE,$$TRIM)^XLFSTR |
| Text Integration Utility | 2 | WRAP^TIUFLD TITLE^TIUMOBJ1 |
| VA FileMan | 1 | ^DIM |
| 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 |
|---|---|---|
| LIST(DFN,TARGET,A,D,M,O,SC,SU,MR) | ;
; validate target, default to OUTPUT if needed |
|
| EX | ||
| CLASS(MED,DFN) | ;
|
|
| MEDCLASS(NAME,IEN) | ;
|
|
| OUTPUT(TARGET,MEDS,OCL,P) | ;
|
|
| ADDMED(TARGET,OCL,P,COL,CNT,INDEX,XSTR) | ;
|
|
| ADD(TARGET,DATA) | ;
|
|
| NODE(OCL,IDX,NODES) | ;
|
|
| SETSTR(S,V,X,L) | ;
|
|
| UP(X) |
| Name | Field # of Occurrence |
|---|---|
| ^DIM | LIST+4 |
| PEN^PSO5241 | CLASS+10 |
| RX^PSO52API | CLASS+5 |
| OCL^PSOORRL | LIST+36 |
| ZERO^PSS50 | MEDCLASS+3 |
| DRGIEN^PSS50P7 | CLASS+40 |
| ZERO^PSS52P6 | CLASS+33 |
| PSS431^PSS55 | CLASS+21 |
| PSS436^PSS55 | CLASS+28 |
| WRAP^TIUFLD | ADDMED+23, ADDMED+26, ADDMED+34, ADDMED+55 |
| TITLE^TIUMOBJ1 | EX |
| $$FMADD^XLFDT | LIST+20, LIST+21, LIST+22, LIST+23 |
| $$FMTE^XLFDT | ADDMED+46, ADDMED+48, ADDMED+50, ADDMED+51 |
| $$REPLACE^XLFSTR | ADDMED+6, ADDMED+7, ADDMED+8, ADDMED+12, ADDMED+13, ADDMED+15, ADDMED+18 |
| $$TRIM^XLFSTR | ADDMED+1, ADDMED+6, ADDMED+12, ADDMED+20, ADDMED+53, NODE+1 |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^DPT - [#2] | LIST+6, LIST+29 |
| ^PS(53.1 - [#53.1] | CLASS+15, CLASS+16, CLASS+17, CLASS+18 |
| ^TMP("PS" | LIST+7!, LIST+36, LIST+37! |
| ^TMP($J | CLASS+6, CLASS+7, CLASS+11, CLASS+12, CLASS+22, CLASS+23, CLASS+24, CLASS+25, CLASS+29, CLASS+30 , CLASS+31, CLASS+32, CLASS+33!, CLASS+34, CLASS+35!, CLASS+40!, CLASS+41, CLASS+43!, MEDCLASS+1!, MEDCLASS+4 , MEDCLASS+5! |
| Name | Line Occurrences |
|---|---|
| $$ADDMED | LIST+68 |
| $$MEDCLASS | CLASS+1, CLASS+36, CLASS+42 |
| $$NODE | ADDMED+6, ADDMED+7, ADDMED+8, ADDMED+11, ADDMED+12, ADDMED+13, ADDMED+14, ADDMED+15, ADDMED+18 |
| $$SETSTR | OUTPUT+18, OUTPUT+20, OUTPUT+21, OUTPUT+22, OUTPUT+23, OUTPUT+24, OUTPUT+26, OUTPUT+31, OUTPUT+40, ADDMED+35 , ADDMED+37, ADDMED+39, ADDMED+41, ADDMED+42, ADDMED+43, ADDMED+46, ADDMED+47, ADDMED+48, ADDMED+50, ADDMED+51 , ADDMED+56 |
| $$UP | LIST+12 |
| ADD | LIST+6, EX+1, OUTPUT+20, OUTPUT+21, OUTPUT+26, OUTPUT+31, OUTPUT+39, OUTPUT+40, OUTPUT+41, OUTPUT+42 , OUTPUT+43, ADDMED+53, ADDMED+56 |
| ADDMED | OUTPUT+38 |
| CLASS | LIST+61 |
| EX | LIST+36 |
| OUTPUT | EX+2 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| %H | LIST+33~ |
| A | LIST~, LIST+10* |
| BDT1 | LIST+33~ |
| CLASS | MEDCLASS+1~, MEDCLASS+4*, MEDCLASS+6, OUTPUT+1~, OUTPUT+28*, OUTPUT+31, OUTPUT+33, OUTPUT+35, OUTPUT+36, OUTPUT+38 , OUTPUT+39, OUTPUT+40 |
| CNT | OUTPUT+1~, OUTPUT+5*, ADDMED~, ADDMED+31*, ADDMED+37 |
| CNT( | OUTPUT+36*, OUTPUT+38 |
| CNT("CLASS" | OUTPUT+13*, OUTPUT+36*, OUTPUT+38, OUTPUT+42 |
| CNT("TOTAL" | OUTPUT+36*, OUTPUT+42 |
| COL | OUTPUT+1~, OUTPUT+38, ADDMED~ |
| COL(0 | OUTPUT+4*, OUTPUT+8*, ADDMED+37 |
| COL(1 | OUTPUT+4*, OUTPUT+5*, OUTPUT+7*, OUTPUT+8*, OUTPUT+18, OUTPUT+22, ADDMED+23, ADDMED+26, ADDMED+34, ADDMED+39 , ADDMED+55, ADDMED+56 |
| COL(2 | OUTPUT+4*, OUTPUT+7*, OUTPUT+8*, OUTPUT+18, OUTPUT+20, OUTPUT+23, OUTPUT+24, ADDMED+41, ADDMED+42, ADDMED+43 , ADDMED+47 |
| COL(3 | OUTPUT+8*, OUTPUT+20, OUTPUT+21, OUTPUT+23, OUTPUT+24, ADDMED+46, ADDMED+48, ADDMED+50, ADDMED+51 |
| D | LIST~, LIST+11* |
| D0 | LIST+33~ |
| DATA | CLASS+1~*, CLASS+36*, CLASS+41, CLASS+42*, ADDMED+1~*, ADDMED+6, ADDMED+8*, ADDMED+11, ADDMED+14*, ADDMED+15* , ADDMED+17*, ADDMED+18*, ADDMED+20*, ADDMED+26, ADDMED+37*, ADDMED+39*, ADDMED+41*, ADDMED+42*, ADDMED+46*, ADDMED+47* , ADDMED+48*, ADDMED+50*, ADDMED+51*, ADDMED+53, ADD~, ADD+1, NODE+1~*, NODE+2 |
| DATA( | ADDMED+23 |
| DATA(1 | ADDMED+6*, ADDMED+11* |
| DATA(2 | ADDMED+6*, ADDMED+11*, ADDMED+12* |
| DATA(3 | ADDMED+7*, ADDMED+13* |
| DEA | MEDCLASS+1~, MEDCLASS+4*, MEDCLASS+6 |
| DFN | LIST~, LIST+2*, LIST+6, LIST+29, LIST+36, LIST+61, CLASS~, CLASS+5, CLASS+6, CLASS+7 , CLASS+10, CLASS+11, CLASS+12, CLASS+21, CLASS+28 |
| DILOCKTM | LIST+33~ |
| DIQ2 | LIST+33~ |
| DISYS | LIST+33~ |
| DNORIG | LIST+33~ |
| DRG | LIST+33~ |
| DT | LIST+20, LIST+21, LIST+22, LIST+23, LIST+24 |
| GP | LIST+33~ |
| IB | LIST+2~, LIST+22*, LIST+24, LIST+36, LIST+41 |
| IDX | NODE~, NODE+1 |
| IE | LIST+2~, LIST+23*, LIST+24*, LIST+36 |
| IEN | LIST+33~, LIST+74~*, LIST+76, CLASS+17~*, CLASS+18, CLASS+23~*, CLASS+24, CLASS+31~*, CLASS+32*, CLASS+33 , CLASS+34, CLASS+41~*, CLASS+42, MEDCLASS~, MEDCLASS+1*, MEDCLASS+3, MEDCLASS+4*, MEDCLASS+6 |
| IND | ADDMED+1~, ADDMED+21*, ADDMED+33, ADDMED+55 |
| IND(0 | ADDMED+30*, ADDMED+33*, ADDMED+39, ADDMED+55 |
| INDEX | LIST+37~, LIST+38*, LIST+39, LIST+41, LIST+42, LIST+43, LIST+44, LIST+45, LIST+46, LIST+53 , LIST+66, LIST+68, LIST+76, LIST+78, OUTPUT+35~*, OUTPUT+38, ADDMED~, ADDMED+1, ADDMED+2, ADDMED+6 , ADDMED+7, ADDMED+8, ADDMED+11, ADDMED+12, ADDMED+13, ADDMED+14, ADDMED+15, ADDMED+17, ADDMED+18, ADDMED+21 , ADDMED+26, ADDMED+41, ADDMED+46, ADDMED+47, ADDMED+48, ADDMED+50, ADDMED+51 |
| L | SETSTR~, SETSTR+1 |
| LN | OUTPUT+11~, OUTPUT+17*, OUTPUT+18*, OUTPUT+22*, OUTPUT+23*, OUTPUT+24*, OUTPUT+26 |
| LOC | LIST+33~ |
| LSTDS | LIST+33~ |
| LSTFD | LIST+33~ |
| LSTRD | LIST+33~ |
| M | LIST~, LIST+12* |
| MED | LIST+39~, LIST+61, LIST+66, CLASS~ |
| MED("CLASS" | LIST+63, LIST+65, LIST+72, LIST+78, CLASS+1*, CLASS+2*, CLASS+36*, CLASS+42* |
| MED("CLINIC" | LIST+45*, LIST+49, LIST+57, LIST+59 |
| MED("DEA" | LIST+65, CLASS+1*, CLASS+2*, CLASS+36*, CLASS+42* |
| MED("FILE" | LIST+46*, LIST+47, LIST+49, LIST+53, LIST+59, CLASS+4, CLASS+9, CLASS+14, CLASS+20, CLASS+27 |
| MED("IEN" | CLASS+2*, CLASS+6*, CLASS+11*, CLASS+18*, CLASS+24*, CLASS+25*, CLASS+34*, CLASS+36, CLASS+38 |
| MED("NAME" | LIST+39*, CLASS+1 |
| MED("ORDER #" | , LIST+44*, LIST+46, CLASS+5, CLASS+6, CLASS+7, CLASS+10, CLASS+11, CLASS+12, CLASS+15 , CLASS+16, CLASS+17, CLASS+18, CLASS+21, CLASS+22, CLASS+23, CLASS+24, CLASS+25, CLASS+28, CLASS+29 , CLASS+30, CLASS+31, CLASS+32 |
| MED("ORIDX" | CLASS+2*, CLASS+7*, CLASS+12*, CLASS+15*, CLASS+25*, CLASS+29*, CLASS+38, CLASS+40 |
| MED("SORT" | LIST+49*, LIST+51*, LIST+72, LIST+78 |
| MED("STATUS" | LIST+43*, LIST+51, LIST+55, LIST+70 |
| MED("TYPE" | LIST+47*, LIST+49, LIST+57, LIST+59 |
| MEDS | LIST+37~, EX, EX+1, EX+2, OUTPUT~ |
| MEDS( | LIST+78*, OUTPUT+10, OUTPUT+28, OUTPUT+33, OUTPUT+35, OUTPUT+39, OUTPUT+40, OUTPUT+41 |
| MR | LIST~, LIST+16* |
| NAME | MEDCLASS~, MEDCLASS+1*, MEDCLASS+3 |
| ND2P5 | LIST+33~ |
| ND8 | LIST+33~ |
| NODE | NODE+1~* |
| NODES | NODE~, NODE+1 |
| O | LIST~, LIST+13* |
| OB | LIST+2~, LIST+20*, LIST+24, LIST+36, LIST+41 |
| OCL | LIST+37~*, LIST+68, EX+2, OUTPUT~, OUTPUT+38, ADDMED~, ADDMED+6, ADDMED+7, ADDMED+8, ADDMED+11 , ADDMED+12, ADDMED+13, ADDMED+14, ADDMED+15, ADDMED+18, NODE~ |
| OCL( | LIST+38, LIST+39, LIST+41, LIST+42*, LIST+43, LIST+44, LIST+45, LIST+46, LIST+53*, LIST+66* , LIST+76, LIST+78, ADDMED+1, ADDMED+2, ADDMED+6, ADDMED+8, ADDMED+11, ADDMED+14, ADDMED+17, ADDMED+21 , ADDMED+26, ADDMED+41, ADDMED+46, ADDMED+47, ADDMED+48, ADDMED+50, ADDMED+51, NODE+1 |
| OE | LIST+2~, LIST+21*, LIST+24*, LIST+36 |
| P | LIST+2~, LIST+68, EX, EX+2, OUTPUT~, OUTPUT+38, ADDMED~ |
| P( | LIST+17*, LIST+19* |
| P("A" | LIST+55 |
| P("AS" | LIST+26*, LIST+51, LIST+55, LIST+70 |
| P("D" | OUTPUT+3, OUTPUT+6, OUTPUT+15, OUTPUT+19, OUTPUT+31, OUTPUT+40, ADDMED+5, ADDMED+10, ADDMED+17, ADDMED+18 , ADDMED+23, ADDMED+28, ADDMED+33, ADDMED+45 |
| P("IB" | LIST+22* |
| P("IE" | LIST+23*, LIST+24* |
| P("INP" | LIST+29*, OUTPUT+12 |
| P("M" | LIST+57, LIST+59, OUTPUT+5, OUTPUT+16, OUTPUT+17, OUTPUT+22 |
| P("MR" | LIST+20, LIST+22 |
| P("O" | LIST+51, OUTPUT+5, OUTPUT+16, OUTPUT+17, OUTPUT+22 |
| P("OB" | LIST+20* |
| P("OE" | LIST+21*, LIST+24* |
| P("PS" | LIST+27*, LIST+51, LIST+55, LIST+70 |
| P("SC" | LIST+61, LIST+63, LIST+72, LIST+78, OUTPUT+5, OUTPUT+16, OUTPUT+17, OUTPUT+22, OUTPUT+30, OUTPUT+31 , OUTPUT+38, OUTPUT+39, OUTPUT+40 |
| P("SORT" | LIST+29*, LIST+49, LIST+57, ADDMED+28, ADDMED+46, ADDMED+47, ADDMED+50, ADDMED+51 |
| P("SU" | LIST+61, LIST+65 |
| P("UNK" | LIST+31*, LIST+63* |
| POP | LIST+34~ |
| PSGDT | LIST+34~ |
| PSJOI | LIST+34~ |
| PSJOINM | LIST+34~ |
| PSJST | LIST+34~ |
| PSJST2 | LIST+34~ |
| PSJSTP | LIST+34~ |
| PSSTMP2 | LIST+34~ |
| REP | ADDMED+1~, ADDMED+6, ADDMED+7, ADDMED+8, ADDMED+12, ADDMED+13, ADDMED+15, ADDMED+18 |
| REP("^^" | ADDMED+2* |
| RNWDT | LIST+34~ |
| S | SETSTR~, SETSTR+1 |
| SC | LIST~, LIST+14* |
| SG | LIST+34~ |
| SORT | OUTPUT+1~*, OUTPUT+10*, OUTPUT+11, OUTPUT+12, OUTPUT+28, OUTPUT+33, OUTPUT+35, OUTPUT+36, OUTPUT+38, OUTPUT+39 , OUTPUT+40, OUTPUT+41, ADDMED+26~*, ADDMED+28, ADDMED+46, ADDMED+47, ADDMED+50, ADDMED+51 |
| STATUS | OUTPUT+11~*, OUTPUT+17, OUTPUT+22 |
| SU | LIST~, LIST+15* |
| SUBS | LIST+72~*, LIST+73, LIST+74, LIST+76 |
| TARGET | LIST~, LIST+2*, LIST+4*, LIST+6, LIST+7, LIST+68, EX, EX+1, EX+2, EX+4 , OUTPUT~, OUTPUT+20, OUTPUT+21, OUTPUT+26, OUTPUT+31, OUTPUT+38, OUTPUT+39, OUTPUT+40, OUTPUT+41, OUTPUT+42 , OUTPUT+43, ADDMED~, ADDMED+53, ADDMED+56, ADD~, ADD+1 |
| TEMP | ADDMED+1~, ADDMED+18~*, ADDMED+23, ADDMED+33*, ADDMED+34, ADDMED+55* |
| TEMP( | ADDMED+24*, ADDMED+34*, ADDMED+35 |
| TEMP("" | ADDMED+24 |
| TIUDATE | LIST+19*, LIST+20, LIST+21, LIST+22, LIST+23, EX+3! |
| TIUFT | ADDMED+1~, ADDMED+23!*, ADDMED+26, ADDMED+28*, ADDMED+34!, ADDMED+55! |
| TIUFT( | ADDMED+24!, ADDMED+28*, ADDMED+30, ADDMED+33, ADDMED+34!, ADDMED+35*, ADDMED+39, ADDMED+56 |
| TIUFT(2 | ADDMED+43* |
| TYPE | OUTPUT+12~*, OUTPUT+17, OUTPUT+20, OUTPUT+22, OUTPUT+23, ADDMED+1~, ADDMED+2*, ADDMED+4, ADDMED+9, ADDMED+16 |
| U | LIST+2, LIST+20, LIST+21, LIST+22, LIST+23, LIST+39, LIST+41, LIST+42, LIST+43, LIST+46 , LIST+53, LIST+76, LIST+78, CLASS+1, CLASS+15, CLASS+16, CLASS+18, CLASS+36, CLASS+42, MEDCLASS+6 , ADDMED+1, ADDMED+6, ADDMED+7, ADDMED+8, ADDMED+11, ADDMED+12, ADDMED+13, ADDMED+14, ADDMED+15, ADDMED+17 , ADDMED+18, ADDMED+41, ADDMED+46, ADDMED+47, ADDMED+48, ADDMED+50, ADDMED+51, NODE+1 |
| UL | OUTPUT+1~*, OUTPUT+26, OUTPUT+31, OUTPUT+40 |
| V | SETSTR~, SETSTR+1 |
| VIEW | LIST+2~, LIST+36* |
| X | LIST+2~, LIST+4*, LIST+9*, LIST+10, LIST+11, LIST+12, LIST+13, LIST+14, LIST+15, LIST+16 , LIST+17!, LIST+19*!, OUTPUT+31~*, ADDMED+1~, ADDMED+23*, ADDMED+24~*, ADDMED+30*, ADDMED+31, ADDMED+33, ADDMED+34 , ADDMED+35, ADDMED+39, ADDMED+41, ADDMED+46~*, ADDMED+47~*, ADDMED+48*, ADDMED+50~*, ADDMED+51~*, ADDMED+56*, NODE+1~* , SETSTR~, SETSTR+1, UP~ |
| X3 | LIST+34~, CLASS+28~ |
| X4 | LIST+34~ |
| XSTR | LIST+68~*, LIST+72, LIST+78, OUTPUT+1~, OUTPUT+33*, OUTPUT+35, ADDMED~, ADDMED+5, ADDMED+10, ADDMED+20 , ADDMED+23 |
| Y | ADDMED+1~, ADDMED+23*, ADDMED+24*, ADDMED+34*, ADDMED+35*, ADDMED+41~*, ADDMED+42, ADDMED+43, NODE+1~* |