/* 30/05/24 workfile definition for table Adresse */
/* {1} = "", "NEW" or "NEW SHARED" */
/* {2} = "" or "NO-UNDO" */

DEFINE TEMP-TABLE ttAdresse
  FIELD AdrArt    AS CHARACTER   FORMAT "X(4)"
  FIELD Aktiv     AS LOGICAL     FORMAT "J/N" INITIAL TRUE
  FIELD Anrcd     AS INTEGER     FORMAT "z9" LABEL "Anrede"
  FIELD AnschrFix AS LOGICAL
  FIELD Anzeig_br AS CHARACTER   FORMAT "x(75)"
  FIELD Bem       AS CHARACTER   FORMAT "X(500)"
  FIELD BriefAnr  AS CHARACTER   FORMAT "X(50)"
  FIELD Cd01      AS CHARACTER   FORMAT "X(4)"
  FIELD Cd02      AS CHARACTER   FORMAT "x(4)"
  FIELD Cd03      AS CHARACTER   FORMAT "x(4)"
  FIELD Cd04      AS CHARACTER   FORMAT "x(4)"
  FIELD Cd05      AS CHARACTER   FORMAT "x(4)"
  FIELD Cd06      AS CHARACTER   FORMAT "X(4)"
  FIELD Cd07      AS CHARACTER   FORMAT "x(4)"
  FIELD Cd08      AS CHARACTER   FORMAT "x(4)"
  FIELD Cd09      AS CHARACTER   FORMAT "x(4)"
  FIELD Cd10      AS CHARACTER   FORMAT "x(4)"
  FIELD Cd11      AS CHARACTER   FORMAT "X(4)"
  FIELD Cd12      AS CHARACTER   FORMAT "x(4)"
  FIELD Cd13      AS CHARACTER   FORMAT "x(4)"
  FIELD Cd14      AS CHARACTER   FORMAT "x(4)"
  FIELD Cd15      AS CHARACTER   FORMAT "x(4)"
  FIELD ErfDat    AS DATE        FORMAT "99/99/9999" LABEL "Erfasst"
  FIELD ErfSb     AS CHARACTER   FORMAT "X(4)"
  FIELD Firma     AS CHARACTER   FORMAT "X(8)" LABEL "Mandant"
  FIELD Firma1    AS CHARACTER   FORMAT "x(35)" LABEL "Firma1"
  FIELD Firma2    AS CHARACTER   FORMAT "x(35)"
  FIELD Funktion  AS CHARACTER   FORMAT "x(50)"
  FIELD Homepage  AS CHARACTER   FORMAT "x(50)"
  FIELD Knr       AS INTEGER     FORMAT "999999" LABEL "Nummer"
  FIELD lFreigabe AS LOGICAL     INITIAL TRUE
  FIELD Lkz       AS CHARACTER   FORMAT "X(3)"
  FIELD Mail      AS CHARACTER   FORMAT "x(60)"
  FIELD MutDat    AS DATE        FORMAT "99/99/9999" LABEL "Mutiert"
  FIELD MutSb     AS CHARACTER   FORMAT "X(4)"
  FIELD Name      AS CHARACTER   FORMAT "x(35)" LABEL "Name"
  FIELD Natel     AS CHARACTER   FORMAT "x(20)"
  FIELD Ort       AS CHARACTER   FORMAT "X(30)"
  FIELD Plz       AS CHARACTER   FORMAT "X(8)"
  FIELD Postfach  AS CHARACTER   FORMAT "X(30)"
  FIELD Sprcd     AS INTEGER     FORMAT "9" LABEL "Sprache"
  FIELD Strasse   AS CHARACTER   FORMAT "X(30)"
  FIELD Suchbe    AS CHARACTER   FORMAT "X(20)" LABEL "Suchbegriff"
  FIELD Tel-1     AS CHARACTER   FORMAT "X(20)"
  FIELD Tel-2     AS CHARACTER   FORMAT "X(20)"
  FIELD Tel-3     AS CHARACTER   FORMAT "X(20)"
  FIELD Tel-4     AS CHARACTER   FORMAT "X(20)"
  FIELD Titel     AS CHARACTER   FORMAT "X(20)" LABEL "Titel"
  FIELD Vorname   AS CHARACTER   FORMAT "X(25)" LABEL "Vorname"
  FIELD WortIndex AS CHARACTER   FORMAT "x(500)"
  FIELD Zusatz1   AS CHARACTER   FORMAT "x(35)"
  FIELD Zusatz2   AS CHARACTER   FORMAT "x(35)"
  .