https://services.ksh-m.de:2001/portal/v1/homepage/professorlist
https://services.ksh-m.de:2001/kdb/v1/professor/homepagelist
Fehler in Zeile 12115 (12113): id 2629 - publicationtype 2 - kpid 31869 (Zeilenumbruch in Json - lecture.description seq 8) Birgit Franz apid 44862
ksh.xdata.service.kdb.professor.pas
function TProfessorService.HomepageList: TStream;
var
lSQL: string;
begin
lSQL := TkdbProfessorHomepageWithImage.GetSelectFrom
+ TkdbProfessorHomepageWithImage.WhereProfessors + ' ORDER BY p.lastname';
Result := CreateHomepageList(lSQL);
end;
Result := 'apid,campus,consultation,dead,department,gender,kpid,letter,email,' +
'fieldofwork,filter,firstname,image,kshend,kshstart,lastname,phoneinternal,' +
'profession,qualification,room,title,urlextern,urlintern';
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) ';
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 ';