GMTSPLSZ ;SLC/SBW - Updated Problem List 2.0 extract routine. in HS namespace ;18/Apr/95
Source file <GMTSPLSZ.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| GMPLHS | ;SLC/MKB,DJP,SBW - Extract for Prob List-Health Summary 2.7 ;15/APR/95
|
|
| GETLIST(GMPDFN,STATUS) | ; Define list
|
|
| BUILD | ; Build list for selected patient
; Returns ^TMP("GMPLHS",$J,STATUS,0) = GMPCNT ^ GMPTOTAL |
|
| GETPROB(IFN) | ; Get problem data and set it to ^TMP array
; Returns ^TMP("GMPLHS",$J,CNT,0) ; Returns ^TMP("GMPLHS",$J,CNT,IFN,"N") |
|
| GETCOMM(IFN,CNT) | ;Get active comments for a note
; Returns ^TMP("GMPLHS",$J,CNT,"C",LOCATION,NOTE NMBR,0)) |
|
| SERV(X,SERV) | ; Return service name abbreviation
|
