Een zeer veilige enterprise besturingssysteem ontwikkeld door IBM , z /OS bevoegdheden grote mainframe computers en biedt een geïntegreerde omgeving voor het ontwikkelen van toepassingen in verschillende programmeertalen . Of ILC - - U kunt de tussentaal communicatie te gebruiken functionaliteit ingebouwd in z /OS om naadloos te koppelen COBOL -en C -programma's , zoals het besturingssysteem biedt native ondersteuning voor deze functie . U kunt bellen C routines van COBOL of bel COBOL routines uit C , of een combinatie van beide , op vrijwel dezelfde manier waarop u lokale routines zou noemen in elke taal . Wat je nodig hebt
IBM mainframe draait z /OS
Enterprise COBOL voor z /OS
z /OS XL C /C + +
Toon Meer Aanwijzingen
1 Link uw C- programma om uw COBOL programma bellen door te verklaren uw C en COBOL werkt als volgt :
Verklaar een functie in C dat een integer waarde ( i ) gaat naar COBOL : void CBLRTN ( int ) ; CBLRTN ( i ) ;
Gebruik de waarde " I " van het C -programma in uw COBOL programma : 01 I PIC S9 ( 9 ) BINARY.PROCEDURE DIVISIE GEBRUIK iN WAARDE I. kopen van 2 Koppel uw COBOL programma om uw C-programma door het hebben van de COBOL -programma noemen een C -functie en doorgeven van een waarde , als volgt :
Bel de C subprogramma " CFUNC " van COBOL , het passeren van de waarde " I " : 01 ik PIC S9 ( 9 ) BINARY.CALL " CFUNC " GEBRUIK iN WAARDE I.
Verklaar de functie in C : void CFUNC ( int i ) {return i ; }
< br > 3 verklaar een " pragma_linkage " aan de bovenkant van uw C -programma om uitdrukkelijk te verklaren door een koppeling aan COBOL , die wordt vereist door sommige compilers . De syntaxis voor de pragma koppeling is : " # pragma koppeling ( functie , COBOL ) "
U verklaart de pragma koppeling en een C -functie om een waarde te geven aan COBOL als volgt : .
# pragma koppeling ( CBLRTN , COBOL ) nietig CBLRTN ( int i ) ; CBLRTN ( i ) ;
vervolgens gebruikt u de doorgegeven variabele in uw COBOL -programma als volgt :
01 I PIC S9 ( 9 ) GEBRUIK iS BINARYPROCEDURE DIVISIE GEBRUIK I.
4 Verklaar een " pragma koppeling" aan de bovenkant van uw C -programma om de COBOL -programma expliciet verwijzen naar C. Dit wordt vereist door sommige compilers . De pragma koppeling wordt altijd gedaan in het C -programma , zelfs wanneer de COBOL -programma is het passeren van de waarde van de C -programma
U verklaart de variabele in het COBOL -programma en bel de C -functie als volgt : .
01 ik PIC S9 ( 9 ) GEBRUIK IS BINARYCALL ' CFUNC ' GEBRUIK vAN INHOUD I.
vervolgens verklaart de pragma koppeling aan COBOL en definiëren de functie in C als volgt :
# pragma koppeling ( CFUNC , COBOL ) nietig CFUNC ( int p1 ) { }
|
