{"id":65,"date":"2023-02-14T11:22:29","date_gmt":"2023-02-14T10:22:29","guid":{"rendered":"http:\/\/www.sepchat.com\/SC\/?p=65"},"modified":"2023-02-23T15:16:00","modified_gmt":"2023-02-23T14:16:00","slug":"ibmi-sql-lire-une-dtaara","status":"publish","type":"post","link":"http:\/\/www.sepchat.com\/SC\/index.php\/2023\/02\/14\/ibmi-sql-lire-une-dtaara\/","title":{"rendered":"IBMi\u00a0– SQL Lire une DTAARA"},"content":{"rendered":"\n

Depuis la V 7R2, il est possible de lire des donn\u00e9es syst\u00e8me directement depuis une instruction SQL. <\/p>\n\n\n\n

Il est aussi possible de lire le contenu d’une DTAARA gr\u00e2ce \u00e0 une fonction SQL. Voici comment ….  ** Update V7R4<\/p>\n\n\n\n

<\/p>\n\n\n\n

Dans un premier temps, il faut cr\u00e9er un PGM pour lire la dtaara :<\/p>\n\n\n\n

PGM   PARM(&VERSION)<\/p>\n\n\n\n

DCL  &VERSION *CHAR LEN(8)<\/p>\n\n\n\n

RTVDTAARA DTAARA(ARVERSION) RTNVAR(&VERSION)<\/p>\n\n\n\n

ENDPGM<\/p>\n\n\n\n

Compiler le module :<\/p>\n\n\n\n

CRTCLMOD MODULE(MYLIB\/GETDTA) SRCFILE(MYLIB\/QCLLESRC)<\/p>\n\n\n\n

Compiler le programme de service <\/p>\n\n\n\n

CRTSRVPGM SRVPGM(MYLIB\/GETDTA) MODULE(MYLIB\/GETDTA) EXPORT(*ALL)<\/p>\n\n\n\n

Puis, d\u00e9finir la fonction SQL dans le membre source GETVERSION dans MYLIB\/QSQLSRC<\/p>\n\n\n\n

Create Function
GetVersion ()<\/p>\n\n\n\n

Returns CHAR(8)
Language CL
Specific GetVersion
Deterministic
No SQL
Returns Null on Null Input
No External Action
Not Fenced
External Name ‘MYLIB\/ GETDTA(GETDTA)’
Parameter Style SQL;<\/p>\n\n\n\n

Lancer la compilation de la fonction :<\/p>\n\n\n\n

RUNSQLSTM SRCFILE(MYLIB\/QSQLSRC) SRCMBR(GETVERSION)<\/p>\n\n\n\n

\u00c0 partir de n’importe qu’elle session SQL connect\u00e9e \u00e0 votre IBMi lancer la requ\u00eate:<\/p>\n\n\n\n

SELECT  GetVersion() FROM SYSIBM\/SYSDUMMY1<\/p>\n\n\n\n

 Depuis la V7R4, il est possible de lire le contenu d’une DATAARA sans avoir \u00e0 cr\u00e9er une fonction.<\/p>\n\n\n\n

Il suffit de passer la requ\u00e8te SQL suivante :<\/p>\n\n\n\n

SELECT DATA_AREA_VALUE FROM TABLE(QSYS.2.DATA_AREA8INFO(<\/p>\n\n\n\n

DATA_AREA8NAME => ‘ARCVERSION’,<\/p>\n\n\n\n

DATA_AREA_LIBRARY => ‘MYLIB’))<\/p>\n\n\n\n

 (Merci Yvain pour l’upgrade)<\/p>\n\n\n\n

\"\"<\/a><\/figure>\n\n\n\n
\n
Cet article vous a \u00e9t\u00e9 utile ? N\u2019h\u00e9sitez pas \u00e0 le partager.<\/a><\/div>\n<\/div>\n","protected":false},"excerpt":{"rendered":"

Depuis la V 7R2, il est possible de lire des donn\u00e9es syst\u00e8me directement depuis une instruction SQL. Il est aussi possible de lire le contenu d’une DTAARA gr\u00e2ce \u00e0 une fonction SQL. Voici comment ….  ** Update V7R4 Dans un premier temps, il faut cr\u00e9er un PGM pour lire la dtaara : PGM   PARM(&VERSION) DCL  […]<\/p>\n","protected":false},"author":1,"featured_media":0,"comment_status":"closed","ping_status":"open","sticky":false,"template":"","format":"standard","meta":[],"categories":[7,8],"tags":[],"_links":{"self":[{"href":"http:\/\/www.sepchat.com\/SC\/index.php\/wp-json\/wp\/v2\/posts\/65"}],"collection":[{"href":"http:\/\/www.sepchat.com\/SC\/index.php\/wp-json\/wp\/v2\/posts"}],"about":[{"href":"http:\/\/www.sepchat.com\/SC\/index.php\/wp-json\/wp\/v2\/types\/post"}],"author":[{"embeddable":true,"href":"http:\/\/www.sepchat.com\/SC\/index.php\/wp-json\/wp\/v2\/users\/1"}],"replies":[{"embeddable":true,"href":"http:\/\/www.sepchat.com\/SC\/index.php\/wp-json\/wp\/v2\/comments?post=65"}],"version-history":[{"count":10,"href":"http:\/\/www.sepchat.com\/SC\/index.php\/wp-json\/wp\/v2\/posts\/65\/revisions"}],"predecessor-version":[{"id":369,"href":"http:\/\/www.sepchat.com\/SC\/index.php\/wp-json\/wp\/v2\/posts\/65\/revisions\/369"}],"wp:attachment":[{"href":"http:\/\/www.sepchat.com\/SC\/index.php\/wp-json\/wp\/v2\/media?parent=65"}],"wp:term":[{"taxonomy":"category","embeddable":true,"href":"http:\/\/www.sepchat.com\/SC\/index.php\/wp-json\/wp\/v2\/categories?post=65"},{"taxonomy":"post_tag","embeddable":true,"href":"http:\/\/www.sepchat.com\/SC\/index.php\/wp-json\/wp\/v2\/tags?post=65"}],"curies":[{"name":"wp","href":"https:\/\/api.w.org\/{rel}","templated":true}]}}