Changement d'heure
Ai procédé ce WE à la mise à l'heure d'hiver de cette montre IBM AS/400. Succès total !
Requête Récursive
Une histoire de Composants/Composés... create table piece( piece dec(5, 0) primary key,libelle varchar(100)); create table compo( cpse dec(5, 0) not null references piece, cpsant dec (5, 0) not null references piece, note varchar(100), constraint Compo_pas_doublon_cpse_cpsant...
Code Rastignac
"Toi tu travailles?... et ! bien, tu ne feras jamais rien.Moi, je suis propre à tout et bon à rien, paresseux comme un homard ?... et ! bien, j'arriverai à tout."C'est le code Rastignac. Balzac, Gonzague Saint Bris
Indian Business Machines
BANGALORE, India - IBM dominated the early decades of computing with inventions like the mainframe and the floppy disk. Its offices and factories, stretching from upstate New York to Silicon Valley
Générateur
Générateur Automatique de Programme : GAP Générateur Automatique de Programme : GAP Report Program Génerator : RPG Catégorie RPG sur ce blog
Vieux Domaine
http://symbolics.com/
Row Value Constructor
select * from sysibm.sysdummy1 where (1, 2, 3 ) = (1, 2, 3) ; -- true a1=b1 and a2=b2 and a3=b3 select * from sysibm.sysdummy1 where (1, 2, 3 ) = (1, 2, 4) ; -- false select * from sysibm.sysdummy1 where (1, 2, 3 ) != (1, 2, 4) ; -- truea1!=b1 or a2!=b2...
Values
-- values : to create a table on the fly ! select * from test10 where (num1,num2, num3) in(values( 1, 2, 3), (3, 4, 4)); select * from (values ( 1, 2, 3), (3, 4, 4)) as t; values ( 1, 2, 3), (3, 4, 4); values 123, 456, 789; insert into test10values (5,...
Archi
Dans le monde des réseaux, cette approche est résumée par l'assertion que "l'architecture est contenue dans les protocoles". Christian Huitema Voir aussi le contraire
Université-i
Drink #IBMi, 2 jours de fiesta à Bois-Colombes ! RPG coktails, SQL donuts, API shots, CL liquors and more... https://t.co/1leKabqEdn 🍺🍸
Polymorphisme
Le polymorphisme permet d'obtenir un comportement adapté à chaque type d'objet, sans avoir besoin de tester sa nature de quelque façon que ce soit. La richesse de cette technique amène parfois à dire que l'instruction SI est à la POO ce que l'instruction...
The Concept of Advancement
Now that I'am almost up the ladderI should, no doubt, be feeling gladderIt is quite fine, the view and suchIf just it didn't shake so much. Richard Armour
Arbre
Je ne vois pas pourquoi je ferais autre choseQue de rêver sous l'arbre où le ramier se pose... Victor Hugo
Récupération d'un Result Set
// Voir fmr050 **freectl-opt option(*srcstmt :*nodebugio) actgrp(‘MILAN’) ; dcl-ds enregw; mois packed(2) ; code packed(8) ; codcli char(8) ;end-ds ; dcl-ds nullw int(5) dim(3) ; dcl-s mylocator sqltype(result_set_locator) ; exec sql call fmr050(7) ;...
Fonction & Result Set
create or replace function milan/fmr040 (p_mois dec(2))returns table (mois dec(2), code dec(8), codcli char(8))specific milan/fmr040return select t1.mois, t1.code, t2.codcli from fmr015p as t0 join fichier2 as t2 on t0.codcli = t2.codcli join fichier1...
Procédure & Result Set
create or replace procedure milan/fmr050 (in p_mois dec(2))specific milan/fmr050dynamic result sets 1set option dbgview = *source b1:begindeclare c1 cursor with return for select t1.mois, t1.code, t2.codcli from fmr015p as t0 join fichier2 as t2 on t0.codcli...
Lessons from IBM and Paul Rand
Lessons from IBM and Paul Rand Lessons from IBM and Paul Rand Working with Rand Paul Rand
/image%2F1025633%2F20151122%2Fob_b0e74c_pam007i.png)