Modifying Device Designs › Device User Source › Contents of Extents › Format Extent

Format Extent

The Format extent covers only those sections of the DDS source file that refer to format-level code, such as Command key definition, SETOFs, Help specifications, and cursor location specifications. It does not cover any of the fields that exist within that format. For example,

A     R #RCDKEY            TEXT(‘KEY SCREEN’)
A                          SETOF(98 ‘Force input format’)
A                                 BLINK OVERLAY
A                                 INDTXT(86 ‘Enable PUTOVR’)
A 86                       PUTOVR
A 04
AO 25                      CSRLOC(ZZCSRW XXCSCL)
A                                INDTXT989 ‘’ADD’ mode’)
A* Command keys
A                                VLDCMDKEY(29 ‘Valid command key’)
A                                CA03(03 ‘Exit.’)
A                                CF09(09 ‘Change mode.’)
A                                CF05(05 ‘Reset.’)
A                                CF04(04 ‘Prompt.’)
A* SETOFFS.................................
A                                SETOF(99 ‘Global error flag’)
A                                SETOF(31 ‘Invalid: #1ADCD’)
* ..................................
* Help specifications
A      H                   HLPARA(*NONE)
A                                HLPPNLGRP(‘INTRO’ UUAXE2RH)
A      H                   HLPARA(*NONE)
A                                HLPPNLGRP(‘KEY’ UUAXE2RH)
A      H                   HLPARA(*NONE)
A                                HLPPNLGRP(‘FUNCK" UUAXE2RH)
A      H                   HLPARA(*NONE)
A                                HLPPNLGRP(‘DATAK’ UUAXE2RH)
A                                HLPEXCLD
* .................................
* Reposition cursor to where?
A       ZZCSRW     3 OH     TEXT(‘Cursor row’)
A       ZZCSCL     3 OH     TEXT(‘Cursor Column’)