From 730eb796bbce6f124be9194f1565b7dda1daddf1 Mon Sep 17 00:00:00 2001 From: deva Date: Tue, 1 Jun 2010 13:02:23 +0000 Subject: Afdj macros/templates are now located in their own repo. --- server/xml/macros/spaltelampe-template-1.0.xml | 663 ------------------------- 1 file changed, 663 deletions(-) delete mode 100644 server/xml/macros/spaltelampe-template-1.0.xml (limited to 'server/xml/macros/spaltelampe-template-1.0.xml') diff --git a/server/xml/macros/spaltelampe-template-1.0.xml b/server/xml/macros/spaltelampe-template-1.0.xml deleted file mode 100644 index a983226..0000000 --- a/server/xml/macros/spaltelampe-template-1.0.xml +++ /dev/null @@ -1,663 +0,0 @@ - - - - out = '' - if ( getValue('spaltelampe.mangler.odxt') == '' ) - then - out = out .. 'Spaltelampe, o.dxt:\n' - - if ( getValue('spaltelampe.konjuktiva.odxt') ~= '' ) - then - out = out .. 'Konjuktiva: ' .. getValue('spaltelampe.konjuktiva.odxt') .. '\n' - end - - out = out .. 'Cornea:\n' - - if ( getValue('spaltelampe.epitel.intakt.odxt') ~= '' or getValue('spaltelampe.epitel.central_epiteldefekt.odxt') ~= '' or getValue('spaltelampe.epitel.toerhedsforandringer.odxt') ~= '' or getValue('spaltelampe.epitel.andet.odxt') ~= '') - then - out = out .. ' Epitel: ' - end - if ( getValue('spaltelampe.epitel.intakt.odxt') ~= '' ) - then - out = out .. getValue('spaltelampe.epitel.intakt.odxt') - if ( getValue('spaltelampe.epitel.central_epiteldefekt.odxt') ~= '' or getValue('spaltelampe.epitel.toerhedsforandringer.odxt') ~= '' or getValue('spaltelampe.epitel.andet.odxt') ~= '') - then - out = out .. ', ' - else - out = out .. '\n' - end - end - if ( getValue('spaltelampe.epitel.central_epiteldefekt.odxt') ~= '' ) - then - out = out .. getValue('spaltelampe.epitel.central_epiteldefekt.odxt') - if (getValue('spaltelampe.epitel.toerhedsforandringer.odxt') ~= '' or getValue('spaltelampe.epitel.andet.odxt') ~= '') - then - out = out .. ', ' - else - out = out .. '\n' - end - end - if ( getValue('spaltelampe.epitel.toerhedsforandringer.odxt') ~= '' ) - then - out = out .. getValue('spaltelampe.epitel.toerhedsforandringer.odxt') - if (getValue('spaltelampe.epitel.andet.odxt') ~= '') - then - out = out .. ', ' - else - out = out .. '\n' - end - end - if ( getValue('spaltelampe.epitel.andet.odxt') ~= '' ) - then - out = out .. getValue('spaltelampe.epitel.andet.odxt') .. '\n' - end - - if ( getValue('spaltelampe.stroma.odxt') ~= '' ) - then - out = out .. ' Stroma: ' .. getValue('spaltelampe.stroma.odxt') .. '\n' - end - if ( getValue('spaltelampe.flap.odxt') ~= '' ) - then - out = out .. ' Flap: ' .. getValue('spaltelampe.flap.odxt') .. '\n' - end - if ( getValue('spaltelampe.folder.odxt') ~= '' ) - then - out = out .. ' Folder: ' .. getValue('spaltelampe.folder.odxt') .. '\n' - end - if ( getValue('spaltelampe.interface.partikler.odxt') ~= '' or getValue('spaltelampe.interface.epitelindvaekst.odxt') ~= '' ) - then - out = out .. ' Interface: ' - if ( getValue('spaltelampe.interface.partikler.odxt') ~= '' ) - then - out = out .. getValue('spaltelampe.interface.partikler.odxt') - if ( getValue('spaltelampe.interface.epitelindvaekst.odxt') ~= '' ) - then - out = out .. ', ' - end - end - if ( getValue('spaltelampe.interface.epitelindvaekst.odxt') ~= '' ) - then - out = out .. getValue('spaltelampe.interface.epitelindvaekst.odxt') .. '\n' - else - out = out .. '\n' - end - end - if ( getValue('spaltelampe.endothel.odxt') ~= '' ) - then - out = out .. ' Endothel: ' .. getValue('spaltelampe.endothel.odxt') .. '\n' - end - if ( getValue('spaltelampe.lens.odxt') ~= '' ) - then - out = out .. 'Lens: ' .. getValue('spaltelampe.lens.odxt') .. '\n' - end - if ( getValue('spaltelampe.supplerende.odxt') ~= '' ) - then - out = out .. getValue('spaltelampe.supplerende.odxt') .. '\n' - end - end - - if ( getValue('spaltelampe.mangler.osin') == '' ) - then - if ( getValue('spaltelampe.mangler.odxt') == '' ) - then - out = out .. '\n' - end - out = out .. 'Spaltelampe, o.sin:\n' - - if ( getValue('spaltelampe.konjuktiva.osin') ~= '' ) - then - out = out .. 'Konjuktiva: ' .. getValue('spaltelampe.konjuktiva.osin') .. '\n' - end - - out = out .. 'Cornea:\n' - - if ( getValue('spaltelampe.epitel.intakt.osin') ~= '' or getValue('spaltelampe.epitel.central_epiteldefekt.osin') ~= '' or getValue('spaltelampe.epitel.toerhedsforandringer.osin') ~= '' or getValue('spaltelampe.epitel.andet.osin') ~= '') - then - out = out .. ' Epitel: ' - end - if ( getValue('spaltelampe.epitel.intakt.osin') ~= '' ) - then - out = out .. getValue('spaltelampe.epitel.intakt.osin') - if ( getValue('spaltelampe.epitel.central_epiteldefekt.osin') ~= '' or getValue('spaltelampe.epitel.toerhedsforandringer.osin') ~= '' or getValue('spaltelampe.epitel.andet.osin') ~= '') - then - out = out .. ', ' - else - out = out .. '\n' - end - end - if ( getValue('spaltelampe.epitel.central_epiteldefekt.osin') ~= '' ) - then - out = out .. getValue('spaltelampe.epitel.central_epiteldefekt.osin') - if (getValue('spaltelampe.epitel.toerhedsforandringer.osin') ~= '' or getValue('spaltelampe.epitel.andet.osin') ~= '') - then - out = out .. ', ' - else - out = out .. '\n' - end - end - if ( getValue('spaltelampe.epitel.toerhedsforandringer.osin') ~= '' ) - then - out = out .. getValue('spaltelampe.epitel.toerhedsforandringer.osin') - if (getValue('spaltelampe.epitel.andet.osin') ~= '') - then - out = out .. ', ' - else - out = out .. '\n' - end - end - if ( getValue('spaltelampe.epitel.andet.osin') ~= '' ) - then - out = out .. getValue('spaltelampe.epitel.andet.osin') .. '\n' - end - - if ( getValue('spaltelampe.epitel.osin') ~= '' ) - then - out = out .. ' Epitel: ' .. getValue('spaltelampe.epitel.osin') .. '\n' - end - if ( getValue('spaltelampe.stroma.osin') ~= '' ) - then - out = out .. ' Stroma: ' .. getValue('spaltelampe.stroma.osin') .. '\n' - end - if ( getValue('spaltelampe.flap.osin') ~= '' ) - then - out = out .. ' Flap: ' .. getValue('spaltelampe.flap.osin') .. '\n' - end - if ( getValue('spaltelampe.folder.osin') ~= '' ) - then - out = out .. ' Folder: ' .. getValue('spaltelampe.folder.osin') .. '\n' - end - if ( getValue('spaltelampe.interface.partikler.osin') ~= '' or getValue('spaltelampe.interface.epitelindvaekst.osin') ~= '' ) - then - out = out .. ' Interface: ' - if ( getValue('spaltelampe.interface.partikler.osin') ~= '' ) - then - out = out .. getValue('spaltelampe.interface.partikler.osin') - if ( getValue('spaltelampe.interface.epitelindvaekst.osin') ~= '' ) - then - out = out .. ', ' - end - end - if ( getValue('spaltelampe.interface.epitelindvaekst.osin') ~= '' ) - then - out = out .. getValue('spaltelampe.interface.epitelindvaekst.osin') .. '\n' - else - out = out .. '\n' - end - end - if ( getValue('spaltelampe.endothel.osin') ~= '' ) - then - out = out .. ' Endothel: ' .. getValue('spaltelampe.endothel.osin') .. '\n' - end - if ( getValue('spaltelampe.lens.osin') ~= '' ) - then - out = out .. 'Lens: ' .. getValue('spaltelampe.lens.osin') .. '\n' - end - if ( getValue('spaltelampe.supplerende.osin') ~= '' ) - then - out = out .. getValue('spaltelampe.supplerende.osin') .. '\n' - end - end - - return out - - - - - - - - value = 0 - timestamp = 0 - source = '' - - if( missing_eye_odxt ) - then - if( missing_eye_odxt.value and missing_eye_odxt.value == '' ) - then - value = '' - timestamp = missing_eye_odxt.timestamp - source = missing_eye_odxt.source - else - value = 'mangler' - timestamp = missing_eye_odxt.timestamp - source = missing_eye_odxt.source - end - end - return value, timestamp, source - - - value = 0 - timestamp = 0 - source = '' - - if( missing_eye_osin ) - then - if( missing_eye_osin.value and missing_eye_osin.value == '' ) - then - value = '' - timestamp = missing_eye_osin.timestamp - source = missing_eye_osin.source - else - value = 'mangler' - timestamp = missing_eye_osin.timestamp - source = missing_eye_osin.source - end - end - return value, timestamp, source - - - - - - - - - - - - - - - - - -