home *** CD-ROM | disk | FTP | other *** search
/ Power-Programmierung / CD1.mdf / xbase / tools / dbt / dbt.doc next >
Text File  |  1993-07-28  |  77KB  |  1,429 lines
  1. U1EG
  2.      ┌─────────────────────────────────────────────────────────────────────────┐
  3.      │           IF                 DO CASE                                    │
  4.      │        ELSE                     CASE                                    │
  5.      │         DO WHILE                  DO WHILE                              │
  6.      │               EXIT                   RETURN                             │
  7.      │        ENDIF                    CASE                                    │
  8.      │         ENDDO                     ENDDO                                 │
  9.      │                              ENDDO                                      │
  10.      │                                                                         │
  11.      │  Chaos  ERROR  Fehler  Nichts geht mehr !  WARUM ???  WO ???            │
  12.      └─────────────────────────────────────────────────────────────────────────┘
  13.  
  14.  
  15.              ╔═════════════╗     ╔═════════════╗    ╔═══════════════╗
  16.              ║ ╔═════════╗ ╚═╗   ║ ╔═════════╗ ╚╗   ╚══════╗ ╔══════╝
  17.              ║ ║         ╚═╗ ║   ║ ║         ╚╗ ║          ║ ║
  18.              ║ ║           ║ ║   ║ ║          ║ ║          ║ ║
  19.              ║ ║           ║ ║   ║ ║         ╔╝ ║          ║ ║
  20.              ║ ║           ║ ║   ║ ║       ╔═╝ ╔╝          ║ ║
  21.              ║ ║           ║ ║   ║ ╚═══════╝ ╔═╝           ║ ║
  22.              ║ ║           ║ ║   ║ ╔═══════╗ ╚═╗           ║ ║
  23.              ║ ║           ║ ║   ║ ║       ╚═╗ ╚╗          ║ ║
  24.              ║ ║           ║ ║   ║ ║         ╚╗ ║          ║ ║
  25.              ║ ║           ║ ║   ║ ║          ║ ║          ║ ║
  26.              ║ ║         ╔═╝ ║   ║ ║         ╔╝ ║          ║ ║
  27.              ║ ╚═════════╝ ╔═╝   ║ ╚═════════╝ ╔╝          ║ ║
  28.              ╚═════════════╝     ╚═════════════╝           ╚═╝
  29.  
  30.      ┌─────────────────────────────────────────────────────────────────────────┐
  31.      │                                                                         │
  32.      │  ┌─IF       ┌─DO CASE       ┌─DO WHILE     ┌─PROCEDURE   ┌─FUNCTION     │
  33.      │  ├──ELSE    ├───CASE        ├──LOOP        ┼───RETURN    │              │
  34.      │  └─ENDIF    ├──OTHERWISE    ┼──EXIT        └─RETURN      └─RETURN       │
  35.      │             └─ENDCASE       └─ENDDO                                     │
  36.      │                                                                         │
  37.      │                                                                         │
  38.      │      ┌─DO WHILE             HAUPT──┬──STADAVER─┬──KUNMOD                │
  39.      │      │  ┌─DO CASE                  │           ├──ARTMOD                │
  40.      │      │  ├─CASE                     │           ├──TEXMOD                │
  41.      │      │  │  ┌─IF                    │           ├──PARMOD                │
  42.      │      │  │  ├──ELSE                 │           └──OPOMOD                │
  43.      │      │  │  └─ENDIF                 ├──STADAANZ─┬──KUNANZ                │
  44.      │      │  ├─CASE                     │           ├──ARTANZ                │
  45.      │      │  │  ┌─IF                    │           ├──TEXANZ                │
  46.      │      │  │  ├──ELSE                 │           └──PARANZ                │
  47.      │      ┼──┼──┼──EXIT                 ├──FAKTURA──┬──ERFASS───┬──SUCHEN    │
  48.      │      │  │  └─ENDIF                 │           │           ├──SUCHEN    │
  49.      │      │  ├─OTHERWISE                │           │           └──SUCHEN    │
  50.      │      │  │  ┌─IF                    │           ├──DRUCK                 │
  51.      │      ├──┼──┼──LOOP                 │           └──AKTUAL                │
  52.      │      │  │  └─ENDIF                 ├──OFFPOS                            │
  53.      │      ┼──┼──────RETURN              ├  LAGER                             │
  54.      │      │  └─ENDCASE                  └──SICHERN                           │
  55.      │      └─ENDDO                                                            │
  56.      └─────────────────────────────────────────────────────────────────────────┘
  57.  
  58.      ╔═════════════════════════════════════════════════════════════════════════╗
  59.      ║  ╔═══════════════════════════════════════════════════════════════════╗  ║
  60.      ║  ║      d B a s e I I I  /  C L I P P E R  -  P r o g r a m m -      ║  ║
  61.      ║  ║                 S t r u k t u r - T e s t e r                     ║  ║
  62.      ║  ║        + D o k u m e n t a t i o n s  -  P r o g r a m m          ║  ║
  63.      ║  ╚═══════════════════════════════════════════════════════════════════╝  ║
  64.      ║              DBT-Version 3.0   Copyright 1989-  VoG                     ║
  65.      ║                      DBT-Small-Version                                  ║
  66.      ╚═════════════════════════════════════════════════════════════════════════╝
  67.      ╔═════════════════════════════════════════════════════════════════════════╗
  68.      ║ G ╔═══════════════════════════════════════════════════════════════════╗ H ║
  69.      ║ G ║      d B a s e I I I  /  C L I P P E R  -  P r o g r a m m -      ║ H ║
  70.      ║ G ║                 S t r u k t u r - T e s t e r                     ║ H ║
  71.      ║ G ║        + D o k u m e n t a t i o n s  -  P r o g r a m m          ║ H ║
  72.      ║ G ╚═══════════════════════════════════════════════════════════════════╝ H ║
  73.      ║              DBT-Version 3.0   Copyright 1989-  VoG                     ║
  74.      ║ G                    DBT-Small-Version                              H     ║
  75.      ╠═════════════════════════════════════════════════════════════════════════╣
  76.      ║                                                                         ║
  77.      ║   GDBTH untersucht Ihr GdBase/Clipper-ProgrammH auf GStruktur-Fehler.H        ║
  78.      ║                                                                         ║
  79.      ║   Jeder GStruktur-BlockH beginnt mit einer GStruktur-EröffnendenH           ║
  80.      ║   Anweisung und GmussH mit der entsprechenden GStruktur-SchließendenH       ║
  81.      ║   Anweisung enden. GInnerhalb eines Struktur-BlockesH sind nur die        ║
  82.      ║   zu Gdiesem Struktur-Block gehörenden AnweisungH und Gneue Struktur-H      ║
  83.      ║   GEröffnende und Struktur-Schließende AnweisungenH zulässig.             ║
  84.      ║                                                                         ║
  85.      ║   Die in Klammern stehenden Struktur-Anweisungen sind wahlweise:        ║
  86.      ║                                                                         ║
  87.      ║ G  ┌─IF        ┌─DO WHILE    ┌─DO CASE       ┌─PROCEDURE   ┌─FUNCTION  H  ║
  88.      ║ G  ├──(ELSE)   ├──(LOOP)     ├───CASE        ┼───RETURN    │           H  ║
  89.      ║ G  └─ENDIF     ┼──(EXIT)     ├──(OTHERWISE)  └─RETURN      └─RETURN    H  ║
  90.      ║ G              └─ENDDO       └─ENDCASE                                 H  ║
  91.      ║                                                                         ║
  92.      ║   GFehlerH in einer Struktur werden mit der GStruktur-EröffnendenH          ║
  93.      ║   Anweisung und Gder AnweisungH ausgewiesen, bei der der GStruktur-H        ║
  94.      ║   GverstoßH erkannt wurde.                                                ║
  95.      ║                                                                         ║
  96.      ║   Aufruf DBT                                                            ║
  97.      ║                                                                         ║
  98.      ║   GDBT (name.ext) (/param) H                                              ║
  99.      ║                                                                         ║
  100.      ║   Gname.ext:H Name des zu testenden Programms.                            ║
  101.      ║             wildcard's (* / ?) in name führt zum Test aller             ║
  102.      ║             zutreffenden Programme.                                     ║
  103.      ║                                                                         ║
  104.      ║   G/param :H  über Parameter kann der Struktur-Test und die weitere       ║
  105.      ║             Verarbeitung beeinflusst werden.                            ║
  106.      ║                                                                         ║
  107.      ║   G R H    =  RETURN innerhalb von Strukturen werden nicht ausgewertet.   ║
  108.      ║             Ein RETURN führt sonst zur Überprüfung von offenen          ║
  109.      ║             Strukturen.                                                 ║
  110.      ║                                                                         ║
  111.      ║                                                                         ║
  112.      ║                                                                         ║
  113.      ║   G P H    =  Struktuierte Druckausgabe (CTRL-P oder >filename)           ║
  114.      ║      N     =  ohne Ausgabe der Satznummer                               ║
  115.      ║                                                                         ║
  116.      ║   G C H    =  Ausgabe nur der Struktur-Blöcke                             ║
  117.      ║                                                                         ║
  118.      ║   G E H    =  Ausgabe der Verarbeitungs-Zeiten                            ║
  119.      ║                                                                         ║
  120.      ║   G T H    = T ist der 1. Parameter des Autoren gewesen, weil er          ║
  121.      ║                  nicht glaubte, daß sein Struktur-Analyse-Programm      ║
  122.      ║                  so schnell ist.                                        ║
  123.      ║                                                                         ║
  124.      ║                                                                         ║
  125.      ║                                                                         ║
  126.      ║                                                                         ║
  127.      ╠═════════════════════════════════════════════════════════════════════════╣
  128.      ║                                                                         ║
  129.      ║ G  DBT benötigt zur Analyse von   1.000 Zeilen   5    Sekunden.     H     ║
  130.      ║ G           ( 200 Zeilen pro Sekunde auf einem IBM/XT)              H     ║
  131.      ║                                                                         ║
  132.      ╚═════════════════════════════════════════════════════════════════════════╝
  133.  
  134.  
  135.  
  136.  
  137.  
  138.  
  139.  
  140.         EG  Inhaltsverzeichnis:
  141.           -------------------
  142.  
  143.  
  144.  
  145.  
  146.              Struktuierte Programmiermethode                    1
  147.  
  148.              DBT, die kleine schnelle Hilfe                     3
  149.  
  150.              DBT als Struktur-Tester                            5
  151.  
  152.         *    DBT als Dokumentations-System                      6
  153.  
  154.         *    Erläuterunge zu den Ausgaben                       7
  155.  
  156.         *    Test- und Dokumentations-Lauf                      9
  157.  
  158.  
  159.  
  160.  
  161.  
  162.  
  163.  
  164.  
  165.  
  166.  
  167.  
  168.  
  169.  
  170.  
  171.          *    Die XREF - Funktionen sind nur in der
  172.               erweiterten DBT-Version erhalten.
  173.  
  174.               Informationen über die DBT-full-Version können beim
  175.               Autoren angefordert werden.
  176.  
  177.  
  178.  
  179.  
  180.          dBase und Clipper sind geschützte Produktnamen.
  181.  
  182.  
  183.  
  184.  
  185.          DBT ist ein Produkt von VoG
  186.  
  187.  
  188.          DBT ist unter DOS > Version 2.0 ablauffähig und mit
  189.          Sourcen der dBase IV Plus und Clipper 86 getestet.
  190.  
  191.  
  192.  
  193.  
  194.  
  195. U1A
  196.         ──────────────────────────────────────────────────────
  197.        ──────────────────────────────────────────────────────
  198.       ──────────────────────────────────────────────────────
  199.      ┌─────────────────────────────────────────────────────
  200. U1A
  201.  
  202.      │ GV.Gülke, Gieseckenkamp 6a, D-3012 Langenhagen 1  H
  203. U1A     └─────────────────────────────────────────────────────
  204. U1A
  205.  
  206. U1
  207.  
  208. H
  209.                                                                          1.
  210.  
  211.  
  212.      EGStruktuierte Programmier-Methoden.
  213.      EG----------------------------------H
  214.  
  215.  
  216.      Die Struktuierten Programmier-Methoden bieten Sprachelemente, mit denen
  217.      ein Programmierer sein Programm in Funktions-Blöcke aufteilen kann.
  218.  
  219.  
  220.      In  den   Sprachelementen  für   logische  Entscheidungen   oder  Fall-
  221.      unterscheidungen  werden  per  Funktionsaufruf  oder  Verzweigung   mit
  222.      Rückkehr hinter die Verzweigung der Funktions-Block aufgerufen.
  223.  
  224.  
  225.      Weitere Sprachelemente erlauben eine Wiederholung von Funktionsaufrufen
  226.      begrenzt durch eine Anzahl oder durch eine logische Entscheidung.
  227.  
  228.  
  229.      Der Beginn  eines Funktions-Blocks  ist immer  durch einen  eindeutigen
  230.      Namen  gekennzeichenet.   Der  Funktions-Block  kann ein Programm, eine
  231.      Procedure oder eine Function sein.  Das Ende eines Funktions-Blocks ist
  232.      durch ein Return, eine andere  Procedure oder Funktion, oder durch  das
  233.      Ende des Programms gekennzeichenet.
  234.  
  235.  
  236.      Bei den logischen Entscheidungen, Fallunterscheidungen,  Wiederholungen
  237.      wird der Beginn  der Struktur durch  Struktur-eröffnende Sprachelemente
  238.      und  das  Ende  der  Struktur durch Struktur-schließende Sprachelemente
  239.      eindeutig gekennzeichenet und ergibt einen Struktur-Block.
  240.  
  241.  
  242. G
  243.     ┌─────────────────────────────────────────────────────────────────────┐
  244.     │                                                                     │
  245.     │ ┌─IF       ┌─DO CASE       ┌─DO WHILE     ┌─PROCEDURE   ┌─FUNCTION  │
  246.     │ ├──ELSE    ├──CASE         ├──LOOP        ┼───RETURN    │           │
  247.     │ └─ENDIF    ├──OTHERWISE    ┼──EXIT        └─RETURN      └─RETURN    │
  248.     │            └─ENDCASE       └─ENDDO                                  │
  249.     └─────────────────────────────────────────────────────────────────────┘
  250.      Tabelle der in dBase / Clipper geltenden Sprachelemente
  251.      für Struktur-Blöcke. H
  252.  
  253.  
  254.      Innerhalb von logischen  Entscheidungen oder Fallunterscheidungen  gibt
  255.      es noch den Gültigkeitsbereich der Entscheidung.
  256.  
  257.      Beim IF-Struktur-Block (logische  Entscheidung) liegt der  Gültigkeits-
  258.      bereich für  die WAHR-Entscheidung  zwischen IF  und ELSE,  die FALSCH-
  259.      Entscheidung  zwischen  ELSE  und  ENDIF.   Beim DO CASE-Struktur-Block
  260.      (Fallunterscheidung)   liegt   der   Gültigkeitsbereich   zwischen  dem
  261.      zutreffenden CASE und  dem nächsten CASE  oder OTHERWISE oder  ENDCASE,
  262.      oder  dem  zutreffenden  OTHERWISE   und  dem  ENDCASE.   Bei   der  DO
  263.      CASE-Struktur  ist  noch  zu  berücksichtigen,  daß  immer  nur  der 1.
  264.      zutreffende CASE ausgeführt wird.
  265.  
  266.                                                                          2.
  267.  
  268.  
  269.  
  270.  
  271.  
  272.      Beim  DO  WHILE-Struktur-Block  führt  die ENDDO-und LOOP-Anweisung zum
  273.      Beginn der  Struktur, der  DO WHILE-Anweisung.   Der DO WHILE-Struktur-
  274.      Block wird sooft durchlaufen,  bis die DO WHILE-Bedingung  erfüllt ist,
  275.      oder die DO WHILE-Schleife durch eine EXIT-Anweisung beendet wird.
  276.  
  277.  
  278.      Der RETURN  innerhalb von  Struktur-Blöcken beendet  immer rigoros  den
  279.      Funktions-Block.
  280.  
  281.  
  282.      Innerhalb  der  Struktur-Blöcke  und  Gültigkeitsbereiche können weiter
  283.      Struktur-Blöcke  aufgerufen  werden.    So  kann  z.B.   innerhalb  des
  284.      WAHR-Zweiges   einer   IF-Struktur   ein   weiterer  IF-Struktur-Block,
  285.      innerhalb  eines  OTHERWISE-Falls  ein  weiterer DO CASE-Struktur-Block
  286.      aufgerufen werden.
  287.  
  288.  
  289.      Eine  Verschachtelung  aller  Struktur-Blöcke  untereinander  ist somit
  290.      möglich.
  291.  
  292.  
  293.      Nun  ergibt  sich  allerdings  das  Problem,  daß  bei  verschachtelten
  294.      Struktur- Blöcken zwar der Beginn eines Struktur-Blocks eindeutig  ist,
  295.      daß  aber  oft  das  dazugehörende  Ende  des  Struktur-Blocks nicht so
  296.      eindeutig zu identifizieren ist.  Bei verschachtelten IF-Strukturen ist
  297.      oft das dazugehörende ELSE und ENDIF nicht so leicht zu bestimmen.  Ein
  298.      an einer falschen  Stelle gesetztes ELSE  verändert sofort die  gesamte
  299.      logische   Struktur.     Ebenso   führen    fehlende   oder    doppelte
  300.      Struktur-Ende-Anweisungen zur Veränderung der logischen Struktur.   Oft
  301.      erkennen  die  programmausführenden  Produkte  diese  Struktur-Verstöße
  302.      nicht oder melden sie nicht bei der Programmausführung.  Solche  Fehler
  303.      werden  meistens  erst  nach  langwierigen  Testen aufgedeckt oder nach
  304.      zeitaufwendigen Kompilierungen gemeldet.
  305.  
  306.  
  307.      Die   optimale   Lösung   wäre   ein   Editor,   der   solche einfachen
  308.      Struktur-Teste  durchführen  kann  und  die  Struktur-Verstöße   sofort
  309.      anzeigt.
  310.  
  311.  
  312.                                                                          3.
  313.  
  314.      EG
  315.      EGD B T , die kleine schnelle Hilfe !
  316.      EG-----------------------------------H
  317.  
  318.  
  319.  
  320.      DBT  ist   als  Hilfsmittel   für  die   Programmierung  als  schneller
  321.      Struktur-Tester entwickelt worden.
  322.  
  323.      Sie schreiben oder ändern ihr Programm mit einem herkömmlichen  Editor.
  324.      Vor dem Struktur-Test schreiben Sie  Ihr Programm zurück und rufen  DBT
  325.      über  die  DOS-Schnittstelle  oder  direkt  im DOS auf.  DBT untersucht
  326.      jetzt Ihr  Programm blitzartig  nach Struktur-Fehlern  und meldet jeden
  327.      Verstoß   mit   der   Struktur-Eröffnenden   Zeile/Zeilen-Nr.   und der
  328.      Zeile/Zeilen-Nr.,   bei   dem   der   Struktur-Verstoß   erkannt wurde.
  329.      Gleichfalls können  aber auch  Hinweise auf  unlogische Anwendungen  in
  330.      Struktur-Blöcken gemeldet werden.
  331.  
  332.  
  333. ┌────────────────────────────────────────────────────────────────────────────┐
  334. │ Source filename: dbterr.prg                                                │
  335. │                                                                            │
  336. │ Line:    8     Struktur-Beginn.                                            │
  337. │ do case Auswahl                                                            │
  338. │ Line:    9  >> OTHERWISE nach DO CASE                                      │
  339. │    otherwise                                                               │
  340. │ Line:    8     Struktur-Beginn.                                            │
  341. │ do case Auswahl                                                            │
  342. │ Line:   11  >> ENDCASE ohne CASE                                           │
  343. │ endcase                                                                    │
  344. │ Line:   14     Struktur-Beginn.                                            │
  345. │    If                                                                      │
  346. │ Line:   17  >> ELSE doppelt                                                │
  347. │     else                                                                   │
  348. │ Line:   14     Struktur-Beginn.                                            │
  349. │    If                                                                      │
  350. │ Line:   18  >> ELSE doppelt                                                │
  351. │   else                                                                     │
  352. │ Line:    7     Struktur-Beginn.                                            │
  353. │ do while                                                                   │
  354. │ Line:   21  >> ENDDO fehlt                                                 │
  355. │                                                                            │
  356. │Source filename: dbterr.prg       5       Struktur-Fehler erkannt !!!       │
  357. └────────────────────────────────────────────────────────────────────────────┘
  358.  
  359.      GBeispiel: Struktur-Analyse:H
  360.      ---------------------------
  361.  
  362.      Der  Struktur-Fehler  kann  somit  aufgrund  der Zeilen-Nr. sofort nach
  363.      Rückkehr in den Editor behoben werden.
  364.  
  365.      Die  Ausgabe  des  Fehlerprotokolls  kann  per  CTL-P  auf  den Drucker
  366.      geleitet oder per DOS-Umleitung > in eine Datei geschrieben werden.
  367.  
  368.      Weiter bietet DBT  die Möglichkeit die  Struktur-Blöcke oder das  ganze
  369.      Programm struktuiert aufbereitet auszugeben.
  370.  
  371.                                                                          4.
  372. ╔══════════════════════════════════════════════════════╦══VoG═════════════════╗
  373. ║ dbterr.prg     1990.07.22 - 19:47                    ║   Datum: 1990.07.22  ║
  374. ╟──────────────────────────────────────────────────────╢   Zeit :   16:47:47  ║
  375. ║ dbterr.prg                                           ║                      ║
  376. ╚══════════════════════════════════════════════════════╩══D-B-T══(C)-VoG═1989═╝
  377.                                          dbterr.prg              Seite:      1
  378.    1  ***********************************************************************
  379.    2  * Programm    : DBTERR.PRG
  380.    3  * Titel       : DBT-Test- und Demo-Programm
  381.    4  * Version     : 2.1
  382.    5  *             : ein paar alltägliche Probleme
  383.    6  ***********************************************************************
  384.    7  ┌─do while
  385.    8  │ ┌─do case Auswahl
  386.    9  │ ├─otherwise
  387. >> OTHERWISE nach DO CASE
  388.   10  ┼─│─exit
  389.   11  │ └─endcase
  390. >> ENDCASE ohne CASE
  391.   12  │ ┌─do while
  392.   13  │ │ ┌─if
  393.   14  │ │ │ ┌─If
  394.   15  │ │ │ ├─else
  395.   16  │ │ │ │ lf
  396.   17  │ │ │ ├─else
  397. >> ELSE doppelt
  398.   18  │ │ │ ├─else
  399. >> ELSE doppelt
  400.   19  │ │ │ └─endif
  401.   20  │ │ └─endif
  402.   21  │ └─enddo
  403. >> ENDDO fehlt
  404.  
  405. └────────────────────────────────────────────────────────────────────────────┘
  406.      GBeispiel: Struktur-Analyse mit struktuierter Ausgabe:H
  407.      -----------------------------------------------------
  408.  
  409. ┌────────────────────────────────────────────────────────────────────────────┐
  410. │>> THEN / ELSE / ENDIF ohne IF   >> CASE / OTHERWISE / ENDCASE ohne DO CASE │
  411. │>> THEN doppelt                  >> CASE nach OTHERWISE                     │
  412. │>> THEN nach ELSE                >> CASE nach ENDCASE                       │
  413. │>> THEN nach ENDIF               >> OTHERWISE nach DO CASE                  │
  414. │>> ELSE nach IF                  >> OTHERWISE doppelt                       │
  415. │>> ELSE doppelt                  >> OTHERWISE nach ENDCASE                  │
  416. │>> ELSE nach ENDIF               >> ENDCASE ohne CASE                       │
  417. │>> ENDIF ohne THEN               >> ENDCASE doppelt                         │
  418. │>> ENDIF fehlt                   >> ENDCASE fehlt                           │
  419. │>> ENDDO ohne DO WHILE                                                      │
  420. │>> LOOP / EXIT ohne DO WHILE                                                │
  421. │>> ENDDO doppelt                                                            │
  422. │>> ENDDO fehlt                                                              │
  423. │                                                                            │
  424. │>> Mehr als 128 Struktur-Ebenen eroeffnet.                                  │
  425. │>> PROCEDURE und noch offnene Strukturen                                    │
  426. │>> PARAMETER und noch offnene Strukturen                                    │
  427. │>> FUNCTION/RETURN  und noch offnene Strukturen                             │
  428. │>> RETURN und noch offnene Strukturen                                       │
  429. │>> Ende Programm und noch offnene Strukturen                                │
  430. └────────────────────────────────────────────────────────────────────────────┘
  431.      GMeldungen des Struktur-Tester DBT: H
  432.      ----------------------------------
  433.  
  434.      Der erfolgreiche Test wird mit:G   K e i n e  Struktur-Fehler erkannt !!H
  435.      gemeldet.
  436.  
  437.  
  438.  
  439.                                                                          5.
  440.      EGDBT als Struktur-Tester.
  441.      EG------------------------H
  442.  
  443.      DBT wird  mit dem  Namen des  zu testenden  Programms aufgerufen.  Über
  444.      Zusatz-Parameter, die mit einem / beginnen und hinter dem Programmnamen
  445.      stehen müssen, können gesonderte Programmfunktionen ausgewählt  werden.
  446.      Hinter den Parametern können weiter die DOS-Umleitungs- Symbole  <name,
  447.      >name verwendet werden.
  448.  
  449.      Format des Aufrufes:
  450.  
  451.      GDBT (name.ext) (/parameter) (<name >name)H
  452.  
  453.  
  454.        Gname.extH    Der Name des Programms wird vollqualifiziert mit .ext
  455.                    angegeben.
  456.                    Wildcard's (* oder ?) im Namen führt zum Testen aller
  457.                    zutreffenden Programme.
  458.  
  459.        G/parameterH  über Parameter kann der Struktur-Test beeinflußt werden.
  460.  
  461.  
  462.            GRH     = der RETURN innerhalb von Strukturen führt zur Fehler-
  463.                    meldung: RETURN und noch  offene Strukturen.  Mit R  wird
  464.                    der Test auf offene Strukturen bei RETURN  ausgeschaltet.
  465.                    Unabhängig von RETURN wird immer bei Programm-Ende, neuer
  466.                    Funktion  und  neuer  Procedure  immer  ein Test auf noch
  467.                    offene Strukturen durchgeführt.
  468.  
  469.            GPH     = Struktuierte Ausgabe des Programms.
  470.                    Die struktuierte Ausgabe des Programms dient dem besseren
  471.                    und    schnelleren    Erkennen    von    Strukturen   und
  472.                    Struktur-Ebenen.  Logische Fehler können somit  erheblich
  473.                    schneller gefunden  werden.  Die  Ausgabe kann  per CTL-P
  474.                    oder >filename umgeleitet werden.
  475.  
  476.                N = Ausgabe ohne Satznummer.
  477.  
  478.            GCH     = Ausgabe nur der Struktur-Blöcke.
  479.                    Die Ausgabe nur der Struktur-Anweisungen macht ein großes
  480.                    Programm  mit  vielen  logischen  Entscheidungen zu einem
  481.                    kleinen übersichtlichen Struktogramm.
  482.  
  483.            GEH     = Ausgabe der Zeit-Statistik.
  484.                    die Zeitstatistik beinhaltet 3 Messpunkte.
  485.                    1. Beginn Laden des Programms.
  486.                    2. Beginn Struktur-Test
  487.                    3. Ende   Struktur-Test
  488.  
  489.                    Die Zeitstatistik weist alle 3 Messzeiten in der Form
  490.                    Stunde/Minuten/Sekunde/1/100-Sekunde aus.
  491.                    Die 2.Zeile weist die jeweiligen Differenzen zwischen
  492.                    1 + 2 und 2 + 3 aus.
  493.  
  494.            GTH     = T ist der 1. Parameter des Autoren gewesen, weil er
  495.                    nicht glaubte, daß sein Programm wirklich so schnell ist.
  496.  
  497.  
  498.                                                                          6.
  499.      EGDBT als Dokumentations-System.
  500.      EG------------------------------H
  501.  
  502.      DBT  ist,  aufgrund  der  hohen  Verarbeitungsgeschwindigkeit, zu einem
  503.      Programm-Dokumentations-System erweitert worden.
  504.  
  505.      Über Parameter beim Aufruf von DBT können verschiedene  Dokumentations-
  506.      Funktionen aufgerufen werden.
  507.  
  508.      1. Test und Dokumentation eines gesamten Programm-Systems.
  509.         Beim Aufruf wird nur der Name des Haupt-Programmes angegeben.
  510.  
  511.      2. Cross-reference über die in einem Programm verwendeten Namen
  512.         mit Ausgabe in sortierter Reihenfolge.
  513.  
  514.      3. Cross-reference über alle Programme, DO-Aufrufe und Proceduren.
  515.         sowohl vorwärts:
  516.                in Programm abc wird per DO die Procedure xyz aufgerufen.
  517.         als auch rückwärts:
  518.                Procedure xyz wird aus Programm abc per DO aufgerufen.
  519.  
  520.      4. Cross-reference über alle Datenbank-Aufruf und SET INDEX-Aufrufe.
  521.  
  522.      5. Graphische Aufbereitung der Programm-Struktur über die DO-Aufrufe.
  523.  
  524.      6. Ausgabe der Datenbank-Definitionen.
  525.  
  526.  
  527.      Format des Aufrufes:
  528.  
  529.      GDBT (name.ext) (/parameter) (<name >name)H
  530.  
  531.  
  532.        Gname.extH    Vollqualifizierter Programm-Name vom Hauptprogramm
  533.                        des zu dokumentierenden Programm-Systems.
  534.  
  535.        G/parameterH  über Parameter kann die Dokumentation beeinflußt werden.
  536.  
  537.            GDH     = automatisches Dokumentieren aller Programme, die über
  538.                    DO, SET KEY oder SET PROCEDURE TO aufgerufen werden.
  539.  
  540.            GFH     = Ausgabe der XREF über die im Programm verwendeten
  541.                    Namen. Über die DBTELIM.TAB können Namen von der XREF
  542.                    ausgeschlossen werden. Hauptsächlich sollten die dBase-
  543.                    Befehle und Anweisungen eliminiert werden.
  544.  
  545.                L = ausschalten des Vergleiches: Upper = Lower
  546.  
  547.                U = die Feld-XREF erfolgt unsortiert.
  548.  
  549.            GBH     = Ausgabe der XREF über die im Programm-System verwendeten
  550.                    USE databases INDEX. Gleichzeitig werden auch in der
  551.                    Programm-XREF die SET INDEX TO  mitgezeichent
  552.                    Bei der Feld-XREF werden zusätzlich auch die Datenbank-
  553.                    Definitionen ausgedruckt.
  554.  
  555.            GOH     = Ausgabe der gesamten Dokumentation in eine File.
  556.                    Der Filename der Dokumetations-Datei wird angefordert.
  557.            GO=H    = Die Ausgabedatei wird mit name.DBT gebildet.
  558.  
  559.            GXH     = Ausgabe nur der XREF / ZREF / GREF.
  560.  
  561.            GGH     = Ausgabe nur der GREF.
  562.  
  563.            GAH     = Ausgabe der Source struktuiert.
  564.                        Das Programm wird vorher unter name.SAV gesichert.
  565.                                                                         7.
  566. EGErläuterungen zu den Ausgaben:H
  567. EG------------------------------H
  568. :%&<<Ç %&;;Ç<Z%&>>Ç @ @ 
  569.  
  570. EGProgramm-Kopf:H
  571.  
  572.   Programm-      Programm                               Datum der Dokumentation
  573.   < Name         < Datum      < Zeit                    Zeit      <
  574. ╔══════════════════════════════════════════════════════╦══VoG═════════════════╗
  575. ║ STADAANZ.PRG   1980.01.01 - 04:34                    ║   Datum: 1990.08.06  ║
  576. ╟──────────────────────────────────────────────────────╢   Zeit :   16:01:13  ║
  577. ║ STADAANZ.PRG                                         ║                      ║
  578. ╚══════════════════════════════════════════════════════╩══D-B-T══(C)-VoG═1989═╝
  579.   > Haupt-
  580.   Programm
  581.  
  582.  
  583. EGSortierte Feld-XREF:H
  584.  
  585.       < Feldname         :   < Zeilen-Nr., in der der Name auftritt
  586.  
  587.       FILE               :   45,  52,  59,  66
  588.  
  589.       Die Feld-XREF ist alpha-numerisch aufsteigend sortiert, wobei die
  590.       kleinen und großen Buchstaben gleich betrachtet werden.
  591.  
  592.  
  593. EGCross-reference: Vorwärts-VerweiseH
  594.  
  595.              < Aufruf-Parameter
  596. ╔══════════════════════════════════════════════════════╦══VoG═════════════════╗
  597. ║ HAUPT.PRG /drfbeo                                    ║   Datum: 1990.08.06  ║
  598. ╟──────────────────────────────────────────────────────╢   Zeit :   16:02:13  ║
  599. ║                   X-R-E-F                            ║                      ║
  600. ╚══════════════════════════════════════════════════════╩══D-B-T══(C)-VoG═1989═╝
  601.                                                                  Seite:      1
  602.   XREF zeigt die
  603.     1. im Programm definierten Procedure (PR) und Function (FC)
  604.     2. vom Programm auszuführenden DO- und SET KEY (SK)-Aufrufe mit
  605.            Name und (in)-Programm-Name, zu dem verzweigt wird.
  606.  
  607.                                                             Kein Fehler : N
  608.                                                                  Fehler : Y
  609.                                                            Datei-Fehler : E
  610. ┌────────────┬──────────┬──────┬────┬────────────┬──────────────┬──────┬─────┐
  611.  Programm      Datum      Zeit  Typ  Name in / aus Programm      Zeilen Error
  612. ├────────────┼──────────┼──────┼────┼────────────┼──────────────┼──────┼─────┤
  613.  HAUPT        1980.01.01 07:28  PG                                 130    N
  614.                                           Anzahl Zeilen im Programm  >    >
  615.                                           Keine Strukturfehler im Programm>
  616.  
  617.                                   DO   STADAVER     STADAVER        92
  618.                     DO-Name ist gleich (in)-Programmname   >
  619.                                           Aufruf erfolgt in Zeile    >
  620.  
  621.                                   DO   STADAANZ     STADAANZ        99
  622.                                   DO   LAGER                       120    E
  623.                                        Programm LAGER.PRG nicht gefunden  >
  624.  
  625. ├────────────┼──────────┼──────┼────┼────────────┼──────────────┼──────┼─────┤
  626.  ERFASS       1987.10.25 14:11  PG                                 433    N
  627.                                   DB   ARTIKEL                      13
  628.         use ARTIKEL index ARTIKEL <>
  629.                                   SX   ARTIKEL                      13
  630. └────────────┴──────────┴──────┴────┴────────────┴──────────────┴──────┴─────┘
  631. %
  632.                                                                          8.
  633.  
  634. EGCross-reference: Rückwärts-VerweiseH
  635. :%&<<Ç %&;;Ç<Z%&>>Ç @ @ 
  636.  
  637. ╔══════════════════════════════════════════════════════╦══VoG═════════════════╗
  638. ║ HAUPT.PRG /drfbeo                                    ║   Datum: 1990.08.06  ║
  639. ╟──────────────────────────────────────────────────────╢   Zeit :   16:02:14  ║
  640. ║                   Z-R-E-F                            ║                      ║
  641. ╚══════════════════════════════════════════════════════╩══D-B-T══(C)-VoG═1989═╝
  642.                                                                  Seite:      1
  643.   ZREF zeigt,
  644.        von welchem (aus)-Programm
  645.            das Programm, die Procedure (PR), die Function (FC)
  646.            mit DO- oder SET KEY (SK)-Aufruf und Namen
  647.        aufgerufen wird.
  648.  
  649. ┌────────────┬──────────┬──────┬────┬────────────┬──────────────┬──────┬─────┐
  650.  Programm      Datum      Zeit  Typ  Name in / aus Programm      Zeilen Error
  651. ├────────────┼──────────┼──────┼────┼────────────┼──────────────┼──────┼─────┤
  652.  STADAVER     1980.01.01 01:46  PG                                  78    N
  653.                                   DO   STADAVER     HAUPT           92
  654.  >                                >    >            >                >
  655.  Das Programm STADAVER wird per   DO   STADAVER     aus dem Programm
  656.                                                     HAUPT in Zeile  92
  657.  aufgerufen.
  658. └────────────┴──────────┴──────┴────┴────────────┴──────────────┴──────┴─────┘
  659.  
  660.  
  661. EGCross-reference: Datenbanken:H
  662.  
  663. ╔══════════════════════════════════════════════════════╦══VoG═════════════════╗
  664. ║ HAUPT.PRG /drfbeo                                    ║   Datum: 1990.08.06  ║
  665. ╟──────────────────────────────────────────────────────╢   Zeit :   16:02:15  ║
  666. ║                   D-R-E-F                            ║                      ║
  667. ╚══════════════════════════════════════════════════════╩══D-B-T══(C)-VoG═1989═╝
  668.                                                                  Seite:      1
  669. ┌────────────┬──────────┬──────┬────┬────────────┬──────────────┬──────┬─────┐
  670.  Datenbank                      Typ  Name   in     Programm      Zeile
  671. ├────────────┼──────────┼──────┼────┼────────────┼──────────────┼──────┼─────┤
  672.  OFFPOS                         DB     OFFPOS       OFFPOS          15
  673.                                 DB     OFFPOS       OPOMOD          13
  674.                                 DB     OFFPOS       AKTUAL          84
  675.                                 DB     OFFPOS       AKTUAL          91
  676.  >                                                  >               >
  677.  die Datenbank OFFPOS wird               im Programm        in Zeile
  678.  aufgerufen.
  679. └────────────┴──────────┴──────┴────┴────────────┴──────────────┴──────┴─────┘
  680.  
  681.  
  682. EGGraphische Darstellung:H
  683.  
  684. ╔══════════════════════════════════════════════════════╦══VoG═════════════════╗
  685. ║ HAUPT.PRG /drfbeo                                    ║   Datum: 1990.08.06  ║
  686. ╟──────────────────────────────────────────────────────╢   Zeit :   16:02:15  ║
  687. ║                   G-R-E-F                            ║                      ║
  688. ╚══════════════════════════════════════════════════════╩══D-B-T══(C)-VoG═1989═╝
  689.                                                                  Seite:      1
  690. HAUPT ruft  <
  691.             <
  692.             <  STADAVER ruft
  693.             <              <
  694. HAUPT───────┬──STADAVER────┬──KUNMOD
  695.             │              ├──ARTMOD
  696.             │              └──OPOMOD
  697.             ├──OFFPOS
  698.             ├  LAGER  ;; LAGER.PRG wurde nicht gefunden (file-error)
  699.             └──SICHERN
  700. %
  701.                                                                          9.
  702.      EGTest- und Dokumentations-Lauf
  703.      EG-----------------------------H
  704.  
  705.      Ausgaben  aus  einem  Test-  und  Dokumentations-Lauf  Programm-System:
  706.      Auftrags-Verwaltung von Herrn Jürgen Pilz.
  707.  
  708.      Aufruf: dbt HAUPT.PRG /derfboa
  709.                             d = DO und Funktionen nachziehen
  710.                             e = Time-Statistik
  711.                             r = RETURN ohne Test auf offene Strukturen
  712.                             f = mit Feld-cross-reference
  713.                             b = mit Daten-Bank-cross-reference
  714.                             o = schreiben Dokumentation in Datei
  715.                                 o= schreibt in name.DBT
  716.                             a = Ausgabe der struktuierten Source
  717.  
  718.  
  719.        Im Programm-System Auftrags-Verwaltung wurden
  720.  
  721.         20 Programm mit 2522 Lines in  67 Sekunden
  722.  
  723.       zu einer vollständigen Dokumentation aufbereitet.
  724.  
  725.  
  726.                                                                           10.
  727. EGSYSLOG mit Zeit-Statistik auf Terminal:H
  728. EG---------------------------------------H
  730.  
  731.   Name der DBTELIM.TAB oder <RETURN> : \user\asm\dbtelim.tab
  732.   Path für DBF-File(s) :
  733.   EXT (.DBF) für DBF-File(s) :
  734.   Filename für Out-File : haupt.dbt
  735.   Source filename: HAUPT.PRG    K e i n e Struktur-Fehler erkannt !
  736.   load/ run/ endtime hh:mm:ss.n/100 = 16:01:07.48  / 16:01:07.75  / 16:01:09.46
  737.   loadtime / runtime hh:mm:ss.n/100 = 00:00:00.27  / 00:00:01.71  / Lines   130
  738.  
  739.   Source filename: STADAVER.PRG   K e i n e Struktur-Fehler erkannt !
  740.   load/ run/ endtime hh:mm:ss.n/100 = 16:01:10.72  / 16:01:11.05  / 16:01:11.87
  741.   loadtime / runtime hh:mm:ss.n/100 = 00:00:00.33  / 00:00:00.82  / Lines    78
  742.  
  743.   Source filename: STADAANZ.PRG   K e i n e Struktur-Fehler erkannt !
  744.   load/ run/ endtime hh:mm:ss.n/100 = 16:01:12.81  / 16:01:13.03  / 16:01:13.80
  745.   loadtime / runtime hh:mm:ss.n/100 = 00:00:00.22  / 00:00:00.77  / Lines    74
  746.  
  747.   Source filename: FAKTURA.PRG   K e i n e Struktur-Fehler erkannt !
  748.   load/ run/ endtime hh:mm:ss.n/100 = 16:01:14.73  / 16:01:15.22  / 16:01:17.09
  749.   loadtime / runtime hh:mm:ss.n/100 = 00:00:00.49  / 00:00:01.87  / Lines    99
  750.  
  751.   Source filename: OFFPOS.PRG   K e i n e Struktur-Fehler erkannt !
  752.   load/ run/ endtime hh:mm:ss.n/100 = 16:01:19.51  / 16:01:19.73  / 16:01:20.00
  753.   loadtime / runtime hh:mm:ss.n/100 = 00:00:00.22  / 00:00:00.27  / Lines    28
  754.  
  755.   Source filename: LAGER.PRG > File problem.
  756.   load/ run/ endtime hh:mm:ss.n/100 = 16:01:20.99  / 16:01:21.10  / 16:01:21.10
  757.   loadtime / runtime hh:mm:ss.n/100 = 00:00:00.11  / 00:00:00.00  / Lines     0
  758.  
  759.   Source filename: SICHERN.PRG   K e i n e Struktur-Fehler erkannt !
  760.   load/ run/ endtime hh:mm:ss.n/100 = 16:01:21.76  / 16:01:21.98  / 16:01:22.20
  761.   loadtime / runtime hh:mm:ss.n/100 = 00:00:00.22  / 00:00:00.22  / Lines    23
  762.  
  763.   Source filename: KUNMOD.PRG   K e i n e Struktur-Fehler erkannt !
  764.   load/ run/ endtime hh:mm:ss.n/100 = 16:01:23.02  / 16:01:23.30  / 16:01:25.93
  765.   loadtime / runtime hh:mm:ss.n/100 = 00:00:00.28  / 00:00:02.63  / Lines   207
  766.  
  767.   Source filename: ARTMOD.PRG   K e i n e Struktur-Fehler erkannt !
  768.   load/ run/ endtime hh:mm:ss.n/100 = 16:01:27.31  / 16:01:27.58  / 16:01:30.38
  769.   loadtime / runtime hh:mm:ss.n/100 = 00:00:00.27  / 00:00:02.80  / Lines   203
  770.  
  771.   Source filename: TEXMOD.PRG   K e i n e Struktur-Fehler erkannt !
  772.   load/ run/ endtime hh:mm:ss.n/100 = 16:01:31.87  / 16:01:32.09  / 16:01:34.12
  773.   loadtime / runtime hh:mm:ss.n/100 = 00:00:00.22  / 00:00:02.03  / Lines   147
  774.  
  775.   Source filename: PARMOD.PRG   K e i n e Struktur-Fehler erkannt !
  776.   load/ run/ endtime hh:mm:ss.n/100 = 16:01:35.16  / 16:01:35.38  / 16:01:36.81
  777.   loadtime / runtime hh:mm:ss.n/100 = 00:00:00.22  / 00:00:01.43  / Lines    83
  778.  
  779.   Source filename: OPOMOD.PRG   K e i n e Struktur-Fehler erkannt !
  780.   load/ run/ endtime hh:mm:ss.n/100 = 16:01:38.18  / 16:01:38.40  / 16:01:39.94
  781.   loadtime / runtime hh:mm:ss.n/100 = 00:00:00.22  / 00:00:01.54  / Lines   143
  782.  
  783.   Source filename: KUNANZ.PRG   K e i n e Struktur-Fehler erkannt !
  784.   load/ run/ endtime hh:mm:ss.n/100 = 16:01:41.04  / 16:01:41.42  / 16:01:43.07
  785.   loadtime / runtime hh:mm:ss.n/100 = 00:00:00.38  / 00:00:01.65  / Lines   156
  786.  
  787.   Source filename: ARTANZ.PRG   K e i n e Struktur-Fehler erkannt !
  788.   load/ run/ endtime hh:mm:ss.n/100 = 16:01:44.55  / 16:01:44.77  / 16:01:45.93
  789.   loadtime / runtime hh:mm:ss.n/100 = 00:00:00.22  / 00:00:01.16  / Lines   107
  790.  
  791.   Source filename: TEXANZ.PRG   K e i n e Struktur-Fehler erkannt !
  792.   load/ run/ endtime hh:mm:ss.n/100 = 16:01:46.97  / 16:01:47.24  / 16:01:48.29
  793.   loadtime / runtime hh:mm:ss.n/100 = 00:00:00.27  / 00:00:01.05  / Lines    98
  794.  
  795.   Source filename: PARANZ.PRG   K e i n e Struktur-Fehler erkannt !
  796.   load/ run/ endtime hh:mm:ss.n/100 = 16:01:49.39  / 16:01:49.77  / 16:01:50.21
  797.   loadtime / runtime hh:mm:ss.n/100 = 00:00:00.38  / 00:00:00.44  / Lines    55
  798.  
  799.   Source filename: ERFASS.PRG   K e i n e Struktur-Fehler erkannt !
  800.   load/ run/ endtime hh:mm:ss.n/100 = 16:01:51.09  / 16:01:51.31  / 16:01:56.75
  801.   loadtime / runtime hh:mm:ss.n/100 = 00:00:00.22  / 00:00:05.44  / Lines   433
  802.  
  803.   Source filename: DRUCK.PRG   K e i n e Struktur-Fehler erkannt !
  804.   load/ run/ endtime hh:mm:ss.n/100 = 16:01:59.11  / 16:01:59.60  / 16:02:04.66
  805.   loadtime / runtime hh:mm:ss.n/100 = 00:00:00.49  / 00:00:05.06  / Lines   289
  806.  
  807.   Source filename: AKTUAL.PRG   K e i n e Struktur-Fehler erkannt !
  808.   load/ run/ endtime hh:mm:ss.n/100 = 16:02:06.58  / 16:02:07.24  / 16:02:09.16
  809.   loadtime / runtime hh:mm:ss.n/100 = 00:00:00.66  / 00:00:01.92  / Lines   108
  810.  
  811.   Source filename: SUCHEN.PRG   K e i n e Struktur-Fehler erkannt !
  812.   load/ run/ endtime hh:mm:ss.n/100 = 16:02:11.19  / 16:02:11.58  / 16:02:12.13
  813.   loadtime / runtime hh:mm:ss.n/100 = 00:00:00.39  / 00:00:00.55  / Lines    67
  814.  
  815.  
  817.                                                                          11.
  818. EGStruktuierte Dokumentation mit Feld-cross-reference:H
  819. EG----------------------------------------------------H
  820.  
  821. ╔══════════════════════════════════════════════════════╦══VoG═════════════════╗
  822. ║ STADAANZ.PRG   1980.01.01 - 04:34                    ║   Datum: 1990.08.06  ║
  823. ╟──────────────────────────────────────────────────────╢   Zeit :   16:01:13  ║
  824. ║ STADAANZ.PRG                                         ║                      ║
  825. ╚══════════════════════════════════════════════════════╩══D-B-T══(C)-VoG═1989═╝
  826.  
  827.                                          STADAANZ.PRG            Seite:      1
  828.    1  * Programm.: STADAANZ.PRG
  829.    2  * Autor....: Jürgen Pilz
  830.    3  * Datum....: 28. Juli 1987
  831.    4  * Zweck....: Auswahlmenü zur Verwaltung der Stammdaten
  832.    5  *
  833.    6  * Variablendeklaration
  834.    7  *
  835.    8  PRIVATE wahl
  836.    9  *
  837.   10  * Aufbau Auswahlmenü
  838.   11  *
  839.   12  ┌─DO WHILE .T.
  840.   13  │ clear
  841.   14  │ @  1, 0 SAY "S T A M M D A T E N A N Z E I G E  - - -"
  842.   15  │ @  1,40 SAY "  A U S W A H L M E N Ü"
  843.   16  │ @  3, 0 SAY "========================================"
  844.   17  │ @  3,40 SAY "========================================"
  845.   18  │ @ 21, 0 SAY "========================================"
  846.   19  │ @ 21,40 SAY "========================================"
  847.   20  │ @  1,72 SAY datum
  848.   21  │ @  6,20 SAY "(A) Kundendaten"
  849.   22  │ @  8,20 SAY "(B) Artikeldaten"
  850.   23  │ @ 10,20 SAY "(C) Textdaten"
  851.   24  │ @ 12,20 SAY "(D) Parameterdaten"
  852.   25  │ @ 18,20 SAY "<RETURN> für vorheriges Menü"
  853.   26  │ @ 23,24 SAY "Bitte treffen Sie ihre Auswahl"
  854.   27  │ *
  855.   28  │ * Einlesen Auswahl und Aufrufen des entsprechenden Unterprogramms
  856.   29  │ *
  857.   30  │ wahl = ""
  858.   31  │ SET CONSOLE OFF
  859.   32  │ WAIT TO wahl
  860.   33  │ SET CONSOLE ON
  861.   34  │ ┌─DO CASE
  862.   35  │ │ *
  863.   36  │ │ * Fall : Rücksprung auf Hauptmenü
  864.   37  │ │ *
  865.   38  │ ├─CASE LEN(wahl) = 0
  866.   39  │ │ CLEAR
  867.   40  ┼─│─RETURN
  868.   41  │ │ *
  869.   42  │ │ * Fall : Test und Sprung auf Unterprogramm Kundendatei
  870.   43  │ │ *
  871.   44  │ ├─CASE UPPER(wahl) = "A"
  872.   45  │ │ ┌─IF FILE ("kunanz.prg")
  873.   46 »│ │ │ DO kunanz
  874.   47  │ │ └─ENDIF
  875.   48  │ │ *
  876.   49  │ │ * Fall : Test und Sprung auf Unterprogramm Artikeldatei
  877.   50  │ │ *
  878.   51  │ ├─CASE UPPER(wahl) = "B"
  879.   52  │ │ ┌─IF FILE ("artanz.prg")
  880.   53 »│ │ │ DO artanz
  881.   54  │ │ └─ENDIF
  882.       │ │
  883.                                                                          12.
  884.                                          STADAANZ.PRG            Seite:      2
  885.       │ │
  886.   55  │ │ *
  887.   56  │ │ * Fall : Test und Sprung auf Unterprogramm Textdatei
  888.   57  │ │ *
  889.   58  │ ├─CASE UPPER(wahl) = "C"
  890.   59  │ │ ┌─IF FILE ("texanz.prg")
  891.   60 »│ │ │ DO texanz
  892.   61  │ │ └─ENDIF
  893.   62  │ │ *
  894.   63  │ │ * Fall : Test und Sprung auf Unterprogramm Parameterdatei
  895.   64  │ │ *
  896.   65  │ ├─CASE UPPER(wahl) = "D"
  897.   66  │ │ ┌─IF FILE ("paranz.prg")
  898.   67 »│ │ │ DO paranz
  899.   68  │ │ └─ENDIF
  900.   69  │ │ *
  901.   70  │ │ * Fall : Abfangen von Fehleingaben
  902.   71  │ ├─OTHERWISE
  903.   72  │─│─LOOP
  904.   73  │ └─ENDCASE
  905.   74  └─ENDDO
  906.  
  907.  
  908.  
  909.       .T.                :   12
  910.       artanz             :   53
  911.       CONSOLE            :   31,  33
  912.       datum              :   20
  913.       FILE               :   45,  52,  59,  66
  914.       kunanz             :   46
  915.       LEN                :   38
  916.       LOOP               :   72
  917.       paranz             :   67
  918.       PRIVATE            :    8
  919.       RETURN             :   40
  920.       texanz             :   60
  921.       UPPER              :   44,  51,  58,  65
  922.       wahl               :    8,  30,  32,  38,  44,  51,  58,  65
  923.       WAIT               :   32
  924.  
  925.  
  926.                                                                          13.
  927. EGCross-reference: Vorwärts-VerweiseH
  928. EG----------------------------------H
  929.  
  930. ╔══════════════════════════════════════════════════════╦══VoG═════════════════╗
  931. ║ HAUPT.PRG /drfbeo                                    ║   Datum: 1990.08.06  ║
  932. ╟──────────────────────────────────────────────────────╢   Zeit :   16:02:13  ║
  933. ║                   X-R-E-F                            ║                      ║
  934. ╚══════════════════════════════════════════════════════╩══D-B-T══(C)-VoG═1989═╝
  935.  
  936.                                                                  Seite:      1
  937. ┌────────────┬──────────┬──────┬────┬────────────┬──────────────┬──────┬─────┐
  938.  Programm      Datum      Zeit  Typ  Name in / aus Programm      Zeilen Error
  939. ├────────────┼──────────┼──────┼────┼────────────┼──────────────┼──────┼─────┤
  940.  HAUPT        1980.01.01 07:28  PG                                 130    N
  941.                                   DO   STADAVER     STADAVER        92
  942.                                   DO   STADAANZ     STADAANZ        99
  943.                                   DO   FAKTURA      FAKTURA        106
  944.                                   DO   OFFPOS       OFFPOS         113
  945.                                   DO   LAGER                       120    E
  946.                                   DO   SICHERN      SICHERN        127
  947. ├────────────┼──────────┼──────┼────┼────────────┼──────────────┼──────┼─────┤
  948.  STADAVER     1980.01.01 01:46  PG                                  78    N
  949.                                   DO   KUNMOD       KUNMOD          47
  950.                                   DO   ARTMOD       ARTMOD          54
  951.                                   DO   TEXMOD       TEXMOD          61
  952.                                   DO   PARMOD       PARMOD          68
  953.                                   DO   OPOMOD       OPOMOD          75
  954. ├────────────┼──────────┼──────┼────┼────────────┼──────────────┼──────┼─────┤
  955.  STADAANZ     1980.01.01 04:34  PG                                  74    N
  956.                                   DO   KUNANZ       KUNANZ          46
  957.                                   DO   ARTANZ       ARTANZ          53
  958.                                   DO   TEXANZ       TEXANZ          60
  959.                                   DO   PARANZ       PARANZ          67
  960. ├────────────┼──────────┼──────┼────┼────────────┼──────────────┼──────┼─────┤
  961.  FAKTURA      1980.01.01 00:49  PG                                  99    N
  962.                                   DO   ERFASS       ERFASS          70
  963.                                   DO   DRUCK        DRUCK           74
  964.                                   DO   AKTUAL       AKTUAL          78
  965. ├────────────┼──────────┼──────┼────┼────────────┼──────────────┼──────┼─────┤
  966.  OFFPOS       1980.01.01 01:14  PG                                  28    N
  967.                                   DB   OFFPOS                       15
  968.                                   SX   OFFPOS                       15
  969. ├────────────┼──────────┼──────┼────┼────────────┼──────────────┼──────┼─────┤
  970.  SICHERN      1980.01.01 01:16  PG                                  23    N
  971. ├────────────┼──────────┼──────┼────┼────────────┼──────────────┼──────┼─────┤
  972.  KUNMOD       1980.01.01 01:52  PG                                 207    N
  973.                                   DB   KUNDEN                       15
  974.                                   SX   KUNDEN                       22
  975.                                   SX   KUNDEN2                      22
  976. ├────────────┼──────────┼──────┼────┼────────────┼──────────────┼──────┼─────┤
  977.  ARTMOD       1980.01.01 00:09  PG                                 203    N
  978.                                   DB   ARTIKEL                      15
  979.                                   SX   ARTIKEL                      15
  980.                                   DB   ARTIKEL                      17
  981.                                   SX   ARTIKEL                      19
  982. ├────────────┼──────────┼──────┼────┼────────────┼──────────────┼──────┼─────┤
  983.  TEXMOD       1980.01.01 03:59  PG                                 147    N
  984.                                   DB   TEXTE                        13
  985.                                   SX   TEXTE                        13
  986.                                   DB   TEXTE                        15
  987.                                   SX   TEXTE                        17
  988. ├────────────┼──────────┼──────┼────┼────────────┼──────────────┼──────┼─────┤
  989.  PARMOD       1980.01.01 02:59  PG                                  83    N
  990.                                   DB   PARAM                        13
  991. ├────────────┼──────────┼──────┼────┼────────────┼──────────────┼──────┼─────┤
  992.                                                                         14.
  993.  
  994.                                                                  Seite:      2
  995. ┌────────────┬──────────┬──────┬────┬────────────┬──────────────┬──────┬─────┐
  996.  Programm      Datum      Zeit  Typ  Name in / aus Programm      Zeilen Error
  997. ├────────────┼──────────┼──────┼────┼────────────┼──────────────┼──────┼─────┤
  998.  OPOMOD       1980.01.01 00:28  PG                                 143    N
  999.                                   DB   OFFPOS                       13
  1000.                                   SX   OFFPOS                       52
  1001.                                   SX   OFFPOS1                      52
  1002.                                   SX   OFFPOS1                     100
  1003.                                   SX   OFFPOS                      100
  1004. ├────────────┼──────────┼──────┼────┼────────────┼──────────────┼──────┼─────┤
  1005.  KUNANZ       1980.01.01 01:57  PG                                 156    N
  1006.                                   DB   KUNDEN                       13
  1007.                                   DB   KUNDEN                       21
  1008.                                   SX   KUNDEN                       21
  1009.                                   SX   KUNDEN2                      21
  1010.                                   SX   KUNDEN2                     102
  1011.                                   SX   KUNDEN                      102
  1012.                                   SX   KUNDEN                      133
  1013.                                   SX   KUNDEN2                     133
  1014. ├────────────┼──────────┼──────┼────┼────────────┼──────────────┼──────┼─────┤
  1015.  ARTANZ       1980.01.01 00:09  PG                                 107    N
  1016.                                   DB   ARTIKEL                      18
  1017.                                   SX   ARTIKEL                      18
  1018. ├────────────┼──────────┼──────┼────┼────────────┼──────────────┼──────┼─────┤
  1019.  TEXANZ       1980.01.01 02:45  PG                                  98    N
  1020.                                   DB   TEXTE                        19
  1021.                                   SX   TEXTE                        19
  1022. ├────────────┼──────────┼──────┼────┼────────────┼──────────────┼──────┼─────┤
  1023.  PARANZ       1980.01.01 02:08  PG                                  55    N
  1024.                                   DB   PARAM                         8
  1025.                                   DB   PARAM                        18
  1026. ├────────────┼──────────┼──────┼────┼────────────┼──────────────┼──────┼─────┤
  1027.  ERFASS       1987.10.25 14:11  PG                                 433    N
  1028.                                   DB   ARTIKEL                      13
  1029.                                   SX   ARTIKEL                      13
  1030.                                   DB   KUNDEN                       15
  1031.                                   SX   KUNDEN                       15
  1032.                                   SX   KUNDEN2                      15
  1033.                                   DB   TEXTE                        17
  1034.                                   SX   TEXTE                        17
  1035.                                   DO   SUCHEN       SUCHEN         191
  1036.                                   DO   SUCHEN       SUCHEN         213
  1037.                                   DO   SUCHEN       SUCHEN         226
  1038.                                   DO   SUCHEN       SUCHEN         239
  1039.                                   DO   SUCHEN       SUCHEN         252
  1040.                                   DO   SUCHEN       SUCHEN         265
  1041.                                   DO   SUCHEN       SUCHEN         278
  1042.                                   DO   SUCHEN       SUCHEN         291
  1043.                                   DO   SUCHEN       SUCHEN         304
  1044.                                   DO   SUCHEN       SUCHEN         317
  1045. ├────────────┼──────────┼──────┼────┼────────────┼──────────────┼──────┼─────┤
  1046.  DRUCK        1980.01.01 00:48  PG                                 289    N
  1047.                                   DB   PARAM                        13
  1048.                                   DB   TEXTE                       246
  1049.                                   SX   TEXTE                       246
  1050. ├────────────┼──────────┼──────┼────┼────────────┼──────────────┼──────┼─────┤
  1051.                                                                          15.
  1052.  
  1053.                                                                  Seite:      3
  1054. ┌────────────┬──────────┬──────┬────┬────────────┬──────────────┬──────┬─────┐
  1055.  Programm      Datum      Zeit  Typ  Name in / aus Programm      Zeilen Error
  1056. ├────────────┼──────────┼──────┼────┼────────────┼──────────────┼──────┼─────┤
  1057.  AKTUAL       1980.01.01 01:03  PG                                 108    N
  1058.                                   DB   KUNDEN                       14
  1059.                                   SX   KUNDEN                       14
  1060.                                   SX   KUNDEN2                      14
  1061.                                   DB   ARTIKEL                      23
  1062.                                   SX   ARTIKEL                      23
  1063.                                   DB   PARAM                        78
  1064.                                   DB   OFFPOS                       84
  1065.                                   DB   OFFPOS                       91
  1066.                                   SX   OFFPOS                       91
  1067.                                   SX   OFFPOS1                      91
  1068. ├────────────┼──────────┼──────┼────┼────────────┼──────────────┼──────┼─────┤
  1069.  SUCHEN       1987.10.25 20:53  PG                                  67    N
  1070.                                   DB   ARTIKEL                      12
  1071.                                   SX   ARTIKEL                      12
  1072. └────────────┴──────────┴──────┴────┴────────────┴──────────────┴──────┴─────┘
  1073.                                                                          16.
  1074. EGCross-reference: Rückwärts-VerweiseH
  1075. EG-----------------------------------H
  1076.  
  1077. ╔══════════════════════════════════════════════════════╦══VoG═════════════════╗
  1078. ║ HAUPT.PRG /drfbeo                                    ║   Datum: 1990.08.06  ║
  1079. ╟──────────────────────────────────────────────────────╢   Zeit :   16:02:14  ║
  1080. ║                   Z-R-E-F                            ║                      ║
  1081. ╚══════════════════════════════════════════════════════╩══D-B-T══(C)-VoG═1989═╝
  1082.  
  1083.                                                                  Seite:      1
  1084. ┌────────────┬──────────┬──────┬────┬────────────┬──────────────┬──────┬─────┐
  1085.  Programm      Datum      Zeit  Typ  Name in / aus Programm      Zeilen Error
  1086. ├────────────┼──────────┼──────┼────┼────────────┼──────────────┼──────┼─────┤
  1087.  HAUPT        1980.01.01 07:28  PG                                 130    N
  1088. ├────────────┼──────────┼──────┼────┼────────────┼──────────────┼──────┼─────┤
  1089.  STADAVER     1980.01.01 01:46  PG                                  78    N
  1090.                                   DO   STADAVER     HAUPT           92
  1091. ├────────────┼──────────┼──────┼────┼────────────┼──────────────┼──────┼─────┤
  1092.  STADAANZ     1980.01.01 04:34  PG                                  74    N
  1093.                                   DO   STADAANZ     HAUPT           99
  1094. ├────────────┼──────────┼──────┼────┼────────────┼──────────────┼──────┼─────┤
  1095.  FAKTURA      1980.01.01 00:49  PG                                  99    N
  1096.                                   DO   FAKTURA      HAUPT          106
  1097. ├────────────┼──────────┼──────┼────┼────────────┼──────────────┼──────┼─────┤
  1098.  OFFPOS       1980.01.01 01:14  PG                                  28    N
  1099.                                   DO   OFFPOS       HAUPT          113
  1100. ├────────────┼──────────┼──────┼────┼────────────┼──────────────┼──────┼─────┤
  1101.  SICHERN      1980.01.01 01:16  PG                                  23    N
  1102.                                   DO   SICHERN      HAUPT          127
  1103. ├────────────┼──────────┼──────┼────┼────────────┼──────────────┼──────┼─────┤
  1104.  KUNMOD       1980.01.01 01:52  PG                                 207    N
  1105.                                   DO   KUNMOD       STADAVER        47
  1106. ├────────────┼──────────┼──────┼────┼────────────┼──────────────┼──────┼─────┤
  1107.  ARTMOD       1980.01.01 00:09  PG                                 203    N
  1108.                                   DO   ARTMOD       STADAVER        54
  1109. ├────────────┼──────────┼──────┼────┼────────────┼──────────────┼──────┼─────┤
  1110.  TEXMOD       1980.01.01 03:59  PG                                 147    N
  1111.                                   DO   TEXMOD       STADAVER        61
  1112. ├────────────┼──────────┼──────┼────┼────────────┼──────────────┼──────┼─────┤
  1113.  PARMOD       1980.01.01 02:59  PG                                  83    N
  1114.                                   DO   PARMOD       STADAVER        68
  1115. ├────────────┼──────────┼──────┼────┼────────────┼──────────────┼──────┼─────┤
  1116.  OPOMOD       1980.01.01 00:28  PG                                 143    N
  1117.                                   DO   OPOMOD       STADAVER        75
  1118. ├────────────┼──────────┼──────┼────┼────────────┼──────────────┼──────┼─────┤
  1119.  KUNANZ       1980.01.01 01:57  PG                                 156    N
  1120.                                   DO   KUNANZ       STADAANZ        46
  1121. ├────────────┼──────────┼──────┼────┼────────────┼──────────────┼──────┼─────┤
  1122.  ARTANZ       1980.01.01 00:09  PG                                 107    N
  1123.                                   DO   ARTANZ       STADAANZ        53
  1124. ├────────────┼──────────┼──────┼────┼────────────┼──────────────┼──────┼─────┤
  1125.  TEXANZ       1980.01.01 02:45  PG                                  98    N
  1126.                                   DO   TEXANZ       STADAANZ        60
  1127. ├────────────┼──────────┼──────┼────┼────────────┼──────────────┼──────┼─────┤
  1128.  PARANZ       1980.01.01 02:08  PG                                  55    N
  1129.                                   DO   PARANZ       STADAANZ        67
  1130. ├────────────┼──────────┼──────┼────┼────────────┼──────────────┼──────┼─────┤
  1131.  ERFASS       1987.10.25 14:11  PG                                 433    N
  1132.                                   DO   ERFASS       FAKTURA         70
  1133. ├────────────┼──────────┼──────┼────┼────────────┼──────────────┼──────┼─────┤
  1134.  DRUCK        1980.01.01 00:48  PG                                 289    N
  1135.                                   DO   DRUCK        FAKTURA         74
  1136. ├────────────┼──────────┼──────┼────┼────────────┼──────────────┼──────┼─────┤
  1137.  AKTUAL       1980.01.01 01:03  PG                                 108    N
  1138.                                   DO   AKTUAL       FAKTURA         78
  1139. ├────────────┼──────────┼──────┼────┼────────────┼──────────────┼──────┼─────┤
  1140.                                                                          17.
  1141.  
  1142.                                                                  Seite:      2
  1143. ┌────────────┬──────────┬──────┬────┬────────────┬──────────────┬──────┬─────┐
  1144.  Programm      Datum      Zeit  Typ  Name in / aus Programm      Zeilen Error
  1145. ├────────────┼──────────┼──────┼────┼────────────┼──────────────┼──────┼─────┤
  1146.  SUCHEN       1987.10.25 20:53  PG                                  67    N
  1147.                                   DO   SUCHEN       ERFASS         191
  1148.                                   DO   SUCHEN       ERFASS         213
  1149.                                   DO   SUCHEN       ERFASS         226
  1150.                                   DO   SUCHEN       ERFASS         239
  1151.                                   DO   SUCHEN       ERFASS         252
  1152.                                   DO   SUCHEN       ERFASS         265
  1153.                                   DO   SUCHEN       ERFASS         278
  1154.                                   DO   SUCHEN       ERFASS         291
  1155.                                   DO   SUCHEN       ERFASS         304
  1156.                                   DO   SUCHEN       ERFASS         317
  1157. └────────────┴──────────┴──────┴────┴────────────┴──────────────┴──────┴─────┘
  1158.  
  1159.  
  1160.  
  1161.  
  1162. EGCross-reference: DatenbankenH
  1163. EG----------------------------H
  1164.  
  1165. ╔══════════════════════════════════════════════════════╦══VoG═════════════════╗
  1166. ║ HAUPT.PRG /drfbeo                                    ║   Datum: 1990.08.06  ║
  1167. ╟──────────────────────────────────────────────────────╢   Zeit :   16:02:15  ║
  1168. ║                   D-R-E-F                            ║                      ║
  1169. ╚══════════════════════════════════════════════════════╩══D-B-T══(C)-VoG═1989═╝
  1170.  
  1171.                                                                  Seite:      1
  1172. ┌────────────┬──────────┬──────┬────┬────────────┬──────────────┬──────┬─────┐
  1173.  Datenbank                      Typ  Name   in     Programm      Zeile
  1174. ├────────────┼──────────┼──────┼────┼────────────┼──────────────┼──────┼─────┤
  1175.  OFFPOS                         DB     OFFPOS       OFFPOS          15
  1176.                                 DB     OFFPOS       OPOMOD          13
  1177.                                 DB     OFFPOS       AKTUAL          84
  1178.                                 DB     OFFPOS       AKTUAL          91
  1179. ├────────────┼──────────┼──────┼────┼────────────┼──────────────┼──────┼─────┤
  1180.  KUNDEN                         DB     KUNDEN       KUNMOD          15
  1181.                                 DB     KUNDEN       KUNANZ          13
  1182.                                 DB     KUNDEN       KUNANZ          21
  1183.                                 DB     KUNDEN       ERFASS          15
  1184.                                 DB     KUNDEN       AKTUAL          14
  1185. ├────────────┼──────────┼──────┼────┼────────────┼──────────────┼──────┼─────┤
  1186.  ARTIKEL                        DB     ARTIKEL      ARTMOD          15
  1187.                                 DB     ARTIKEL      ARTMOD          17
  1188.                                 DB     ARTIKEL      ARTANZ          18
  1189.                                 DB     ARTIKEL      ERFASS          13
  1190.                                 DB     ARTIKEL      AKTUAL          23
  1191.                                 DB     ARTIKEL      SUCHEN          12
  1192. ├────────────┼──────────┼──────┼────┼────────────┼──────────────┼──────┼─────┤
  1193.  TEXTE                          DB     TEXTE        TEXMOD          13
  1194.                                 DB     TEXTE        TEXMOD          15
  1195.                                 DB     TEXTE        TEXANZ          19
  1196.                                 DB     TEXTE        ERFASS          17
  1197.                                 DB     TEXTE        DRUCK          246
  1198. ├────────────┼──────────┼──────┼────┼────────────┼──────────────┼──────┼─────┤
  1199.  PARAM                          DB     PARAM        PARMOD          13
  1200.                                 DB     PARAM        PARANZ           8
  1201.                                 DB     PARAM        PARANZ          18
  1202.                                 DB     PARAM        DRUCK           13
  1203.                                 DB     PARAM        AKTUAL          78
  1204. └────────────┴──────────┴──────┴────┴────────────┴──────────────┴──────┴─────┘
  1205.  
  1206.  
  1207.                                                                          18.
  1208. EGGraphische Darstellung:H
  1209. EG-----------------------H
  1210.  
  1211. ╔══════════════════════════════════════════════════════╦══VoG═════════════════╗
  1212. ║ HAUPT.PRG /drfbeo                                    ║   Datum: 1990.08.06  ║
  1213. ╟──────────────────────────────────────────────────────╢   Zeit :   16:02:15  ║
  1214. ║                   G-R-E-F                            ║                      ║
  1215. ╚══════════════════════════════════════════════════════╩══D-B-T══(C)-VoG═1989═╝
  1216.  
  1217.                                                                  Seite:      1
  1218.  
  1219. HAUPT───────┬──STADAVER────┬──KUNMOD
  1220.             │              ├──ARTMOD
  1221.             │              ├──TEXMOD
  1222.             │              ├──PARMOD
  1223.             │              └──OPOMOD
  1224.             ├──STADAANZ────┬──KUNANZ
  1225.             │              ├──ARTANZ
  1226.             │              ├──TEXANZ
  1227.             │              └──PARANZ
  1228.             ├──FAKTURA─────┬──ERFASS──────┬──SUCHEN
  1229.             │              │              ├──SUCHEN
  1230.             │              │              ├──SUCHEN
  1231.             │              │              ├──SUCHEN
  1232.             │              │              ├──SUCHEN
  1233.             │              │              ├──SUCHEN
  1234.             │              │              ├──SUCHEN
  1235.             │              │              ├──SUCHEN
  1236.             │              │              ├──SUCHEN
  1237.             │              │              └──SUCHEN
  1238.             │              ├──DRUCK
  1239.             │              └──AKTUAL
  1240.             ├──OFFPOS
  1241.             ├  LAGER
  1242.             └──SICHERN
  1243.  
  1244.  
  1245.                                                                          19.
  1246. EGDaten-Bank-Definitionen:H
  1247. EG------------------------H
  1248.  
  1249. ╔══════════════════════════════════════════════════════╦══VoG═════════════════╗
  1250. ║ OFFPOS.DBF     1987.10.25 - 21:41                    ║   Datum: 1990.08.06  ║
  1251. ╟──────────────────────────────────────────────────────╢   Zeit :   16:02:15  ║
  1252. ║ OFFPOS.DBF                                           ║                      ║
  1253. ╚══════════════════════════════════════════════════════╩══D-B-T══(C)-VoG═1989═╝
  1254.  
  1255.                                          OFFPOS.DBF              Seite:      1
  1256.       Feldname     Typ       Länge  Dez
  1257.       ═════════════════════════════════
  1258.    1  OPRECHNR     Numerisch     6   0
  1259.    2  OPDATUM      Zeichen       8
  1260.    3  OPKUNR       Zeichen       6
  1261.    4  OPKUNAME     Zeichen      30
  1262.    5  OPREBETR     Numerisch    10   2
  1263.    6  OPMWST1      Numerisch    10   2
  1264.    7  OPMWST2      Numerisch    10   2
  1265.    8  OPBEMERK     Zeichen      50
  1266.  
  1267.  
  1268. ╔══════════════════════════════════════════════════════╦══VoG═════════════════╗
  1269. ║ KUNDEN.DBF     1987.10.25 - 21:40                    ║   Datum: 1990.08.06  ║
  1270. ╟──────────────────────────────────────────────────────╢   Zeit :   16:02:16  ║
  1271. ║ KUNDEN.DBF                                           ║                      ║
  1272. ╚══════════════════════════════════════════════════════╩══D-B-T══(C)-VoG═1989═╝
  1273.  
  1274.                                          KUNDEN.DBF              Seite:      1
  1275.       Feldname     Typ       Länge  Dez
  1276.       ═════════════════════════════════
  1277.    1  KUNDNR       Zeichen       6
  1278.    2  KUNDNAME     Zeichen      30
  1279.    3  KUNDNAME2    Zeichen      30
  1280.    4  KUNDSTPF     Zeichen      30
  1281.    5  KUNDPLZORT   Zeichen      30
  1282.    6  KUNDTELEF    Zeichen      15
  1283.    7  KUNDTELEX    Zeichen      15
  1284.    8  KUNDKREDW    Zeichen       1
  1285.    9  KUNDUMSATZ   Numerisch    10   2
  1286.  
  1287.  
  1288. ╔══════════════════════════════════════════════════════╦══VoG═════════════════╗
  1289. ║ ARTIKEL.DBF    1987.10.25 - 21:40                    ║   Datum: 1990.08.06  ║
  1290. ╟──────────────────────────────────────────────────────╢   Zeit :   16:02:16  ║
  1291. ║ ARTIKEL.DBF                                          ║                      ║
  1292. ╚══════════════════════════════════════════════════════╩══D-B-T══(C)-VoG═1989═╝
  1293.  
  1294.                                          ARTIKEL.DBF             Seite:      1
  1295.       Feldname     Typ       Länge  Dez
  1296.       ═════════════════════════════════
  1297.    1  ARTNR        Zeichen       6
  1298.    2  ARTBEZ       Zeichen      25
  1299.    3  ARTEINH      Zeichen       5
  1300.    4  ARTPREIS1    Numerisch     9   3
  1301.    5  ARTPREIS2    Numerisch     9   3
  1302.    6  ARTPREIS3    Numerisch     9   3
  1303.    7  ARTMWST      Numerisch     1   0
  1304.    8  ARTEKPR      Numerisch     9   3
  1305.    9  ARTUMSATZ    Numerisch    10   2
  1306.   10  ARTABSATZ    Numerisch    10   2
  1307.  
  1308.                                                                          20.
  1309. :%&>>Ç ~<
  1310.  
  1311. EGDBT - Elimtab:H
  1312. EG-------------H
  1313.  
  1314.       Die DBT-Eliminierungs-Tabelle wird bei der Feld-XREF benötigt. In ihr
  1315.      stehen die Namen, die von der Feld-XREF ausgeschlossen werden sollen.
  1316.      Es handelt sich größtenteils um dBase/Clipper-Anweisungen.
  1317.  
  1318.      Bei der Erweiterung der DBTELIM.TAB muß vor dem Namen ein Blank (SPACE)
  1319.      stehen.
  1320.  
  1321.      Steht an 2.Stelle der Elimination ein G>H hex(10), so wird eine globale
  1322.      Sonderbehandlung durchgeführt.
  1323.  
  1324.  G>HN      eliminieren alle numerischen Werte
  1325.  G>HI&&    eliminieren alle Kommentare
  1326.  G>HI@     eliminieren alle @-Zeilen (@ nn,nn SAY-Zeilen)
  1327.  
  1328.  append
  1329.  case
  1330.  clear
  1331.  close
  1332.  do
  1333.  else
  1334.  endcase
  1335.  enddo
  1336.  endif
  1337.  if
  1338.  off
  1339.  on
  1340.  order
  1341.  otherwise
  1342.  prompt
  1343.  replace
  1344.  say
  1345.  select
  1346.  set
  1347.  set alternate
  1348.  set concole
  1349.  set echo
  1350.  set index
  1351.  set order
  1352.  set printer
  1353.  set talk
  1354.  store
  1355.  to
  1356.  use
  1357.  wbox
  1358.  wclose
  1359.  while
  1360.  wopen
  1361. %
  1362. U1
  1363.      ╔═════════════════════════════════════════════════════════════════════════╗
  1364.      ║ G ╔═══════════════════════════════════════════════════════════════════╗ H ║
  1365.      ║ G ║      d B a s e I I I  /  C L I P P E R  -  P r o g r a m m -      ║ H ║
  1366.      ║ G ║                 S t r u k t u r - T e s t e r                     ║ H ║
  1367.      ║ G ║        + D o k u m e n t a t i o n s  -  P r o g r a m m          ║ H ║
  1368.      ║ G ╚═══════════════════════════════════════════════════════════════════╝ H ║
  1369.      ║              DBT-Version 3.0   Copyright 1989-  VoG                     ║
  1370.      ║ G                    DBT-Small-Version                              H     ║
  1371.      ╠═════════════════════════════════════════════════════════════════════════╣
  1372.      ║                                                                         ║
  1373.      ║   GDBTH untersucht Ihr GdBase/Clipper-ProgrammH auf GStruktur-Fehler.H        ║
  1374.      ║                                                                         ║
  1375.      ║   Jeder GStruktur-BlockH beginnt mit einer GStruktur-EröffnendenH           ║
  1376.      ║   Anweisung und GmussH mit der entsprechenden GStruktur-SchließendenH       ║
  1377.      ║   Anweisung enden. GInnerhalb eines Struktur-BlockesH sind nur die        ║
  1378.      ║   zu Gdiesem Struktur-Block gehörenden AnweisungH und Gneue Struktur-H      ║
  1379.      ║   GEröffnende und Struktur-Schließende AnweisungenH zulässig.             ║
  1380.      ║                                                                         ║
  1381.      ║   Die in Klammern stehenden Struktur-Anweisungen sind wahlweise:        ║
  1382.      ║                                                                         ║
  1383.      ║ G  ┌─IF        ┌─DO WHILE    ┌─DO CASE       ┌─PROCEDURE   ┌─FUNCTION  H  ║
  1384.      ║ G  ├──(ELSE)   ├──(LOOP)     ├───CASE        ┼───RETURN    │           H  ║
  1385.      ║ G  └─ENDIF     ┼──(EXIT)     ├──(OTHERWISE)  └─RETURN      └─RETURN    H  ║
  1386.      ║ G              └─ENDDO       └─ENDCASE                                 H  ║
  1387.      ║                                                                         ║
  1388.      ║   GFehlerH in einer Struktur werden mit der GStruktur-EröffnendenH          ║
  1389.      ║   Anweisung und Gder AnweisungH ausgewiesen, bei der der GStruktur-H        ║
  1390.      ║   GverstoßH erkannt wurde.                                                ║
  1391.      ║                                                                         ║
  1392.      ║   Aufruf DBT                                                            ║
  1393.      ║                                                                         ║
  1394.      ║   GDBT (name.ext) (/param) H                                              ║
  1395.      ║                                                                         ║
  1396.      ║   Gname.ext:H Name des zu testenden Programms.                            ║
  1397.      ║             wildcard's (* / ?) in name führt zum Test aller             ║
  1398.      ║             zutreffenden Programme.                                     ║
  1399.      ║                                                                         ║
  1400.      ║   G/param :H  über Parameter kann der Struktur-Test und die weitere       ║
  1401.      ║             Verarbeitung beeinflusst werden.                            ║
  1402.      ║                                                                         ║
  1403.      ║   G R H    =  RETURN innerhalb von Strukturen werden nicht ausgewertet.   ║
  1404.      ║             Ein RETURN führt sonst zur Überprüfung von offenen          ║
  1405.      ║             Strukturen.                                                 ║
  1406.      ║                                                                         ║
  1407.      ║                                                                         ║
  1408.      ║                                                                         ║
  1409.      ║   G P H    =  Struktuierte Druckausgabe (CTRL-P oder >filename)           ║
  1410.      ║      N     =  ohne Ausgabe der Satznummer                               ║
  1411.      ║                                                                         ║
  1412.      ║   G C H    =  Ausgabe nur der Struktur-Blöcke                             ║
  1413.      ║                                                                         ║
  1414.      ║   G E H    =  Ausgabe der Verarbeitungs-Zeiten                            ║
  1415.      ║                                                                         ║
  1416.      ║   G T H    = T ist der 1. Parameter des Autoren gewesen, weil er          ║
  1417.      ║                  nicht glaubte, daß sein Struktur-Analyse-Programm      ║
  1418.      ║                  so schnell ist.                                        ║
  1419.      ║                                                                         ║
  1420.      ║                                                                         ║
  1421.      ║                                                                         ║
  1422.      ║                                                                         ║
  1423.      ╠═════════════════════════════════════════════════════════════════════════╣
  1424.      ║                                                                         ║
  1425.      ║ G  DBT benötigt zur Analyse von   1.000 Zeilen   5    Sekunden.     H     ║
  1426.      ║ G           ( 200 Zeilen pro Sekunde auf einem IBM/XT)              H     ║
  1427.      ║                                                                         ║
  1428.      ╚═════════════════════════════════════════════════════════════════════════╝
  1429.