The following example illustrates the display of the standardized transfer area for a simulated SDF-A statement. In the case of commands, the standardized transfer area is displayed only if it was defined with ADD-CMD ...,IMPLEMENTOR=
*TPR(...,CALL=*NEW...) (see SDF-A). The standardized transfer area is displayed as shown in the example:
if the operand DISPLAY=*LONG has been set in the DEFINE-ENVIRONMENT statement, or
if “LONG” is entered in response to the message
% SDS0008 DO YOU WANT TO DISPLAY TRANSFER AREA? REPLY: NO/LONG/SHORT
|
The statements of the program SDF-A are defined as test objects. The internal program name for SDF V4.1 is $SDAED41.
It is defined for the environment that only the system syntax file of SDF-A be activated. DISPLAY=*LONG specifies that the standardized transfer area and the structure description will be displayed at once and without having to request them. The output is reproduced on the following pages.
*** TRANSFER AREA *** ~~~~~~~~~~~~~~~~~~~~~ A D D C M D (129418) 3A98C1C4 C4C3D4C4 40400000 00000000 (129428) 00000046 80080012 95D00000 00000000 (129438) 80160012 95F88016 001295EA 80160012 (129448) 95F08016 001295F4 00000000 00008007 (129458) 001295DC 00000000 00000000 00000000 (129468) 00000000 00008016 0012962C 80160012 (129478) 96308016 00129698 80130012 965E8013 (129488) 00129636 80130012 964A8013 00129672 (129498) 00000000 00000000 00000000 80050012 (1294A8) 960C8016 001295E4 80160012 95FC8013 (1294B8) 00129684 80160012 96000000 00000000 (1294D8) 00000000 00000000 00000000 00008016 (1294E8) 0012969E 80160012 96A80000 00000000 (129508) 00000000 00000000 00000000 00008016 (129518) 00129616 80160012 96260000 00000000 (129558) 00000000 00000000 00000000 80160012 (129568) 96AE0000 00000000 80160012 967E8016 (129578) 00129692 80160012 96448016 00129658 (129588) 80160012 966C8016 001296A2 00000000 M Y - C O M (1295C8) 00000000 00000000 000AD4E8 60C3D6D4 M A N D M Y C O M S A (1295D8) D4C1D5C4 0005D4E8 C3D6D400 0004E2C1 M E N A M E N O N O (1295E8) D4C50004 D5C1D4C5 0002D5D6 0002D5D6 N O N O P R O C E D (1295F8) 0002D5D6 0002D5D6 0009D7D9 D6C3C5C4 U R E M Y - P R O C (129608) E4D9C500 0007D4E8 60D7D9D6 C300000E C A L L - P R O C E D U R E (129618) C3C1D3D3 60D7D9D6 C3C5C4E4 D9C50004 N O N E N O Y E S (129628) D5D6D5C5 0002D5D6 0003E8C5 E2000000 Y E S A L (129638) 80160012 963E0003 E8C5E200 0003C1D3 L Y E S (129648) D3000000 80160012 96520003 E8C5E200 A L L (129658) 0003C1D3 D3000000 80160012 96660003 Y E S A L L (129668) E8C5E200 0003C1D3 D3000000 80160012 N O A L L (129678) 967A0002 D5D60003 C1D3D300 00008016 Y E S A L L (129688) 0012968C 0003E8C5 E2000003 C1D3D300 Y E S N O A L L (129698) 0003E8C5 E2000002 D5D60003 C1D3D300 C M D A L L (1296A8) 0003C3D4 C4000003 C1D3D300 00000000 *** STRUCTURED DESCRIPTION *** ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ INTERNAL NAME OF THE COMMAND : ADDCMD VERSION OF THE TRANSFER AREA : x ---(only for the new format of the VERSION OF THE CMD/STMT : x --- transfer area (as of SDF V4.1)) MAXIMUM NUMBER OF OPERANDS : 70 OP( 1) : - TYPE : STRUCT_NAME - LENGTH : 10 - VALUE : M Y - C O M M A N D D4E860C3 D6D4D4C1 D5C4 OP( 3) : - TYPE : KEYW - LENGTH : 2 - VALUE : N O D5D6 OP( 4) : - TYPE : KEYW - LENGTH : 4 - VALUE : N A M E D5C1D4C5 OP( 5) : - TYPE : KEYW - LENGTH : 2 - VALUE : N O D5D6 OP( 6) : - TYPE : KEYW - LENGTH : 2 - VALUE : N O D5D6 OP( 8) : - TYPE : ALPHA_NAME - LENGTH : 5 - VALUE : M Y C O M D4E8C3D6 D4 OP(12) : - TYPE : KEYW - LENGTH : 2 - VALUE : N O D5D6 OP(13) : - TYPE : KEYW - LENGTH : 3 - VALUE : Y E S E8C5E2 OP(14) : - TYPE : KEYW - LENGTH : 3 - VALUE : Y E S E8C5E2 OP(15) : - TYPE : STRUCTURE VALUE INTRODUCING THE STRUCTURE : - TYPE : KEYW - LENGTH : 3 - VALUE : Y E S E8C5E2 OP(16) : - TYPE : STRUCTURE VALUE INTRODUCING THE STRUCTURE : - TYPE : KEYW - LENGTH : 3 - VALUE : Y E S E8C5E2 OP(17) : - TYPE : STRUCTURE VALUE INTRODUCING THE STRUCTURE : - TYPE : KEYW - LENGTH : 3 - VALUE : Y E S E8C5E2 OP(18) : - TYPE : STRUCTURE VALUE INTRODUCING THE STRUCTURE : - TYPE : KEYW - LENGTH : 2 - VALUE : N O D5D6 OP(21) : - TYPE : C_STR - LENGTH : 7 - VALUE : M Y - P R O C D4E860D7 D9D6C3 OP(22) : - TYPE : KEYW - LENGTH : 4 - VALUE : S A M E E2C1D4C5 OP(23) : - TYPE : KEYW - LENGTH : 2 - VALUE : N O D5D6 OP(24) : - TYPE : STRUCTURE VALUE INTRODUCING THE STRUCTURE : - TYPE : KEYW - LENGTH : 3 - VALUE : Y E S E8C5E2 OP(25) : - TYPE : KEYW - LENGTH : 9 - VALUE : P R O C E D U R E D7D9D6C3 C5C4E4D9 C5 OP(32) : - TYPE : KEYW - LENGTH : 2 - VALUE : N O D5D6 OP(33) : - TYPE : KEYW - LENGTH : 3 - VALUE : C M D C3D4C4 OP(40) : - TYPE : KEYW - LENGTH : 14 - VALUE : C A L L - P R O C E D U R E C3C1D3D3 60D7D9D6 C3C5C4E4 D9C5 OP(41) : - TYPE : KEYW - LENGTH : 4 - VALUE : N O N E D5D6D5C5 OP(53) : - TYPE : KEYW - LENGTH : 3 - VALUE : A L L C1D3D3 OP(55) : - TYPE : KEYW - LENGTH : 3 - VALUE : A L L C1D3D3 OP(56) : - TYPE : KEYW - LENGTH : 3 - VALUE : A L L C1D3D3 OP(57) : - TYPE : KEYW - LENGTH : 3 - VALUE : A L L C1D3D3 OP(58) : - TYPE : KEYW - LENGTH : 3 - VALUE : A L L C1D3D3 OP(59) : - TYPE : KEYW - LENGTH : 3 - VALUE : A L L C1D3D3 OP(60) : - TYPE : KEYW - LENGTH : 3 - VALUE : A L L C1D3D3 // */* % SDS0002 SDF-SIM TERMINATED NORMALLY