HLOPRS1 ;IRMFO-ALB/CJM -RTNs for parsing messages (continued);03/24/2004 14:43 ;09/13/2006
Source file <HLOPRS1.m>
| Package | Total | Caller Graph |
|---|---|---|
| Health Level Seven | 4 | HLOCLNT2 HLOPRS HLOPRS2 HLPRS |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| PARSE(FIELD,REP,COMP,SUBCOMP,ESCAPE,SEG,TO) | ;
|
|
| NEXTCHAR(SEG) | ;
|
|
| GETCODE(SEG,VALUE,FIELD,COMP,REP) | ;
|
|
| DESCAPE(VALUE,FIELD,COMP,SUBCOMP,REP,ESCAPE) | ;
|
| Name | Field # of Occurrence |
|---|---|
| $$GET^HLOPRS | GETCODE+10, GETCODE+11, GETCODE+12, GETCODE+13, GETCODE+14, GETCODE+15, GETCODE+16, GETCODE+17, GETCODE+18 |
| Name | Line Occurrences |
|---|---|
| $$DESCAPE | PARSE+31, PARSE+34, PARSE+37, PARSE+40 |
| $$NEXTCHAR | PARSE+27 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| CHAR | PARSE+14~, PARSE+27*, PARSE+28, PARSE+30, PARSE+33, PARSE+36, PARSE+39, PARSE+42, DESCAPE+4~, DESCAPE+9* , DESCAPE+10, DESCAPE+11, DESCAPE+12, DESCAPE+13, DESCAPE+14, DESCAPE+15 |
| >> COM | GETCODE+17 |
| COMP | PARSE~, PARSE+18, PARSE+31, PARSE+34, PARSE+36, PARSE+37, PARSE+40, DESCAPE~, DESCAPE+12, GETCODE~ , GETCODE+5, GETCODE+10, GETCODE+11, GETCODE+12, GETCODE+13, GETCODE+14, GETCODE+15, GETCODE+16, GETCODE+18 |
| COUNTS | PARSE+14~ |
| COUNTS("COMP" | PARSE+23*, PARSE+29, PARSE+31, PARSE+32*, PARSE+34, PARSE+35*, PARSE+37, PARSE+38*, PARSE+40 |
| COUNTS("FIELD" | PARSE+21*, PARSE+29, PARSE+31, PARSE+32*, PARSE+34, PARSE+37, PARSE+40 |
| COUNTS("REP" | PARSE+22*, PARSE+29, PARSE+31, PARSE+32*, PARSE+34, PARSE+35*, PARSE+37, PARSE+40 |
| COUNTS("SUBCOMP" | PARSE+24*, PARSE+29, PARSE+31, PARSE+32*, PARSE+34, PARSE+35*, PARSE+37, PARSE+38*, PARSE+40, PARSE+41* |
| ESCAPE | PARSE~, PARSE+31, PARSE+34, PARSE+37, PARSE+40, DESCAPE~, DESCAPE+3, DESCAPE+10, DESCAPE+15 |
| FIELD | PARSE~, PARSE+16, PARSE+30, PARSE+31, PARSE+34, PARSE+37, PARSE+40, PARSE+44, DESCAPE~, DESCAPE+11 , GETCODE~, GETCODE+4, GETCODE+10, GETCODE+11, GETCODE+12, GETCODE+13, GETCODE+14, GETCODE+15, GETCODE+16, GETCODE+17 , GETCODE+18 |
| I | DESCAPE+4~, DESCAPE+8* |
| LEN | DESCAPE+4~, DESCAPE+7*, DESCAPE+8 |
| NEWSTRNG | DESCAPE+4~, DESCAPE+5*, DESCAPE+11*, DESCAPE+12*, DESCAPE+13*, DESCAPE+14*, DESCAPE+15*, DESCAPE+16*, DESCAPE+17 |
| >> RE | GETCODE+15 |
| REP | PARSE~, PARSE+17, PARSE+31, PARSE+33, PARSE+34, PARSE+37, PARSE+40, DESCAPE~, DESCAPE+14, GETCODE~ , GETCODE+9*, GETCODE+10, GETCODE+11, GETCODE+12, GETCODE+13, GETCODE+14, GETCODE+16, GETCODE+18 |
| RET | NEXTCHAR+4~, NEXTCHAR+6*, NEXTCHAR+7 |
| SEG | PARSE~, PARSE+20, PARSE+27, NEXTCHAR~, GETCODE~, GETCODE+10, GETCODE+11, GETCODE+12, GETCODE+13, GETCODE+14 , GETCODE+15, GETCODE+16, GETCODE+17, GETCODE+18 |
| SEG( | NEXTCHAR+6, NEXTCHAR+8, NEXTCHAR+9 |
| SEG("CHAR" | PARSE+26*, NEXTCHAR+5*, NEXTCHAR+6, NEXTCHAR+9* |
| SEG("LINE" | PARSE+26*, NEXTCHAR+3, NEXTCHAR+6, NEXTCHAR+8*, NEXTCHAR+9 |
| SEG(0 | PARSE+26 |
| SET | DESCAPE+4~, DESCAPE+6*, DESCAPE+10 |
| SUB | GETCODE+3~, GETCODE+6*, GETCODE+10, GETCODE+11, GETCODE+12, GETCODE+13, GETCODE+14, GETCODE+15, GETCODE+16, GETCODE+18 |
| SUBCOMP | PARSE~, PARSE+19, PARSE+31, PARSE+34, PARSE+37, PARSE+39, PARSE+40, DESCAPE~, DESCAPE+13 |
| SUBLEN | DESCAPE+4~, DESCAPE+5*, DESCAPE+8*, DESCAPE+11*, DESCAPE+12*, DESCAPE+13*, DESCAPE+14*, DESCAPE+15*, DESCAPE+16* |
| SUBSTRNG | DESCAPE+4~, DESCAPE+5*, DESCAPE+8*, DESCAPE+9, DESCAPE+10, DESCAPE+11*, DESCAPE+12*, DESCAPE+13*, DESCAPE+14*, DESCAPE+15* , DESCAPE+16*, DESCAPE+17 |
| TO | PARSE~, PARSE+15! |
| TO( | PARSE+29*, PARSE+31*, PARSE+34*, PARSE+37*, PARSE+40* |
| TO("FIELD SEP | ARATOR" , PARSE+44* |
| TO("SEGMENT T | YPE" , PARSE+43*, PARSE+44 |
| TO(1 | PARSE+43 |
| VALUE | PARSE+14~, PARSE+25*, PARSE+29, PARSE+31*, PARSE+34*, PARSE+37*, PARSE+40*, PARSE+42*, DESCAPE~, DESCAPE+3 , DESCAPE+7, DESCAPE+8, GETCODE~ |
| VALUE("ALTERN | ATE ID" , GETCODE+13*, ATE SYSTEM VERSION" , GETCODE+17*, ATE SYSTEM" , GETCODE+15*, ATE TEXT" , GETCODE+14* |
| VALUE("ID" | GETCODE+10* |
| VALUE("ORIGIN | AL TEXT" , GETCODE+18* |
| VALUE("SYSTEM | VERSION" , GETCODE+16* |
| VALUE("SYSTEM" | GETCODE+12* |
| VALUE("TEXT" | GETCODE+11* |
| VAR | GETCODE+3~, GETCODE+6*, GETCODE+8*, GETCODE+10, GETCODE+11, GETCODE+12, GETCODE+13, GETCODE+14, GETCODE+15, GETCODE+16 , GETCODE+17, GETCODE+18 |