CA-GSS Statements and Commands › GSS Extended Functions › IO Functions › Number, String, and Variable Functions › System Information Functions › DEVTYPE()

DEVTYPE()

This function issues the IBM macro DEVTYPE SVC (with the DEVTAB and RPS options) and return the 24-byte binary results.

Syntax

data = DEVTYPE(ddname)

Parameters

data

24 bytes of data or error text. The format of the returned data is that of the DEVTYPE SVC with DEVTAB and RPS options specified. Further information can be found in the IBM guide, System Data Administration (GC26-4010).

ddname

DDname on which the DEVTYPE is issued.

Return Codes

101

ARG 1 MISSING OR INVALID

120

DDNAME NOT FOUND

Example

x = devtype('SYSUT1')       /* Check for allocated file        */
if rc = 120 then do         /* Perform if DDNAME not allocated */
    say 'SYSUT1 not allocated'
    end