Routine: DDGFFLDA

Information

DDGFFLDA ;SFISC/MKO - ADD A FIELD ;19APR2016

Source file <DDGFFLDA.m>

Name	Comments	DBIA/ICR reference
ADD	;Add a field
ADDQ	;Refresh and cleanup
SAVE	;Save changes to caption, coordinates, data length, and suppress
LOADF	;Set DDGFREF array and window buffer
KILLPGS(BLOCK,PPAGE)	;GET RID OF OTHER PAGES THAT HAVE THIS BLOCK ON THEM. PPAGE="P"_(INTERNAL PAGE) ALSO COME HERE FROM DDGFFLD
RC(DDGFY,DDGFX)	;Update status line, reset DX and DY, move cursor

Name	Line Occurrences
Function Call: WRITE	Prompt: S_$J("",7-$L(S)) Line Location: RC+4