OPS/REXX Built-in Functions › OPSBN Function

OPSBN Function

The OPSBN function supports the DESC and ROUTCDE operands for the ADD, CHANGE, and DELETE keywords that appear in translated Automate rules.

Note: You can use the OPSBN function in OPS/REXX or AOF rules.

OPSBN has the following format:

var = OPSBN(string)

string

Contains a binary string suitable for use as a message routing or descriptor code.

Depending on the value of string, OPSBN either returns a whole number or a string of whole numbers that are separated by commas. The input string is converted so that bit 0 yields 1, bit 1 yields 2, and so on, as in the following example:

OPSBN('10010011'B)  1,4,7,8

Note: The OPSBN function is not dependent upon CA OPS/MVS being active.

Example: OPSBN function

This example illustrates the use of the OPSBN function to propagate the routing codes of the original message to a replacement message:

)MSG SOMEMSG

)PROC
/* Issue a replacement message with the same route code */
address WTO “MSGID(NEWMSGID) TEXT('Just testing')” ,
            “ROUTE(“OPSBN(MSG.ROUTE)”)”