©2011-2018 Open Source Electronic Health Record Alliance
This work is licensed under a Creative Commons Attribution 3.0 Unported License
This work is licensed under a Creative Commons Attribution 3.0 Unported License
BOPROC ; ILC/IHS/ALG - Process FT1 statments;14-Nov-2006 10:45;SM;
Source file <BOPROC.m>
| Package | Total | Call Graph |
|---|---|---|
| VA Fileman | 4 | FILE^DICN (FILE,UPDATE)^DIE IX1^DIK $$GET1^DIQ |
| IHS Omnicell Pyxis Interface | 2 | ($$GETLINK,COMBINE,FINDITMS)^BOPSD ENTRY^BOPUVER |
| Health Level Seven | 1 | $$FMDATE^HLFNC |
| Kernel | 1 | $$NOW^XLFDT |
| Outpatient Pharmacy | 1 | ENQ^PSORXDL |
| Registration | 1 | INP^VADPT |
| Package | Total | Caller Graph |
|---|---|---|
| IHS Omnicell Pyxis Interface | 2 | BOPRNEW1 BOPUVER |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| VENDTYP() | ;EP
|
|
| ADDXTRA | ; EP
|
|
| ADDRECDG(DRUG,PAT,VDATE,ORDNUM,QVEND,ORDBY,ORDTYP,DISNAM) | ;
|
|
| RUN | ; first check if supply or drug
|
|
| LOGEXN(BOPERR) | ; EP
|
|
| GDRGPRC(DIEN,AWPFLG) | ; EP
|
|
| SUPFILE | ; Set item into IHS HL7 Supply Interface file
; supply file only - don't create unverified order |
|
| ORDNUM(BOPFT1) | ;EP
|
|
| CHK | ; chk point
; basic check |
|
| ONE | ;
|
|
| DONE | ||
| DRGIEN(BOPFT1) | ;EP
|
|
| TRANTYP(BOPFT1) | ;EP
|
|
| L1 | ;
|
|
| IHSHRN | ||
| DFT(BOPI) | ;EP - This is the entry point to process the FT1/DFT messages
; BOPI = IEN for file 90355.1 (BOP QUEUE File) |
|
| ISINPT(DFN) | ;EP
|
|
| LOOP |
| Name | Field # of Occurrence |
|---|---|
| $$GETLINK^BOPSD | IHSHRN+25 |
| COMBINE^BOPSD | ADDRECDG+8 |
| FINDITMS^BOPSD | ADDRECDG+5 |
| ENTRY^BOPUVER | RUN+30 |
| FILE^DICN | RUN+32, CHK+19 |
| FILE^DIE | ADDXTRA+7 |
| UPDATE^DIE | ADDRECDG+22, LOGEXN+16 |
| IX1^DIK | RUN+37, CHK+37 |
| $$GET1^DIQ | CHK+25, GDRGPRC+5, GDRGPRC+6, VENDTYP+1 |
| $$FMDATE^HLFNC | CHK+7 |
| ENQ^PSORXDL | RUN+28 |
| INP^VADPT | ISINPT+2 |
| $$NOW^XLFDT | RUN+31, LOGEXN+3 |
| FileNo | Call Tags |
|---|---|
| ^PSDRUG - [#50] | GET1^DIQ |
| ^AUPNSUP - [#9000021] | Classic Fileman Calls |
| ^BOP(90355 - [#90355] | GET1^DIQ |
| ^BOP(90355.44 - [#90355.44] | Classic Fileman Calls |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^ABMCM("D" | CHK+31 |
| ^ABMDFEE(1 | CHK+32 |
| ^APSPCTRL - [#9009033] | RUN+18, RUN+19, RUN+20 |
| ^AUPNPAT - [#9000001] | IHSHRN+8 |
| ^AUPNSUP - [#9000021] | CHK+23*, CHK+25*, CHK+27*, CHK+28*, CHK+33*, CHK+35* |
| ^AUPNVSIT - [#9000010] | CHK+11 |
| ^AUPNVSIT("AC" | CHK+10 |
| ^BOP(90355 - [#90355] | DFT+10 |
| ^BOP(90355.1 - [#90355.1] | DFT+9, RUN+38*, CHK+42* |
| ^BOP(90355.2 - [#90355.2] | ADDRECDG+10 |
| ^BOP(90355.44 - [#90355.44] | RUN+21, RUN+33, RUN+35*, RUN+36* |
| ^BOP(90355.5 - [#90355.5] | RUN+10 |
| ^DPT - [#2] | RUN+3, IHSHRN+9, CHK+5 |
| ^PS(55 - [#55] | CHK+15, ADDXTRA+3 |
| ^VA(200 - [#200] | IHSHRN+22 |
| Name | Line Occurrences |
|---|---|
| $$DRGIEN | RUN+6, CHK+35 |
| $$GDRGPRC | CHK+35 |
| $$ISINPT | RUN+5 |
| $$ORDNUM | IHSHRN+23 |
| $$TRANTYP | RUN+13, IHSHRN+16 |
| $$VENDTYP | IHSHRN+14, ORDNUM+2, DRGIEN+2, TRANTYP+2 |
| ADDRECDG | CHK+48 |
| ADDXTRA | CHK+45 |
| DONE | ONE+1 |
| L1 | L1+3, L1+4, L1+5, RUN+2, RUN+3, RUN+7, RUN+15, RUN+39, CHK+4, CHK+5 , CHK+6, CHK+20, CHK+50 |
| LOGEXN | RUN+2, RUN+3, RUN+7, CHK+4, CHK+5, CHK+6, CHK+20 |
| LOOP | ONE+1, ONE+6 |
| ONE | ONE+3, ONE+4, ONE+6 |
| SUPFILE | RUN+12 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| %APSITE | RUN+16~, RUN+18* |
| %APSITE2 | RUN+16~, RUN+19* |
| %APSITE3 | RUN+16~, RUN+20* |
| A | DFT+3~, LOOP*, L1+1*, L1+2, IHSHRN+2~, IHSHRN+3*, IHSHRN+4*, IHSHRN+6*, IHSHRN+7 |
| APSDRTDA | RUN+16~ |
| ARY | ADDRECDG+1~, ADDRECDG+5, ADDRECDG+8 |
| ARY(0 | ADDRECDG+6 |
| AWPFLG | GDRGPRC~, GDRGPRC+2*, GDRGPRC+5 |
| B | DFT+3~, LOOP*, IHSHRN+2~, IHSHRN+3*, IHSHRN+4*, IHSHRN+6, CHK+11*, CHK+12*, CHK+13 |
| BOMS | DFT+3~, ONE+3*, ONE+10, ONE+12, LOOP* |
| >> BOP3PCM | CHK+2*, CHK+31*, CHK+32 |
| >> BOP3PPRC | CHK+2*, CHK+32*, CHK+33 |
| >> BOPAMID | DFT+7* |
| BOPARY | DFT+12!, ONE+7!*, ONE+16*, ONE+17*, L1+1! |
| BOPARY( | ONE+16*, ONE+17*, L1+1, L1+2 |
| BOPARY(1 | ONE+7* |
| BOPARY(2 | ONE+1, ONE+6 |
| BOPARY(4 | ONE+12*, ONE+18*, L1+7 |
| >> BOPATDOC | IHSHRN+13* |
| >> BOPAUDA | CHK+21*, CHK+23, CHK+25, CHK+27, CHK+28, CHK+33, CHK+35, CHK+37, CHK+42 |
| >> BOPAUVST | CHK+9*, CHK+13*, CHK+14, CHK+42 |
| >> BOPCRCH | RUN+13*, RUN+15 |
| >> BOPDAS | RUN+30, RUN+33*, RUN+35, RUN+36, RUN+37, RUN+38 |
| >> BOPDB | RUN+8*, RUN+30, RUN+34, CHK+24, CHK+30, CHK+34, CHK+44, CHK+47 |
| >> BOPDESC | IHSHRN+14*, CHK+6, CHK+19, CHK+28 |
| >> BOPDFN | DFT+7*, RUN+2*, RUN+3, RUN+5, RUN+21, IHSHRN, IHSHRN+11*, IHSHRN+25, CHK+4, CHK+5 , CHK+10, CHK+15, CHK+22, CHK+42, CHK+48, ADDXTRA+1, ADDXTRA+3, ADDXTRA+5, LOGEXN+4 |
| >> BOPDREC | RUN+10*, RUN+12 |
| BOPDRGI | DFT+3~, RUN+6*, RUN+7, RUN+10, RUN+21, RUN+38, IHSHRN+25, CHK+48, ADDXTRA+1, ADDXTRA+3 , LOGEXN+13 |
| >> BOPDRUG | CHK+3* |
| BOPDT | DFT+3~, DFT+6*, RUN+31*, RUN+32, IHSHRN+15*, CHK+7 |
| BOPDTA | DFT+3~, CHK+7*, CHK+13, CHK+14, CHK+22 |
| BOPERR | LOGEXN~, LOGEXN+12 |
| >> BOPEVN | L1+5*, L1+7* |
| >> BOPEXFN | SUPFILE+4*, IHSHRN+1, IHSHRN+4, IHSHRN+5 |
| BOPFT1 | L1+6*, RUN+6, RUN+8, RUN+13, RUN+36, IHSHRN+14, IHSHRN+15, IHSHRN+16, IHSHRN+17, IHSHRN+18 , IHSHRN+20, IHSHRN+21, IHSHRN+23, CHK+35, ORDNUM~, ORDNUM+4, ORDNUM+6, DRGIEN~, DRGIEN+7, TRANTYP~ , TRANTYP+3 |
| BOPI | DFT~, DFT+9, RUN+34, RUN+38, CHK+42, ADDRECDG+19, LOGEXN+15 |
| >> BOPIN( | ONE+1, ONE+2, ONE+8, ONE+12, ONE+14 |
| >> BOPJ | DFT+12*, ONE+1*, ONE+2, ONE+3, ONE+6*, ONE+8*, ONE+9, ONE+14, CHK+42 |
| >> BOPLOC | IHSHRN+12* |
| >> BOPMID | DFT+6* |
| >> BOPMSU | DFT+6*, IHSHRN+20* |
| >> BOPNAME | DFT+8*, SUPFILE+2* |
| >> BOPNU | DFT+7* |
| >> BOPOB | DFT+7*, IHSHRN+21*, IHSHRN+22*, CHK+48 |
| >> BOPORDN | IHSHRN+23*, IHSHRN+24, IHSHRN+25*, CHK+14, CHK+15, CHK+44, CHK+48, ADDXTRA+1, ADDXTRA+3, ADDXTRA+5 , LOGEXN+6, LOGEXN+10 |
| BOPORDT | DFT+3~, CHK+7*, CHK+13*, CHK+14, CHK+16*, CHK+22, CHK+28, LOGEXN+5 |
| >> BOPPID | L1+3*, RUN+1, RUN+2, RUN+34, RUN+36, RUN+38, SUPFILE+2, SUPFILE+4, SUPFILE+5 |
| >> BOPPRDN | DFT+6* |
| BOPPRICE | CHK+3*, GDRGPRC+3~, GDRGPRC+4*, GDRGPRC+5*, GDRGPRC+6*, GDRGPRC+7 |
| BOPPSRX | RUN+16~, RUN+17*, RUN+21*, RUN+23, RUN+28 |
| >> BOPPV1 | L1+4*, RUN+36, IHSHRN+12, IHSHRN+13 |
| >> BOPPYNM | DFT+8* |
| >> BOPSITE | DFT+6*, DFT+9*, DFT+10*, DFT+11, RUN+18, RUN+19, RUN+20 |
| >> BOPSSN | SUPFILE+5* |
| >> BOPTC | DFT+6*, IHSHRN+17*, CHK+25, CHK+27, CHK+31 |
| >> BOPTQ | DFT+7*, IHSHRN+18*, IHSHRN+19 |
| >> BOPTQA | DFT+7*, IHSHRN+19*, CHK+28, CHK+48, ADDXTRA+6, LOGEXN+7 |
| >> BOPTT | DFT+6*, IHSHRN+16*, IHSHRN+19 |
| >> BOPTYP | DFT+7* |
| >> BOPUSER | RUN+1* |
| BOPVDT | DFT+3~, CHK+7*, CHK+48 |
| C | DFT+3~, LOOP* |
| COM | RUN+24~ |
| D | RUN+33*, IHSHRN+2~, IHSHRN+3*, IHSHRN+6*, IHSHRN+10*, IHSHRN+11 |
| DA | RUN+24~, RUN+28*, RUN+37~*!, CHK+37~*! |
| DD | RUN+32!, CHK+19! |
| DFN | RUN+24~, ISINPT~ |
| DIC | RUN+32~*, CHK+19~* |
| DIC(0 | RUN+32*, CHK+19* |
| DIEN | ADDXTRA+2~, ADDXTRA+3*, ADDXTRA+4, ADDXTRA+5, GDRGPRC~, GDRGPRC+1, GDRGPRC+5, GDRGPRC+6 |
| DIK | RUN+24~, RUN+37~*!, CHK+37~*! |
| DISNAM | ADDRECDG~, ADDRECDG+20 |
| DO | RUN+32!, CHK+19! |
| DRUG | ADDRECDG~, ADDRECDG+5, ADDRECDG+11, ADDRECDG+12 |
| E | RUN+34*, RUN+35, IHSHRN+2~, IHSHRN+3*, IHSHRN+7*, IHSHRN+8, IHSHRN+9, IHSHRN+10 |
| F | ONE+16*, ONE+17*, IHSHRN+2~, IHSHRN+3*, IHSHRN+7* |
| FDA | ADDXTRA+2~, ADDRECDG+1~, LOGEXN+1~ |
| FDA( | ADDXTRA+6*, ADDRECDG+12*, ADDRECDG+13*, ADDRECDG+14*, ADDRECDG+15*, ADDRECDG+16*, ADDRECDG+17*, ADDRECDG+18*, ADDRECDG+19*, ADDRECDG+20* , ADDRECDG+21*, LOGEXN+3*, LOGEXN+4*, LOGEXN+5*, LOGEXN+6*, LOGEXN+7*, LOGEXN+10*, LOGEXN+12*, LOGEXN+13*, LOGEXN+15* |
| FN | LOGEXN+1~, LOGEXN+2*, LOGEXN+3, LOGEXN+4, LOGEXN+5, LOGEXN+6, LOGEXN+7, LOGEXN+10, LOGEXN+12, LOGEXN+13 , LOGEXN+15 |
| G | IHSHRN+2~, IHSHRN+3*, IHSHRN+8*, IHSHRN+9*, CHK+15*, CHK+16 |
| I | ONE+12~*, ONE+13!, RUN+24~, RUN+36* |
| IEN | ADDRECDG+1~, ADDRECDG+6*, ADDRECDG+7, ADDRECDG+8, ADDRECDG+9, ADDRECDG+10 |
| IENS | ADDXTRA+5*, ADDXTRA+6, ADDRECDG+2*, ADDRECDG+9*, ADDRECDG+12, ADDRECDG+13, ADDRECDG+14, ADDRECDG+15, ADDRECDG+16, ADDRECDG+17 , ADDRECDG+18, ADDRECDG+19, ADDRECDG+20, ADDRECDG+21, LOGEXN+1~, LOGEXN+2*, LOGEXN+3, LOGEXN+4, LOGEXN+5, LOGEXN+6 , LOGEXN+7, LOGEXN+10, LOGEXN+12, LOGEXN+13, LOGEXN+15 |
| INPAT | DFT+3~, RUN+5*, RUN+12, CHK+44, CHK+47 |
| >> K | ONE+8*, ONE+12 |
| MSG | ADDXTRA+2~, ADDRECDG+1~, LOGEXN+1~ |
| >> OPMSUN | DFT+8* |
| ORDBY | ADDRECDG~, ADDRECDG+17 |
| ORDNUM | ADDRECDG~, ADDRECDG+4, ADDRECDG+15, ADDRECDG+18, ADDRECDG+21 |
| ORDTYP | ADDRECDG~, ADDRECDG+18 |
| >> OUT | ONE+8*, ONE+15*, ONE+19*, CHK+10*, CHK+13* |
| PAT | ADDRECDG~, ADDRECDG+5, ADDRECDG+13 |
| PSOABCDA | RUN+24~ |
| PSOIB | RUN+24~ |
| PSONOOR | RUN+16~, RUN+24~, RUN+25* |
| PSOZVER | RUN+24~, RUN+26* |
| QVEND | ADDRECDG~, ADDRECDG+10*, ADDRECDG+16 |
| RES | ORDNUM+1~, ORDNUM+4*, ORDNUM+6*, ORDNUM+7, DRGIEN+1~, DRGIEN+7*, DRGIEN+8, TRANTYP+1~, TRANTYP+3*, TRANTYP+5* , TRANTYP+6 |
| RX | RUN+24~ |
| RXN | RUN+24~ |
| STAT | RUN+24~ |
| U | DFT+9, DFT+10, RUN+34, RUN+35, RUN+38, IHSHRN+12, IHSHRN+14, IHSHRN+17, IHSHRN+21, CHK+12 , CHK+15, CHK+20, CHK+22, CHK+23, CHK+28, CHK+32, CHK+33, CHK+35, DRGIEN+7, ADDRECDG+10 |
| VAERR | ISINPT+1~ |
| VAIN | ISINPT+1~ |
| VAIN(1 | ISINPT+3 |
| VDATE | ADDRECDG~, ADDRECDG+14 |
| VEND | ORDNUM+1~, ORDNUM+2*, ORDNUM+3, ORDNUM+5, DRGIEN+1~, DRGIEN+2*, TRANTYP+1~, TRANTYP+2*, TRANTYP+4 |
| X | ONE+2*, ONE+3, ONE+4, ONE+6, ONE+7, ONE+12~*, ONE+13!, ONE+14*, ONE+15, ONE+16 , ONE+17, ONE+18, L1+2*, L1+3, L1+4, L1+5, L1+6, RUN+8*, RUN+32*, CHK+9* , CHK+10*, CHK+11, CHK+13, CHK+19*, CHK+22*, CHK+23, CHK+42* |
| >> Y | RUN+33, CHK+20, CHK+21 |