IBDFRPC4 ;ALB/AAS - AICS Pass data to PCE, Broker Call ; 24-FEB-96
Source file <IBDFRPC4.m>
| Package | Total | Call Graph | 
|---|---|---|
| Automated Information Collection System | 5 | $$FSCND^IBDF18C (INPT,PRO,SETPXCA,VSTPXCA)^IBDF18E0 SETTEMP^IBDF18E1 LOGERR^IBDF18E2 QUE^IBDF18E3 | 
| PCE Patient Care Encounter | 1 | FOREGND^PXCA | 
| Package | Total | Caller Graph | 
|---|---|---|
| Automated Information Collection System | 2 | IBDFDE1 IBDFDE7 | 
| Name | Comments | DBIA/ICR reference | 
|---|---|---|
| END | ||
| VALQ | ||
| SEND(RESULT,IBDF) | ; -- procedure ; -- broker call to set data into pxca array and send to pce ; rpc := IBD RECEIVE DATA | |
| TYPE(X) | ; -- Change external to internal for hand print fields | |
| INPUT(PI,X) | ; -- convert external value to internal value | 
| RPC Name | Call Tags | 
|---|---|
| IBD RECEIVE DATA | SEND | 
| Name | Line Occurrences (* Changed, ! Killed) | 
|---|---|
| ^IBD(357.09 - [#357.09] | SEND+82 | 
| ^IBD(357.96 - [#357.96] | SEND+39 | 
| ^IBD(357.98 - [#357.98] | SEND+67 | 
| ^IBE(357.6 - [#357.6] | INPUT+2 | 
| ^IBE(359.1 - [#359.1] | TYPE+2 | 
| Name | Line Occurrences | 
|---|---|
| $$INPUT | SEND+62 | 
| $$TYPE | SEND+68 | 
| END | SEND+45 | 
| Name | Field # of Occurrence | 
|---|---|
| ^(9 | INPUT+2 | 
| >> | Not killed explicitly | 
| * | Changed | 
| ! | Killed | 
| ~ | Newed | 
| Name | Field # of Occurrence | 
|---|---|
| D | SEND+32~ | 
| D0 | SEND+32~ | 
| D1 | SEND+32~ | 
| D2 | SEND+32~ | 
| DA | SEND+32~ | 
| DELEX | SEND+59~, SEND+70* | 
| DIC | SEND+32~ | 
| DIE | SEND+32~ | 
| DR | SEND+32~ | 
| DUZ | SEND+54 | 
| FID | SEND+32~, SEND+58*, SEND+60, SEND+69 | 
| FORMID | SEND+32~, SEND+57*, SEND+60 | 
| HEADER | SEND+32~, SEND+59~, SEND+64*, SEND+65* | 
| I | SEND+32~ | 
| >> IBD("AICS" | SEND+83*, SEND+89! | 
| IBDF | SEND~ | 
| IBDF( | SEND+58 | 
| IBDF("AO" | SEND+53 | 
| IBDF("APPT" | SEND+41*, SEND+45, SEND+53, SEND+92 | 
| IBDF("CLINIC" | SEND+43*, SEND+45, SEND+53 | 
| IBDF("CO" | SEND+53 | 
| IBDF("DFN" | SEND+40*, SEND+45, SEND+53, SEND+92 | 
| IBDF("EC" | SEND+53 | 
| IBDF("FORM" | SEND+39, SEND+46, SEND+50, SEND+54, SEND+57, SEND+95 | 
| IBDF("FRMDEF" | SEND+42*, SEND+54 | 
| IBDF("IR" | SEND+53 | 
| IBDF("MST" | SEND+53 | 
| IBDF("PASSFLAG" | SEND+82*, SEND+87, SEND+88, SEND+98 | 
| IBDF("SC" | SEND+53 | 
| ITEM | SEND+32~, SEND+59~, SEND+69* | 
| J | SEND+32~ | 
| NODE | SEND+32~, SEND+58*, SEND+60, SEND+61, SEND+62, SEND+63, SEND+64, SEND+67, SEND+68, SEND+70 , SEND+71, SEND+72 | 
| PI | SEND+32~, SEND+59~, SEND+61*, SEND+62, INPUT~, INPUT+1, INPUT+2 | 
| PROVIDER | SEND+32~ | 
| PXCA | SEND+35!, SEND+36*, SEND+88, SEND+98! | 
| PXCA("ENCOUNTER" | SEND+53* | 
| PXCA("SOURCE" | SEND+54* | 
| PXCA("WARNING" | SEND+92 | 
| PXCASTAT | SEND+36*, SEND+88, SEND+95, SEND+97, SEND+98! | 
| PXKDONE | SEND+32~ | 
| QLFR | SEND+32~, SEND+59~, SEND+67* | 
| QUANTITY | SEND+32~, SEND+59~, SEND+71* | 
| RESULT | SEND~, SEND+33*, SEND+47* | 
| RESULT(0 | SEND+97* | 
| SDFN | SEND+32~ | 
| >> SLCTN | SEND+72* | 
| STATUS | SEND+32~, SEND+46*, SEND+50*, SEND+95* | 
| SUBHDR | SEND+32~, SEND+59~, SEND+64*, SEND+65* | 
| >> TEMP("ENCOUNTER" | SEND+78 | 
| TEXT | SEND+32~, SEND+59~, SEND+63* | 
| TNODE | SEND+32~, SEND+39*, SEND+40, SEND+41, SEND+42, SEND+43 | 
| TYPE | SEND+32~, SEND+59~, SEND+68* | 
| VALUE | SEND+32~, SEND+59~, SEND+62* | 
| VSIT | SEND+32~ | 
| X | SEND+32~, INPUT~, INPUT+1, VALQ, TYPE~, TYPE+2 | 
| Y | SEND+32~, TYPE+1~*, TYPE+2*, TYPE+3 |