Run Code
|
API
|
Code Wall
|
Users
|
Misc
|
Feedback
|
Login
|
Theme
|
Privacy
|
Patreon
Aufgaben laut Benutzer durchsuchen
Language:
Ada
Assembly
Bash
C#
C++ (gcc)
C++ (clang)
C++ (vc++)
C (gcc)
C (clang)
C (vc)
Client Side
Clojure
Common Lisp
D
Elixir
Erlang
F#
Fortran
Go
Haskell
Java
Javascript
Kotlin
Lua
MySql
Node.js
Ocaml
Octave
Objective-C
Oracle
Pascal
Perl
Php
PostgreSQL
Prolog
Python
Python 3
R
Rust
Ruby
Scala
Scheme
Sql Server
Swift
Tcl
Visual Basic
Layout:
Vertical
Horizontal
declare a_akt varchar(30); a_dat varchar(30); p_zaehler number (4); begin a_akt := 'dba19ss12adm'; --a_dat := TO_DATE('07.08.19','DD.MM.YY'); p_zaehler := 0; select count(*) into p_zaehler from aktanm where ben = a_akt; if p_zaehler = 0 then raise_application_error(-20001, 'Keine Aufgaben für Benutzer: '||a_akt||' gefunden'); else dbms_output.put_line('------------------------------------------------------------------'); dbms_output.put_line('Alle Aufgaben des Benutzers: '||a_akt||' sind'); dbms_output.put_line('------------------------------------------------------------------'); for rec in (select ben,akt, dat from aktanm where ben=a_akt) loop dbms_output.put_line('Benutzer: '||rec.ben||'| Aktion: '||rec.akt||'| Datum: '||rec.dat); end loop; end if; dbms_output.put_line('------------------------------------------------------------------'); --dbms_output.put_line(rec.count); exception when others then dbms_output.put_line(sqlerrm); end;
edit mode
|
history
|
discussion