Skip to content

Latest commit

 

History

History
113 lines (93 loc) · 3.6 KB

README.md

File metadata and controls

113 lines (93 loc) · 3.6 KB
Raw

Db2Functs

Some samples Db2 for z/OS user defined function & table functions

Function Name Type Description
RCDF.CSI External UDTF Return a table from the Catalog Search Interface
RCDF.PDSDIR External UDTF Return a list of members of a PDS/Library dataset
RCDF.NSLOOKUP External UDF Return a Hostname from an IP Address using the system resolver
RCDF.UUID External UDF Return a Universally unique identifier
RCDF.WORD External UDF Return n-word from string using a specified separator
RCDF.POSIXT_TIMESTAMP SQL UDF Return a Unix/POSIX Epoch time from a Db2 TimeStamp
RCDF.POSIXT_DATE SQL UDF Return a Unix/POSIX Epoch time from a Db2 Date
RCDF.B2H SQL UDF Return a number of bytes in human readable IEC 80000-13 suffixs

Other samples

file Description
SAMPLECX.rx Sample call to SYSPROC.DSNACCOX from Rexx

Install

  • Upload $XMIT file as binary 80/FB and receive with TSO: RECEIVE INDA('yourfile.XMIT')
  • Alternatively, upload all the members in this repo to a PDS/Library in your z/OS converting from ascii to ebcdic (Codepage 037).
  • Customize & submit $BUILD and $DDL JCL procedures.
  • Refresh the LLA, if needed, and customize & submit $TEST.

CSI

Call the Catalog Search Interface

Argument Description
mask varchar - Dataset mask (like 3.4 ISPF/PDF format)
type varchar - Dataset type. Up to 16 types, all types if null. Refer to CSIETYPE.

Sample: to list all SYS1.** non-vsam datasets:

SELECT * FROM TABLE(RCDF.CSI('SYS1.**','A')) as T;

PDSDIR

List member of a PDS/Library

Argument Description
dsname varchar - Dataset name

Sample: to list all members from SYS1.PARMLIB:

SELECT * FROM TABLE(RCDF.PDSDIR('SYS1.PARMLIB')) as T;

NSLOOKUP

Get host name from IPv4 address using system resolver.

Argument Description
ipaddr varchar - IPv4 Address

Sample: show host name:

SELECT RCDF.NSLOOKUP('127.0.0.1') FROM SYSIBM.SYSDUMMY1;

UUID

Generate Univiersal Unique Identifier (Format af8b1f38-fba2-4464-8860-42f7fce3ea19)

Sample:

SELECT RCDF.UUID() FROM SYSIBM.SYSDUMMY1;

WORD

Extract n-word from string

Argument Description
string varchar - original string
n int - n-word
sep char - Separator

Sample:

SELECT RCDF.WORD('ISP.SISPLPA',2,'.') FROM SYSIBM.SYSDUMMY1;

POSIXT TIMESTAMP

Return Epoch time from Db2 Timestamp

Argument Description
timestamp timestamp

Sample:

SELECT RCDF.POSIXT_TIMESTAMP(CURRENT TIMESTAMP) FROM SYSIBM.SYSDUMMY1;

POSIXT DATE

Return Epoch time from Db2 Date

Argument Description
date date

Sample:

SELECT RCDF.POSIXT_DATE(CURRENT DATE) FROM SYSIBM.SYSDUMMY1;

B2H

eturn a number of bytes in human readable IEC 80000-13 suffixs

Argument Description
number bigint - Bytes

Sample: will return 1MB.

 SELECT RCDF.B2H(1048576) FROM SYSIBM.SYSDUMMY1;