Depuis la TR6 de la V7R4, vous pouvez manipuler entièrement les objets de type *USRSPC
Rappel depuis la TR4 vous pouviez les lire
voici la liste des commandes à utiliser avec un exemple
Création, procédure, CREATE_USER_SPACE
CALL QSYS2.CREATE_USER_SPACE(USER_SPACE => ‘MONUSRSPC’,
USER_SPACE_LIBRARY => ‘GDATA’,
SIZE => 100,
PUBLIC_AUTHORITY => ‘*CHANGE’);
Ecriture, procédure, CHANGE_USER_SPACE ou CHANGE_USER_SPACE_BINARY
CALL QSYS2.CHANGE_USER_SPACE(USER_SPACE => ‘MONUSRSPC’,
USER_SPACE_LIBRARY => ‘GDATA’,
DATA => ‘Tester c »est douter , corriger c »est adbiquer’,
START_POSITION => 1);
Lecture, fonction table, USER_SPACE
SELECT Substr(DATA , 1 , 100) FROM TABLE(QSYS2.USER_SPACE(
USER_SPACE => ‘MONUSRSPC’,
USER_SPACE_LIBRARY => ‘GDATA’));
il existe d’autres services SQL , pour manipuler les USER SPACE
QSYS2.USER_SPACE_INFO pour avoir les informations du user space
SELECT * FROM TABLE(QSYS2.USER_SPACE_INFO(
USER_SPACE => ‘USRSPC1’,
USER_SPACE_LIBRARY => ‘GDATA’));
mais aussi pour modifier
QSYS2.CHANGE_USER_SPACE_ATTRIBUTES()
vous pouvez facilement intégrer ces requêtes dans du RPGLE par exemple