PSSHRQ2O ;WOIFO/AV,TS,SG - Handles parsing a PEPS Drug Check Response ; Sep 20, 2007@16:00
Source file <PSSHRQ2O.m>
| Package | Total | Call Graph |
|---|---|---|
| M XML Parser | 1 | ($$CHILD,$$NAME,$$VALUE,DELETE)^MXMLDOM |
| Pharmacy Data Management | 1 | $$GETTEXT^PSSHRCOM |
| 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 |
|---|---|---|
| OUT(DOCHAND,BASE) | ;
; @DESC Parses the PEPSResponse XML and stores in object |
|
| HNDLCK(DOCHAND,BASE) | ;
; @DESC This handles the parsing of the PEPSResponse XML element |
|
| GTDBINFO(DOCHAND,BASE) | ; get the Vendor database info.
; @DOCHAND Handle to XML document ; @BASE Base of output global |
|
| GTHANDLE(DOCHAND) | ;
; @DESC Get handle to drugCheck element from PEPSResponse element |
|
| SELTAG(NAME) | ;
; @DESC Returns the appropriate tag to handle the XML element |
|
| ALTERROR(BASE) | ;
; @DESC Handles alternate PEPS errors like being unable to ; connect to PEPS. Reads info from global in format |
|
| ERREAD(DOCHAND,HASH) | ;
; @DESC Handles parsing the exception XML element and storing it ; in a hash variable |
|
| CLEXP | ;Delete Profile drug exceptions for CPRS if all Prospective drugs have exceptions
|
|
| CLPAR | ;Some Exceptions exist, but not all prospective drugs have an exception
|
| Name | Field # of Occurrence |
|---|---|
| $$CHILD^MXMLDOM | HNDLCK+17, GTDBINFO+9, GTDBINFO+16, GTHANDLE+12, GTHANDLE+14, ERREAD+14 |
| $$NAME^MXMLDOM | OUT+8, HNDLCK+18, GTDBINFO+10, GTDBINFO+17, GTHANDLE+13, ERREAD+15 |
| $$VALUE^MXMLDOM | GTDBINFO+19, GTDBINFO+21, GTDBINFO+22, GTDBINFO+23, GTDBINFO+25, GTDBINFO+26 |
| DELETE^MXMLDOM | OUT+25 |
| $$GETTEXT^PSSHRCOM | ERREAD+16, ERREAD+17 |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^TMP( | OUT+17*, OUT+20!, HNDLCK+11*, HNDLCK+28*, HNDLCK+29*, GTDBINFO+19*, GTDBINFO+21*, GTDBINFO+22*, GTDBINFO+23*, GTDBINFO+25* , GTDBINFO+26*, ALTERROR+10*, ALTERROR+13! |
| ^TMP($J | OUT+15, OUT+26!, CLEXP+2, CLEXP+3, CLEXP+5, CLEXP+6, CLEXP+8, CLEXP+9!, CLPAR+2, CLPAR+3 , CLPAR+4, CLPAR+5, CLPAR+6, CLPAR+7, CLPAR+8! |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| BASE | OUT~, OUT+15, OUT+17, OUT+22, HNDLCK~, HNDLCK+11, HNDLCK+28, HNDLCK+29, GTDBINFO~, GTDBINFO+19 , GTDBINFO+21, GTDBINFO+22, GTDBINFO+23, GTDBINFO+25, GTDBINFO+26, ALTERROR~, ALTERROR+10 |
| DOCHAND | OUT~, OUT+8, OUT+12, OUT+22, OUT+25, HNDLCK~, HNDLCK+11, HNDLCK+14, HNDLCK+17, HNDLCK+18 , GTDBINFO~, GTDBINFO+9, GTDBINFO+10, GTDBINFO+16, GTDBINFO+17, GTDBINFO+19, GTDBINFO+21, GTDBINFO+22, GTDBINFO+23, GTDBINFO+25 , GTDBINFO+26, GTHANDLE~, GTHANDLE+12, GTHANDLE+13, GTHANDLE+14, ERREAD~, ERREAD+14, ERREAD+15, ERREAD+16, ERREAD+17 |
| HASH | OUT+6~, OUT+12, ERREAD~ |
| HASH("code" | OUT+14, ERREAD+16* |
| HASH("message" | ERREAD+17* |
| HEADER | GTDBINFO+4~, GTDBINFO+13*, GTDBINFO+16 |
| MESSAGE | OUT+6~, OUT+14*, OUT+15*, OUT+16*, OUT+17 |
| NAME | SELTAG~, SELTAG+7, SELTAG+9, SELTAG+11, SELTAG+13 |
| PSS | OUT+6~, HNDLCK+8~, GTDBINFO+4~, GTHANDLE+7~, ERREAD+9~ |
| PSS("child" | HNDLCK+15*, HNDLCK+17*, HNDLCK+18, GTDBINFO+5*, GTDBINFO+9*, GTDBINFO+10, GTDBINFO+13, GTDBINFO+14*, GTDBINFO+16*, GTDBINFO+17 , GTDBINFO+19, GTDBINFO+21, GTDBINFO+22, GTDBINFO+23, GTDBINFO+25, GTDBINFO+26, GTHANDLE+9*, GTHANDLE+12*, GTHANDLE+13, GTHANDLE+14 , ERREAD+11*, ERREAD+14*, ERREAD+15, ERREAD+16, ERREAD+17 |
| PSS("childName" | HNDLCK+18*, HNDLCK+21, GTDBINFO+6*, GTDBINFO+8, GTDBINFO+10*, GTDBINFO+15, GTDBINFO+17*, GTHANDLE+13*, GTHANDLE+14, ERREAD+15* , ERREAD+16, ERREAD+17 |
| PSS("drugCheck" | HNDLCK+14*, HNDLCK+17 |
| PSS("drugCheckElement" | GTHANDLE+14*, GTHANDLE+16 |
| PSS("executable" | HNDLCK+22*, HNDLCK+24 |
| PSS("rootName" | OUT+8*, OUT+10, OUT+22 |
| PSS("tag" | HNDLCK+21*, HNDLCK+22 |
| PSSPEX1 | CLEXP+1~, CLEXP+5*, CLEXP+6 |
| PSSPEX2 | CLEXP+1~, CLEXP+8*, CLEXP+9 |
| PSSPEX3 | CLPAR+1~, CLPAR+2*, CLPAR+3, CLPAR+4 |
| PSSPEX4 | CLPAR+1~, CLPAR+3*, CLPAR+4 |
| PSSPEX5 | CLPAR+1~, CLPAR+4* |
| PSSPEX6 | CLPAR+1~, CLPAR+5*, CLPAR+6, CLPAR+7, CLPAR+8 |
| PSSPEX7 | CLPAR+1~, CLPAR+6*, CLPAR+7 |
| PSSPEX8 | CLPAR+1~, CLPAR+7* |
| PSSPEXAR | CLPAR+1~ |
| PSSPEXAR( | CLPAR+4*, CLPAR+7 |
| PSSPEXDL | CLEXP+1~, CLEXP+4*, CLEXP+5, CLEXP+6*, CLEXP+7 |
| >> PSSRBASE | CLEXP+2, CLEXP+3, CLEXP+5, CLEXP+6, CLEXP+8, CLEXP+9, CLPAR+2, CLPAR+3, CLPAR+4, CLPAR+5 , CLPAR+6, CLPAR+7, CLPAR+8 |