About Taringa!

Popular channels

Instalar el iSeriesAccess en debian para acceder al AS400



Estimado amigos de Taringa, con este Post les quiero enseñar a instalar un terminal de AS400 en debian muy conocido como pantalla verde es algo que aun se usa mucho en varios bancos y quiero compartir con ustedes la instalción del mismo.

A continuación los pasos para su instalación:

Instalar los siguientes paquetes:

aptitude install unixodbc libstdc++5 alien msttcorefonts libmotif3 libxaw7 libmotif4

Luego debemos ejecutar el siguiente comando para actualizar el cache de fuentes, para que así se tomen los cambios que acabamos de hacer.

fc-cache -f -v

Ahora vamos a instalar el driver de iSeries de IBM iSeriesAccess lo transformamos a un paquete .deb con el comando '''alien'''

alien -d -c -k -v iSeriesAccess-7.1.0-1.0.i386.rpm

Luego instalamos el paquete .deb generado con el comando anterior usando el comando dpkg

dpkg -i iseriesaccess_7.1.0-1.0_i386.deb


Ahora creamos los siguientes enlaces simbólicos

 ln -sf /opt/ibm/iSeriesAccess/lib/libcwbcore.so /usr/lib/libcwbcore.so
 ln -sf /opt/ibm/iSeriesAccess/lib/libcwbrc.so /usr/lib/libcwbrc.so
 ln -sf /opt/ibm/iSeriesAccess/lib/libcwbxda.so /usr/lib/libcwbxda.so
 ln -sf /opt/ibm/iSeriesAccess/bin/ibm5250 /usr/bin/ibm5250
 ln -sf /opt/ibm/iSeriesAccess/bin/setup5250 /usr/bin/setup5250
 ln -sfn /opt/ibm/iSeriesAccess/mri/en /opt/ibm/iSeriesAccess/mri/en_US
 ln -sfn /opt/ibm/iSeriesAccess/mri/zh_HK /opt/ibm/iSeriesAccess/mri/zh_TW
 ln -sfn /opt/ibm/iSeriesAccess/mri/es /opt/ibm/iSeriesAccess/mri/es_VE


Importante crear este enlace simbólico:

ln -s /usr/lib/libXm.so.4 /usr/lib/libXm.so.3

Ahora para poder entrar al terminar ejecutamos el siguiente comando para acceder al 5250:

/opt/ibm/iSeriesAccess/bin/ibm5250 -LANGID es

Listo nos debería aparecer la siguiente pantalla:




Yo en mi caso tengo una cuenta libre en RZKH.DE donde puedo hacer pruebas

Configurar ODBC para acceder desde PHP

Instalamos los siguientes paquetes para acceder vía odbc:

aptitude install unixodbc php5-odbc

Editamos el archivo /etc/odbcinst.ini

 [iSeries Access ODBC Driver]
 Description= iSeries Access for Linux ODBC Driver
 Driver        = /opt/ibm/iSeriesAccess/lib/libcwbodbc.so
 Driver64= 
 Setup        = /opt/ibm/iSeriesAccess/lib/libcwbodbcs.so
 Setup64                 = 
 UsageCount= 
 CPTimeout= 
 CPReuse                 = 



Editamos el archivo /etc/odbc.ini

 [iSeries Access]
 Description= iSeries Access
 Driver        = iSeries Access ODBC Driver
 System        = AS400
 Naming        = 1
 DefaultLibraries= QGPL
 Database= f10f330c
 ConnectionType= 2
 CommitMode= 2
 ExtendedDynamic         = 1
 DefaultPkgLibrary= QGPL
 DefaultPackage= A/DEFAULT(IBM),2,0,1,0,512
 AllowDataCompression= 1
 MaxFieldLength= 32
 BlockFetch= 1
 BlockSizeKB= 128
 ExtendedColInfo         = 0
 LibraryView= 0
 AllowUnsupportedChar= 0
 ForceTranslation= 0
 Trace        = 1
 Server        = AS400
 Port        = 23



Ejemplo en PHP

$user="username";
$pass="passwor";
$dsn = "DRIVER=iSeries Access ODBC Driver;SYSTEM=AS400;DBQ=QGPL";

$conn = odbc_connect($dsn, $user, $pass);

if ($conn == false) {
echo "No se pudo establecer la conexión a la Base de Datos...
";
}

$result=odbc_exec($conn,"select count(1) from SYSIBM.SQLTYPEINFO";

if($row=odbc_fetch_array($result)){
echo "Total: ".$row["00001"]."
";
}

odbc_close($conn);
?>


http://www.joseluisestevez.com.ve/
1Comment
      GIF