MCARPROC ;WISC/TJK,RCH-STORE PROCEDURES IN MEDICINE PATIENT FILE ;7/30/96 13:48
Source file <MCARPROC.m>
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 |