Routine: HDISVCUT

Information

HDISVCUT ;CT/GRR ; 19 Apr 2006 10:57 AM

Source Information

Source file <HDISVCUT.m>

Call Graph

Call Graph Total: 15

Package	Total	Call Graph
Health Data and Informatics	8	$$BLDSND^HDISVCUT SETSTAT^HDISVF01 $$GETSDIS^HDISVF03 $$FINDDOM^HDISVF09 $$SNDXML^HDISVM02 $$FMTXML^HDISVU01 $$VUIDL^HDISVU02 XMLOUT^HDISXML
Kernel	3	$$NOW^XLFDT MES^XPDUTL $$PROD^XUPROD
VA Fileman	3	^DIC UPDATE^DIE ^DIK
Registration	1	$$SITE^VASITE

Caller Graph

Caller Graph Total: 7

Package	Total	Caller Graph
Health Data and Informatics	7	HDI1004A HDI1005A HDI1008A HDISVC01 HDISVCMR HDISVCUT HDISVF09

Entry Points

Name	Comments	DBIA/ICR reference
QUIT
UPDTDOM(HDDOM,HDISDFFS)	;Add Domain info to the HDIS DOMAIN file
BLDSND(HDISFILE,HDISFN,HDISSTCD,HDISSDT,HDISARRY,HDISINP)	;
BLDSTAT(HDISFILE,HDISFN,HDISSC,HDISSDT,HDISARRY)	;
VUID(HDDOM,HDROUT)	;Instantiate VUIDs for set of code fields ; Input: ; HDDOM - Domain Name (i.e. ORDERS) ; HDROUT - Routine containing VUID Sets-Of-Code data (i.e. HDI1005B)
STATUPD(FILE,FIELD,CODE,DATE)	;Encompassing local status update call ; Input : FILE - File number ; FIELD - Field number (defaults to .01) ; CODE - Status code to set (defaults to "not started") ; DATE - FileMan date/time to return status for (optional) ; (defaults to NOW)
TESTACT()	;Set's the HDIS SYSTEM file fields to reflect a mirrored test account and remove any multiple entries
ZINIT

External References

Name	Field # of Occurrence
^DIC	BLDSTAT+4
UPDATE^DIE	TESTACT+16
^DIK	TESTACT+11
$$BLDSND^HDISVCUT	STATUPD+33
SETSTAT^HDISVF01	STATUPD+26
$$GETSDIS^HDISVF03	BLDSND+2, STATUPD+28
$$FINDDOM^HDISVF09	UPDTDOM+12
$$SNDXML^HDISVM02	BLDSND+8
$$FMTXML^HDISVU01	BLDSTAT+9
$$VUIDL^HDISVU02	VUID+11
XMLOUT^HDISXML	BLDSTAT+22
$$SITE^VASITE	BLDSTAT+7
$$NOW^XLFDT	STATUPD+23
MES^XPDUTL	VUID+10, UPDTDOM+11, UPDTDOM+18
$$PROD^XUPROD	BLDSTAT+8, TESTACT+15

FileMan Files Accessed Via FileMan Db Call

FileNo	Call Tags
^HDISF(7118.21 - [#7118.21]	Classic Fileman Calls

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^HDIS(7115.3 - [#7115.3]	BLDSTAT+13
^HDISF(7118.21 - [#7118.21]	TESTACT+5, TESTACT+8, TESTACT+13
^TMP("HDISSBUILD"	BLDSND+5
^TMP("HDISVCUT"	STATUPD+30, STATUPD+31
^XMB("NETNAME"	BLDSTAT+10, TESTACT+14

Label References

Name	Line Occurrences
$$BLDSTAT	BLDSND+6
QUIT	BLDSTAT+2, BLDSTAT+5
ZINIT	BLDSTAT+14

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
CODE	BLDSTAT+1~, STATUPD~, STATUPD+21*, STATUPD+26, STATUPD+33
DA	TESTACT+6~, TESTACT+9*
DATE	STATUPD~, STATUPD+22, STATUPD+23, STATUPD+24*, STATUPD+26, STATUPD+33
DIC	BLDSTAT+4*!
DIC(0	BLDSTAT+4*
DIK	TESTACT+6~, TESTACT+10*
DT	BLDSND+4
FDA	TESTACT+6~
FDA(1	TESTACT+12!, TESTACT+13, TESTACT+14, TESTACT+15*
FIELD	STATUPD~, STATUPD+19, STATUPD+20, STATUPD+26, STATUPD+33
FILE	STATUPD~, STATUPD+17*, STATUPD+18, STATUPD+26, STATUPD+33
HDDOM	VUID~, VUID+8, VUID+11, UPDTDOM~, UPDTDOM+8, UPDTDOM+12
>> HDERR	BLDSTAT+22
HDIEN	UPDTDOM+6~, UPDTDOM+13~
HDIMSG	VUID+6~, VUID+10!, UPDTDOM+6~, UPDTDOM+11!, UPDTDOM+13~, UPDTDOM+18!
HDIMSG(1	VUID+7, UPDTDOM+7, UPDTDOM+14*
HDIMSG(2	VUID+8, UPDTDOM+8, UPDTDOM+15*
HDIMSG(3	VUID+9, UPDTDOM+9, UPDTDOM+16*
HDIMSG(4	UPDTDOM+10, UPDTDOM+17
HDISARRY	BLDSTAT~, BLDSTAT+2, BLDSTAT+3, BLDSTAT+11, BLDSTAT+13, BLDSTAT+22, BLDSND~, BLDSND+5*, BLDSND+6, BLDSND+8
HDISDFFS	UPDTDOM~, UPDTDOM+12
>> HDISDIEN	UPDTDOM+12
>> HDISERRM	UPDTDOM+12, UPDTDOM+16
HDISFILE	BLDSTAT~, BLDSTAT+2, BLDSTAT+18, BLDSND~, BLDSND+6
HDISFN	BLDSTAT~, BLDSTAT+2, BLDSTAT+19, BLDSND~, BLDSND+6
HDISINP	BLDSND~, BLDSND+8
>> HDISMD	BLDSTAT+10*, BLDSTAT+17
HDISOUT	BLDSTAT+1~, BLDSTAT+2, BLDSTAT+5, BLDSTAT+23, QUIT, BLDSND+3~, BLDSND+6, BLDSND+7, BLDSND+8*, BLDSND+9
>> HDISPROD	BLDSTAT+8*, BLDSTAT+16
HDISSC	BLDSTAT~, BLDSTAT+20
HDISSDT	BLDSTAT~, BLDSTAT+9, BLDSND~, BLDSND+4*, BLDSND+6
>> HDISSRC	BLDSTAT+7*, BLDSTAT+15
HDISSTCD	BLDSND~, BLDSND+6
>> HDIST	BLDSTAT+6*, BLDSTAT+13, BLDSTAT+22
HDISTDTX	BLDSTAT+1~, BLDSTAT+9*, BLDSTAT+21
>> HDISY	BLDSTAT+6*
>> HDISY(0	BLDSTAT+6*, BLDSTAT+13
HDROUT	VUID~, VUID+11
IEN	TESTACT+6~, TESTACT+7, TESTACT+8, TESTACT+9
OUTPUT	STATUPD+15~, STATUPD+33*, STATUPD+35
TMPARR	STATUPD+15~, STATUPD+31*, STATUPD+32, STATUPD+33, STATUPD+34
>> X	BLDSTAT+4*
XMLARR	STATUPD+15~, STATUPD+30*, STATUPD+32, STATUPD+33, STATUPD+34
Y	BLDSTAT+1~, BLDSTAT+5, BLDSTAT+6
Y(0	BLDSTAT+6
Z	BLDSTAT+14~!, ZINIT*
Z(	ZINIT*
Z(20	BLDSTAT+15*
Z(22	BLDSTAT+16, ZINIT
Z(30	BLDSTAT+17*
Z(60	BLDSTAT+18*
Z(70	BLDSTAT+19*
Z(80	BLDSTAT+20*
Z(90	BLDSTAT+21*

Customize PDF page

Package: Health Data and Informatics

Routine: HDISVCUT

Call Graph Total: 15

Caller Graph Total: 7