ORWDX1 ; SLC/KCM/REV - Utilities for Order Dialogs ;09/09/2008
Source file <ORWDX1.m>
| Package | Total | Call Graph | 
|---|---|---|
| Kernel | 3 | $$NOW^XLFDT $$UP^XLFSTR $$PATCH^XPDUTL | 
| Order Entry Results Reporting | 1 | $$STR^ORWDXR | 
| Pharmacy Data Management | 1 | $$STATUS^PSSORUTE | 
| Toolkit | 1 | ($$GET,GETLST)^XPAR | 
| VA Fileman | 1 | $$GET1^DIQ | 
| Package | Total | Caller Graph | 
|---|---|---|
| IHS Changes To Pharmacy | 1 | APSPESG2 | 
| Order Entry Results Reporting | 1 | ORWDX | 
| Name | Comments | DBIA/ICR reference | 
|---|---|---|
| WRLSTB(LST) | ||
| STCHANGE(ORY,DFN,ORYARR) | ; | |
| CHANGE(ORLST,ORCLST,DFN,ISIMO) | ; | |
| DCORIG(ORY,ORIEN) | ; | |
| DLGDEF(LST,DLG) | ; Format mapping for a dlg | |
| UNDCORIG(ORY,ORYARR) | ; | |
| PATWARD(ORY,DFN) | ; | |
| WRLST1 | ||
| ORDMATCH(ORY,DFN,ORYARR) | ; | |
| DELPI | ; delete PI from ORDIALOG if PI = "" | |
| ISPEND(ORIFN) | ;Is the order's status pending? | |
| DCREN(ORY,ORYARR) | ; | |
| WRLST(LST,LOC) | ; Return list of dialogs for writing orders ; .Y(n): DlgName^ListBox Text | |
| FNDINFO(Y,ODIEN) | ; | 
| RPC Name | Call Tags | 
|---|---|
| ORWDX CHANGE | CHANGE | 
| ORWDX1 PATWARD | PATWARD | 
| ORWDX1 STCHANGE | STCHANGE | 
| ORWDX1 DCREN | DCREN | 
| ORWDX1 DCORIG | DCORIG | 
| ORWDX1 UNDCORIG | UNDCORIG | 
| ORWDX1 ORDMATCH | ORDMATCH | 
| FileNo | Call Tags | 
|---|---|
| ^DIC(9.4 - [#9.4] | GET1^DIQ | 
| Name | Line Occurrences (* Changed, ! Killed) | 
|---|---|
| ^DIC(42 - [#42] | PATWARD+5 | 
| ^DPT - [#2] | CHANGE+44, PATWARD+3, PATWARD+4 | 
| ^OR(100 - [#100] | CHANGE+16, CHANGE+18, CHANGE+21, CHANGE+22*, CHANGE+25*, CHANGE+26, CHANGE+27*, CHANGE+30, CHANGE+32*, CHANGE+35 , CHANGE+37*, CHANGE+38*, CHANGE+39*, CHANGE+44*, ORDMATCH+7, ORDMATCH+10, DCREN+6, DCREN+11, DCREN+14, DCREN+17 , DCORIG+1*, UNDCORIG+2*, ISPEND+2, ISPEND+4 | 
| ^ORD(100.01 - [#100.01] | ORDMATCH+8, DCREN+8, DCREN+12, ISPEND+3 | 
| ^ORD(100.98 - [#100.98] | CHANGE+8, CHANGE+9, CHANGE+10, CHANGE+11, CHANGE+12 | 
| ^ORD(101.41 - [#101.41] | WRLST1+7, WRLSTB+3, WRLSTB+4, WRLSTB+5, WRLSTB+6, WRLSTB+7, DELPI+3, DELPI+11, DLGDEF+2, DLGDEF+3 , DLGDEF+5, DLGDEF+6, DLGDEF+9, DLGDEF+10, DLGDEF+11, DLGDEF+13, DLGDEF+15, DLGDEF+16, DLGDEF+17, CHANGE+5 , CHANGE+6, CHANGE+7, CHANGE+36 | 
| ^ORD(101.43 - [#101.43] | FNDINFO+3, FNDINFO+4, FNDINFO+5 | 
| ^SC - [#44] | CHANGE+21 | 
| ^VA(200 - [#200] | WRLST1+2 | 
| Name | Line Occurrences | 
|---|---|
| WRLSTB | WRLST1+3 | 
| Name | Field # of Occurrence | 
|---|---|
| ^(2 | DLGDEF+6 | 
| ^(5 | WRLST1+2, WRLST1+7 | 
| >> | Not killed explicitly | 
| * | Changed | 
| ! | Killed | 
| ~ | Newed | 
| Name | Field # of Occurrence | 
|---|---|
| ACT | DCREN+1~, DCREN+5*, DCREN+17*, DCREN+18 | 
| ACTION | ORDMATCH+1~, ORDMATCH+5, ORDMATCH+6*, ORDMATCH+10 | 
| ANENT | WRLST1~, WRLST1+2*, WRLST1+5, WRLSTB+2 | 
| CATCH | CHANGE+1~, CHANGE+30*, CHANGE+32, CHANGE+35 | 
| CHANGE | CHANGE+1~, CHANGE+14* | 
| CHILD | DLGDEF+14~*, DLGDEF+17*, DLGDEF+18 | 
| CIEN | CHANGE+2~, CHANGE+12* | 
| CNT | CHANGE+1~, CHANGE+13*, CHANGE+15, CHANGE+17, STCHANGE+1~, STCHANGE+4*, STCHANGE+5, ORDMATCH+1~, ORDMATCH+2*, ORDMATCH+3* , ORDMATCH+4, DCREN+1~, DCREN+3*, DCREN+4, UNDCORIG+1~, UNDCORIG+2* | 
| CNT1 | DCREN+1~, DCREN+2*, DCREN+18* | 
| CRTM | FNDINFO+1~, FNDINFO+2*, FNDINFO+6 | 
| DA | DLGDEF+14~, DLGDEF+16*, DLGDEF+17 | 
| DFN | CHANGE~, CHANGE+44, STCHANGE~, STCHANGE+7, ORDMATCH~, PATWARD~, PATWARD+3, PATWARD+4 | 
| DGRP | WRLST1+4~, WRLST1+8*, WRLST1+11, WRLSTB+1~, WRLSTB+7*, WRLSTB+10 | 
| DIAL | CHANGE+2~, CHANGE+19*, CHANGE+32, CHANGE+36, CHANGE+37*, CHANGE+38*, CHANGE+39* | 
| DLG | DLGDEF~, DLGDEF+2*, DLGDEF+3*, DLGDEF+4, DLGDEF+5, DLGDEF+6, DLGDEF+13, DLGDEF+15, DLGDEF+16, DLGDEF+17 | 
| DONE | STCHANGE+1~, STCHANGE+2*, STCHANGE+4, STCHANGE+7* | 
| DUZ | WRLST1+2 | 
| FID | WRLST1+4~, WRLST1+8*, WRLST1+10*, WRLST1+11, WRLSTB+1~, WRLSTB+6*, WRLSTB+9*, WRLSTB+10 | 
| FRM | FNDINFO+1~, FNDINFO+2*, FNDINFO+3*, FNDINFO+4, FNDINFO+5 | 
| I | WRLST1+4~, WRLST1+6*, WRLST1+7, DLGDEF+1~, DLGDEF+5*, DLGDEF+6, DCREN+1~ | 
| IEN | WRLST1+4~, WRLST1+7*, WRLST1+11, WRLSTB+1~, WRLSTB+4*, WRLSTB+5, DLGDEF+1~, DLGDEF+6*, DLGDEF+7, DLGDEF+9 , DLGDEF+10, DLGDEF+11, DLGDEF+12, DLGDEF+13, DLGDEF+15, DLGDEF+16, ORDMATCH+1~, ORDMATCH+6*, ORDMATCH+7, ORDMATCH+10 | 
| ILST | DLGDEF+1~*, DLGDEF+7*, DLGDEF+8, DLGDEF+9, DLGDEF+10, DLGDEF+11, DLGDEF+12, DLGDEF+18 | 
| INP | CHANGE+1~, CHANGE+3*, CHANGE+5*, CHANGE+32, CHANGE+37 | 
| INPDIEN | CHANGE+1~, CHANGE+3*, CHANGE+8*, CHANGE+32, CHANGE+37 | 
| ISIMO | CHANGE~, CHANGE+35, CHANGE+44 | 
| ISPEND | ISPEND+1~*, ISPEND+5*, ISPEND+6 | 
| ITM | WRLSTB+1~, WRLSTB+5*, WRLSTB+6, WRLSTB+7, WRLSTB+10 | 
| IVM | CHANGE+1~, CHANGE+3*, CHANGE+6*, CHANGE+32, CHANGE+38 | 
| IVMDIEN | CHANGE+1~, CHANGE+3*, CHANGE+9*, CHANGE+32, CHANGE+38 | 
| LOC | WRLST~, WRLST1+1*, WRLST1+2 | 
| LST | WRLST~, WRLST1+3, WRLSTB~, DLGDEF~ | 
| LST( | WRLST1+11*, WRLSTB+10*, DLGDEF+7*, DLGDEF+8*, DLGDEF+9*, DLGDEF+10*, DLGDEF+11*, DLGDEF+12*, DLGDEF+18* | 
| MATCH | ORDMATCH+1~, ORDMATCH+2*, ORDMATCH+3, ORDMATCH+10*, ORDMATCH+11 | 
| MNU | WRLSTB+1~, WRLSTB+2*, WRLSTB+3, WRLSTB+4, WRLSTB+5 | 
| N3 | ISPEND+1~, ISPEND+4*, ISPEND+5 | 
| >> NM | FNDINFO+8*, FNDINFO+9, FNDINFO+10 | 
| NODE | STCHANGE+1~, STCHANGE+5*, STCHANGE+6 | 
| ODI | FNDINFO+1~, FNDINFO+4*, FNDINFO+5, FNDINFO+7 | 
| ODIEN | FNDINFO~, FNDINFO+7, FNDINFO+9, FNDINFO+10 | 
| OR3 | CHANGE+1~, CHANGE+18*, CHANGE+19, DCREN+1~, DCREN+6*, DCREN+8, DCREN+9, DCREN+16, DCREN+18 | 
| ORCLST | CHANGE~ | 
| ORCLST( | CHANGE+13, CHANGE+15, CHANGE+17 | 
| ORDERID | ORDMATCH+1~, ORDMATCH+4*, ORDMATCH+5, ORDMATCH+6 | 
| ORDG | CHANGE+1~, CHANGE+16* | 
| >> ORDIALOG( | DELPI+4, DELPI+5!, DELPI+7, DELPI+10!, DELPI+12* | 
| >> ORDIALOG("WP" | DELPI+5!, DELPI+10! | 
| ORERR | WRLST1+4~, WRLST1+5 | 
| ORG | DCREN+1~, DCREN+9*, DCREN+11, DCREN+14, DCREN+17 | 
| ORGID | DCREN+1~, DCREN+4*, DCREN+5, DCREN+18 | 
| ORID | DCREN+1~, DCREN+5*, DCREN+6 | 
| ORIEN | CHANGE+1~, CHANGE+15*, CHANGE+16, CHANGE+18, CHANGE+21, CHANGE+22, CHANGE+25, CHANGE+26, CHANGE+27, CHANGE+30 , CHANGE+32, CHANGE+35, CHANGE+37, CHANGE+38, CHANGE+39, CHANGE+44, DCORIG~, DCORIG+1 | 
| ORIFN | ISPEND~, ISPEND+2, ISPEND+4 | 
| ORLOC | CHANGE+1~, CHANGE+17*, CHANGE+21, CHANGE+25 | 
| ORLST | CHANGE~ | 
| ORPI | DELPI+2~*, DELPI+3*, DELPI+4, DELPI+5, DELPI+7, DELPI+10, DELPI+12 | 
| ORSIG | DELPI+11~*, DELPI+12 | 
| ORX | WRLST1+4~, WRLST1+5 | 
| ORX( | WRLST1+6, WRLST1+7 | 
| ORY | STCHANGE~, STCHANGE+2*, STCHANGE+7*, ORDMATCH~, ORDMATCH+11*, DCREN~, DCORIG~, UNDCORIG~, PATWARD~, PATWARD+2* , PATWARD+5* | 
| ORY( | DCREN+18* | 
| ORYARR | STCHANGE~, ORDMATCH~, DCREN~, UNDCORIG~ | 
| ORYARR( | STCHANGE+4, STCHANGE+5, ORDMATCH+3, ORDMATCH+4, DCREN+3, DCREN+4, UNDCORIG+2 | 
| PACKIEN | CHANGE+2~, CHANGE+26*, CHANGE+27 | 
| PENDST | ISPEND+1~, ISPEND+3*, ISPEND+5 | 
| PHARMID | STCHANGE+1~, STCHANGE+6*, STCHANGE+7 | 
| PINODE | DELPI+6~, DELPI+7*, DELPI+8 | 
| PITX | DELPI+6~, DELPI+7*, DELPI+8*, DELPI+9*, DELPI+10 | 
| QORDDG | CHANGE+2~, CHANGE+36*, CHANGE+37, CHANGE+38, CHANGE+39 | 
| SEQ | WRLST1+4~, WRLST1+7*, WRLST1+11, WRLSTB+1~, WRLSTB+3*, WRLSTB+4, WRLSTB+10, DLGDEF+14~, DLGDEF+15*, DLGDEF+16 | 
| STATUS | STCHANGE+1~, STCHANGE+6*, STCHANGE+7, ORDMATCH+1~, ORDMATCH+4*, ORDMATCH+7, ORDMATCH+8, ORDMATCH+10, DCREN+1~, DCREN+11* , DCREN+12 | 
| STR | STCHANGE+1~ | 
| TDIAL | CHANGE+2~, CHANGE+4*, CHANGE+7*, CHANGE+32, CHANGE+39 | 
| TDIEN | CHANGE+2~, CHANGE+4* | 
| TEMP | PATWARD+1~, PATWARD+4*, PATWARD+5 | 
| TEXT | DCREN+1~, DCREN+5*, DCREN+18 | 
| >> TIEN | CHANGE+11*, CHANGE+32, CHANGE+39 | 
| TXT | WRLST1+4~, WRLST1+8*, WRLST1+9*, WRLST1+11, WRLSTB+1~, WRLSTB+5*, WRLSTB+8*, WRLSTB+10 | 
| TYP | WRLST1+4~, WRLST1+8*, WRLST1+11, WRLSTB+1~, WRLSTB+7*, WRLSTB+9, WRLSTB+10 | 
| U | WRLST1+7, WRLST1+8, WRLST1+9, WRLST1+10, WRLST1+11, WRLSTB+5, WRLSTB+6, WRLSTB+7, WRLSTB+8, WRLSTB+10 , FNDINFO+6, FNDINFO+9, FNDINFO+10, DLGDEF+6, DLGDEF+7, DLGDEF+8, DLGDEF+9, DLGDEF+10, DLGDEF+11, DLGDEF+12 , DLGDEF+17, DLGDEF+18, CHANGE+15, CHANGE+16, CHANGE+17, CHANGE+19, CHANGE+21, CHANGE+22, CHANGE+25, CHANGE+26 , CHANGE+27, CHANGE+30, CHANGE+32, CHANGE+35, CHANGE+36, CHANGE+37, CHANGE+38, CHANGE+39, CHANGE+44, STCHANGE+6 , ORDMATCH+4, ORDMATCH+7, ORDMATCH+8, ORDMATCH+10, DCREN+8, DCREN+9, DCREN+11, DCREN+12, DCREN+14, DCREN+16 , DCREN+17, DCREN+18, DCORIG+1, UNDCORIG+2, PATWARD+5, ISPEND+5 | 
| UDIEN | CHANGE+2~, CHANGE+3*, CHANGE+10*, CHANGE+37 | 
| X | WRLSTB+1~, WRLSTB+5*, WRLSTB+6*, WRLSTB+7*, WRLSTB+8 | 
| X0 | WRLST1+4~, WRLST1+7*, WRLST1+8, WRLST1+9, WRLST1+10, DLGDEF+1~, DLGDEF+6*, DLGDEF+8 | 
| X2 | DLGDEF+1~, DLGDEF+6*, DLGDEF+7 | 
| X5 | WRLST1+4~, WRLST1+7*, WRLST1+8 | 
| >> XRF | FNDINFO+3, FNDINFO+4, FNDINFO+5 | 
| XW | DLGDEF+1~ | 
| XX | FNDINFO+1~, FNDINFO+5*, FNDINFO+6, FNDINFO+9, FNDINFO+10 | 
| Y | FNDINFO~ | 
| Y( | FNDINFO+9*, FNDINFO+10* |