©2011-2018 Open Source Electronic Health Record Alliance
This work is licensed under a Creative Commons Attribution 3.0 Unported License
This work is licensed under a Creative Commons Attribution 3.0 Unported License
HDISVF07 ;ALB/RMO - 7118.21 File Utilities/API Cont.; 1/13/05@1:22:00
Source file <HDISVF07.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| FINDSYS(HDISDIPA,HDISFACN,HDISTYPE,HDISADDF,HDISYIEN,HDISERRM) | ;Find or Add a System Entry
; Input -- HDISDIPA Domain/IP Address ; HDISFACN Facility Number (Optional- Default current facility number) ; HDISTYPE Type (Optional- Default current system) ; HDISADDF Add a New Entry Flag (Optional- Default 0) ; 1=Yes and 0=No ; Output -- 1=Successful and 0=Failure ; If Successful: ; HDISYIEN HDIS System file IEN ; If Failure: ; HDISERRM Error Message (Optional) |
|
| FINDSYSQ | ||
| ADDSYS(HDISIPTR,HDISDIPA,HDISTYPE,HDISYIEN,HDISERRM) | ;Add a New System Entry
; Input -- HDISIPTR Institution file (#4) IEN ; HDISDIPA Domain/IP Address ; HDISTYPE Type (Internal Value) ; Output -- 1=Successful and 0=Failure ; If Successful: ; HDISYIEN HDIS System file IEN ; If Failure: ; HDISERRM Error Message (Optional) |
|
| ADDSYSQ | ||
| CURSYS(HDISYIEN) | ;Current System's HDIS System file IEN
; Input -- None ; Output -- 1=Successful and 0=Failure ; If Successful: ; HDISYIEN HDIS System file IEN |
|
| CURSYSQ | ||
| GETFAC(HDISYIEN,HDISIPTR,HDISFACN) | ;Get Institution file (#4) IEN and Facility Number by IEN
; Input -- HDISYIEN HDIS System file IEN (Optional- Default current system) ; Output -- 1=Successful and 0=Failure ; If Successful: ; HDISIPTR Institution file (#4) IEN ; HDISFACN Facility Number |
|
| GETFACQ | ||
| GETDIP(HDISYIEN,HDISDIPA) | ;Get Domain/IP Address by IEN
; Input -- HDISYIEN HDIS System file IEN (Optional- Default current system) ; Output -- 1=Successful and 0=Failure ; If Successful: ; HDISDIPA Domain/IP Address |
|
| GETDIPQ | ||
| GETTYPE(HDISYIEN,HDISTYPE,HDISTYPX) | ;Get Type (Internal and External Value) by IEN
; Input -- HDISYIEN HDIS System file IEN (Optional- Default current system) ; Output -- 1=Successful and 0=Failure ; If Successful: ; HDISTYPE Type (Internal Value) ; HDISTYPX Type (External Value) |
|
| GETTYPEQ |
| FileNo | Call Tags |
|---|---|
| ^HDISF(7118.21 - [#7118.21] | CHK^DIE, GET1^DIQ |