MCARPROC ;WISC/TJK,RCH-STORE PROCEDURES IN MEDICINE PATIENT FILE ;7/30/96 13:48
Source file <MCARPROC.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 |
Package | Total | Caller Graph |
---|---|---|
Medicine | 15 | ^MCAR(691 ^MCAR(691.1 ^MCAR(691.5 ^MCAR(691.6 ^MCAR(691.7 ^MCAR(691.8 ^MCAR(694 ^MCAR(698 ^MCAR(698.1 ^MCAR(698.2 ^MCAR(698.3 ^MCAR(699 ^MCAR(699.5 ^MCAR(700 ^MCAR(701 |
Name | Comments | DBIA/ICR reference |
---|---|---|
INIT | ;INITIALIZE VARIABLES
|
|
CHGDTE | ;CHANGE PROCEDURE DATE
|
|
CHGDTE1 | ;SET "AC" CROSS-REFERENCE WITH NEW DATE
|
|
CHGPAT | ;TRANSFER PROCEDURE FROM ONE PATIENT TO ANOTHER
|
|
OLDAC | ||
CONT | ;NEW PROCEDURE
|
|
CONT1 | ;STORE PROCEDURE IN "AC" CROSS REFERENCE OF MEDICINE PATIENT FILE
|
|
END | ||
KILL | ||
MEDSET | ;THIS SECTION SETS MEDICINE CODE AND CROSS-REFERENCE IN DRUG FILE
|
|
MEDKILL | ;THIS SECTION DELETES MEDICINE CODE WHEN MEDICATION DELETED FROM MEDICATION FILE
|
|
RBLD | ||
RBLD1 |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^MCAR( | RBLD1 |
^MCAR(690 - [#690] | OLDAC!, CONT1+1* |
^PSDRUG - [#50] | MEDSET+2*, MEDSET+3, MEDKILL+2, MEDKILL+3*, MEDKILL+4 |
^PSDRUG("AIUM" | MEDSET+3*, MEDKILL+4! |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
CD | INIT+2*!, CHGDTE+1, CHGDTE1+1, OLDAC, CONT+1*, CONT1+1, END!, KILL*!, RBLD~, RBLD1 |
DA | INIT+1, OLDAC, CONT1+1, KILL, MEDSET+2, MEDSET+3, MEDKILL+2, MEDKILL+3, MEDKILL+4, RBLD~ , RBLD1* |
II | RBLD~, RBLD+1*, RBLD+2!, RBLD1 |
MCARCDIE | INIT+1*!, INIT+2!, CHGDTE+1, CHGDTE1+1, CHGPAT+1, OLDAC, CONT1+1, END!, KILL, RBLD1* |
MCAROLDT | CHGDTE+1*, OLDAC, END!, KILL*! |
MCARX | MEDKILL+2*, MEDKILL+3, MEDKILL+5! |
MCARY | MEDKILL+2*, MEDKILL+5! |
U | INIT+1, INIT+2, OLDAC, CONT1+1, KILL, MEDSET+2, MEDSET+3, MEDKILL+2, MEDKILL+3, MEDKILL+4 |
>> X | CHGDTE+1, CHGDTE1+1, CONT+1, KILL |
XX | INIT+1!, INIT+2*!, CHGDTE1+1*, CHGPAT+1, CONT1+1, END!, RBLD~ |