Routine: DGNTAPI1

Information

DGNTAPI1 ;ALB/RPM - API's for N/T Radium Treatment(part 2); 7/16/01 3:04pm

Source Information

Source file <DGNTAPI1.m>

Call Graph

Call Graph Total: 6

Package	Total	Call Graph
VA Fileman	3	$$GET1^DID CHK^DIE $$EXTERNAL^DILFD
Registration	2	($$FILENTR,$$GETCUR,$$GETPRIM,$$GETREC)^DGNTAPI ($$CHANGE,$$SITE)^DGNTUT
Kernel	1	$$NOW^XLFDT

Caller Graph

Caller Graph Total: 7

Package	Total	Caller Graph
Registration	6	DGENUPL7 DGNTAPI DGPTFM4 DGPTX54 DGRP6EF DGX5F6
PCE Patient Care Encounter	1	VSIT

Entry Points

Name	Comments	DBIA/ICR reference
ENRGET(DGDFN,DGENR)	;Entry point for Enrollment data retrieval from
VALID(DGIP,DGERR)	;Validate input parameters before filing ; Input ; DGIP - array of input parameters to validate passed by reference ; DGERR - error parameter passed by reference ; ; Output ; function output - 0:invalid, 1:valid ; DGERR - error message
XREF	;;array node name;field#;required param;description
BLDARR(DGFLDA,DGREQA)	;Read in $T(XREF) lines and build name/field xref
FILEHNC(DGDFN)	;entry point for applications that need to complete the	ICR #3456 Status: Active Usage: Controlled Subscription
GETSTAT(DGDFN)	;get the screening status
ENRUPD(DGDFN,DGHEC)	;
TESTVAL(DGFIL,DGFLD,DGVAL)	;Used to determine if a field value is valid

External References

Name	Field # of Occurrence
$$FILENTR^DGNTAPI	ENRUPD+29, FILEHNC+18
$$GETCUR^DGNTAPI	GETSTAT+9, FILEHNC+13
$$GETPRIM^DGNTAPI	ENRGET+22
$$GETREC^DGNTAPI	ENRGET+23
$$CHANGE^DGNTUT	ENRUPD+26
$$SITE^DGNTUT	FILEHNC+17
$$GET1^DID	VALID+24, VALID+29, TESTVAL+19
CHK^DIE	TESTVAL+20
$$EXTERNAL^DILFD	TESTVAL+16
$$NOW^XLFDT	ENRUPD+28, FILEHNC+15

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^DPT - [#2]	ENRUPD+26

Label References

Name	Line Occurrences
$$TESTVAL	VALID+28
BLDARR	VALID+19

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
DGDFN	ENRUPD~, ENRUPD+23*, ENRUPD+26, ENRUPD+29, ENRGET~, ENRGET+16, ENRGET+22, GETSTAT~, GETSTAT+9, FILEHNC~ , FILEHNC+13, FILEHNC+18
DGENR	ENRGET~, ENRGET+18, ENRGET+19, ENRGET+23, ENRGET+27
DGERR	VALID~, VALID+24, VALID+29
DGFIL	TESTVAL~, TESTVAL+16, TESTVAL+19, TESTVAL+20
DGFILE	VALID+13~, VALID+17*, VALID+24, VALID+28, VALID+29
DGFLD	TESTVAL~, TESTVAL+16, TESTVAL+19, TESTVAL+20
DGFLDA	BLDARR~
DGFLDA(	BLDARR+14*
DGFXR	VALID+10~, VALID+19
DGFXR(	VALID+24, VALID+28, VALID+29
DGHEC	ENRUPD~, ENRUPD+26, ENRUPD+29
DGHEC(	ENRUPD+25*
DGHEC("EDT"	ENRUPD+28*
DGHEC("EUSR"	ENRUPD+27*
DGHEC("NTR"	ENRUPD+26
DGHEC("VDT"	ENRUPD+26
DGIEN	ENRGET+12~, ENRGET+22*, ENRGET+23
DGIP	VALID~
DGIP(	VALID+23, VALID+28
DGLINE	BLDARR+11~, BLDARR+13*, BLDARR+14, BLDARR+15
DGN	VALID+12~, VALID+16, VALID+23, VALID+24, VALID+28*, VALID+29
DGNT	GETSTAT+8~, FILEHNC+11~, FILEHNC+18
DGNT("HDT"	FILEHNC+15*
DGNT("HNC"	FILEHNC+14*
DGNT("HSIT"	FILEHNC+17*
DGNT("HUSR"	FILEHNC+16*
DGNT("STAT"	GETSTAT+10, FILEHNC+13
DGOFF	BLDARR+10~, BLDARR+13*
DGREQ	VALID+11~, VALID+19
DGREQ(	VALID+23
DGREQA	BLDARR~
DGREQA(	BLDARR+15*
DGRSLT	ENRUPD+20~, ENRUPD+22, ENRUPD+29, ENRUPD+30, ENRGET+13~, ENRGET+21, ENRGET+24, ENRGET+28, FILEHNC+11~, FILEHNC+12* , FILEHNC+18*, FILEHNC+19, TESTVAL+11~, TESTVAL+20
DGVAL	TESTVAL~, TESTVAL+15, TESTVAL+16
DGVALEX	TESTVAL+10~, TESTVAL+16*, TESTVAL+17, TESTVAL+20
DGVLD	VALID+9~, VALID+15, VALID+24, VALID+26, VALID+29*, VALID+30
DGX	ENRUPD+21~, ENRUPD+24, ENRUPD+25, ENRGET+14~, ENRGET+26, ENRGET+27
DUZ	ENRUPD+27, FILEHNC+16
U	VALID+28
VALID	TESTVAL+12~, TESTVAL+14, TESTVAL+17, TESTVAL+20*, TESTVAL+21

Marked Items

Name	Field # of Occurrence
$T(XREF+DGOFF	BLDARR+13

Customize PDF page

Package: Registration

Routine: DGNTAPI1

Call Graph Total: 6

Caller Graph Total: 7