Sto raccontando As400 ad un programmatore reduce da un case cobolistico di mainframe Unisys. Per mostrargli la triade di linguaggi che stanno nel suo prossimo futuro, sto costruendo esempi banali ma didattici. Cosi' ho scritto un file e un rpg di visualizzazione che poi ho tradotto in cobol e persino in cl. Nel Control Language mi son trovato ad usare per la prima volta un file fisico ed un file video contemporaneamente. Una curiosita' che potrebbe diventare utile.

Qui aggiungero' gli altri esempiucci che mi verranno in mente.

Raccontato al reduce come si crea un sottosistema batch.

Esempio elementare di ftp tra due As400 su file triggerato.

Un file con trigger non riceve dati via FTP e non puo' essere oggetto di Clear Physical File Member. Per eludere il problema, si trasmettono i dati via Ftp su un file non triggerato con eguale tracciato. Poi con un rpg si cancellano i vecchi dati e si copiano i nuovi dal transito al file triggerato.