//SYS1010B JOB (1,REORA,SYS,01),'MBI1 ADAPT',MSGCLASS=V,CLASS=A //********************************************************************** //* OUTPUT IN ORA.DBA.LOAD.V73C //* XXXXGO PLTPI PROGRAM TO START THIS ADAPTER //* XXXXEND PLTSD PROGRAM TO STOP THIS ADAPTER //* XXXXSQL STUB TO LINK WITH ORACLE/CICS PROGRAMS //* WHERE XXXX = ADAPTER THREAD DEFINITION TABLE. //********************************************************************** //STEP1 EXEC BLDADAP1,ADAPT=MBI1,LIBV=V73C,LOADLIB='ORA.DBA.LOAD.V73C' //GENGO.SYSIN DD * ORACICS TYPE=PLTPI,START=MBI1,TRANSAC=ORA2 END //GENEND.SYSIN DD * ORACICS TYPE=PLTSD,PROGRAM=ORACICS,STOP=MBI1 END //ASMSQL.SYSIN DD * PRINT ON,GEN ADMSQL SQLCICS MBI1 END