FWD » Core Development » Conversion Tools

def var i as int init 14.

def var d as dec init 30.0.

def var i64 as int64 init 9.

def var da as date init today.

def var dt1 as datetime init ?. 

def var dtz1 as datetime-tz init ?.

def var dt2 as datetime init now. 

def var dtz2 as datetime-tz init now.

def var bool as log init true.

def var bool2 as log init false.

def var h as handle.

def var h2 as handle.

def var ch1 as char init "99".

def var ch2 as char init "99".

def var lc1 as longchar init "99999".

def var lc2 as longchar init "99999".

def var r1 as recid.

def var re1 as recid.

def var r2 as rowid.

def var ro2 as rowid.

def var m1 as memptr.

def var mp1 as memptr.

def var m2 as raw.

def var mr2 as raw.

def var bogus as int init ?.

/*

 for integer/int64 op1, the op2 is not allowed to be:

 - non-unknown datetime (but unknown is fine)

 - non-unknown datetime-tz (but unknown is fine)

 - longchar

 - memptr

 - raw

*/

i = if bogus <> ? then i else ?.

i = if bogus <> ? then i else d.

i = if bogus <> ? then i else i64.

i = if bogus <> ? then i else 42.1.

i = if bogus <> ? then i else da.   /* equivalent to the julian day number */

i = if bogus <> ? then i else dt1.  /* if init to a real value, there is a runtime failure */

i = if bogus <> ? then i else dtz1. /* if init to a real value, there is a runtime failure */

i = if bogus <> ? then i else 01/01/2000.

i = if bogus <> ? then i else bool.  /* equivalent to int 1 */

i = if bogus <> ? then i else true.  /* equivalent to int 1 */

i = if bogus <> ? then i else false. /* equivalent to int 0 */

i = if bogus <> ? then i else h.

i = if bogus <> ? then i else ch1.    /* must be a valid number in the text, else a runtime error */

i = if bogus <> ? then i else "14".  /* must be a valid number in the text, else a runtime error */

i = if bogus <> ? then i else r1.

i = if bogus <> ? then i else r2.

i64 = if bogus <> ? then i64 else ?.

i64 = if bogus <> ? then i64 else d.

i64 = if bogus <> ? then i64 else i.

i64 = if bogus <> ? then i64 else 42.1.

i64 = if bogus <> ? then i64 else 42.

i64 = if bogus <> ? then i64 else da.   /* equivalent to the julian day number */

i64 = if bogus <> ? then i64 else dt1.  /* if init to a real value, there is a runtime failure */

i64 = if bogus <> ? then i64 else dtz1. /* if init to a real value, there is a runtime failure */

i64 = if bogus <> ? then i64 else 01/01/2000.

i64 = if bogus <> ? then i64 else bool.  /* equivalent to int 1 */

i64 = if bogus <> ? then i64 else true.  /* equivalent to int 1 */

i64 = if bogus <> ? then i64 else false. /* equivalent to int 0 */

i64 = if bogus <> ? then i64 else h.

i64 = if bogus <> ? then i64 else ch1.   /* must be a valid number in the text, else a runtime error */

i64 = if bogus <> ? then i64 else "14". /* must be a valid number in the text, else a runtime error */

i64 = if bogus <> ? then i64 else r1.

i64 = if bogus <> ? then i64 else r2.

/* for decimal op1, the op2 must be numeric or the unknown literal */

d = if bogus <> ? then d else ?.

d = if bogus <> ? then d else i.

d = if bogus <> ? then d else i64.

d = if bogus <> ? then d else 42.

/* for date/datetime/datetime-tz op1, the op2 must be one of the date types or the unknown literal */

/* even if the character expression is a properly formatted date, they can't be used */

da = if bogus <> ? then da else ?.

da = if bogus <> ? then da else dt1.

da = if bogus <> ? then da else dt2.

da = if bogus <> ? then da else dtz1.

da = if bogus <> ? then da else dtz2.

da = if bogus <> ? then da else 01/01/2000.

dt1 = if bogus <> ? then dt1 else ?.

dt1 = if bogus <> ? then dt1 else da.

dt1 = if bogus <> ? then dt1 else dtz1.

dt1 = if bogus <> ? then dt1 else dtz2.

dt1 = if bogus <> ? then dt1 else 01/01/2000.

dtz1 = if bogus <> ? then dtz1 else ?.

dtz1 = if bogus <> ? then dtz1 else da.

dtz1 = if bogus <> ? then dtz1 else dt1.

dtz1 = if bogus <> ? then dtz1 else dt2.

dtz1 = if bogus <> ? then dtz1 else 01/01/2000.

/* for logical op1, the op2 must be logical or the unknown literal */

/* even if the character expression is a properly formatted logical, they can't be used */

bool = if bogus <> ? then bool else ?.

bool = if bogus <> ? then bool else bool2.

bool = if bogus <> ? then bool else true.

bool = if bogus <> ? then bool else false.

/* for handle op1, the op2 must be handle or the unknown literal */

h = if bogus <> ? then h else ?.

h = if bogus <> ? then h else h2.

/* for recid op1, the op2 must be recid or the unknown literal */

/* rowid is not allowed! */

r1 = if bogus <> ? then r1 else ?.

r1 = if bogus <> ? then r1 else re1.

/* for rowid op1, the op2 must be rowid or the unknown literal */

/* recid is not allowed! */

r2 = if bogus <> ? then r2 else ?.

r2 = if bogus <> ? then r2 else ro2.

/* for memptr op1, the op2 must be memptr or the unknown literal */

/* raw is not allowed! */

m1 = if bogus <> ? then m1 else ?.

m1 = if bogus <> ? then m1 else mp1.

/* for raw op1, the op2 must be raw or the unknown literal */

/* memptr is not allowed! */

m2 = if bogus <> ? then m2 else ?.

m2 = if bogus <> ? then m2 else mr2.

/* for character op1, the op2 must be character, longchar or the unknown literal */

ch1 = if bogus <> ? then ch1 else ?.

ch1 = if bogus <> ? then ch1 else ch2.

ch1 = if bogus <> ? then ch1 else lc1.

ch1 = if bogus <> ? then ch1 else "yep".

/* for longchar op1, the op2 must be character, longchar or the unknown literal */

lc1 = if bogus <> ? then lc1 else ?.

lc1 = if bogus <> ? then lc1 else ch1.

lc1 = if bogus <> ? then lc1 else lc2.

lc1 = if bogus <> ? then lc1 else "yep".

/* unknown literal as op1, takes the type of op2 */

/* unknown literal cannot be both op1 and op2 */

i = if bogus <> ? then ? else i.

i = if bogus <> ? then ? else i64.

i = if bogus <> ? then ? else 42.

i = if bogus <> ? then ? else 42.1.

i = if bogus <> ? then ? else d.

i64 = if bogus <> ? then ? else i.

i64 = if bogus <> ? then ? else i64.

i64 = if bogus <> ? then ? else 42.

i64 = if bogus <> ? then ? else 42.1.

i64 = if bogus <> ? then ? else d.

d = if bogus <> ? then ? else i.

d = if bogus <> ? then ? else i64.

d = if bogus <> ? then ? else 42.

d = if bogus <> ? then ? else 42.1.

d = if bogus <> ? then ? else d.

da = if bogus <> ? then ? else da.

da = if bogus <> ? then ? else dt1.

da = if bogus <> ? then ? else dtz1.

dt1 = if bogus <> ? then ? else dt2.

dt1 = if bogus <> ? then ? else da.

dt1 = if bogus <> ? then ? else dtz1.

dtz1 = if bogus <> ? then ? else dtz2.

dtz1 = if bogus <> ? then ? else da.

dtz1 = if bogus <> ? then ? else dt1.

da = if bogus <> ? then ? else 01/01/2000.

dt1 = if bogus <> ? then ? else 01/01/2000.

dtz1 = if bogus <> ? then ? else 01/01/2000.

bool = if bogus <> ? then ? else bool2.

bool = if bogus <> ? then ? else true.

bool = if bogus <> ? then ? else false.

h = if bogus <> ? then ? else h2.

ch1 = if bogus <> ? then ? else ch2.

ch1 = if bogus <> ? then ? else lc1.

ch1 = if bogus <> ? then ? else "14".

lc1 = if bogus <> ? then ? else ch1.

lc1 = if bogus <> ? then ? else lc2.

lc1 = if bogus <> ? then ? else "14".

r1 = if bogus <> ? then ? else r1.

r2 = if bogus <> ? then ? else r2.

m1 = if bogus <> ? then ? else m1.

m2 = if bogus <> ? then ? else m2.