SROAPIMS ;BIR/ADM - PIMS Information Retrieval ;01/24/07
Source file <SROAPIMS.m>
action | A | extended action | Ea | event driver | Ed | subscriber | Su | protocol | O | limited protocol | LP | run routine | RR | broker | B | edit | E | server | Se | P | screenman | SM | inquire | I |
Name | Comments | DBIA/ICR reference |
---|---|---|
ADM | ; find date(s) of admission and discharge
|
|
ADSS | ; find date of admission/transfer to surgical service
|
|
DISSS | ; find date of discharge/transfer to chronic care
|
|
FOLLOW | ||
STAY | ; find length of post-operative hospital stay
|
|
END | ||
PRIOR | ; loop through previous movements
|
|
SERV | ; find service associated with movement
|
|
SPEC | ; find specialty associated with movement
|
|
NACUTE | ; determine if non-acute care transfer
|
|
MCAR | ||
EMPLOY | ; employment status preoperatively
|
|
ADM1 | ; get information related to admission
; determine if admission was for observation ; quit if no specialty defined for admission |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
DA | SROAPIMS+26!*, SPEC+1!* |
>> DFN | SROAPIMS+24*, SROAPIMS+27, ADM+3, MCAR*, MCAR+1, EMPLOY+1*, ADM1+8 |
DIC | SROAPIMS+26!*, SPEC+1!* |
DIE | END+9! |
DIQ | SROAPIMS+26!*, SPEC+1!* |
DIQ(0 | SROAPIMS+26*, SPEC+1* |
DR | SROAPIMS+26!*, END+9!, SPEC+1!* |
I | SROAPIMS+24*, END+1*, END+9!, ADM1+6* |
>> J | END+2*, END+3*, END+4*, ADM1+6* |
>> L | END+2*, END+3* |
SR | SROAPIMS+24~, END+9! |
SR(0 | SROAPIMS+24*, SROAPIMS+25, ADM+1 |
SR24 | ADM+3*, END+9! |
SR48 | END+9!, ADM1+8* |
SRCC | SROAPIMS+24~, DISSS+1*, FOLLOW*, END+9! |
SRD | END+9!, MCAR*, MCAR+1*, MCAR+2 |
SRDD | END+9!, MCAR+2*, MCAR+3 |
SRDO | END+9!, MCAR*, MCAR+3 |
SRDT | SROAPIMS+24~, ADM+3*, END+9!, ADM1+8*, ADM1+9 |
SRF | END+9!, MCAR*, MCAR+1* |
SRINOUT | END*, END+3, END+9! |
SRNON | SROAPIMS+24~, DISSS+1*, FOLLOW, FOLLOW+1*, FOLLOW+3, END+9!, NACUTE+1* |
SRQ | END+9!, MCAR*, MCAR+1, MCAR+3* |
>> SRSAVE | DISSS+1, ADM1+10* |
>> SRSDATE | ADM+1*, ADM+3, ADM1+10 |
>> SRSERV | ADSS+1*, PRIOR+2*, PRIOR+3 |
SRSOUT | ADM+1~*, ADM+4, ADM1+3*, ADM1+4, ADM1+8*, ADM1+9* |
SRSP | END+9!, SERV+1, SPEC+1*, NACUTE+1, ADM1+4, ADM1+5 |
SRSRV | SROAPIMS+24~, ADSS+1, END+9!, PRIOR+1, PRIOR+2, SERV+1* |
>> SRTN | SROAPIMS+24, SROAPIMS+27, ADM+3, STAY+1, END, END+2, END+3, END+4, END+5, END+6 , END+7, MCAR, MCAR+3, EMPLOY+1, ADM1+6, ADM1+8 |
>> SRVADPT( | SROAPIMS+24*, END+1*, END+2, END+3, ADM1+6 |
>> SRVADPT(1 | SROAPIMS+25* |
>> SRVADPT(10 | FOLLOW+3*, STAY+1 |
>> SRVADPT(11 | STAY+2*, END+2, END+3 |
>> SRVADPT(12 | END+4, ADM1+5* |
>> SRVADPT(13 | ADM1+5* |
>> SRVADPT(14 | ADM1+5* |
>> SRVADPT(15 | SROAPIMS+27* |
>> SRVADPT(2 | SROAPIMS+25* |
>> SRVADPT(3 | SROAPIMS+25* |
>> SRVADPT(4 | SROAPIMS+25* |
>> SRVADPT(5 | SROAPIMS+26*, END |
>> SRVADPT(6 | SROAPIMS+25*, END+5, END+6 |
>> SRVADPT(7 | END, END+2, END+3, ADM1+10* |
>> SRVADPT(8 | FOLLOW+3, ADM1+10* |
>> SRVADPT(9 | ADSS+1*, END*, PRIOR+3* |
SRX | SROAPIMS+26*, ADSS+1*, FOLLOW+2*, END+9!, PRIOR+1*, SPEC+1, ADM1+3* |
SRY | SROAPIMS+26!, END+9!, SPEC+1! |
SRY( | SPEC+1 |
SRY(10 | SROAPIMS+26 |
>> VA("PID" | SROAPIMS+25 |
>> VADM(1 | SROAPIMS+25 |
>> VADM(3 | SROAPIMS+25 |
>> VADM(5 | SROAPIMS+25 |
>> VADM(6 | SROAPIMS+25 |
>> VADM(8 | SROAPIMS+26 |
>> VAIP("D" | ADM+1*, ADM+3*, DISSS+1*, FOLLOW*, PRIOR+2*, ADM1+9* |
>> VAIP(1 | ADSS+1 |
>> VAIP(13 | ADM+3, ADM+4, ADM1+3, ADM1+5, ADM1+8, ADM1+9, ADM1+10 |
>> VAIP(15 | ADSS+2, PRIOR+1, PRIOR+2 |
>> VAIP(16 | FOLLOW, FOLLOW+1, FOLLOW+2, FOLLOW+3 |
>> VAIP(17 | ADM1+5, ADM1+10 |
>> VAIP(2 | ADSS+1 |
>> VAIP(3 | ADSS+1 |
>> VAIP(8 | ADSS+1 |
>> VAPD(7 | EMPLOY+1 |
X | ADM+3, STAY+1*, STAY+2*, END+1*, END+9!, ADM1+8 |
X1 | ADM+3*, STAY+1*, STAY+2, END+9!, ADM1+8* |
>> X2 | ADM+3*, STAY+2*, ADM1+8* |
Y | SROAPIMS+25*, STAY+2*, END+9!, SERV+1*, NACUTE+1*, ADM1+4* |
>> Z | SROAPIMS+25* |