HMPDSR ;SLC/MKB,ASMR/RRB - Surgical Procedures;Aug 29, 2016 20:06:27
Source file <HMPDSR.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| EN(DFN,BEG,END,MAX,ID) | ; -- find patient's surgeries
|
|
| ENQ | ; end
|
|
| ONE(NUM,SURG) | ; -- return a surgery in SURG("attribute")=value
; Expects DFN, @HMPY@(NUM) from LIST^SROESTV |
|
| EN1(IEN,SURG) | ; -- return a surgery in SURG("attribute")=value
|
|
| CPT(IEN) | ; -- return code^description for CPT code, or "^" if error
|
|
| XML(SURG) | ; -- Return surgery as XML
|
|
| LOOP() | ; -- build sub-items string from NAMES and X
|
|
| ADD(X) | ; -- Add a line @HMP@(n)=X
|
| FileNo | Call Tags |
|---|---|
| ^SRF - [#130] | GET1^DIQ |
| ^SRO(136 - [#136] | GET1^DIQ, GETS^DIQ |
| ^TIU(8925 - [#8925] | GET1^DIQ |
