dokuwiki kurs https://trust-box.at/dokuwiki/ 2026-04-20T06:33:29+0200 dokuwiki https://trust-box.at/dokuwiki/ https://trust-box.at/dokuwiki/lib/tpl/dokuwiki/images/favicon.ico text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:07.12 https://trust-box.at/dokuwiki/doku.php?id=kurs:07.12&rev=1410376975&do=diff 30.11. Trigger Check_Salary View Code Erstelle einen Trigger, der überprüft, ob der neu eingegebene Gehalt größer als der ursprüngliche ist. Next Index View Code Erstelle einen Trigger, der bei Erstellung eines neuen Datensatzes automatisch den nächsten Index erstellt. text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:1._einheit https://trust-box.at/dokuwiki/doku.php?id=kurs:1._einheit&rev=1410376975&do=diff Scalare sparse_array.pl # in perl gibt es 3 Typen von Variablen # die einfachsten sind scalare $a = 1; $b = 2; # zwischen " werden Variablen extrapoliert, soweit moeglich print "$a $b\n"; # zwischen ' wird nicht extrapoliert -> schneller print '$a $b'; print "\n"; # mit dem . werden strings konkateniert print $a+$b ."\n"; # Variablen in perl haben keinen Typ $b = 'Haus'; print "$a $b\n"; # welche Operationen moeglich und sinnvoll sind, ergibt sich aus dem Kontext # im folgenden … text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:2._einheit https://trust-box.at/dokuwiki/doku.php?id=kurs:2._einheit&rev=1410376975&do=diff chomp_vs_chop.pl Lotto lotto2.pl Hashes Erstellen eines Programms zur "ܢersetzung" deutsch/englisch * split * Auslesen eines Files * hashes * * woerterbuch.pl Auswertung von mehrfach Eingaben eines Users * hashes * while text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:3._einheit https://trust-box.at/dokuwiki/doku.php?id=kurs:3._einheit&rev=1410376975&do=diff Regular Expressions Auswertung eines LogFiles * regexp * hashes * hash by value sortieren * auslesen der IP Adresse & Auswertung welche wie oft vorkommt * * * * loganalyze.pl extrahieren der TLD einer email Adresse email.pl Ermitteln einer g�ltigen Postleitzahl plz.pl Ausmaskieren von Zeichen deren ASCII Wert größer 127 ist text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:3rd_party_software https://trust-box.at/dokuwiki/doku.php?id=kurs:3rd_party_software&rev=1410376975&do=diff Quest SQL Navigator <http://www.quest.com> PLSQL Developer <http://www.allroundautomations.nl/> text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:4._einheit https://trust-box.at/dokuwiki/doku.php?id=kurs:4._einheit&rev=1410376975&do=diff Search and Replace search_and_replace.pl sort sort.pl ip_stat.pl Funktionen sub.pl Referenzen Zugriff auf das Betriebssystem print "$0 $ARGV[0] $#ARGV\n"; $err = system("copy c b"); @a = (1,2,4,5,7,7); print "$#a\n"; print ">$err< >$?<\n"; @a = `dir asdas`; print $a; print ">$?< >$@<\n"; text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:5._einheit https://trust-box.at/dokuwiki/doku.php?id=kurs:5._einheit&rev=1410376975&do=diff Perl Installation + Packete * Windows Activestate Perl + ppm so man keine (direkte) Internetverbindung hat, kann man die Module von zip download beziehen * Unix Perl (als Packet oder Source) + cpan-shell perl -MCPAN -e shell * Allgemein # perl Makefile.PL # make # make test # make install text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:6._einheit https://trust-box.at/dokuwiki/doku.php?id=kurs:6._einheit&rev=1410376975&do=diff Oneliner "Füllstand" von Filesystemen extrahieren df -k | perl -ne '/(\d{1,3})%/; print "$1\n"' Vorkommen z�hlen perl -0pe'$_=()=/\.at/g' filename Ersetzen in Files perl -pi.bak -e 's/-lapreq//' Request/Makefile.PL Cookie/Makefile.PL for i in `find . -name "*.p?"`; do perl -i -pe 's/::Blu::/::Bla::/g' $i ; done text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:7._einheit https://trust-box.at/dokuwiki/doku.php?id=kurs:7._einheit&rev=1410376975&do=diff C-code in perl <http://www.perl.com/doc/manual/html/pod/perlxstut.html> Test::More modul anlegen: h2xs -Xa ExtractEmailTLD ExtractEmailTLD.pm ExtractEmailTLD.t testdata.xml OO-perl Class::Accessor Bla.pm Bla.t * eval * Block Form * string Form * Block Form of eval for Exception Handling * Anonyme Funktionen, Übergabe von Funktionen als Parameter text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:8._einheit https://trust-box.at/dokuwiki/doku.php?id=kurs:8._einheit&rev=1410376975&do=diff * CGI * DBD text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:12.12 https://trust-box.at/dokuwiki/doku.php?id=kurs:12.12&rev=1410376975&do=diff 12.12. BFILE CLOB CLOB Prozedur CLOB Prozedur 2 text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:30.11 https://trust-box.at/dokuwiki/doku.php?id=kurs:30.11&rev=1410376975&do=diff 30.11. Prozeduren Übung 1 View Code Erstelle einen Cursor, der die ersten 5 Mitarbeiter (alphabethisch aufsteigend sortiert) eines Departments, das durch den User eingegeben wird, ausgibt. ---------- Übung 2 View Code Erstelle einen Cursor, der allen Angestellten, die unter 5000 verdienen, einen Bonus von 20% text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:admin https://trust-box.at/dokuwiki/doku.php?id=kurs:admin&rev=1410376975&do=diff unter der url localhost:8080/apex/apex_admin als “admin” mit dem vorher vergebenen passwort einloggen text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:advanced-perl https://trust-box.at/dokuwiki/doku.php?id=kurs:advanced-perl&rev=1410376975&do=diff YAML closure references & sort Moose + Inheritence extend Getopt--Long OO-Factory OO-Error Classes commen path Test--More DBD--Postgres mod perl hierachical tree SOAP text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:aggregat_summenfunktionen https://trust-box.at/dokuwiki/doku.php?id=kurs:aggregat_summenfunktionen&rev=1410376975&do=diff /*select first_name, last_name, trunc(salary*1.276711235) from employees select sum(salary), min(salary), max(salary), avg(salary), median(salary), stddev(salary) from employees */ -- desc employees select count(department_id) from employees; select avg(commission_pct), sum(commission_pct), count(commission_pct), count(*), sum(commission_pct)/count(*) from employees select … text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:ajax-add2 https://trust-box.at/dokuwiki/doku.php?id=kurs:ajax-add2&rev=1410376975&do=diff <?php require ('xajax/xajax_core/xajax.inc.php'); $xajax = new xajax(); $xajax->configure('javascript URI', '/'); function add2($number) { $objResponse = new xajaxResponse(); $objResponse->assign('domain_label', 'innerHTML', $number + 2); return $objResponse; text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:ajax-get-emp_css https://trust-box.at/dokuwiki/doku.php?id=kurs:ajax-get-emp_css&rev=1410376975&do=diff <?php require ('xajax/xajax_core/xajax.inc.php'); $xajax = new xajax(); $xajax->configure('javascript URI', '/'); function getemp($name) { $db = oci_connect('hr', 'hr', 'orcl'); $sql = sprintf( "select first_name, last_name, salary from employees where last_name like '%s%%'", $name); $q = oci_parse($db, $sql); $r = oci_execute($q, OCI_DEFAULT); while($table = oci_fetch_array($q, OCI_ASSOC+OCI_RETURN_NULLS)) { $row = implode($table, ' '); $result .= $row… text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:alle_notwendigen_rechte_fuer_hr https://trust-box.at/dokuwiki/doku.php?id=kurs:alle_notwendigen_rechte_fuer_hr&rev=1410376975&do=diff CREATE USER hr IDENTIFIED BY hr DEFAULT TABLESPACE USERS TEMPORARY TABLESPACE TEMP / GRANT ALTER SESSION TO hr / GRANT CREATE DATABASE LINK TO hr / GRANT CREATE PUBLIC SYNONYM TO hr / GRANT CREATE SEQUENCE TO hr / GRANT CREATE SESSION TO hr / GRANT CREATE SYNONYM TO hr / GRANT CREATE VIEW TO hr / GRANT UNLIMITED TABLESPACE TO hr / GRANT RESOURCE TO hr / ALTER USER hr DEFAULT ROLE ALL / text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:analyze_indices_index https://trust-box.at/dokuwiki/doku.php?id=kurs:analyze_indices_index&rev=1410376975&do=diff select 'ANALYZE INDEX '|| object_name ||' estimate STATISTICS sample 25 percent;' from user_objects where object_type='INDEX' text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:any_all https://trust-box.at/dokuwiki/doku.php?id=kurs:any_all&rev=1410376975&do=diff select first_name, last_name, salary, job_id from employees where salary > any (select salary from employees where job_id = 'IT_PROG') text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:aufgaben https://trust-box.at/dokuwiki/doku.php?id=kurs:aufgaben&rev=1410376975&do=diff Gruppen Gruppe Pizza Gruppe Wettbüro Pflichtenheft * Wettbüro * Umfrageseite * Pizzabestellung * Versteigerun * Bewertungseiten * DVD Verleih * ... Devrim Pflichtenheft:-P Valeria Pflichtenheft Irene Pflichtenheft Dieter Pflichtenheft Bernardino Pflichtenheft Roland Pflichtenheft text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:backup.sh https://trust-box.at/dokuwiki/doku.php?id=kurs:backup.sh&rev=1410376975&do=diff #!/bin/bash datum=`date +%Y%m%d-%H%M%S` returncode=0 echo "Datum ist "$datum if [ -z $1 ] then echo "Bitte Parameter angeben" returncode=1 else if [ ! -f $1 ] then echo "Datei $1 existiert nicht" returncode=1 else cp $1 $1.$datum error=$? if [ $error -eq 0 ] then echo "Gut gegangen" else echo "Pech gehabt" returncode=1 fi fi fi exit $returncode text/html 2018-08-22T16:15:42+0200 Anonymous (anonymous@undisclosed.example.com) kurs:beispiele https://trust-box.at/dokuwiki/doku.php?id=kurs:beispiele&rev=1534947342&do=diff -- die laengste Zeitspanne die zwischen zwei hire_dates liegt procedure longest_time_wo_hire ( p_time_wo_hire out number ) as v_longest_span number := 0; v_span number; v_hire_date_prev employees.hire_date%type := null; begin for r_employee in c_employees loop if v_hire_date_prev is not null then v_span := r_employee.hire_date - v_hire_date_prev; end if; if v_span > v_longest_span then v_longest_span := v_span; p_time_wo_hire := v_longest_sp… text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:beispiele_f._cursor https://trust-box.at/dokuwiki/doku.php?id=kurs:beispiele_f._cursor&rev=1410376975&do=diff PROCEDURE EMP_PER_DEP IS -- durch den aufbau der where clause koenne entweder ALLE -- oder nur ein bestimmtes Department gelesen werden cursor c_emp_per_dep(p_dep_name varchar2) is SELECT departments.department_name, employees.first_name, employees.last_name FROM departments, employees WHERE (departments.department_id = employees.department_id) and ((department_name = p_dep_name and p_dep_name is not null) or (p_dep_name is null)) ORDER BY departments.depa… text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:bernardino_pflichtenheft https://trust-box.at/dokuwiki/doku.php?id=kurs:bernardino_pflichtenheft&rev=1410376975&do=diff * * Musik Shop Musikshops verfügen über eine große Anzahl an Datenträgern in ihren Sortiment. Jeden Monat erscheint eine Menge von neuen CDs/DVDs. Für Kunden und Mitarbeiter wird es immer schwieriger alle Alten und Neue Artikel zu finden. Für alle Artikel, wie CDs/DVDs, ist ein einfacher Zugang für Anwender notwendig, wie auch bei Online-Bestellungen.Schnellzugriff für die Suche nach: Artist, Album, Song und Medium, Reservierung, Regal, Shops, usw. - Ordered List Item text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:bfile https://trust-box.at/dokuwiki/doku.php?id=kurs:bfile&rev=1410376975&do=diff BFILE Als erstes legen wir in der Tabelle XL_Test ein neues Feld mit Namen text und Typ BFILE an. Dann legen wir im Verzeichnis C:\temp eine Textdokument test.txt an. create directory dateien as 'C:\temp'; Dann vergeben wir die Leserechte ann alle User. text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:bfile_und_lob https://trust-box.at/dokuwiki/doku.php?id=kurs:bfile_und_lob&rev=1410376975&do=diff declare v_file bfile; v_filename varchar2(100); v_content varchar2(4020); v_pic blob; v_dest_offset number := 1; v_src_offset number := 1; v_len number; begin Dbms_Lob.CreateTemporary ( lob_loc => v_pic, cache => true, dur => Dbms_Lob.Session ); v_file := bfilename('DIR_BILDER', 'sepp.jpg'); insert into fotos (id, name, bild) values (hr_seq.nextval, 'sepp', v_file); dbms_lob.open(v_file, DBMS_LOB.LOB_READONLY); -… text/html 2020-05-26T09:38:25+0200 Anonymous (anonymous@undisclosed.example.com) kurs:bind_und_substitution_variablen https://trust-box.at/dokuwiki/doku.php?id=kurs:bind_und_substitution_variablen&rev=1590478705&do=diff /* -- PL/SQL -- BIND Variablen var b_max_salary number; exec :b_max_salary := 8000; select count(*) from employees where salary > :b_max_salary; */ -- Substitution Variablen -- accept p_max_sal prompt "Max Salary eingeben: " default 10000; def p_max_sal = 8000; select count(*) from employees where salary > &p_max_sal; text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:bind_variablen_im_sql https://trust-box.at/dokuwiki/doku.php?id=kurs:bind_variablen_im_sql&rev=1410376975&do=diff SQL> var bla varchar2(30); SQL> exec :bla := 'huhuh'; PL/SQL procedure successfully completed. SQL> print :bla; BLA -------------------------------- huhuh SQL> exec select 'blu' into :bla from dual; PL/SQL procedure successfully completed. SQL> print :bla; BLA -------------------------------- blu text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:bk_in https://trust-box.at/dokuwiki/doku.php?id=kurs:bk_in&rev=1410376975&do=diff Tabellen befüllen XL 01.02.06 Ob das Komma beim Preis ein “.” oder ein “,” sein muß, hängt von der System(Oracle)-Sprache ab. Ich hab auch nix gfunden um die Tabelle schneller (mit weniger Code) zu befüllen. “seq” ist übrigens unsere Sequence. text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:bla.pm https://trust-box.at/dokuwiki/doku.php?id=kurs:bla.pm&rev=1410376975&do=diff package Bla; use strict; use warnings; use base qw(Class::Accessor); # auch Class::Accessor::Complex ansehen! Bla->mk_accessors(qw(name role salary)); 1; text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:bla.t https://trust-box.at/dokuwiki/doku.php?id=kurs:bla.t&rev=1410376975&do=diff BEGIN { use_ok('Bla') }; use Bla; use Data::Dumper; my $bla = Bla->new; $bla->name(blu); $bla->role(asdasd); print Dumper $bla; text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:bonus_cursor https://trust-box.at/dokuwiki/doku.php?id=kurs:bonus_cursor&rev=1410376975&do=diff PROCEDURE PC_BONUS_CURSOR IS cursor c_max_bonus is SELECT sby_emp_bonus.emp_id, sby_emp_bonus.last_name, sby_emp_bonus.salary FROM sby_emp_bonus ORDER BY sby_emp_bonus.salary DESC; type type_bonus is record ( emp_id varchar2(10), last_name varchar2(30), salary number(8,2)); first_bonus_record type_bonus; akt_bonus_record type_bonus; i_Prozent number(5,2); i_Differenz number(10); BEGIN open c_max_bonus; … text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:bonus_journal_trigger https://trust-box.at/dokuwiki/doku.php?id=kurs:bonus_journal_trigger&rev=1410376975&do=diff bonus_jn CREATE TABLE bonus_jn (bjn_id NUMBER, employee_id NUMBER(6,0), last_name VARCHAR2(25), first_name VARCHAR2(20), salary NUMBER(8,2), old_salary number, bonus NUMBER(38,3), change_date DATE, change_type VARCHAR2(1)) PCTFREE 10 INITRANS 1 MAXTRANS 2… text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:bonus_update https://trust-box.at/dokuwiki/doku.php?id=kurs:bonus_update&rev=1410376975&do=diff PROCEDURE PC_ADD_BONUS IS cursor c_upd_bonus is SELECT pc_employee_bonus.salary, pc_employee_bonus.employee_id, pc_employee_bonus.last_name, pc_employee_bonus.bonus, pc_employee_bonus.relativ_bonus FROM pc_employee_bonus ORDER BY pc_employee_bonus.salary DESC FOR UPDATE OF pc_employee_bonus.bonus, pc_employee_bonus.relativ_bonus NOWAIT; type erg is record ( salary pc_employee_bonus.salary%TYPE, employee_id pc_e… text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:calc_bonus https://trust-box.at/dokuwiki/doku.php?id=kurs:calc_bonus&rev=1410376975&do=diff FUNCTION CALC_BONUS ( salary IN number, hiredate IN date ) -- berechnet einen 20%igen Bonus /* Das ist ein mehrzeiliger Kommentar */ RETURN number IS bonus EMPLOYEES.salary%Type; bonus_percentage number(9,2); BEGIN select GET_NUMPARAM('bonus_percentage') into bonus_percentage from dual; bonus := salary*bonus_percentage/100; -- if hiredate < sysdate - to_yminterval('10-0') oder: if (extract(year from sysdate) - extract(year from hiredate)) >= 10 then bonus… text/html 2020-05-11T09:26:51+0200 Anonymous (anonymous@undisclosed.example.com) kurs:case https://trust-box.at/dokuwiki/doku.php?id=kurs:case&rev=1589182011&do=diff select last_name, to_char(hire_date, 'yyyy') as hy, (case when to_char(hire_date, 'yyyy')>1995 then 'jung' when to_char(hire_date, 'yyyy')>1992 then 'mittel' else 'alt' end) altersgruppe from employees order by hire_date desc; select first_name, last_name, hire_date, age_class from (select first_name, last_name, hire_date, case when hd < 2003 then 'old' when hd < 2005 then 'average' when hd < 2007 then 'young'… text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:case_group_by https://trust-box.at/dokuwiki/doku.php?id=kurs:case_group_by&rev=1410376975&do=diff select alt, count(alt) from ( select ((case when hire_date > (sysdate - to_yminterval('12-0')) then 'Neuling' when hire_date > (sysdate - to_yminterval('15-0')) then 'Mittelding' else 'Alter Sack' end)) alt from employees) group by alt text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:cast https://trust-box.at/dokuwiki/doku.php?id=kurs:cast&rev=1410376975&do=diff PROCEDURE PC_CAST ( v_number IN varchar2, v_date IN varchar2) IS v_summe number; v_sysdate date; BEGIN v_summe := to_number(v_number) + 2; dbms_output.put_line('Summe: ' || v_summe); select sysdate - v_date into v_sysdate from dual; dbms_output.put_line('Sysdate: ' || v_sysdate); EXCEPTION WHEN value_error THEN dbms_output.put_line('Bitte nur Zahlen eingeben!'); END; text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:cgi https://trust-box.at/dokuwiki/doku.php?id=kurs:cgi&rev=1410376975&do=diff #!/usr/bin/perl use CGI qw(:standard); use CGI qw/:standard/; use CGI; $query=CGI->new(); $text=$query->param('text'); print header(); if ($text eq "") { print "<h1>Bitte gib einen Text ein!</h1>"; print <<TXT; <form method=get action="http://mailbox.univie.ac.at/~mh/cgi-bin/oschttirol.cgi"> <input type=submit value=Eintragen> <br> <textarea name=text cols=50 rows=20> $st </textarea> </form> TXT } else { print "<h1> Auf (Oscht)Tirolerisch: </… text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:chomp_vs_chop.pl https://trust-box.at/dokuwiki/doku.php?id=kurs:chomp_vs_chop.pl&rev=1410376975&do=diff use strict; use warnings; my $input = <STDIN>; printf "input: [%s]\n", $input; my $return = chomp($input); printf "return: [%s] input: [%s]\n", $return, $input; $return = chop($input); printf "return: [%s] input: [%s]\n", $return, $input; text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:christian https://trust-box.at/dokuwiki/doku.php?id=kurs:christian&rev=1410376975&do=diff Meine Codes: Codes Meine Seiten: <http://www.brainfuckproject.org> <http://www.fantazone.at> text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:clob https://trust-box.at/dokuwiki/doku.php?id=kurs:clob&rev=1410376975&do=diff CLOB Als erstes legen wir in der Tabelle XL_Test ein neues Feld mit Namen text und Typ CLOB an. insert into XL_Test (wert, text) values ('CLOB','Ein wirklich langer Text, den ich da schreib.'); Ergebnis: Row # Wert IND TEXT 5 CLOB text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:clob2 https://trust-box.at/dokuwiki/doku.php?id=kurs:clob2&rev=1410376975&do=diff CLOB Prozedur PROCEDURE P_CLOB IS v_clob clob; BEGIN select text into v_clob from XL_TEst where ind = 243; dbms_output.put_line(v_clob); END; Ergebnis: Ein wirklich langer Text, den ich da schreib. text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:clob3 https://trust-box.at/dokuwiki/doku.php?id=kurs:clob3&rev=1410376975&do=diff PROCEDURE P_CLOB ( v_in_clob IN clob) IS v_clob clob; BEGIN select text into v_clob from XL_Test where ind = 243 for update; dbms_LOB.append(v_clob,v_in_clob); dbms_output.put_line(v_clob); END; SQL Navigator macht bei der Ausführung der Prozedur einen Fehler,\\ den ich umgehen kann, wenn ich folgendes mache: PROCEDURE P_CLOB ( v_in_clob IN varchar2) IS v_clob clob; BEGIN select text into v_clob from XL_Test where ind = 243 for update; dbms_LOB.append(v_clob,v_in_c… text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:closure https://trust-box.at/dokuwiki/doku.php?id=kurs:closure&rev=1410376975&do=diff use strict; use warnings; { my $i; sub count { return $i++; } } printf "c: %d\n", count(); printf "c: %d\n", count(); printf "c: %d\n", count(); text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:codes https://trust-box.at/dokuwiki/doku.php?id=kurs:codes&rev=1410376975&do=diff Kurstag 3: Bonus Update Cursor For Cursor Features Kurstag 2: Insert Salary Bonus Cursor Cursor Kurstag 1: Cast Index by Scalar Create with Loop Delete text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:commen_path https://trust-box.at/dokuwiki/doku.php?id=kurs:commen_path&rev=1410376975&do=diff use strict; use warnings; my @files = ( '/a/b/12.jpg', '/a/b/c/d/12.jpg', '/a/b/c/12.jpg', '/a/b/e/12.jpg', '/a/b/c/f/12.jpg', '/a/b/e/12.jpg', '/a/b/12.jpg', '/b/12.jpg', ); my $cp = 0; foreach my $file (@files) { $file =~ m#(.*/)#; $cp = $1 if $cp eq '0'; # only for the first run $cp = $1 if (length($cp) > length($1)); print "$1 $file\n"; } print "Common Path is $cp\n"; text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:complex_with_clause https://trust-box.at/dokuwiki/doku.php?id=kurs:complex_with_clause&rev=1410376975&do=diff with vrm_ext as ( SELECT tst_vermieter.vrm_name, tst_extras.ext_name FROM tst_vermieter, tst_fahrzeuge, tst_fhz_ext_int, tst_extras WHERE ( (tst_vermieter.vrm_id = tst_fahrzeuge.fhz_vrm_id) AND (tst_fahrzeuge.fhz_id = tst_fhz_ext_int.fei_fhz_id) AND (tst_extras.ext_id = tst_fhz_ext_int.fei_ext_id) ) ) select distinct e.vrm_name, e.ext_name, ec.count_extras from vrm_ext e, (select vrm_name, ext_name, count(ext_name) as count_extras from vrm_ext … text/html 2019-05-23T15:00:14+0200 Anonymous (anonymous@undisclosed.example.com) kurs:connect_by_prior https://trust-box.at/dokuwiki/doku.php?id=kurs:connect_by_prior&rev=1558616414&do=diff select level, lpad('-', level*2-2, '=') as position, employee_id as emp_id, last_name as emp_name, prior employee_id as man_id, prior last_name as man_name, salary - prior salary as diff from employees --where salary - prior salary > 0 connect by prior employee_id = manager_id start with employee_id = 100 text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:corellated_subquery_vs_pseudotable https://trust-box.at/dokuwiki/doku.php?id=kurs:corellated_subquery_vs_pseudotable&rev=1410376975&do=diff /* create table dep_avg as select d.department_id, department_name, avg(salary) davg from employees e join departments d on d.department_id = e.department_id group by d.department_id, department_name */ -- select * from dep_avg select first_name, last_name, department_name, salary from employees e, departments d where e.department_id = d.department_id and salary > (select davg from dep_avg where department_id = d.department_id) --and departme… text/html 2022-03-15T10:39:03+0200 Anonymous (anonymous@undisclosed.example.com) kurs:correlated_subquery https://trust-box.at/dokuwiki/doku.php?id=kurs:correlated_subquery&rev=1647337143&do=diff with cte_multiple_last_names as ( select last_name, count(*) c from hr.employees group by last_name having count(*) > 1 order by c desc ) select employee_id, first_name, last_name from hr.employees where last_name in (select last_name from cte_multiple_last_names) select emp.first_name, emp.last_name from hr.employees emp where (select count(last_name) from hr.employees emp_sub where emp_sub.last_name = emp.last_name) > 1 <code> select first_name, last_name,… text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:correlated_subquery_mit_having https://trust-box.at/dokuwiki/doku.php?id=kurs:correlated_subquery_mit_having&rev=1410376975&do=diff Zeige das Departement mit den meisten Angestellten pro Land with gpl as ( SELECT DEPARTMENTS.DEPARTMENT_NAME, COUNTRIES.COUNTRY_NAME, (count(EMPLOYEES.EMPLOYEE_ID)) c FROM DEPARTMENTS , LOCATIONS , COUNTRIES , EMPLOYEES WHERE ( (LOCATIONS.LOCATION_ID = DEPARTMENTS.LOCATION_ID) AND (COUNTRIES.COUNTRY_ID = LOCATIONS.COUNTRY_ID) AND (DEPARTMENTS.DEPARTMENT_ID = EMPLOYEES.DEPARTMENT_ID) ) group by DEPARTMENTS.DEPARTMENT_NAME, COUNTRIES.COUNTRY_NAME ) select depa… text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:create https://trust-box.at/dokuwiki/doku.php?id=kurs:create&rev=1410376975&do=diff PROCEDURE PC_CREATE IS BEGIN for v_count in 0..10.2 loop insert into PC_TEST(index2) values (v_count); end loop; END; -- Procedure text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:create_calendar https://trust-box.at/dokuwiki/doku.php?id=kurs:create_calendar&rev=1410376975&do=diff Monatskalender beginnend mit 2008 with calendar as ( select datum from (select to_char(to_date( '20080101' , 'yyyymmdd')+to_yminterval(j||'-'||i), 'yyyymm') as datum from (select level-1 as j from dual connect by level < 4), (select level-1 as i from dual connect by level <= 12)) ) select * from calendar text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:create_enterprise_manager https://trust-box.at/dokuwiki/doku.php?id=kurs:create_enterprise_manager&rev=1410376975&do=diff emca -config dbcontrol db -repos recreate -SID NIC9 -PORT 1521 -ORACLE_HOME /oracle/product/11.1.0 -DBCONTROL_HTTP_PORT 1158 evtl ist dazu mehr platz im SYSAUX notwendig (fehlermeldung dazu ist seh kryptisch) ALTER TABLESPACE sysaux add datafile 'sysauxxxx.dbf' size 200M; text/html 2020-05-26T11:23:36+0200 Anonymous (anonymous@undisclosed.example.com) kurs:create_participant_table https://trust-box.at/dokuwiki/doku.php?id=kurs:create_participant_table&rev=1590485016&do=diff CREATE TABLE "PARTICIPANT" ( "PAR_ID" NUMBER NOT NULL ENABLE, "PAR_NAME" VARCHAR2(20) COLLATE "USING_NLS_COMP" NOT NULL ENABLE, "PAR_DATE_OF_BIRTH" DATE, CONSTRAINT "PARTICIPANT_PK" PRIMARY KEY ("PAR_ID") USING INDEX ENABLE, CONSTRAINT "PARTICIPANT_PAR_NAME_UQ" UNIQUE ("PAR_NAME") USING INDEX ENABLE ); text/html 2021-04-13T10:42:05+0200 Anonymous (anonymous@undisclosed.example.com) kurs:created_partioned_table https://trust-box.at/dokuwiki/doku.php?id=kurs:created_partioned_table&rev=1618303325&do=diff CREATE TABLE A ( a NUMBER, CreationDate DATE ) PARTITION BY RANGE (CreationDate) INTERVAL ( NUMTODSINTERVAL (1, 'DAY') ) (PARTITION P_FIRST VALUES LESS THAN (TIMESTAMP ' 2001-01-01 00:00:00')) text/html 2022-03-07T11:12:44+0200 Anonymous (anonymous@undisclosed.example.com) kurs:cte_common_table_expression_-_with_clause https://trust-box.at/dokuwiki/doku.php?id=kurs:cte_common_table_expression_-_with_clause&rev=1646647964&do=diff with cte_emp_gehalt as ( SELECT employee_id "Employee ID", first_name || ' ' || last_name fullname, salary, commission_pct, hire_date, (salary + salary * coalesce(commission_pct, 0)) * 1.04 gehalt from hr.employees order by gehalt desc, commission_pct asc, salary desc, fullname asc ), cte_emp_gehalt_lt_12k as ( select * from cte_emp_gehalt where gehalt > 12000 ) select * from cte_emp_gehalt_lt_12k text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:cursor https://trust-box.at/dokuwiki/doku.php?id=kurs:cursor&rev=1410376975&do=diff PROCEDURE PC_CURSOR IS cursor c_max_salary is SELECT employees.first_name, employees.last_name, jobs.job_id, jobs.job_title, jobs.min_salary, jobs.max_salary FROM jobs, employees WHERE ((jobs.job_id = employees.job_id)); type job_emp is record ( first_name varchar2(20), last_name varchar2(20), job_id varchar2(10), job_title varchar2(35), min_salary number(6), max_salary number(6)); jobs_record jo… text/html 2016-05-12T15:56:28+0200 Anonymous (anonymous@undisclosed.example.com) kurs:cursor_employees_per_department https://trust-box.at/dokuwiki/doku.php?id=kurs:cursor_employees_per_department&rev=1463061388&do=diff create or replace PROCEDURE P_GET_EMP_BY_DEPARTMENT_NAME( p_department_name departments.department_name%type) -- AUTHID CURRENT_USER AS /* uebergabe eines department_name ausgabe first_/last_name aller employees des departments */ cursor c_emp_by_departement_name( pc_department_name departments.department_name%type) is select first_name, last_name from employees e join departments d on e.department_id = d.department_id where department_na… text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:cursor_features https://trust-box.at/dokuwiki/doku.php?id=kurs:cursor_features&rev=1410376975&do=diff PROCEDURE PC_DEPARTMENT_EMP_SELECT ( dep_name IN departments.department_name%TYPE ) IS cursor c_get_emp is SELECT employees.last_name, employees.first_name, departments.department_name, jobs.job_title FROM employees, departments, jobs WHERE ( (departments.department_id = employees.department_id) AND (jobs.job_id = employees.job_id) AND (departments.department_name = dep_name) ) ORDER BY employees.last… text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:cursor_for https://trust-box.at/dokuwiki/doku.php?id=kurs:cursor_for&rev=1410376975&do=diff PROCEDURE PC_CURSOR_FOR ( dep_name IN departments.department_name%TYPE ) IS cursor c_get_emp is SELECT employees.last_name, employees.first_name, departments.department_name, jobs.job_title FROM employees, departments, jobs WHERE ( (departments.department_id = employees.department_id) AND (jobs.job_id = employees.job_id) AND (departments.department_name = dep_name) ) ORDER BY employees.last_name ASC, … text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:cursor_mit_parameter https://trust-box.at/dokuwiki/doku.php?id=kurs:cursor_mit_parameter&rev=1410376975&do=diff PROCEDURE P_EMP_CURSOR ( in_last_name IN varchar2 ) IS cursor get_emp(p_last_name varchar2) is select * from bonus where last_name = p_last_name; BEGIN for emp_rec in get_emp(in_last_name) loop dbms_output.put_line(emp_rec.first_name||' '||emp_rec.last_name); end loop; END; text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:cursor_state_in_stored_procedures https://trust-box.at/dokuwiki/doku.php?id=kurs:cursor_state_in_stored_procedures&rev=1410376975&do=diff cursor lokal aufrufen declare cl_dep pkg_dep.c_dep%rowtype; begin fetch pkg_dep.c_dep into cl_dep; dbms_output.put_line('ID: '||cl_dep.department_id||' '||cl_dep.department_name); end; -- Start of DDL Script for Package HR.PKG_DEP -- Generated 06.11.2008 10:55:46 from HR@ORCL CREATE OR REPLACE PACKAGE pkg_dep IS cursor c_dep is SELECT departments.department_id, departments.department_name FROM departments where department_id < 50 order by department_id; … text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:cursor_temporaere_tabllen https://trust-box.at/dokuwiki/doku.php?id=kurs:cursor_temporaere_tabllen&rev=1410376975&do=diff create table emp as select employee_id, first_name, last_name, salary, 0 bonus from employees CREATE GLOBAL TEMPORARY TABLE "HR"."EMP_TEMP" ( "EMPLOYEE_ID" NUMBER(6,0), "FIRST_NAME" VARCHAR2(20), "LAST_NAME" VARCHAR2(25), "SALARY" NUMBER(8,2), "BONUS" NUMBER ) ON COMMIT DELETE ROWS text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:cursor_uebersicht https://trust-box.at/dokuwiki/doku.php?id=kurs:cursor_uebersicht&rev=1410376975&do=diff cursor mit rowtype declare cursor c_bonus is select * from bonus order by salary desc; r_bonus bonus%rowtype; v_old_salary bonus.salary%type; v_diff number; begin open c_bonus; loop fetch c_bonus into r_bonus; exit when not c_bonus%found; dbms_output.put_line(c_bonus%rowcount ||'. '||r_bonus.first_name ||' ' || r_bonus.last_name ||' '|| r_bonus.salary || ' diff ' || to_char((r_bonus.salary - v_old_salary))*-1); v_old_salary := r_bon… text/html 2022-03-07T13:33:12+0200 Anonymous (anonymous@undisclosed.example.com) kurs:data_dictionary_views https://trust-box.at/dokuwiki/doku.php?id=kurs:data_dictionary_views&rev=1646656392&do=diff -- select * from user_objects where object_type = 'TABLE'; select * from all_tables where owner = 'HR'; select * from user_tab_columns; text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:datum https://trust-box.at/dokuwiki/doku.php?id=kurs:datum&rev=1410376975&do=diff alter session set NLS_DATE_FORMAT='yyyymidd'; select last_name, hire_date from employees where to_char(hire_date, 'yyyymmdd') between '19980201' and '19980701' / nachteil JEDE zeile mu� konvertiert werden select last_name, hire_date from employees where hire_date between to_date('19980201', 'yyyymmdd') and to_date('19980701', 'yyyymmdd') / text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:datum_1 https://trust-box.at/dokuwiki/doku.php?id=kurs:datum_1&rev=1410376975&do=diff SELECT employees.hire_date, employees.employee_id, employees.first_name, last_name FROM employees -- where extract(year from hire_date) = '1994' -- (select to_char(hire_date, 'YYYY') from employees where employee_id = 203) where hire_date between to_date('1993', 'yyyy') and to_date( '1995','yyyy') -- where to_char(hire_date, 'YYYY') between '1994' and '1995' ORDER BY employees.hire_date ASC text/html 2022-03-08T13:38:37+0200 Anonymous (anonymous@undisclosed.example.com) kurs:db_sprachen https://trust-box.at/dokuwiki/doku.php?id=kurs:db_sprachen&rev=1646743117&do=diff DML Data Manipulation Language - Insert, Update, Delete & Select (Merge) Datenbankobjekte werden mit DDL manipuliert - Data Definition Language text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:dbd--postgres https://trust-box.at/dokuwiki/doku.php?id=kurs:dbd--postgres&rev=1410376975&do=diff gisdb=# create user gisdb with password 'gisdb'; CREATE ROLE use strict; use warnings; use DBI; my $dbh = DBI->connect("dbi:Pg:dbname=dumpdb", 'mh', 'mh', {AutoCommit => 0}); my $sth = $dbh->prepare('select * from bla'); $sth->execute(); while (my @r = $sth->fetchrow) { print "@r\n"; } $sth->finish; $dbh->disconnect; text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:dbd https://trust-box.at/dokuwiki/doku.php?id=kurs:dbd&rev=1410376975&do=diff use DBI; my $dbh = DBI->connect('DBI:Proxy:hostname=makabaer.cc.univie.ac.at;port=1002;dsn=dbi:Oracle:', 'user' , 'passwd') or die "Couldn't connect to database: " . DBI->errstr; my $sth = $dbh->prepare('SELECT per_name, per_nicat_handle FROM NIC_Personen WHERE PER_NAME = :name') or die "Couldn't prepare statement: " . $dbh->errstr; my @data; $sth->bind_param(':name', "Hofstetter"); $sth->execute($lastname) # Execute the qu… text/html 2015-04-29T14:18:45+0200 Anonymous (anonymous@undisclosed.example.com) kurs:dbms_lock https://trust-box.at/dokuwiki/doku.php?id=kurs:dbms_lock&rev=1430309925&do=diff CREATE OR REPLACE PACKAGE PCK_LOCK AS v_lockhandle varchar2(100); procedure request(p_lock_name varchar2); procedure release; END PCK_LOCK; / CREATE OR REPLACE PACKAGE BODY PCK_LOCK AS procedure request(p_lock_name varchar2) AS v_ret integer; BEGIN DBMS_LOCK.ALLOCATE_UNIQUE ( p_lock_name, v_lockhandle ); v_ret := DBMS_LOCK.REQUEST( lockhandle => v_lockhandle, timeout => 1, release_on_commit => true); dbms_outpu… text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:dbms_pipe https://trust-box.at/dokuwiki/doku.php?id=kurs:dbms_pipe&rev=1410376975&do=diff DBMS Pipe <http://www.oracle-base.com/articles/misc/dbms_pipe.php> besser: Advance Queuing <http://www.oracle-base.com/articles/9i/advanced-queuing-9i.php> text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:dbms_sql https://trust-box.at/dokuwiki/doku.php?id=kurs:dbms_sql&rev=1410376975&do=diff PROCEDURE delete_table ( p_table_name IN varchar2 ) IS v_cur integer; BEGIN v_cur := dbms_sql.open_cursor; dbms_sql.parse(v_cur, 'delete from '||p_table_name, dbms_sql.native); dbms_output.put_line(dbms_sql.execute(v_cur)); dbms_sql.close_cursor(v_cur); rollback; END; text/html 2018-08-24T15:15:37+0200 Anonymous (anonymous@undisclosed.example.com) kurs:dbms_sql_mit_fetch_und_cursor https://trust-box.at/dokuwiki/doku.php?id=kurs:dbms_sql_mit_fetch_und_cursor&rev=1535116537&do=diff PROCEDURE fetch_table_data ( table_name IN varchar2) IS statement_cursor integer; row_selected number; v_first_name employees.first_name%type; v_last_name employees.last_name%type; BEGIN statement_cursor := dbms_sql.open_cursor; dbms_sql.parse(statement_cursor, 'select first_name, last_name from employees', dbms_sql.native); DBMS_SQL.DEFINE_COLUMN(statement_cursor, 1, v_first_name, 100); DBMS_SQL.DEFINE_COLUMN(state… text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:ddl_statements_zum_user_anlegen https://trust-box.at/dokuwiki/doku.php?id=kurs:ddl_statements_zum_user_anlegen&rev=1410376975&do=diff -- Start of DDL Script for User WETTEN -- Generated 3-Feb-2006 11:21:23 from SYS@orcl CREATE USER wetten IDENTIFIED BY <Enter User Password Here> DEFAULT TABLESPACE USERS TEMPORARY TABLESPACE TEMP / GRANT CONNECT TO wetten / GRANT RESOURCE TO wetten / ALTER USER wetten DEFAULT ROLE ALL / -- End of DDL Script for User WETTEN text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:default_value_trigger https://trust-box.at/dokuwiki/doku.php?id=kurs:default_value_trigger&rev=1410376975&do=diff CREATE OR REPLACE TRIGGER check_salary BEFORE UPDATE ON emp_bonus REFERENCING NEW AS NEW OLD AS OLD FOR EACH ROW declare v_min_salary number(30); v_max_salary number(30); begin if :new.salary=0 then SELECT jobs.min_salary, jobs.max_salary into v_min_salary, v_max_salary FROM employees, jobs WHERE ((jobs.job_id = employees.job_id) AND (employees.employee_id = :new.emp_id)); :new.salary := (v_min_salary+v_max_salary)/2; end if; end; / text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:delete https://trust-box.at/dokuwiki/doku.php?id=kurs:delete&rev=1410376975&do=diff PROCEDURE PC_DELETE (v_nr IN NUMBER) IS v_row NUMBER; BEGIN DELETE FROM pc_test WHERE index2 < v_nr; v_row := SQL%ROWCOUNT; IF v_row = 0 THEN DBMS_OUTPUT.put_line ('Kein Datensatz gefunden!'); ELSE DBMS_OUTPUT.put_line (v_row || ' Datensätze gelöscht.'); END IF; END; text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:delete_truncate_drop https://trust-box.at/dokuwiki/doku.php?id=kurs:delete_truncate_drop&rev=1410376975&do=diff select * from emp_copy; delete from emp_copy where employee_id in (SELECT EMP_COPY.EMPLOYEE_ID FROM EMP_COPY , DEPARTMENTS WHERE ( (EMP_COPY.DEPARTMENT_ID = DEPARTMENTS.DEPARTMENT_ID) AND (DEPARTMENTS.DEPARTMENT_NAME = 'IT') )) select * from employees minus select * from emp_copy create table emp_tmp as select * from emp_copy drop table emp_tmp; truncate table emp_copy select * from emp_copy insert into emp_copy select * from employees text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:demo.php https://trust-box.at/dokuwiki/doku.php?id=kurs:demo.php&rev=1410376975&do=diff <h1>Hallo</h1> <?php # variablendeklaration global $person; $a = 2; // a = 1 $b = 3; //$a = 'Hallo'; // echo "<h1>" . $a * $b . "</h1>"; printf("<h1>%d</h1>\n", $a * $b); # printf ist besser # array $z[1] = 'a'; $z[2] = 'b'; $z[3] = 'c'; /* $person['Mark'] = 33; $person['Habib'] = 50; $person['Alexander'] = 54; */ $person = array('Mark' => 33, 'Alexander' => 54, 'Habib' => 50, ); foreach ($z as $i) { printf("Wert %s… text/html 2015-04-23T09:39:44+0200 Anonymous (anonymous@undisclosed.example.com) kurs:denormalisieren_im_trigger_fuer_person_journal https://trust-box.at/dokuwiki/doku.php?id=kurs:denormalisieren_im_trigger_fuer_person_journal&rev=1429774784&do=diff -------------------------------------------------------- -- DDL for Table PERSONS_JN -------------------------------------------------------- CREATE TABLE "HR"."PERSONS_JN" ( "PJN_ID" NUMBER, "PJN_PER_NAME" VARCHAR2(20 BYTE), "PJN_PER_BIRTHDAY" DATE, "PJN_PER_ID" NUMBER, "PJN_PER_GEN_NAME" VARCHAR2(20 BYTE), "PJN_VALID_FROM" DATE, "PJN_VALID_TO" DATE, "PJN_ACTION" VARCHAR2(20 BYTE), "PJN_EDUCATIONS" "HR"."EDUCATION" , "PJN_TRG_TABLE" VARCHAR2(20 BYTE) ) NESTED TABL… text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:devrim https://trust-box.at/dokuwiki/doku.php?id=kurs:devrim&rev=1410376975&do=diff subversion: <href://subversion.tigris.org> mysql text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:devrim_pflichtenheft https://trust-box.at/dokuwiki/doku.php?id=kurs:devrim_pflichtenheft&rev=1410376975&do=diff Das Projekt besteht aus grundsätzlich 2 Teilen: Administration Benutzerverwaltung * Benutzer confirmation * Benutzer löschen * Benutzer Infos sehen, verwalten (Anschirft, passwörter usw.) ---- Wetteverwaltung * Neue Wetten eröffnen text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:diagramme_maps_etc https://trust-box.at/dokuwiki/doku.php?id=kurs:diagramme_maps_etc&rev=1410376975&do=diff TABELLEN (FK) ; Foreign Key Primary Key ADM_admin ADM_ID ADM_name ADM_password USR_user USR_ID USR_password USR_name USR_email USR_mitglieds_datum USR_is_freigeschaltet USR_is_deaktiviert text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:diagrammes_maps_etc https://trust-box.at/dokuwiki/doku.php?id=kurs:diagrammes_maps_etc&rev=1410376975&do=diff TABELLEN (FK) ; Foreign Key Primary Key ADM_admin ADM_ID ADM_name ADM_password GWT_gespieltewetten GWT_ID GWT_WET_ID (FK) GWT_USR_ID (FK) WET_wette WET_ID WET_anfangzeit WET_endzeit WET_quote_tipp_1 WET_quote_tipp_2 WET_quote_tipp_3 WET_ergebnis WET_is_begonnen WET_is_beenden WET_is_processe… text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:dieter https://trust-box.at/dokuwiki/doku.php?id=kurs:dieter&rev=1410376975&do=diff PL/SQL 30.11. 07.12. 12.12. Prozeduren Funktionen Trigger PHP 5 sofia-p PHP Manual Variablen PrintF Stringfunktionen Mathematische Berechnungen Übungen 09.01. Nachmittag 11.01. Arbeiten mit Oracle 18.01. HTML Basiswissen SELF HTML Diverse Infos <http://subversion.tigris.org/> zum Verwalten der Dateien für Mehrbenutzerarbeiten. text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:dieter_pflichtenheft https://trust-box.at/dokuwiki/doku.php?id=kurs:dieter_pflichtenheft&rev=1410376975&do=diff Umfrage Intern * Eingabe der Umfrage * Thema * Wahlmöglichkeiten * Datumsperiode * Abfrage der abgeschickten Umfrage * Wahl * IP-Adresse * Username (optional) * Verwaltung von registrierten Benutzern (optional) * Name text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:doctrine https://trust-box.at/dokuwiki/doku.php?id=kurs:doctrine&rev=1410376975&do=diff Doctrine Oracle Beipspiel doctrine discover text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:doctrine_discover https://trust-box.at/dokuwiki/doku.php?id=kurs:doctrine_discover&rev=1410376975&do=diff doctrine orm:convert-mapping --from-database xml config\xml doctrine orm:generate-entities entities text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:doctrine_oracle_beipspiel https://trust-box.at/dokuwiki/doku.php?id=kurs:doctrine_oracle_beipspiel&rev=1410376975&do=diff Entities definieren <?php // entities/Test.php class Test { protected $id; protected $name; public function getName() { return $this->name; } public function setName($name) { $this->name = $name; } public function getId() { return $this->id; } } text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:doppelte_zeilen_loeschen https://trust-box.at/dokuwiki/doku.php?id=kurs:doppelte_zeilen_loeschen&rev=1410376975&do=diff delete from tabelle where id in ( select b.rowid, b.last_name, b.employee_id from copy_employees a left join copy_employees b on (b.employee_id = a.employee_id) and (b.rowid > a.rowid) where (b.rowid is not null) ) text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:eine_tabelle_mehrfach_verwenden https://trust-box.at/dokuwiki/doku.php?id=kurs:eine_tabelle_mehrfach_verwenden&rev=1410376975&do=diff /* Formatted on 2007/11/16 19:56 (Formatter Plus v4.8.6) */ SELECT m.first_name, m.last_name, ' manages ', a.first_name, a.last_name FROM employees a, departments, employees m WHERE (departments.department_id = a.department_id) and departments.manager_id = m.employee_id order by m.last_name, a.last_name text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:einfache_cursor https://trust-box.at/dokuwiki/doku.php?id=kurs:einfache_cursor&rev=1410376975&do=diff PROCEDURE P_CURSOR IS cursor emp_per_dep is select * from ( SELECT department_name, count(employee_id) cc FROM departments, employees WHERE ((departments.department_id = employees.department_id)) group by department_name ) where cc > 3 order by cc desc; v_name varchar2(100); BEGIN -- imlpizit cursor open + definition von passendem rec type for emp_per_dep_rec in emp_per_dep loop dbms_output.put_line(emp_per_dep_re… text/html 2020-05-05T12:06:43+0200 Anonymous (anonymous@undisclosed.example.com) kurs:einfache_selects https://trust-box.at/dokuwiki/doku.php?id=kurs:einfache_selects&rev=1588673203&do=diff select last_name, department_id from employees where department_id = 50 or department_id = 60 select first_name, last_name, salary from employees where salary >= 10000 and salary < 15000 order by salary desc select first_name, last_name, salary from employees where salary in('10000', '11000', '13000' ) order by salary desc select first_name, last_name, salary from employees where salary not between 10000 and 14000 and salary n… text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:einfache_subquery https://trust-box.at/dokuwiki/doku.php?id=kurs:einfache_subquery&rev=1410376975&do=diff select avg(salary) from employees select first_name, last_name from employees where salary > 6461 select first_name, last_name from employees where salary > (select avg(salary) from employees) select first_name, last_name from employees where salary > (select salary from employees where first_name = 'Pat' and last_name = 'Fay') select first_name, last_name, salary from employees where salary > any (select salary from employees where las… text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:einfacher_anonymer_block https://trust-box.at/dokuwiki/doku.php?id=kurs:einfacher_anonymer_block&rev=1410376975&do=diff declare v_first_name employees.first_name%TYPE; v_last_name employees.last_name%TYPE default 'Fay'; begin select first_name into v_first_name from employees where last_name = v_last_name; dbms_output.put_line(upper(v_first_name)); dbms_output.put_line(v_last_name); end; text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:einfachste_form https://trust-box.at/dokuwiki/doku.php?id=kurs:einfachste_form&rev=1410376975&do=diff <form name="form" action="<?php $PHP_SELF; ?>" method="get"> Name:<input name="name" type="text" size="30"> <br> <input type="submit" value="Get Info"> </form> <?php if ($_GET['name']) { $db = oci_connect('hr', 'hr', 'orcl'); $suche = $_GET['name']; $q = oci_parse($db, "select last_name ln, salary from employees where last_name = :suche"); oci_bind_by_name($q, ":suche", $suche); $r = oci_execute($q, OCI_DEFAULT); while ($row = oci_fetch_array($q, OCI_ASSOC)) { … text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:einfuehrung_in_oracle_sql https://trust-box.at/dokuwiki/doku.php?id=kurs:einfuehrung_in_oracle_sql&rev=1410376975&do=diff einfache selects select * from employees; select employee_id, last_name, first_name, salary gehalt from EMPLOYEES gehalt ist ein alias text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:email.pl https://trust-box.at/dokuwiki/doku.php?id=kurs:email.pl&rev=1410376975&do=diff use strict; use warnings; my $email = $ARGV[0]; # my ($localpart) = $email =~ /(.+)@/; # print "$localpart \n"; if ( $email =~ /(.+)@.+\.(.+)\.(.+)/ ) { print "$1 - $2 - $3\n"; } else { print "keine email!\n"; } text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:emp_per_department_function https://trust-box.at/dokuwiki/doku.php?id=kurs:emp_per_department_function&rev=1410376975&do=diff FUNCTION hr.emp_dep_list ( v_department_name IN departments.department_name%TYPE) RETURN emp_list IS cursor c_emp(p_department_name varchar2) is SELECT DEPARTMENTS.DEPARTMENT_NAME, EMPLOYEES.LAST_NAME FROM DEPARTMENTS , EMPLOYEES WHERE ( (DEPARTMENTS.DEPARTMENT_ID = EMPLOYEES.DEPARTMENT_ID) AND (DEPARTMENTS.DEPARTMENT_NAME = p_department_name) ); v_emp emp_list := emp_list(); -- v_emp_b emp_list := emp_list(); BEGIN for r_emp in c_emp(v_department_name) loop v_emp.extend; … text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:employee_journal_trigger https://trust-box.at/dokuwiki/doku.php?id=kurs:employee_journal_trigger&rev=1410376975&do=diff jn table CREATE TABLE employees_jn ( id NUMBER(6,0) , jn_type VARCHAR2(1 BYTE), employee_id NUMBER(6,0) , first_name VARCHAR2(20 BYTE), last_name VARCHAR2(25 BYTE) , email VARCHAR2(25 BYTE) , phone_number VARCHAR2(20 BYTE), hire_date DATE , job_id VARCHAR2(… text/html 2014-12-09T12:26:10+0200 Anonymous (anonymous@undisclosed.example.com) kurs:employees.php https://trust-box.at/dokuwiki/doku.php?id=kurs:employees.php&rev=1418124370&do=diff <html> <head> <link rel="stylesheet" type="text/css" href="bootstrap/dist/css/bootstrap.min.css"> </head> <h2>Addition</h2> <?php if (empty($_GET)) { ?> <form class="form-horizontal" role="form" action='employees.php' method='get'> <div class="form-group"> <label for="last_name" class="col-sm-2 control-label">Last Name</label> <input type="text" name="last_name"/><br> </div> <div class="col-sm-offset-2 col-sm-10"> <input type="submit" value="Suchen" class="btn"/> <… text/html 2014-12-16T12:34:54+0200 Anonymous (anonymous@undisclosed.example.com) kurs:employees_per_department https://trust-box.at/dokuwiki/doku.php?id=kurs:employees_per_department&rev=1418729694&do=diff Util.php <?php function print_table($data, $headers) { # print_r($data); echo "<table class='table table-striped'>"; echo "<tr>"; foreach ($headers as $cell) { echo "<th>$cell</th>"; } echo "</tr>"; foreach ($data as $rows) { echo "<tr>"; foreach ($rows as $cell) { echo "<td>$cell</td>"; } echo "</tr>"; } echo "</table>"; } text/html 2016-12-01T13:53:26+0200 Anonymous (anonymous@undisclosed.example.com) kurs:employees_per_year https://trust-box.at/dokuwiki/doku.php?id=kurs:employees_per_year&rev=1480596806&do=diff PROCEDURE emp_per_year IS sy number; ey number; c number; BEGIN select min(EXTRACT(year from hire_date)), max(EXTRACT(year from hire_date)) into sy, ey from employees; /* select min(y), max(y) into sy, ey from (select extract(year from hire_date) y from employees); */ for i in sy..ey loop select count(*) into c from employees where EXTRACT(year from hire_date) = i; dbms_output.put_line(i|| ' : ' || c); end loop; END; -- Procedure text/html 2014-12-15T11:13:17+0200 Anonymous (anonymous@undisclosed.example.com) kurs:employees_tables.php https://trust-box.at/dokuwiki/doku.php?id=kurs:employees_tables.php&rev=1418638397&do=diff <html> <head> <link rel="stylesheet" type="text/css" href="bootstrap/dist/css/bootstrap.min.css"> </head> <h2>Employees</h2> <?php require_once('Util.php'); if (empty($_GET)) { ?> <form class="form-horizontal" role="form" action='employees_table.php' method='get'> <div class="form-group"> <label for="last_name" class="col-sm-offset-2 control-label">Last Name</label> <input type="text" name="last_name"/><br> <label for="first_name" class="col-sm-offset-2 control-label">First… text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:entwickeln_mit_phpunit https://trust-box.at/dokuwiki/doku.php?id=kurs:entwickeln_mit_phpunit&rev=1410376975&do=diff Die Klasse <?php require_once 'PEAR/Exception.php'; class Employee { var $id, $last_name, $salary; var $db; function Employee() { $this->db_connect(); } private function db_connect() { $this->db = oci_connect('hr', 'hr', 'orcl'); } function set_last_name($last_name) { $this->last_name = $last_name; } function read() { $q = oci_parse($this->db, "select last_name ln, salary from employees where last_name = :b_last_name"); oci_bind_by_… text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:erm https://trust-box.at/dokuwiki/doku.php?id=kurs:erm&rev=1410376975&do=diff text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:eval https://trust-box.at/dokuwiki/doku.php?id=kurs:eval&rev=1410376975&do=diff use strict; use warnings; eval 'prasdasd $asd'; printf "nach eval [%s]\n", $@; my $a = 2; my $b = 0; eval { printf ("resultat: %s\n", $a/$b); }; printf "nach eval [%s]\n", $@; text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:exception_raise_und_raise_application_error https://trust-box.at/dokuwiki/doku.php?id=kurs:exception_raise_und_raise_application_error&rev=1410376975&do=diff declare e_emp_remaining exception; e_no_department exception; pragma exception_init (e_emp_remaining, -2292); pragma exception_init (e_no_department, -20001); begin delete from departments where department_id = 2701; if SQL%notfound then raise_application_error(-20001, 'kein department'); -- raise e_no_department; end if; rollback; exception when e_no_department then dbms_output.put_line('kein department >' || SQLCODE ||'< ' || SQLERRM … text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:exceptions https://trust-box.at/dokuwiki/doku.php?id=kurs:exceptions&rev=1410376975&do=diff PROCEDURE "GET_SALARY_EXCEPTION" ( p_last_name IN VARCHAR2) AS v_salary number; v_department_name varchar2(50); v_err number := 0; v_sqlerrm varchar2(1000); e number; i number := 0; k number := 10; BEGIN begin select salary, department_name into v_salary, v_department_name from employees e, departments d where last_name = p_last_name and e.department_id = d.department_id; dbms_output.put_line( p_last_name || ' verdient ' || v_salary ||'… text/html 2014-11-18T12:48:07+0200 Anonymous (anonymous@undisclosed.example.com) kurs:execute_immediate https://trust-box.at/dokuwiki/doku.php?id=kurs:execute_immediate&rev=1416311287&do=diff PROCEDURE DELETE_ROWS ( p_table_name IN varchar2) IS statement_cursor integer; rows_del number; BEGIN statement_cursor := dbms_sql.open_cursor; dbms_sql.parse(statement_cursor, 'delete from '||p_table_name, dbms_sql.native); rows_del := dbms_sql.execute(statement_cursor); -- dbms_sql.fetch_rows dbms_output.put_line('zeilen geloescht '||rows_del); dbms_sql.close_cursor(statement_cursor); END; -- Procedure text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:exp_-_imp https://trust-box.at/dokuwiki/doku.php?id=kurs:exp_-_imp&rev=1410376975&do=diff nach C:\app\<username>\product\11.1.0\db_1\BIN gehen " exp hr/hr " alle Fragen mit return quittieren im sqlplus neuen user anlegen SQL> create user hrnew identified by hrnew; Benutzer wurde erstellt. SQL> grant connect, resource to hrnew; Benutzerzugriff (Grant) wurde erteilt. text/html 2016-10-19T14:11:17+0200 Anonymous (anonymous@undisclosed.example.com) kurs:expdb-impdp https://trust-box.at/dokuwiki/doku.php?id=kurs:expdb-impdp&rev=1476879077&do=diff expdp system/wifi schemas=hr dumpfile=hr.dump directory=dump reuse_dumpfiles=y impdp system/wifi dumpfile=hr.dump directory=dump remap_schema=hr:hrcopy text/html 2021-10-06T11:56:26+0200 Anonymous (anonymous@undisclosed.example.com) kurs:expdb_impdb_schema https://trust-box.at/dokuwiki/doku.php?id=kurs:expdb_impdb_schema&rev=1633514186&do=diff SQL SQL> create directory filedir as '/u01/app/oracle/dbdir'; Directory created. SQL> grant read, write on directory filedir to pbadmin; SQL> create user pbadmin2 identified by mit; User created. SQL> grant create session, resource to pbadmin2; SQL> grant read, write on directory filedir to pbadmin2; text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:extend_getopt--long https://trust-box.at/dokuwiki/doku.php?id=kurs:extend_getopt--long&rev=1410376975&do=diff package ITAGetopt; use strict; use warnings; use Moose; has 'cl' => (is => 'rw', isa => 'Str'); extends 'Getopt::Long'; sub new { my $class = shift; my $obj = $class->Getopt::Long::Parser::new(@_); return $class->meta->new_object( __INSTANCE__ => $obj, @_, ); } #sub GetOptions { # my ($self) = shift; # $self->SUPER::GetOptions(@_); # ... # # won't do it that way, not because it is diffcult but after is easier before 'GetOptions' => sub { print "… text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:external_tables https://trust-box.at/dokuwiki/doku.php?id=kurs:external_tables&rev=1410376975&do=diff als privilegierter user (zb system) SQL> create directory emp_data as 'c:\temp'; Verzeichnis wurde erstellt. SQL> grant read,write on directory emp_data to hr; Benutzerzugriff (Grant) wurde erteilt. create table ext_emp_data ( vorname varchar2(100), gehalt number ) organization external ( type oracle_loader default directory system.emp_data access parameters ( records delimited by newline badfile 'emp.bad' … text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:extractemailtld.pm https://trust-box.at/dokuwiki/doku.php?id=kurs:extractemailtld.pm&rev=1410376975&do=diff package ExtractEmailTLD; use 5.008007; use strict; use warnings; our $VERSION = '0.01'; sub extract { my $email = shift @_; if ( $email =~ /.+@.+\.(.+)$/ ) { return $1; } else { return 1; } } # Preloaded methods go here. # Autoload methods go after =cut, and are processed by the autosplit program. 1; text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:extractemailtld.t https://trust-box.at/dokuwiki/doku.php?id=kurs:extractemailtld.t&rev=1410376975&do=diff use XML::Simple; use Data::Dumper; my $data; my $test_count; BEGIN { $data = XMLin("t/testdata.xml"); $test_count = scalar @{ $data->{e} }; }; use Test::More tests => 2 + $test_count; use ExtractMailTLD; use_ok('ExtractMailTLD'); is(ExtractMailTLD::get_tld('bla@blu.at'), 'at', 'Habe at bekommen'); print Dumper $data; foreach my $test (@{$data->{e}}) { is(ExtractMailTLD::get_tld($test->{m}), $test->{t}, sprintf("tld von [%s] ist [%s]", $test->{m}, $test->{t}) … text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:find_music.sh https://trust-box.at/dokuwiki/doku.php?id=kurs:find_music.sh&rev=1410376975&do=diff #!/usr/bin/bash praefix='mp3'; tmpdir='/tmp'; tmpfile='find_music_temp'.$$ full_tmpfile=$tmpdir/$tmpfile pwd=`pwd` find $1 -type f -iname \*.$praefix -print > $full_tmpfile; text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:flashback_data_archive https://trust-box.at/dokuwiki/doku.php?id=kurs:flashback_data_archive&rev=1410376975&do=diff <http://dbataj.blogspot.com/2008/05/oracle-flashback-data-archive-oracle.html> create flashback archive DEFAULT fla1 tablespace ORCLFLASHDB RETENTION 1 YEAR; text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:flashback_table https://trust-box.at/dokuwiki/doku.php?id=kurs:flashback_table&rev=1410376975&do=diff select * from departments as of timestamp sysdate - 1/12 desc flashback_transaction_query Flashback Data Archive sql> create tablespace fla datafile '/u01/app/oracle/oradata/orcl/fla01.dbf' size 10m; SQL> create flashback archive fla1 tablespace fla quota 10m retention 1000 year; Flashback archive created. SQL> grant flashback archive on fla1 to bla; Grant succeeded. als user SQL> alter table blu flashback archive fla1; DMLs sql> commit; SQL> select * from user_flashback_archive_table… text/html 2021-10-06T13:42:05+0200 Anonymous (anonymous@undisclosed.example.com) kurs:flashback_version_query https://trust-box.at/dokuwiki/doku.php?id=kurs:flashback_version_query&rev=1633520525&do=diff select name, birthday, versions_starttime, versions_endtime from person VERSIONS between scn minvalue and maxvalue text/html 2014-11-11T12:35:57+0200 Anonymous (anonymous@undisclosed.example.com) kurs:for_update_cursor_und_exception_im_block https://trust-box.at/dokuwiki/doku.php?id=kurs:for_update_cursor_und_exception_im_block&rev=1415705757&do=diff SQL> connect sys/***@*** as sysdba Connect durchgef³hrt. SQL> grant execute on dbms_lock to hr; create table emp_bonus as ( select employee_id, first_name, last_name, salary, 0 bonus from employees) CREATE OR REPLACE PROCEDURE UPDATE_BONUS AS /* + cursor c_emp_bonus der alle felder der Tabelle selektiert + for schleife über den cursor + im fehlerfall ora-00054 (muss man mit einem namen versehen (e_row_lock) => eine sekunde warten (dbms_lock(1) ), dann erneut versuchen zusatzaufgab… text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:foreign_keys_finden https://trust-box.at/dokuwiki/doku.php?id=kurs:foreign_keys_finden&rev=1410376975&do=diff select owner,constraint_name,constraint_type,table_name,r_owner,r_constraint_name from all_constraints where -- constraint_type in ('P','U') and table_name='EMPLOYEES'; select * from user_dependencies where referenced_type = 'TABLE' order by name, referenced_owner, referenced_name, referenced_type text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:form_1 https://trust-box.at/dokuwiki/doku.php?id=kurs:form_1&rev=1410376975&do=diff <?php if(array_key_exists("myname",$_POST )&&($_POST['myname'])){ print("Hallo $_POST[myname]"); } else echo<<<_HTML <table> <form method="post" action="$_SERVER[PHP_SELF]"> <tr> <td>Ihr Name:</td> <td><input type="text" name="myname" value=""></td> </tr> </tr> <td>&nbsp</td> <td align=right><input type="submit" value="Sag Hallo"></td> </tr> </form> </table> _HTML; ?> text/html 2018-12-18T13:32:53+0200 Anonymous (anonymous@undisclosed.example.com) kurs:fragen_dezember_2018 https://trust-box.at/dokuwiki/doku.php?id=kurs:fragen_dezember_2018&rev=1545136373&do=diff pivot dynamisch WITH T AS ( SELECT department_id, JOB_id, salary FROM employees where job_id in ( 'ST_CLERK', 'SH_CLERK' ) ) SELECT * FROM T PIVOT ( MIN(SALary) AS MINSAL, MAX(SALary) AS MAXSAL FOR (JOB_ID) in ( 'ST_CLERK', 'SH_CLERK') ) ORDER BY department_id text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:function.sh https://trust-box.at/dokuwiki/doku.php?id=kurs:function.sh&rev=1410376975&do=diff #!/bin/bash function func { local parameter=$1 # die variable i wird local definiert um zu zeigen # das lokale variablen nach beednigung der routine zu # exitieren aufhoeren local i (( i=i+1 )) echo "Aus func $parameter $i" } echo 'main' func bla echo "Aus main $parameter $i" func bli echo "Aus main $parameter $i" text/html 2016-05-04T15:17:38+0200 Anonymous (anonymous@undisclosed.example.com) kurs:function_f_get_employee_salary https://trust-box.at/dokuwiki/doku.php?id=kurs:function_f_get_employee_salary&rev=1462367858&do=diff create or replace FUNCTION F_GET_EMPLOYEE_SALARY (v_first_name in employees.first_name%type, v_last_name in employees.last_name%type) RETURN NUMBER AS v_salary employees.salary%type; v_hire_date employees.hire_date%type; BEGIN select salary, hire_date into v_salary, v_hire_date from employees where first_name = v_first_name and last_name = v_last_name; if v_hire_date < sysdate - to_yminterval('10-0') then v_salary := v_salary * 1.1; end if; … text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:functions.php https://trust-box.at/dokuwiki/doku.php?id=kurs:functions.php&rev=1410376975&do=diff <?php ini_set('display_errors', 1); function dbconnect() { $db = oci_connect('hr', 'hr', 'orcl'); # . # . return $db; } function print_table($table) { print "<table border=1>\n"; foreach ($table as $row) { print "<tr>"; foreach ($row as $cell) { if (!isset($cell)) {$cell = 'n/a'; } print "<td> $cell </td> "; } print "</tr>\n"; } print "</table>\n"; } ?> text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:funktion https://trust-box.at/dokuwiki/doku.php?id=kurs:funktion&rev=1410376975&do=diff FUNCTION CALC_BONUS ( salary IN number) RETURN number IS bonus number; BEGIN bonus := salary * 0.2 ; RETURN bonus; END; text/html 2016-05-04T15:15:36+0200 Anonymous (anonymous@undisclosed.example.com) kurs:funktion_add https://trust-box.at/dokuwiki/doku.php?id=kurs:funktion_add&rev=1462367736&do=diff create or replace FUNCTION F_ADD (v_a in number, v_b in number) RETURN NUMBER AS v_sum number; BEGIN v_sum := v_a + v_b; dbms_output.put_line('Ergebnis ' || v_sum); RETURN v_sum; END F_ADD; select f_add(3,7) from dual text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:funktion_datum https://trust-box.at/dokuwiki/doku.php?id=kurs:funktion_datum&rev=1410376975&do=diff FUNCTION CALC_BONUS ( salary IN number, hire_date IN date) RETURN number IS -- here the bonus var is defined bonus employees.salary%TYPE; bonus_percentage employees.salary%TYPE; BEGIN /* this function calclates the bonus based on the input */ bonus_percentage := get_p_number('bonus_percentage'); bonus := salary * bonus_percentage; if hire_date < (sysdate - to_yminterval('10-0')) then bonus := bonus + 100000; end if; RETURN… text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:funktionen https://trust-box.at/dokuwiki/doku.php?id=kurs:funktionen&rev=1410376975&do=diff Funktionen F_BONUS Funktion zum berechnen des Bonus. ---------- text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:get_emp_by_name.html https://trust-box.at/dokuwiki/doku.php?id=kurs:get_emp_by_name.html&rev=1410376975&do=diff <form name="get_emp_by_name" action="get_emp_by_name.php" method="get"> First Name:<input name="first_name" type="text" size="30"><br> Last Name:<input name="last_name" type="text" size="30"><br> <input type="submit" value="Get Employee"> </form> text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:get_emp_by_name.php https://trust-box.at/dokuwiki/doku.php?id=kurs:get_emp_by_name.php&rev=1410376975&do=diff <?php print "<h2>request</h2>\n"; print_r($_REQUEST); print "<br>\n"; printf("First Name: %s<br> Last Name: %s<br>\n", $_REQUEST['first_name'], $_REQUEST['last_name']); $db = oci_connect('hr', 'hr', 'orcl'); $sql = "select * from employees where last_name = '". $_REQUEST['last_name']. "' and first_name = '". $_REQUEST['first_name'] ."'"; $sql2 = sprintf( "select * from employees where last_name = '%s' and first_name = '%s'", $_REQUEST['last_name'], $_REQUEST['first_… text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:get_emp_by_name2.php https://trust-box.at/dokuwiki/doku.php?id=kurs:get_emp_by_name2.php&rev=1410376975&do=diff <?php print "<h2>request</h2>\n"; print_r($_REQUEST); if ($_REQUEST['cmd'] != 'getemp') { $html=<<<BLAB <form name="get_emp_by_name" action=$_SERVER[PHP_SELF] method="get"> <input name="cmd" type="hidden" value="getemp"> First Name:<input name="first_name" type="text" size="30"><br> Last Name:<input name="last_name" type="text" size="30"><br> <input type="submit" value="Get Employee"> </form> BLAB; print $html; } else { include_once "functions.php"; $db = dbconnect(); $sql3 = '… text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:git https://trust-box.at/dokuwiki/doku.php?id=kurs:git&rev=1410376975&do=diff initialer checkout = clone git clone git@github.com:MarkHofstetter/zend-hr-employees.git Bestimmes file aus einer bestimmten revision auschecken git checkout abcde file/to/restore Alle - auch remote - branches anzeigen (geht logischerweise erst nach einem pull) text/html 2020-05-18T11:25:18+0200 Anonymous (anonymous@undisclosed.example.com) kurs:group_by_beispiele https://trust-box.at/dokuwiki/doku.php?id=kurs:group_by_beispiele&rev=1589793918&do=diff select department_name, count(*) c from employees e join departments d on e.department_id = d.department_id group by department_name having count(*) >= 5 order by c desc with ym as ( select employee_id, -- extract(year from hire_date) y, extract(month from hire_date) m from employees ) select m, count(employee_id) from ym group by m order by m text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:group_by_year https://trust-box.at/dokuwiki/doku.php?id=kurs:group_by_year&rev=1410376975&do=diff select years2, count(years), count(years2), count(years)-count(years2) from ( -- select extract(year from ((sysdate - hire_date) year to month)) years from employees select extract(year from ((sysdate - hire_date) year to month)) years, trunc((sysdate - hire_date)/365) years2 from employees ) group by years2 order by years2 text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:grouping_sets https://trust-box.at/dokuwiki/doku.php?id=kurs:grouping_sets&rev=1410376975&do=diff select job_id, department_name, e.manager_id, count(e.employee_id) from employees e, departments d where e.department_id = d.department_id group by grouping sets -- (department_name, job_id, e.manager_id), ( (department_name, job_id), (job_id, e.manager_id) ) text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:gruppe_pizza https://trust-box.at/dokuwiki/doku.php?id=kurs:gruppe_pizza&rev=1410376975&do=diff ER-Diagramm und Tabellendefinition Deadline: 29.01.06 Wer machts: Dieter Diagramm Tabellen Administration: Pizza-Zutaten mit Forms Deadline: 03.02.06 Wer machts: Roland, Irene Ausblick Deadline: 03.02.06 Wer machts: Dieter, Roland, Irene Roland: text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:gruppe_wettbuero https://trust-box.at/dokuwiki/doku.php?id=kurs:gruppe_wettbuero&rev=1410376975&do=diff WETTBÜRO SQL DEPOT DIAGRAMME MAPS ETC. DDL Statements zum User anlegen text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:hash-of-hashes.php https://trust-box.at/dokuwiki/doku.php?id=kurs:hash-of-hashes.php&rev=1410376975&do=diff <?php $tn[] = 'Sofia'; $tn[] = 'Roman'; /* print "$tn[0] \n"; print "$tn[1] \n"; */ $tn2 = array( 'Sofia' => array('alter' => 54, 'ps' => ''), 'Roman' => array('alter' => 37, 'ps' => 'php'), 'Honglei' => array('alter' => 15, 'ps' => 'VB'), 'Ludwig' => array('alter' => 52, 'ps' => 'java'), 'Franz' => array('alter' => 49, 'ps' => 'c++'), 'Mario' => array('alter' => 52, 'ps' => 'vba'), 'Bernhard'=> array('alter' => 43, 'ps' => 'perl'), ); $tn2['Mark'] = array('al… text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:hash_by_value_sortieren https://trust-box.at/dokuwiki/doku.php?id=kurs:hash_by_value_sortieren&rev=1410376975&do=diff @keys = sort keys %hash; # sorted by key @keys = sort { $hash{$a} cmp $hash{$b} } keys %hash; # and by value text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:hash_ref.pl https://trust-box.at/dokuwiki/doku.php?id=kurs:hash_ref.pl&rev=1410376975&do=diff use strict; use warnings; use Data::Dumper; my $teilnehmer = { guenther => {alter => 27, groesse => 188, }, christian => {alter => 22, groesse => 175, schulen => ['vs', 'gym', 'uni'], }, mario => {alter => 26, groesse => 182, }, martin => {alter => 26, groesse => 170, }, joachim => {alter => 30, … text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:hashes https://trust-box.at/dokuwiki/doku.php?id=kurs:hashes&rev=1410376975&do=diff use strict; use warnings; my %teilnehmer = ( guenther => 27, christian => 22, mario => 26, martin => 26, joachim => 30, rudi => 23, fritz => 50, dennis => 39, ); $teilnehmer{'mark'} = 32; # @ARGV my $name = $ARGV[0]; my $search_name = lc($name); if (!$name) { printf "usage: %s <name>\n", $0; } elsif (exists $teilnehmer{$search_name}) { printf "%s ist %s Jahre alt\n", ucfirst(lc($name)), $teilnehmer{$search_name}; } else { … text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:here.sh https://trust-box.at/dokuwiki/doku.php?id=kurs:here.sh&rev=1410376975&do=diff #!/bin/bash var='bli bla blub' cat <<EOF Die Kuh macht Muh Viele Kuehe machen Muehe $var EOF result=`bc <<EOF scale=2 2/8 EOF` printf "Das Ergebnis ist [%-6.3f] \n" $result text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:hierachical_tree https://trust-box.at/dokuwiki/doku.php?id=kurs:hierachical_tree&rev=1410376975&do=diff SQL> select lpad(' ',level*2)||parentid parentid, childid, factor 2 from itemsets 3 connect by prior childid = parentid 4 start with parentid = 'BIKE'; <http://asktom.oracle.com/pls/ask/f?p=4950:8:11487139311894754233::NO::F4950_P8_DISPLAYID,F4950_P8_CRITERIA:4274185613870>, text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:histogramm_gehaltsverteilung https://trust-box.at/dokuwiki/doku.php?id=kurs:histogramm_gehaltsverteilung&rev=1410376975&do=diff select i, coalesce(lpad('*', count(s), '*'), ' ') from ( select trunc(salary, -3) s from employees ) stat right join (select level*1000 i from dual connect by level <= 25) r on r.i = stat.s group by i order by i resultat: text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:hr-class https://trust-box.at/dokuwiki/doku.php?id=kurs:hr-class&rev=1410376975&do=diff <?php // get_emp_by_name_obj_session_db.php session_start(); include_once "hr/DB/Session.php"; $session = new Session(); $session->session_id = session_id(); if ($_REQUEST['cmd'] != 'getemp') { $html=<<<BLAB <form name="get_emp_by_name" action=$_SERVER[PHP_SELF] method="POST"> <input name="cmd" type="hidden" value="getemp"> First Name:<input name="first_name" type="text" value="%s" size="30"><br> Last Name: <input name="last_name" type="text" value="%s" size="30"><br> <input type="… text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:hrdb.php https://trust-box.at/dokuwiki/doku.php?id=kurs:hrdb.php&rev=1410376975&do=diff <?php abstract class HRDB { //abstract only as a demonstration function connect() { global $db; if (!$db = @oci_pconnect('hr', 'hr', 'orcl11')) { print "<pre>"; print_r(oci_error()); print "</pre>"; exit; } } function db_select($sql, $bp) { global $db; if (!$db) {$this->connect();} $q = oci_parse($db, $sql); foreach ($bp as $param => $value) { oci_bind_by_name($q, $param, $value, 32 ); } $r = oci_execute($q, OCI_DEFAULT); $rows = o… text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:html https://trust-box.at/dokuwiki/doku.php?id=kurs:html&rev=1410376975&do=diff HTML Basisbefehle Code Ergebnis <B>Fett</B> Fett <I>Kursiv</I> Kursiv <BR> Zeilenschritt <P> Absatzbeginn </P> Absatzende text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:if.sh https://trust-box.at/dokuwiki/doku.php?id=kurs:if.sh&rev=1410376975&do=diff #!/bin/bash ls $1 >/dev/null 2>&1 error=$? echo -n "$1 -" if [ $error -eq 0 ] then echo "$1 - Gut gegangen" else echo "$1 - Pech gehabt" fi text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:index_by_scalar https://trust-box.at/dokuwiki/doku.php?id=kurs:index_by_scalar&rev=1410376975&do=diff PROCEDURE PC_INDEXBY_SCALAR (v_name IN varchar2) IS TYPE emp_name_table_type IS table of employees%ROWTYPE index by binary_integer; emp_name_table emp_name_table_type; v_ind number(30); BEGIN select employee_id into v_ind from employees where last_name = v_name; emp_name_table(v_ind).last_name:=v_name; IF emp_name_table.EXISTS(v_ind) THEN dbms_output.put_line(emp_name_table(v_ind).last_name||' '||v_ind); end if; END; -- Procedure text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:indices https://trust-box.at/dokuwiki/doku.php?id=kurs:indices&rev=1410376975&do=diff Functional Index create index last_name_upper_ind on emp_copy (upper(last_name)) text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:insert https://trust-box.at/dokuwiki/doku.php?id=kurs:insert&rev=1410376975&do=diff insert into emp_copy ( employee_id, first_name, last_name, email, hire_date, job_id, department_id ) values ( employees_seq.nextval, 'Mark', 'Hofstetter', 'joeh', sysdate, 'IT_PROG', (select department_id from departments where department_name = 'IT' ) ); insert into emp_copy ( employee_id, first_name, last_name, email, hire_date, job_id, department_id ) select employees_seq.nextval, first_name, last_name, ema… text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:insert_salary https://trust-box.at/dokuwiki/doku.php?id=kurs:insert_salary&rev=1410376975&do=diff PROCEDURE PC_INSERT_SALARY IS type emp_salary is table of employees%ROWTYPE index by binary_integer; first_index number(30); last_Index number(30); emp_table emp_salary; i_Ind number; BEGIN select min(employee_id), max(employee_id) into first_index, last_Index from employees; FOR i_Ind IN first_index..last_index Loop select * into emp_table(i_ind) from employees where employee_id = i_Ind; end loop; i_Ind := emp_tab… text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:installation https://trust-box.at/dokuwiki/doku.php?id=kurs:installation&rev=1410376975&do=diff moöchte man vobn auf auf ein virtual box image zugreifen siehe doku <http://www.virtualbox.org/manual/ch06.html> apex installation + entpacken nach oracle/apex + beschreibnung der installation ab seite 27 sqlplus für developement!!! > @apexins SYSAUX SYSAUX TEMP /i/ -- done > ALTER USER APEX_PUBLIC_USER ACCOUNT UNLOCK text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:installation_11g https://trust-box.at/dokuwiki/doku.php?id=kurs:installation_11g&rev=1410376975&do=diff unset LANG ASM group oracle evtl incl */db_1 weil ASM in ein anderes ORACLE_HOME soll Migration von 10 auf 11 javaspool size mind 200mb system wächst em 100% cpu sqlplus sysman/oracle SQL*Plus: Release 11.1.0.6.0 - Production on Tue Jan 27 09:12:09 2009 Copyright (c) 1982, 2007, Oracle. All rights reserved. Connected to: Oracle Database 11g Enterprise Edition Release 11.1.0.6.0 - Production With the Partitioning, OLAP, Data Mining and Real Application Testing options SQL> exec MGM… text/html 2021-10-04T14:13:31+0200 Anonymous (anonymous@undisclosed.example.com) kurs:installation_oracle_linux https://trust-box.at/dokuwiki/doku.php?id=kurs:installation_oracle_linux&rev=1633349611&do=diff <https://docs.oracle.com/en/database/oracle/oracle-database/19/ladbi/installing-the-cvuqdisk-rpm-for-linux.html#GUID-8A74CA97-D2FA-4016-8B61-99D6CB52A40E> <http://repo.bitcoder.org/download/oracle/> cvuqdisk-1.0.10-1.rpm rpm -i <http://repo.bitcoder.org/download/oracle/cvuqdisk-1.0.10-1.rpm> <https://docs.oracle.com/en/database/oracle/oracle-database/19/ladbi/running-rpm-packages-to-install-oracle-database.html#GUID-BB7C11E3-D385-4A2F-9EAF-75F4F0AACF02> yum -y install oracle-database-preinst… text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:installation_php_apache_oracle https://trust-box.at/dokuwiki/doku.php?id=kurs:installation_php_apache_oracle&rev=1410376975&do=diff * einfache xammpp installation * im richtigen php.ini oci8 aktivieren apache/bin/php.ini unter windows text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:installation_wifi https://trust-box.at/dokuwiki/doku.php?id=kurs:installation_wifi&rev=1410376975&do=diff strawberry perl in de CPAN shell o conf http_proxy http://194.232.85.82:8080 install Task::Kensho text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:instead_of_trigger https://trust-box.at/dokuwiki/doku.php?id=kurs:instead_of_trigger&rev=1410376975&do=diff CREATE OR REPLACE VIEW emp_dep ( first_name, last_name, department_name ) AS select first_name, last_name, department_name from departments d join employees e on d.department_id = e.department_id / -- Triggers for EMP_DEP CREATE OR REPLACE TRIGGER emp_dep_instead_trg INSTEAD OF INSERT OR DELETE OR UPDATE ON emp_dep REFERENCING NEW AS NEW OLD AS OLD begin /* first_name last_name department_name */ if inserting then insert into employees (employee_id, … text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:interface_package_fuer_working_salary_mit_nds https://trust-box.at/dokuwiki/doku.php?id=kurs:interface_package_fuer_working_salary_mit_nds&rev=1410376975&do=diff CREATE OR REPLACE PACKAGE pck_ws IS eur2usd number; pi constant number := 3.14; function get_emp_by_index(i number) return varchar2; function get_next_emp return varchar2; function get_next_emp2 return varchar2; FUNCTION get_number ( p_name varchar2) RETURN number; FUNCTION get_char ( p_name varchar2) RETURN varchar2; FUNCTION get_date ( p_name varchar2) return date; procedure add_emp ( p_first_name in working_salary.first_name%type, p_last_name … text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:ip_stat.pl https://trust-box.at/dokuwiki/doku.php?id=kurs:ip_stat.pl&rev=1410376975&do=diff use strict; use warnings; my $file = $ARGV[0]; open (FH, "<$file"); my %ip_stat; while (my $line = <FH>) { #131.130.102.51 - - [08/Jul/2005:20:10:34 +0200] "GET / HTTP/1.1" 200 11660 $line =~ /^(.*?) /; $ip_stat{$1}++; # if (exists $ip_stat{$1}) { # $ip_stat{$1} = $ip_stat{$1} + 1; # else { # $ip_stat{$1} = 1; # } } my @ip_sort = sort {$ip_stat{$b} <=> $ip_stat{$a}} keys %ip_stat; my $i; foreach (@ip_sort) { last if $i++>15; printf "%02d: %-17s: %5d\n", $i, … text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:irene https://trust-box.at/dokuwiki/doku.php?id=kurs:irene&rev=1410376975&do=diff www.oracle.com Level 1 Headline * Ordered List Item SQL Navigator PHP Edit text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:irene_pflichtenheft https://trust-box.at/dokuwiki/doku.php?id=kurs:irene_pflichtenheft&rev=1410376975&do=diff PIZZABESTELLUNG PIZZEN Standard-Pizzen klein, groß Individuelle Pizzen Auswahl aus einer Zutaten-Liste: 1.Hauptzutaten: Fisch, Fleisch 2.Nebenzutaten 3.Früchte Die Pizza bekommt den Namen des Kunden GETRÄNKE Alkoholische und Alkoholfreie Getränke text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:javascript https://trust-box.at/dokuwiki/doku.php?id=kurs:javascript&rev=1410376975&do=diff <http://search.cpan.org/~eric/OpenThought-1.99.16/lib/OpenThought.pm> <http://www.w3schools.com/jsref/> Suggest <http://www.dynamicajax.com/fr/AJAX_Suggest_Tutorial-.html> text/html 2020-05-12T10:09:07+0200 Anonymous (anonymous@undisclosed.example.com) kurs:joins https://trust-box.at/dokuwiki/doku.php?id=kurs:joins&rev=1589270947&do=diff ON select first_name, last_name, department_name from employees join departments on employees.department_id = departments.department_id order by last_name, first_name; WHERE select first_name, last_name, department_name from employees, departments where employees.department_id = departments.department_id order by last_name, first_name; USING select first_name, last_name, department_name from employees join departments using (department_id) order by last_name, first_name; LEFT/RIGHT/OUTER s… text/html 2017-10-24T15:51:00+0200 Anonymous (anonymous@undisclosed.example.com) kurs:joins_-_subsetvergleich https://trust-box.at/dokuwiki/doku.php?id=kurs:joins_-_subsetvergleich&rev=1508853060&do=diff /* die zahl der employees pro department die MEHR als 6000 verdienen und die Gehaltssumme ALLER Employees */ with salary_dep as ( select d.department_id, department_name, salary from employees e join departments d on e.department_id = d.department_id ), sum_dep_komplett as ( select department_id, department_name, sum(salary) sum_sal, count(*) count_emp from salary_dep group by department_id, department_name ), sum_dep_s… text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:journal_trigger https://trust-box.at/dokuwiki/doku.php?id=kurs:journal_trigger&rev=1410376975&do=diff -- Start of DDL Script for Trigger HR8.MH_TEST_JN -- Generated 07.12.2005 14:58:18 from HR8@WIFI.local CREATE OR REPLACE TRIGGER mh_test_jn AFTER INSERT OR DELETE OR UPDATE ON mh_test REFERENCING NEW AS NEW OLD AS OLD FOR EACH ROW declare v_type varchar(10); v_wert varchar2(30); begin if inserting then v_type := 'I'; v_wert := :new.wert; elsif deleting then v_type := 'D'; v_wert := :old.wert; else v_type := 'U'; v_wert := :old.wert; end if; insert into mh_test_jn ( w… text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:journal_trigger_mit_denormalisieren https://trust-box.at/dokuwiki/doku.php?id=kurs:journal_trigger_mit_denormalisieren&rev=1410376975&do=diff CREATE OR REPLACE TYPE ausbildung AS TABLE OF VARCHAR2(100) / CREATE OR REPLACE TYPE varchar2_100 AS TABLE OF VARCHAR2(100) / CREATE TABLE kursteilnehmer_jn (id NUMBER, kursteilnehmer_id NUMBER, name VARCHAR2(100 BYTE), punkte NUMBER, log_date DATE, dml VARCHAR2(1 BYTE), telnr HR.VARCHAR2_100) … text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:kill_user.sh https://trust-box.at/dokuwiki/doku.php?id=kurs:kill_user.sh&rev=1410376975&do=diff #/bin/bash if [ -z $1 ] then echo "Bitte geben Sie einen User an" exit 1 fi thread=`ps -u $1 | awk '{print $1}' | grep -v PID` #echo $thread j=0 for i in ${thread[*]} do echo "kill" $i done text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:kopieren_von_einer_anderen_tabelle https://trust-box.at/dokuwiki/doku.php?id=kurs:kopieren_von_einer_anderen_tabelle&rev=1410376975&do=diff insert into accountants (first_name, last_name, salary, email, hire_date, job_id) SELECT employees.first_name, employees.last_name, employees.salary, ' ', sysdate, ' ' FROM jobs, employees WHERE ( (jobs.job_id = employees.job_id) AND (jobs.job_title LIKE 'Account%') ) text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:kreis_tabelle_trigger https://trust-box.at/dokuwiki/doku.php?id=kurs:kreis_tabelle_trigger&rev=1410376975&do=diff Kreis CREATE TABLE kreis (id NUMBER NOT NULL, radius NUMBER NOT NULL, flaeche NUMBER, changed NUMBER) PCTFREE 10 INITRANS 1 MAXTRANS 255 TABLESPACE users STORAGE ( INITIAL 65536 NEXT 1048576 MINEXTENTS 1 MAXEXTENTS 2147483645 ) NOCACHE MONITORING NOPARALLEL LOGGING / ALTER TABLE kreis ADD CONSTRAINT id_pk PRIMARY KEY… text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:labels https://trust-box.at/dokuwiki/doku.php?id=kurs:labels&rev=1410376975&do=diff begin <<outer>> for o in 1..10 loop <<inner>> for i in 1..10 loop dbms_output.put_line(o*i); exit outer when i*o > 54; end loop; dbms_output.put_line(o); end loop; end; text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:last_testen https://trust-box.at/dokuwiki/doku.php?id=kurs:last_testen&rev=1410376975&do=diff CREATE TABLE "HR"."TEILNEHMER" ( "ID" NUMBER(*,0), "NAME" VARCHAR2(15 BYTE), "WOHNORT" VARCHAR2(20 BYTE), "ANLAGE_DATUM" DATE ) create or replace PROCEDURE INSERT_TEILNEHMER ( anzahl IN NUMBER ) AS random_wo varchar2(10); BEGIN for i in 1..anzahl loop random_wo := upper(dbms_random.string('A', 2)); insert into teilnehmer ( id, name, wohnort, anlage_datum ) values ( sq.nextval, 'Bumsti'||sq.currval, 'Meindorf ' ||random_wo, sysdate ); end … text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:list-table.php https://trust-box.at/dokuwiki/doku.php?id=kurs:list-table.php&rev=1410376975&do=diff <?php $db = oci_connect('hr', 'hr', 'orcl'); $q = oci_parse($db, "select * from employees"); $r = oci_execute($q, OCI_DEFAULT); print "Return $r\n"; $ncols = oci_num_fields($q); print "<table border=1>\n"; echo "<tr>"; for ($i = 1; $i <= $ncols; $i++) { $column_name = oci_field_name($q, $i); echo "<td>$column_name</td>"; } echo "</tr>"; while ($row = oci_fetch_array($q, OCI_ASSOC+OCI_RETURN_NULLS)) { print "<tr>\n"; foreach ($row as $zellen) { if (!isset($zellen)) { $… text/html 2022-03-14T14:04:24+0200 Anonymous (anonymous@undisclosed.example.com) kurs:listagg https://trust-box.at/dokuwiki/doku.php?id=kurs:listagg&rev=1647263064&do=diff select department_id, listagg(last_name, '; ') within group (order by employee_id) emp_list from hr.employees group by department_id; text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:loganalyze.pl https://trust-box.at/dokuwiki/doku.php?id=kurs:loganalyze.pl&rev=1410376975&do=diff #2005-03-13 04:52:08 1DAK9A-00036h-Du <= Kelly@australia.edu H=(67.19.219.66) [67.19.219.66] P=esmtp S=3260 id=N8vdA-68822V-5I@gee-wiz.com open (FH, "< main.log"); @zeilen = <FH>; foreach $zeile (@zeilen) { if ($zeile =~ /<=\s(.*?)\sH/) { $hash{$1}++; } } ## map (/<=\s(.*?)\sH/; $hash{$1}++) @zeilen; @keys = sort { $hash{$a} <=> $hash{$b} } keys %hash; # sort by value foreach $key (@keys) { printf("%-50s: %d \n", $key, $hash{$key} ); #print "$key".": "; #pri… text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:logfile_statistik https://trust-box.at/dokuwiki/doku.php?id=kurs:logfile_statistik&rev=1410376975&do=diff open (FH , $ARGV[0]); while ($l = <FH>) { # 195.251.218.35 - - [18/Oct/2006:07:31:05 +0200] "POST /wp-comments-post.php HTTP/1.1" 302 - $l =~ /^(.*?)\s/; $ip = $1; $ip =~ /(.*)\./; # print "$1\n"; $ipstat{$1} = $ipstat{$1} + 1 ; } # hash per value sortieren @keys = sort { $ipstat{$a} <=> $ipstat{$b} } keys %ipstat; # and by value foreach $key ( @keys) { print "$key $ipstat{$key} \n"; } text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:lotto2.pl https://trust-box.at/dokuwiki/doku.php?id=kurs:lotto2.pl&rev=1410376975&do=diff use strict; use warnings; my $range = 45; my @zahlen; my $d = 0; for (my $i = 1; $i<= 6; $i++) { my $z = int(rand($range))+1; if (grep {$_ == $z} @zahlen) { $d++; redo; } push (@zahlen, $z); print "$i $z\n"; } print "mehrfach $d\n"; text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:lov_countries https://trust-box.at/dokuwiki/doku.php?id=kurs:lov_countries&rev=1410376975&do=diff select name, id from ( SELECT COUNTRIES.COUNTRY_NAME name, COUNTRIES.COUNTRY_ID id, count(locations.location_id) FROM LOCATIONS right join COUNTRIES on COUNTRIES.COUNTRY_ID = LOCATIONS.COUNTRY_ID group by COUNTRIES.COUNTRY_NAME, COUNTRIES.COUNTRY_ID order by count(locations.location_id) desc, country_name asc ) text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:lvm https://trust-box.at/dokuwiki/doku.php?id=kurs:lvm&rev=1410376975&do=diff > mdadm --create /dev/md5 --level=1 --raid-devices=2 /dev/sda4 /dev/sdb4 > mdadm --detail /dev/md5 > lvcreate -n lvhome --size 100G vgstore > mount /dev/vgstore/lvhome /home/ > df -h > cd /home/ > vim /etc/fstab /dev/mapper/vgstore-lvhome /home ext4 defaults 0 0 text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:mark https://trust-box.at/dokuwiki/doku.php?id=kurs:mark&rev=1410376975&do=diff Isolation Level alter und create table * Einheit * Einheit * Einheit Cursor erweitern, und wiederholen text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:materialized_views https://trust-box.at/dokuwiki/doku.php?id=kurs:materialized_views&rev=1410376975&do=diff CREATE MATERIALIZED VIEW "HR"."EMP_DEP_MV" REFRESH COMPLETE ON DEMAND ENABLE QUERY REWRITE AS select first_name, last_name, salary from hr.departments d, hr.employees e where e.department_id = d.department_id refresh: exec dbms_mview.refresh('emp_dep_mv', 'C'); text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:merge https://trust-box.at/dokuwiki/doku.php?id=kurs:merge&rev=1410376975&do=diff merge into accountants a using (select first_name, last_name, salary from employees where last_name = 'Abel') e on (a.last_name = e.last_name and a.first_name = e.first_name) when matched then update set a.salary = e.salary when not matched then insert values (e.first_name, e.last_name, e.salary); text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:merge_accountants https://trust-box.at/dokuwiki/doku.php?id=kurs:merge_accountants&rev=1410376975&do=diff delete from emp_copy where employee_id in (SELECT EMP_COPY.EMPLOYEE_ID FROM EMP_COPY , DEPARTMENTS WHERE ( (EMP_COPY.DEPARTMENT_ID = DEPARTMENTS.DEPARTMENT_ID) AND (DEPARTMENTS.DEPARTMENT_NAME = 'IT') )) select * from emp_copy where department_id = 60 select count(*) from emp_copy -- select /*+ first_rows */ * from employees merge into emp_copy c using employees e on (e.last_name = c.last_name and e.first_name = c.first_name) /* when matched then update set salary = salary * 1.1 */ … text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:merge_in_procedure https://trust-box.at/dokuwiki/doku.php?id=kurs:merge_in_procedure&rev=1410376975&do=diff declare fn varchar2(100); ln varchar2(100); v_bonus number; sal number; begin fn := 'Mark'; ln := 'Hofstetter'; sal := 144; v_bonus := 111; merge into copy_employees ce using (select 1 from dual) on (ce.first_name = :fn and ce.last_name = :ln) when matched then update set salary = :sal, bonus = :v_bonus when not matched then insert (employee_id, first_name, last_name, salary, bonus, hire_date) values (employees_seq.nextval, :fn, :ln, :sal, :v_bonus, sysdate); end; / text/html 2014-10-14T15:38:44+0200 Anonymous (anonymous@undisclosed.example.com) kurs:merge_werte_einfuegen https://trust-box.at/dokuwiki/doku.php?id=kurs:merge_werte_einfuegen&rev=1413293924&do=diff merge into emp_merge m using (select 1 employee_id, -- sequence not allowed here 'Hofstetter' last_name, 'IT_PROG' job_id, 10001 salary, sysdate hire_date from dual) e on (m.last_name = e.last_name) when matched then update set salary = e.salary when not matched then insert ( employee_id, last_name, job_id, salary, hire_date ) values ( seq.nextval, e.last_name, e.job_id, e.salary, e.hire_date ) text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:merge_with_table https://trust-box.at/dokuwiki/doku.php?id=kurs:merge_with_table&rev=1410376975&do=diff merge into accountants a using employees e on (e.last_name = a.last_name and e.first_name = a.first_name) when matched then update set salary = e.salary where last_name = 'Abel' when not matched then insert (first_name, last_name, salary) values (e.first_name, e.last_name, e.salary) text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:metadata https://trust-box.at/dokuwiki/doku.php?id=kurs:metadata&rev=1410376975&do=diff select dbms_metadata.get_ddl('TABLE', 'EMPLOYEES') from dual; text/html 2015-04-16T09:33:28+0200 Anonymous (anonymous@undisclosed.example.com) kurs:migration_von_nested_table_zu_m-n https://trust-box.at/dokuwiki/doku.php?id=kurs:migration_von_nested_table_zu_m-n&rev=1429169608&do=diff CREATE OR REPLACE PROCEDURE MIGRATE_EDUCATION is v_edu_id number; BEGIN for r in (select per_id, coalesce(per_education, education()) per_education from persons) loop for e in (select column_value edu from table(r.per_education)) loop begin select edu_id into v_edu_id from educations where edu_name = e.edu; exception when no_data_found then insert into educations ( edu_id, edu_n… text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:mkdir.sh https://trust-box.at/dokuwiki/doku.php?id=kurs:mkdir.sh&rev=1410376975&do=diff #!/bin/bash #-------------------------------------------------------------------------------+ # | # mkdir.sh | # | # | # Legt eine Verzeichnisstruktur an | # | # | # IT-Austria GmbH | # | # 08.03.2006 | # | #-------------------------------------------------------------------------------+ # Modifikationen: | #--------+-----+------------+---------------------------------------------------+ # 1.0 | Gru… text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:mkdir_mh.sh https://trust-box.at/dokuwiki/doku.php?id=kurs:mkdir_mh.sh&rev=1410376975&do=diff #!/bin/bash #-------------------------------------------------------------------------------+ # | # mkdir.sh | # Legt eine Verzeichnisstruktur an | # IT-Austria GmbH | # 08.03.2006 | #-------------------------------------------------------------------------------+ # Modifikationen: | #--------+-----+------------+---------------------------------------------------+ # 1.0 | Gru | 10.03.2006 | Version V1.0 | #--------+-----+------------+--------------… text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:mkdir_new.sh https://trust-box.at/dokuwiki/doku.php?id=kurs:mkdir_new.sh&rev=1410376975&do=diff #!/bin/bash #-------------------------------------------------------------------------------+ # | # mkdir.sh | # | # | # Legt eine Verzeichnisstruktur an | # | # | # IT-Austria GmbH | # | # 08.03.2006 | # | #-------------------------------------------------------------------------------+ # Modifikationen: | #--------+-----+------------+---------------------------------------------------+ # 1.0 | Gru… text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:mkidir_echo.sh https://trust-box.at/dokuwiki/doku.php?id=kurs:mkidir_echo.sh&rev=1410376975&do=diff #!/bin/bash #-------------------------------------------------------------------------------+ # | # mkdir.sh | # | # | # Legt eine Verzeichnisstruktur an | # | # | # IT-Austria GmbH | # | # 08.03.2006 | # | #-------------------------------------------------------------------------------+ # Modifikationen: | #--------+-----+------------+---------------------------------------------------+ # 1.0 | Gru… text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:mkwiki.sh https://trust-box.at/dokuwiki/doku.php?id=kurs:mkwiki.sh&rev=1410376975&do=diff for i in `ls *.sh` do FILE=/srv/www/htdocs/dokuwiki/data/wifi/$i.txt echo "code" > $FILE cat $i >> $FILE chown wwwrun.www $FILE chmod 666 $FILE echo "/code" >> $FILE printf "[[%s]]\n\n" $i >> /srv/www/htdocs/dokuwiki/data/wifi/unix-kurs.txt done text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:mod_perl https://trust-box.at/dokuwiki/doku.php?id=kurs:mod_perl&rev=1410376975&do=diff Installation http.conf: LoadModule perl_module /usr/lib/apache2/mod_perl.so ## PerlRequire /home//startup.pl <Location /print_env1> SetHandler perl-script #PerlHandler Apache2::SOAP #PerlSetVar dispatch_to Data::Conveyor::App::SOAP PerlResponseHandler MyApache2::PrintEnv1 </Location> file:MyApache2/PrintEnv1.pm ----------------------- package MyApache2::PrintEnv1; use strict; use Apache2::RequestRec (); # for $r->content_type … text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:moose_inheritence https://trust-box.at/dokuwiki/doku.php?id=kurs:moose_inheritence&rev=1410376975&do=diff ## Bla.pm package Bla; use Moose; sub foo { my ($self) = shift; print "se foo\n"; } 1; ## BlaExt.pm package Bla; use Moose; sub foo { my ($self) = shift; print "se foo\n"; } 1; ## use_bla.pl use strict; use warnings; use BlaExt; my $bla = BlaExt->new(); $bla->foo; ## BlaExt::foo(); # won't work because Class Methods arent't inherited text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:mydf.sh https://trust-box.at/dokuwiki/doku.php?id=kurs:mydf.sh&rev=1410376975&do=diff #!/bin/bash ## IFS=$'\n' HEAD=0 df -k | while read FS BLOCKS USED AVAILABLE USEP MOUNT do if [ $HEAD -ne 1 ]; then HEAD=1 continue fi USED_PROZ=` echo "scale=3; $USED * 100 / $AVAILABLE" | bc ` ## echo -n "$MOUNT $USED_PROZ" USEP=`echo $USEP | sed 's/%//' ` printf "% 20s [%02.02f] [%02g]\n" $MOUNT $USED_PROZ $USEP if [ $USEP -gt 90 ]; then echo ACHTUNG fi done text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:mysql https://trust-box.at/dokuwiki/doku.php?id=kurs:mysql&rev=1410376975&do=diff to print the wanted part of the resultset $result=mysql_query($query,$result); echo mysql_result($result,1); text/html 2014-11-11T14:52:33+0200 Anonymous (anonymous@undisclosed.example.com) kurs:nested_table_als_column_type https://trust-box.at/dokuwiki/doku.php?id=kurs:nested_table_als_column_type&rev=1415713953&do=diff CREATE OR REPLACE PROCEDURE TEILNEHMER_EDUCATION /* + zusaetzlich zum teilnehmernamen eine zusätzliche ausbildung (p_add_education) angeben und die an die schon vorhandenen anhaengen und den Teilnehmer damit updaten */ (p_tln_name teilnehmer.tln_name%type, p_add_education varchar2 ) AS t_education education; BEGIN select coalesce(tln_education, education() ) into t_education from teilnehmer where tln_name = p_tln_name; -- dbms_output.put_line(t_education.cou… text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:nested_tables_und_collection_operator https://trust-box.at/dokuwiki/doku.php?id=kurs:nested_tables_und_collection_operator&rev=1410376975&do=diff PROCEDURE hr.multiset is cursor c_emp_salary_lt(cp_min_salary employees.salary%type) is select first_name||' '||last_name||' '||salary from employees where salary > cp_min_salary; -- nested table type t_emp is table of varchar2(100); emp1 t_emp; emp2 t_emp; emp_multi t_emp; BEGIN open c_emp_salary_lt(5000); fetch c_emp_salary_lt bulk collect into emp1; close c_emp_salary_lt; open c_emp_salary_lt(15000); fetch c_emp_salary_lt bulk collect into emp2; close c_emp_salary_lt; -- multiset fu… text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:null_werte_case https://trust-box.at/dokuwiki/doku.php?id=kurs:null_werte_case&rev=1410376975&do=diff declare v_bool boolean; v_out varchar2(10); begin v_bool := ('' is null); -- v_bool := (null = null); if v_bool = true then dbms_output.put_line('true'); elsif v_bool = false then dbms_output.put_line('false'); else dbms_output.put_line('null'); end if; v_out := case v_bool when true then 'true' when false then 'false' when null then 'null' -- else 'grosses Problem' end; dbms_output.put_line(v_out); end; text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:oar_php_1 https://trust-box.at/dokuwiki/doku.php?id=kurs:oar_php_1&rev=1410376975&do=diff Login <?php $co = @ocilogon('HR','tiger'); //Datenbank Anmeldung (Schemaname, Passwort{,SID}) $sql = 'select* from jobs'; // Fehlerausgabe if(!$co){ $a_fehler = ocierror(); // Oracle Fehlermeldung echo('<p>Fehler Nr'); echo($a_fehler['code']); echo('br'); echo($a_fehler['message']."<br>"); die(); // beendet das Script } else { // die Datenbank ansprechen echo('verbunden mit '.ociserverversion($co).'<br>'); // gibt die Oracle Version zurück // die Verbindung schließen ocilogoff($co);… text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:oar_php_2 https://trust-box.at/dokuwiki/doku.php?id=kurs:oar_php_2&rev=1410376975&do=diff Abfrage testen das Login-Script mit folgender Funktion erweitern: function prüfen($co,$sql){ return ociparse($co,$sql); } ergibt: <?php $co = @ocilogon('HR','tiger'); //Datenbank Anmeldung (Schemaname, Passwort{,SID}) $sql = 'select* from jobs'; // Abfrage testen function prüfen($co,$sql){ return ociparse($co,$sql); } // Fehlerausgabe if(!$co){ $a_fehler = ocierror(); // Oracle Fehlermeldung echo('<p>Fehler Nr'); echo($a_fehler['code']); echo('br'); echo($a_fehler['message']."<br… text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:oar_php_3 https://trust-box.at/dokuwiki/doku.php?id=kurs:oar_php_3&rev=1410376975&do=diff Abfrage ausführen das Login-Script mit folgender Funktion erweitern: function handle($result){ return ociexecute($result); } und in der Fehlerausgabe den else-Part erneuern: $result = prüfen($co,$sql); print(handle($result)); ergibt: <?php $co = @ocilogon('HR','tiger'); //Datenbank Anmeldung (Schemaname, Passwort{,SID}) $sql = 'select* from jobs'; // Abfrage testen function prüfen($co,$sql){ return ociparse($co,$sql); } // Abfrage ausführen function handle($result){ return ocie… text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:oar_php_4 https://trust-box.at/dokuwiki/doku.php?id=kurs:oar_php_4&rev=1410376975&do=diff Spaltenname ausgeben das Login-Script mit folgender Funktion erweitern: function spalte($result,$no){ return ocicolumnname($result,$no); } und in der Fehlerausgabe den else-Part erneuern: print(spalte($result,2)."<br>"); ergibt: <?php $co = @ocilogon('HR','tiger'); //Datenbank Anmeldung (Schemaname, Passwort{,SID}) $sql = 'select* from jobs'; // Abfrage testen function prüfen($co,$sql){ return ociparse($co,$sql); } // Abfrage ausführen function handle($result){ return ociexecute… text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:oar_php_5 https://trust-box.at/dokuwiki/doku.php?id=kurs:oar_php_5&rev=1410376975&do=diff Spaltenanzahl ermitteln das Login-Script mit folgender Funktion erweitern: function spalte_anz($result){ return ocinumcols($result); } und in der Fehlerausgabe den else-Part erneuern: print(spalte_anz($result)."<br>"); ergibt: <?php $co = @ocilogon('HR','tiger'); //Datenbank Anmeldung (Schemaname, Passwort{,SID}) $sql = 'select* from jobs'; // Abfrage testen function prüfen($co,$sql){ return ociparse($co,$sql); } // Abfrage ausführen function handle($result){ return ociexecute($result… text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:oar_php_6 https://trust-box.at/dokuwiki/doku.php?id=kurs:oar_php_6&rev=1410376975&do=diff alle Spaltennamen ausgeben das Login-Script mit folgender Funktion erweitern: function spalte_alle($result){ $z = spalte_anz($result); for ($i=1; $i<=$z; $i++){ print(spalte_name($result,$i)."<br>"); } } und in der Fehlerausgabe den else-Part erneuern: text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:oar_php_11 https://trust-box.at/dokuwiki/doku.php?id=kurs:oar_php_11&rev=1410376975&do=diff Das finale Script <?php $co = @ocilogon('HR','tiger'); //Datenbank Anmeldung (Schemaname, Passwort{,SID}) $sql = 'select* from jobs'; // Abfrage testen function prüfen($co,$sql){ return ociparse($co,$sql); } // Abfrage ausführen function handle($result){ return ociexecute($result); } // Spaltennamenausgabe function spalte_name($result,$no){ return ocicolumnname($result,$no); } // Spaltenanzahl ermitteln function spalte_anz($result){ return ocinumcols($result); } // alle Spaltennamen funct… text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:oo-error_classes https://trust-box.at/dokuwiki/doku.php?id=kurs:oo-error_classes&rev=1410376975&do=diff ## CatchDivByZero.pl use strict; use warnings; use Error qw(:try); use Arithmetic; use DivByZero; my $a = 10; my $b = 0; my $result; try { $result = Arithmetic::divide($a,$b); } catch DivByZero with { ## catch it here and not in the Class Arithmetic.pm $b = 1; ## so we can still do something else and not just die there $result = Arithmetic::divide($a,$b); } catch Error with { my $e = shift; print "Unhandled Exception $e\n"; }; printf "The result is %d\n", $resul… text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:oo-factory https://trust-box.at/dokuwiki/doku.php?id=kurs:oo-factory&rev=1410376975&do=diff Files: * lib/Check * lib/Check/Ping.pm * lib/Check/Telnet.pm * lib/Check.pm * t/AvailCheck.t ## t/AvailCheck.t use Test::More tests => 2; BEGIN { use_ok('AvailCheck') }; use Data::Dumper; my $opt = [ {service => 'ping', server=>'server1'}, {service => 'telnet', server=>'server1'}, {service => 'telnet', server=>'server2'}, {service => 'ping', server=>'server2'}, ]; use Check; my $check_factory = Check->new; my $check = $check_factory->get_check_object('ping'); i… text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:opendir https://trust-box.at/dokuwiki/doku.php?id=kurs:opendir&rev=1410376975&do=diff use strict; use warnings; opendir (DIR, '.'); my @dir = readdir(DIR); $, = "\n"; print @dir; text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:ora_1 https://trust-box.at/dokuwiki/doku.php?id=kurs:ora_1&rev=1410376975&do=diff <?php function oracle_kontakt($sql,&$co,$user='scott',$passwort='tiger'){ $co = @ocilogon($user,$passwort); // Anmeldung if(!$co){ $a_fehler = ocierror(); // Oracle Fehlermeldung echo('<p>Fehler Nr'); echo($a_fehler['code']); echo('br'); echo($a_fehler['message']."<br>"); die(); // beendet das Script } $result = ociparse($co,$sql); // Abfrage testen if (!$result){ die('Fehler bei ociparse'); // Beenden bei Fehler } $ausführen = ociexecute($result); // Abfrage ausführen… text/html 2021-10-06T13:41:52+0200 Anonymous (anonymous@undisclosed.example.com) kurs:oracle-admin https://trust-box.at/dokuwiki/doku.php?id=kurs:oracle-admin&rev=1633520512&do=diff Installation Oracle Linux created partioned table exp - imp Passwörter ändern, accounts öffnen C:\>cd app\hofstetterm\product\11.1.0\db_1\BIN C:\app\hofstetterm\product\11.1.0\db_1\BIN>sqlplus /nolog SQL*Plus: Release 11.1.0.6.0 - Production on Mi Okt 21 09:18:16 2009 Copyright (c) 1982, 2007, Oracle. All rights reserved. SQL> connect / as sysdba Connect durchgef³hrt. SQL> connect / as sysdba SQL> alter user hr identified by hr account unlock; text/html 2022-03-14T14:23:09+0200 Anonymous (anonymous@undisclosed.example.com) kurs:oracle-advanced-sql https://trust-box.at/dokuwiki/doku.php?id=kurs:oracle-advanced-sql&rev=1647264189&do=diff RDBMS DB Sprachen Fragen Dezember 2018 3rd party software bind variablen in sqlplus einfache selects CTE Common Table Expression - With Clause Relationen Data Dictionary Views bind und substitution variablen sessions + transactionen indices case datum oracle outer joins joins joins - subsetvergleich beispiele any all rownum limit overlaps sets Gruppenoperatoren metadata aggregat/summenfunktionen listagg rank pivot group by Beispiele eine Tabelle mehrfach verwenden se… text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:oracle-allgemein https://trust-box.at/dokuwiki/doku.php?id=kurs:oracle-allgemein&rev=1410376975&do=diff <http://xkcd.com/327/> Oracle Performance Tuning <http://www.geocities.com/kensanata/tuning/performa.pdf> bitmap indices bei Spalten niedriger Kardinalität regex bei oracle 9 text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:oracle-apex https://trust-box.at/dokuwiki/doku.php?id=kurs:oracle-apex&rev=1410376975&do=diff Installation admin lov_countries create calendar page from excel text/html 2016-10-19T14:10:48+0200 Anonymous (anonymous@undisclosed.example.com) kurs:oracle-database-11 https://trust-box.at/dokuwiki/doku.php?id=kurs:oracle-database-11&rev=1476879048&do=diff Installation 11g ASM SQL Plan Management Flashback Table rman create enterprise manager expdb-impdp text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:oracle-forms https://trust-box.at/dokuwiki/doku.php?id=kurs:oracle-forms&rev=1410376975&do=diff die umgebungsvariable TNS_ADMIN auf C:\oracle\product\10.2.0\db_1\NETWORK\ADMIN setzen Reference Guide von Oracle mit 1564 Seiten text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:oracle-kurs https://trust-box.at/dokuwiki/doku.php?id=kurs:oracle-kurs&rev=1410376975&do=diff beispiel schemata <http://www.oracle.com/technology/obe/obe1013jdev/common/OBEConnection.htm> <http://www.oracle.com> <http://www.megaupload.com/?d=M2V0B6Q6> PLSQL Procedures nach Kurstagen geordnet P_procedures Record P_record Table P_Indexby_Scalar p_index_by_record p_fill_emp Cursor p_salary_cursor P_CURSOR p_cursor_feature p_bonus p_bonus_diff Error + Exception p_error p_raise_exception Packages salary Trigger journal trigger default value trigger … text/html 2015-01-13T14:00:00+0200 Anonymous (anonymous@undisclosed.example.com) kurs:oracle-php https://trust-box.at/dokuwiki/doku.php?id=kurs:oracle-php&rev=1421154000&do=diff <https://github.com/MarkHofstetter/kurs-employee> Installation php apache oracle pear installation PHPUnit Doctrine Doctrine demo.php einfachste form employees.php employees_tables.php Entwickeln mit PHPUnit hash-of-hashes.php test-db.php list-table.php Employees per Department Teilnehmer php forms demo pear-db.php php oci8 oracle-cookbook php bind param sql top mit und ohne bind param php OO php class hr-class ajax-add2 ajax-get-emp + css zend2 + doctrine text/html 2016-05-04T15:18:13+0200 Anonymous (anonymous@undisclosed.example.com) kurs:oracle-pl-sql https://trust-box.at/dokuwiki/doku.php?id=kurs:oracle-pl-sql&rev=1462367893&do=diff Fragen: + alter session set NLS_NUMERIC_CHARACTERS = '.,'; bind variablen im SQL einfache add function, nimmt 2 Parameter und returniert die Summe funktion add function F_GET_EMPLOYEE_SALARY retourniert das salary Aufruf mit first_name, last_name. Das Gehalt wird um 10% erhöht, wenn der Angestellte länger als 10 Jahre angestellt ist text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:oracle-projekt https://trust-box.at/dokuwiki/doku.php?id=kurs:oracle-projekt&rev=1410376975&do=diff wifi-projekt@trust-box.at Aufgaben oracle listener tnsnames Software * apache * php * oracle * Application Server Organisation * wiki <http://hofstetter.at/dokuwiki> * cvs * server <http://www.nongnu.org/cvs/> * client <http://www.tortoisecvs.org/> * mail * chat * ICQ zb <http://gaim.sourceforge.net/downloads.php> * skype Projektmanagement zb <http://de.wikipedia.org/wiki/Scrum> Testen <http://www.lastcraft.com/simple_test.php> text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:oracle-sql https://trust-box.at/dokuwiki/doku.php?id=kurs:oracle-sql&rev=1410376975&do=diff einfache selects distinct nur auf einzelne Spalten text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:oracle https://trust-box.at/dokuwiki/doku.php?id=kurs:oracle&rev=1410376975&do=diff v_Installation v_Forms v_PL_SQL PL_SQL text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:oracle_listener_tnsnames https://trust-box.at/dokuwiki/doku.php?id=kurs:oracle_listener_tnsnames&rev=1410376975&do=diff im command fenster C:\Dokumente und Einstellungen\Administrator>cd \ C:\>cd oracle\product\10.1.0\Db_1\NETWORK\ADMIN ip Adresse entstprend anpassen C:\oracle\product\101~1.0\Db_1\NETWORK\ADMIN>cd ..\..\BIN für apache + php <http://www.oracle.com/technology/pub/notes/technote_php_instant.html> für 'fast' funktionierende Verbindung von Devrim text/html 2021-02-27T18:21:03+0200 Anonymous (anonymous@undisclosed.example.com) kurs:oracle_outer_joins https://trust-box.at/dokuwiki/doku.php?id=kurs:oracle_outer_joins&rev=1614446463&do=diff <https://docs.oracle.com/database/121/SQLRF/queries006.htm#SQLRF52354> Oracle recommends that you use the FROM clause OUTER JOIN syntax rather than the Oracle join operator. Outer join queries that use the Oracle join operator (+) are subject to the following rules and restrictions, which do not apply to the FROM clause OUTER JOIN syntax: text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:oracle_text https://trust-box.at/dokuwiki/doku.php?id=kurs:oracle_text&rev=1410376975&do=diff oracle text text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:overlaps https://trust-box.at/dokuwiki/doku.php?id=kurs:overlaps&rev=1410376975&do=diff select last_name, hire_date, hire_date + to_yminterval('1-0') end_date from employees where (hire_date, hire_date + to_yminterval('1-0')) overlaps (to_date('20030501', 'yyyymmdd'), to_date('20051015', 'yyyymmdd')) order by hire_date text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:p_bonus https://trust-box.at/dokuwiki/doku.php?id=kurs:p_bonus&rev=1410376975&do=diff PROCEDURE P_BONUS IS cursor c_bonus is SELECT is_emp_bonus.last_name, is_emp_bonus.salary, is_emp_bonus.bonus FROM is_emp_bonus order by is_emp_bonus.salary DESC for update of bonus; type bon_rec_record_type is record (last_name is_emp_bonus.last_name%TYPE, salary is_emp_bonus.salary%TYPE, bonus is_emp_bonus.bonus%TYPE); bon_rec bon_rec_record_type; v_bonus number(30,2); BEGIN for bon_rec in c_bonus loop v_bonus := 0.2; if bo… text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:p_bonus_diff https://trust-box.at/dokuwiki/doku.php?id=kurs:p_bonus_diff&rev=1410376975&do=diff PROCEDURE P_BONUS_DIFF IS cursor c_emp_sal is SELECT emp_bonus.last_name, emp_bonus.salary FROM emp_bonus ORDER BY emp_bonus.salary DESC for update of bonus; v_old_name emp_bonus.last_name%TYPE; v_new_name emp_bonus.last_name%TYPE; v_new_salary emp_bonus.salary%TYPE; v_old_salary emp_bonus.salary%TYPE; v_diff number(30,2); v_bonus number(30,2); BEGIN open c_emp_sal; --fetch c_emp_sal into v_old_name, v_old_salary; loop fetch c_emp_s… text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:p_cursor https://trust-box.at/dokuwiki/doku.php?id=kurs:p_cursor&rev=1410376975&do=diff PROCEDURE P_CURSOR IS cursor c_max_salary IS SELECT jobs.job_id, jobs.job_title, jobs.min_salary, jobs.max_salary FROM jobs ORDER BY jobs.max_salary DESC; jobs_rec jobs%ROWTYPE; BEGIN open c_max_salary; for i IN 1..9 Loop fetch c_max_salary INTO jobs_rec; dbms_output.put_line('Gefeuert wird'|| jobs_rec.job_title || 'weil er' || jobs_rec.max_salary || 'verdient'); end loop;… text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:p_cursor_feature https://trust-box.at/dokuwiki/doku.php?id=kurs:p_cursor_feature&rev=1410376975&do=diff PROCEDURE P_CURSOR_FEATURES IS cursor cur_dep_emp is SELECT employees.first_name, employees.last_name, departments.department_name FROM employees, departments WHERE ( (departments.department_id = employees.department_id) AND (departments.department_name = 'Sales') ) ORDER BY employees.last_name ASC; type emp_dep_record_type IS RECORD (first_name employees.first_name%TYPE, last_name employees.last_name%TYPE, department… text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:p_error https://trust-box.at/dokuwiki/doku.php?id=kurs:p_error&rev=1410376975&do=diff PROCEDURE P_ERROR ( v_last_name IN employees.last_name%TYPE) IS v_emp_id number(30); BEGIN select employee_id into v_emp_id from employees where last_name = v_last_name; dbms_output.put_line(v_emp_id); EXCEPTION WHEN no_data_found THEN dbms_output.put_line('keine Daten'); WHEN too_many_rows THEN dbms_output.put_line('zuviele Daten'); when others then dbms_output.put_line('irgendein Fehler '||SQLCODE); END; -- Procedure text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:p_fill_emp https://trust-box.at/dokuwiki/doku.php?id=kurs:p_fill_emp&rev=1410376975&do=diff PROCEDURE P_FILL_EMP_BONUS IS type emp_rec_table is table of employees%ROWTYPE index by binary_integer; first_index number(30); last_index number(30); emp_rec emp_rec_table; BEGIN select min(employee_id), max(employee_id) into first_index, last_index from employees; for i in first_index..last_index loop select * into emp_rec(i) from employees where employee_id = i; end loop; for i in emp_rec.f… text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:p_index_by_record https://trust-box.at/dokuwiki/doku.php?id=kurs:p_index_by_record&rev=1410376975&do=diff PROCEDURE P_INDEX_BY_RECORD IS TYPE person_type IS RECORD ( vorname VARCHAR (20), nachname VARCHAR (20) ); TYPE person_type_table IS TABLE OF person_type INDEX BY BINARY_INTEGER; person person_type; person_table person_type_table; BEGIN person.vorname := 'Mark'; person.nachname := 'Hofstetter'; person_table (1).vorname := 'Irene'; person_table (1).nachname := 'Kaiser'; person_table (13).vorname := 'Christian'; person_table (13).… text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:p_indexby_scalar https://trust-box.at/dokuwiki/doku.php?id=kurs:p_indexby_scalar&rev=1410376975&do=diff PROCEDURE P_INDEXBY_SKCALAR (v_last_name in varchar) IS TYPE emp_name_table_type IS table of employees.last_name%type index by binary_integer; emp_name_table emp_name_table_type; v_ind number(30); BEGIN select employee_id into v_ind from employees where lower(v_last_name) = lower(last_name); emp_name_table(v_ind) := v_last_name; dbms_output.put_line(v_ind||', '||emp_name_table(v_ind)||', '||emp_name_table.count||' Obj.'); END; text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:p_procedures https://trust-box.at/dokuwiki/doku.php?id=kurs:p_procedures&rev=1410376975&do=diff Kurstag 3: p_error p_raise_exception Bonus Update Cursor For Cursor Features Kurstag 2: Insert Salary Bonus Cursor Cursor Kurstag 1: Cast Index by Scalar Create with Loop Delete text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:p_raise_exception https://trust-box.at/dokuwiki/doku.php?id=kurs:p_raise_exception&rev=1410376975&do=diff PROCEDURE P_RAISE_EXCEPTION ( v_last_name IN varchar2, v_salary IN number) IS zuviele_personen exception; BEGIN update employees set salary = v_salary where last_name = v_last_name; if SQL%ROWCOUNT>1 then raise zuviele_personen; end if; -- commit; EXCEPTION WHEN zuviele_personen THEN rollback; dbms_output.put_line('zuviel Personen'); raise_application_error(-20001, 'ganz furchtbar', TRUE); when others then rollback; END; -- Pr… text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:p_record https://trust-box.at/dokuwiki/doku.php?id=kurs:p_record&rev=1410376975&do=diff PROCEDURE P_RECORD (v_employee_id IN number) -- (v_employee_id IN employees.employee_id%TYPE) IS type emp_record_type IS RECORD (last_name varchar2(25), job_id varchar2(10), salary number(8,2)); v_last_name varchar2(100); v_job_id varchar2(10); v_salary number(8,2); emp_rec emp_record_type; BEGIN SELECT employees.last_name, employees.job_id, employees.salary INTO emp_rec FROM employees WHERE employees.employee_… text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:p_salary_cursor https://trust-box.at/dokuwiki/doku.php?id=kurs:p_salary_cursor&rev=1410376975&do=diff CREATE OR REPLACE PROCEDURE p_salary_cursor IS cursor c_emp_sal is SELECT employees.last_name, employees.salary FROM employees order by employees.salary desc; v_old_name employees.last_name%TYPE; v_new_name employees.last_name%TYPE; v_new_salary employees.salary%TYPE; v_old_salary employees.salary%TYPE; v_diff number(30); BEGIN open c_emp_sal; fetch c_emp_sal into v_old_name, v_old_salary; for i in 1..10 loop fetch c_emp_sal i… text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:packages https://trust-box.at/dokuwiki/doku.php?id=kurs:packages&rev=1410376975&do=diff -- Start of DDL Script for Package HR.CHG_EMP -- Generated 6-Nov-2008 9:19:57 from HR@ORCL CREATE OR REPLACE PACKAGE chg_emp IS p_tax number; dol2eur number := 1.2822; anrede varchar2(20) := 'Hallo'; anfang date := to_date('20000101', 'yyyymmdd'); avg_sal number; PROCEDURE get_emp ( emp_id IN number); PROCEDURE get_emp; /* procedure add_emp( p_employee_id number, p_first_name bonus.first_name%type, p_last_name bonus.last_n… text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:page_from_excel https://trust-box.at/dokuwiki/doku.php?id=kurs:page_from_excel&rev=1410376975&do=diff BIP und Inflationsrate text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:partition_rank https://trust-box.at/dokuwiki/doku.php?id=kurs:partition_rank&rev=1410376975&do=diff select first_name, last_name, department_name, salary, dep_avg_sal from ( select department_id, first_name, last_name, salary, round( avg(salary) over (partition by department_id) ) dep_avg_sal from employees ) e join departments d on e.department_id = d.department_id where salary > dep_avg_sal text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:passwort_aendern https://trust-box.at/dokuwiki/doku.php?id=kurs:passwort_aendern&rev=1410376975&do=diff use Net::SSH::Expect; $curr_pwd = 'test'; $new_pwd = 'blablablabla'; my $ssh = Net::SSH::Expect->new ( host => "localhost", password=> $curr_pwd, user => 'test', raw_pty => 1 ); my $login_output = $ssh->login(); if ($login_output !~ /Last login/) { die "Login has failed. Login output was $login_output"; } # my $ls = $ssh->exec("ls -l /"); # print($ls); $ssh->send("passwd"); $ssh->waitfor('password:\s*\z', 1) or die "prompt 'password' not fou nd after 1 secon… text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:pear-db.php https://trust-box.at/dokuwiki/doku.php?id=kurs:pear-db.php&rev=1410376975&do=diff <?php include_once('DB.php'); define("NR_DB_CONNECTION",'oci8://hr:hr@orcl11'); $dbh = DB::connect(NR_DB_CONNECTION); // prepare statment $stmt = "SELECT first_name, last_name FROM employees"; $result=$dbh->query($stmt); $mode = DB_FETCHMODE_ASSOC; while ($row = $result->fetchRow($mode)){ print "<pre>"; print_r($row); print "</pre>"; } // Database disconnect $result->free(); $dbh->disconnect(); ?> text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:pear https://trust-box.at/dokuwiki/doku.php?id=kurs:pear&rev=1410376975&do=diff pear channel-discover php-aop.googlecode.com/svn pear remote-list -c aop pear install -f aop/aop-1.0.0RC4 pear.doctrine-project.org PHPUnit pear channel-discover pear.phpunit.de pear install phpunit/PHPUnit pear upgrade pear config-set auto_discover 1 text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:perl-kurs https://trust-box.at/dokuwiki/doku.php?id=kurs:perl-kurs&rev=1410376975&do=diff Perl B�cher Installation wifi 1. Einheit 2. Einheit 3. Einheit 4. Einheit 5. Einheit 6. Einheit 7. Einheit 8. Einheit woerterbuch perl sysadmin <http://trust-box.at/test_access.log.gz> text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:perl_sysadmin https://trust-box.at/dokuwiki/doku.php?id=kurs:perl_sysadmin&rev=1410376975&do=diff passwort aendern logfile statistik text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:php4 https://trust-box.at/dokuwiki/doku.php?id=kurs:php4&rev=1410376975&do=diff Variablen <?php $user = 'Maxi Meierhuber'; print('Name: $user'.'<br>'); print("Name: $user".'<br>'); print('Name: '.$user); ?> Ergebnis Name: $user Name: Maxi Meierhuber Name: Maxi Meierhuber text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:php5 https://trust-box.at/dokuwiki/doku.php?id=kurs:php5&rev=1410376975&do=diff PrintF String formatieren <?php $preis = 5; $steuer = 0.2; printf( "Der Preis incl. MwSt. = %.2f ¤", $preis * (1 + $steuer) ); ?> <?php $plz = '1140'; $tag = 4; $monat = 2; $jahr = 2005; printf( "die Postleitzahl= %05d und <br> Datum = %05d.%02d.%d", $plz, $tag, $monat, $jahr); $min = -20; $max = 40; printf("<br>Der Motor kann von %+d bis %+d betrieben werden", $min, $max); ?> text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:php6 https://trust-box.at/dokuwiki/doku.php?id=kurs:php6&rev=1410376975&do=diff Alles klein schreiben print strtolower('FRANZ MUSTER'); Erster Buchstabe groß alle anderen klein print ucwords(strtolower('FRANZ MUSTER')); Länge des Strings: print strlen(' FRANZ MUSTER ')); Strings vorne und hinten die Leerzeichen beschneiden text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:php7 https://trust-box.at/dokuwiki/doku.php?id=kurs:php7&rev=1410376975&do=diff Übung 2 view code Heraustrennen und ausgeben des Textes jung und schön ohne Sorgen aus folgendem String: An dem reinsten Frühlingsmorgen ging die Schäferin und sang, jung und schön ohne Sorgen, daß es durch die Felder klang, so la la! le ralla! Übung 3 text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:php7_1 https://trust-box.at/dokuwiki/doku.php?id=kurs:php7_1&rev=1410376975&do=diff Übung 2 Heraustrennen und ausgeben des Textes jung und schön ohne Sorgen aus folgendem String: An dem reinsten Frühlingsmorgen ging die Schäferin und sang, jung und schön ohne Sorgen, daß es durch die Felder klang, so la la! le ralla! <?php $text = 'An dem reinsten Frühlingsmorgen ging die Schäferin und sang, jung und schön ohne Sorgen, daß es durch die Felder klang, so la la! le ralla!'; $start = stripos($text,'jung '); $ende = stripos($text,'Sorgen'); $lang = ($ende-$start)+strlen('S… text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:php7_4 https://trust-box.at/dokuwiki/doku.php?id=kurs:php7_4&rev=1410376975&do=diff <?php print <<<karte <html> <body bgcolor='#99CC00'> <h1>Speisekarte:</h1> <table border=0> <tr> <td colspan=2><b>Menu 1</b></td> </tr> <tr> <td width=20>&nbsp</td> <td>Rindsuppe mit Leberknödel</td> </tr> <tr> <td width=20>&nbsp</td> <td>Ente mit Jägersalat</td> </tr> <tr> <td colspan=2><b>Menü 2</b></td> </tr> <tr> <td width=20>&nbsp</td> <td>Haifischflossensuppe</td> </tr> <tr> <td width=20>&nbsp</td> <td>Rindfleisch Cow.Fun</td> </tr> </table> karte; ?> text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:php8 https://trust-box.at/dokuwiki/doku.php?id=kurs:php8&rev=1410376975&do=diff Module X = 12%5 gibt den Restwert der Division zurück (in diesem Fall 2) text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:php9.1 https://trust-box.at/dokuwiki/doku.php?id=kurs:php9.1&rev=1410376975&do=diff Foreach Schleife: <?php print("<table>"); foreach($computer as $key => $wert){ print("<tr><td>".$key."</td><td align=right>".$wert."</td></tr>"); } print("</table>"); ?> Ausgabe IBM 2318Acer 679Greenline 790Siemens 0 text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:php9.2 https://trust-box.at/dokuwiki/doku.php?id=kurs:php9.2&rev=1410376975&do=diff implode: <?php print("<table border='1'><tr><td>"); print(implode("</td></tr><tr><td>",$musik)); print("</td></tr></table>"); ?> Ausgabe Folk Hip Hop Klassik Pop Rock text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:php9.3 https://trust-box.at/dokuwiki/doku.php?id=kurs:php9.3&rev=1410376975&do=diff explode: <?php $tiere = "Hund, Katze, Vogel, Schlange"; $a_tiere = explode(", ",$tiere); print("<table border='1'><tr><td>"); print(implode("</td></tr><tr><td>",$a_tiere)); print("</td></tr></table>"); ?> oder: <?php $tiere = "Hund, Katze, Vogel, Schlange"; $a_tiere = explode(", ",$tiere); print("<table border='1'>"); foreach($a_tiere as $wert){ print("<tr><td>".$wert."</td></tr>"); } print("</td></tr></table>"); ?> text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:php9.4 https://trust-box.at/dokuwiki/doku.php?id=kurs:php9.4&rev=1410376975&do=diff HTML Kopf und Fuss <?php function HTML_Kopf($titel){ print("<html> <head> <title>$titel</title> </head> <body>"); } function HTML_Fuss(){ print("</body> </html>"); } HTML_Kopf('Testseite'); print("Bodytext"); HTML_Fuss(); ?> text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:php9.5 https://trust-box.at/dokuwiki/doku.php?id=kurs:php9.5&rev=1410376975&do=diff HTML Kopf und Fuss mit optionalen Parametern function HTML_Kopf($titel='Titel', $farbe='ffffff'){ print("<html><head> <title>$titel</title> </head> <body bgcolor='#$farbe'>"); } function HTML_Fuss(){ print("</body> </html>"); } HTML_Kopf('Testseite','ccFFcc'); print("Bodytext"); HTML_Fuss(); ?> text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:php9.6 https://trust-box.at/dokuwiki/doku.php?id=kurs:php9.6&rev=1410376975&do=diff simple Addition Übergeben Sie einer Funktion 4 Werte. Addieren Sie diese in der Funktion und geben Sie die Funktion zurück. Überprüfen Sie anschließend ob die Summe größer als 20 ist. <?php function add($a,$b){ return $a+$b; }; $summe = add(add(4,6),add(3,8)); if ($summe > 20){ print("So viel Finger hab ich nicht!! (4 + 6 + 3 + 8)"); } else { print("4 + 6 + 3 + 8 = $summe"); } ?> text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:php9.7 https://trust-box.at/dokuwiki/doku.php?id=kurs:php9.7&rev=1410376975&do=diff Rückgabe in ein Array <?php $netto =200; function MwSt($netto){ $MwSt = 0.2; $steuer = $netto*$MwSt; $brutto = $netto + $steuer; return array($steuer,$brutto); }; $a_erg = MwSt($netto); print("<table><tr><td>Netto</td><td align=right>$netto</td></tr>"); print("<tr><td>MwSt</td><td align=right>$a_erg[0]</td></tr>"); print("<tr><td height='1' colspan=2 bgcolor='000000'><img src='no.gif' height=1></td></tr>"); print("<tr><td>Brutto</td><td align=right>$a_erg[1]</td></tr></table>"); ?> text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:php9.8 https://trust-box.at/dokuwiki/doku.php?id=kurs:php9.8&rev=1410376975&do=diff Werteübergabe als Referenz <?php function runterzählen(&$start){ //Adresse wird als Argument übergeben while($start > 0){ print("$start ...<br>"); $start--; //Wert der Adresse wird geändert } print("Booommmmm!<br>"); } $zahl = 5; runterzählen($zahl); //damit wird auch der Wert übergeben print('Inhalt von $zahl = '.$zahl); ?> text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:php9.9 https://trust-box.at/dokuwiki/doku.php?id=kurs:php9.9&rev=1410376975&do=diff Geltungsbereich für Variablen <?php function add($a,$b){ global $z; // erweitert Geltungsbereich $z = 10; // Zuweisung gilt im ganzen Script print('Test $z in add-Funktion '.$z.'<br>'); return $a + $b; } function plus($a){ $b = 100; $a++; ++$b; print('Test $b in plus-Function '.$b.'<br>'); return $a; } #### Main #### $z = 30; // wird überschrieben add(4,9); print('Test $z in Main '.$z.'<br>'); $b = 20; $a = plus(20); echo '$a -> '.$a.' $b -> '.$b.'<br>'; ?> text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:php9 https://trust-box.at/dokuwiki/doku.php?id=kurs:php9&rev=1410376975&do=diff Arrays Foreach Schleife view code implode view code explode view code Funktionen HTML Kopf und Fuss view code HTML K&F mit optionalen Parametern view code simple Addition view code Rückgabe in ein Array view code Übergabe als Referenz view code Variablen Geltungsbereich text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:php10 https://trust-box.at/dokuwiki/doku.php?id=kurs:php10&rev=1410376975&do=diff Übungsbeispiel: Erstelle eine Funktion, die automatisch eine HTML-Tabelle erstellt, welche mit Hilfe von “explode” oder “implode” die Tabelle befüllt. <?php // Funktion für den HTML-Dokument Start function HTML_Kopf($titel='Titel', $farbe='ffffff'){ print("<html><head> <title>$titel</title> </head> <body bgcolor='#$farbe'>"); } // Funktion für den HTML-Dokument Ende function HTML_Fuss(){ print("</body> </html>"); } // Funktion zur erstellung der Tabelle function Tabelle($inhalt,$t… text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:php11 https://trust-box.at/dokuwiki/doku.php?id=kurs:php11&rev=1410376975&do=diff Arbeiten mit Oracle und PHP Einwählen view code Abfrage prüfen view code Abfrage ausführen view code Spaltenname ausgeben view code Spaltenanzahl ermitteln view code alle Spaltenname ausgeben view code Datenzeilen abfragen text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:php12 https://trust-box.at/dokuwiki/doku.php?id=kurs:php12&rev=1410376975&do=diff Mit Oracle Tabelle arbeiten Tabellen erstellen view code Tabellen befüllen view code Bestell-Formular view code text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:php12_1 https://trust-box.at/dokuwiki/doku.php?id=kurs:php12_1&rev=1410376975&do=diff Tabellen erstellen <?php $db = ocilogon("scott","tiger"); // SQL code zum Anlegen der Tabelle PIZZA $tab_pizza = "create table PIZZA ( P_NR number(7) Not Null, P_NAME varchar2(30), P_PREIS number(4,2), primary key(P_NR) ) tablespace Users"; // SQL code zum Anlegen der Tabelle BESTELLUNG $tab_bestellung = "create table BESTELLUNG( B_NR number(7) Not Null,… text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:php12_2 https://trust-box.at/dokuwiki/doku.php?id=kurs:php12_2&rev=1410376975&do=diff Tabellen befüllen <?php // Mit Datenbank verbinden $db = ocilogon("scott","tiger"); // den höchsten Wert des Primary Key ermitteln $prim_max_a = "select max(P_NR) from PIZZA"; $prim_max_b = ociparse($db,$prim_max_a); ociexecute($prim_max_b); ocifetch($prim_max_b); $p_Nr = ociresult($prim_max_b,1); // Array mit den Pizzanamen und deren Preis anlegen $a_pizza = array( "Pizza Napoli" => "5,20", "Pizza Funghi" => "5,70", "Pizza Mare" => "6,70", "Pizza Tonno" => "6,40", "P… text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:php12_3 https://trust-box.at/dokuwiki/doku.php?id=kurs:php12_3&rev=1410376975&do=diff Bestell-Formular Am Anfang fur ich ein php-Dokument auf, include '..\basics\HTML.php'; in dem ich die Funktionen für HTML-Kopf und HTML-Fuss definiert habe include '..\basics\HTML.php'; function falsch($text,$url='$_SERVER[PHP_SELF]'){ print("<br><A HREF=$_url>$text</A>"); } function frm_zeige($fehler=''){ HTML_Begin("Pizzabestellung"); $db = ocilogon("scott", "tiger"); $sql_select = "select * from pizza"; $result = ociparse($db, $sql_select); ociexecute($result) or die(); if (… text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:php_apache_oracle https://trust-box.at/dokuwiki/doku.php?id=kurs:php_apache_oracle&rev=1410376975&do=diff Hinweis: Diese Angaben sind 100% Kopien von der Konfiguration meiner Machine. Bei mir funktioniert die Verbindung, ich denke nicht dass es die Ideale ist aber für jetzt es ist genug. Die Ordnernamen, NETSERVICE namen stammen aus meinem Computer, können jederzeit verändert werden. text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:php_bind_param https://trust-box.at/dokuwiki/doku.php?id=kurs:php_bind_param&rev=1410376975&do=diff <?php require_once('db_login.php'); $first_name = 'Ellen'; $last_name = 'Abel'; $sql = sprintf("select * from employees where first_name='%s' and last_name='%s'", $first_name, $last_name); print $sql; $q = oci_parse($db, $sql); $r = oci_execute($q, OCI_DEFAULT); $row = oci_fetch_array($q,OCI_ASSOC); print "<pre>\n"; print_r($row); print_r($_REQUEST); print "</pre>\n"; // mit bind param $sql = "select * from employees where first_name=:first_name and last_name=:last_name"; $q … text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:php_class https://trust-box.at/dokuwiki/doku.php?id=kurs:php_class&rev=1410376975&do=diff HRDB.php employees.php <?php require('DB-Classes/Employee.php'); $employee = new Employee(100); //$employee->connect(); $employee->read(); print $employee->last_name ."\n"; $employee->dump(); $new_employee = new Employee(0); $new_employee->first_name = 'Mark'; $new_employee->last_name = 'Hofstetter'; $new_employee->email = 'jo@eh'; $new_employee->job_id = 'IT_PROG'; $new_employee->store(); $new_employee->dump(); ?> text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:php_forms_demo https://trust-box.at/dokuwiki/doku.php?id=kurs:php_forms_demo&rev=1410376975&do=diff get_emp_by_name.html ruft get_emp_by_name.php oder als stand alone get_emp_by_name2.php braucht functions.php text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:php_oo https://trust-box.at/dokuwiki/doku.php?id=kurs:php_oo&rev=1410376975&do=diff <?php include_once "DB.php"; $dbo = new DB; $dbo->dbconnect(); $q = oci_parse($dbo->db, "select * from employees"); $r = oci_execute($q, OCI_DEFAULT); print "Return $r\n"; $ncols = oci_num_fields($q); for ($i = 1; $i <= $ncols; $i++) { $column_name = oci_field_name($q, $i); $trow[] = $column_name; } $table[] = $trow; while ($row = oci_fetch_array($q, OCI_ASSOC+OCI_RETURN_NULLS)) { $table[] = $row; } $dbo->print_table($table); ?> text/html 2015-04-23T13:10:50+0200 Anonymous (anonymous@undisclosed.example.com) kurs:pipelined_function_mit_oracle_data_type https://trust-box.at/dokuwiki/doku.php?id=kurs:pipelined_function_mit_oracle_data_type&rev=1429787450&do=diff CREATE OR REPLACE TYPE T_DATE AS TABLE OF date; CREATE OR REPLACE FUNCTION GET_DAYS_OF_MONTH (p_year number, p_month number) RETURN t_date pipelined AS v_date_last date; v_date date; BEGIN v_date := to_date(p_year||lpad(p_month, 2, 0)||'01', 'yyyymmdd'); v_date_last := last_day(v_date); while v_date <= v_date_last loop -- v_date := v_date + 1; pipe row(v_date); v_date := v_date + to_dsinterval('1 00:00:00'); end loop; return; END GET_DAYS_OF_MONTH; text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:pipelined_functions_in_packages_mit_table_of_record_return https://trust-box.at/dokuwiki/doku.php?id=kurs:pipelined_functions_in_packages_mit_table_of_record_return&rev=1410376975&do=diff CREATE OR REPLACE PACKAGE return_recordtable IS cursor c_emp(c_p_salary number) is select first_name, last_name, salary fullname from emp where salary < c_p_salary; type t_emp is table of c_emp%rowtype; FUNCTION MAX_SALARY_PIPE ( p_sal_max IN number) RETURN t_emp pipelined ; END; -- Package spec / CREATE OR REPLACE PACKAGE BODY return_recordtable IS FUNCTION MAX_SALARY_PIPE ( p_sal_max IN number) RETURN t_emp pipelined IS BEGIN for r in c_emp(p_s… text/html 2022-03-14T14:24:08+0200 Anonymous (anonymous@undisclosed.example.com) kurs:pivot https://trust-box.at/dokuwiki/doku.php?id=kurs:pivot&rev=1647264248&do=diff with cte_quartal as ( select employee_id, employee_id emp_id, last_name, to_char(hire_date, 'Q') quartal from hr.employees ) select * from cte_quartal pivot ( count(employee_id) for quartal in ( '1' q1, '2' q2, '3' q3, '4' q4) ) text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:pizza_sql https://trust-box.at/dokuwiki/doku.php?id=kurs:pizza_sql&rev=1410376975&do=diff Tabellen anlegen Irene/31.1.2006/1.2.2006 DROP USER PIZZA; DROP USER PIZZA CASCADE; CREATE USER pizza IDENTIFIED BY <Enter User Password Here> DEFAULT TABLESPACE USERS TEMPORARY TABLESPACE TEMP / GRANT UNLIMITED TABLESPACE TO pizza / GRANT CONNECT TO pizza / GRANT RESOURCE TO pizza / ALTER USER pizza DEFAULT ROLE ALL / text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:pl_sql https://trust-box.at/dokuwiki/doku.php?id=kurs:pl_sql&rev=1410376975&do=diff * v_Procedure * v_Record * v_Table * v_Cursor text/html 2015-04-09T15:38:13+0200 Anonymous (anonymous@undisclosed.example.com) kurs:plsql_tables https://trust-box.at/dokuwiki/doku.php?id=kurs:plsql_tables&rev=1428586693&do=diff PLSQL Table übergeben -------------------------------------------------------- -- DDL for Package PCK_EMPLOYEES -------------------------------------------------------- CREATE OR REPLACE PACKAGE "HR"."PCK_EMPLOYEES" AS cursor c_emp_dep(cp_department_name varchar2) is select employee_id, first_name, last_name, salary, department_name from employees e join departments d on e.department_id = d.department_id where department_name = cp_dep… text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:plz.pl https://trust-box.at/dokuwiki/doku.php?id=kurs:plz.pl&rev=1410376975&do=diff use strict; use warnings; my $plz = $ARGV[0]; if ($plz =~ /^A[- ]{0,1}[1-9]\d{3}$/) { printf "%s ist eine PLZ\n", $plz; } else { printf "%s ist KEINE PLZ\n", $plz; } text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:postgresql-sql https://trust-box.at/dokuwiki/doku.php?id=kurs:postgresql-sql&rev=1410376975&do=diff datumsberechnungen text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:postgresql https://trust-box.at/dokuwiki/doku.php?id=kurs:postgresql&rev=1410376975&do=diff PostgreSQL Administration postgresql-administration PostgreSQL SQL für Fortgeschrittene postgresql-sql text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:procedure https://trust-box.at/dokuwiki/doku.php?id=kurs:procedure&rev=1410376975&do=diff PROCEDURE add_job_history ( p_emp_id job_history.employee_id%type , p_start_date job_history.start_date%type , p_end_date job_history.end_date%type , p_job_id job_history.job_id%type , p_department_id job_history.department_id%type ) text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:procedure_salary_diff https://trust-box.at/dokuwiki/doku.php?id=kurs:procedure_salary_diff&rev=1410376975&do=diff PROCEDURE SALARY_DIFF IS cursor bonus_salary is SELECT first_name, last_name, salary FROM bonus order by salary desc; v_first_name bonus.last_name%TYPE; v_last_name bonus.last_name%TYPE; v_salary bonus.salary%TYPE; v_diff bonus.salary%TYPE; v_old bonus.salary%TYPE; BEGIN open bonus_salary; select max(salary) into v_old from bonus; loop fetch bonus_salary into v_first_name, v_last_name, v_salary; exit whe… text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:procedure_salary_diff_simple_record https://trust-box.at/dokuwiki/doku.php?id=kurs:procedure_salary_diff_simple_record&rev=1410376975&do=diff PROCEDURE SALARY_DIFF IS cursor bonus_salary is SELECT first_name, last_name, salary FROM bonus order by salary desc; type bonus_salary_rec_type is record ( first_name bonus.last_name%TYPE, last_name bonus.last_name%TYPE, salary bonus.salary%TYPE); bonus_salary_rec bonus_salary_rec_type; v_diff bonus.salary%TYPE; v_old bonus.salary%TYPE; BEGIN open bonus_salary; select max(salary) into v_old from bonus; … text/html 2016-05-11T14:34:01+0200 Anonymous (anonymous@undisclosed.example.com) kurs:procedure_upsert_employee https://trust-box.at/dokuwiki/doku.php?id=kurs:procedure_upsert_employee&rev=1462970041&do=diff -- kurs vom 11.05.2016 CREATE OR REPLACE PROCEDURE P_UPSERT_EMP_COPY (p_first_name emp_copy.first_name%type, p_last_name emp_copy.last_name%type, p_email emp_copy.email%type, p_job_title jobs.job_title%type, p_department_name departments.department_name%type, p_salary emp_copy.salary%type, p_hire_date emp_copy.hire_date%type default sysdate, p_employee_id out emp_copy.employee_id%type ) AS /* lookup + d… text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:prozeduren https://trust-box.at/dokuwiki/doku.php?id=kurs:prozeduren&rev=1410376975&do=diff Prozeduren P_CURSOR_FEATURES Erstelle einen Cursor, der die ersten 5 Mitarbeiter (alphabethisch aufsteigend sortiert) eines Departments, das durch den User eingegeben wird, ausgibt. ---------- P_CURS_BONUS Erstelle einen Cursor, der allen Angestellten, die unter 5000 verdienen, einen Bonus von 20% text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:ps.sh https://trust-box.at/dokuwiki/doku.php?id=kurs:ps.sh&rev=1410376975&do=diff #!/bin/bash IFS=$'\n' for proz in `ps -fu $1` do echo $proz echo '***' done text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:pz_in https://trust-box.at/dokuwiki/doku.php?id=kurs:pz_in&rev=1410376975&do=diff Tabelle Pizzazutaten befüllen XL 01.02.06 Ob das Komma beim Preis ein “.” oder ein “,” sein muß, hängt von der System(Oracle)-Sprache ab. Ich hab auch nix gfunden um die Tabelle schneller (mit weniger Code) zu befüllen. “seq” ist übrigens unsere Sequence. text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:ramos https://trust-box.at/dokuwiki/doku.php?id=kurs:ramos&rev=1410376975&do=diff <curse> PROCEDURE add_job_history ( p_emp_id job_history.employee_id%type , p_start_date job_history.start_date%type , p_end_date job_history.end_date%type , p_job_id job_history.job_id%type , p_department_id job_history.department_id%type ) text/html 2024-03-05T15:29:57+0200 Anonymous (anonymous@undisclosed.example.com) kurs:rank https://trust-box.at/dokuwiki/doku.php?id=kurs:rank&rev=1709648997&do=diff SELECT * FROM ( SELECT employee_id, last_name, salary, RANK() OVER (ORDER BY salary DESC) EMPRANK FROM employees) where emprank > 10 and emprank < 13 -- WHERE emprank = 2; with cte_emp_dep as ( SELECT emp.first_name, emp.last_name, emp.salary, dep.department_name FROM employees emp left join departments dep on emp.department_id = dep.department_id where salary < 9000 ), cte_sal_bin as ( select cte_emp_dep.*, trunc(salary, -3) sal_bin from cte_emp_dep ), ct… text/html 2022-03-08T15:44:00+0200 Anonymous (anonymous@undisclosed.example.com) kurs:rdbms https://trust-box.at/dokuwiki/doku.php?id=kurs:rdbms&rev=1646750640&do=diff Relationale Datenbanksysteme * MySQL * PostgreSQL * MS SQL Server * Oracle * DB2 * sqlite SQL (DML) Client * SQL Developer * Toad * SQLplus * Tableau * R * SPSS <== Netzwerk (port 1521) ==> Server - Oracle text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:read_case.sh https://trust-box.at/dokuwiki/doku.php?id=kurs:read_case.sh&rev=1410376975&do=diff #!/bin/bash echo -n 'J oder N : ' read OK case $OK in J) echo Ja;; N) echo Nein;; *) echo Depp;; esac text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:references_sort https://trust-box.at/dokuwiki/doku.php?id=kurs:references_sort&rev=1410376975&do=diff use warnings; use Data::Dumper; use YAML; use Storable qw/nstore/; my @a = ('a', 'b', 'c'); my @b = qw/a b c d e/; my $teilnehmer = { Mark => {jahr => 1975, groesse => 175, bildung => [qw/vs ahs uni/]}, Sigi => {jahr => 1960, groesse => 180}, Rene => {jahr => 1983, groesse => 183}, Bernhard => {jahr => 1975}, Markus => {jahr => 1974, bildung => [qw/vs ahs/]}, Peter => {jahr => 1981}, Stephan => {jahr => 1976}, }; YAML::DumpFile('tn.yaml', $teilnehmer); … text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:regex_bei_oracle_9 https://trust-box.at/dokuwiki/doku.php?id=kurs:regex_bei_oracle_9&rev=1410376975&do=diff set echo on col comp_name for a30 spool textinstall.log Rem ======================================================================= Rem Start of Text loading Rem ======================================================================= EXECUTE dbms_registry.loading('CONTEXT', 'Oracle Text'); Rem dr0csys.sql <CTXSYS_password> <CTXSYS_TS_NAME> <TEMP_TS_NAME> start ?/ctx/admin/dr0csys ctxsys DRSYS TEMP *** NOTE: We assume that DRSYS tablespace already exists, if not create a *** tablespace fo… text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:regex_demo https://trust-box.at/dokuwiki/doku.php?id=kurs:regex_demo&rev=1410376975&do=diff PROCEDURE hr.regexp_demo ( v_s IN varchar2) IS BEGIN if REGEXP_LIKE(v_s, '^[[:alpha:]]{3}_') then dbms_output.put_line(v_s ||' entspricht'); else dbms_output.put_line(v_s ||' entspricht NICHT!'); end if; END; -- Procedure text/html 2017-03-21T10:02:03+0200 Anonymous (anonymous@undisclosed.example.com) kurs:regular_expression https://trust-box.at/dokuwiki/doku.php?id=kurs:regular_expression&rev=1490086923&do=diff Ermitteln ob in einer Spalte/Usereingabe eine PLZ steht select 'ist eine PLZ' from dual -- select coalesce(plz, 'n/a') from adressen -- where regexp_like('assaa-223421213', 'a-2234') -- ist enthalten -- where regexp_like('a-2234', '[Aa]-2234') -- grosses oder kleines A -- where regexp_like('A2234', '[Aa][ -]*2234') -- * keines oder beliebig viele -- where regexp_like('A2234', '[Aa][ -]{0,1}2234') -- 0 oder eines aus der Gruppe -- where regexp_like('A2123', '[Aa][ -]{0,1}[0-9]{4}') -- {x} gena… text/html 2022-03-07T13:22:42+0200 Anonymous (anonymous@undisclosed.example.com) kurs:relationen https://trust-box.at/dokuwiki/doku.php?id=kurs:relationen&rev=1646655762&do=diff Tabelle * Person * id (synthetisch und bedeutungslos) * SVNr * Name * Geburtsdatum (* Familienstand (pseudo enum) (V, W, L, ...) => Normalisiert) * familienstand_id (* Status (K G L)) 1 (Person) : n (email) one to many * Email * text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:rman https://trust-box.at/dokuwiki/doku.php?id=kurs:rman&rev=1410376975&do=diff rman oracle@r06pc04:~$ rlwrap rman target / Recovery Manager: Release 11.1.0.6.0 - Production on Thu Jan 29 13:14:37 2009 Copyright (c) 1982, 2007, Oracle. All rights reserved. connected to target database: ORCL (DBID=1204950473) RMAN> backup database; text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:roland_pflichtenheft https://trust-box.at/dokuwiki/doku.php?id=kurs:roland_pflichtenheft&rev=1410376975&do=diff Pflichtenheft Das Pflichtenheft für ein Wettbüro 1.) Eine Übersicht über die verschiedenen Arten der Wetten a.) Pferde Wetten 1.) Rennen in der Kriau; 2.) Rennen im Magna Racino; 3.) Rennen im Ausland[ England,Amerika,Australien ] b.) Fußball Wetten 1.) Österreichische Bundesliga; 2.) Deutsche Bundesliga; 3.) Enlische Premiere Liga c.) Rennsport Wetten 1.) Ralley National; 2.) Ralley International; 3.) Formel1 text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:rollup_und_cube https://trust-box.at/dokuwiki/doku.php?id=kurs:rollup_und_cube&rev=1410376975&do=diff select department_name, jj, sum(salary) from ( select department_name, regexp_replace(job_id, '^[[:alpha:]]{2}_', '') jj, salary from employees e, departments d where e.department_id = d.department_id ) group by cube (department_name, jj) text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:row_trigger https://trust-box.at/dokuwiki/doku.php?id=kurs:row_trigger&rev=1410376975&do=diff create table CREATE TABLE kreis (id NUMBER, radius NUMBER, flaeche NUMBER) PCTFREE 10 INITRANS 1 MAXTRANS 255 TABLESPACE users STORAGE ( INITIAL 65536 MINEXTENTS 1 MAXEXTENTS 2147483645 ) NOCACHE MONITORING / text/html 2015-10-27T09:42:00+0200 Anonymous (anonymous@undisclosed.example.com) kurs:rownum https://trust-box.at/dokuwiki/doku.php?id=kurs:rownum&rev=1445935320&do=diff Verschachtelte with-clause zum “Nachbauen” von limit with emp_sal_sort as ( select first_name, last_name, salary from employees order by salary desc ), emp_sal_sort_rn as ( select rownum rn, emp_sal_sort.* from emp_sal_sort ) select * from emp_sal_sort_rn where rn > 10 and rn <= 20 text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:salary https://trust-box.at/dokuwiki/doku.php?id=kurs:salary&rev=1410376975&do=diff Spec PACKAGE PCK_SALARY IS -- -- To modify this template, edit file PKGSPEC.TXT in TEMPLATE -- directory of SQL Navigator -- -- Purpose: Briefly explain the functionality of the package -- -- MODIFICATION HISTORY -- Person Date Comments -- --------- ------ ------------------------------------------ -- Enter package declarations as shown below tax_percent number; euro2dollar number; called_init boolean := false; PROCEDURE init; PROCEDURE calc_tax; PRO… text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:savepoints https://trust-box.at/dokuwiki/doku.php?id=kurs:savepoints&rev=1410376975&do=diff begin savepoint delete1; delete from bonus where last_name = 'King'; savepoint delete2; delete from bonus where last_name = 'Fay'; rollback to delete1; end; select count(*) from bonus; text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:schema_trigger https://trust-box.at/dokuwiki/doku.php?id=kurs:schema_trigger&rev=1410376975&do=diff table create table schema_object_log ( id number, actiondate date, username varchar2(100), action varchar2(100), objecttype varchar2(100), objectname varchar2(100) ); trigger CREATE OR REPLACE TRIGGER CREATE_TABLE_TRG BEFORE CREATE OR ALTER OR DROP ON HR.SCHEMA declare e_invalid_table_name exception; pragma exception_init (e_invalid_table_name, -20001); begin dbms_output.put_line(ora_sysevent||' '|| ora_dict_obj_owne… text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:schleifen https://trust-box.at/dokuwiki/doku.php?id=kurs:schleifen&rev=1410376975&do=diff declare i number; begin i := 0; while i < 10 loop i := i + 1; dbms_output.put_line(i); end loop; i := 0; loop i := i + 1; dbms_output.put_line(i); exit when i >= 10; end loop; for c in 1..10 loop dbms_output.put_line(c); end loop; end; text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:search_and_replace.pl https://trust-box.at/dokuwiki/doku.php?id=kurs:search_and_replace.pl&rev=1410376975&do=diff use strict; use warnings; my $search = $ARGV[0]; my @strassen = ( 'Blagasse 12', 'Blag. 11', 'Buh Gasse 1', 'Bug G. 2', ); foreach (@strassen) { $_ =~ s/(g)\./$1asse/ig; printf "%s\n", $_; } # printf "%s\n", $search; text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:select_into https://trust-box.at/dokuwiki/doku.php?id=kurs:select_into&rev=1410376975&do=diff PROCEDURE GET_SALARY ( p_last_name IN VARCHAR2, p_first_name in varchar2 ) AS v_salary number; v_department_name varchar2(50); BEGIN -- hier werden die felder selektiert select salary, department_name into v_salary, v_department_name from employees e, departments d where last_name = p_last_name and first_name = p_first_name and e.department_id = d.department_id; dbms_output.put_line(p_first_name||' '|| p_last_name || ' verdient ' || v_sa… text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:select_mit_group_by_subquery https://trust-box.at/dokuwiki/doku.php?id=kurs:select_mit_group_by_subquery&rev=1410376975&do=diff select department_id, round(avg(SALARY), 2) sal, round(sum(SALARY), 2), count(*) as c from employees group by department_id) having avg(SALARY)>8000 -- NACHTTEIL!!! in der having clause kann man nicht auf Synonyme zugreifen order by sal; select * from ( select department_id, round(avg(SALARY), 2) sal, round(sum(SALARY), 2), count(*) as c from employees group by department_id) where sal>8000 order by sal; -- alles auf einmal select first_name, last_name, salary, davgs.department_id, avgs from… text/html 2017-03-20T11:28:15+0200 Anonymous (anonymous@undisclosed.example.com) kurs:select_mit_where_in_subquery https://trust-box.at/dokuwiki/doku.php?id=kurs:select_mit_where_in_subquery&rev=1490005695&do=diff select first_name, last_name, e.department_id, department_name, salary from employees e, departments d where (salary, e.department_id) IN (select max(salary), department_id from employees group by department_id) and e.department_id = d.department_id order by salary text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:sessions_transactionen https://trust-box.at/dokuwiki/doku.php?id=kurs:sessions_transactionen&rev=1410376975&do=diff select * from test; update test set tst_text = 'blo' where tst_text = 'bla'; insert into test (tst_id, tst_text) values (4, 'blab'); text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:sets_gruppenoperatoren https://trust-box.at/dokuwiki/doku.php?id=kurs:sets_gruppenoperatoren&rev=1410376975&do=diff select employee_id, first_name, last_name, department_id, job_id, hire_date, start_date, end_date, status from ( select employee_id, first_name, last_name, department_id, job_id, hire_date, (select max(end_date)+1 from job_history where employee_id = employees.employee_id) start_date, null end_date, 'aktuell' status, 1 zeit … text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:sevil https://trust-box.at/dokuwiki/doku.php?id=kurs:sevil&rev=1410376975&do=diff Beispiele: Procedure Beispiel 1 text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:simpsons https://trust-box.at/dokuwiki/doku.php?id=kurs:simpsons&rev=1410376975&do=diff /* Formatted on 2008/09/30 21:07 (Formatter Plus v4.8.7) */ SELECT isa.per_name || ' ist ein ' || relation_type.ret_name ||' von '|| persons.per_name FROM persons, relations, persons isa, relation_type WHERE ( (persons.per_id = relations.rel_parent) AND (isa.per_id = relations.rel_child) AND (relation_type.ret_id = relations.rel_ret_id) ) text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:soap https://trust-box.at/dokuwiki/doku.php?id=kurs:soap&rev=1410376975&do=diff Client use warnings; use strict; use SOAP::Lite; ## +trace => 'debug'; use Getopt::Long; use Data::Dumper; my $opt = {}; GetOptions($opt, 'server=s', 'command=s', 'urn=s', ); my $NS = "urn:". ($opt->{urn} || "SOAPServer::Handler"); my $HOST = 'http://'.$opt->{server}; my $soap = SOAP::Lite ->readable(1) ->uri($NS) ->proxy($HOST); my $soapd = new SOAP::Data->type(hash => $opt); my $som = $soap->command($soapd); #print Dumper $som; print Dumper $som->r… text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:sort.pl https://trust-box.at/dokuwiki/doku.php?id=kurs:sort.pl&rev=1410376975&do=diff use strict; use warnings; my %teilnehmer = ( guenther => 27, christian => 22, mario => 26, martin => 26, joachim => 30, rudi => 23, fritz => 50, dennis => 39, daniel => 21, ); my @tn = keys %teilnehmer; my @alter = values %teilnehmer; my $i=0; foreach (sort {$a <=> $b} @alter) { printf "%s: %s\n", ++$i, $_; } my $i=0; foreach ( sort {substr($a,1,1) cmp substr($b,1,1)} @tn) { printf "%s: %s\n", ++$i, $_; } my … text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:sparse_array.pl https://trust-box.at/dokuwiki/doku.php?id=kurs:sparse_array.pl&rev=1410376975&do=diff use strict; my @a; $a[1] = 'eins'; $a[10] = 'zehn'; $a[100] = 'hundert'; my $i; foreach (@a) { printf "%s %s\n", $i, $_ if $_ ; $i++; } mit hash use strict; my %a; $a{1} = 'eins'; $a{10} = 'zehn'; $a{100} = 'hundert'; $a{1000000} = 'million'; $a{1000000000} = 'milliarde'; foreach (sort keys %a) { printf "%s %s\n", $_, $a{$_}; } text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:speisekarte https://trust-box.at/dokuwiki/doku.php?id=kurs:speisekarte&rev=1410376975&do=diff Speisekarte Pizza Belag Preis Margherita mit Käse und Olive 6,99 Salami Extra text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:sql_depot https://trust-box.at/dokuwiki/doku.php?id=kurs:sql_depot&rev=1410376975&do=diff WETTENBÜRO DATENBANK TABLES ANLEGEN create table ADM_admin ( ADM_ID NUMBER(12) NOT NULL, ADM_name VARCHAR2(12) NOT NULL, ADM_password VARCHAR2(12) NOT NULL, PRIMARY KEY(ADM_ID) ); create table USR_user ( USR_ID NUMBER(12) NOT NULL, USR_password VARCHAR2(12) NOT NULL, USR_name VARCHAR2(12)NOT NULL, USR_email VARCHAR2(20) NOT NULL, USR_mitglieds_datum DATE NOT NULL, USR__ist_freigeschaltet VARCHAR2(12)… text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:sql_top_mit_und_ohne_bind_param https://trust-box.at/dokuwiki/doku.php?id=kurs:sql_top_mit_und_ohne_bind_param&rev=1410376975&do=diff <?php $emp_name = array('Fay','Taylor', 'yyyyyy', 'xxxxxxx','King' ); $db = oci_connect('hr','hr','orcl'); $sql = "select first_name, last_name from employees where last_name = :last_name"; $q = oci_parse($db,$sql); for($i = 0; $i < 100000; $i++) { $r = rand(0,count($emp_name)-1); $last_name = $emp_name[$r].$i; print "i= $i rand = $r last_name = $last_name\n"; oci_bind_by_name($q, ":last_name", $last_name, SQLT_CHR ); $r = oci_execute($q, OCI_DEFAULT); while ($row = oci_… text/html 2015-04-29T10:05:05+0200 Anonymous (anonymous@undisclosed.example.com) kurs:sqlldr_sql_loader https://trust-box.at/dokuwiki/doku.php?id=kurs:sqlldr_sql_loader&rev=1430294705&do=diff Datei unter c:\temp\emp.ldr abspeichern LOAD DATA INFILE * BADFILE badfile.csv append INTO TABLE bonus FIELDS TERMINATED BY ',' OPTIONALLY ENCLOSED BY '"' (employee_id "employees_seq.nextval", first_name, last_name) BEGINDATA ,bla,"fa,sel" ,blu,fusel ,bli,fisel text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:statement_trigger https://trust-box.at/dokuwiki/doku.php?id=kurs:statement_trigger&rev=1410376975&do=diff CREATE OR REPLACE TRIGGER trg_lock_bonus BEFORE INSERT OR DELETE OR UPDATE ON bonus REFERENCING NEW AS NEW OLD AS OLD declare e_lock_bonus exception; pragma exception_init (e_lock_bonus, -20001); begin if (to_char(sysdate, 'hh24mi') between '1300' and '1400') then raise_application_error(-20001, 'kein Dateienverkehr zwischen 13 und 14h'); end if; end; / text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:stored_procedures https://trust-box.at/dokuwiki/doku.php?id=kurs:stored_procedures&rev=1410376975&do=diff PROCEDURE SHOW_EMPLOYEES (p_min_sal IN employees.salary%type) is begin for r_emp in (select first_name, last_name from employees where salary > p_min_sal) loop dbms_output.put_line(r_emp.first_name||' '|| r_emp.last_name); end loop; end; text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:strassen.pl https://trust-box.at/dokuwiki/doku.php?id=kurs:strassen.pl&rev=1410376975&do=diff use strict; use Data::Dumper; my $dir = 'c:/perl/beispiele/strassen'; use Storable; my $store_file = 'plz_store'; my $plz = {}; if (-f $store_file) { $plz = retrieve($store_file) } else { my $gkz_file = "$dir/gkz_plz.txt"; open (FH, "<$gkz_file"); my @gkz = <FH>; close FH; foreach my $line (@gkz) { $line =~ /(\d{5}) (\d{4})/; #print "$1 $2"; $plz->{$2} = get_strassen($dir, $1); } store $plz, $store_file; } my $postleitzahl; my $strasse; while ($postleitzahl ne 'en… text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:sub.pl https://trust-box.at/dokuwiki/doku.php?id=kurs:sub.pl&rev=1410376975&do=diff $a = 3; $b = 2; ## printf "%s\n", add($a, $b) ; @b = (1,2,3,4,5,6); $r = [1,2,3,4,5,6]; $h = {a => 1, b => 2, }; print Dumper $h; printf "array %s %s %s\n", $r->[3], ${@$r}[3], $b[3] ; printf "hash %s\n", $h->{a}; ### nicht ### print " $r->[3] \n"; printf "array %s\n", ref($r) ; printf "%s\n", add_array($r) ; print "bin in Zeile " .__LINE__; exit(0); sub add_array { my ($c_ref) = @_; printf "ref %s\n", ref($c_ref); my $d; foreach (@$c_ref) { $d += $_; } $d; }… text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:tab https://trust-box.at/dokuwiki/doku.php?id=kurs:tab&rev=1410376975&do=diff Tabellenübersicht Speisekarte Name Typ not null SK_ID number (7) x PK SK_Name varchar2 (30) SK_Beschreibung varchar2 (200) text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:table_als_tabellendatentyp https://trust-box.at/dokuwiki/doku.php?id=kurs:table_als_tabellendatentyp&rev=1410376975&do=diff CREATE OR REPLACE TYPE "HR"."EMP_LIST" AS TABLE OF VARCHAR2(100) CREATE TABLE DEP_EMP as select department_name from departments; alter table dep_emp add (emp_names emp_list) nested table emp_names store as nested_tab return as value; PROCEDURE fill_dep_emp IS TYPE emp_table_type IS TABLE OF emp_list INDEX BY varchar2(100); t_emp emp_table_type; v_index varchar2(100); BEGIN for r_ed in (SELECT FIRST_NAME||' '||LAST_NAME e_name, DEPARTMENT_NAME … text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:table_for_merge https://trust-box.at/dokuwiki/doku.php?id=kurs:table_for_merge&rev=1410376975&do=diff drop table emp; create table emp as select employee_id, first_name, last_name, salary, hire_date, department_id, 0 bonus from employees; update emp set bonus = salary * (case when salary > 15000 then 0.1 when salary > 10000 then 0.2 else 0.3 end) delete from emp where bonus > 1700; select count(*) from emp; text/html 2015-04-16T09:28:53+0200 Anonymous (anonymous@undisclosed.example.com) kurs:table_index_by_varchar2 https://trust-box.at/dokuwiki/doku.php?id=kurs:table_index_by_varchar2&rev=1429169333&do=diff PROCEDURE teilnehmer_index_by_varchar is type teilnehmer_type IS RECORD (name varchar2(25), geschlecht varchar2(25)); TYPE teilnehmer_table_type IS TABLE OF varchar2(25) INDEX BY varchar2(25); tn teilnehmer_table_type; v_i varchar2(25); BEGIN tn('Mark') := 'M'; tn('Karin') := 'W'; tn('Albert') := 'M'; tn('Gökhan') := 'M'; tn('Natalya') := 'W'; v_i := tn.first; while v_i is not null loop dbms_output.put_line(v_i||' '||tn(v_i)); v_i := tn.next(v_i); end loop; END… text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:teilnehmer.sh https://trust-box.at/dokuwiki/doku.php?id=kurs:teilnehmer.sh&rev=1410376975&do=diff #/bin/bash kurs[0]=uwe kurs[1]=sammy kurs[2]=rudi kurs[3]=ossi kurs[100000]=karl echo ${kurs[3]} echo ${kurs[*]} echo ${kurs[@]} echo ${#kurs[*]} i=1 for teilnehmer in ${kurs[*]} do echo "$i $teilnehmer" #i=` expr $i + 1 ` i=` echo $i + 1 | bc ` done declare -a kurs_lang=("Uwe\ Lang" \ "Karl\ Koeller" \ "Thomas\ Ruzicka" \ "Oskar\ Vencour" \ ) #kurs_laenge=${#kurs_lang[*]} #kurs_laenge=` expr $kurs_laenge - 1 ` kurs_laenge=` echo ${#… text/html 2014-12-16T13:29:10+0200 Anonymous (anonymous@undisclosed.example.com) kurs:teilnehmer https://trust-box.at/dokuwiki/doku.php?id=kurs:teilnehmer&rev=1418732950&do=diff <?php /* ein formular auf dem wir neue einträge in die Teilnehmer Tabelle machen tln_namen tln_birthday tln_height tln_gen_id + post formular + radio button group */ $db = oci_connect('hr', 'hr', 'kurs2.wifi'); if (empty($_POST)) { $sql = "select gen_id, gen_name from gender"; $q = oci_parse($db, $sql); $r = oci_execute($q, OCI_DEFAULT); $table = array(); while ($row = oci_fetch_array($q, OCI_ASSOC)) { $table[] = $row; } ?> <h2>Insert Teilnehmer</h2> <form cla… text/html 2016-12-21T09:26:14+0200 Anonymous (anonymous@undisclosed.example.com) kurs:teilnehmer_journal_trigger https://trust-box.at/dokuwiki/doku.php?id=kurs:teilnehmer_journal_trigger&rev=1482308774&do=diff teilnehmer kurs dezember 2016 create or replace trigger TRG_TEILNEHMER_JN AFTER INSERT OR DELETE OR UPDATE ON TEILNEHMER FOR EACH ROW declare v_dml varchar2(10); v_now date := sysdate; BEGIN if inserting then v_dml := 'I'; elsif updating then v_dml := 'U'; else v_dml := 'D'; end if; update teilnehmer_jn set tjn_valid_to = v_now where tjn_id = (select max(tjn_id) from teilnehmer_jn where tjn_tln_id = :old.tln_id; insert into teilnehmer_jn ( t… text/html 2016-12-21T09:27:03+0200 Anonymous (anonymous@undisclosed.example.com) kurs:teilnehmer_kurs_dezember_2016 https://trust-box.at/dokuwiki/doku.php?id=kurs:teilnehmer_kurs_dezember_2016&rev=1482308823&do=diff CREATE OR REPLACE PROCEDURE WRITE_TEILNEHMER_JN (p_tln_id teilnehmer.tln_id%type, p_tln_name teilnehmer.tln_name%type, p_tln_groesse teilnehmer.tln_groesse%type, p_tln_geburtstag teilnehmer.tln_geburtstag%type, p_jntyp teilnehmer_jn.tlnjn_typ%type) as vt_ausbildung t_ausbildung := t_ausbildung(); v_current timestamp := current_timestamp; v_tlnjn_id number; BEGIN for r_aus in (select aus_name from ausbildungen join teilnehmer_x_… text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:test--more https://trust-box.at/dokuwiki/doku.php?id=kurs:test--more&rev=1410376975&do=diff h2xs -AX TestDemo package TestDemo; use Moose; use Color; has 'testing' => (is => 'rw', isa => 'Int'); sub ret1 { return 1; } sub get_color { my $c = Color->new; return $c; } sub add { my $self = shift; my ($a, $b) = @_; return $a + $b; } sub _execute_ping { my $self = shift; my ($hostname) = @_; my $pr; if ($self->testing == 1) { $pr = ' 0% packet loss'; } else { $pr = `ping -c 1 $hostname`; } return $pr; } sub _parse_ping { my $self = shift; m… text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:test-db.php https://trust-box.at/dokuwiki/doku.php?id=kurs:test-db.php&rev=1410376975&do=diff <?php $db = oci_connect('hr', 'hr', 'orcl11'); $q = oci_parse($db, "select to_char(sysdate, 'yyyy-mm-dd hh24:mi:ss') from dual"); $r = oci_execute($q, OCI_DEFAULT); $row = oci_fetch_array($q, OCI_RETURN_NULLS); echo $row[0] . "\n"; ?> text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:test https://trust-box.at/dokuwiki/doku.php?id=kurs:test&rev=1410376975&do=diff hallo!! text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:testdata.xml https://trust-box.at/dokuwiki/doku.php?id=kurs:testdata.xml&rev=1410376975&do=diff <data> <e m="mh@bla.at" t="at"></e> <e m="mh@bla.as.at" t="at"></e> <e m="mh@bla.com" t="com"></e> <e m="queen.mary@b.asdala.co.uk" t="uk"></e> </data> text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:testlog.sh https://trust-box.at/dokuwiki/doku.php?id=kurs:testlog.sh&rev=1410376975&do=diff #!/bin/bash source header.shh log testmessage text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:trap.sh https://trust-box.at/dokuwiki/doku.php?id=kurs:trap.sh&rev=1410376975&do=diff #!/bin/bash function cleanup { echo "werde beendet" ## exit 1 } function hup { echo "setze mich zurueck" i=1 } trap hup 1 trap cleanup 2 3 9 15 i=0 while true do echo $i (( i++ )) sleep 3 done text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:tri_1 https://trust-box.at/dokuwiki/doku.php?id=kurs:tri_1&rev=1410376975&do=diff Check_Salary Timing Before Object Event Update Fire for Each Row begin if :old.salary>:new.salary then raise_application_error(-20067,'Salary must be higher than the last one!'); end if; insert into XL_emp_bonus (emp_id, last_name, salary, bonus) values(:OLD.emp_id, :OLD.last_name, :OLD.salary, :OLD.bonus); end; text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:tri_2 https://trust-box.at/dokuwiki/doku.php?id=kurs:tri_2&rev=1410376975&do=diff Insert, Update, Delete Timing After Object Event Inseert, Update, Delete Fire for Each Row declare v_mode varchar2(10); begin if inserting then v_mode := 'I'; elsif updating then v_mode := 'U'; else v_mode := 'D'; end if; insert into XL_TEST_JN (wert, change_date, change_type, orig_ind) values -- nvl() gibt den ersten (von zwei) Wert zurück, der nicht null ist. (nvl(:old.wert, :new.wert), sysdate, v_mode, nvl(:old.ind, :new.ind)); end; text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:tri_3 https://trust-box.at/dokuwiki/doku.php?id=kurs:tri_3&rev=1410376975&do=diff Next Index <code> begin select seq.NEXTVAL into :new.ind from dual; end; <\code> text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:trigger https://trust-box.at/dokuwiki/doku.php?id=kurs:trigger&rev=1410376975&do=diff Trigger Check_Salary View Code Erstelle einen Trigger, der überprüft, ob der neu eingegebene Gehalt größer als der ursprüngliche ist. Next Index View Code Erstelle einen Trigger, der bei Erstellung eines neuen Datensatzes automatisch den nächsten Index erstellt. text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:trigger_update_summe https://trust-box.at/dokuwiki/doku.php?id=kurs:trigger_update_summe&rev=1410376975&do=diff CREATE OR REPLACE TRIGGER emp_dep_sum_trg AFTER INSERT OR DELETE OR UPDATE OF salary ON employees REFERENCING NEW AS NEW OLD AS OLD declare v_sum_sal number; v_department_id number; begin update dep_sum d set sal_sum = (SELECT sum(employees.salary) FROM employees, dep_sum WHERE ((employees.department_id = dep_sum.department_id)) and employees.department_id = d.department_id); /* v_department_id := nvl(:new.department_id, :old.department_id); SELECT sum(employees.salary) into v_sum… text/html 2016-11-30T11:14:16+0200 Anonymous (anonymous@undisclosed.example.com) kurs:typkonvertierung_-_casten https://trust-box.at/dokuwiki/doku.php?id=kurs:typkonvertierung_-_casten&rev=1480500856&do=diff select to_char(to_date('2006', 'yyyy'), 'yyyymmdd hh24:mi:ss') from dual; CREATE OR REPLACE FUNCTION TRY_TO_NUMBER (p_val in varchar2) RETURN NUMBER AS v_number number; BEGIN begin v_number := to_number(p_val); exception when VALUE_ERROR then v_number := 0; end; return v_number; END TRY_TO_NUMBER; text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:uebung_1 https://trust-box.at/dokuwiki/doku.php?id=kurs:uebung_1&rev=1410376975&do=diff Aufgabenstellung Erstelle einen Cursor, der die ersten 5 Mitarbeiter (alphabethisch aufsteigend sortiert) eines Departments, das durch den User eingegeben wird, ausgibt. Code PROCEDURE P_CURSOR_FEATURES (sel_dep in varchar2) /* ermöglicht die Eingabe der Abteilung */ IS TYPE dep_rec_type IS RECORD ( f_name employees.first_name%TYPE, l_name employees.last_name%TYPE, department departments.department_name%TYPE, title jobs.job_title%TYPE ); dep_rec … text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:uebung_2.1 https://trust-box.at/dokuwiki/doku.php?id=kurs:uebung_2.1&rev=1410376975&do=diff PROCEDURE P_CURS_BONUS IS v_bonus number(30,2); rec_bonus xl_emp_bonus%ROWTYPE; CURSOR curs_bonus IS SELECT * FROM xl_emp_bonus FOR UPDATE OF bonus; BEGIN OPEN curs_bonus; LOOP FETCH curs_bonus INTO rec_bonus; exit when curs_bonus%NOTFOUND; v_bonus := 0.20; IF rec_bonus.salary > 5000 THEN v_bonus := 0.05; END IF; UPDATE xl_emp_bonus SET bonus = rec_bonus.salary * v_bonus WHERE CURRENT OF curs_bonus; END LOOP… text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:uebung_2.2 https://trust-box.at/dokuwiki/doku.php?id=kurs:uebung_2.2&rev=1410376975&do=diff PROCEDURE P_CURS_BONUS_ERWEITERT IS v_old_name xl_emp_bonus.last_name%type; v_new_name xl_emp_bonus.last_name%type; v_old_salary xl_emp_bonus.salary%type; v_new_salary xl_emp_bonus.salary%type; v_differenz number(30); v_bonus number(30,2); rec_bonus xl_emp_bonus%ROWTYPE; CURSOR curs_bonus IS SELECT xl_emp_bonus.last_name, xl_emp_bonus.salary FROM xl_emp_bonus ORDER BY xl_emp_bonus.salary DESC for update of bonus; BEGIN OPEN curs_bonu… text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:uebung_3.2 https://trust-box.at/dokuwiki/doku.php?id=kurs:uebung_3.2&rev=1410376975&do=diff PROCEDURE P_ERROR ( v_last_name IN employees.last_name%TYPE) IS v_emp_id number(30); BEGIN select employee_id into v_emp_id from employees where last_name=v_last_name; dbms_output.put_line(v_emp_id); EXCEPTION WHEN No_Data_found THEN dbms_output.put_line('Keine Daten gefunden'); WHEN Too_many_Rows THEN dbms_output.put_line('Zu viele Daten gefunden'); WHEN others THEN dbms_output.put_line('irgendein Fehler'); END; text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:uebung_3 https://trust-box.at/dokuwiki/doku.php?id=kurs:uebung_3&rev=1410376975&do=diff PROCEDURE P_RAISE_EXEPTION ( v_last_name IN varchar2, v_salary in Number) IS zuviele_personen exception; BEGIN update employees set salary = v_salary where last_name=v_last_name; if SQL%ROWCOUNT>1 THEN raise zuviele_personen; end if; EXCEPTION WHEN zuviele_personen THEN rollback ; dbms_output.put_line('zuviele Personen'); raise_application_error(-20001, 'ganz furchtbar', TRUE); END; text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:uebung_4.1 https://trust-box.at/dokuwiki/doku.php?id=kurs:uebung_4.1&rev=1410376975&do=diff Leer text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:uebung_4.2 https://trust-box.at/dokuwiki/doku.php?id=kurs:uebung_4.2&rev=1410376975&do=diff FUNCTION F_BONUS (salary in number) RETURN number IS v_bonus number(2,2); BEGIN v_bonus := 0.05; if salary<5000 then v_bonus := 0.2; end if; return v_bonus; END; text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:ultimo_vormonat https://trust-box.at/dokuwiki/doku.php?id=kurs:ultimo_vormonat&rev=1410376975&do=diff create or replace FUNCTION ULTIMO_VORMONAT (datum IN date) RETURN DATE is v_ultimo date; BEGIN select ultimo into v_ultimo from ultimo_as where jahr = extract(year from datum - to_yminterval('0-1')) and monat = extract(month from datum -to_yminterval('0-1')); RETURN v_ultimo; END; text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:unix-kurs https://trust-box.at/dokuwiki/doku.php?id=kurs:unix-kurs&rev=1410376975&do=diff lvm Beispielprogramme backup.sh find_music.sh function.sh here.sh if.sh kill_user.sh mkdir_mh.sh mkdir_new.sh mkdir.sh mkidir_echo.sh mkwiki.sh mydf.sh ps.sh read_case.sh teilnehmer.sh testlog.sh trap.sh variable.sh text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:unterschiedliche_objecte_mit_abhaengigkeiten_in_datenbanken_finden https://trust-box.at/dokuwiki/doku.php?id=kurs:unterschiedliche_objecte_mit_abhaengigkeiten_in_datenbanken_finden&rev=1410376975&do=diff select object_name, object_type from user_objects@orclc41203 minus select object_name, object_type from user_objects select dbms_metadata.get_ddl('TABLE','EMPLOYEES') from dual select referenced_name, dbms_metadata.get_ddl(referenced_type, referenced_name) from ( select name, type, referenced_name, referenced_type from user_dependencies where name='CHANGE_EMP' and type='PACKAGE BODY' minus select name, type, referenced_name, referenced_type from user_dependencies@orclc41202 ) wh… text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:update https://trust-box.at/dokuwiki/doku.php?id=kurs:update&rev=1410376975&do=diff update emp_copy set bonus = salary * (case when salary < 5000 then 0.2 when salary < 10000 then 0.1 else 0 end) text/html 2014-11-11T09:03:37+0200 Anonymous (anonymous@undisclosed.example.com) kurs:upsert_emp https://trust-box.at/dokuwiki/doku.php?id=kurs:upsert_emp&rev=1415693017&do=diff CREATE OR REPLACE PROCEDURE UPSERT_TEILNEHMER ( /* wir uebergeben an die prozedur name, birthday height gender und ENTWEDER inserten wir den teilnehmer ODER machen ein update auf den schon vorhandenen Teilnehmer */ p_tln_name in teilnehmer.tln_name%type, p_tln_birthday in teilnehmer.tln_birthday%type, p_tln_height in teilnehmer.tln_height%type, p_gen_name in gender.gen_name%type ) AS e_no_such_gender exception; pragma exception_init (e_no_such_gender, -20001); … text/html 2021-10-05T13:34:29+0200 Anonymous (anonymous@undisclosed.example.com) kurs:user_privileges https://trust-box.at/dokuwiki/doku.php?id=kurs:user_privileges&rev=1633433669&do=diff select * from ( select granted_role, grantee from dba_role_privs union select PRIVILEGE, GRANTEE from dba_sys_privs ) where grantee = 'PBADMIN'; evtl noch sys_tab_privs integrieren text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:v_cursor https://trust-box.at/dokuwiki/doku.php?id=kurs:v_cursor&rev=1410376975&do=diff PROCEDURE P_CURSOR_FEATURES (dep_name departments.department_name%type) IS cursor c_emp is SELECT employees.first_name, employees.last_name, jobs.job_title FROM employees, departments, jobs WHERE (departments.department_id = employees.department_id) AND (jobs.job_id = employees.job_id) AND (departments.department_name = dep_name) ORDER BY employees.last_name ASC; type emp_rec_type is record (first_name employees.f… text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:v_dep_emp https://trust-box.at/dokuwiki/doku.php?id=kurs:v_dep_emp&rev=1410376975&do=diff CREATE OR REPLACE VIEW v_dep_emp ( department_name, first_name, last_name, employee_id, email, phone_number, hire_date, job_id, salary, commission_pct, manager_id, department_id ) AS SELECT departments.department_name, employees.first_name, employees.last_name, employees.employee_id, employees.email, employees.phone_number, employees.hire_date, employees.job_id, employees.salary, employees.commission_pct, employees.manager_id, emplo… text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:valeria https://trust-box.at/dokuwiki/doku.php?id=kurs:valeria&rev=1410376975&do=diff * Oracle * <http://www.chello.at> * <http://google.at> text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:valeria_pflichtenheft https://trust-box.at/dokuwiki/doku.php?id=kurs:valeria_pflichtenheft&rev=1410376975&do=diff Ein Kunde kann per Internet DVDs kaufen. Er kann eine DVD suchen nach: Titel, Genre, Regisseur, Darsteller, Komponist, Produzent oder Suchwort. Man kann auch eine Liste aller Filme sortiert nach Titel, Genre, Regisseur, Darsteller, Komponist oder Produzent sehen. text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:variable.sh https://trust-box.at/dokuwiki/doku.php?id=kurs:variable.sh&rev=1410376975&do=diff #/bin/bash p_var='im programm' echo $p_var echo $shell_var export p_var ## sleep 60 text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:version_table https://trust-box.at/dokuwiki/doku.php?id=kurs:version_table&rev=1410376975&do=diff select * from ( select first_name, last_name, salary, nvl(versions_starttime, to_date( '1', 'YYYY')) as start_time, nvl(versions_endtime, sysdate) as end_time from accountants versions between scn minvalue and maxvalue ) where start_time < to_date('20071119-2000', 'YYYYMMDD-hh24mi') order by start_time text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:with_clause https://trust-box.at/dokuwiki/doku.php?id=kurs:with_clause&rev=1410376975&do=diff with verm_extras as ( SELECT vrm_name, ext_name FROM tst_vermieter, tst_fahrzeuge, tst_fhz_ext_int, tst_extras WHERE ( (tst_vermieter.vrm_id = tst_fahrzeuge.fhz_vrm_id) AND (tst_fahrzeuge.fhz_id = tst_fhz_ext_int.fei_fhz_id(+)) AND (tst_extras.ext_id(+) = tst_fhz_ext_int.fei_ext_id) ) ) select distinct e.vrm_name, e.ext_name, nvl(extras_count, 0) c from verm_extras e, (select vrm_name, ext_name, count(ext_name) as extras_count from verm_extras … text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:woerterbuch.pl https://trust-box.at/dokuwiki/doku.php?id=kurs:woerterbuch.pl&rev=1410376975&do=diff open (FH, "<woerterbuch.txt"); @zeilen = <FH>; foreach $zeile (@zeilen) { #print "$zeile"; #print $_; @worte = split("\;", $zeile); $wort{$worte[0]} = $worte[1]; $worteng{$worte[1]} = $worte[0]; } foreach $key (keys %wort) { print "$key $wort{$key}\n"; } while ($eingabe ne "end") { print "Eingabe: "; $eingabe = <STDIN>; chomp ($eingabe); $eingabe = lc($eingabe); if(exists($wort{$eingabe})) { print $wort{$eingabe}."\n"; } elsif (exists($worteng{$eingabe})) { pr… text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:write_to_file https://trust-box.at/dokuwiki/doku.php?id=kurs:write_to_file&rev=1410376975&do=diff select * from all_directories; PACKAGE BODY TEST_PACKAGE IS PROCEDURE TEST_PROC is v_filehandle utl_file.file_type; -- type emp_record_type IS RECORD employees%rowtype; cursor emp_cursor is SELECT * FROM employees ORDER BY employees.salary DESC; emp emp_cursor%rowtype; BEGIN v_filehandle := utl_file.fopen('DATA_FILE_DIR', 'out.txt', 'w'); -- open emp_cursor; for emp in emp_cursor loop dbms_output.put_line(emp.salary); utl… text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:write_to_file_utl_file https://trust-box.at/dokuwiki/doku.php?id=kurs:write_to_file_utl_file&rev=1410376975&do=diff create directory data_dir as 'c:\data'; grant read, write on directory data_dir to public; PROCEDURE WRITE_TO_FILE is v_filehandle utl_file.file_type; cursor emp_cursor is SELECT * FROM employees ORDER BY employees.salary DESC; emp emp_cursor%rowtype; BEGIN v_filehandle := utl_file.fopen('DATA_DIR', 'out.txt', 'w'); -- open emp_cursor; for emp in emp_cursor loop dbms_output.put_line(emp.salary); utl_file.putf(v_filehandle, emp.… text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:yaml https://trust-box.at/dokuwiki/doku.php?id=kurs:yaml&rev=1410376975&do=diff YAML ist eine einfache Markuplanguage bli: - 1 - 2 - 3 bla: - 4 - 5 - 6 auslesen mit (und auch einfach demonstriert was “bless” eigentlich macht) use strict; use warnings; use YAML; use Data::Dumper; { my $cf = YAML::LoadFile('config.yaml'); print Dumper $cf; my $bla = $cf->{bla}; my $bli = $cf->{bli}; print Dumper $bla; printf "%s\n", ref $bla; bless ($bla, 'HuType'); printf "%s\n", ref $bla; print Dumper $bla; } text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:zeilen_vergleichen https://trust-box.at/dokuwiki/doku.php?id=kurs:zeilen_vergleichen&rev=1410376975&do=diff select a.employee_id, a.first_name, a.last_name, a.salary, b.employee_id, b.first_name, b.last_name, b.salary -- , prior a.salary from (select employee_id, first_name, last_name, salary from employees order by salary desc, employee_id) a, ( (select employee_id, first_name, last_name, salary from employees) minus select * from (select employee_id, first_name, last_name, salary from employees order by salary desc) where ro… text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:zeit_und_intervalle https://trust-box.at/dokuwiki/doku.php?id=kurs:zeit_und_intervalle&rev=1410376975&do=diff select sysdate-to_yminterval('1-0') from dual select sysdate-1/24 from dual; select ( (sysdate-1/24) - (sysdate-to_dsinterval('0 02:30:00')) ) day to second from dual; alle angestellten die länger als 12 Jahre “dabei” sind select last_name, hire_date, (sysdate - hire_date) year to month as dauer from employees where hire_date + to_yminterval('12-0') < sysdate order by hire_date desc text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:zeit_zwischen_jobs https://trust-box.at/dokuwiki/doku.php?id=kurs:zeit_zwischen_jobs&rev=1410376975&do=diff with date_hierarchy as ( select rownum rn, employee_id, start_date, end_date from (select employee_id, start_date, end_date from job_history order by employee_id, start_date) ) select d1.employee_id, d1.start_date, d1.end_date, d2.start_date, d2.end_date, d1.end_date - d1.start_date aufenthalt, d1.end_date - d2.start_date from date_hierarchy d1 join date_hierarchy … text/html 2015-01-13T15:46:03+0200 Anonymous (anonymous@undisclosed.example.com) kurs:zend2_doctrine https://trust-box.at/dokuwiki/doku.php?id=kurs:zend2_doctrine&rev=1421160363&do=diff <http://framework.zend.com/manual/current/en/user-guide/skeleton-application.html> <http://marco-pivetta.com/doctrine-orm-zf2-tutorial/#> installation & lauffähiger Code unter text/html 2014-09-10T21:22:55+0200 Anonymous (anonymous@undisclosed.example.com) kurs:zutaten https://trust-box.at/dokuwiki/doku.php?id=kurs:zutaten&rev=1410376975&do=diff Zutatentabelle Name Preis Name Preis Ananas 0,73 Artischocken 0,73 Basilikum 0,73 Bolognese 0,73 Broccoli 0,73 Camenbert 0,73 Champignon