PRCPUPAT ;WISC/RFJ-move item from prim to seco to patient ;09 Mar 94
Source file <PRCPUPAT.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 |
---|---|---|
PATIENT(PATDFN,SURGDA) | ; create patient distribution entry for patdfn
; return entry created |
|
SURGERY(DA,SURGDA) | ; update distribution with surgery data
|
|
ADD(DATETIME,PATDFN) | ||
DISTITEM(DATETIME,ITEMDA,QTY,COST) | ; distribute itemda to patient
; qty and cost distributed |
|
SELECT() | ; return selected entry
|
FileNo | Call Tags |
---|---|
^PRCP(446.1 - [#446.1] | Classic Fileman Calls |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^PRCP(446.1 - [#446.1] | SURGERY+1, SURGERY+20, SURGERY+22, ADD+2, ADD+5, DISTITEM+2, DISTITEM+3, DISTITEM+5, DISTITEM+6, DISTITEM+9 , DISTITEM+12*, DISTITEM+13*, DISTITEM+14 |
Name | Line Occurrences |
---|---|
$$ADD | PATIENT+5 |
SURGERY | PATIENT+6 |
Name | Field # of Occurrence |
---|---|
^(0 | DISTITEM+6* |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
% | PATIENT+2~, PATIENT+5, SURGERY+2~, ADD+1~, SELECT+1~ |
%H | PATIENT+2~ |
%I | PATIENT+2~ |
COST | DISTITEM~, DISTITEM+11, DISTITEM+13 |
D0 | SURGERY+2~, ADD+1~, DISTITEM+7~ |
DA | PATIENT+2~, PATIENT+5*, PATIENT+6, PATIENT+7, SURGERY~, SURGERY+1, SURGERY+20, SURGERY+22, ADD+1~, DISTITEM+7~ |
DA(1 | DISTITEM+8* |
DATA | DISTITEM+4~, DISTITEM+9*, DISTITEM+10*, DISTITEM+11*, DISTITEM+12 |
DATETIME | ADD~, ADD+3, DISTITEM~, DISTITEM+2, DISTITEM+3, DISTITEM+5, DISTITEM+6, DISTITEM+8, DISTITEM+9, DISTITEM+12 , DISTITEM+13, DISTITEM+14 |
DD | ADD+1~, DISTITEM+7~ |
DI | SURGERY+2~, ADD+1~ |
DIC | SURGERY+2~, SURGERY+21*, ADD+1~, ADD+3*, DISTITEM+7~, DISTITEM+8*, SELECT+1~, SELECT+2* |
DIC("DR" | ADD+3* |
DIC(0 | ADD+3*, DISTITEM+8*, SELECT+2* |
DIE | SURGERY+2~, SURGERY+21*, ADD+1~ |
DINUM | ADD+1~, ADD+3*, DISTITEM+8* |
DLAYGO | ADD+1~, ADD+3*, DISTITEM+7~, DISTITEM+8* |
DQ | SURGERY+2~, ADD+1~ |
DR | SURGERY+2~, SURGERY+7*, SURGERY+9*, SURGERY+11*, SURGERY+13*, SURGERY+15*, SURGERY+17*, ADD+1~ |
ITEMDA | DISTITEM~, DISTITEM+5, DISTITEM+8, DISTITEM+9, DISTITEM+12 |
OPCODE | SURGERY+2~, SURGERY+17* |
OPROOM | SURGERY+2~, SURGERY+9* |
PATDFN | PATIENT~, PATIENT+3, PATIENT+5, ADD~, ADD+3 |
PRCPPRIV | ADD+1~, ADD+3*, SELECT+1~, SELECT+2* |
PRCPSDAT | SURGERY+2~ |
PRCPSDAT(130 | SURGERY+5, SURGERY+7, SURGERY+9, SURGERY+11, SURGERY+13, SURGERY+15, SURGERY+17 |
QTY | DISTITEM~, DISTITEM+10 |
SURGDA | PATIENT~, PATIENT+6, SURGERY~, SURGERY+4, SURGERY+5, SURGERY+7, SURGERY+9, SURGERY+11, SURGERY+13, SURGERY+15 , SURGERY+17 |
SURGDATA | SURGERY+2~ |
SURGEON | SURGERY+2~, SURGERY+15* |
SURGSPEC | SURGERY+2~, SURGERY+11* |
X | PATIENT+2~, SURGERY+2~, ADD+1~, ADD+3*, DISTITEM+7~, DISTITEM+8*, SELECT+1~ |
Y | PATIENT+2~, SURGERY+2~, ADD+1~, ADD+6, DISTITEM+7~, SELECT+1~, SELECT+4 |