12<\/td> 0020E, 0023E , 0014W , 0016W , 0024W , 0011 , 0012 , 0013 , 0015 , 0017 , 0018 , 0019<\/td><\/tr><\/tbody><\/table><\/figure>\n<\/div>\n<\/div>\n\n\n\ntutto questo richiede un programma o pu\u00f2 essere fatto elegantemente con un comando sql?<\/p>\n\n\n\n
Query<\/strong><\/p>\n\n\n\nSi, con il seguente comando Sql si ottiene esattamente il risultato atteso:<\/p>\n\n\n\n
with -- Interface result\n W1 (INT, RESULT) as (\n values ('0011', ' '), ('0012', ' '), ('0013', ' '), ('0014', 'W'),\n ('0015', ' '), ('0016', 'W'), ('0017', ' '), ('0018', ' '),\n ('0019', ' '), ('0020', 'E'), ('0023', 'E'), ('0024', 'W')\n ) -- select * from W1 order by 1;\n -- assign progressive numeration (first E errors, then W warnings,\n -- finally processing without reports\n , W2 (INTR, ROW_NUM, RESULT) as (\n select W1.INT concat result concat CAST(RPAD(' ', 399, ' ') AS CHAR(400)) INTR\n , row_number() over ( partition by 'COMMON_VALUE'\n order by case W1.result\n when 'E' then 1\n when 'W' then 2\n when ' ' then 3\n end ,\n W1.INT) ROW_NUM\n , W1.RESULT\n from W1 order by 1) -- select trim(INTR) INTR, ROW_NUM, RESULT from W2;\n -- recursive CTE (Common Table Expression)\n , W3 (INTR, ROW_NUM, INT_LIST)\n as (select BASE.INTR, BASE.ROW_NUM, trim(BASE.INTR)\n from W2 BASE where BASE.ROW_NUM = 1 union all\n select t1.INTR, t1.ROW_NUM, INT_LIST concat ', ' concat trim(t1.INTR) concat ' '\n from W3 t0, W2 t1 where t0.ROW_NUM + 1 = t1.ROW_NUM\n ) -- select trim(INTR) INTR, ROW_NUM, INT_LIST from W3;\nselect ROW_NUM, INT_LIST from W3 RQ\n where RQ.ROW_NUM = (select max(ROW_NUM) from W3);\n<\/pre>\n\n\n\nQuesta query, partendo da una tabella contenente il risultati di elaborazioni di interfacce (W1), produce come risultato una sola riga contenente il numero delle interfacce e l’elenco di ogni singola interfaccia riportando prima quelle con E errore, poi quelle con W warning e infine quelle senza segnalazioni.<\/p>\n\n\n\n
Descrizione dettagliata Query<\/strong><\/p>\n\n\n\nVediamo in dettaglio come \u00e8 composta l’istruzione Sql<\/p>\n\n\n\n
\nCTE W1 (Risultato Interfacce)<\/strong>:<\/li>\n<\/ul>\n\n\n\n\nQuesta CTE \u00e8 una simulazione di una tabella che utilizza la clausola VALUES<\/strong>, che crea un insieme temporaneo di righe (INT, RESULT<\/strong>). Ogni riga rappresenta un identificatore di interfaccia (INT<\/strong>) e il relativo risultato (RESULT<\/strong>), dove il risultato potrebbe essere un errore (‘E’), un avviso (‘W’) o nessun problema (‘ ‘).<\/li>\n<\/ul>\n\n\n\n\nCTE W2 (Numerazione Progressiva):<\/strong><\/li>\n<\/ul>\n\n\n\n\nQuesta CTE aggiunge un numero progressivo a ciascuna riga da W1<\/strong> utilizzando la funzione finestra ROW_NUMBER()<\/strong>. Questa numerazione \u00e8 partizionata in base a un valore costante (che di fatto significa nessun partizionamento poich\u00e9 tutte le righe avranno lo stesso “COMMON_VALUE”) e ordinata prima in base al tipo di risultato (“E”, quindi “W”, quindi “”) e quindi dall’identificatore di interfaccia INT<\/strong>.<\/li>\n<\/ul>\n\n\n\n\nL’istruzione SELECT<\/strong> concatena il valore INT<\/strong>, il RESULT<\/strong> e una stringa riempita a destra di 399 spazi convertiti in CHAR(400)<\/strong> per garantire che tutti i valori INTR<\/strong> abbiano una lunghezza uniforme.<\/li>\n<\/ul>\n\n\n\n\nQuesta numerazione ordinata aiuta nella successiva concatenazione degli identificatori di interfaccia nell’ordine desiderato.<\/li>\n<\/ul>\n\n\n\n\nCTE W3 (CTE Ricorsiva per Concatenazione):<\/strong><\/li>\n<\/ul>\n\n\n\n\nQuesta CTE \u00e8 ricorsivo e crea una singola stringa (INT_LIST<\/strong>) contenente tutti gli identificatori di interfaccia, nell’ordine specificato da W2<\/strong>.<\/li>\n<\/ul>\n\n\n\n\nSi inizia con il caso base in cui ROW_NUM<\/strong> \u00e8 1, selezionando il primo identificatore di interfaccia.<\/li>\n<\/ul>\n\n\n\n\nLa parte ricorsiva unisce W3<\/strong> a W2<\/strong> a condizione che W3.ROW_NUM + 1 = W2.ROW_NUM<\/strong>, aggiungendo di fatto il successivo identificatore di interfaccia all’elenco (INT_LIST<\/strong>) per ogni riga successiva.<\/li>\n<\/ul>\n\n\n\n\nLa query ricorsiva continua finch\u00e9 tutte le righe non vengono elaborate, creando un elenco cumulativo di identificatori di interfaccia.<\/li>\n<\/ul>\n\n\n\nIstruzione Select finale:<\/strong><\/p>\n\n\n\n\nL’istruzione SELECT<\/strong> finale recupera l’ultima riga da W3<\/strong>, che contiene l’elenco cumulativo di tutte le interfacce ordinate per tipo di risultato e INT<\/strong>. ROW_NUM<\/strong> in questo caso rappresenta il conteggio totale delle interfacce.<\/li>\n<\/ul>\n\n\n\n\nUtilizza una sottoquery per trovare max(ROW_NUM)<\/strong> per garantire che venga selezionato solo l’elenco finale e completo.<\/li>\n<\/ul>\n\n\n\nIn sintesi<\/strong><\/p>\n\n\n\nIn sintesi, la query \u00e8 progettata per creare un elenco ordinato di identificatori di interfaccia, dando priorit\u00e0 agli errori (‘E’), quindi agli avvisi (‘W’) e infine a quelli senza problemi (‘ ‘), e lo presenta come una singola stringa insieme al conteggio totale delle interfacce.<\/p>\n\n\n\n
L’utilizzo della funzione RPAD<\/strong> e il cast su CHAR(400)<\/strong> garantiscono che ciascun identificatore nell’elenco sia formattato in modo uniforme, il che \u00e8 particolarmente importante per il processo di concatenazione ricorsiva.<\/p>\n\n\n\nSguardo pi\u00f9 approfondito<\/strong><\/p>\n\n\n\nPer capire meglio il funzionamento delle CTE Ricorsive proviamo a dare una sguardo pi\u00f9 approfondito ai singoli risultati delle CTE intermedie.<\/p>\n\n\n\n
CTE W2 (Numerazione Progressiva)<\/strong><\/p>\n\n\n\nQuesta CTE aggiunge una numerazione progressiva in base al tipo di risultato (“E”, quindi “W”, quindi “”) e quindi dall’identificatore di interfaccia INT.<\/p>\n\n\n\n
Questa numerazione ordinata aiuta nella successiva concatenazione degli identificatori di interfaccia nell’ordine desiderato.<\/p>\n\n\n\n
select trim(INTR) INTR, ROW_NUM, RESULT from W2;<\/pre>\n\n\n\n<\/p>\n\n\n\n
\n
\n
INTR<\/td> ROW_NUM<\/td> RESULT<\/td><\/tr> 0020E<\/td> 1<\/td> E<\/td><\/tr> 0023E<\/td> 2<\/td> E<\/td><\/tr> 0014W<\/td> 3<\/td> W<\/td><\/tr> 0016W<\/td> 4<\/td> W<\/td><\/tr> 0024W<\/td> 5<\/td> W<\/td><\/tr> 0011<\/td> 6<\/td> <\/td><\/tr> 0012<\/td> 7<\/td> <\/td><\/tr> 0013<\/td> 8<\/td> <\/td><\/tr> 0015<\/td> 9<\/td> <\/td><\/tr> 0017<\/td> 10<\/td> <\/td><\/tr> 0018<\/td> 11<\/td> <\/td><\/tr> 0019<\/td> 12<\/td> <\/td><\/tr><\/tbody><\/table><\/figure>\n<\/div>\n\n\n\n<\/div>\n<\/div>\n\n\n\n
CTE W3 (CTE Ricorsiva per Concatenazione)<\/strong><\/p>\n\n\n\nQuesta CTE ricorsiva crea iterativamente (in modo ricorsivo) una stringa (INT_LIST) contenente tutti gli identificatori di interfaccia, nell’ordine specificato da W2.<\/p>\n\n\n\n
La query ricorsiva continua finch\u00e9 tutte le righe non vengono elaborate, creando un elenco cumulativo di identificatori di interfaccia.<\/p>\n\n\n\n
select trim(INTR) INTR, ROW_NUM, INT_LIST from W3;<\/pre>\n\n\n\n\n
\n
INTR<\/td> ROW_NUM<\/td> INT_LIST<\/td><\/tr> 0020E<\/td> <\/td> 0020E<\/td><\/tr> 0023E<\/td> <\/td> 0020E, 0023E <\/td><\/tr> 0014W<\/td> <\/td> 0020E, 0023E , 0014W <\/td><\/tr> 0016W<\/td> <\/td> 0020E, 0023E , 0014W , 0016W <\/td><\/tr> 0024W<\/td> <\/td> 0020E, 0023E , 0014W , 0016W , 0024W <\/td><\/tr> 0011<\/td> <\/td> 0020E, 0023E , 0014W , 0016W , 0024W , 0011 <\/td><\/tr> 0012<\/td> <\/td> 0020E, 0023E , 0014W , 0016W , 0024W , 0011 , 0012 <\/td><\/tr> 0013<\/td> <\/td> 0020E, 0023E , 0014W , 0016W , 0024W , 0011 , 0012 , 0013 <\/td><\/tr> 0015<\/td> <\/td> 0020E, 0023E , 0014W , 0016W , 0024W , 0011 , 0012 , 0013 , 0015 <\/td><\/tr> 0017<\/td> <\/td> 0020E, 0023E , 0014W , 0016W , 0024W , 0011 , 0012 , 0013 , 0015 , 0017 <\/td><\/tr> 0018<\/td> <\/td> 0020E, 0023E , 0014W , 0016W , 0024W , 0011 , 0012 , 0013 , 0015 , 0017 , 0018 <\/td><\/tr> 0019<\/td> <\/td> 0020E, 0023E , 0014W , 0016W , 0024W , 0011 , 0012 , 0013 , 0015 , 0017 , 0018 , 0019<\/td><\/tr><\/tbody><\/table><\/figure>\n<\/div>\n<\/div>\n\n\n\nCome si pu\u00f2 vedere il risultato della query contiene tutte le righe delle varie iterazioni e quella che a noi interessa \u00e8 l’ultima, ovvero quella dell’ultimo ciclo di ricorsivit\u00e0, che viene estratta dalla successiva e ultima CTE.<\/p>\n\n\n\n
Istruzione Select finale<\/strong><\/p>\n\n\n\nQuesta CTE finale recupera l’ultima riga da W3, che contiene l’elenco cumulativo di tutte le interfacce ordinate per tipo di risultato e INT. ROW_NUM in questo caso rappresenta il conteggio totale delle interfacce<\/p>\n\n\n\n
select ROW_NUM, INT_LIST\n from W3 RQ\n where RQ.ROW_NUM = (select max(ROW_NUM) from W3)\n<\/pre>\n\n\n\n\n
\n
ROW_NUM<\/td> INT_LIST<\/td><\/tr> 12<\/td> 0020E, 0023E , 0014W , 0016W , 0024W , 0011 , 0012 , 0013 , 0015 , 0017 , 0018 , 0019<\/td><\/tr><\/tbody><\/table><\/figure>\n<\/div>\n<\/div>\n\n\n\nConclusioni<\/strong><\/p>\n\n\n\nLa query SQL illustrata utilizza Common Table Expression (CTE) per organizzare e processare i dati di interfaccia, creando una lista ordinata di identificatori di interfaccia con un conteggio totale. Prioritizzando prima gli errori (‘E’), poi gli avvisi (‘W’) e infine gli identificatori senza segnalazioni (‘ ‘), il risultato finale \u00e8 una singola riga che contiene il numero totale di interfacce e un elenco concatenato di ciascuna interfaccia, facilitando la revisione e l’analisi dei risultati del processo di interfaccia.<\/p>\n\n\n\n
Tenere presente, come sempre, che l\u2019implementazione e le funzionalit\u00e0 effettive potrebbero variare a seconda della versione del sistema operativo iSeries e del database DB2. \u00c8 sempre buona norma fare riferimento alla documentazione ufficiale IBM per avere informazioni pi\u00f9 precise e dettagliate<\/p>\n\n\n\n
<\/p>\n\n\n\n
<\/p>\n\n\n\n
<\/p>\n\n\n\n
<\/p>\n\n\n\n
<\/p>\n\n\n\n
<\/p>\n\n\n\n
<\/p>\n","protected":false},"excerpt":{"rendered":"
Di seguito gli articoli della serie CTE (incluso questo corrente): Definizione del contesto Supponiamo di avere una tabella che riporta i risultati delle elaborazioni notturne di interfacce, come da esempio seguente: INT RESULT 0011 0012 0013 0014 W 0015 0016…<\/p>\n","protected":false},"author":3,"featured_media":4357,"comment_status":"closed","ping_status":"open","sticky":false,"template":"","format":"standard","meta":{"inline_featured_image":false,"_kadence_starter_templates_imported_post":false,"_kad_post_transparent":"","_kad_post_title":"","_kad_post_layout":"","_kad_post_sidebar_id":"","_kad_post_content_style":"","_kad_post_vertical_padding":"","_kad_post_feature":"","_kad_post_feature_position":"","_kad_post_header":false,"_kad_post_footer":false,"_kad_post_classname":"","footnotes":""},"categories":[17,15,18],"tags":[124,128,46],"class_list":["post-4352","post","type-post","status-publish","format-standard","has-post-thumbnail","hentry","category-piu-in-profondita","category-gestire-as400-con-sql","category-tips-and-tricks","tag-cte-common-table-expression","tag-cte-ricorsive","tag-sql"],"_links":{"self":[{"href":"https:\/\/www.skillup.cloud\/it\/wp-json\/wp\/v2\/posts\/4352","targetHints":{"allow":["GET"]}}],"collection":[{"href":"https:\/\/www.skillup.cloud\/it\/wp-json\/wp\/v2\/posts"}],"about":[{"href":"https:\/\/www.skillup.cloud\/it\/wp-json\/wp\/v2\/types\/post"}],"author":[{"embeddable":true,"href":"https:\/\/www.skillup.cloud\/it\/wp-json\/wp\/v2\/users\/3"}],"replies":[{"embeddable":true,"href":"https:\/\/www.skillup.cloud\/it\/wp-json\/wp\/v2\/comments?post=4352"}],"version-history":[{"count":6,"href":"https:\/\/www.skillup.cloud\/it\/wp-json\/wp\/v2\/posts\/4352\/revisions"}],"predecessor-version":[{"id":4382,"href":"https:\/\/www.skillup.cloud\/it\/wp-json\/wp\/v2\/posts\/4352\/revisions\/4382"}],"wp:featuredmedia":[{"embeddable":true,"href":"https:\/\/www.skillup.cloud\/it\/wp-json\/wp\/v2\/media\/4357"}],"wp:attachment":[{"href":"https:\/\/www.skillup.cloud\/it\/wp-json\/wp\/v2\/media?parent=4352"}],"wp:term":[{"taxonomy":"category","embeddable":true,"href":"https:\/\/www.skillup.cloud\/it\/wp-json\/wp\/v2\/categories?post=4352"},{"taxonomy":"post_tag","embeddable":true,"href":"https:\/\/www.skillup.cloud\/it\/wp-json\/wp\/v2\/tags?post=4352"}],"curies":[{"name":"wp","href":"https:\/\/api.w.org\/{rel}","templated":true}]}}