/*
*
* DO ZROBIENIA Aby zmienić szablon dla wygenerowanego pliku, przejdź do:
* Okno - Preferencje - Java - Styl kodu - Szablony kodu
*/
package sample.ims;
import com.ibm.connector2.ims.ico.*;
import javax.resource.cci.*;
/**
*
*
* DO ZROBIENIA Aby zmienić szablon dla tego wygenerowanego komentarza typu, przejdź do:
* Okno - Preferencje - Java - Styl kodu - Szablony kodu
*/
public class CCIApp {
public static void main(String[] args) {
Connection conn = null;
try{
IMSManagedConnectionFactory mcf = new IMSManagedConnectionFactory();
mcf.setHostName("nazwaHosta");
mcf.setPortNumber(new Integer(0));
mcf.setDataStoreName("nazwaSkladnicyDanych");
ConnectionFactory cf = (ConnectionFactory) mcf.createConnectionFactory();
IMSConnectionSpec cSpec = new IMSConnectionSpec();
conn = cf.getConnection(cSpec);
Interaction interAction = conn.createInteraction();
IMSInteractionSpec iSpec = new IMSInteractionSpec();
iSpec.setInteractionVerb(1); // SEND_RECEIVE
iSpec.setImsRequestType(1); // TRANSACTION
iSpec.setCommitMode(1); // SEND_THEN_COMMIT
sample.ims.INPUTMSG input = new INPUTMSG();
input.setIn__ll((short) input.getSize());
input.setIn__zz((short) 0);
input.setIn__trcd("IVTNO");
input.setIn__cmd("DISPLAY");
input.setIn__name1("LAST1");
sample.ims.OUTPUTMSG output = new sample.ims.OUTPUTMSG();
interAction.execute(iSpec, input, output);
System.out.println(
"Komunikat wyjściowy to... " +
"\nMSG: " + output.getOut__msg() +
"\nNAME1: " + output.getOut__name1() +
"\nNAME2: " + output.getOut__name2() +
"\nEXTN: " + output.getOut__extn() +
"\nZIP: " + output.getOut__zip()
);
}
catch(Exception e)
{
System.out.println("Przechwycony wyjątek to: " + e.getMessage());
}
}
}
Aplikacja CCIApp.java jest prostą, dwuwarstwową, niezarządzaną aplikacją Java. Używa ona powiązań danych Java, sample.ims.INPUTMSG i sample.ims.OUTPUTMSG, utworzonych przez kreator powiązań danych CICS/IMS Java w produkcie Rational Application Developer. Przeprowadź edycję aplikacji CCIApp.java i zmodyfikuj wartości używane przez instrukcje setHostName(), setPortNumber() i setDataStoreName() odpowiednio do środowiska.
Komunikat wyjściowy to... KOM: ENTRY WAS DISPLAYED NAZWA1: LAST1 NAZWA2: FIRST1 ROZSZ: 8-111-1111 ZIP: D01/R01