chiamare un programma cobol da rpg con parametri

Inserito il 31/07/2006

Ho bisogno di chiamare un programma COBOL da un RPG con passaggio parametri. Cosa devo fare sul COBOL? Con la Linkage section non funziona.

Risposte / commenti

08-08-2006 call pgm cobol

Inizializza, nella specifica di calcolo del pgm rpg, i campi che vuoi passare, ad es. siano "ca" "cb" "cc";
scrivi l'istruzione  che chiama il pgm cobol e passa i parametri:
                                                                        call      'prcobol'
                                                                        parm                ca,
                                                                        parm                cb
                                                                        parm                cc.
Nel pgm cobol " prcobol " definisci nella Linkage Section i campi "ca" "cb" e "cc"; la Procedure Division conterrà la clausola " using ca cb cc "  e cioè PROCEDURE DIVISION USING CA CB CC.

Il pgm rpg chiama il pgm cobol che viene eseguito e al termine (ad es. istruzione  "exit program")  il controllo ritorna al pgm rpg, all'istruzione immediatamente successiva alla "call".

ag

07-09-2006 lo provo subito

Anche se in ritardo ti ringrazio e faccio subito le prove.