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) {
}