Quellcodebibliothek Statistik Leitseite products/Sources/formale Sprachen/C/Firefox/third_party/libwebrtc/api/transport/rtp/   (Browser von der Mozilla Stiftung Version 136.0.1©)  Datei vom 10.2.2025 mit Größe 1016 B image not shown  

Bilddatei

u0100.cob


products/Sources/formale Sprachen/COBOL/verschiedene-Autoren/Rainers-Beispiele/diverse/u0100.cob

identification division. program-id. u0100. * Sprecherarchiv Statuskontrolle * margin: 15 0 0 15; * background-color: #23130E; * /*background-color: navy;*/ * /*ckground-image: url(./images/logo_sprecherarchiv.jpg);*/ * background-repeat: no-repeat; * background-position: top right; * Kontrolle Sprecherarchiv author. "JD". date-written. 24.7.2006. date-compiled. data division. working-storage section. 77 datum pic X(10). 01 au-0100 pic X(10) value "au_0100". 01 au-0100-d pic X(10) value "au_0100.php". 77 counter pic 9(8). 77 counter2 pic 9(8). 77 log pic 9(8). procedure division. accept datum from date * =date("d.m.Y G:i:s"); display "

Statistik Sprecherarchiv," " Stand: $datum

" display "

Stand: $datum

"; call "reqonc" using au-0100-d * Class au_uc_0100 call "alloc" using au-0100 * Alle Informationen besorgen (Class->Methoden) move counter of au-0100 to counter call anzt1 using counter * Informationen 2 (Sprecherstati) anzeigen und erklären move counter2 of au-0100 to counter2 call anzt2 using counter2 move log of au-0100 to log call anzt3 using log end-program u0100.