Link vostro programma C per chiamare il programma COBOL , dichiarando il vostro funzioni COBOL e C come segue :
dichiarare una funzione in C che passa un valore intero ( i) di COBOL : void CBLRTN ( int ) ; CBLRTN ( i);
Utilizzare il valore "I" del programma C nel programma COBOL : 01 I PIC S9 ( 9) BINARY.PROCEDURE DIVISIONE l'UTILIZZO dA vALORE I.
2
Collega il tuo programma COBOL per il vostro programma C avendo il programma COBOL chiamare una funzione C e passargli un valore , come segue :
Chiama la subroutine C " CFUNC " da COBOL , passando il valore di "I" : 01 I PIC S9 ( 9) BINARY.CALL " CFUNC " USO dI VALORE I.
dichiarare la funzione in C : void CFUNC ( int i ) {return i; }
3
dichiarare un " pragma_linkage " nella parte superiore del vostro programma C per dichiarare in modo esplicito un collegamento con COBOL , che è richiesto da alcuni compilatori . La sintassi per il collegamento pragma è : " # pragma linkage ( funzione , COBOL ) "
si dichiara il collegamento pragma e crea una funzione C per passare un valore di COBOL come segue : .
# pragma linkage ( CBLRTN , COBOL ) vuoto CBLRTN ( int i ) ; CBLRTN ( i);
È quindi utilizzare la variabile passata nel programma COBOL come segue :
01 I PIC S9 ( 9) l'uso è BINARYPROCEDURE DIVISIONE USO I.
4
dichiarare un "collegamento pragma " nella parte superiore del vostro programma C collegare esplicitamente il programma COBOL a C. Questo è richiesto da alcuni compilatori . Il sollevatore pragma è sempre fatto nel programma C , anche quando il programma COBOL è passare il valore al programma C
si dichiara la variabile nel programma COBOL e chiama la funzione C come segue : .
01 I PIC S9 ( 9) l'uso è BINARYCALL ' CFUNC ' utilizzando per CONTENUTI I.
quindi dichiarare il collegamento pragma per COBOL e definire la funzione in C come segue :
# pragma linkage ( CFUNC , COBOL ) vuoto CFUNC ( int p1 ) { }
Programmazione © www.354353.com