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 |