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 |