Routine: DDSZ1

Information

DDSZ1 ;SFISC/MKO-GET BLOCK INFO,SCREEN IMAGE ;20JAN2004

Source file <DDSZ1.m>

Name	Comments	DBIA/ICR reference
EN(DDSPG,DDSBK,DDP,DDSBY,DDSBX,DDSBO,DDSTP,DDSREP,DDSNDD,DDSPGRP,DDSSCR,DDSNAV,DDSORD,DDSRNAV)	;
LOOP
KILL
FLD	;Set up ; @DDSREFS@(pg,bk,ddo, ; "D") = data $Y^data $X^data $L^field# ; ^xcap $Y^xcap $X^xcap colon^xcap req ; ^1 if computed field^1 if right justified ; "COMPE") = M code that sets X ; "COMPE",1) = array sets DDSE(n)
UP
CAPS
HITE