MCARE ;WISC/RMP-EDIT ROUTINES ;1/23/03 20:45
Source file <MCARE.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
ENTER | ;ENTER NEW CARDIAC PROCEDURES (SCREEN HANDLER)
|
|
DATE | ;SELECT PROCEDURE DATE
|
|
EXIT | ;
|
|
EXISTS | ;
|
|
BACK | ; If the record is superseded, the user will be allow to edit the superseded record.
|
|
HELP | ||
EDIT | ||
ECGCH | ;S:$D(^MCAR(691.5,DJDN,"A")) DJSC="MCARECGA" Q
|
|
CENTER(TEXT,MGN) | ;
|
|
MCEPROC | ; Get the required variables from the PROCEDURE/SUBSPECIALTY file
|
|
MCPROP(MCPROP) | ;
|
Name | Line Occurrences |
---|---|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
FileNo | Call Tags |
---|---|
^MCAR(690 - [#690] | Classic Fileman Calls |
^MCAR(700 - [#700] | GET1^DIQ |