SRHLVUO1 ;BIR/DLR - Surgery Interface (Cont.) Utilities for building Outgoing HL7 Segments ; [ 05/20/99 7:14 AM ]
Source file <SRHLVUO1.m>
| Package | Total | Call Graph | 
|---|---|---|
| DRG Grouper | 2 | $$CPT^ICPTCOD $$MOD^ICPTMOD | 
| Health Level Seven | 1 | $$HLDATE^HLFNC | 
| Surgery | 1 | $$HNAME^SRHLVU | 
| VA Fileman | 1 | (C,NOW)^%DTC | 
| Name | Comments | DBIA/ICR reference | 
|---|---|---|
| STAT | ;check scheduled cases to scheduled close time | |
| SZIP | ;set the ZIP segment | |
| ZIL(SRI) | ;sets ^TMP("HLS",$J global for sending ZIL Appointment Information - Location Resource Segment(s) | |
| ZIG(SRI) | ;sets ^TMP("HLS",$J global for sending ZIG Appointment Information - General Resource Segment(s) | |
| ZCH(SRI,SREVENT,SRSTATUS) | ;sets ^TMP("HLS",$J global for sending ZCH Scheduling Appointment Information segment(s) | |
| ZIP(SRI) | ;sets ^TMP("HLS",$J,HLSDT,I) global for sending ZIP Appointment Information - Personnel Segment(s) | 
| Name | Line Occurrences (* Changed, ! Killed) | 
|---|---|
| ^SC - [#44] | ZIL+3, ZIL+4 | 
| ^SRF - [#130] | ZCH+6, ZCH+7, ZCH+8, ZCH+10, ZCH+11, ZCH+13, ZCH+14, ZCH+15, ZCH+16, ZIG+1 , ZIG+3, ZIL+2, ZIL+3, ZIL+4, ZIL+6, ZIL+8, ZIP+2, ZIP+3, ZIP+4, ZIP+5 , ZIP+8, SZIP+2, STAT+2, STAT+3, STAT+4 | 
| ^SRO(133 - [#133] | STAT+3 | 
| ^SRO(133.4 - [#133.4] | ZIG+4 | 
| ^SRS - [#131.7] | ZIL+3 | 
| ^TMP("HLS" | ZCH+17*, ZIG+6*, ZIL+10*, SZIP+4* | 
| Name | Line Occurrences | 
|---|---|
| STAT | ZIL+9, SZIP+3 | 
| SZIP | ZIP+3, ZIP+4, ZIP+7, ZIP+10 | 
| Name | Field # of Occurrence | 
|---|---|
| ^( | ZCH+11 | 
| ^("1.0" | ZCH+15 | 
| ^("CON" | ZCH+16 | 
| ^("NON" | ZIL+4, ZIP+3, ZIP+4 | 
| ^("OP" | ZCH+6 | 
| ^(0 | ZIL+3, ZIL+4 | 
| ^(31 | ZCH+13 | 
| >> | Not killed explicitly | 
| * | Changed | 
| ! | Killed | 
| ~ | Newed | 
| Name | Field # of Occurrence | 
|---|---|
| >> % | STAT+4 | 
| ADD | ZCH+1~ | 
| ADD1 | ZCH+1~ | 
| ADDR | ZCH+1~ | 
| >> CASE | ZCH+3, ZCH+6, ZCH+7, ZCH+8, ZCH+10, ZCH+11, ZCH+13, ZCH+14, ZCH+15, ZCH+16 , ZIG+1, ZIG+3, ZIL+2, ZIL+3, ZIL+4, ZIL+6, ZIL+8, ZIP+2, ZIP+3, ZIP+4 , ZIP+5, ZIP+8, SZIP+2, STAT+2, STAT+3, STAT+4 | 
| DT | STAT+4, STAT+5, STAT+6 | 
| FAC | ZIL+1~, ZIL+3*, ZIL+4*, ZIL+5 | 
| >> HLCOMP | ZCH+5, ZCH+7, ZCH+9, ZCH+10, ZCH+11, ZCH+13, ZCH+14, ZIG+4, ZIG+5, ZIL+5 , ZIL+6, ZIP+3, ZIP+4, ZIP+6, ZIP+9 | 
| >> HLFS | ZCH+17, ZIG+6, ZIL+10, SZIP+4 | 
| >> HLQ | ZCH+2 | 
| >> HLREP | ZCH+9 | 
| >> HLSDT | ZCH+17, ZIG+6, ZIL+10, SZIP+4 | 
| LOC | ZIL+1~, ZIL+3*, ZIL+4*, ZIL+5 | 
| MON | ZIG+2~, ZIG+3* | 
| PHONE | ZCH+1~ | 
| SRC | ZIL+1~, ZIL+7*, ZIL+8*, ZIP+1~, SZIP+1*, SZIP+2*, STAT+4*, STAT+5*, STAT+6* | 
| SREVENT | ZCH~, ZCH+5 | 
| SRI | ZCH~, ZCH+17, ZCH+18*, ZIG~, ZIG+6, ZIG+7*, ZIL~, ZIL+10, ZIL+11*, ZIP~ , SZIP+4, SZIP+5*, STAT+1~, STAT+3* | 
| SRJ | ZCH+1~, ZCH+8* | 
| SRM | ZCH+1~, ZCH+8*, ZCH+9 | 
| SROERR | ZCH+1~ | 
| SRP | ZCH+1~, ZCH+8* | 
| SRREP | ZCH+1~, ZCH+8*, ZCH+9* | 
| SRS | STAT+1~, STAT+3* | 
| SRSTATUS | ZCH~, ZCH+5, ZCH+12, ZCH+14, ZIL+8, ZIL+9, SZIP+2, SZIP+3 | 
| SRTIME | STAT+1~, STAT+3*, STAT+4* | 
| SRX | ZCH+1~, ZCH+7* | 
| >> SRYN | STAT+4* | 
| U | ZCH+6, ZCH+7, ZCH+8, ZCH+9, ZCH+10, ZCH+11, ZCH+13, ZCH+14, ZCH+15, ZCH+16 , ZIG+4, ZIL+2, ZIL+3, ZIL+4, ZIL+6, ZIL+8, ZIP+3, ZIP+4, ZIP+5, ZIP+8 , SZIP+2, STAT+3, STAT+4 | 
| X | ZIL+1~, ZIL+10*, ZIP+1~, ZIP+5*, ZIP+6, ZIP+8*, ZIP+9, STAT+4, STAT+5, STAT+6 | 
| X1 | STAT+1~, STAT+4* | 
| X2 | STAT+1~, STAT+4* | 
| XX | ZCH+1~, ZCH+17*, ZIG+6*, ZIP+1~, SZIP+4* | 
| ZCH | ZCH+1~ | 
| ZCH( | ZCH+17 | 
| ZCH(1 | ZCH+2* | 
| ZCH(12 | ZCH+15* | 
| ZCH(17 | ZCH+16* | 
| ZCH(18 | ZCH+9* | 
| ZCH(2 | ZCH+3* | 
| ZCH(3 | ZCH+2* | 
| ZCH(4 | ZCH+5* | 
| ZCH(5 | ZCH+6*, ZCH+7*, ZCH+10* | 
| ZCH(6 | ZCH+11* | 
| ZCH(7 | ZCH+13*, ZCH+14* | 
| ZIG | ZIG+2~, ZIG+3*, ZIG+4 | 
| ZIG( | ZIG+6* | 
| ZIG(1 | ZIG+4* | 
| ZIG(2 | ZIG+5* | 
| ZIL | ZIL+1~ | 
| ZIL( | ZIL+10* | 
| ZIL(1 | ZIL+5* | 
| ZIL(2 | ZIL+6* | 
| ZIL(6 | ZIL+7* | 
| ZIP | ZIP+1~ | 
| ZIP( | SZIP+4* | 
| ZIP(1 | ZIP+3*, ZIP+4*, ZIP+5*, ZIP+6*, ZIP+8*, ZIP+9* | 
| ZIP(2 | ZIP+3*, ZIP+4*, ZIP+6*, ZIP+9* | 
| ZIP(6 | SZIP+1* |