ORAMX ;POR/RSF - ADDITIONAL ANTICOAGULATION CALLS ;11/10/14 10:28
Source file <ORAMX.m>
| Package | Total | Call Graph |
|---|---|---|
| VA FileMan | 4 | ^DIC $$EXTERNAL^DILFD EN1^DIP ^DIR |
| Kernel | 2 | ($$FMTE,$$NOW)^XLFDT ($$LOW,$$UP)^XLFSTR |
| Consult Request Tracking | 1 | RPCLIST^GMRCTIU |
| DRG Grouper | 1 | $$ICDDATA^ICDXCODE |
| Order Entry Results Reporting | 1 | ($$SELLOC,GET)^ORAMSET |
| PCE Patient Care Encounter | 1 | $$DATA2PCE^PXAPI |
| 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 |
|---|---|---|
| COMPRPT | ||
| COMP0(ORAMARR,ORAMSDT,ORAMEDT,ORAMINCM) | ; Print Report Format
|
|
| COMP1(ORAMARR,ORAMSDT,ORAMEDT,ORAMINCM,ORAMSORT) | ; Print Export Format
|
|
| CONSULT(RESULT,ORAMDFN,ORAMCNM) | ; Called from RPC=ORAMX CONSULT
|
|
| PCESET(RESULT,ORAMDFN,ORAMD1,ORAMSC44,ORAMEDT,ORAMSVC,ORAMNARR,ORAMPDX,ORAMSDX) | ; RPC to file PCE Data
; RPC = ORAMX PCESET ; ORAMDFN = Pt. ID ; ORAMD1 = Data string e.g., 1143~27898|300|99363|427.31|^SC~0^IR~0^EC~1^MST~0^HNC~1^SHAD~0 ; ORAMSC44 = Hosp Loc IEN ; ORAMEDT = Enc Dt/Tm ; ORAMSVC = Svc Cat (e.g., "A"mb or "T"elecomm) ; ORAMNARR = Prov Narr ; ORAMPDX = Auto Pri Indic ; ORAMSDX = Auto Sec Indic |
|
| READ(TYPE,PROMPT,DEFAULT,HELP,SCREEN) | ; Calls reader, returns response
|
|
| READX | ||
| NAME(X,FMT) | ; Call with X="LAST,FIRST MI", FMT=Return Format ("LAST, FI")
|
|
| NAMEX | ||
| PATIENT() | ; Select a patient
|
|
| VALIDORD(ORDA) | ; Screen Orderable for INR
|
|
| VOX | ||
| VALIDLAB(ORID) | ; Is lab test valid?
|
|
| VLX | ||
| TEAMLIST(ORLIST) | ; Team List Reports
|
|
| NEXTLAB | ; Next Lab Report
|
| Name | Field # of Occurrence |
|---|---|
| ^DIC | PATIENT+2 |
| $$EXTERNAL^DILFD | COMPRPT+35, COMPRPT+36 |
| EN1^DIP | TEAMLIST+15, NEXTLAB+19 |
| ^DIR | READ+7 |
| RPCLIST^GMRCTIU | CONSULT+4 |
| $$ICDDATA^ICDXCODE | PCESET+24, PCESET+33, PCESET+42, PCESET+52 |
| $$SELLOC^ORAMSET | TEAMLIST+4, NEXTLAB+4 |
| GET^ORAMSET | TEAMLIST+7 |
| $$DATA2PCE^PXAPI | PCESET+90 |
| $$FMTE^XLFDT | COMPRPT+12, COMPRPT+43, COMPRPT+51, COMPRPT+55, COMPRPT+63, CONSULT+13, NEXTLAB+16 |
| $$NOW^XLFDT | PCESET+14, PCESET+64 |
| $$LOW^XLFSTR | NAME+4 |
| $$UP^XLFSTR | NAME+9 |
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Routine Call |
|
| Routine Call |
|
| RPC Name | Call Tags |
|---|---|
| ORAMX CONSULT | CONSULT |
| ORAMX PCESET | PCESET |
| FileNo | Call Tags |
|---|---|
| ^OR(100.21 - [#100.21] | Classic Fileman Calls |
| ^ORAM(103 - [#103] | Classic Fileman Calls, EXTERNAL^DILFD |
| ^SC - [#44] | EXTERNAL^DILFD |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^DPT - [#2] | COMPRPT+40 |
| ^LAB(60 - [#60] | VALIDLAB+2, VALIDLAB+4 |
| ^OR(100.21 - [#100.21] | TEAMLIST+9, TEAMLIST+10 |
| ^ORAM(103 - [#103] | COMPRPT+22, COMPRPT+24, COMPRPT+26, COMPRPT+27, COMPRPT+28, COMPRPT+32, COMPRPT+43, COMPRPT+45, COMPRPT+47, COMPRPT+48 , COMPRPT+52, COMPRPT+55, COMPRPT+57, COMPRPT+59, COMPRPT+60, COMPRPT+63 |
| ^ORD(100.98 - [#100.98] | VALIDORD+6 |
| ^ORD(101.43 - [#101.43] | VALIDORD+3, VALIDORD+5, VALIDORD+8 |
| ^SC - [#44] | COMPRPT+34, NEXTLAB+7 |
| ^TMP("ORAMPCE" | PCESET+26*, PCESET+27*, PCESET+28*, PCESET+35*, PCESET+36*, PCESET+37*, PCESET+44*, PCESET+45*, PCESET+46*, PCESET+55* , PCESET+56*, PCESET+57*, PCESET+58*, PCESET+59*, PCESET+60*, PCESET+61*, PCESET+62*, PCESET+63*, PCESET+64*, PCESET+65* , PCESET+66*, PCESET+67*, PCESET+68*, PCESET+69*, PCESET+70*, PCESET+71*, PCESET+72*, PCESET+75*, PCESET+76*, PCESET+78* , PCESET+79*, PCESET+80*, PCESET+81*, PCESET+82*, PCESET+83*, PCESET+84*, PCESET+85*, PCESET+89* |
| Name | Field # of Occurrence |
|---|---|
| ^(0 | COMPRPT+40 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| BY | TEAMLIST+1~, TEAMLIST+2*, NEXTLAB+1~, NEXTLAB+2* |
| DEFAULT | READ~, READ+5 |
| DHD | TEAMLIST+1~, TEAMLIST+11*, NEXTLAB+1~, NEXTLAB+17* |
| DIC | PATIENT+1~, PATIENT+2*, TEAMLIST+1~, TEAMLIST+2*, NEXTLAB+1~, NEXTLAB+2* |
| DIC(0 | PATIENT+2* |
| DIR | READ+1~ |
| DIR("?" | READ+6* |
| DIR("A" | READ+4* |
| DIR("B" | READ+5* |
| DIR("S" | READ+3* |
| DIR(0 | READ+2* |
| DIRUT | COMPRPT+1~, COMPRPT+4, COMPRPT+14, COMPRPT+17, COMPRPT+20, NEXTLAB+8 |
| DUZ | PCESET+90 |
| ERRARR | PCESET+17~, PCESET+90 |
| ERRPROB | PCESET+17~, PCESET+90 |
| FLDS | TEAMLIST+1~, TEAMLIST+2*, NEXTLAB+1~, NEXTLAB+2* |
| FMT | NAME~, NAME+2*, NAME+3*, NAME+4*, NAME+9*, NAMEX |
| FR | TEAMLIST+1~, TEAMLIST+11*, TEAMLIST+12, NEXTLAB+1~, NEXTLAB+18* |
| HELP | READ~, READ+6 |
| I | PCESET+86~, PCESET+87*, PCESET+88 |
| IOF | COMP0+2, COMP1+2 |
| L | TEAMLIST+1~, TEAMLIST+2*, NEXTLAB+1~, NEXTLAB+2* |
| OCDATE | COMP0+12~*, COMP0+13*, COMP0+15, COMP0+16, COMP0+22~*, COMP0+23*, COMP0+25, COMP0+26, COMP1+8~*, COMP1+9 , COMP1+12~*, COMP1+13 |
| OCLINIC | COMP0+1~, COMP0+4*, COMP0+5*, COMP0+6, COMP0+7, COMP0+9, COMP0+11, COMP0+13, COMP0+15, COMP0+16 , COMP0+17, COMP0+19, COMP0+21, COMP0+23, COMP0+25, COMP0+26, COMP1+1~, COMP1+5*, COMP1+6, COMP1+7 , COMP1+8, COMP1+9, COMP1+10, COMP1+11, COMP1+12, COMP1+13 |
| OCNT | COMP0+14~*, COMP0+15*, COMP0+16, COMP0+24~*, COMP0+25*, COMP0+26 |
| ODFN | COMP0+8~, COMP0+11*, COMP0+13, COMP0+15, COMP0+16, COMP0+18~, COMP0+21*, COMP0+23, COMP0+25, COMP0+26 , COMP1+7~*, COMP1+8, COMP1+9, COMP1+11~*, COMP1+12, COMP1+13 |
| ORAFMT | COMPRPT+1~, COMPRPT+13*, COMPRPT+15 |
| ORALIST | TEAMLIST+1~, TEAMLIST+8*, TEAMLIST+9*, TEAMLIST+11 |
| ORAMARR | COMPRPT+1~, COMPRPT+64, COMPRPT+65, COMP0~, COMP0+3, COMP1~, COMP1+3 |
| ORAMARR( | COMPRPT+39*, COMPRPT+42*, COMPRPT+43*, COMPRPT+50*, COMPRPT+51*, COMPRPT+52*, COMPRPT+54*, COMPRPT+55*, COMPRPT+62*, COMPRPT+63* , COMP0+5, COMP0+6, COMP0+7, COMP0+9, COMP0+11, COMP0+13, COMP0+15, COMP0+16, COMP0+17, COMP0+19 , COMP0+21, COMP0+23, COMP0+25, COMP0+26, COMP1+5, COMP1+6, COMP1+7, COMP1+8, COMP1+9, COMP1+10 , COMP1+11, COMP1+12, COMP1+13 |
| ORAMC | CONSULT+7~*, CONSULT+8, CONSULT+10, CONSULT+13, CONSULT+14 |
| ORAMCLNM | COMPRPT+30~, COMPRPT+35*, COMPRPT+37*, COMPRPT+38 |
| ORAMCLNO | COMPRPT+30~, COMPRPT+32*, COMPRPT+33, COMPRPT+34, COMPRPT+35 |
| ORAMCLST | CONSULT+3~, CONSULT+4 |
| ORAMCLST( | CONSULT+7, CONSULT+8, CONSULT+10, CONSULT+13, CONSULT+14 |
| ORAMCLST(0 | CONSULT+3*, CONSULT+5, CONSULT+6 |
| ORAMCMPL | COMPRPT+46~, COMPRPT+48*, COMPRPT+49*, COMPRPT+50, COMPRPT+58~, COMPRPT+60*, COMPRPT+61*, COMPRPT+62 |
| ORAMCNM | CONSULT~, CONSULT+2, CONSULT+8 |
| ORAMCNT | COMPRPT+1~, COMPRPT+21*, PCESET+86~*, PCESET+87 |
| ORAMCP | COMPRPT+25~, COMPRPT+28*, COMPRPT+29, COMPRPT+31, COMPRPT+41, COMPRPT+51, COMPRPT+53 |
| ORAMCPT | PCESET+17~, PCESET+18*, PCESET+65 |
| ORAMCSTS | CONSULT+9~, CONSULT+10*, CONSULT+11 |
| ORAMD | CONSULT+13~*, CONSULT+14 |
| ORAMD1 | PCESET~, PCESET+13, PCESET+16, PCESET+18, PCESET+19 |
| ORAMDAY | PCESET+14~, PCESET+15* |
| ORAMDFN | COMPRPT+1~, COMPRPT+21*, COMPRPT+22*, COMPRPT+24, COMPRPT+26, COMPRPT+27, COMPRPT+28, COMPRPT+32, COMPRPT+40, COMPRPT+43 , COMPRPT+45, COMPRPT+47, COMPRPT+48, COMPRPT+50, COMPRPT+51, COMPRPT+52, COMPRPT+55, COMPRPT+57, COMPRPT+59, COMPRPT+60 , COMPRPT+62, COMPRPT+63, CONSULT~, CONSULT+1, CONSULT+4, PCESET~, PCESET+11, PCESET+61 |
| ORAMDIV | COMPRPT+30~, COMPRPT+36*, COMPRPT+37*, COMPRPT+38 |
| ORAMDIVN | COMPRPT+30~, COMPRPT+34*, COMPRPT+36 |
| ORAMDL | COMPRPT+1~, COMPRPT+15*, COMPRPT+64, COMPRPT+65 |
| ORAMDXC | PCESET+17~, PCESET+19*, PCESET+38, PCESET+39, PCESET+40, PCESET+48, PCESET+49, PCESET+50 |
| ORAMED | COMPRPT+1~, COMPRPT+2*, COMPRPT+4, COMPRPT+7*, COMPRPT+8, COMPRPT+9*, COMPRPT+10*, COMPRPT+11, COMPRPT+12, COMPRPT+27 |
| ORAMEDT | COMPRPT+1~, COMPRPT+12*, COMPRPT+64, COMPRPT+65, COMP0~, COMP0+2, COMP1~, COMP1+2, PCESET~, PCESET+15* , PCESET+24, PCESET+33, PCESET+42, PCESET+52, PCESET+59, PCESET+67 |
| ORAMFS | COMPRPT+23~*, COMPRPT+24*, COMPRPT+26, COMPRPT+27, COMPRPT+28, COMPRPT+43, COMPRPT+45, COMPRPT+47, COMPRPT+48, COMPRPT+50 , COMPRPT+51, COMPRPT+52, COMPRPT+55, COMPRPT+57, COMPRPT+59, COMPRPT+60, COMPRPT+62, COMPRPT+63 |
| ORAMFS0 | COMPRPT+46~, COMPRPT+47*, COMPRPT+50, COMPRPT+51, COMPRPT+52, COMPRPT+58~, COMPRPT+59*, COMPRPT+62, COMPRPT+63 |
| ORAMINCM | COMPRPT+1~, COMPRPT+2*, COMPRPT+19*, COMPRPT+31, COMPRPT+41, COMPRPT+64, COMPRPT+65, COMP0~, COMP0+2, COMP1~ , COMP1+2 |
| ORAMJ | COMPRPT+44~*, COMPRPT+45*, COMPRPT+48, COMPRPT+50, COMPRPT+56~*, COMPRPT+57*, COMPRPT+60, COMPRPT+62 |
| ORAMK | CONSULT+9~, CONSULT+10*, CONSULT+11*, CONSULT+12 |
| ORAMLOC | COMPRPT+30~, COMPRPT+38*, COMPRPT+39, COMPRPT+42, COMPRPT+43, COMPRPT+50, COMPRPT+51, COMPRPT+52, COMPRPT+54, COMPRPT+55 , COMPRPT+62, COMPRPT+63 |
| ORAMM | COMPRPT+1~, COMPRPT+30~, COMPRPT+40*, COMPRPT+43, COMPRPT+51, COMPRPT+55, COMPRPT+63 |
| ORAMNARR | PCESET~, PCESET+46, PCESET+57 |
| ORAMNOW | PCESET+14~*, PCESET+15 |
| ORAMPDX | PCESET~, PCESET+20, PCESET+22 |
| ORAMPDXC | PCESET+21~, PCESET+22*, PCESET+23*, PCESET+24 |
| ORAMPDXN | PCESET+17~, PCESET+24*, PCESET+25, PCESET+26, PCESET+54*, PCESET+66 |
| ORAMPDXT | PCESET+21~, PCESET+22*, PCESET+28 |
| ORAMPPR | PCESET+17~, PCESET+18*, PCESET+69, PCESET+71, PCESET+72 |
| ORAMQ | PCESET+17~, PCESET+18*, PCESET+86, PCESET+88 |
| ORAMSC | PCESET+17~, PCESET+18*, PCESET+58, PCESET+70 |
| ORAMSC44 | PCESET~, PCESET+12, PCESET+60 |
| ORAMSD | COMPRPT+1~, COMPRPT+2*, COMPRPT+4, COMPRPT+5*, COMPRPT+6, COMPRPT+10*, COMPRPT+11, COMPRPT+12, COMPRPT+26 |
| ORAMSDT | COMPRPT+1~, COMPRPT+12*, COMPRPT+64, COMPRPT+65, COMP0~, COMP0+2, COMP1~, COMP1+2 |
| ORAMSDX | PCESET~, PCESET+29, PCESET+31 |
| ORAMSDXC | PCESET+30~, PCESET+31*, PCESET+32*, PCESET+33 |
| ORAMSDXN | PCESET+30~, PCESET+33*, PCESET+34, PCESET+35 |
| ORAMSDXT | PCESET+30~, PCESET+31*, PCESET+37 |
| ORAMSORT | COMPRPT+1~, COMPRPT+16*, COMPRPT+18*, COMPRPT+38, COMPRPT+65, COMP1~, COMP1+4 |
| ORAMSPR | PCESET+17~, PCESET+18*, PCESET+74, PCESET+75 |
| ORAMSVC | PCESET~, PCESET+15*, PCESET+63 |
| ORAMT | COMPRPT+1~ |
| ORAMVST | PCESET+17~, PCESET+90 |
| ORCL | TEAMLIST+1~, TEAMLIST+4*, TEAMLIST+5, TEAMLIST+7, NEXTLAB+1~, NEXTLAB+4*, NEXTLAB+5, NEXTLAB+7*, NEXTLAB+17, NEXTLAB+18 |
| ORCLIST | TEAMLIST+1~, TEAMLIST+8*, TEAMLIST+10*, TEAMLIST+11 |
| ORDA | VALIDORD~, VALIDORD+3, VALIDORD+5, VALIDORD+8 |
| ORDGDA | VALIDORD+1~, VALIDORD+5*, VALIDORD+6 |
| ORDNM | VALIDORD+1~* |
| ORDX | PCESET+40~, PCESET+42*, PCESET+43, PCESET+44, PCESET+50~, PCESET+52*, PCESET+53, PCESET+54, PCESET+55 |
| ORDXC | PCESET+40~*, PCESET+41*, PCESET+42, PCESET+50~*, PCESET+51*, PCESET+52 |
| ORDXI | PCESET+17~, PCESET+39*, PCESET+40, PCESET+44, PCESET+45, PCESET+46, PCESET+49*, PCESET+50, PCESET+54, PCESET+55 , PCESET+56, PCESET+57 |
| ORDXINC | PCESET+21~, PCESET+22*, PCESET+31*, PCESET+44, PCESET+45, PCESET+46 |
| OREDT | NEXTLAB+1~, NEXTLAB+2*, NEXTLAB+8, NEXTLAB+9*, NEXTLAB+10, NEXTLAB+14*, NEXTLAB+15, NEXTLAB+16*, NEXTLAB+18 |
| ORFI | NAME+1~, NAME+6* |
| ORFIRST | NAME+1~, NAME+5*, NAME+6, NAME+7, NAME+8* |
| ORI | NAME+1~, NAME+9* |
| ORID | VALIDORD+1~, VALIDORD+8*, VALIDORD+9, VALIDLAB~, VALIDLAB+2, VALIDLAB+4 |
| ORLAST | NAME+1~, NAME+5* |
| ORLDT | NEXTLAB+1~, NEXTLAB+2*, NEXTLAB+8, NEXTLAB+11*, NEXTLAB+12, NEXTLAB+13*, NEXTLAB+14*, NEXTLAB+15, NEXTLAB+16*, NEXTLAB+18 |
| ORLI | NAME+1~, NAME+5* |
| ORLIST | TEAMLIST~, TEAMLIST+3, TEAMLIST+11, TEAMLIST+13 |
| ORMI | NAME+1~, NAME+7* |
| ORPAR | TEAMLIST+1~, TEAMLIST+7 |
| ORPAR(0 | TEAMLIST+8 |
| ORY | VALIDORD+1~*, VALIDORD+11*, VOX, VALIDLAB+1~*, VALIDLAB+6*, VLX |
| PROMPT | READ~, READ+4 |
| RESULT | CONSULT~, PCESET~, PCESET+11*, PCESET+12*, PCESET+13*, PCESET+15*, PCESET+90* |
| RESULT( | CONSULT+14* |
| RESULT(0 | CONSULT+1*, CONSULT+2* |
| SCREEN | READ~, READ+3 |
| T | PCESET+88~*, PCESET+89 |
| TO | TEAMLIST+1~, TEAMLIST+11*, NEXTLAB+1~, NEXTLAB+18* |
| TYPE | READ~, READ+2 |
| U | COMPRPT+15, COMPRPT+18, COMPRPT+26, COMPRPT+27, COMPRPT+28, COMPRPT+32, COMPRPT+34, COMPRPT+40, COMPRPT+43, COMPRPT+50 , COMPRPT+51, COMPRPT+52, COMPRPT+55, COMPRPT+62, COMPRPT+63, CONSULT+8, CONSULT+10, CONSULT+13, CONSULT+14, PCESET+20 , PCESET+22, PCESET+29, PCESET+31, PCESET+86, PCESET+88, READ+9, VALIDORD+5, VALIDORD+6, VALIDORD+8, VALIDLAB+4 , TEAMLIST+8, TEAMLIST+9, TEAMLIST+10, NEXTLAB+7 |
| X | READ+1~, READ+8, NAME~, NAME+2, NAME+5, PATIENT+1~ |
| Y | READ+1~, READ+8*, READ+9*, READX, PATIENT+1~, PATIENT+3 |
| Y(0 | READ+9 |