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~ |