Nwlapcug.com


Come Link COBOL & C insieme su z/OS



Un sistema operativo altamente sicuro enterprise sviluppato da IBM, z/OS poteri grandi mainframe computer e fornisce un ambiente integrato per lo sviluppo di applicazioni in vari linguaggi di programmazione. È possibile utilizzare la comunicazione interlanguage-- o ILC - funzionalità incorporata in z/OS per collegamento senza programmi COBOL e C, come il sistema operativo offre supporto nativo per questa funzione. È possibile chiamare la routine C da COBOL o chiamare routine COBOL da C, o una combinazione di entrambi, molto allo stesso modo in cui si chiamerebbe routine locale in ogni lingua.

Istruzioni

1

Collegare il vostro programma in C per chiamare il programma COBOL dichiarando le funzioni C e COBOL come segue:

Dichiarare una funzione in C che passa un valore integer (i) a COBOL:
void CBLRTN (int);
CBLRTN(i);

Utilizzare il valore "I" dal C programma nel programma COBOL:
01 I PIC S9(9) BINARIO.
DIVISIONE DI PROCEDURA UTILIZZO DI VALORE I.

2

Collegare il vostro programma COBOL al programma C avendo il programma COBOL chiamare una funzione C e passare un valore, come segue:

Chiama la subroutine C "CFUNC" da COBOL, passando il valore "I":
01 I PIC S9(9) BINARIO.
CHIAMARE "CFUNC" UTILIZZO DI VALORE I.

Dichiarare la funzione in c:
void CFUNC(int i) () {
restituire i;
}

3

Dichiarare un "pragma_linkage" nella parte superiore del vostro programma in C per dichiarare in modo esplicito un sollevatore a COBOL, che è richiesto da alcuni compilatori. La sintassi per il collegamento di pragma è:
"#pragma sollevatore (funzione, COBOL)".

Si dichiara il sollevatore di pragma e creare una funzione in C per passare un valore al COBOL come segue:

pragma linkage(CBLRTN,COBOL)

Sub CBLRTN(int i);
CBLRTN(i);

È quindi utilizzare la variabile passata nel programma COBOL come segue:

01 I PIC S9(9) UTILIZZO È BINARIO
DIVISIONE DI PROCEDURA UTILIZZANDO IO.

4

Dichiarare un "pragma sollevatore" nella parte superiore del vostro programma in C per collegarsi in modo esplicito il programma COBOL per C. Questo è richiesto da alcuni compilatori. Il sollevatore di pragma avviene sempre nel programma C, anche quando il programma COBOL è passando il valore al programma C.

Si dichiara la variabile nel programma COBOL e chiamare la funzione C come segue:

01 I PIC S9(9) UTILIZZO È BINARIO
CHIAMARE 'CFUNC' UTILIZZO DI CONTENUTO HO.

Quindi dichiarare il sollevatore di pragma per COBOL e definire la funzione in C come segue:

pragma linkage(CFUNC,COBOL)

void CFUNC (int p1) {
}