Discussion :

[le_thon]

Bonsoir,

Chacun garde ses petits secrets, sa propre cuisine.
Il n'y a que condate qui a répondu à mes messages en expliquant clairement ce qu'il faisait. Donc je le remercie et j'éprouve de l'estime envers lui.

Pour les autres, c'est de l'indifférence?

L'impression que j'ai, c'est que ce forum sert essentiellement à trouver une réponse à un problème, mais en aucun cas à proposer des idées, des alternatives, des bonnes pratiques. C'est pas beau pour toutes celles et tous qui travaillons tous les jours avec cette machine. Je demande de l'aide quand j'en ai besoin, sinon allez au diable :
IF besoin d'un coup de main = TRUE :
j'attend de vous la solution
SI solution = *on
Même pas merci et SETON LR
ENDIF
ELSE O UNTIL solution = TRUE
Rien a dire et allez au diable
END DO
ENDIF
Même pas merci.

Alors personne pour partager ses connaissances, ses techniques, ses nouvelles pratiques ou découvertes ?

Si vous continuez comme cela, ce forum n'est qu'une boite à réponse et en aucun cas un lieu de partage, d'échange, d'apprentissage, de découverte et d'enrichissement mutuel.

Inutile de répondre à ce post. créer plutôt en un, pour exposer un truc qui vous semble intéressant.

Bonne soirée à toutes et tous.

[MaximeCh]

Bof, j'ai fait de l'AS400 la semaine dernière pour le WMS de Dior Couture et la machine est aussi rapide que ça m'a bien fait ****!

[le_thon]

Bof, j'ai fait de l'AS400 la semaine dernière pour le WMS de Dior Couture et la machine est aussi rapide que ça m'a bien fait ****!

Merci pour ta contribution MaximeCh.
Tu fais de l'AS400 ... Dans ta voiture ? sur ton smartphone ? Tu connais la touche ENTER ?

Encore merci pour ta contribution. Mais si tu pouvais décrire précisément l'INFDS d'un fichier écran et m'expliquer comment récupérer la position du curseur, ça serait sympa.

En clair :

MaximeCh IFEQ ON : SETON LR

[MaximeCh]

IFEQ ON : SETON LR

J'avoue mon ignorance,
Je ne comprends pas ce qui t'excite à faire du RPG en 2020 ?
Dans mon vil esprit il y avait 3 bonnes idées chez IBM qui ont fait un bon système à l'époque, et 30 ans de progrès sont passés par là.

[condate]

Partager son savoir ? Cela n’est pas si facile que cela :

1) la possibilité de dire une bêtise, qui n’en a jamais exprimée ??? donc on s’abstient.
2) ne pas cerner précisément ce qui peut intéresser les autres... donc on s’abstient.
3) attendre que quelqu’un de plus qualifié réponde, on trouve toujours plus fort que soi.
4) au bout de plus de 30 années de programmation, je ressens beaucoup plus ce qu’il faut éviter que ce qu’il faut faire. Et ça c’est quelques fois délicat à exprimer surtout sur des forums où ça part volontiers en sucette à cause de l’anonymat généralisé.
5) il y a objectivement de moins en moins de spécialistes AS400 en activité. Et c’est dommage mais cela entre aussi en ligne de compte...

[Darkzinus]

Bonjour, nous sommes probablement peu à travailler sur cette plateforme et à intervenir ici (d'où le peu de messages, la section Mainframe n'est pas beaucoup plus vivantes). Dans ma structure nous n'utilisons pas le RPG (j'en fais juste un peu pour quelques petits outils).

[m4k-Hurrican]

Moi j'ai donné mon avis.
Partir sur des descriptions de données et un langage qui n'a plus aucun intérêt aujourd'hui, à part limiter la lisibilité et la facilité de développement, je ne vois pas l'intérêt.

On ne motivera personne à présenter le RPGIII, des descriptions de zones à 6 caractères, qui rendent un programme totalement illisible, etc...
Le minimum, c'est SQL et le RPGIV Free.

Pour notre part, nous avons même en partie abandonné le RPGIV.
Nous utilisons les outils adaptés à ce que nous voulons faire.
Une interface pour les utilisateurs ? Du VB ou C# avec .net.
Un besoin Web ? Du PHP sur le serveur Zend installé.
Des routines, procédures stockées essentielles au fonctionnement de tout (et qui seront appelées en PHP ou .net) ? Du RPGIV Free.

Voilà.

Par contre, MaximeCh, dire que c'est une machine lente... On doit pas utiliser le même.
Avec notre vieil i5 (Power 6 qui a 10 ans...), on surprend encore des utilisateurs de serveurs Windows et Linux très récents.

[MaximeCh]

Par contre, MaximeCh, dire que c'est une machine lente... On doit pas utiliser le même.
Avec notre vieil i5 (Power 6 qui a 10 ans...), on surprend encore des utilisateurs de serveurs Windows et Linux très récents.

Tout à fait d'accord et ma tournure de phrase voulait dire la même chose.
J'ai entendu l'adage "quand il y aura une guerre nucléaire les seules choses qui resteront seront les blattes et les AS400" pas plus tard qu'il y a une semaine.

[le_thon]

Tout à fait d'accord et ma tournure de phrase voulait dire la même chose.
J'ai entendu l'adage "quand il y aura une guerre nucléaire les seules choses qui resteront seront les blattes et les AS400" pas plus tard qu'il y a une semaine.

Bonsoir la blatte,

Quand tu seras une blatte processeur de 12 à 24 cores en 64 bits, gravé en 14 nm avec 8 billions de transistors et une fréquence de 4Ghz, avec 64Kb en L1, 512Kb en L2 par core et 120 Mb en L3 par processeur et que tu pourras assembler plusieurs de ces processeurs sur une seule plateforme alors tu seras une super blatte ou un POWER 9 (qui a déjà 3 ans).
Maintenant, il n'y a pas de honte à jouer a Excel ou à Powerpoint sur son PC portable équipé d'un Intel I7 avec 32Mo de RAM et Windows 10 et de dire qu'on est le roi du monde et que sa machine tourne du feu de dieu !!! Je me demande juste comment ça se passerait avec 5000 utilisateurs connectés sur ta machine.

Ca c'est tout l'art d'être un bon consultant

Comme pour les règles de Crocker d'ailleurs. J'accepte donc l'entière responsabilité de ce qui sort de mon vil esprit et je l'assume.

[MaximeCh]

Ahh c'est un concours de kikalaplugrosse ici?

J'ai à la maison un setup ryzen 1800x d'occasion à 100€, la même finesse de gravure, le même cache L1/L2, seulement 16MB de L3.
Je cherche des nombres premiers avec GIMPS sur un GPU RadeonVII acheté d'occasion à 300€. 32GB de DDR4 3000 à 100€.
Dans trois ans je n'aurai qu'à déposer sur la carte mère, sans rien changer d'autre, un ryzen4 4950x qui sortira l'année prochaine (d'occasion pour 200€?), avec probablement le même L3 que le POWER9. Ca me permettra de tester la charge d'un ERP libre sur postgres, déployer quelques serveurs mail, mirroirs rsync, web, et, j'en rêve, un noeud de sortie Tor.
M'enfin avec une puce à des milliers d'euros on peut être content aussi. Tu as oublié de mentionner l'atout majeur de POWER9 : son hyperthreading de l'espace. Puis on ne parle pas ici de jeux d'instruction foufous, le x86 à gerber, POWER ISA... RiscV ça serait une autre histoire!

Quand je suis obligé d'utiliser mon dual boot Linux Windows sur mon laptop de consultant pas très lambda pour aller sur l'OS inférieur et faire du excel, j'allume un cierge.

Je serai pas venu poster si je ne reconnaissais pas des qualités indéniables à l'antique système IBM... je suis au courant de sa gloire passée, de sa décrépitude actuelle, de ses pratiques commerciales teintées Oracle. Enfin, vive iSeries, mais surtout vivent le hardware et le logiciel libres.

[Poweribmi]

Quand tu seras une blatte processeur de 12 à 24 cores en 64 bits, gravé en 14 nm avec 8 billions de transistors et une fréquence de 4Ghz, avec 64Kb en L1, 512Kb en L2 par core et 120 Mb en L3 par processeur

Bonsoir,

On pourrait même ajouter qu'il s'agit du processeur qui équipe les calculateurs les plus performants du monde

Tu as oublié de mentionner l'atout majeur de POWER9 : son hyperthreading de l'espace.

On laissera ce terme pour les processeurs Intel, pour le POWER, on parlera plutôt de multithreading.

Je serai pas venu poster si je ne reconnaissais pas des qualités indéniables à l'antique système IBM... je suis au courant de sa gloire passée, de sa décrépitude actuelle, de ses pratiques commerciales teintées Oracle.

Libre à toi de penser cela, mais sincèrement, le terme décrépitude actuelle ne me semble pas du tout adapté, il est même totalement inopportun car la plateforme, qu'il s'agisse du hardware (Power Systems) ou du software (IBM i) se porte plutôt bien.
Pour les pratiques commerciales, elles sont probablement discutables, mais n'ont strictement rien à envier à celles d'Oracle, de Micro$oft, HP et consorts qui sont pour le moins très contestables.
En ce qui concerne les logiciels libres, sur le principe, je suis un peu d'accord, mais dans la pratique, ils coutent plus chers que certains logiciels propriétaires en raison d'un TCO élevé lié au manque de compétences et aux downtimes qu'ils peuvent engendrer.

Le monde de l'AS400 serait-il mort ? Chacun garderait-il secrêtement son savoir ?

Pour reprendre sur le sujet initial, une précision quant au titre. Oui, l'AS/400 (avec un slash, s'il te plaît) est mort, il y a près de 20 ans déjà, mais ses successeurs ont pris le relai. Et la flamme est toujours allumée et pas prêt de s'éteindre.

Même Micro$oft n'a pas une roadmap comme celle d'IBM, à plus de 12 ans.

Chacun garde ses petits secrets, sa propre cuisine.
Pour les autres, c'est de l'indifférence?
L'impression que j'ai, c'est que ce forum sert essentiellement à trouver une réponse à un problème, mais en aucun cas à proposer des idées, des alternatives, des bonnes pratiques. C'est pas beau pour toutes celles et tous qui travaillons tous les jours avec cette machine.

Malheureusement, je crains que tu aies bien résumé la réalité, mais ce n'est pas spécifique à ce forum.
A chacun des lecteurs, n'hésitez pas à aporter votre contribution en étayant avec vos connaissances, cela permettra de dynamiser l'environnement. Toute information est bonne à prendre, même si elle n'est pas toujours parfaite ou exacte, elle sera corrigée par un autre, comme pour le logiciel libre cher à MaximeCh.


C'était ma petite et modeste contribution à ce "débat" afin de montrer à notre ami le_thon qu'on lit bien ses messages

[le_thon]

Merci PowerIbmi

Tu as mis les choses en place, et avec beaucoup plus de douceur que moi.
D'accord aussi avec le nom que j'utilise (AS/400 avec un slash), mais c'est un vieux réflexe conservé après des années de pratique. Les habitués savent de quoi on parle, il suffit de voir le nom du sous forum "autres systèmes/AS400".

Ton appel aux lecteurs de ce forum à mettre en ligne leurs façons de faire, leurs pratiques est vraiment ce que je souhaite aussi. Ca ouvre la discussion, ça permet à chacun de réfléchir, de se remettre en question et le résultat ne peut-être que positif pour tous.

Je n'ai rien contre ILE, free format, SQL, COBOL, C# ou autre chose. Mais j'ai toujours en tête cela : Plus c'est simple, mieux c'est.

Poster quand on a un problème pour obtenir une solution, c'est trop facile. Poster pour dire : Voila ce que j'ai fait et comment je l'ai fait est beaucoup plus utile.

Encore Merci PowerIbmi et aussi à condate, m4k-Hurrican, Darkzinus, MaximeCh et à ceux qui viendrons ajouter leur grain de sel à ce post. Et bonne soirée.

[larry57]

Bonjour,

Cela faisait un petit moment que je n'ai pas discuté sur le forum.
Au vu du nombre de propositions que j'ai un peu partout en France et en Europe, je peux dire que l'IBM i ou encore AS/400 n'est pas mort.
Je fait maintenant parti d'un gros groupe industriel mondial qui n'utilise que l'AS/400 pour sa gestion comptable, production...
Pour les PME, il est facile de changer pour autre chose, mais pour une banque, un groupe industriel, cela prend des années.
Pour vous aider, Volkswagen Audi, Porsche, Bosh, BNP Paribas, Intesa San Paolo, Toyota, Rolex, Ricoh, ABN Amro, Mephisto, Les grands chais de France, des mutuelles, KUHN, ALD automotive, Nordea, La banque centrale de Luxembourg et j'en passe, tout ces grands groupes font tourner au moins une partie de leur activité sur AS/400. La liste est disponible sur le site https://www.all400s.com/

Voilà, juste pour faire le point.

Larry57
Défenseur de l'IBM i

[rol2258]

Tout à fait d'accord et ma tournure de phrase voulait dire la même chose.
J'ai entendu l'adage "quand il y aura une guerre nucléaire les seules choses qui resteront seront les blattes et les AS400" pas plus tard qu'il y a une semaine.

Et les développeurs RPG qui comme moi ont programmé pendant 40 ans dans ce langage alors qu'on leur disait en 2000 que le RPG était mort et idem l'AS400. J'ai fait toute ma carrière en ne connaissant qu'un langage et une machine ou presque (34,36, AS400) . Merci IBM pour m'avoir permis de vivre une telle sécurité de l'emploi et d'arriver à la retraite frais comme un Gardon.

[JPLAROCHE]

j'ai été à l'origine de la demande de l'ouverture chez developpez.net de la rubrique AS400 et ait promulgué chez IBM pour la France l'ouverture ...

IBM315 34 36 38(10ans) as400 30 ans (à moment donné il n'y avait plus que le nom) j'ai pratiqué RPG II III IV FREE C .....

le RPG IV en développement était le plus rapide , Le C en 95 j'ai eu le droit car j'ai rendu des services à IBM il voulait savoir ce que j'en ferais ... 3 module Intelligent utilisant la théorie des ensembles pour de la gestion résultat 2500 programme emulés (table visu. list. query à la volé etc....)
le commit rollback depuis 1981

taux de panne frisant le ZÉRO sur plus de 40 ans .

IPOWER puisque c'est son NOM avec l'OS AS400 a des capacités qui pas n'est pas encore égalé par le monde du PC

à la retraite.... j'ai basculé sur PostgreSQL le plus proche de DB2 en c++ j'ai refait un wrapper pour avoir un langage de programmation proche de celui que j'aimais et surtout sa simplicité et cohérence

je me suis attaqué à l'interactif graphique on ne peux pas dire que cela ne fonctionne pas Mais il y a un Mais qu'est-ce que c'est lourd le monde du click ,sûr que l'on peu mettre la photo du gars qui commande mais dans une grosse entreprise on a rien à faire ...
enfin de compte j'ai voulue remettre au gout du jour le 5250 toujours en c++
j'ai aussi monté un moteur de redu pdf pour les list type AS400

Aujourd'hui je suis sur un new langage NIM-LANG
en 8 mois j'ai refait mon wrapper PostgreSQL , refait le hack clavier , fait une lib proche du fonctionnement 5250 et un designer générateur de source en phase terminal
bientôt je ne serais pas loin d'avoir un programme aussi lisible que sur os AS400 mais loin très loin de ce que fait l'OS AS400 peut-être plus que le 5250 ou DSPF ou RLU autant que le RPG sauf le cycle avec L1.. et MR ... bref là il n'y a pas photo la vitesse d'écriture de programme et son exécution est impossible a rivalisé avec AS400 , pourtant j'ai une machine avec 24go mémoire centrale 12 vrais cœurs des disques SSD et une configuration au petit oignons Linux Manjaro

sur mon site j'ai déposé des logiciels, par exemple ADMOPS il permet de gérer la phase développement qualité production multi-utilisateur multi-société multi-projet GRATUIS il y même le code source des sociétés font payer très cher cette fonctionnalité, il peut aussi vous aidé à maintenir et vous dit à quel ligne ou se trouve les modifications à faire qui les a faite (je ne mets pas le lien pour ne pas avoir de problème avec développez.net mais une recherche est facile) le cv est le même que celui sur developpez...


en bref l'AS400 (IPOWER) est très loin devant ce qui existe dans le domaine gestion d'entreprise, le marketing est à vomir mais la machine elle est solide de solide et performante, sachez quand même qu'il faut être en France pour ne pas voir son étendue, il n'y presque pas d'école et IBM ne forme plus comme avant avec amphitheatre... si cela vous intéresse Volubis à un très bon niveau de formation, si vous allez au Canada (ma femme est Canadienne) le RPG est enseigné à l'université et dans pas mal de pays (cela comprend DB2...)

quand on voit ce qu'il faut pour programmer l'environnement IBM est FULL et sans beug et aujourd'hui les interfaces de directeur ( ce n'est pas compliqué à faire) difficile de rivalisé .....