Routine: DDMP1

Package	Total	Call Graph
VA Fileman	4	BLD^DIALOG (FIND,LIST)^DIC REQIDS^DICU ($$FLDNUM,$$VFILE)^DILFD
Kernel	1	$$FTG^%ZISH

Package	Total	Caller Graph
VA Fileman	2	DDMP DDMPSM

Entry Points

Name	Comments	DBIA/ICR reference
FILENUM(DDMPF)	;
FLDVAL	;
TMPL2SQ(DDMPF,DDMPFLSQ)	;
TMP2DR	;
INFILE(DDMPINAR,DDMPFMT,DDMPFBCK,DDMPDR,DDMPNCNT)	;
RQIDOK(DDMPFLDS)	;
TODR(DDMPF,DDMPFLDS,DDMPDR,DDMPDRTP)	;
GETSRC(DDMPFSRC)	;
TMPL2DR(DDMPF,DDMPFLDS)	;
GETFMT(DDMPFMT)	; ; Sets up format info.

External References

Name	Field # of Occurrence
$$FTG^%ZISH	GETSRC+4
BLD^DIALOG	GETFMT+6, GETFMT+18, GETSRC+5, GETSRC+6, RQIDOK+9, INFILE+9, FILENUM+3, FLDVAL+6, FLDVAL+9, FLDVAL+11 , FLDVAL+15, FLDVAL+17, TMPL2SQ+7, TODR+12, TMP2DR+4
FIND^DIC	GETFMT+5
LIST^DIC	TMPL2SQ+8
REQIDS^DICU	RQIDOK+4
$$FLDNUM^DILFD	FLDVAL+2
$$VFILE^DILFD	FILENUM+1

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^DD(	FLDVAL+3, FLDVAL+12
^DIC("B"	FILENUM+2
^DIST(	TMPL2SQ+3
^TMP("DILIST"	TMPL2SQ+9, TMPL2SQ+10, TMPL2SQ+11, TMPL2SQ+14!
^TMP($J	GETSRC+3!, GETSRC+4, GETSRC+6

Label References

Name	Line Occurrences
$$FILENUM	INFILE+10
FLDVAL	INFILE+17
TMP2DR	TODR+3, TODR+11, TODR+18
TMPL2SQ	TMPL2DR+3
TODR	INFILE+25, TMPL2DR+6, TODR+22

Naked Globals

Name	Field # of Occurrence
^(	INFILE+5, FILENUM+2
^(1	TMPL2SQ+12
^(2	TMPL2SQ+12
^(3	TMPL2SQ+13

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
DDMP0	FLDVAL+1~, FLDVAL+3*, FLDVAL+4, FLDVAL+7
DDMP0P2	INFILE+16~, INFILE+19, FLDVAL+7*, FLDVAL+8, FLDVAL+12
DDMPARAM	TMPL2SQ+5~, TMPL2SQ+7
DDMPARAM("FILE"	TMPL2SQ+6*
DDMPARAM(1	TMPL2SQ+6*
DDMPASCI	GETFMT+13~, GETFMT+14, GETFMT+15
DDMPCPTH	TODR+1~, TODR+6, TODR+7*, TODR+8, TODR+15
DDMPDELM	INFILE+1~, INFILE+3, INFILE+4, INFILE+11
DDMPDONE	INFILE+1~, INFILE+5, INFILE+21, TODR+1~, TODR+2, TMP2DR+1
DDMPDPTH	INFILE+12~, INFILE+13, INFILE+15, FLDVAL+9, FLDVAL+11, TODR+1~, TODR+4, TODR+5, TODR+6, TODR+7 , TODR+9, TODR+10, TODR+13, TODR+16, TODR+17, TODR+20, TODR+21
DDMPDR	INFILE~, INFILE+25, TMPL2DR+1~, TMPL2DR+6, TMPL2DR+8, TODR~, TODR+22
DDMPDR(	TMP2DR+2*, TMP2DR+3
DDMPDRTP	TODR~, TODR+22
DDMPDRTP(	TODR+9, TODR+10, TODR+13, TODR+20, TMP2DR+2, TMP2DR+3, TMP2DR+5!
DDMPERCT	RQIDOK+2~*, RQIDOK+10
DDMPERR	TMPL2DR+2~*, TMPL2DR+4
DDMPF	RQIDOK+2~, RQIDOK+3, RQIDOK+4, RQIDOK+7, RQIDOK+8, INFILE+1~, INFILE+7, INFILE+8, INFILE+9, INFILE+10 , INFILE+14, INFILE+25, INFILE+26, FILENUM~, FILENUM+1, FILENUM+2, FILENUM+3, TMPL2DR~, TMPL2DR+3, TMPL2DR+6 , TMPL2SQ~, TMPL2SQ+3, TMPL2SQ+6, TODR~, TODR+9, TODR+10, TODR+13, TODR+20, TMP2DR+2, TMP2DR+3 , TMP2DR+4, TMP2DR+5
DDMPFBCK	INFILE~, INFILE+26*
DDMPFDF	INFILE+12~, INFILE+14, INFILE+18, INFILE+19, FLDVAL+2, FLDVAL+3, FLDVAL+5, FLDVAL+14
DDMPFDWN	TODR+1~, TODR+21*, TODR+22
DDMPFLD	INFILE+12~, INFILE+15, INFILE+18, FLDVAL+2, FLDVAL+3, FLDVAL+5, FLDVAL+14
DDMPFLDS	RQIDOK~, INFILE+1~, INFILE+24, INFILE+25, TMPL2DR~, TMPL2DR+3, TMPL2DR+5, TMPL2DR+6, TMPL2DR+7!, TMPL2DR+8* , TODR~, TODR+3, TODR+4, TODR+5, TODR+6, TODR+7, TODR+9, TODR+10, TODR+13, TODR+14* , TODR+20, TODR+21, TODR+22
DDMPFLDS(	RQIDOK+3, RQIDOK+7, INFILE+20*, FLDVAL+16, TODR+3, TODR+4, TODR+5, TODR+6, TODR+7, TODR+9 , TODR+10, TODR+13, TODR+20, TODR+21
DDMPFLDS("LN"	TODR+13
DDMPFLSQ	TMPL2SQ~, TMPL2SQ+2
DDMPFLSQ(	TMPL2SQ+12*
DDMPFLSQ("LN"	TMPL2SQ+13*
DDMPFMT	GETFMT~, GETFMT+4, GETFMT+5, GETFMT+6, INFILE~
DDMPFMT("FDELIM"	GETFMT+8, GETFMT+11, GETFMT+12, GETFMT+14, GETFMT+15*, GETFMT+18, INFILE+4
DDMPFMT("FIXED"	GETFMT+9, GETFMT+17, GETFMT+18, INFILE+3
DDMPFMT("IEN"	GETFMT+7*
DDMPFMT("QUOTED"	GETFMT+10, GETFMT+16
DDMPFRMT	GETFMT+3~
DDMPFRMT("DILIST"	GETFMT+6, GETFMT+7, GETFMT+8, GETFMT+9, GETFMT+10
DDMPFSRC	GETSRC~
DDMPFSRC("FILE"	GETSRC+4, GETSRC+5, GETSRC+6
DDMPFSRC("PATH"	GETSRC+4
DDMPFSTR	INFILE+1~, INFILE+11, INFILE+13, INFILE+15, INFILE+18, INFILE+20, FLDVAL+16
DDMPI	GETFMT+13~, GETFMT+14, INFILE+1~, INFILE+11, INFILE+20, FLDVAL+16
DDMPIMWK	GETSRC+2~, GETSRC+4*, GETSRC+5
DDMPINAR	INFILE~, INFILE+5, INFILE+22
DDMPJ	INFILE+1~, INFILE+15*, INFILE+18, FLDVAL+9, FLDVAL+11, FLDVAL+16
DDMPNCNT	INFILE~, INFILE+2, INFILE+5, INFILE+22*, INFILE+23
DDMPODTH	TODR+1~, TODR+4, TODR+16, TODR+17
DDMPP	RQIDOK+8~, RQIDOK+9, FLDVAL+5~, FLDVAL+6, FLDVAL+13~, FLDVAL+15
DDMPP("FIELD"	FLDVAL+14*
DDMPP("FILE"	RQIDOK+8, FLDVAL+5, FLDVAL+14*
DDMPP(1	FLDVAL+5, FLDVAL+14
DDMPPATH	TMPL2SQ+1~, TMPL2SQ+11*, TMPL2SQ+12
DDMPPC	GETFMT+13~, GETFMT+14*
DDMPPPTH	TODR+1~, TODR+6, TODR+8, TODR+15
DDMPRID	RQIDOK+2~, RQIDOK+5, RQIDOK+6, RQIDOK+7
DDMPRIDS	RQIDOK+2~
DDMPRIDS("REQ	UIRED IDENTIFIERS" , RQIDOK+6
DDMPSQ	TMPL2SQ+1~, TMPL2SQ+10*, TMPL2SQ+11, TMPL2SQ+12, TMPL2SQ+13
DDMPTPNM	TMPL2SQ+1~, TMPL2SQ+2*, TMPL2SQ+3, TMPL2SQ+6
DDMPTPNO	TMPL2SQ+1~, TMPL2SQ+3*, TMPL2SQ+4, TMPL2SQ+8
DDMPVAL	INFILE+1~, INFILE+5*, INFILE+6, INFILE+8, INFILE+11
>> DIERR	RQIDOK+2, RQIDOK+10, INFILE+5, INFILE+15, INFILE+17, INFILE+23, FLDVAL+2, TMPL2DR+2, TMPL2DR+4, TODR+2
U	INFILE+18, FLDVAL+7, FLDVAL+12, FLDVAL+16, TMPL2SQ+12, TODR+21

Customize PDF page

Package: VA Fileman

Routine: DDMP1

Information

Source Information

Call Graph

Call Graph Total: 5

Caller Graph

Caller Graph Total: 2

Entry Points

External References

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend: