zOs/SQL/FANKHAU

  CREATE VIEW    GDB0389.VMF202A1
   ( TEV_DAT_ISO
    ,TEV_DAT_EUR
   )
  AS SELECT CHAR(DATE(SUBSTR(PARAMETER,1,10)),ISO),
            CHAR(DATE(SUBSTR(PARAMETER,1,10)),EUR)
  FROM GDB0389.TMF202A1
  WHERE BUID       = '0000'
    AND SELCD      = 'TEV_ORDERDATE'
    AND GUELTIGAB  <= CURRENT TIMESTAMP
    AND GUELTIGBIS >= CURRENT TIMESTAMP
  ;