Example: Change a user space

This example includes before and after illustrations that show how the QUSCHGUS API changes a user space.

The following is a user space before you change it with one of the change examples.

Note: Read the Code license and disclaimer information for important legal information.
5763SS1 V3R1M0 940909          AS/400 Dump               128747/ERICJ/ERICJS1          03/22/94 11:03:26
DMPSYSOBJ PARAMETERS
   TEMPSPACE             CONTEXT-QGPL
OBJ-
                         *USRSPC
OBJTYPE-
OBJECT TYPE-                 SPACE                                   *USRSPC
NAME-           TEMPSPACE                          TYPE-             19   SUBTYPE-        34
LIBRARY-        QGPL                               TYPE-             04   SUBTYPE-        01
CREATION-       3/22/93  11:02:56                  SIZE-             0000400
OWNER-          ERICJ                              TYPE-             08   SUBTYPE-        01
ATTRIBUTES-              0800                      ADDRESS-          01841400  0000
SPACE ATTRIBUTES-
 000000  00000080  00000060  1934E3C5  D4D7E2D7  C1C3C540  40404040 40404040  40404040 *  -TEMPSPACE     *
 000020  40404040  40404040  E0000000  00000000  00000200  5C800000 00000000  00000000 *   \       *     *
 000040  00000000  00000000  00020002  6E000400  00000000  00000000 00000000  00000000 *     >           *
SPACE-
 0000E00 5C5C5C5C  5C5C5C5C  5C5C5C5C  5C5C5C5C  5C5C5C5C  5C5C5C5C 5C5C5C5C  5C5C5C5C *******************
        LINES  000200     TO     0001FF   SAME AS ABOVE
                
.POINTERS-
    NONE
OIR DATA-
.TEXT
 000000  E4A28599  40A29781  83854086  969940C3  88819587  8540E4A2 859940E2  97818385 *user space for Change User *
 000020  40C5A781  94979385                                                            *Space Example              *
.SERVICE-
 000000  40404040  40404040  40404040  40404040  40404040  40404040 40404040  40404040 *                1          *
 000020  40404040  40404040  404040D9  F0F3D4F0  F0F0F9F0  F0F3F2F2 F1F1F0F2  F5F64040 *       V3R1M0094032210256  *
 000040  40404040  40404040  40404040  40404040  40404040  40F14040 40404040  40404040 *
 000060  40404040  40404040  40404040  40404040  40404040  40404040 00000000  00000000 *
 000080  00000000  00000000  00000000  00000000  00000000  00000000 00000000  00000000 * 
 0000A0  00000000  00000000  
 END OF DUMP
 
                              * * * * *  E N D  O F  L I S T I N G  * * * * *

The following is a user space after you change it with one of the change examples. Notice that the change takes place in SPACE-.

5763SS1 V3R1M0 940909          AS/400 Dump               128747/ERICJ/ERICJS1          03/22/94 11:03:26
DMPSYSOBJ PARAMETERS
   TEMPSPACE             CONTEXT-QGPL
OBJ-
                         *USRSPC
OBJTYPE-
OBJECT TYPE-                 SPACE                                   *USRSPC
NAME-           TEMPSPACE                          TYPE-             19   SUBTYPE-        34
LIBRARY-        QGPL                               TYPE-             04   SUBTYPE-        01
CREATION-       3/22/93  11:02:56                  SIZE-             0000400
OWNER-          ERICJ                              TYPE-             08   SUBTYPE-        01
ATTRIBUTES-              0800                      ADDRESS-          01841400  0000
SPACE ATTRIBUTES-
 000000 00000080  00000060  1934E3C5  D4D7E2D7  C1C3C540  40404040 40404040  40404040 *  -TEMPSPACE     
 000020 40404040  40404040  E0000000  00000000  00000200  5C800000 00000000  00000000 *   \       *                 *
 000040 00000000  00000000  00020002  6E000400  00000000  00000000 00000000  00000000 *     >                       *
SPACE-
 000000 C2898740  E2A39989  95874097  81848485  8440A689  A3884082 93819592  A2404040 *Big string padded with blanks*
 000020 40404040  40404040  40404040  40404040  40404040  40404040 40404040  40404040
 000040 5C5C5C5C  5C5C5C5C  5C5C5C5C  5C5C5C5C  5C5C5C5C  5C5C5C5C 5C5C5C5C  5C5C5C5C *******************************
        LINES  000060     TO     0001FF   SAME AS ABOVE
                
.POINTERS-
    NONE
OIR DATA-
.TEXT
 000000  E4A28599  40A29781  83854086  969940C3  88819587  8540E4A2 859940E2  97818385 *user space for Change User *
 000020  40C5A781  94979385                                                            *Space Example              *
.SERVICE-
 000000  40404040  40404040  40404040  40404040  40404040  40404040 40404040  40404040 *                1          *
 000020  40404040  40404040  404040D9  F0F3D4F0  F0F0F9F0  F0F3F2F2 F1F1F0F2  F5F64040 *       V3R1M0094032210256  *
 000040  40404040  40404040  40404040  40404040  40404040  40F14040 40404040  40404040 *
 000060  40404040  40404040  40404040  40404040  40404040  40404040 00000000  00000000 *
 000080  00000000  00000000  00000000  00000000  00000000  00000000 00000000  00000000 * 
 0000A0  00000000  00000000  
 END OF DUMP
 
                              * * * * *  E N D  O F  L I S T I N G  * * * * *