EDPX ;SLC/KCM - Common Utilities ;6/8/12 12:09pm
Source file <EDPX.m>
| Package | Total | Call Graph |
|---|---|---|
| Emergency Department Integration Software | 1 | ($$ESC,XML,XMLG)^EDPX |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| ESC(X) | ; Escape for XML transmission
; Q $ZCONVERT(X,"O","HTML") ; uncomment for fastest performance on Cache |
|
| UES(X) | ; Unescape XML
|
|
| UESREQ(REQ) | ; Unescape HTTP post
|
|
| VAL(X,R) | ; Returns parameter value or null
; HTTP passes HTML-escaped values in an array as REC(param,1) |
|
| NVPARSE(LST,IN) | ; Parses tab delimited name-value pairs into array
|
|
| XMLS(TAG,DATA,LBL) | ; Return XML node as <TAG data="9" label="XXX" />
|
|
| XMLA(TAG,ATT,END) | ; Return XML node as <TAG att1="a" att2="b"... />
|
|
| XMLQA(EDPTAG,EDPATT,EDPEND) | ; Return XML node as <TAG att1="a" att2="b"... />
; tag is built this way to work with most any output array.drp 04122012 patch2 ; tag added with EDP*2.0*2 |
|
| XMLE(SRC) | ; Append list to XML array as elements
|
|
| XML(X) | ; Add a line of XML to be returned
|
|
| XMLG(X,EDPCNT,EDPXML) | ; Add line of XML to global array
|
|
| CODE(X) | ; Return internal value for a code
|
|
| SAVERR(TYP,ERR) | ; Output a save error
|
|
| SAVERRG(EDPXML,TYP,ERR) | ;
|
|
| MSG(MSG) | ; Write out error message
|
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^EDPB(233.1 - [#233.1] | CODE+1 |
| Name | Line Occurrences |
|---|---|
| $$ESC | XMLS+1, XMLA+4, XMLQA+8, XMLE+3 |
| $$UES | UESREQ+4 |
| XML | XMLE+4 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| ATT | XMLA~ |
| ATT( | XMLA+4 |
| DATA | XMLS~, XMLS+1 |
| EDPATT | XMLQA~ |
| EDPCNT | XMLG~, XMLG+1*, XMLG+2, SAVERRG+1 |
| EDPEND | XMLQA~, XMLQA+11 |
| EDPLNODE | XMLQA+3~, XMLQA+4*, XMLQA+8*, XMLQA+11*, XMLQA+12 |
| EDPLSUB | XMLQA+3~, XMLQA+7*, XMLQA+8 |
| EDPLX | XMLQA+3~, XMLQA+5*, XMLQA+6, XMLQA+7, XMLQA+8 |
| EDPTAG | XMLQA~, XMLQA+4 |
| EDPXML | XML+1*, XML+2, XMLG~, XMLG+2, SAVERRG~, SAVERRG+1 |
| EDPXML( | XML+2* |
| END | XMLA~, XMLA+5 |
| ERR | SAVERR~, SAVERR+1, SAVERRG~, SAVERRG+1 |
| I | ESC+3~, ESC+4*, ESC+5*, ESC+6*, ESC+7*, ESC+8*, UESREQ+1~, UESREQ+3*, UESREQ+4, NVPARSE+1~ , NVPARSE+3* |
| IN | NVPARSE~, NVPARSE+3 |
| LBL | XMLS~, XMLS+1 |
| LST | NVPARSE~ |
| LST( | NVPARSE+3* |
| MSG | MSG~, MSG+1, MSG+2, MSG+3, MSG+4, MSG+5, MSG+6, MSG+7, MSG+8, MSG+9 , MSG+10, MSG+11, MSG+12, MSG+13, MSG+14, MSG+15, MSG+16, MSG+17, MSG+18, MSG+19 , MSG+20 |
| NM | NVPARSE+1~, NVPARSE+3* |
| NODE | XMLA+1~*, XMLA+4*, XMLA+5*, XMLA+6, XMLE+1~, XMLE+3*, XMLE+4 |
| QOT | ESC+3~*, ESC+8 |
| R | VAL~ |
| R( | VAL+2 |
| REQ | UESREQ~ |
| REQ( | UESREQ+2, UESREQ+3, UESREQ+4* |
| SRC | XMLE~ |
| SRC( | XMLE+2, XMLE+3 |
| TAB | NVPARSE+1~, NVPARSE+2*, NVPARSE+3 |
| TAG | XMLS~, XMLS+1, XMLA~, XMLA+1 |
| TYP | SAVERR~, SAVERR+1, SAVERRG~, SAVERRG+1 |
| VAL | NVPARSE+1~, NVPARSE+3* |
| X | ESC~, ESC+4, ESC+5*, ESC+6*, ESC+7*, ESC+8*, UES~, UES+1, UESREQ+1~, UESREQ+2* , UESREQ+3, UESREQ+4, VAL~, VAL+2, NVPARSE+1~, NVPARSE+3*, XMLA+2~, XMLA+4*, XMLE+1~, XMLE+2* , XMLE+3, XML~, XML+2, XMLG~, XMLG+2, CODE~, CODE+1, MSG+1*, MSG+2*, MSG+3* , MSG+4*, MSG+5*, MSG+6*, MSG+7*, MSG+8*, MSG+9*, MSG+10*, MSG+11*, MSG+12*, MSG+13* , MSG+14*, MSG+15*, MSG+16*, MSG+17*, MSG+18*, MSG+19*, MSG+20*, MSG+21 |
| Y | ESC+3~, ESC+4*, ESC+5*, ESC+6*, ESC+7*, ESC+8*, ESC+9 |