Wiesemann & Theis GmbH

Tecnología de redes, sensores e interfaces para la industria, la oficina y la informática

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.
El ERP-Gateway ya está totalmente preconfigurado de fábrica.

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. 
			

^