MVSFORUMS.com

Look at it this way. You've appended something that others (or you, if you forget the solution next time Very Happy

) can find, and that can't be bad.

Here's an example of a UDF that works.

DROP FUNCTION BINARY_TO_EBCDIC ;
CREATE FUNCTION BINARY_TO_EBCDIC(VARBINARY(100))
RETURNS VARCHAR(100) ...

Searched and found something similar at
CREATE FUNCTION BINARY_TO_COMP3(VARBINARY(100), CHAR(5))
RETURNS DECIMAL(18)
EXTE ...

It turned out to be much easier than I thought. Basically, I wrote a simple UDF (after testing how to define one via ChatGTP - although that generated the wrong definitions in the linkage section, but ...

The answer was far easier than I realized (and stumbled over accidentally).

Simply enter the prefix command k in the left hand column (on the root segment line) and you'll be presented with a panel ...

I didn't forget, but maybe you misunderstood my question?

The original post and this one can be simply illustrated with the following Rexx script.

str_b = 'F1F2F3'
say str_b' 'x2c(st ...

This seems strange to me and I must be missing something that's ridiculously simple, but for the life of me, I can't find it.

select hex(24) from sysibm.sysdummy1 ;

shows the hex valu ...

A colleague asked me (I who haven't lived in England in decades and has worked all my life in Sweden) what the English expression might be for the concept of masking and copying data from production t ...

Thank you for your suggestions. I'll almost certainly revisit the CASE example for the situation where the database can contain negative values (very unusual), but for all the "ordinary" pos ...

I'm selecting data from a DB2 table that contains 2 binary fields. These fields (in reality) contain the equivalent of a DL/1 segment, so they can easily contain a mixture of character and COMP-3 fiel ...

The actual content of the binary fields is only used as a sort of placeholder.

The actual s/w package is intended to mask things like SSN values so they can't be tied to a "real" person.W ...

I'll answer my own question in case anyone else has the same problem (a colleague helped me).
The following can insert a row into a table
insert into TDRT3C0
values( 0 -- LOG_NR_ORDER
,0 ...

We have a DB2 table defined with a column defined as Binary (yes, completely new for me as well).

When the copybook is generated the resulting DB2 definition is
,DL1_SEGMENT BI ...

So, reading 4 rows instead of 1, or did I misunderstand you?

To say it sounds inefficient must be an understatement.

How many times per day will it be read?

I think you missed the bit where I wrote
as long as you don't try to actually use it

Not sure if want to compile the code using the NOCOMPILE option you mentioned.
I'm quite happy to see duplicat ...