Routine: DDXP31

Package	Total	Call Graph
VA Fileman	2	^DIC ^DIR

Package	Total	Caller Graph
VA Fileman	1	DDXP3

Entry Points

Name	Comments	DBIA/ICR reference
GETOUT	;To see if user wants to continue.
DTYPE	;
ASKRDLM	;
FLDNAME	;
IOM	;
LENGTH	;
XPT	;
ASKDELM	;
RIOM

External References

Name	Field # of Occurrence
^DIC	XPT+6
^DIR	XPT+4, LENGTH+9, FLDNAME+8, DTYPE+6, RIOM, ASKDELM+3, ASKRDLM+3, GETOUT+5

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: ! Line Location: XPT+6
Function Call: WRITE	Prompt: !,$C(7),$P(Y,U,2)_" entry in the Print Template file already exists.",!,"Please enter the name of a new template.",!! Line Location: XPT+7
Function Call: WRITE	Prompt: !!,"This template will produce fixed length records." Line Location: LENGTH+1
Function Call: WRITE	Prompt: !,"Enter the length of each field below." Line Location: LENGTH+2
Function Call: WRITE	Prompt: !,"The specified number should be the length in the TARGET file.",!! Line Location: LENGTH+3
Function Call: WRITE	Prompt: !!,"Enter the name of the fields below in the TARGET file." Line Location: FLDNAME+1
Function Call: WRITE	Prompt: !,"If you press <RET>, no name will be used.",!! Line Location: FLDNAME+2
Function Call: WRITE	Prompt: !!,"Enter the data types of the fields being exported below.",!! Line Location: DTYPE+1
Function Call: WRITE	Prompt: !!,"Enter the maximum length of a physical record that can be exported.",!,"Enter '^' to stop the creation of an EXPORT template.",! Line Location: IOM+2
Function Call: WRITE	Prompt: "The default shown is based on the total lengths of the fields being exported.",! Line Location: IOM+4
Function Call: WRITE	Prompt: !!,$C(7),"The length cannot be greater than 255 when sending fixed length records.",! Line Location: RIOM+2
Function Call: WRITE	Prompt: !!,"You can choose a delimiter to be placed between output fields.",!,"Enter <RET> to use no delimiter.",!,"Enter '^' to stop the creation of an EXPORT template.",! Line Location: ASKDELM+2
Function Call: WRITE	Prompt: !!,"You can choose a delimiter to be placed between output records.",!,"Enter <RET> to use no delimiter",!,"Enter '^' to stop the creation of an EXPORT template.",! Line Location: ASKRDLM+2
Function Call: WRITE	Prompt: "Do you want to continue?" Line Location: GETOUT+2
Function Call: WRITE	Prompt: !! Line Location: GETOUT+6
Routine Call	DIC Line Location: XPT+6
Routine Call	DIR Line Location: XPT+4 LENGTH+9 FLDNAME+8 DTYPE+6 RIOM ASKDELM+3 ASKRDLM+3 GETOUT+5

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> DDXPDELM	ASKDELM+5*
>> DDXPDT(	DTYPE+6, DTYPE+8*
>> DDXPFCAP(	LENGTH+9, FLDNAME+8, DTYPE+6
>> DDXPFFNM(	FLDNAME+10*
>> DDXPFLD	LENGTH+7, LENGTH+8, LENGTH+9, LENGTH+11, FLDNAME+6, FLDNAME+7, FLDNAME+8, FLDNAME+10, DTYPE+4*, DTYPE+5 , DTYPE+6, DTYPE+8
>> DDXPFLEN(	LENGTH+8, LENGTH+11
>> DDXPFMZO	RIOM+2
>> DDXPIOM	RIOM+3*
>> DDXPNOUT(	LENGTH+8, FLDNAME+7, DTYPE+5
>> DDXPOUT	XPT+1, XPT+5, LENGTH+4, LENGTH+7, LENGTH+9, LENGTH+10, FLDNAME+3, FLDNAME+6, FLDNAME+8, FLDNAME+9 , DTYPE+2, DTYPE+4, DTYPE+6, DTYPE+7, IOM+1, RIOM+1, ASKDELM+1, ASKDELM+4, ASKRDLM+1, ASKRDLM+4 , GETOUT+1, GETOUT+5
>> DDXPRDLM	ASKRDLM+5*
>> DDXPTLEN	LENGTH+5, LENGTH+11, IOM+3, IOM+5
>> DDXPTOTF	LENGTH+7, FLDNAME+6, DTYPE+4
>> DDXPXTNO	XPT+8*
DIC	XPT+6*!
DIC(0	XPT+6*
DIR	XPT+4!, LENGTH+13!, FLDNAME+12!, DTYPE+10!, RIOM!, ASKDELM+3!, ASKRDLM+3!, GETOUT+5!
DIR("?"	XPT+3, LENGTH+6, FLDNAME+5, GETOUT+4
DIR("A"	XPT+2, LENGTH+9, FLDNAME+8, DTYPE+6
DIR("B"	DTYPE+6, IOM+5, GETOUT+3*
DIR(0	XPT+2, LENGTH+6, FLDNAME+4, DTYPE+3, RIOM, ASKDELM+3, ASKRDLM+3, GETOUT+3
>> DIRUT	XPT+5, LENGTH+10, DTYPE+7, GETOUT+5
DLAYGO	XPT+6*!
>> DTOUT	FLDNAME+9, RIOM+1, ASKDELM+4, ASKRDLM+4
>> DUOUT	FLDNAME+9, RIOM+1, ASKDELM+4, ASKRDLM+4
U	XPT+7, DTYPE+6, RIOM+2
X	LENGTH+13!, FLDNAME+12!, DTYPE+10!, ASKDELM+5, ASKRDLM+5
Y	XPT+7, XPT+8, LENGTH+11, LENGTH+13!, FLDNAME+10, FLDNAME+12!, DTYPE+8, DTYPE+10!, RIOM+2, RIOM+3 , ASKDELM+5, ASKRDLM+5, GETOUT+5

Customize PDF page

Package: VA Fileman

Routine: DDXP31

Information

Source Information

Call Graph

Call Graph Total: 2

Caller Graph

Caller Graph Total: 1

Entry Points

External References

Interaction Calls

Global Variables Directly Accessed

Label References

Local Variables

Legend:

Name	Line Occurrences
DTYPE	DTYPE+4
FLDNAME	FLDNAME+6
GETOUT	LENGTH+4, FLDNAME+3, DTYPE+2
LENGTH	LENGTH+7
RIOM	RIOM+2
XPT	XPT+7