Home Package List Routine Alphabetical List Global Alphabetical List FileMan Files List FileMan Sub-Files List Package Component Lists Package-Namespace Mapping

Info | Source | Call Graph | Caller Graph | Entry Points | External References | Global Variables Directly Accessed | Naked Globals | Local Variables | All

Print Page as PDF

Routine: MCARAM4

Package: Medicine

Routine: MCARAM4

Information

MCARAM4 ;WASH ISC/JKL-MUSE TRANSFER LAB DATA TO LOCAL ;5/20/94 15:35

Source Information

Source file <MCARAM4.m>

Call Graph

Call Graph Total: 1

Package	Total	Call Graph
Medicine	1	($$AR,$$DFCK,$$SLTS)^MCARAM4

Caller Graph

Caller Graph Total: 6

Package	Total	Caller Graph
Medicine	6	MCARAM MCARAM1 MCARAM2 MCARAM3 MCARAM4 MCARAM5

Entry Points

Name	Comments	DBIA/ICR reference
AR(MCA,MCAA,MCD,MCFP,MCLP,MCCK)	;Sets l/t stripped data field into an array ; USAGE: S X=$$AR^MCARAM4(.A,B,C,D,E) ; WHERE: .A = array where data is placed ; B = array argument for data field ; C = data field value ; D = first position of data field ; E = last position of data field ; F = 1 to check numeric data field value for positive int value ; 2 to check "" for both positive and negative int value ; 3 to check "" for pos,neg,int, and decimal values
ERR	;Error return
DFCK(MCV,MCCK)	; Checks numeric,negative,positive,integer,decimal value ; USAGE: S X=$$DFCK^MCARAM4(A,B) ; WHERE: A=data field value ; B=1 for positive value numeric (integer) check ; B=2 for positive and negative value numeric (integer) check ; B=3 for positive, negative, decimal, or integer numeric check ; if successful, returns function value of 0 ; if unsuccessful, returns error message for incorrect field format
SLTS(MCV)	; Strips leading and trailing spaces from data fields ; USAGE: S X=$$SLTS^MCARAM4(.A) ; WHERE: MCV=data field value ; .A = value where data is placed ; if successful, returns function value of 0 and data field value ; if unsuccessful, returns error message for incorrect field format
RXCK(MCA)	;Removes null lines and resets numbering of medication array ; USAGE: S X=$$RXCK^MCARAM4(.A) ; WHERE: MCA=medication array ; .A=medication array renumbered without null lines ; A("RX,0")=total number of non-null medication lines ; if successful, returns function value of 0 and medication array ; if unsuccessful, returns error message and A("RX,0")=0
DGCK(MCA)	;Removes null lines and resets numbering of diagnosis array ; USAGE: S X=$$DGCK^MCARAM4(.A) ; WHERE: MCA=diagnosis array ; .A=diagnosis array renumbered without null lines ; A("DX,0")=total number of non-null diagnosis lines ; if successful, returns function value of 0 and diagnosis array ; if unsuccessful, returns error message and A("DX,0")=0
DGCT(MCA,MCD,MCL)	;Fill diagnosis array from continuation record ; USAGE: S X=$$DGCT^MCARAM4(.A,B,C) ; WHERE: MCA=diagnosis array ; .A=diagnosis array renumbered without null lines ; B=data field value, C=line number of data ; A("DX,0")=total number of non-null diagnosis lines ; "DX,L"=12th line of diagnosis, "DX,V"=22nd line ; if successful, returns function value of 0 and diagnosis array ; if unsuccessful, returns error message and A("DX,0")=0

External References

Global Variables Directly Accessed

Naked Globals

Local Variables

Info | Source | Call Graph | Caller Graph | Entry Points | External References | Global Variables Directly Accessed | Naked Globals | Local Variables | All