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 | FileMan Files Accessed Via FileMan Db Call | Global Variables Directly Accessed | Label References | Naked Globals | Local Variables | All

Print Page as PDF

Routine: HDISVF07

Package: Health Data and Informatics

Routine: HDISVF07

Information

HDISVF07 ;ALB/RMO - 7118.21 File Utilities/API Cont.; 1/13/05@1:22:00

Source Information

Source file <HDISVF07.m>

Call Graph

Call Graph

Call Graph Total: 5

Package	Total	Call Graph
VA FileMan	3	(CHK,UPDATE)^DIE CLEAN^DILF $$GET1^DIQ
Health Data and Informatics	1	($$FACNUM,$$FACPTR)^HDISVF01
Kernel	1	$$PROD^XUPROD

Caller Graph

Legends:

Legend of Colors

Package Component Superscript legend

action

^A

extended action

^Ea

event driver

^Ed

subscriber

^Su

protocol

^O

limited protocol

^LP

run routine

^RR

broker

^B

edit

^E

server

^Se

print

^P

screenman

^SM

inquire

^I

Caller Graph

Caller Graph Total: 11

Package	Total	Caller Graph
Health Data and Informatics	11	HDI1000A HDISVAP2 HDISVAP3 HDISVC01 HDISVF01 HDISVF09 HDISVF10 HDISVM02 HDISVS01 HDISVS03 HDISVSFX

Entry Points

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

External References

Name	Field # of Occurrence
CHK^DIE	FINDSYS+30
UPDATE^DIE	ADDSYS+16
CLEAN^DILF	ADDSYS+23
$$GET1^DIQ	GETTYPE+14
$$FACNUM^HDISVF01	FINDSYS+18, CURSYS+9, GETFAC+14
$$FACPTR^HDISVF01	FINDSYS+23, CURSYS+10
$$PROD^XUPROD	FINDSYS+28, CURSYS+11

FileMan Files Accessed Via FileMan Db Call

FileNo	Call Tags
^HDISF(7118.21 - [#7118.21]	CHK^DIE, GET1^DIQ

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^HDISF(7118.21 - [#7118.21]	FINDSYS+33, FINDSYS+35, FINDSYS+36, CURSYS+13, GETFAC+13, GETDIP+12, GETTYPE+13

Label References

Name	Line Occurrences
$$ADDSYS	FINDSYS+40
$$CURSYS	GETFAC+9, GETDIP+8, GETTYPE+9
FINDSYSQ	FINDSYS+15, FINDSYS+20, FINDSYS+25, FINDSYS+33
GETDIPQ	GETDIP+10
GETFACQ	GETFAC+11
GETTYPEQ	GETTYPE+11

Naked Globals

Name	Field # of Occurrence
^(0	FINDSYS+36, GETFAC+13, GETDIP+12, GETTYPE+13

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
HDISADDF	FINDSYS~, FINDSYS+40
HDISDIPA	FINDSYS~, FINDSYS+15, FINDSYS+36, FINDSYS+40, ADDSYS~, ADDSYS+14, GETDIP~, GETDIP+6, GETDIP+12, GETDIPQ
HDISERRM	FINDSYS~, FINDSYS+13, FINDSYS+16, FINDSYS+21, FINDSYS+26, FINDSYS+40, ADDSYS~, ADDSYS+11, ADDSYS+19
HDISFACN	FINDSYS~, FINDSYS+18, FINDSYS+20, FINDSYS+23, CURSYS+5~, CURSYS+9, CURSYS+10, GETFAC~, GETFAC+7, GETFAC+14 , GETFACQ
HDISFDA	ADDSYS+9~
HDISFDA(	ADDSYS+13, ADDSYS+14, ADDSYS+15*
HDISI	FINDSYS+11~, FINDSYS+34, FINDSYS+35, FINDSYS+36, FINDSYS+37
HDISIEN	ADDSYS+9~
HDISIEN(1	ADDSYS+21
HDISIPTR	FINDSYS+11~, FINDSYS+23, FINDSYS+25, FINDSYS+33, FINDSYS+35, FINDSYS+40, ADDSYS~, ADDSYS+13, CURSYS+5~, CURSYS+10 , CURSYS+13, GETFAC~, GETFAC+7, GETFAC+13, GETFAC+14, GETFACQ
HDISMSG	ADDSYS+9~
HDISMSG("DIERR"	ADDSYS+18, ADDSYS+19
HDISOKF	FINDSYS+11~, FINDSYS+38, FINDSYS+40, FINDSYSQ, ADDSYS+9~, ADDSYS+22*, ADDSYSQ
HDISRSLT	FINDSYS+11~, FINDSYS+30, FINDSYS+31
HDISTYPE	FINDSYS~, FINDSYS+28, FINDSYS+30, FINDSYS+31, FINDSYS+40, ADDSYS~, ADDSYS+15, CURSYS+5~, CURSYS+11, CURSYS+13 , GETTYPE~, GETTYPE+7, GETTYPE+13*, GETTYPEQ
HDISTYPX	GETTYPE~, GETTYPE+7, GETTYPE+14, GETTYPEQ
HDISYIEN	FINDSYS~, FINDSYS+13, FINDSYS+33, FINDSYS+35, FINDSYS+37, FINDSYS+40, ADDSYS~, ADDSYS+11, ADDSYS+21, CURSYS~ , CURSYS+7, CURSYS+13, CURSYSQ, GETFAC~, GETFAC+9, GETFAC+11, GETFAC+13, GETDIP~, GETDIP+8, GETDIP+10 , GETDIP+12, GETTYPE~, GETTYPE+9, GETTYPE+11, GETTYPE+13, GETTYPE+14

Info | Source | Call Graph | Caller Graph | Entry Points | External References | FileMan Files Accessed Via FileMan Db Call | Global Variables Directly Accessed | Label References | Naked Globals | Local Variables | All