Sample ODBC connection entry

This example illustrates an ODBC connection entry named Customer.

(*
 * Entry:              Customer
 * SQL Table:          CUSTOMER
 *)
DEFINE_ENTRY
   NAME                Customer
   MODEL_DOC_STATEMENT WITH
   DATA_RETRIEVAL      "from CUSTOMER where CUSTOMERNUMBER=:1"
   KEY_RETRIEVAL       "from CUSTOMER where (CUSTOMERNUMBER>=:1)"
   DEFINE_PARAMETERS
      Customernumber   NUMERICAL ( 9 0) DATABASE_FIELD "CUSTOMERNUMBER"
   END_DEFINE_PARAMETERS
   DEFINE_FIELDS
      Customernumber   NUMERICAL ( 9 0) DATABASE_FIELD "CUSTOMERNUMBER"
      Surname          C_CHAR    (31  ) DATABASE_FIELD "SURNAME" SCREEN_FIELD 1
      Firstname        C_CHAR    (31  ) DATABASE_FIELD "FIRSTNAME"
      Initials         C_CHAR    (11  ) DATABASE_FIELD "INITIALS"
      Dateofbirth      NUMERICAL (11 0) DATABASE_FIELD "( {fn year(DATEOFBIRTH)} * 10000 + {fn month(DATEOFBIRTH)} * 100 + {fn dayofmonth(DATEOFBIRTH)} )"
      Dateofdeath      NUMERICAL (11 0) DATABASE_FIELD "( {fn year(DATEOFDEATH)} * 10000 + {fn month(DATEOFDEATH)} * 100 + {fn dayofmonth(DATEOFDEATH)} )"
      Gender           C_CHAR    ( 2  ) DATABASE_FIELD "GENDER"
      Maritalstate     C_CHAR    ( 2  ) DATABASE_FIELD "MARITALSTATE"
      Partnernumber    NUMERICAL ( 9 0) DATABASE_FIELD "PARTNERNUMBER"
   END_DEFINE_FIELDS
   DEFINE_SUBENTRIES
      (* Place subentry definitions here *)
   END_DEFINE_SUBENTRIES
END_DEFINE_ENTRY   (* Customer *)