diff options
Diffstat (limited to 'php.scm')
| -rw-r--r-- | php.scm | 66 |
1 files changed, 66 insertions, 0 deletions
@@ -0,0 +1,66 @@ +(define prepare-destatis-countries + '(!php "if ($stmt) $stmt->reset(); $sql = \"SELECT ID, Code, Name FROM Länder ORDER BY Prio DESC, Name ASC;\"; $stmt = $mysqli->prepare($sql); $stmt->bind_result($id, $code, $name); $stmt->execute();")) + +(define prepare-iso3166-countries-de + '(!php "if ($stmt) $stmt->reset(); $sql = \"SELECT code, de FROM iso3166 ORDER BY de;\"; $stmt = $mysqli->prepare($sql); $stmt->bind_result($code, $name); $stmt->execute();")) + +(define prepare-iso3166-countries-en + '(!php "if ($stmt) $stmt->reset(); $sql = \"SELECT code, en FROM iso3166 ORDER BY en;\"; $stmt = $mysqli->prepare($sql); $stmt->bind_result($code, $name); $stmt->execute();")) + +(define prepare-iso3166-countries + (decide-by-lang prepare-iso3166-countries-de prepare-iso3166-countries-en)) + +(define (iter-countries-php var) + (string-append "while ($stmt->fetch()) { ?> <option value=\"<?=$code?>\" ng-selected=\"d." var " == '<?=$code?>'\"><?=$name?></option> <? }")) + +(define (prepare-u-location u) + `(!php + ,(string-append + "if ($stmt) $stmt->reset();$sql = \"SELECT `Standort` FROM Abschlusskombis WHERE (HochschuleText='" u "' " + "OR Hochschule='" u "') AND active=1 GROUP BY `Standort` ORDER BY `Standort`;\";" + "$stmt = $mysqli->prepare($sql);$stmt->bind_result($location);$stmt->execute();"))) + +(define (iter-u-location var) + (string-append "while ($stmt->fetch()) { ?> <option value=\"<?=$location?>\" ng-selected=\"d." var " == '<?=$location?>'\"><?=$location?></option> <? }")) + +(define prepare-course-of-study '(!php "if ($stmt) $stmt->reset();$sql = \"SELECT `Text Studienfach` FROM Abschlusskombis WHERE (HochschuleText=? OR HochschuleText=?) AND active=1 GROUP BY `Text Studienfach` ORDER BY `Text Studienfach`;\";$stmt = $mysqli->prepare($sql);$stmt->bind_param('ss', $hsname, $hs);$stmt->bind_result($sname);$stmt->execute();")) + +(define (iter-course-of-study-php var) + (string-append "while ($stmt->fetch()) { ?> <option value=\"<?=$sname?>\" ng-selected=\"d." var " == '<?=$sname?>'\"><?=$sname?></option> <?php }")) + +(define get-organization-name-php '(!php "if ($stmt) $stmt->reset(); $sql = \"SELECT Organisationen.Name, KanonischerName FROM Hochschulen INNER JOIN Organisationen ON Hochschulen.Organisation = Organisationen.ID WHERE Code=?;\"; $stmt = $mysqli->prepare($sql); $stmt->bind_param('s', $hs); $stmt->bind_result($hsfull, $hsname); $stmt->execute(); $stmt->fetch(); echo $hsfull;")) + +(define prepare-fakultaet '(!php "if ($stmt) $stmt->reset(); $sql = \"SELECT Fakultät FROM Abschlusskombis WHERE (HochschuleText=? OR HochschuleText=?) AND TRIM(Fakultät) <> '' AND active=1 GROUP BY Fakultät;\"; $stmt = $mysqli->prepare($sql); $stmt->bind_param('ss', $hsname, $hs); $stmt->bind_result($fak); $stmt->execute();")) + +(define iter-fakultaet "while ($stmt->fetch()) { ?> <option value=\"<?php echo $fak; ?>\" ng-selected=\"d.fakultaet == '<?php echo $fak; ?>'\"><?php echo $fak; ?></option><?php }") + +(define prepare-studiumart '(!php "if ($stmt) $stmt->reset(); $sql = \"SELECT `Art Studium` FROM Abschlusskombis WHERE (HochschuleText=? OR HochschuleText=?) AND `Art Studium` NOT LIKE '%Kein Abschluss%' AND active=1 GROUP BY `Art Studium`;\"; $stmt = $mysqli->prepare($sql); $stmt->bind_param('ss', $hsname, $hs); $stmt->bind_result($sart); $stmt->execute();")) + +(define iter-studiumart "while ($stmt->fetch()) { ?> <option value=\"<?=$sart?>\" ng-selected=\"d.studium_art == '<?=$sart?>'\"><?=$sart?></option><?php }") + +(define prepare-abschlusskombis '(!php "if ($stmt) $stmt->reset();$sql = \"SELECT `Text Abschluss`, `Art Studium` FROM Abschlusskombis WHERE (HochschuleText=? OR HochschuleText=?) AND active=1 GROUP BY `Text Abschluss`, `Art Studium`;\";$stmt = $mysqli->prepare($sql);$stmt->bind_param('ss', $hsname, $hs);$stmt->bind_result($sabschluss, $sart);$stmt->execute();")) + +(define iter-abschlusskombis "while ($stmt->fetch()) { ?><option data-art=\"<?=$sart?>\" value=\"<?=$sabschluss?>\" ng-selected=\"d.studium_abschluss == '<?=$sabschluss?>'\"><?=$sabschluss?></option><?php }") + +(define prepare-studiengang '(!php "if ($stmt) $stmt->reset();$sql = \"SELECT ID, `Text Studienfach`, `Art Studium`, `Text Abschluss` FROM Abschlusskombis WHERE (HochschuleText=? OR HochschuleText=?) AND active=1 ORDER BY `Text Studienfach`;\";$stmt = $mysqli->prepare($sql);$stmt->bind_param('ss', $hsname, $hs);$stmt->bind_result($id, $sname, $sart, $sabschluss);$stmt->execute();")) + +(define iter-studiengang "while ($stmt->fetch()) { ?><option value=\"<?=$id?>\" data-art=\"<?=$sart?>\" data-abschluss=\"<?=$sabschluss?>\" ng-selected=\"d.studiengang == '<?=$id?>'\"><?=$sname?></option><?php }") + +(define prepare-abschlussarten '(!php "if ($stmt) $stmt->reset();$sql = \"SELECT ID, Code, Name FROM Abschlussarten;\";$stmt = $mysqli->prepare($sql);$stmt->bind_result($id, $code, $name);$stmt->execute();")) + +(define iter-abschlussarten "while ($stmt->fetch()) { ?><option value=\"<?=$id?>\" ng-selected=\"s.zs_art == '<?=$id?>'\"><?=$name?></option><?php }") + +(define prepare-abschluss '(!php "if ($stmt) $stmt->reset();$sql = \"SELECT ID, Name FROM AbschlüsseEinfach;\";$stmt = $mysqli->prepare($sql);$stmt->bind_result($id, $name);$stmt->execute();")) + +(define iter-abschluss "while ($stmt->fetch()) { ?> <option value=\"<?=$id?>\" ng-selected=\"s.zs_abschluss == '<?=$id?>'\"><?=$name?></option><?php } ") + +(define* (iter-multicontainer-options-php startvalue maxvalue incvalue suffix variableprefix variable #:key (calcyear "1") . opt) + (string-append "for ($i = " startvalue "; $i <=" maxvalue "; $i+=" incvalue ") { ?> <option value=\"<?=$i?>\" ng-selected=\"" variableprefix "." variable " =='<?=$i?>'\"><?=$i /" calcyear ";?> " suffix "</option> <? }" )) + +(define iter-s5-engagement-cur-start "for ($j = date('Y'); $j >= 1970; $j--) { for ($i = 12; $i > 0; $i--) { ?> <option value=\"<?php echo $j;?>/<?php echo str_pad($i, 2, '0', STR_PAD_LEFT);?>\" ng-selected=\"b.start == '<?php echo $j;?>/<?php echo str_pad($i, 2, '0', STR_PAD_LEFT);?>'\"><?php echo str_pad($i, 2, '0', STR_PAD_LEFT);?>/<?php echo $j;?></option> <? }}") + +(define iter-s5-engagement-umfang "for ($i = 1; $i < 51; $i++) { ?> <option value=\"<?=$i?>\" ng-selected=\"b.umfang == '<?=$i?>'\"><?=$i?></option> <? }") + +(define iter-s5-engagement-past-start "for ($j = date('Y'); $j >= 1970; $j--) { for ($i = date('Y') == $j ? 6 : 12; $i > 0; $i--) {?> <option value=\"<?php echo $j;?>/<?php echo str_pad($i, 2, '0', STR_PAD_LEFT);?>\" ng-selected=\"b.start == '<?php echo $j;?>/<?php echo str_pad($i, 2, '0', STR_PAD_LEFT);?>'\"><?php echo str_pad($i, 2, '0', STR_PAD_LEFT);?>/<?php echo $j;?></option><? }}") + +(define iter-s5-engagement-past-end "for ($j = date('Y'); $j >= 1970; $j--) { for ($i = date('Y') == $j ? 6 : 12; $i > 0; $i--) {?><option value=\"<?php echo $j;?>/<?php echo str_pad($i, 2, '0', STR_PAD_LEFT);?>\" ng-selected=\"b.ende == '<?php echo $j;?>/<?php echo str_pad($i, 2, '0', STR_PAD_LEFT);?>'\"><?php echo str_pad($i, 2, '0', STR_PAD_LEFT);?>/<?php echo $j;?></option><? }}") |