Vitajte na [www.pocitac.win] Pripojiť k domovskej stránke Obľúbené stránky
Prepojte C program , volať COBOL programu tým , že deklaruje svoju C a COBOL funkcie takto :
deklarovať funkciu v C , ktorý prechádza celočíselnú hodnotu ( i ) pre COBOL : void CBLRTN ( int ) ; CBLRTN ( i ) ;
použite hodnotu " i" z programu C vo vašej COBOL programu : 01 aj PIC S9 ( 9 ) BINARY.PROCEDURE DIVÍZIA POUŽITIE PODĽA hODNOTY I.
2
Prepojte COBOL program do C programu tým , že program COBOL volanie funkcie C a odovzdať jej hodnotu , takto :
Zavolajte C podprogram " CFUNC " z COBOL , odovzdávanie hodnotu " I" : 01 aj PIC S9 ( 9 ) BINARY.CALL " CFUNC " POUŽITIE PODĽA HODNOTY I.
deklarovať funkciu v C : void CFUNC ( int i ) { return i ; }
3
deklarovať " pragma_linkage " v hornej časti C programu explicitne deklarovať väzbu na COBOL , ktorý je potrebný pre niektoré kompilátory . Syntax pre pragma spojenie je : " # pragma väzba ( funkcie , COBOL ) "
deklarovať pragma prepojenie a vytvorenie funkcie C odovzdať hodnotu do COBOL takto : .
# pragma väzba ( CBLRTN , COBOL ) void CBLRTN ( int i ) ; CBLRTN ( i ) ;
Môžete potom použiť poskytnutú premenné v COBOL programe takto :
01 aj PIC S9 ( 9 ) Použitie je BINARYPROCEDURE DIVISION POUŽITIE I.
4
deklarovať " pragma spojenie " v hornej časti C programu explicitne spojiť program COBOL na C. To je nutné niektoré kompilátory . Pragma prepojenie sa vždy vykonáva v programe C , aj keď je program COBOL odovzdaním hodnotu do programu C
deklarovať premennú v programe COBOL a volanie funkcie C takto : .
01 Aj PIC S9 ( 9 ) Použitie je BINARYCALL " CFUNC " POUŽITIE obsahom I.
potom deklarovať pragma prepojenie na COBOL a definovať funkciu v C takto :
# pragma väzba ( CFUNC , COBOL ) void CFUNC ( int p1 ) { }