PSOLBL4 ;BIR/RTR-Set up routine for HL7 interface ; 10/9/08 11:37am
Source file <PSOLBL4.m>
| Package | Total | Caller Graph | 
|---|---|---|
| Outpatient Pharmacy | 4 | PSOBMST PSOHLDS PSOHLSG PSOLBL | 
| Name | Comments | DBIA/ICR reference | 
|---|---|---|
| SUS(HSREX,HSFL,HSFILL,HSRP) | ; | |
| ACLOG | ;Activity log (sending to Hl7 interface) | |
| AAA | ||
| RPT | ; | |
| SOMDQ | ||
| OTHER | ||
| CALL | ||
| SETZ | ; | |
| HL | ||
| LAB(HLREX,HLFL,HLFILL,HLREPT) | ; | |
| ENDHL | 
| FileNo | Call Tags | 
|---|---|
| ^PS(52.5 - [#52.5] | Classic Fileman Calls | 
| ^PS(59 - [#59] | GET1^DIQ | 
| Name | Line Occurrences (* Changed, ! Killed) | 
|---|---|
| ^PS(52.5 - [#52.5] | HL+11, SUS+3 | 
| ^PS(59 - [#59] | PSOLBL4+9, PSOLBL4+12 | 
| ^PSDRUG - [#50] | HL+15 | 
| ^PSRX - [#52] | HL+7, HL+8, HL+10, HL+14, SOMDQ+2, SOMDQ+4, SOMDQ+5, SOMDQ+6, SOMDQ+7, SOMDQ+8 , SOMDQ+10, SOMDQ+12, SOMDQ+13, AAA+1, AAA+3, ACLOG+3, ACLOG+4*, SUS+2*, SUS+4, SUS+5 , SUS+7, SUS+8*, LAB+2, LAB+3, LAB+4, LAB+5*, LAB+6*, LAB+11*, LAB+12* | 
| ^UTILITY($J | HL+2!, SOMDQ*, SOMDQ+2, SOMDQ+3*, SOMDQ+6*, SOMDQ+7, SOMDQ+8*, SOMDQ+9*, SOMDQ+10*, SOMDQ+11* , SOMDQ+12*, SOMDQ+14*, AAA+1, AAA+2*, AAA+3, AAA+7, ENDHL!, OTHER*, OTHER+1*, RPT+1* , RPT+2*, SETZ+7! | 
| Name | Line Occurrences | 
|---|---|
| ACLOG | SOMDQ+6 | 
| ENDHL | SOMDQ+1, AAA+7 | 
| OTHER | AAA+2 | 
| RPT | SOMDQ+12 | 
| SETZ | AAA+6, CALL | 
| Name | Field # of Occurrence | 
|---|---|
| ^( | SOMDQ+2, SOMDQ+4, AAA+1 | 
| ^("STA" | SOMDQ+13 | 
| >> | Not killed explicitly | 
| * | Changed | 
| ! | Killed | 
| ~ | Newed | 
| Name | Field # of Occurrence | 
|---|---|
| >> % | ACLOG+2, SUS+6, LAB+2, SETZ+1 | 
| AP | PSOLBL4+7~, PSOLBL4+12* | 
| DA | SUS+1~, SUS+3*, LAB+1~ | 
| DIC | PSOLBL4+7~, PSOLBL4+10*! | 
| DIC(0 | PSOLBL4+10* | 
| DIK | SUS+1~, SUS+3!* | 
| DPRT | PSOLBL4+7~, PSOLBL4+11*, PSOLBL4+12 | 
| DTTM | ACLOG+1~, ACLOG+2*, ACLOG+4, SUS+1~, SUS+6*, SUS+8 | 
| HCNT | ACLOG+1~, ACLOG+3*, ACLOG+4* | 
| HCOM | ACLOG+1~, ACLOG+2*, ACLOG+4 | 
| HCT | LAB+1~, LAB+2*, LAB+5*, LAB+6, LAB+11*, LAB+12 | 
| HDFN | HL~, AAA+1*, AAA+4* | 
| HDFN1 | HL~, AAA+1* | 
| HFF | LAB+1~, LAB+2* | 
| HHHH | HL~, SOMDQ+4* | 
| HJJ | ACLOG+1~, ACLOG+3* | 
| HLDAI | HL~, OTHER+1* | 
| HLDFN | HL~, AAA+2*, AAA+3, OTHER, OTHER+1 | 
| HLDUZ | LAB+1~, LAB+3*, LAB+4*, LAB+6, LAB+12 | 
| HLFILL | LAB~, LAB+3, LAB+4, LAB+6, LAB+12 | 
| HLFL | LAB~, LAB+3, LAB+4, LAB+6, LAB+12 | 
| HLFLAG | HL~, HL+4*, HL+5* | 
| HLFOUR | HL~, SOMDQ+4*, SOMDQ+5*, SOMDQ+6, ACLOG+4 | 
| HLINGF | HL~, SOMDQ+7*, SOMDQ+8*, SOMDQ+9 | 
| HLINRX | HL~, SOMDQ+2*, SOMDQ+3, SOMDQ+4, SOMDQ+5, SOMDQ+6, SOMDQ+7, SOMDQ+8, SOMDQ+10, SOMDQ+12 , SOMDQ+13, ACLOG+2, ACLOG+3, ACLOG+4, RPT+1 | 
| HLINRX0 | HL~, SOMDQ+2*, SOMDQ+3 | 
| HLJUST | HL~, HL+14*, HL+15 | 
| HLNEXT | HL~, HL+5* | 
| HLOSITE | HL~, HL+1*, HL+13, HL+17, HL+19 | 
| HLREPT | LAB~, LAB+6 | 
| HLREX | LAB~, LAB+2, LAB+3, LAB+4, LAB+5, LAB+6, LAB+8, LAB+11, LAB+12 | 
| HLRR | HL~, HL+11* | 
| HLRX | HL~, HL+4*, HL+6, HL+7, HL+8, HL+9, HL+10, HL+11, HL+14, HL+16 , HL+17, HL+20*, HL+21, HL+22 | 
| HLRXY | HL~, HL+2!, HL+19, ENDHL! | 
| HLRXY( | HL+16*, SOMDQ | 
| HLRXYZ | HL~ | 
| HLRXYZ( | HL+17*, HL+21 | 
| HNEWDFN | HL~, AAA+3*, AAA+4 | 
| HSCNT | SUS+1~, SUS+7*, SUS+8* | 
| HSCOM | SUS+1~, SUS+6*, SUS+8 | 
| HSFILL | SUS~, SUS+4, SUS+5, SUS+8 | 
| HSFL | SUS~, SUS+4, SUS+6, SUS+8 | 
| HSJJ | SUS+1~, SUS+7* | 
| HSLDUZ | SUS+1~, SUS+4*, SUS+5*, SUS+8 | 
| HSREX | SUS~, SUS+2, SUS+3, SUS+4, SUS+5, SUS+7, SUS+8 | 
| HSRP | SUS~, SUS+6 | 
| II | HL~, HL+4*, HL+5, HL+16, HL+20*, SOMDQ*, SOMDQ+2*, SOMDQ+3, SOMDQ+6, SOMDQ+7 , SOMDQ+8, SOMDQ+9, SOMDQ+10, SOMDQ+11, SOMDQ+12, SOMDQ+14, RPT+1, RPT+2 | 
| LL | HL~, SOMDQ+8* | 
| >> MW | LAB+12 | 
| NOTMD | HL~, HL+13*, HL+15* | 
| NOW | LAB+1~, LAB+2*, LAB+6, LAB+12 | 
| >> PDUZ | ACLOG+4, RPT+2 | 
| PPL | HL+3, HL+20!, HL+22* | 
| PPLHL | HL~, HL+3*, HL+4, HL+5, HL+20 | 
| PSFLG | HL~, AAA+3*, AAA+4*, AAA+5*, AAA+6 | 
| PSHALP | HL~ | 
| PSHLCPRS | SUS+1~, SUS+2* | 
| PSOBADR | LAB+7~, LAB+8*, LAB+9*, LAB+10 | 
| >> PSODBQ | HL+11, SOMDQ+13 | 
| PSODTM | HL~, SETZ+1* | 
| >> PSOEXREP | PSOLBL4+15 | 
| PSOLLL | HL~, AAA+1*, AAA+5* | 
| PSOLLN | HL~, AAA+3*, AAA+5 | 
| >> PSOPAR | PSOLBL4+13*, PSOLBL4+14, HL+1 | 
| PSOQUE | HL~, SOMDQ*, SOMDQ+1 | 
| >> PSOSITE | PSOLBL4+9, PSOLBL4+12, SETZ+2, SETZ+5 | 
| >> PSOSUREP | ACLOG+2, RPT+1 | 
| PSOTEMP | LAB+7~, LAB+9*, LAB+10 | 
| QPRT | PSOLBL4+7~, PSOLBL4+12*, PSOLBL4+13 | 
| >> RXFL( | SOMDQ+5, SOMDQ+6, SOMDQ+10 | 
| >> RXPR( | SOMDQ+3, SOMDQ+4, SOMDQ+5, SOMDQ+6, SOMDQ+10, ACLOG+2, ACLOG+4 | 
| >> RXRP( | HL+9, ACLOG+2, RPT+1 | 
| X | PSOLBL4+7~, PSOLBL4+10*! | 
| Y | PSOLBL4+7~, PSOLBL4+10, PSOLBL4+11 | 
| >> ZTDESC | SETZ+5* | 
| >> ZTDTH | SETZ+3* | 
| >> ZTIO | PSOLBL4+8, PSOLBL4+10, SETZ+3* | 
| >> ZTRTN | SETZ+2* | 
| >> ZTSAVE("PSODTM" | SETZ+3* | 
| >> ZTSAVE("PSOLAP" | SETZ+3* | 
| >> ZTSAVE("PSOPAR" | SETZ+3* | 
| >> ZTSAVE("PSOSITE" | SETZ+3* | 
| >> ZTSAVE("RXFL(" | SETZ+4* | 
| >> ZTSAVE("RXPR(" | SETZ+4* | 
| >> ZTSAVE("RXRP(" | SETZ+4* | 
| >> ZTSAVE("RXRS(" | SETZ+4* | 
| >> ZTSAVE("^UTILITY($J,""PSOHL""," | SETZ+3* |