MCARAM5 ;WASH ISC/JKL-MUSE TRANSFER LOCAL DATA INTO DHCP ;4/24/96 09:24
Source file <MCARAM5.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| EKG(MCA,MCE) | ;Transfer local array data into new EKG record in DHCP
; USAGE: S X=$$EKG^MCARAM5(.A,.B) ; WHERE: A=array of local data ; B=array of DHCP data ; including internal record number of EKG file ; if successful, returns function value of 0 ; if unsuccessful, returns error message ; check for valid SSN |
|
| EKGDG(MCA,MCE) | ; Transfer local array diagnosis data into EKG record
; USAGE: S X=$$EKGDG^MCARAM5(.A,.B) ; WHERE: A=array of diagnosis data ; B=array of DHCP data ; including internal record number of EKG file ; if successful, returns function value of 0 ; if unsuccessful, returns error message |
|
| EKGRX(MCA,MCE) | ; Transfer local array medication data into EKG record
; USAGE: S X=$$EKGDG^MCARAM5(.A,.B) ; WHERE: A=array of medication data ; B=array of DHCP data ; including internal record number of EKG file ; if successful, returns function value of 0 ; if unsuccessful, returns error message |
|
| EKGOR(MCA,MCE) | ;Transfer order entry data into EKG record
; USAGE: S X=$$EKGOR^MCARAM5(.A,.B) ; WHERE: A=array of local data ; including print name for ECG procedure/subspecialty ; B=array of DHCP data ; including internal record number of EKG file ; if successful, returns function value of 0 ; if unsuccessful, returns error message |
|
| NMCHK(MCA,MCP) | ;Check name input against patient data
; Marquette allows 16 chars for last name and 10 chars for first etc. ; USAGE: S X=$$NMCHK^MCARAM5(.MCA,.MCP) ; WHERE: MCA=array of local data ; MCP=array of DHCP patient data ; if successful, returns function value of 0 ; if unsuccessful, returns error message |
|
| SSNCHK(MCA,MCP) | ;Check SSN input
; USAGE: S X=$$SSNCHK^MCARAM5(.MCA,.MCP) ; WHERE: MCA=array of local data ; MCP=array of DHCP patient data ; if successful, returns function value of 0 ; if unsuccessful, returns error message |
| FileNo | Call Tags |
|---|---|
| ^MCAR(691.5 - [#691.5] | Classic Fileman Calls |
