products/srceses/flemale sprachen/Java/openjdk-20-36_src/make/modules/jdk.accessibility image not shown  

Quellcode-Bibliothek

© Kompilation durch diese Firma

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

Datei:   Sprache: Cobol

Original von: verschiedene©

         IDENTIFICATION DIVISION.
         CLASS-ID. Winecase Inherits SOMObject.
         ENVIRONMENT DIVISION.
         Configuration Section.
         Repository.
         CLASS SOMObject IS "SOMObject"
         CLASS Winecase IS "Winecase" .
         DATA DIVISION.
         Working-Storage Section.
         01 Case-Number Pic 9(5).
         01 Case-date Pic X(8).
         01 Case-Count Pic 99.
         01 Case-Contents.
         05 Case-Entry occurs 12 times.
         10 Case-Bottle Pic X(20).
         PROCEDURE DIVISION.
         IDENTIFICATION DIVISION.
         METHOD-ID"AddBott" .
         DATA DIVISION.
         Working-Storage Section.
         77 sub Pic 99 VALUE 0.
         01 Found-Flag Pic 9.
         88 found VALUE 0.
         88 not-found VALUE 1.
         Linkage Section.
         01 In-bottle Pic X(20).
         01 Add-flag Pic 9.
         PROCEDURE DIVISION USING In-bottle Add-flag.
           Move in-bottle to Case-Bottle(sub)
           Add 1 to Case-Count
         Exit method.
         END METHOD "AddBott" .
         END CLASS Winecase.
         

¤ Dauer der Verarbeitung: 0.2 Sekunden  (vorverarbeitet)  ¤





zum Wurzelverzeichnis wechseln
Diese Quellcodebibliothek enthält Beispiele in vielen Programmiersprachen. Man kann per Verzeichnistruktur darin navigieren. Der Code wird farblich markiert angezeigt.
zum Wurzelverzeichnis wechseln
sprechenden Kalenders

in der Quellcodebibliothek suchen




Laden

Fehler beim Verzeichnis:


in der Quellcodebibliothek suchen

Die farbliche Syntaxdarstellung ist noch experimentell.


Bot Zugriff