*a spawned gob of virtues*

Répondre
Partager Rechercher
Putain que ca fait du bien, rahhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhh bon alor sdeja un chtit coup de massue a tous *sbaf* *viole une grenouille au passage* bon c'est pas l'tout mais mes AS400 m'attendent (je hait le mainframe le cobol et ce genre de c@"`\!) /D
Re: *a spawned gob of virtues*
Citation :
Provient du message de Bouldegom *azuré*
*viole une grenouille au passage*




Bah s'il en est réduit à ça on risque pas grand chose


Ca fait du bien de te revoir le gob ...



ps a pas trouvé le code en rab sorry
000 * *** COBOL ***
001 identification division.
002 program-id. rebooting universe.
003 * ceci est un commentaire, ca vous dérange ?
004 environnement division.
005 configuration section.
006 source-computer. IBM-AS4000
007 object-computer. IBM-AS4000
008
009 input-output section.
010 file-control.
011 select ficarte assign to disk-ficarte
012 select ficedit assign to printer-ficedit
013
014 data division.
015 file section.
....
020 working-storage section.
021 01 indices.
022 02 k pic 99 comp value 1
...
040 procedure division.
041 debut
042 display 'bonjour' upon screen
043 move 15 to i
044 if i>10 perform boucle thru finB until k>i-1
045 else ....
....
080 boucle.
081 compute j=j+1
082 finB
....
666 perform universe(reconstruction) until complete


:complete
En Cobol sur un AS400 ?

Un AS400 est fait pour faire du RPG pas du Cobol (voir ses indicateurs et ses variables systèmes).

Spèce d'une masochiste va
Data Segment
Message DB "Bonjour Vertusiens !$"
Data EndS


Code Segment
Assume Cs : Code, Ds : Data

Main Proc
Mov Ah, 09h
Mov Dx, Offset Message
Int 21h

Mov Ax, 0C00h
Int 21h
Main EndP
Code EndS
End Main
ben j'y peux rien, le source initial des 8V est sur un floppy 8" un peu poussiéreux ...

Vous plaignez pas , il y a des rumeurs de reprogrammation de l'univers en Cobol-Objet interfacé Java

Mais pour le faire faut d'abord reprogrammer le boot-strap en ADA ou en LISP parce que sinon on pourra pas lancer la recompil du noyau qui est en gruyère (d'où les out of cheese error)
alors on fait un simple scan disk suivi d'une défragmentation et une fois que tout parait a peu pres réparer on reformat et on demande a des ingénieurs d'ibm de tout refaire sous dvd... vi paske les 8" oula ca commence a dater...
c'est pas mal
puisque je suis le MAL forcement !
alors que toi tu mal et c'est spam !


voila si vous comprenenz pas cette phrse ne me demander pas plus din'fos moi non plus j'ai pas comprit
Répondre

Connectés sur ce fil

 
1 connecté (0 membre et 1 invité) Afficher la liste détaillée des connectés