PSOERXU2 ;ALB/BWF - eRx utilities ; 5/26/2017 9:57am
Source file <PSOERXU2.m>
| Package | Total | Call Graph |
|---|---|---|
| Outpatient Pharmacy | 9 | REF^PSOERSE1 $$PRESOLV^PSOERXA1 TXT2ARY^PSOERXD1 UPDSTAT^PSOERXU1 $$RESOLV^PSOERXU2 $$FINDNRX^PSOERXU6 DIRE^PSOERXX1 (ALLERGY,REMOTE)^PSOORUT2 ^PSOORUT3 |
| VA FileMan | 5 | $$FIND1^DIC FIELD^DID (FILE,UPDATE)^DIE ($$GET1,GETS)^DIQ ^DIR |
| Kernel | 2 | $$NOW^XLFDT $$UP^XLFSTR |
| List Manager | 2 | FULL^VALM1 (CNTRL,SET)^VALM10 |
| Adverse Reaction Tracking | 1 | EN1^GMRADPT |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| FINDPAT(NAME,IDOB,IGEN,SSN,AL1) | ;
|
|
| FINDPRE(NAME,NPI,DEA) | ; Try to find an existing prescriber record in #52.48
; Input: NAME - Prescriber Name ; NPI - Prescriber NPI Number ; DEA - Prescriber DEA Number |
|
| ERR(ERXIEN,MTYPE) | ;
|
|
| GETSTAT(MTYPE,RTHID,RTMID) | ;
|
|
| ADDCOMM(ERXIEN) | ;
|
|
| RESOLV(IEN) | ;
|
|
| GETREQ(IEN) | ;
|
|
| GETRESP(IEN) | ;
|
|
| MSGHIST(RES,IEN) | ;
|
|
| RRDELTA(DELTAS,REFREQ,REFRES) | ;
|
|
| CANREQ(ERXIEN,LINE,PMODE) | ;
|
|
| ALG(LINE) | ;
|
|
| RELATED(ERXIEN) | ; Finds the Related eRx based on the Prescriber Order #
; Input: ERXIEN - Pointer the ERX HOLDING QUEUE (#52.49) |
| Name | Field # of Occurrence |
|---|---|
| $$FIND1^DIC | RESOLV+4, GETREQ+3, GETRESP+3 |
| FIELD^DID | RRDELTA+11, RRDELTA+31 |
| FILE^DIE | ERR+7, ADDCOMM+12 |
| UPDATE^DIE | ERR+14, GETSTAT+11 |
| $$GET1^DIQ | FINDPAT+6, FINDPAT+7, FINDPRE+11, FINDPRE+21, FINDPRE+26, ERR+15, ERR+18, GETSTAT+9, GETSTAT+14, GETSTAT+17 , GETSTAT+18, ADDCOMM+5, ADDCOMM+7, RESOLV+2, GETREQ+2, GETRESP+2, MSGHIST+4, RRDELTA+8, RRDELTA+9, RRDELTA+17 , RRDELTA+21, CANREQ+5, CANREQ+7, CANREQ+8, CANREQ+9, CANREQ+11, CANREQ+12, CANREQ+13, CANREQ+14, CANREQ+25 , CANREQ+33, CANREQ+34, ALG+3, RELATED+5, RELATED+6, RELATED+7, RELATED+8, RELATED+12, RELATED+13 |
| GETS^DIQ | RRDELTA+18, RRDELTA+22 |
| ^DIR | ADDCOMM+6, ADDCOMM+7 |
| EN1^GMRADPT | ALG+4 |
| REF^PSOERSE1 | ADDCOMM+13 |
| $$PRESOLV^PSOERXA1 | ERR+12, GETSTAT+3, GETSTAT+4, GETSTAT+5, GETSTAT+7, GETSTAT+11, GETSTAT+12, GETSTAT+23 |
| TXT2ARY^PSOERXD1 | CANREQ+27 |
| UPDSTAT^PSOERXU1 | ERR+19, ERR+20, ERR+21, ERR+22, GETSTAT+10, GETSTAT+15, GETSTAT+18 |
| $$RESOLV^PSOERXU2 | CANREQ+5 |
| $$FINDNRX^PSOERXU6 | CANREQ+6 |
| DIRE^PSOERXX1 | ADDCOMM+4 |
| ALLERGY^PSOORUT2 | ALG+8 |
| REMOTE^PSOORUT2 | ALG+10 |
| ^PSOORUT3 | ALG+12 |
| FULL^VALM1 | ADDCOMM+2 |
| CNTRL^VALM10 | CANREQ+17, CANREQ+18, CANREQ+19, CANREQ+20, CANREQ+21, CANREQ+22, CANREQ+23, CANREQ+31, CANREQ+32, CANREQ+35 , CANREQ+36 |
| SET^VALM10 | CANREQ+15, CANREQ+16, CANREQ+17, CANREQ+18, CANREQ+19, CANREQ+20, CANREQ+21, CANREQ+22, CANREQ+23, CANREQ+24 , CANREQ+30, CANREQ+35, CANREQ+36, CANREQ+37, ALG+17 |
| $$NOW^XLFDT | ADDCOMM+11 |
| $$UP^XLFSTR | FINDPRE+7 |
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Routine Call |
|
| Routine Call |
|
| Routine Call |
|
| Routine Call |
|
| FileNo | Call Tags |
|---|---|
| ^PS(52.45 - [#52.45] | GET1^DIQ |
| ^PS(52.46 - [#52.46] | GET1^DIQ |
| ^PS(52.48 - [#52.48] | GET1^DIQ |
| ^PS(52.49 - [#52.49] | FIELD^DID, FIND1^DIC, GET1^DIQ |
| 52.49201 | GET1^DIQ |
| 52.4949 | FIELD^DID, GET1^DIQ, GETS^DIQ |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^PS(52.45 - [#52.45] | GETSTAT+22 |
| ^PS(52.46 - [#52.46] | FINDPAT+3, FINDPAT+5 |
| ^PS(52.48 - [#52.48] | FINDPRE+10, FINDPRE+11, FINDPRE+15, FINDPRE+16, FINDPRE+20, FINDPRE+25, FINDPRE+29 |
| ^PS(52.49 - [#52.49] | ERR+13, MSGHIST+3, RRDELTA+15, RRDELTA+19, RELATED+10, RELATED+11 |
| ^TMP("PSOPI" | ALG+7*, ALG+8*, ALG+9*, ALG+11*, ALG+14, ALG+15, ALG+18! |
| ^TMP($J | ERR+2 |
| ^XUSEC("PSO ERX VIEW" | ADDCOMM+4 |
| Name | Line Occurrences |
|---|---|
| $$RELATED | RESOLV+5 |
| $$RESOLV | ERR+16 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| AL1 | FINDPAT~, FINDPAT+10 |
| ALGINFO | ALG+1~ |
| ALGLINE | ALG+1~, ALG+2* |
| CANSTAT | CANREQ+1~, CANREQ+13*, CANREQ+14*, CANREQ+19 |
| COMM | CANREQ+1~, CANREQ+11*, CANREQ+25*, CANREQ+26*, CANREQ+27 |
| COMMARY | CANREQ+1~, CANREQ+27 |
| COMMARY( | CANREQ+28, CANREQ+29 |
| COMMBY | CANREQ+1~, CANREQ+33*, CANREQ+35 |
| COMMDTTM | CANREQ+1~, CANREQ+34*, CANREQ+36 |
| CTXT | CANREQ+1~, CANREQ+29*, CANREQ+30, CANREQ+31, CANREQ+32 |
| DA | ADDCOMM+1~, ADDCOMM+7! |
| DEA | FINDPRE~, FINDPRE+7*, FINDPRE+9, FINDPRE+11, FINDPRE+14, FINDPRE+16, FINDPRE+19, FINDPRE+24, FINDPRE+26 |
| DELTAS | RRDELTA~ |
| DELTAS( | RRDELTA+13*, RRDELTA+33* |
| DESCODE | ERR+1~, ERR+11*, ERR+12*, ERR+13, ERR+14 |
| DFN | ALG+1~, ALG+3* |
| DIR | ADDCOMM+1~, ADDCOMM+6! |
| DIR("B" | ADDCOMM+7* |
| DIR(0 | ADDCOMM+6*, ADDCOMM+7* |
| DNB | CANREQ+1~, CANREQ+6*, CANREQ+23 |
| DONE | ERR+1~, ERR+8*, ERR+9, ERR+10*, RRDELTA+1~, RRDELTA+5*, RRDELTA+6, RRDELTA+7*, RRDELTA+23*, RRDELTA+24 , RRDELTA+25* |
| DUZ | ADDCOMM+4, ADDCOMM+10 |
| ECODE | ERR+1~, ERR+3*, ERR+5 |
| ERRTEXT | ERR+1~, ERR+4*, ERR+6 |
| ERX | RELATED+4~, RELATED+9*, RELATED+11*, RELATED+12, RELATED+13 |
| ERXIEN | ERR~, ERR+5, ERR+6, ERR+13, ERR+14, ERR+15, ERR+16, ERR+19, ERR+20, ERR+21 , ERR+22, ADDCOMM~, ADDCOMM+5, ADDCOMM+7, ADDCOMM+9, ADDCOMM+10, ADDCOMM+11, CANREQ~, CANREQ+4, CANREQ+5 , RELATED~, RELATED+5, RELATED+6, RELATED+7, RELATED+8 |
| ERXPAT | RELATED+4~, RELATED+8*, RELATED+10, RELATED+11 |
| ERXTYP | ERR+1~, ERR+15* |
| ESTAT | GETSTAT+1~, GETSTAT+5*, GETSTAT+7*, GETSTAT+19, GETSTAT+20*, GETSTAT+21, GETSTAT+22, GETSTAT+23 |
| FDA | ERR+7!, ERR+14!, ADDCOMM+1~ |
| FDA( | ERR+5*, ERR+6*, ERR+14*, ADDCOMM+9*, ADDCOMM+10*, ADDCOMM+11* |
| FIELD | RRDELTA+2~ |
| FIELD("LABEL" | RRDELTA+12 |
| FLD | RRDELTA+2~, RRDELTA+7*, RRDELTA+8, RRDELTA+9, RRDELTA+11 |
| FLDNM | RRDELTA+1~, RRDELTA+12*, RRDELTA+13 |
| FLDS | RRDELTA+1~, RRDELTA+4*, RRDELTA+7 |
| FOUND | FINDPRE+5~, FINDPRE+10*, FINDPRE+11*, FINDPRE+15*, FINDPRE+16*, FINDPRE+20*, FINDPRE+21*, FINDPRE+25*, FINDPRE+26*, RRDELTA+1~ , RRDELTA+15*, RRDELTA+17*, RRDELTA+19*, RRDELTA+21* |
| GL | ERR+1~, ERR+2*, ERR+3, ERR+4, ERR+10, ERR+11 |
| GMRAL | ALG+1~, ALG+6, ALG+7, ALG+8, ALG+12 |
| HUBID | CANREQ+1~, CANREQ+7* |
| I | ERR+1~, ERR+9*, ERR+10, ERR+11, RRDELTA+1~, RRDELTA+6*, RRDELTA+7, RRDELTA+24*, RRDELTA+25, CANREQ+1~ , CANREQ+28*, CANREQ+29, CANREQ+31 |
| IDOB | FINDPAT~, FINDPAT+10 |
| IEN | RESOLV~, RESOLV+2, RESOLV+5, GETREQ~, GETREQ+2, GETRESP~, GETRESP+2, MSGHIST~, MSGHIST+3, MSGHIST+4 , ALG+1~, ALG+5*, ALG+7*, ALG+8, ALG+9*, ALG+11* |
| IGEN | FINDPAT~, FINDPAT+10 |
| >> IOINHI | CANREQ+17, CANREQ+19, CANREQ+20, CANREQ+21, CANREQ+22, CANREQ+23, CANREQ+31, CANREQ+32, CANREQ+35, CANREQ+36 |
| >> IOINORM | CANREQ+17, CANREQ+19, CANREQ+20, CANREQ+21, CANREQ+22, CANREQ+23, CANREQ+31, CANREQ+32, CANREQ+35, CANREQ+36 |
| >> IORVOFF | CANREQ+18 |
| >> IORVON | CANREQ+18 |
| >> IOUOFF | CANREQ+17 |
| >> IOUON | CANREQ+17 |
| LDAT | ALG+1~, ALG+15*, ALG+17 |
| LINE | CANREQ~, CANREQ+15*, CANREQ+16*, CANREQ+17, CANREQ+18*, CANREQ+19*, CANREQ+20*, CANREQ+21*, CANREQ+22*, CANREQ+23* , CANREQ+24*, CANREQ+30*, CANREQ+31, CANREQ+32, CANREQ+35*, CANREQ+36*, CANREQ+37*, ALG~, ALG+16*, ALG+17 |
| MATCH | FINDPAT+1~ |
| MATCH( | FINDPAT+10* |
| MATCH("" | FINDPAT+11 |
| MID | GETRESP+1~, GETRESP+2*, GETRESP+3 |
| MPAT | FINDPAT+1~, FINDPAT+11*, FINDPAT+12 |
| MSGDT | RELATED+4~, RELATED+9*, RELATED+10*, RELATED+11 |
| MTCHCNT | FINDPAT+1~, FINDPAT+4*, FINDPAT+10* |
| MTYPE | ERR~, ERR+2, GETSTAT~, GETSTAT+3, GETSTAT+4, GETSTAT+5, GETSTAT+7, GETSTAT+8, GETSTAT+13, GETSTAT+16 , GETSTAT+20, ADDCOMM+1~, ADDCOMM+5*, ADDCOMM+6 |
| NAME | FINDPAT~, FINDPAT+3, FINDPAT+5, FINDPRE~, FINDPRE+7*, FINDPRE+9, FINDPRE+11, FINDPRE+19, FINDPRE+21, FINDPRE+24 , FINDPRE+26, FINDPRE+29 |
| NPI | FINDPRE~, FINDPRE+7*, FINDPRE+9, FINDPRE+10, FINDPRE+14, FINDPRE+15, FINDPRE+19, FINDPRE+20, FINDPRE+24, FINDPRE+25 |
| NWRXIEN | ERR+1~ |
| PAL1 | FINDPAT+1~, FINDPAT+7*, FINDPAT+10 |
| PDOB | FINDPAT+1~, FINDPAT+6*, FINDPAT+10 |
| PGEN | FINDPAT+1~, FINDPAT+6*, FINDPAT+10 |
| PIEN | FINDPAT+1~, FINDPAT+5*, FINDPAT+6, FINDPAT+7, FINDPAT+10 |
| PMODE | CANREQ~ |
| PREMTCH | FINDPRE+5~, FINDPRE+9, FINDPRE+10*, FINDPRE+11, FINDPRE+14, FINDPRE+15*, FINDPRE+16, FINDPRE+19, FINDPRE+20*, FINDPRE+21 , FINDPRE+24, FINDPRE+25*, FINDPRE+26 |
| PREORDER | RELATED+4~, RELATED+7*, RELATED+13 |
| >> PSOIEN | ALG+3 |
| PSONOAL | ALG+1~, ALG+8*! |
| PSSN | FINDPAT+1~, FINDPAT+7*, FINDPAT+9 |
| REFREQ | RRDELTA~, RRDELTA+8, RRDELTA+15, RRDELTA+16 |
| REFRES | RRDELTA~, RRDELTA+9, RRDELTA+19, RRDELTA+20 |
| RELATED | RELATED+4~, RELATED+9*, RELATED+10, RELATED+11, RELATED+13*, RELATED+14 |
| RELIEN | MSGHIST+1~, MSGHIST+4*, MSGHIST+5 |
| REQARY | RRDELTA+1~ |
| REQBY | CANREQ+1~, CANREQ+8*, CANREQ+21 |
| REQDAT | RRDELTA+2~ |
| REQDAT( | RRDELTA+27 |
| REQDTTM | CANREQ+1~, CANREQ+9*, CANREQ+22 |
| REQIEN | ERR+1~, ERR+16*, ERR+17, ERR+18, ERR+20, ERR+21, CANREQ+1~, CANREQ+4*, CANREQ+5*, CANREQ+6 , CANREQ+7, CANREQ+8, CANREQ+9, CANREQ+11, CANREQ+12, CANREQ+13, CANREQ+25, CANREQ+33, CANREQ+34 |
| REQIENS | RRDELTA+1~, RRDELTA+16*, RRDELTA+17, RRDELTA+18, RRDELTA+27 |
| REQSIEN | RRDELTA+1~, RRDELTA+15*, RRDELTA+16 |
| REQTYP | ERR+1~, ERR+18*, ERR+19, ERR+20, ERR+21, RRDELTA+1~, RRDELTA+17* |
| REQVAL | RRDELTA+2~, RRDELTA+8*, RRDELTA+10, RRDELTA+13 |
| RES | RESOLV+1~, GETREQ+4, GETRESP+4, MSGHIST~ |
| RES( | MSGHIST+5* |
| RESARY | RRDELTA+1~ |
| RESDAT | RRDELTA+2~ |
| RESDAT( | RRDELTA+28 |
| RESIENS | RRDELTA+1~, RRDELTA+20*, RRDELTA+21, RRDELTA+22, RRDELTA+28 |
| RESSIEN | RRDELTA+2~, RRDELTA+19*, RRDELTA+20 |
| RESTAT | GETSTAT+1~, GETSTAT+11*, GETSTAT+12* |
| RESTYP | RRDELTA+1~, RRDELTA+21* |
| RESTYPE | CANREQ+1~, CANREQ+12*, CANREQ+18, CANREQ+20 |
| RESVAL | RRDELTA+2~, RRDELTA+9*, RRDELTA+10, RRDELTA+13 |
| RTHID | GETSTAT~, GETSTAT+5, GETSTAT+6, RESOLV+1~, RESOLV+2*, RESOLV+3, RESOLV+4 |
| RTHIEN | RESOLV+1~, RESOLV+4*, RESOLV+5*, RESOLV+6, RESOLV+7, GETREQ+1~, GETREQ+3*, GETREQ+4, GETREQ+5, GETRESP+1~ , GETRESP+3*, GETRESP+4, GETRESP+5 |
| RTMID | GETSTAT~, GETSTAT+5, GETREQ+1~, GETREQ+2*, GETREQ+3 |
| RTMIEN | GETSTAT+1~, GETSTAT+6*, GETSTAT+7, GETSTAT+8, GETSTAT+9, GETSTAT+10, GETSTAT+11, GETSTAT+13, GETSTAT+14, GETSTAT+15 , GETSTAT+16, GETSTAT+17, GETSTAT+18 |
| RTMTYPE | GETSTAT+1~, GETSTAT+9*, GETSTAT+10, GETSTAT+11, GETSTAT+14*, GETSTAT+15, GETSTAT+17*, GETSTAT+18 |
| >> SDERXFLG | CANREQ+15, CANREQ+17, CANREQ+24, CANREQ+37 |
| SFIELD | RRDELTA+2~ |
| SFIELD("LABEL" | RRDELTA+32 |
| SFLD | RRDELTA+1~, RRDELTA+25*, RRDELTA+27, RRDELTA+28, RRDELTA+30, RRDELTA+31 |
| SFLDNM | RRDELTA+1~, RRDELTA+32*, RRDELTA+33 |
| SFLDS | RRDELTA+1~, RRDELTA+14*, RRDELTA+18, RRDELTA+22, RRDELTA+25 |
| SIEN | MSGHIST+1~, MSGHIST+2*, MSGHIST+3*, MSGHIST+4 |
| SREQVAL | RRDELTA+1~, RRDELTA+26*, RRDELTA+27*, RRDELTA+29, RRDELTA+33 |
| SRESVAL | RRDELTA+1~, RRDELTA+26*, RRDELTA+28*, RRDELTA+29, RRDELTA+30*, RRDELTA+33 |
| SSN | FINDPAT~, FINDPAT+9 |
| STFDA | GETSTAT+1~, GETSTAT+11! |
| STFDA( | GETSTAT+11* |
| U | RRDELTA+13, RRDELTA+33 |
| >> VALMBCK | ADDCOMM+3* |
| X | ALG+1~, ALG+14*, ALG+15 |
| Y | ADDCOMM+1~, ADDCOMM+8, ADDCOMM+9 |