SCMCHLRI ;BP/DJB - PCMM HL7 Rejects - Identify & Store Msg ; 2/28/00 12:10pm
Source file <SCMCHLRI.m>
| Package | Total | Call Graph | 
|---|---|---|
| Kernel | 1 | $$NOW^XLFDT | 
| VA Fileman | 1 | (FILE,UPDATE)^DIE | 
| Name | Comments | DBIA/ICR reference | 
|---|---|---|
| STORE(TRANI) | ;Store data from "ERR" and "ZER" arrays | |
| CREATE(ERRORCD,CNT,TRANI) | ;Create an entry in the ERROR CODE multiiple field ; Input: ERRORCD - Error code ; CNT - Counter for multiple entries | |
| STATUS(TRANI,STATUS) | ;Update STATUS field in PCMM HL7 TRANSMISSION LOG file. ; Input: TRANI - IEN of PCM HL7 TRANSMISSION LOG file ; STATUS - A=Accepted, M=Marked for re-transmit, RJ=Rejected | |
| ACK | ;Identify an acknowledgment message | |
| UPDATE | ;Update entry in PCMM HL7 TRANSMISSION LOG file | |
| HL7SAMP | ;Sample code to view HL7 message | |
| PARSE | ;Parse ACK message. | |
| CONVERT(ID) | ;If ID is from an integrated site, convert it to local ID. | 
| HL7 Protocol Name | Call Tags | 
|---|---|
| SCMC SEND SERVER WORKLOAD | ACK | 
| PCMM SEND SERVER FOR ADT-A08 | ACK | 
| Name | Line Occurrences (* Changed, ! Killed) | 
|---|---|
| ^SCPT(404.471 - [#404.471] | UPDATE+3, UPDATE+5, STORE+21, STORE+23 | 
| ^SCPT(404.49 - [#404.49] | CONVERT+3, CONVERT+4 | 
| ^TMP("DJB" | HL7SAMP+3*, HL7SAMP+6* | 
| Name | Line Occurrences | 
|---|---|
| $$CREATE | STORE+12 | 
| PARSE | ACK+16 | 
| STATUS | UPDATE+9, UPDATE+12, UPDATE+16 | 
| STORE | UPDATE+17 | 
| UPDATE | ACK+18 | 
| >> | Not killed explicitly | 
| * | Changed | 
| ! | Killed | 
| ~ | Newed | 
| Name | Field # of Occurrence | 
|---|---|
| ACKCODE | UPDATE+1~, UPDATE+6*, UPDATE+9, UPDATE+12, UPDATE+15 | 
| ARRAY | ACK+10~, ACK+17 | 
| ARRAY("ERR" | PARSE+23*, PARSE+27*, PARSE+28*, PARSE+29*, STORE+9, STORE+12, STORE+15, STORE+16, STORE+17 | 
| ARRAY("MSA" | PARSE+16*, PARSE+17*, UPDATE+2, UPDATE+6 | 
| CNT | STORE+6~, STORE+8*, STORE+9*, STORE+12, STORE+15, STORE+16, STORE+17, CREATE~, CREATE+7*, CREATE+8 , CREATE+12 | 
| CNTERR | PARSE+9~, PARSE+22*, PARSE+23, PARSE+27, PARSE+28, PARSE+29 | 
| CS | ACK+10~, ACK+12*, PARSE+23, PARSE+25, PARSE+28, PARSE+29 | 
| ERRORCD | CREATE~, CREATE+9 | 
| ERRORI | UPDATE+1~, STORE+6~, STORE+12*, STORE+13, STORE+25 | 
| FLD | STORE+6~, STORE+17*, STORE+28 | 
| FS | ACK+10~, ACK+14*, PARSE+12, PARSE+16, PARSE+17, PARSE+21 | 
| >> HL("ECH" | ACK+12, ACK+13 | 
| >> HL("FS" | ACK+14 | 
| >> HLNEXT | PARSE+11, HL7SAMP+2 | 
| >> HLNODE | PARSE+12, PARSE+16, PARSE+17, PARSE+21, HL7SAMP+3 | 
| >> HLNODE( | HL7SAMP+6 | 
| >> HLQUIT | PARSE+11, HL7SAMP+2 | 
| I | HL7SAMP+1~, HL7SAMP+2*, HL7SAMP+3, HL7SAMP+6 | 
| ID | CONVERT~, CONVERT+3, CONVERT+4*, CONVERT+5*, CONVERT+6 | 
| IENS | CREATE+6~, CREATE+8*, CREATE+9 | 
| J | HL7SAMP+1~, HL7SAMP+4*, HL7SAMP+6* | 
| MSGID | PARSE+9~, UPDATE+1~, UPDATE+2*, UPDATE+3 | 
| RS | ACK+10~, ACK+13*, PARSE+22 | 
| SCERR | STATUS+4~, STORE+5~, STORE+32!, CREATE+6~, CREATE+11 | 
| SCFDA | STATUS+4~, STORE+5~, STORE+32!, CREATE+6~ | 
| SCFDA( | STATUS+8*, STATUS+9*, STORE+26*, STORE+27*, STORE+28*, STORE+29*, STORE+30*, CREATE+9* | 
| SCIEN | STORE+5~, CREATE+6~ | 
| SCIEN( | CREATE+12 | 
| SCIENS | STATUS+4~, STATUS+7*, STATUS+8, STATUS+9, STORE+5~, STORE+25*, STORE+26, STORE+27, STORE+28, STORE+29 , STORE+30 | 
| SCIENS1 | STORE+5~ | 
| SEG | PARSE+9~, PARSE+12*, PARSE+15, PARSE+20, STORE+6~, STORE+15*, STORE+19, STORE+26 | 
| SEQ | PARSE+25*, PARSE+26*, PARSE+27, STORE+6~, STORE+16*, STORE+20, STORE+21, STORE+27 | 
| >> SEQI | STORE+21*, STORE+22, STORE+23 | 
| STATUS | STATUS~, STATUS+6, STATUS+8 | 
| TRANI | UPDATE+1~, UPDATE+3*, UPDATE+4, UPDATE+5, UPDATE+9, UPDATE+12, UPDATE+16, UPDATE+17, STATUS~, STATUS+5 , STATUS+7, STORE~, STORE+12, STORE+21, STORE+23, STORE+25, CREATE~, CREATE+8 | 
| TXTFLD | PARSE+9~, PARSE+21*, PARSE+22 | 
| TXTREP | PARSE+9~, PARSE+22*, PARSE+23, PARSE+25, PARSE+28, PARSE+29 | 
| ZPCID | STORE+6~, STORE+18*, STORE+23*, STORE+29 |