Routine: DBAGO

Entry Points

Name	Comments	DBIA/ICR reference
RCC(NA)	;Replace control chars in NA with $C( ). Returns encoded string.
CCC(S)	;test if S Contains a Control Character or $C(255).
CGV(V)	;Convert Global Value.
SKIP	;;^%ZOSF;^CacheTempNodes;^ROUTINE;^TMP;^UTILITY;^XTMP;^XUTL;^mcq;^mterm;^oddDEF;^rINDEX;rINDEXCLASS;^rOBJ;
ASK
WALK(G)	;walk through global G, convert subscripts and values as necessary, dump out

Name	Line Occurrences
Function Call: WRITE	Prompt: !!,"DUMPS GLOBALS IN ZWR FORMAT",!! Line Location: DBAGO+9
Function Call: WRITE	Prompt: "Enter a comment to save with the file. ",! Line Location: ASK+1
Function Call: WRITE	Prompt: !,"Failed to open" Line Location: ASK+10
Function Call: WRITE	Prompt: COM,LF Line Location: ASK+12
Function Call: WRITE	Prompt: "Cache "_$TR($ZD(H,2)," ","-")_" "_$ZT($P(H,",",2))_" ZWR",LF Line Location: ASK+13
Function Call: WRITE	Prompt: !,"Done.",! Line Location: ASK+17
Function Call: WRITE	Prompt: NAME_"="_VAL,LF Line Location: WALK+5
Function Call: WRITE	Prompt: NAME_"="_VAL,LF Line Location: WALK+13