Metainformationen zur Seite
  •  

Unterschiede

Hier werden die Unterschiede zwischen zwei Versionen angezeigt.

Link zu dieser Vergleichsansicht

Beide Seiten der vorigen RevisionVorhergehende Überarbeitung
Nächste Überarbeitung		Vorhergehende Überarbeitung
ksh:website:professors [2026/10/05 14:34] – adminksh:website:professors [2026/10/05 15:02] (aktuell) – admin
Zeile 3: Zeile 3:
 [[https://services.ksh-m.de:2001/portal/v1/homepage/professorlist]] [[https://services.ksh-m.de:2001/portal/v1/homepage/professorlist]]
  
-http://localhost:2003/kdb/v1/professor/homepagelist 
 [[https://services.ksh-m.de:2001/kdb/v1/professor/homepagelist]] [[https://services.ksh-m.de:2001/kdb/v1/professor/homepagelist]]
  
Zeile 9: Zeile 8:
 id 2629 - publicationtype 2 - kpid 31869  (Zeilenumbruch in Json - lecture.description seq 8) Birgit Franz apid 44862 id 2629 - publicationtype 2 - kpid 31869  (Zeilenumbruch in Json - lecture.description seq 8) Birgit Franz apid 44862
  
 +ksh.xdata.service.kdb.professor.pas
 +
 +<code>
 +function TProfessorService.HomepageList: TStream;
 +var
 +  lSQL: string;
 +begin
 +  lSQL := TkdbProfessorHomepageWithImage.GetSelectFrom
 +    + TkdbProfessorHomepageWithImage.WhereProfessors + ' ORDER BY p.lastname';
 +
 +  Result := CreateHomepageList(lSQL);
 +end;
 +</code>
 +
 +<code>
 +  Result := 'apid,campus,consultation,dead,department,gender,kpid,letter,email,' +
 +    'fieldofwork,filter,firstname,image,kshend,kshstart,lastname,phoneinternal,' +
 +    'profession,qualification,room,title,urlextern,urlintern';
 +</code>
 +
 +<code>
 +  Result := 'kdb.rel_group_person rgp ' +
 +    'INNER JOIN kdb.persons p ON (rgp.kpid = p.id) ' +
 +    'LEFT JOIN kdb.addresses a ON (p.id = a.kpid) ' +
 +    'LEFT JOIN kdb.persons_staff ps ON (p.id = ps.kpid) ' +
 +    'LEFT JOIN kdb.persons_lecturer pl ON (p.id = pl.kpid) ' +
 +    'LEFT JOIN kdb.pr_extended pe ON (p.id = pe.kpid) ' +     // ToDo: soll wegfallen
 +    'LEFT JOIN kdb.photos ph ON (p.id = ph.pid AND ph.imgtype = 1) ';
 +</code>
 +
 +<code>
 +  Result :=
 +    'pl.fieldofwork AS fieldofwork, ' +
 +    'IF(pl.filter IS NOT NULL, pl.filter, pe.filter) AS filter, ' +
 +    'IF(pl.profession IS NOT NULL AND pl.profession > '''', pl.profession, pe.profession) AS profession, ' +
 +    'pl.qualification AS qualification, ' +
 +    'pl.url_extern AS urlextern, ' +
 +    'pl.url_intern AS urlintern, ' +
 +
 +//    'ph.img64 AS image, ' +
 +
 +    'IF(ps.campus IS NOT NULL AND ps.campus > '''', ps.campus, IF(pe.campus = 1, ''Campus München'', ''Campus Benediktbeuern'')) AS campus, ' +
 +    'IF(ps.consultation IS NOT NULL AND ps.consultation > '''', ps.consultation, pe.consultation) AS consultation, ' +
 +    'ps.department     AS department, ' +
 +    'IF(ps.phone_internal IS NOT NULL AND ps.phone_internal > '''', ps.phone_internal, IF(a.tel IS NOT NULL AND a.tel > '''', a.tel, pe.telefon)) AS phoneinternal, ' +
 +    'IF(ps.room_nr IS NOT NULL AND ps.room_nr > '''', ps.room_nr, pe.room) AS room, ' +
 +    'ps.kshend         AS kshend, ' +
 +    'ps.kshstart       AS kshstart, ' +
 +    'IF(rgp.website = 0, '''', p.mail)            AS email, ' +
 +
 +    'p.id        AS kpid, ' +
 +    'p.apid      AS apid, ' +
 +    'p.gender    AS gender, ' +
 +    'p.dead      AS dead, ' +
 +    'p.firstname  AS firstname, ' +
 +//    'IF(p.middlename IS NULL, p.firstname, CONCAT(p.firstname, '' '', p.middlename)) AS firstname, ' +
 +    'CONCAT(p.lastname, IF(p.dead = 0, '''', '' +''))  AS lastname, ' +
 +//    'p.lastname  AS lastname, ' +
 +    'LEFT(p.lastname, 1) AS letter, ' +
 +    'IF(p.titlepre > '''', p.titlepre, pe.title_pre) AS title ';
 +</code>