products/sources/formale Sprachen/Cobol/verschiedene-Autoren/Deutsche-Bank/  image not shown  

Quellcode-Bibliothek

© Kompilation durch diese Firma

[Weder Korrektheit noch Funktionsfähigkeit der Software werden zugesichert.]

Datei: Java.gmk   Sprache: Shell

Untersuchungsergebnis.rtf Download desIsabelle {Isabelle[374] Abap[1112] [0]}zum Wurzelverzeichnis wechseln

{\rtf1\ansi\ansicpg1252\deff0{\fonttbl{\f0\fnil\fcharset0 Fixedsys;}{\f1\fmodern\fprq1\fcharset0 Fixedsys;}
{\colortbl;\red255\green0\blue0;\red0\green0\blue255;\red0\green0\blue128;\red0\green0\blue0;\red128\green0\blue0;\red0\green128\blue0;\red128\green128\blue128;\red0\green128\blue128;\red255\green0\blue255;}
{\*\generator Msftedit 5.41.15.1507;}
\viewkind4\uc1\pard\lang1031\f0\fs16}
\cf6 \f1       * DATA SET: X2H100.PRO.COBOL MEMBER:DE027\cf0\f0 \par 
\cf6 \f1       * DATE: 03/03/28 TIME: 18:07:00 PAGE: 1\cf0\f0 \par 
\cf6 \f1       * USERID: X2H100\cf0\f0 \par 
\cf6 \f1       *PARMMVS ENV=DB2\cf0\f0 \par 
\cf6 \f1       *PARMMVS DBRMNAME=DE027\cf0\f0 \par 
\cf6 \f1       *PARMMVS COMPILER=COBOL2\cf0\f0 \par 
\cf6 \f1       *PARMMVS PARM.DB2=(SOURCE,VERSION(AUTO)\cf0\f0 \par 
\cf6 \f1       *PARMMVS PARM.COB=(NOADV,\cf0\f0 \par 
\cf6 \f1       *PARMMVS DATA(31),\cf0\f0 \par 
\cf6 \f1       *PARMMVS NODYN,\cf0\f0 \par 
\cf6 \f1       *PARMMVS MAP, "\cf0\f0 \par 
\cf6 \f1       *PARMMVS OFFSET,\cf0\f0 \par 
\cf6 \f1       *PARMMVS OPT,\cf0\f0 \par 
\cf6 \f1       *PARMMVS RENT,\cf0\f0 \par 
\cf6 \f1       *PARMMVS RES,\cf0\f0 \par 
\cf6 \f1       *PARMMVS NOTEST,\cf0\f0 \par 
\cf6 \f1       *PARMMVS TRUNC(BIN»\cf0\f0 \par 
\cf6 \f1       *PARMMVS PARM.LNK=(MAP,RENT,LIST, 'AMODE=31', 'RMODE=ANY')\cf0\f0 \par 
\cf6 \f1       *PARMMVS LNK.IN ENTRY DE027\cf0\f0 \par 
       \cf1 \f1 identification\cf0\f0  \cf1 \f1 division\cf0\f0 \cf2 \f1 .\cf0\f0 \par 
       \cf1 \f1 program-id\cf0\f0 \cf2 \f1 .\cf0\f0  \cf4 \f1 de027\cf0\f0 \cf2 \f1 .\cf0\f0 \par 
       \cf1 \f1 author\cf0\f0 . pcam-gt-pbs-credit decisions & surveillance -jd.\par 
       \cf1 \f1 date-written\cf0\f0 . 7.7.2002.\par 
       \cf1 \f1 date-compiled\cf0\f0 .\par 
       \cf1 \f1 data\cf0\f0  \cf1 \f1 division\cf0\f0 \cf2 \f1 .\cf0\f0 \par 
       \cf1 \f1 working-storage\cf0\f0  \cf1 \f1 section\cf0\f0 \cf2 \f1 .\cf0\f0 \par 
       \cf3 \f1 77\cf0\f0  \cf4 \f1 i\cf0\f0  \cf2 \f1 pic\cf0\f0  9(\cf2 \f1 4\cf0\f0 ).\par 
       \cf3 \f1 77\cf0\f0  \cf4 \f1 j\cf0\f0  \cf2 \f1 pic\cf0\f0  9(\cf2 \f1 4\cf0\f0 ).\par 
       \cf3 \f1 77\cf0\f0  \cf4 \f1 k\cf0\f0  \cf2 \f1 pic\cf0\f0  9(\cf2 \f1 4\cf0\f0 ).\par 
       \cf3 \f1 77\cf0\f0  \cf4 \f1 ind\cf0\f0  \cf2 \f1 pic\cf0\f0  9(\cf2 \f1 4\cf0\f0 ).\par 
       \cf3 \f1 77\cf0\f0  \cf2 \f1 pic\cf0\f0  9.\par 
         \cf3 \f1 88\cf0\f0  \cf4 \f1 nongood-found\cf0\f0  \cf1 \f1 value\cf0\f0  \cf3 \f1 1\cf0\f0 \cf2 \f1 .\cf0\f0 \par 
         \cf3 \f1 88\cf0\f0  \cf4 \f1 good-found\cf0\f0  \cf1 \f1 value\cf0\f0  \cf3 \f1 0\cf0\f0 \cf2 \f1 .\cf0\f0 \par 
       \cf3 \f1 77\cf0\f0  \cf2 \f1 pic\cf0\f0  9.\par 
         \cf3 \f1 88\cf0\f0  \cf4 \f1 nonblank-found\cf0\f0  \cf1 \f1 value\cf0\f0  \cf3 \f1 1\cf0\f0 \cf2 \f1 .\cf0\f0 \par 
         \cf3 \f1 88\cf0\f0  \cf4 \f1 blank-found\cf0\f0  \cf1 \f1 value\cf0\f0  \cf3 \f1 0\cf0\f0 \cf2 \f1 .\cf0\f0 \par 
       \cf3 \f1 77\cf0\f0  \cf4 \f1 zeile\cf0\f0  \cf2 \f1 pic\cf0\f0  x(\cf2 \f1 1\cf0\f0 32).\par 
       \cf3 \f1 77\cf0\f0  \cf4 \f1 ausgabe\cf0\f0  \cf2 \f1 pic\cf0\f0  x(\cf2 \f1 1\cf0\f0 32).\par 
       \cf3 \f1 77\cf0\f0  \cf4 \f1 aus-ll\cf0\f0  \cf2 \f1 pic\cf0\f0  9(\cf2 \f1 4\cf0\f0 ).\par 
       \cf3 \f1 77\cf0\f0  \cf4 \f1 adresse\cf0\f0  \cf2 \f1 pic\cf0\f0  9(\cf2 \f1 1\cf0\f0 2).\par 
      \par 
       \cf3 \f1 01\cf0\f0  \cf4 \f1 kt1240-dummy-dfheiblk\cf0\f0  \cf2 \f1 pic\cf0\f0  x.\par 
       \cf3 \f1 01\cf0\f0  \cf4 \f1 kt1240-dummy-dfhcommarea\cf0\f0  \cf2 \f1 pic\cf0\f0  x.\par 
       \cf3 \f1 01\cf0\f0  \cf4 \f1 kt1240-in-interface\cf0\f0 \cf2 \f1 .\cf0\f0  \par 
       \cf3 \f1 05\cf0\f0  \cf4 \f1 kt1240-h-aufruf-pgm\cf0\f0  \cf2 \f1 pic\cf0\f0  x(\cf2 \f1 6\cf0\f0 ).\par 
       \cf3 \f1 05\cf0\f0  \cf4 \f1 kt1240-h-count\cf0\f0  \cf2 \f1 pic\cf0\f0  9(\cf2 \f1 3\cf0\f0 ).\par 
       \cf3 \f1 05\cf0\f0  \cf1 \f1 filler\cf0\f0  \cf1 \f1 redefines\cf0\f0  \cf4 \f1 kt1240-h-count\cf0\f0 \cf2 \f1 .\cf0\f0 \par 
         \cf3 \f1 10\cf0\f0  \cf4 \f1 kt1240-h-count-x\cf0\f0  \cf2 \f1 pic\cf0\f0  x(\cf2 \f1 3\cf0\f0 ).\par 
       \cf3 \f1 05\cf0\f0  \cf4 \f1 kt1240-h-text\cf0\f0  \cf2 \f1 pic\cf0\f0  x(\cf2 \f1 9\cf0\f0 00).\par 
       \cf3 \f1 05\cf0\f0  \cf1 \f1 filler\cf0\f0  \cf1 \f1 redefines\cf0\f0  \cf4 \f1 kt1240-h-text\cf0\f0 \cf2 \f1 .\cf0\f0 \par 
         \cf3 \f1 10\cf0\f0  \cf4 \f1 kt1240-h-tab\cf0\f0  \cf1 \f1 occurs\cf0\f0  \cf3 \f1 9\cf0\f0  \cf2 \f1 pic\cf0\f0  x(\cf2 \f1 1\cf0\f0 00).\par 
       \cf3 \f1 01\cf0\f0  \cf4 \f1 kt1240-pgm\cf0\f0  \cf2 \f1 pic\cf0\f0  x(\cf2 \f1 8\cf0\f0 ).\par 
       \cf3 \f1 01\cf0\f0  \cf4 \f1 kt1240-s9\cf0\f0  \cf2 \f1 pic\cf0\f0  9(\cf2 \f1 8\cf0\f0 ).\par 
       \cf3 \f1 01\cf0\f0  \cf4 \f1 kt1240-s9-1\cf0\f0  \cf2 \f1 pic\cf0\f0  -9\cf2 \f1 (\cf0\f0 8).\par 
       \cf3 \f1 01\cf0\f0  \cf4 \f1 kt1240-s9-2\cf0\f0  \cf2 \f1 pic\cf0\f0  -9\cf2 \f1 (\cf0\f0 8).\par 
       \cf3 \f1 01\cf0\f0  \cf4 \f1 kt1240-s9-tab\cf0\f0 \cf2 \f1 .\cf0\f0 \par 
         \cf3 \f1 05\cf0\f0  \cf4 \f1 kt1240-s9-ind\cf0\f0  \cf1 \f1 occurs\cf0\f0  \cf3 \f1 256\cf0\f0  \cf2 \f1 pic\cf0\f0  -9\cf2 \f1 (\cf0\f0 4).\par 
       \cf3 \f1 01\cf0\f0  \cf4 \f1 adressfeld-x\cf0\f0  \cf2 \f1 pic\cf0\f0  9(\cf2 \f1 9\cf0\f0 ).\par 
       \cf3 \f1 01\cf0\f0  \cf4 \f1 adressfeld-zeile1\cf0\f0  \cf2 \f1 pic\cf0\f0  9(\cf2 \f1 9\cf0\f0 ).\par 
       \cf3 \f1 01\cf0\f0  \cf4 \f1 dummy\cf0\f0 \cf2 \f1 .\cf0\f0 \par 
         \cf3 \f1 10\cf0\f0  \cf4 \f1 adressfeld\cf0\f0  \cf1 \f1 pointer\cf0\f0 \cf2 \f1 .\cf0\f0 \par 
         \cf3 \f1 10\cf0\f0  \cf4 \f1 adressfeld-c\cf0\f0  \cf1 \f1 redefines\cf0\f0  \cf4 \f1 adressfeld\cf0\f0 \par 
                         \cf2 \f1 pic\cf0\f0  s9\cf1 \f1 (9) \cf0\f0 \cf2 \f1 c\cf0\f0 omp.\par 
       \cf3 \f1 01\cf0\f0  \cf4 \f1 de026-pgm\cf0\f0  \cf2 \f1 pic\cf0\f0  x(\cf2 \f1 8\cf0\f0 ).\par 
       \par 
       \cf1 \f1 exec\cf0\f0  \cf5 \f1 sql\cf0\f0  \cf5 \f1 include\cf0\f0  \cf1 \f1 sqlca\cf0\f0  en\cf2 \f1 d\cf0\f0 -exec.\par 
       \par 
       \cf3 \f1 01\cf0\f0  \cf4 \f1 umgebung\cf0\f0 \cf2 \f1 .\cf0\f0 \par 
         \cf3 \f1 10\cf0\f0  \cf4 \f1 u\cf0\f0  \cf2 \f1 pic\cf0\f0  9.\par 
           \cf3 \f1 88\cf0\f0  \cf4 \f1 online\cf0\f0  \cf1 \f1 value\cf0\f0  \cf3 \f1 1\cf0\f0 \cf2 \f1 .\cf0\f0 \par 
           \cf3 \f1 88\cf0\f0  \cf4 \f1 batch\cf0\f0  \cf1 \f1 value\cf0\f0  \cf3 \f1 2\cf0\f0 \cf2 \f1 .\cf0\f0 \par 
         \cf3 \f1 10\cf0\f0  \cf4 \f1 db2server\cf0\f0  \cf2 \f1 pic\cf0\f0  x(\cf1 \f1 16) v\cf0\f0 a\cf1 \f1 lue s\cf0\f0 \cf2 \f1 p\cf0\f0 ace.\par 
           \cf3 \f1 88\cf0\f0  \cf4 \f1 testserver\cf0\f0  \cf1 \f1 value\cf0\f0  \cf2 \f1 'TOOO01'\cf0\f0 \cf2 \f1 .\cf0\f0 \par 
           \cf3 \f1 88\cf0\f0  \cf4 \f1 abnahmeserver\cf0\f0  \cf1 \f1 value\cf0\f0  \cf2 \f1 'TOOO06'\cf0\f0 \cf2 \f1 .\cf0\f0 \par 
           \cf3 \f1 88\cf0\f0  \cf4 \f1 produktionsserver\cf0\f0  \cf1 \f1 value\cf0\f0  \cf2 \f1 'POOO04'\cf0\f0 \cf2 \f1 .\cf0\f0 \par 
         \cf3 \f1 10\cf0\f0  \cf2 \f1 pic\cf0\f0  9.\par 
           \cf3 \f1 88\cf0\f0  \cf4 \f1 testsystem\cf0\f0  \cf1 \f1 value\cf0\f0  \cf3 \f1 1\cf0\f0 \cf2 \f1 .\cf0\f0 \par 
           \cf3 \f1 88\cf0\f0  \cf4 \f1 abnahme\cf0\f0  \cf1 \f1 value\cf0\f0  \cf3 \f1 2\cf0\f0 \cf2 \f1 .\cf0\f0 \par 
           \cf3 \f1 88\cf0\f0  \cf4 \f1 produktion\cf0\f0  \cf1 \f1 value\cf0\f0  \cf3 \f1 3\cf0\f0 \cf2 \f1 .\cf0\f0 \par 
      \par 
       \cf1 \f1 linkage\cf0\f0  \cf1 \f1 section\cf0\f0 \cf2 \f1 .\cf0\f0 \par 
      \par 
       \cf3 \f1 01\cf0\f0  \cf4 \f1 zeile1\cf0\f0  \cf2 \f1 pic\cf0\f0  x(\cf2 \f1 1\cf0\f0 32).\par 
       \cf3 \f1 01\cf0\f0  \cf4 \f1 zeile2\cf0\f0  \cf2 \f1 pic\cf0\f0  x(\cf2 \f1 1\cf0\f0 32).\par 
       \cf3 \f1 01\cf0\f0  \cf4 \f1 zeile3\cf0\f0  \cf2 \f1 pic\cf0\f0  x(\cf2 \f1 1\cf0\f0 32).\par 
       \cf3 \f1 01\cf0\f0  \cf4 \f1 zeile4\cf0\f0  \cf2 \f1 pic\cf0\f0  x(\cf2 \f1 1\cf0\f0 32).\par 
       \cf3 \f1 01\cf0\f0  \cf4 \f1 zeile5\cf0\f0  \cf2 \f1 pic\cf0\f0  x(\cf2 \f1 1\cf0\f0 32).\par 
      \par 
       \cf1 \f1 procedure\cf0\f0  \cf1 \f1 division\cf0\f0  \cf1 \f1 using\cf0\f0  \cf4 \f1 zeile1\cf0\f0 \par 
                                \cf4 \f1 zeile2\cf0\f0 \par 
                                \cf4 \f1 zeile3\cf0\f0 \par 
                                \cf4 \f1 zeile4\cf0\f0 \par 
                                \cf4 \f1 zeile5\cf0\f0 \cf2 \f1 .\cf0\f0 \par 
\cf6 \f1       * vorsicht: parameterübergabe soll nur "by content" erfolgen, weil\cf0\f0 \par 
\cf6 \f1       * der pufferbereich auf blank gesetzt wird!\cf0\f0 \par 
      \par 
       \cf8 \f1 main\cf0\f0 \cf2 \f1 .\cf0\f0 \par 
       \cf1 \f1 perform\cf0\f0  \cf4 \f1 init\cf0\f0 \par 
       \cf1 \f1 move\cf0\f0  \cf1 \f1 space\cf0\f0  \cf1 \f1 to\cf0\f0  \cf4 \f1 ausgabe\cf0\f0 \par 
       \cf1 \f1 move\cf0\f0  \cf1 \f1 zero\cf0\f0  \cf1 \f1 to\cf0\f0  \cf4 \f1 aus-ll\cf0\f0 \par 
       \cf1 \f1 set\cf0\f0  \cf4 \f1 adressfeld\cf0\f0  \cf1 \f1 to\cf0\f0  \cf1 \f1 address\cf0\f0  \cf1 \f1 of\cf0\f0  \cf4 \f1 zeile1\cf0\f0 \par 
       \cf1 \f1 move\cf0\f0  \cf4 \f1 adressfeld-c\cf0\f0  \cf1 \f1 to\cf0\f0  \cf4 \f1 adressfeld-zeile1\cf0\f0 \par 
\cf6 \f1       *\cf0\f0 \par 
       \cf1 \f1 move\cf0\f0  \cf4 \f1 zeile1\cf0\f0  \cf1 \f1 to\cf0\f0  \cf4 \f1 zeile\cf0\f0 \par 
       \cf1 \f1 perform\cf0\f0  \cf4 \f1 check\cf0\f0 \par 
       \cf1 \f1 if\cf0\f0  \cf4 \f1 k\cf0\f0  \cf2 \f1 >\cf0\f0  \cf3 \f1 0\cf0\f0  \cf1 \f1 then\cf0\f0  \cf1 \f1 move\cf0\f0  \cf1 \f1 space\cf0\f0  \cf1 \f1 to\cf0\f0  \cf4 \f1 zeile1\cf0\f0 \cf2 \f1 (\cf0\f0 \cf3 \f1 1\cf0\f0 \cf2 \f1 :\cf0\f0 \cf4 \f1 k\cf0\f0 \cf2 \f1 )\cf0\f0  \cf1 \f1 end-if\cf0\f0 \par 
\cf6 \f1       *\cf0\f0 \par 
       \cf1 \f1 set\cf0\f0  \cf4 \f1 adressfeld\cf0\f0  \cf1 \f1 to\cf0\f0  \cf1 \f1 address\cf0\f0  \cf1 \f1 of\cf0\f0  \cf4 \f1 zeile2\cf0\f0 \par 
       \cf1 \f1 move\cf0\f0  \cf4 \f1 adressfeld-c\cf0\f0  \cf1 \f1 to\cf0\f0  \cf4 \f1 adressfeld-x\cf0\f0 \par 
       \cf1 \f1 if\cf0\f0  \cf4 \f1 adressfeld-x\cf0\f0 \cf2 \f1 (\cf0\f0 \cf3 \f1 1\cf0\f0 \cf2 \f1 :\cf0\f0 \cf3 \f1 4\cf0\f0 \cf2 \f1 )\cf0\f0  \cf2 \f1 =\cf0\f0  \cf4 \f1 adressfeld-zeile1\cf0\f0 \cf2 \f1 (\cf0\f0 \cf3 \f1 1\cf0\f0 \cf2 \f1 :\cf0\f0 \cf3 \f1 4\cf0\f0 \cf2 \f1 )\cf0\f0 \par 
       \cf1 \f1 and\cf0\f0  \cf4 \f1 zeile2\cf0\f0 \cf2 \f1 (\cf0\f0 \cf3 \f1 1\cf0\f0 \cf2 \f1 :\cf0\f0 \cf3 \f1 1\cf0\f0 \cf2 \f1 )\cf0\f0  \cf2 \f1 >\cf0\f0  \cf1 \f1 space\cf0\f0  \cf1 \f1 and\cf0\f0  \cf2 \f1 <\cf0\f0 \cf2 \f1 =\cf0\f0  \cf2 \f1 '9'\cf0\f0  \cf1 \f1 then\cf0\f0 \par 
         \cf1 \f1 move\cf0\f0  \cf4 \f1 zeile2\cf0\f0  \cf1 \f1 to\cf0\f0  \cf4 \f1 zeile\cf0\f0 \par 
         \cf1 \f1 perform\cf0\f0  \cf4 \f1 check\cf0\f0 \par 
         \cf1 \f1 if\cf0\f0  \cf4 \f1 k\cf0\f0  \cf2 \f1 >\cf0\f0  \cf3 \f1 0\cf0\f0  \cf1 \f1 then\cf0\f0  \cf1 \f1 move\cf0\f0  \cf1 \f1 space\cf0\f0  \cf1 \f1 to\cf0\f0  \cf4 \f1 zeile2\cf0\f0 \cf2 \f1 (\cf0\f0 \cf3 \f1 1\cf0\f0 \cf2 \f1 :\cf0\f0 \cf4 \f1 k\cf0\f0 \cf2 \f1 )\cf0\f0  \cf1 \f1 end-if\cf0\f0 \par 
       \cf1 \f1 end-if\cf0\f0 \par 
\cf6 \f1       *\cf0\f0 \par 
       \cf1 \f1 set\cf0\f0  \cf4 \f1 adressfeld\cf0\f0  \cf1 \f1 to\cf0\f0  \cf1 \f1 address\cf0\f0  \cf1 \f1 of\cf0\f0  \cf4 \f1 zeile3\cf0\f0 \par 
       \cf1 \f1 move\cf0\f0  \cf4 \f1 adressfeld-c\cf0\f0  \cf1 \f1 to\cf0\f0  \cf4 \f1 adressfeld-x\cf0\f0 \par 
       \cf1 \f1 if\cf0\f0  \cf4 \f1 adressfeld-x\cf0\f0 \cf2 \f1 (\cf0\f0 \cf3 \f1 1\cf0\f0 \cf2 \f1 :\cf0\f0 \cf3 \f1 4\cf0\f0 \cf2 \f1 )\cf0\f0  \cf2 \f1 =\cf0\f0  \cf4 \f1 adressfeld-zeile1\cf0\f0 \cf2 \f1 (\cf0\f0 \cf3 \f1 1\cf0\f0 \cf2 \f1 :\cf0\f0 \cf3 \f1 4\cf0\f0 \cf2 \f1 )\cf0\f0 \par 
       \cf1 \f1 and\cf0\f0  \cf4 \f1 zeile3\cf0\f0 \cf2 \f1 (\cf0\f0 \cf3 \f1 1\cf0\f0 \cf2 \f1 :\cf0\f0 \cf3 \f1 1\cf0\f0 \cf2 \f1 )\cf0\f0  \cf2 \f1 >\cf0\f0  \cf1 \f1 space\cf0\f0  \cf1 \f1 and\cf0\f0  \cf2 \f1 <\cf0\f0 \cf2 \f1 =\cf0\f0  \cf2 \f1 '9'\cf0\f0  \cf1 \f1 then\cf0\f0 \par 
         \cf1 \f1 move\cf0\f0  \cf4 \f1 zeile3\cf0\f0  \cf1 \f1 to\cf0\f0  \cf4 \f1 zeile\cf0\f0 \par 
         \cf1 \f1 perform\cf0\f0  \cf4 \f1 check\cf0\f0 \par 
         \cf1 \f1 if\cf0\f0  \cf4 \f1 k\cf0\f0  \cf2 \f1 >\cf0\f0  \cf3 \f1 0\cf0\f0  \cf1 \f1 then\cf0\f0  \cf1 \f1 move\cf0\f0  \cf1 \f1 space\cf0\f0  \cf1 \f1 to\cf0\f0  \cf4 \f1 zeile3\cf0\f0 \cf2 \f1 (\cf0\f0 \cf3 \f1 1\cf0\f0 \cf2 \f1 :\cf0\f0 \cf4 \f1 k\cf0\f0 \cf2 \f1 )\cf0\f0  \cf1 \f1 end-if\cf0\f0 \par 
       \cf1 \f1 end-if\cf0\f0 \par 
\cf6 \f1       *\cf0\f0 \par 
       \cf1 \f1 set\cf0\f0  \cf4 \f1 adressfeld\cf0\f0  \cf1 \f1 to\cf0\f0  \cf1 \f1 address\cf0\f0  \cf1 \f1 of\cf0\f0  \cf4 \f1 zeile4\cf0\f0 \par 
       \cf1 \f1 move\cf0\f0  \cf4 \f1 adressfeld-c\cf0\f0  \cf1 \f1 to\cf0\f0  \cf4 \f1 adressfeld-x\cf0\f0 \par 
       \cf1 \f1 if\cf0\f0  \cf4 \f1 adressfeld-x\cf0\f0 \cf2 \f1 (\cf0\f0 \cf3 \f1 1\cf0\f0 \cf2 \f1 :\cf0\f0 \cf3 \f1 4\cf0\f0 \cf2 \f1 )\cf0\f0  \cf2 \f1 =\cf0\f0  \cf4 \f1 adressfeld-zeile1\cf0\f0 \cf2 \f1 (\cf0\f0 \cf3 \f1 1\cf0\f0 \cf2 \f1 :\cf0\f0 \cf3 \f1 4\cf0\f0 \cf2 \f1 )\cf0\f0 \par 
       \cf1 \f1 and\cf0\f0  \cf4 \f1 zeile4\cf0\f0 \cf2 \f1 (\cf0\f0 \cf3 \f1 1\cf0\f0 \cf2 \f1 :\cf0\f0 \cf3 \f1 1\cf0\f0 \cf2 \f1 )\cf0\f0  \cf2 \f1 >\cf0\f0  \cf1 \f1 space\cf0\f0  \cf1 \f1 and\cf0\f0  \cf2 \f1 <\cf0\f0 \cf2 \f1 =\cf0\f0  \cf2 \f1 '9'\cf0\f0  \cf1 \f1 then\cf0\f0 \par 
         \cf1 \f1 move\cf0\f0  \cf4 \f1 zeile4\cf0\f0  \cf1 \f1 to\cf0\f0  \cf4 \f1 zeile\cf0\f0 \par 
         \cf1 \f1 perform\cf0\f0  \cf4 \f1 check\cf0\f0 \par 
         \cf1 \f1 if\cf0\f0  \cf4 \f1 k\cf0\f0  \cf2 \f1 >\cf0\f0  \cf3 \f1 0\cf0\f0  \cf1 \f1 then\cf0\f0  \cf1 \f1 move\cf0\f0  \cf1 \f1 space\cf0\f0  \cf1 \f1 to\cf0\f0  \cf4 \f1 zeile4\cf0\f0 \cf2 \f1 (\cf0\f0 \cf3 \f1 1\cf0\f0 \cf2 \f1 :\cf0\f0 \cf4 \f1 k\cf0\f0 \cf2 \f1 )\cf0\f0  \cf1 \f1 end-if\cf0\f0 \par 
       \cf1 \f1 end-if\cf0\f0 \par 
\cf6 \f1       *\cf0\f0 \par 
       \cf1 \f1 set\cf0\f0  \cf4 \f1 adressfeld\cf0\f0  \cf1 \f1 to\cf0\f0  \cf1 \f1 address\cf0\f0  \cf1 \f1 of\cf0\f0  \cf4 \f1 zeile5\cf0\f0 \par 
       \cf1 \f1 move\cf0\f0  \cf4 \f1 adressfeld-c\cf0\f0  \cf1 \f1 to\cf0\f0  \cf4 \f1 adressfeld-x\cf0\f0 \par 
       \cf1 \f1 if\cf0\f0  \cf4 \f1 adressfeld-x\cf0\f0 \cf2 \f1 (\cf0\f0 \cf3 \f1 1\cf0\f0 \cf2 \f1 :\cf0\f0 \cf3 \f1 4\cf0\f0 \cf2 \f1 )\cf0\f0  \cf2 \f1 =\cf0\f0  \cf4 \f1 adressfeld-zeile1\cf0\f0 \cf2 \f1 (\cf0\f0 \cf3 \f1 1\cf0\f0 \cf2 \f1 :\cf0\f0 \cf3 \f1 4\cf0\f0 \cf2 \f1 )\cf0\f0 \par 
       \cf1 \f1 and\cf0\f0  \cf4 \f1 zeile5\cf0\f0 \cf2 \f1 (\cf0\f0 \cf3 \f1 1\cf0\f0 \cf2 \f1 :\cf0\f0 \cf3 \f1 1\cf0\f0 \cf2 \f1 )\cf0\f0  \cf2 \f1 >\cf0\f0  \cf1 \f1 space\cf0\f0  \cf1 \f1 and\cf0\f0  \cf2 \f1 <\cf0\f0 \cf2 \f1 =\cf0\f0  \cf2 \f1 '9'\cf0\f0  \cf1 \f1 then\cf0\f0 \par 
         \cf1 \f1 move\cf0\f0  \cf4 \f1 zeile5\cf0\f0  \cf1 \f1 to\cf0\f0  \cf4 \f1 zeile\cf0\f0 \par 
         \cf1 \f1 perform\cf0\f0  \cf4 \f1 check\cf0\f0 \par 
         \cf1 \f1 if\cf0\f0  \cf4 \f1 k\cf0\f0  \cf2 \f1 >\cf0\f0  \cf3 \f1 0\cf0\f0  \cf1 \f1 then\cf0\f0  \cf1 \f1 move\cf0\f0  \cf1 \f1 space\cf0\f0  \cf1 \f1 to\cf0\f0  \cf4 \f1 zeile5\cf0\f0 \cf2 \f1 (\cf0\f0 \cf3 \f1 1\cf0\f0 \cf2 \f1 :\cf0\f0 \cf4 \f1 k\cf0\f0 \cf2 \f1 )\cf0\f0  \cf1 \f1 end-if\cf0\f0 \par 
       \cf1 \f1 end-if\cf0\f0 \par 
\cf6 \f1       *\cf0\f0 \par 
       \cf1 \f1 move\cf0\f0  \cf1 \f1 space\cf0\f0  \cf1 \f1 to\cf0\f0  \cf4 \f1 kt1240-h-text\cf0\f0 \par 
       \cf1 \f1 perform\cf0\f0  \cf4 \f1 wri-que\cf0\f0 \cf2 \f1 .\cf0\f0 \par 
       \cf1 \f1 goback\cf0\f0 \par 
       \cf2 \f1 .\cf0\f0       \par 
      \par 
       \cf8 \f1 init\cf0\f0 \cf2 \f1 .\cf0\f0 \par 
       \cf1 \f1 exec\cf0\f0  \cf5 \f1 sql\cf0\f0 \par 
         \cf5 \f1 set\cf0\f0  :\cf4 \f1 db2server\cf0\f0  \cf2 \f1 =\cf0\f0  \cf5 \f1 current\cf0\f0  \cf5 \f1 server\cf0\f0 \par 
       \cf1 \f1 end-exec\cf0\f0 \par 
       \cf1 \f1 move\cf0\f0  \cf2 \f1 'de026'\cf0\f0  \cf1 \f1 to\cf0\f0  \cf4 \f1 de026-pgm\cf0\f0 \par 
       \cf1 \f1 call\cf0\f0  \cf4 \f1 de026-pgm\cf0\f0 \par 
         \cf1 \f1 on\cf0\f0  \cf1 \f1 exception\cf0\f0  \cf1 \f1 goback\cf0\f0 \par 
       \cf1 \f1 end-call\cf0\f0 \par 
       \cf1 \f1 if\cf0\f0  \cf1 \f1 return-code\cf0\f0  \cf2 \f1 =\cf0\f0  \cf1 \f1 zero\cf0\f0  \cf1 \f1 then\cf0\f0  \cf1 \f1 set\cf0\f0  \cf4 \f1 batch\cf0\f0  \cf1 \f1 to\cf0\f0  \cf1 \f1 true\cf0\f0  \cf1 \f1 end-if\cf0\f0 \par 
       \cf1 \f1 if\cf0\f0  \cf1 \f1 return-code\cf0\f0  \cf2 \f1 =\cf0\f0  \cf3 \f1 16\cf0\f0  \cf1 \f1 then\cf0\f0  \cf1 \f1 set\cf0\f0  \cf4 \f1 online\cf0\f0  \cf1 \f1 to\cf0\f0  \cf1 \f1 true\cf0\f0  \cf1 \f1 end-if\cf0\f0 \par 
       \cf2 \f1 .\cf0\f0 \par 
       \par 
       \cf8 \f1 check\cf0\f0 \cf2 \f1 .\cf0\f0 \par 
       \cf1 \f1 set\cf0\f0  \cf4 \f1 good-found\cf0\f0  \cf1 \f1 to\cf0\f0  \cf1 \f1 true\cf0\f0 \par 
       \cf1 \f1 perform\cf0\f0  \cf1 \f1 varying\cf0\f0  \cf4 \f1 i\cf0\f0  \cf1 \f1 from\cf0\f0  \cf3 \f1 1\cf0\f0  \cf1 \f1 by\cf0\f0  \cf3 \f1 1\cf0\f0  \cf1 \f1 until\cf0\f0  \cf4 \f1 i\cf0\f0  \cf2 \f1 >\cf0\f0  \cf3 \f1 131\cf0\f0 \par 
       \cf1 \f1 or\cf0\f0  \cf4 \f1 nongood-found\cf0\f0 \par 
         \cf1 \f1 if\cf0\f0  \cf4 \f1 zeile\cf0\f0 \cf2 \f1 (\cf0\f0 \cf4 \f1 i\cf0\f0 \cf2 \f1 :\cf0\f0 \cf3 \f1 1\cf0\f0 \cf2 \f1 )\cf0\f0  \cf2 \f1 <\cf0\f0  \cf1 \f1 space\cf0\f0  \cf1 \f1 then\cf0\f0 \par 
           \cf1 \f1 set\cf0\f0  \cf4 \f1 nongood-found\cf0\f0  \cf1 \f1 to\cf0\f0  \cf1 \f1 true\cf0\f0 \par 
           \cf1 \f1 compute\cf0\f0  \cf4 \f1 j\cf0\f0  \cf2 \f1 =\cf0\f0  \cf4 \f1 i\cf0\f0  \cf2 \f1 -\cf0\f0 \cf3 \f1 1\cf0\f0 \par 
           \cf1 \f1 if\cf0\f0  \cf4 \f1 j\cf0\f0  \cf2 \f1 <\cf0\f0  \cf3 \f1 1\cf0\f0  \cf1 \f1 then\cf0\f0  \cf1 \f1 move\cf0\f0  \cf3 \f1 1\cf0\f0  \cf1 \f1 to\cf0\f0  \cf4 \f1 j\cf0\f0  \cf1 \f1 end-if\cf0\f0 \par 
         \cf1 \f1 end-if\cf0\f0 \par 
       \cf1 \f1 end-perform\cf0\f0 \par 
       \cf1 \f1 if\cf0\f0  \cf4 \f1 good-found\cf0\f0  \cf1 \f1 then\cf0\f0  \cf1 \f1 move\cf0\f0  \cf3 \f1 132\cf0\f0  \cf1 \f1 to\cf0\f0  \cf4 \f1 j\cf0\f0  \cf1 \f1 end-if\cf0\f0 \par 
       \cf1 \f1 set\cf0\f0  \cf4 \f1 blank-found\cf0\f0  \cf1 \f1 to\cf0\f0  \cf1 \f1 true\cf0\f0 \par 
       \cf1 \f1 perform\cf0\f0  \cf1 \f1 varying\cf0\f0  \cf4 \f1 i\cf0\f0  \cf1 \f1 from\cf0\f0  \cf4 \f1 j\cf0\f0  \cf1 \f1 by\cf0\f0  \cf2 \f1 -\cf0\f0 \cf3 \f1 1\cf0\f0  \cf1 \f1 until\cf0\f0  \cf4 \f1 i\cf0\f0  \cf2 \f1 <\cf0\f0  \cf3 \f1 2\cf0\f0 \par 
                                                      \cf1 \f1 or\cf0\f0  \cf4 \f1 nonblank-found\cf0\f0 \par 
         \cf1 \f1 if\cf0\f0  \cf4 \f1 zeile\cf0\f0 \cf2 \f1 (\cf0\f0 \cf4 \f1 i\cf0\f0 \cf2 \f1 :\cf0\f0 \cf3 \f1 1\cf0\f0 \cf2 \f1 )\cf0\f0  \cf1 \f1 not\cf0\f0  \cf2 \f1 =\cf0\f0  \cf1 \f1 space\cf0\f0  \cf1 \f1 then\cf0\f0 \par 
           \cf1 \f1 set\cf0\f0  \cf4 \f1 nonblank-found\cf0\f0  \cf1 \f1 to\cf0\f0  \cf1 \f1 true\cf0\f0 \par 
           \cf1 \f1 compute\cf0\f0  \cf4 \f1 k\cf0\f0  \cf2 \f1 =\cf0\f0  \cf4 \f1 i\cf0\f0 \par 
           \cf1 \f1 if\cf0\f0  \cf4 \f1 k\cf0\f0  \cf2 \f1 <\cf0\f0 \cf2 \f1 =\cf0\f0  \cf3 \f1 1\cf0\f0  \cf1 \f1 then\cf0\f0  \cf1 \f1 move\cf0\f0  \cf3 \f1 1\cf0\f0  \cf1 \f1 to\cf0\f0  \cf4 \f1 k\cf0\f0  \cf1 \f1 end-if\cf0\f0 \par 
         \cf1 \f1 end-if\cf0\f0 \par 
       \cf1 \f1 end-perform\cf0\f0 \par 
       \cf1 \f1 if\cf0\f0  \cf4 \f1 blank-found\cf0\f0  \cf1 \f1 then\cf0\f0  \cf1 \f1 move\cf0\f0  \cf4 \f1 j\cf0\f0  \cf1 \f1 to\cf0\f0  \cf4 \f1 k\cf0\f0  \cf1 \f1 end-if\cf0\f0 \par 
       \cf1 \f1 if\cf0\f0  \cf4 \f1 aus-ll\cf0\f0 \cf2 \f1 >\cf0\f0  \cf3 \f1 0\cf0\f0  \cf1 \f1 and\cf0\f0 \cf2 \f1 <\cf0\f0  \cf1 \f1 length\cf0\f0  \cf1 \f1 of\cf0\f0  \cf4 \f1 ausgabe\cf0\f0  \cf1 \f1 then\cf0\f0 \par 
         \cf1 \f1 string\cf0\f0  \cf4 \f1 ausgabe\cf0\f0 \cf2 \f1 (\cf0\f0 \cf3 \f1 1\cf0\f0 \cf2 \f1 :\cf0\f0 \cf4 \f1 aus-ll\cf0\f0 \cf2 \f1 )\cf0\f0  \cf4 \f1 zeile\cf0\f0 \cf2 \f1 (\cf0\f0 \cf3 \f1 1\cf0\f0 \cf2 \f1 :\cf0\f0 \cf4 \f1 k\cf0\f0 \cf2 \f1 )\cf0\f0 \par 
         \cf1 \f1 delimited\cf0\f0  \cf1 \f1 by\cf0\f0  \cf1 \f1 size\cf0\f0  \cf1 \f1 into\cf0\f0  \cf4 \f1 ausgabe\cf0\f0 \par 
         \cf1 \f1 add\cf0\f0  \cf4 \f1 k\cf0\f0  \cf1 \f1 to\cf0\f0  \cf4 \f1 aus-ll\cf0\f0 \par 
         \cf1 \f1 else\cf0\f0 \par 
         \cf1 \f1 if\cf0\f0  \cf4 \f1 aus-ll\cf0\f0  \cf2 \f1 =\cf0\f0  \cf1 \f1 zero\cf0\f0  \cf1 \f1 then\cf0\f0 \par 
           \cf1 \f1 string\cf0\f0  \cf4 \f1 zeile\cf0\f0 \cf2 \f1 (\cf0\f0 \cf3 \f1 1\cf0\f0 \cf2 \f1 :\cf0\f0 \cf4 \f1 k\cf0\f0 \cf2 \f1 )\cf0\f0 \par 
           \cf1 \f1 delimited\cf0\f0  \cf1 \f1 by\cf0\f0  \cf1 \f1 size\cf0\f0  \cf1 \f1 into\cf0\f0  \cf4 \f1 ausgabe\cf0\f0 \par 
           \cf1 \f1 move\cf0\f0  \cf4 \f1 k\cf0\f0  \cf1 \f1 to\cf0\f0  \cf4 \f1 aus-ll\cf0\f0 \par 
         \cf1 \f1 end-if\cf0\f0 \par 
       \cf1 \f1 end-if\cf0\f0 \par 
       \cf2 \f1 .\cf0\f0 \par 
       \cf8 \f1 wri-que\cf0\f0 \cf2 \f1 .\cf0\f0 \par 
       \cf1 \f1 if\cf0\f0  \cf4 \f1 batch\cf0\f0  \cf1 \f1 then\cf0\f0 \par 
         \cf1 \f1 display\cf0\f0  \cf4 \f1 ausgabe\cf0\f0 \par 
       \cf1 \f1 else\cf0\f0 \par 
         \cf1 \f1 move\cf0\f0  \cf3 \f1 1\cf0\f0  \cf1 \f1 to\cf0\f0  \cf4 \f1 kt1240-h-count\cf0\f0 \par 
         \cf1 \f1 move\cf0\f0  \cf4 \f1 ausgabe\cf0\f0  \cf1 \f1 to\cf0\f0  \cf4 \f1 kt1240-h-tab\cf0\f0 \cf2 \f1 (\cf0\f0 \cf3 \f1 1\cf0\f0 \cf2 \f1 )\cf0\f0 \par 
         \cf1 \f1 move\cf0\f0  \cf2 \f1 'KT1240'\cf0\f0  \cf1 \f1 to\cf0\f0  \cf4 \f1 kt1240-pgm\cf0\f0 \par 
         \cf1 \f1 move\cf0\f0  \cf2 \f1 'de027'\cf0\f0  \cf1 \f1 to\cf0\f0  \cf4 \f1 kt1240-h-aufruf-pgm\cf0\f0 \par 
      \par 
         \cf1 \f1 call\cf0\f0  \cf4 \f1 kt1240-pgm\cf0\f0  \cf1 \f1 using\cf0\f0  \cf4 \f1 kt1240-dummy-dfheiblk\cf0\f0 \par 
                                             \cf4 \f1 kt1240-dummy-dfhcommarea\cf0\f0 \par 
                                             \cf4 \f1 kt1240-in-interface\cf0\f0 \par 
       \cf1 \f1 end-if\cf0\f0 \par 
       \cf2 \f1 .\cf0\f0 \par 
       \cf1 \f1 end-program\cf0\f0 \cf4 \f1  de02\cf0\f0 \cf2 \f1 7\cf0\f0 . }e=binary-Len=0-Val=0-Loc=0)
      then(Lin=190-Col=12-Fil=1-Id=426-Typ=function)
       :=(Lin=188-Col=12-Fil=1-Id=427-Typ=symbol)
        ausgabe(Lin=188-Col=12-Fil=1-Id=428-Typ=data-Ref=1-Base=octet-Len=132-Dur=static-Fmt=X(132)-Lbd=1-Val=ausgabe-Loc=150)
        [](Lin=188-Col=12-Fil=1-Id=429-Typ=symbol)
         zeile(Lin=188-Col=12-Fil=1-Id=430-Typ=data-Ref=1-Base=octet-Len=132-Dur=static-Fmt=X(132)-Lbd=1-Val=zeile-Loc=18)
         1(Lin=188-Col=12-Fil=1-Id=431-Typ=data-Ref=0-Base=binary-Len=0-Val=1-Loc=0)
       :=(Lin=190-Col=12-Fil=1-Id=432-Typ=symbol)
        aus-ll(Lin=190-Col=12-Fil=1-Id=433-Typ=data-Ref=1-Base=bcd-Len=4-Dur=static-Fmt=9(4)-Lbd=1-Val=somevalue-Loc=282)
        k(Lin=190-Col=12-Fil=1-Id=434-Typ=data-Ref=1-Base=bcd-Len=4-Dur=static-Fmt=9(4)-Lbd=1-Val=somevalue-Loc=8)
   if(Lin=203-Col=10-Fil=1-Id=435-Typ=function)
    Test(Lin=195-Col=8-Fil=1-Id=436-Typ=symbol)
     2(Lin=195-Col=8-Fil=1-Id=437-Typ=data-Ref=0-Base=binary-Len=0-Dur=constant-Lbd=1-Val=2-Loc=561)
    then(Lin=196-Col=10-Fil=1-Id=438-Typ=function)
     interface(Lin=196-Col=10-Fil=1-Id=439-Typ=symbol)
      display(Lin=196-Col=10-Fil=1-Id=440-Typ=function)
      :=(Lin=196-Col=10-Fil=1-Id=441-Typ=symbol)
       $77(Lin=196-Col=10-Fil=1-Id=442-Typ=data-Ref=1-Base=octet-Len=0-Dur=temporary-Least=1-Ubd=1-Val=$77-Loc=792)
       ausgabe(Lin=196-Col=10-Fil=1-Id=443-Typ=data-Ref=1-Base=octet-Len=132-Dur=static-Fmt=X(132)-Lbd=1-Val=ausgabe-Loc=150)
    else(Lin=203-Col=10-Fil=1-Id=444-Typ=function)
     :=(Lin=198-Col=10-Fil=1-Id=445-Typ=symbol)
      kt1240-h-count(Lin=198-Col=10-Fil=1-Id=446-Typ=data-Ref=1-Base=bcd-Len=3-Dur=static-Fmt=9(3)-Lbd=1-Val=somevalue-Loc=304)
      1(Lin=198-Col=10-Fil=1-Id=447-Typ=data-Ref=0-Base=binary-Len=0-Val=1-Loc=0)
     :=(Lin=199-Col=10-Fil=1-Id=448-Typ=symbol)
      [](Lin=199-Col=10-Fil=1-Id=449-Typ=symbol)
       kt1240-h-tab(Lin=199-Col=10-Fil=1-Id=450-Typ=data-Ref=1-Base=octet-Len=100-Dur=static-Fmt=X(100)-Lbd=1-Val=kt1240-h-tab-Loc=311)
       1(Lin=199-Col=10-Fil=1-Id=451-Typ=data-Ref=0-Base=binary-Len=0-Val=1-Loc=0)
      ausgabe(Lin=199-Col=10-Fil=1-Id=452-Typ=data-Ref=1-Base=octet-Len=132-Dur=static-Fmt=X(132)-Lbd=1-Val=ausgabe-Loc=150)
     :=(Lin=200-Col=10-Fil=1-Id=453-Typ=symbol)
      kt1240-pgm(Lin=200-Col=10-Fil=1-Id=454-Typ=data-Ref=1-Base=octet-Len=8-Dur=static-Fmt=X(8)-Lbd=1-Val=kt1240-pgm-Loc=411)
      'KT1240'(Lin=200-Col=10-Fil=1-Id=455-Typ=data-Ref=0-Base=octet-Len=8-Val='KT1240'-Loc=0)
     :=(Lin=201-Col=10-Fil=1-Id=456-Typ=symbol)
      kt1240-h-aufruf-pgm(Lin=201-Col=10-Fil=1-Id=457-Typ=data-Ref=1-Base=octet-Len=6-Dur=static-Fmt=X(6)-Lbd=1-Val=kt1240-h-aufruf-pgm-Loc=298)
      'de027'(Lin=201-Col=10-Fil=1-Id=458-Typ=data-Ref=0-Base=octet-Len=7-Val='de027'-Loc=0)
     interface(Lin=203-Col=10-Fil=1-Id=459-Typ=symbol)
      kt1240-pgm(Lin=203-Col=10-Fil=1-Id=460-Typ=data-Ref=1-Base=octet-Len=8-Dur=static-Fmt=X(8)-Lbd=1-Val=kt1240-pgm-Loc=411)
      :=(Lin=203-Col=10-Fil=1-Id=461-Typ=symbol)
       kt1240-dummy-dfheiblk(Lin=203-Col=10-Fil=1-Id=462-Typ=data-Ref=1-Base=octet-Len=0-Dur=static-Fmt=X-Lbd=1-Val=kt1240-dummy-dfheiblk-Loc=298)
       $78(Lin=203-Col=10-Fil=1-Id=463-Typ=data-Ref=1-Base=octet-Len=0-Dur=temporary-Least=1-Ubd=1-Val=$78-Loc=792)
      :=(Lin=203-Col=10-Fil=1-Id=464-Typ=symbol)
       kt1240-dummy-dfhcommarea(Lin=203-Col=10-Fil=1-Id=465-Typ=data-Ref=1-Base=octet-Len=0-Dur=static-Fmt=X-Lbd=1-Val=kt1240-dummy-dfhcommarea-Loc=298)
       $79(Lin=203-Col=10-Fil=1-Id=466-Typ=data-Ref=1-Base=octet-Len=0-Dur=temporary-Least=1-Ubd=1-Val=$79-Loc=792)
      :=(Lin=203-Col=10-Fil=1-Id=467-Typ=symbol)
       kt1240-in-interface(Lin=203-Col=10-Fil=1-Id=468-Typ=data-Ref=1-Base=octet-Len=0-Dur=static-Lbd=1-Val=kt1240-in-interface-Loc=298)
       $80(Lin=203-Col=10-Fil=1-Id=469-Typ=data-Ref=1-Base=octet-Len=0-Dur=temporary-Least=1-Ubd=1-Val=$80-Loc=792)
Warnungen in de027.cob(Lin=1-Col=5-Fil=1-Typ=Error)
 de027 (Lin=1-Col=5-Fil=1-Typ=Error)
  E1 Ana4007? Verlust der Genauigkeit bei kt1240-h-tab(Lin=20

[ Seitenstruktur0.237Drucken  ]