OPS/REXX Built-in Functions › OPSSEND Function › Examples: OPSSEND

Examples: OPSSEND

These examples will give you a better understanding of OPSSEND:

• The following example shows how you can use the OPSSEND function to send a message from a rule to the local OPSLOG:

  )MSG somemsg
  )PROC
    rtvl = OPSSEND("*","B",logmsg)
  

• The following example illustrates using OPSSEND to forward a message to system SYSA, where it is reissued and is not subjected to AOF processing. The descriptor code is changed and the message is WTOed on a console named TAPECONS.

  )MSG somemsg
  )PROC
    temp = OPSSEND("SYSA","C",MSG.TEXT,MSG.ROUTE,'0200'x,,TAPECONS)