Aplicación para ERP-Gateways:
conexión de salidas digitales con ABAP
Ensayo
La rutina ABAP siguiente muestra como se puede conectar las salidas digitales del ERP-Gateway con ayuda del procedimiento Wayback. El código puede ser transferido directamente a proyectos ABAP propios, aunque la ejecución allí se produce como reacción a la ocurrencia de determinados sucesos.
Por ejemplo, con ayuda del ERP-Gateway es posible visualizar sobre un semáforo de señales directamente desde SAP cuando se excede el valor máximo o mínimo de piezas o de capacidad.
1. Preparativos
Ya tiene su(s) ERP-Gateway(s)- con corriente,
- conectado a su red,
- dotado con una dirección IP - con WuTility no hay problemas.
2. El código fuente de ABAP
El código de ejemplo siguiente puede ser aplicado directamente con la función copiar/pegar. Sólo tiene que cambiar las asignaciones marcadas en rojo de las primeras cuatro líneas por los parámetros que Ud. emplea:
- user = comando con el estado deseado de salidas
p. ej. "output0=on" conecta la primera salida del ERP-Gataway,
"output1=off" conecta la segunda salida del ERP-Gateway.
- pwd = contraseña para Wayback
según la contraseña guardada en el ERP-Gateway
- host = dirección IPo nombre del host del ERP-Gateway
Texto fuente como archivo de texto: Descarga
data:
user(30) type c value output1=on’,
pwd(30) type c,
host(64) type c value 192.168.0.40’,
dest like rfcdes-rfcdest value ’SAPFTP’.
pwd = test’
data:
hdl type i,
key type i value 26101957,
slen type i.
data:
begin of result occurs 0,
line(100) type c,
end of result.
set extended check off.
slen = strlen( pwd ).
call function ’HTTP_SCRAMBLE’
exporting
source = pwd
sourcelen = slen
key = key
importing
destination = pwd.
call function ’FTP_CONNECT’
exporting
user = user
password = pwd
host = host
rfc_destination = dest
importing
handle = hdl.
call function ’FTP_DISCONNECT’
exporting
handle = hdl.
call function ’RFC_CONNECTION_CLOSE’
exporting
destination = dest
exceptions
others = 1.