|
X |
* |
HINWEIS1 |
BEGSR |
BAR$ART |
43 |
|
|
|
|
|
|
|
|
X |
* |
IDXMAIN |
BEGSR |
BAR$ART |
32 |
|
|
|
|
|
|
|
|
X |
* |
MNTMAIN |
BEGSR |
BAR$ART |
50 |
|
|
|
|
|
|
|
|
X |
* |
KALMAIN |
BEGSR |
BAR$ART |
30 |
|
|
|
|
|
|
|
|
X |
* |
ARTMAIN |
BEGSR |
BAR$ART |
37 |
|
|
|
|
|
|
|
|
X |
* |
ARTFILE |
BEGSR |
BAR$ART |
49 |
|
|
|
|
|
|
|
|
X |
* |
ARTFILEWW |
BEGSR |
BAR$ART |
40 |
|
|
|
|
|
|
|
|
X |
* |
ARTFILEXML |
BEGSR |
BAR$ART |
7 |
|
|
|
|
|
|
|
|
X |
* |
ARTFILERSS |
BEGSR |
BAR$ART |
11 |
|
|
|
|
|
|
|
|
X |
* |
ARTFILEATOM |
BEGSR |
BAR$ART |
10 |
|
|
|
|
|
|
|
|
X |
* |
ARTFILEHTML |
BEGSR |
BAR$ART |
84 |
|
|
|
|
|
|
|
|
X |
* |
ARTFILEMIN |
BEGSR |
BAR$ART |
38 |
|
|
|
|
|
|
|
|
X |
* |
ARTFILEMINWW |
BEGSR |
BAR$ART |
40 |
|
|
|
|
|
|
|
|
X |
* |
ARTFILESRC |
BEGSR |
BAR$ART |
48 |
|
|
|
|
|
|
|
|
X |
* |
ARTFILEICN |
BEGSR |
BAR$ART |
27 |
|
|
|
|
|
|
|
|
X |
* |
ARTTEXT |
BEGSR |
BAR$ART |
34 |
|
|
|
|
|
|
|
|
X |
* |
ARTTEXTXML |
BEGSR |
BAR$ART |
16 |
|
|
|
|
|
|
|
|
X |
* |
ARTTEXTRSS |
BEGSR |
BAR$ART |
16 |
|
|
|
|
|
|
|
|
X |
* |
ARTTEXTATOM |
BEGSR |
BAR$ART |
16 |
|
|
|
|
|
|
|
|
X |
* |
ARTTEXTHTML |
BEGSR |
BAR$ART |
20 |
|
|
|
|
|
|
|
|
X |
* |
ARTTEXTAW |
BEGSR |
BAR$ART |
33 |
|
|
|
|
|
|
|
|
X |
* |
ARTTITEL |
BEGSR |
BAR$ART |
42 |
|
|
|
|
|
|
|
|
X |
* |
ARTTITEL2 |
BEGSR |
BAR$ART |
18 |
|
|
|
|
|
|
|
|
X |
* |
ARTSPERRE |
BEGSR |
BAR$ART |
20 |
|
|
|
|
|
|
|
|
X |
* |
ARTINFO |
BEGSR |
BAR$ART |
19 |
|
|
|
|
|
|
|
|
X |
* |
ARTINFOART |
BEGSR |
BAR$ART |
71 |
|
|
|
|
|
|
|
|
X |
* |
ARTINFOART2 |
BEGSR |
BAR$ART |
33 |
|
|
|
|
|
|
|
|
X |
* |
ARTINFOAW |
BEGSR |
BAR$ART |
56 |
|
|
|
|
|
|
|
|
X |
* |
ARTINFOAW2 |
BEGSR |
BAR$ART |
33 |
|
|
|
|
|
|
|
|
X |
* |
ARTVOR |
BEGSR |
BAR$ART |
20 |
|
|
|
|
|
|
|
|
X |
* |
ARTVOR2 |
BEGSR |
BAR$ART |
14 |
|
|
|
|
|
|
|
|
X |
* |
ARTVOR3 |
BEGSR |
BAR$ART |
16 |
|
|
|
|
|
|
|
|
X |
* |
ARTNACH |
BEGSR |
BAR$ART |
20 |
|
|
|
|
|
|
|
|
X |
* |
ARTNACH2 |
BEGSR |
BAR$ART |
14 |
|
|
|
|
|
|
|
|
X |
* |
ARTNACH3 |
BEGSR |
BAR$ART |
16 |
|
|
|
|
|
|
|
|
X |
* |
ARTRESIZE |
BEGSR |
BAR$ART |
36 |
|
|
|
|
|
|
|
|
X |
|
|
|
X |
* |
ARKEYO |
KLIST |
BAR$ART |
3 |
|
|
|
|
|
|
|
|
X |
* |
ARKEYO1SET |
KLIST |
BAR$ART |
6 |
|
|
|
|
|
|
|
|
X |
* |
ARKEYO2SET |
KLIST |
BAR$ART |
6 |
|
|
|
|
|
|
|
|
X |
* |
ARKEYT |
KLIST |
BAR$ART |
4 |
|
|
|
|
|
|
|
|
X |
* |
ARKEYTSET |
KLIST |
BAR$ART |
7 |
|
|
|
|
|
|
|
|
X |
* |
ARKEYU |
KLIST |
BAR$ART |
4 |
|
|
|
|
|
|
|
|
X |
* |
ARKEYUSET |
KLIST |
BAR$ART |
7 |
|
|
|
|
|
|
|
|
X |
|
|
|
X |
* |
TEXTCOLOR |
EXSR |
BAR$TEXT |
|
|
|
|
|
|
|
|
|
X |
* |
TEXTSMILYSB |
EXSR |
BAR$TEXT |
|
|
|
|
|
|
|
|
|
X |
* |
BUFBGCOLOR |
EXSR |
BAR$TEXT |
|
|
|
|
|
|
|
|
|
X |
* |
WRSTOUT |
EXSR |
BAR$STOUT |
|
|
|
|
|
|
|
|
|
X |
* |
WRSTOUTV |
EXSR |
BAR$STOUT |
|
|
|
|
|
|
|
|
|
X |
* |
WRSTOUT |
EXSR |
BAR$STOUT |
|
|
|
|
|
|
|
|
|
X |
* |
TEXTCOLOR |
EXSR |
BAR$TEXT |
|
|
|
|
|
|
|
|
|
X |
* |
TEXTSMILYSB |
EXSR |
BAR$TEXT |
|
|
|
|
|
|
|
|
|
X |
* |
BUFBGCOLOR |
EXSR |
BAR$TEXT |
|
|
|
|
|
|
|
|
|
X |
* |
WRSTOUT |
EXSR |
BAR$STOUT |
|
|
|
|
|
|
|
|
|
X |
* |
WRSTOUTV |
EXSR |
BAR$STOUT |
|
|
|
|
|
|
|
|
|
X |
* |
WRSTOUT |
EXSR |
BAR$STOUT |
|
|
|
|
|
|
|
|
|
X |
* |
MYTYPTITEL |
EXSR |
BAR$NAV |
|
|
|
|
|
|
|
|
|
X |
* |
MYTITELX |
EXSR |
BAR$TEXT |
|
|
|
|
|
|
|
|
|
X |
* |
WRSTOUT |
EXSR |
BAR$STOUT |
|
|
|
|
|
|
|
|
|
X |
* |
WWWHREF |
EXSR |
BAR$TEXT |
|
|
|
|
|
|
|
|
|
X |
* |
MYTYPTITEL |
EXSR |
BAR$NAV |
|
|
|
|
|
|
|
|
|
X |
* |
MYTITELX |
EXSR |
BAR$TEXT |
|
|
|
|
|
|
|
|
|
X |
* |
WRSTOUT |
EXSR |
BAR$STOUT |
|
|
|
|
|
|
|
|
|
X |
* |
TEXTCOLOR |
EXSR |
BAR$TEXT |
|
|
|
|
|
|
|
|
|
X |
* |
TEXTSMILYSB |
EXSR |
BAR$TEXT |
|
|
|
|
|
|
|
|
|
X |
* |
BUFBGCOLOR |
EXSR |
BAR$TEXT |
|
|
|
|
|
|
|
|
|
X |
* |
WRSTOUT |
EXSR |
BAR$STOUT |
|
|
|
|
|
|
|
|
|
X |
* |
WRSTOUTV |
EXSR |
BAR$STOUT |
|
|
|
|
|
|
|
|
|
X |
* |
WRSTOUT |
EXSR |
BAR$STOUT |
|
|
|
|
|
|
|
|
|
X |
* |
WRSTOUT |
EXSR |
BAR$STOUT |
|
|
|
|
|
|
|
|
|
X |
* |
IFS$EXISTPARM |
CALL |
BAR$EXIST |
|
|
|
|
|
|
|
|
|
X |
* |
WRSTOUT |
EXSR |
BAR$STOUT |
|
|
|
|
|
|
|
|
|
X |
* |
WRSTOUT |
EXSR |
BAR$STOUT |
|
|
|
|
|
|
|
|
|
X |
* |
SENDTITEL2 |
EXSR |
BAR$SEND |
|
|
|
|
|
|
|
|
|
X |
* |
LINKANLAGE |
EXSR |
BAR$LINK |
|
|
|
|
|
|
|
|
|
X |
* |
LINKANLAGE |
EXSR |
BAR$LINK |
|
|
|
|
|
|
|
|
|
X |
* |
LINKMIN |
EXSR |
BAR$LINK |
|
|
|
|
|
|
|
|
|
X |
* |
LINKANLAGE |
EXSR |
BAR$LINK |
|
|
|
|
|
|
|
|
|
X |
* |
WRSTOUT |
EXSR |
BAR$STOUT |
|
|
|
|
|
|
|
|
|
X |
* |
IFS$EXISTPARM |
CALL |
BAR$EXIST |
|
|
|
|
|
|
|
|
|
X |
* |
SRCEXIST |
EXSR |
BAR$EXIST |
|
|
|
|
|
|
|
|
|
X |
* |
NATYPNAV |
EXSR |
BAR$NAV |
|
|
|
|
|
|
|
|
|
X |
* |
SRCEXIST |
EXSR |
BAR$EXIST |
|
|
|
|
|
|
|
|
|
X |
* |
NATYPNAV |
EXSR |
BAR$NAV |
|
|
|
|
|
|
|
|
|
X |
* |
SRCEXIST |
EXSR |
BAR$EXIST |
|
|
|
|
|
|
|
|
|
X |
* |
TEXTSMILYS |
EXSR |
BAR$TEXT |
|
|
|
|
|
|
|
|
|
X |
* |
MYBUFV2FORM |
EXSR |
BAR$TEXT |
|
|
|
|
|
|
|
|
|
X |
* |
WRSTOUT |
EXSR |
BAR$STOUT |
|
|
|
|
|
|
|
|
|
X |
* |
WRSTOUTV |
EXSR |
BAR$STOUT |
|
|
|
|
|
|
|
|
|
X |
* |
WRSTOUT |
EXSR |
BAR$STOUT |
|
|
|
|
|
|
|
|
|
X |
* |
TEXTSMILYS |
EXSR |
BAR$TEXT |
|
|
|
|
|
|
|
|
|
X |
* |
MYBUFV2FORM |
EXSR |
BAR$TEXT |
|
|
|
|
|
|
|
|
|
X |
* |
WRSTOUT |
EXSR |
BAR$STOUT |
|
|
|
|
|
|
|
|
|
X |
* |
WRSTOUTV |
EXSR |
BAR$STOUT |
|
|
|
|
|
|
|
|
|
X |
* |
WRSTOUT |
EXSR |
BAR$STOUT |
|
|
|
|
|
|
|
|
|
X |
* |
TEXTSMILYS |
EXSR |
BAR$TEXT |
|
|
|
|
|
|
|
|
|
X |
* |
MYBUFV2FORM |
EXSR |
BAR$TEXT |
|
|
|
|
|
|
|
|
|
X |
* |
WRSTOUT |
EXSR |
BAR$STOUT |
|
|
|
|
|
|
|
|
|
X |
* |
WRSTOUTV |
EXSR |
BAR$STOUT |
|
|
|
|
|
|
|
|
|
X |
* |
WRSTOUT |
EXSR |
BAR$STOUT |
|
|
|
|
|
|
|
|
|
X |
* |
TEXTSMILYS |
EXSR |
BAR$TEXT |
|
|
|
|
|
|
|
|
|
X |
* |
WRSTOUT |
EXSR |
BAR$STOUT |
|
|
|
|
|
|
|
|
|
X |
* |
WRSTOUTV |
EXSR |
BAR$STOUT |
|
|
|
|
|
|
|
|
|
X |
* |
WRSTOUT |
EXSR |
BAR$STOUT |
|
|
|
|
|
|
|
|
|
X |
* |
MYTYPSPERREX |
EXSR |
BAR$NAV |
|
|
|
|
|
|
|
|
|
X |
* |
NATYPNAV |
EXSR |
BAR$NAV |
|
|
|
|
|
|
|
|
|
X |
* |
NATYPNAV |
EXSR |
BAR$NAV |
|
|
|
|
|
|
|
|
|
X |
* |
NUMSTR |
EXSR |
BAR$NUM |
|
|
|
|
|
|
|
|
|
X |
* |
TABLE8 |
EXSR |
BAR$TABLE |
|
|
|
|
|
|
|
|
|
X |
* |
ROW |
EXSR |
BAR$TABLE |
|
|
|
|
|
|
|
|
|
X |
* |
COLLEFT |
EXSR |
BAR$TABLE |
|
|
|
|
|
|
|
|
|
X |
* |
MYTYPTITEL |
EXSR |
BAR$NAV |
|
|
|
|
|
|
|
|
|
X |
* |
MYTITELX |
EXSR |
BAR$TEXT |
|
|
|
|
|
|
|
|
|
X |
* |
LINKMIT |
EXSR |
BAR$LINK |
|
|
|
|
|
|
|
|
|
X |
* |
MYTYPTITEL |
EXSR |
BAR$NAV |
|
|
|
|
|
|
|
|
|
X |
* |
MYTITELX |
EXSR |
BAR$TEXT |
|
|
|
|
|
|
|
|
|
X |
* |
LINKMIT |
EXSR |
BAR$LINK |
|
|
|
|
|
|
|
|
|
X |
* |
MYTYPTITEL |
EXSR |
BAR$NAV |
|
|
|
|
|
|
|
|
|
X |
* |
MYTITELX |
EXSR |
BAR$TEXT |
|
|
|
|
|
|
|
|
|
X |
* |
LINKRUB |
EXSR |
BAR$LINK |
|
|
|
|
|
|
|
|
|
X |
* |
COLCENTER |
EXSR |
BAR$TABLE |
|
|
|
|
|
|
|
|
|
X |
* |
COLRIGHT |
EXSR |
BAR$TABLE |
|
|
|
|
|
|
|
|
|
X |
* |
ROWX |
EXSR |
BAR$TABLE |
|
|
|
|
|
|
|
|
|
X |
* |
TABLEX |
EXSR |
BAR$TABLE |
|
|
|
|
|
|
|
|
|
X |
* |
MYTYPTITEL |
EXSR |
BAR$NAV |
|
|
|
|
|
|
|
|
|
X |
* |
MYTITELX |
EXSR |
BAR$TEXT |
|
|
|
|
|
|
|
|
|
X |
* |
MYTYPTITEL |
EXSR |
BAR$NAV |
|
|
|
|
|
|
|
|
|
X |
* |
MYTITELX |
EXSR |
BAR$TEXT |
|
|
|
|
|
|
|
|
|
X |
* |
MYTYPTITEL |
EXSR |
BAR$NAV |
|
|
|
|
|
|
|
|
|
X |
* |
MYTITELX |
EXSR |
BAR$TEXT |
|
|
|
|
|
|
|
|
|
X |
* |
TABLE8 |
EXSR |
BAR$TABLE |
|
|
|
|
|
|
|
|
|
X |
* |
ROW |
EXSR |
BAR$TABLE |
|
|
|
|
|
|
|
|
|
X |
* |
COLLEFT |
EXSR |
BAR$TABLE |
|
|
|
|
|
|
|
|
|
X |
* |
MYTYPTITEL |
EXSR |
BAR$NAV |
|
|
|
|
|
|
|
|
|
X |
* |
MYTITELX |
EXSR |
BAR$TEXT |
|
|
|
|
|
|
|
|
|
X |
* |
LINKMIT |
EXSR |
BAR$LINK |
|
|
|
|
|
|
|
|
|
X |
* |
MYTYPTITEL |
EXSR |
BAR$NAV |
|
|
|
|
|
|
|
|
|
X |
* |
MYTITELX |
EXSR |
BAR$TEXT |
|
|
|
|
|
|
|
|
|
X |
* |
LINKARTAW |
EXSR |
BAR$LINK |
|
|
|
|
|
|
|
|
|
X |
* |
COLCENTER |
EXSR |
BAR$TABLE |
|
|
|
|
|
|
|
|
|
X |
* |
COLRIGHT |
EXSR |
BAR$TABLE |
|
|
|
|
|
|
|
|
|
X |
* |
ROWX |
EXSR |
BAR$TABLE |
|
|
|
|
|
|
|
|
|
X |
* |
TABLEX |
EXSR |
BAR$TABLE |
|
|
|
|
|
|
|
|
|
X |
* |
MYTYPTITEL |
EXSR |
BAR$NAV |
|
|
|
|
|
|
|
|
|
X |
* |
MYTITELX |
EXSR |
BAR$TEXT |
|
|
|
|
|
|
|
|
|
X |
* |
MYTYPTITEL |
EXSR |
BAR$NAV |
|
|
|
|
|
|
|
|
|
X |
* |
MYTITELX |
EXSR |
BAR$TEXT |
|
|
|
|
|
|
|
|
|
X |
* |
MYTYPTITEL |
EXSR |
BAR$NAV |
|
|
|
|
|
|
|
|
|
X |
* |
MYTITELX |
EXSR |
BAR$TEXT |
|
|
|
|
|
|
|
|
|
X |
* |
LINKART$ |
EXSR |
BAR$LINK |
|
|
|
|
|
|
|
|
|
X |
* |
LINKADDB |
EXSR |
BAR$LINK |
|
|
|
|
|
|
|
|
|
X |
* |
LINKBILD |
EXSR |
BAR$LINK |
|
|
|
|
|
|
|
|
|
X |
* |
LINKBILD |
EXSR |
BAR$LINK |
|
|
|
|
|
|
|
|
|
X |
* |
LINKART$ |
EXSR |
BAR$LINK |
|
|
|
|
|
|
|
|
|
X |
* |
LINKADDB |
EXSR |
BAR$LINK |
|
|
|
|
|
|
|
|
|
X |
* |
LINKBILD |
EXSR |
BAR$LINK |
|
|
|
|
|
|
|
|
|
X |
* |
LINKBILD |
EXSR |
BAR$LINK |
|
|
|
|
|
|
|
|
|
X |
* |
SRCEXISTJS |
EXSR |
BAR$EXIST |
|
|
|
|
|
|
|
|
|
X |
|
|
|
C |
|
|
|
|
|
|
|
|
C |
*COPYRIGHT JÜRGEN REULE 2010-2024 |
|
|
C |
|
|
|
|
|
|
|
|
X |
* |
LISTEFRR |
EXSR |
BAR$LISTE |
|
|
|
|
|
|
|
|
|
X |
* |
SENDHTML |
EXSR |
BAR$SEND |
|
|
|
|
|
|
|
|
|
X |
* |
SENDHTML |
EXSR |
BAR$SEND |
|
|
|
|
|
|
|
|
|
X |
* |
SENDHTML |
EXSR |
BAR$SEND |
|
|
|
|
|
|
|
|
|
X |
|
|
|
C |
|
|
HINWEIS1 |
BEGSR |
|
|
|
|
|
|
|
|
|
|
C |
* |
|
|
-------------------------------------- |
|
|
C |
* |
|
|
Abstand ermitteln |
|
|
C |
* |
|
|
-------------------------------------- |
|
|
C |
|
|
ABSTAND |
IFEQ |
ABSTAND2 |
|
|
|
|
|
|
|
|
|
C |
|
|
|
MOVEL(P) |
ABSTAND1 |
ABSTAND$ |
|
|
|
|
|
|
|
|
C |
|
|
|
ELSE |
|
|
|
|
|
|
|
|
|
|
C |
|
|
|
MOVEL(P) |
ABSTAND |
ABSTAND$ |
|
|
|
|
|
|
|
|
C |
|
|
|
ENDIF |
|
|
|
|
|
|
|
|
|
|
C |
|
|
|
EVAL |
BUF = %TRIM(ABSTAND$)+ |
|
|
C |
|
|
|
|
'<div id="hinweis">' |
|
|
C |
|
|
|
|
|
|
|
|
C |
* |
|
|
-------------------------------------- |
|
|
C |
* |
|
|
Hinweis ausgeben |
|
|
C |
* |
|
|
-------------------------------------- |
|
|
C |
|
|
*BLANKS |
IFNE |
TEHINWEIS |
|
|
|
|
|
|
|
|
|
C |
|
|
|
MOVEL(P) |
FAHINWEIS |
COLOR7 |
|
|
|
|
|
|
|
|
C |
|
|
|
EXSR |
TEXTCOLOR |
|
|
|
|
|
|
|
|
|
C |
|
|
|
EVAL |
BUFV = %TRIM(TEHINWEIS) |
|
|
C |
|
|
|
EXSR |
TEXTSMILYSB |
|
|
|
|
|
|
|
|
|
C |
|
|
|
EVAL |
BUF = |
|
|
C |
|
|
|
|
BUF +'§<table border=0 + |
|
|
C |
|
|
|
|
cellspacing=0 + |
|
|
C |
|
|
|
|
cellpadding=8 summary="">§+ |
|
|
C |
|
|
|
|
<tr><td><center' |
|
|
C |
|
|
|
EXSR |
BUFBGCOLOR |
|
|
|
|
|
|
|
|
|
C |
|
|
|
EVAL |
BUF = |
|
|
C |
|
|
|
|
BUF + '>' |
|
|
C |
|
|
|
EXSR |
WRSTOUT |
|
|
|
|
|
|
|
|
|
C |
|
|
|
EXSR |
WRSTOUTV |
|
|
|
|
|
|
|
|
|
C |
|
|
|
EVAL |
BUF = |
|
|
C |
|
|
|
|
BUF + '</center></td></tr></table>' |
|
|
C |
|
|
|
ENDIF |
|
|
|
|
|
|
|
|
|
|
C |
|
|
|
EVAL |
BUF = |
|
|
C |
|
|
|
|
BUF + '</div>' |
|
|
C |
|
|
|
EXSR |
WRSTOUT |
|
|
|
|
|
|
|
|
|
C |
* |
|
|
-------------------------------------- |
|
|
C |
* |
|
|
Abstand ermitteln |
|
|
C |
* |
|
|
-------------------------------------- |
|
|
C |
|
|
ABSTAND |
IFEQ |
ABSTAND2 |
|
|
|
|
|
|
|
|
|
C |
|
|
|
MOVEL(P) |
ABSTAND21 |
ABSTAND |
|
|
|
|
|
|
|
|
C |
|
|
|
ENDIF |
|
|
|
|
|
|
|
|
|
|
C |
|
|
|
ENDSR |
|
|
|
|
|
|
|
|
|
|
C |
|
|
|
|
|
|
|
|
X |
* |
SENDHTML |
EXSR |
BAR$SEND |
|
|
|
|
|
|
|
|
|
X |
|
|
|
C |
|
|
IDXMAIN |
BEGSR |
|
|
|
|
|
|
|
|
|
|
C |
|
|
*BLANKS |
IFEQ |
SUCHE |
|
|
|
|
|
|
|
|
|
C |
* |
|
|
-------------------------------------- |
|
|
C |
* |
|
|
Text für Portal ausgeben |
|
|
C |
* |
|
|
-------------------------------------- |
|
|
C |
|
|
*BLANKS |
IFNE |
TETEXT |
|
|
|
|
|
|
|
|
|
C |
|
|
|
CLEAR |
|
COLOR7 |
|
|
|
|
|
|
|
|
C |
|
|
|
EXSR |
TEXTCOLOR |
|
|
|
|
|
|
|
|
|
C |
|
|
|
EVAL |
BUFV = TETEXT |
|
|
C |
|
|
|
EXSR |
TEXTSMILYSB |
|
|
|
|
|
|
|
|
|
C |
|
|
|
EVAL |
BUF = '<table border=0 + |
|
|
C |
|
|
|
|
cellspacing=0 + |
|
|
C |
|
|
|
|
cellpadding=8 summary="">§+ |
|
|
C |
|
|
|
|
<tr><td'+MAXWIDTHSTYLE+'><div' |
|
|
C |
|
|
|
EXSR |
BUFBGCOLOR |
|
|
|
|
|
|
|
|
|
C |
|
|
|
EVAL |
BUF = |
|
|
C |
|
|
|
|
BUF + '>' |
|
|
C |
* |
|
|
-------------------------------------- |
|
|
C |
* |
|
|
Abstand ausgeben |
|
|
C |
* |
|
|
-------------------------------------- |
|
|
C |
|
|
PFADXX |
IFEQ |
HTML |
|
|
|
|
|
|
|
|
|
C |
|
|
|
EVAL |
BUF = %TRIM(ABSTAND) + BUF |
|
|
C |
|
|
|
ENDIF |
|
|
|
|
|
|
|
|
|
|
C |
|
|
|
EXSR |
WRSTOUT |
|
|
|
|
|
|
|
|
|
C |
|
|
|
EXSR |
WRSTOUTV |
|
|
|
|
|
|
|
|
|
C |
|
|
|
EVAL |
BUF = |
|
|
C |
|
|
|
|
BUF + '</div></td></tr></table>' |
|
|
C |
|
|
|
EXSR |
WRSTOUT |
|
|
|
|
|
|
|
|
|
C |
|
|
|
MOVEL(P) |
ABSTAND2 |
ABSTAND |
|
|
|
|
|
|
|
|
C |
|
|
|
ENDIF |
|
|
|
|
|
|
|
|
|
|
C |
|
|
|
ENDIF |
|
|
|
|
|
|
|
|
|
|
C |
|
|
|
ENDSR |
|
|
|
|
|
|
|
|
|
|
C |
|
|
|
|
|
|
|
|
X |
* |
SENDHTML |
EXSR |
BAR$SEND |
|
|
|
|
|
|
|
|
|
X |
|
|
|
C |
|
|
MNTMAIN |
BEGSR |
|
|
|
|
|
|
|
|
|
|
C |
* |
|
|
-------------------------------------- |
|
|
C |
* |
|
|
Text für Wartung ausgeben |
|
|
C |
* |
|
|
-------------------------------------- |
|
|
C |
|
|
|
MOVEL(P) |
'SPMNT' |
MYTYP |
|
|
|
|
|
|
|
|
C |
|
|
|
EXSR |
MYTYPTITEL |
|
|
|
|
|
|
|
|
|
C |
|
|
*BLANKS |
IFNE |
MYTITEL |
|
|
|
|
|
|
|
|
|
C |
|
|
|
EXSR |
MYTITELX |
|
|
|
|
|
|
|
|
|
C |
|
|
|
EVAL |
BUF = '<table border=0 + |
|
|
C |
|
|
|
|
cellspacing=0 + |
|
|
C |
|
|
|
|
cellpadding=8 summary="">§+ |
|
|
C |
|
|
|
|
<tr><td'+%TRIMR(TDMIDDLE) + |
|
|
C |
|
|
|
|
|
%TRIMR(TDCENTER) + |
|
|
C |
|
|
|
|
|
%TRIMR(MAINCOLOR)+'>+ |
|
|
C |
|
|
|
|
<font size="+2"><b>'+ |
|
|
C |
|
|
|
|
|
%TRIM(FONT) + |
|
|
C |
|
|
|
|
|
%TRIM(MYTITEL)+ |
|
|
C |
|
|
|
|
|
%TRIM(FONTX)+'</b></font>+ |
|
|
C |
|
|
|
|
</td></tr></table><br><br><br>' |
|
|
C |
* |
|
|
-------------------------------------- |
|
|
C |
* |
|
|
Abstand ausgeben |
|
|
C |
* |
|
|
-------------------------------------- |
|
|
C |
|
|
PFADXX |
IFEQ |
HTML |
|
|
|
|
|
|
|
|
|
C |
|
|
|
EVAL |
BUF = %TRIM(ABSTAND) + BUF |
|
|
C |
|
|
|
ENDIF |
|
|
|
|
|
|
|
|
|
|
C |
|
|
|
EXSR |
WRSTOUT |
|
|
|
|
|
|
|
|
|
C |
|
|
|
ENDIF |
|
|
|
|
|
|
|
|
|
|
C |
* |
|
|
-------------------------------------- |
|
|
C |
* |
|
|
Verweis auf Seite mit Status ausgeben |
|
|
C |
* |
|
|
-------------------------------------- |
|
|
C |
|
|
*BLANKS |
IFNE |
LISTATUS |
|
|
|
|
|
|
|
|
|
C |
|
|
|
MOVEL(P) |
LISTATUS |
WWW |
|
|
|
|
|
|
|
|
C |
|
|
|
EXSR |
WWWHREF |
|
|
|
|
|
|
|
|
|
C |
|
|
|
MOVEL(P) |
'SPSTATUS' |
MYTYP |
|
|
|
|
|
|
|
|
C |
|
|
|
EXSR |
MYTYPTITEL |
|
|
|
|
|
|
|
|
|
C |
|
|
|
EXSR |
MYTITELX |
|
|
|
|
|
|
|
|
|
C |
|
|
|
EVAL |
BUF = '<table border=0 + |
|
|
C |
|
|
|
|
cellspacing=0 + |
|
|
C |
|
|
|
|
cellpadding=8 summary="">§+ |
|
|
C |
|
|
|
|
<tr><td'+%TRIMR(TDMIDDLE)+ |
|
|
C |
|
|
|
|
|
%TRIMR(TDCENTER)+'>'+ |
|
|
C |
|
|
|
|
|
%TRIMR(FONT) + |
|
|
C |
|
|
|
|
'<a'+%TRIMR(WWW) +'>'+ |
|
|
C |
|
|
|
|
|
%TRIMR(MYTITEL) +'</a>'+ |
|
|
C |
|
|
|
|
|
%TRIMR(FONTX) + |
|
|
C |
|
|
|
|
'</td></tr></table><br>' |
|
|
C |
|
|
|
EXSR |
WRSTOUT |
|
|
|
|
|
|
|
|
|
C |
|
|
|
MOVEL(P) |
ABSTAND2 |
ABSTAND |
|
|
|
|
|
|
|
|
C |
|
|
|
ENDIF |
|
|
|
|
|
|
|
|
|
|
C |
|
|
|
ENDSR |
|
|
|
|
|
|
|
|
|
|
C |
|
|
|
|
|
|
|
|
X |
* |
LISTEKAL |
EXSR |
BAR$LISTE |
|
|
|
|
|
|
|
|
|
X |
|
|
|
C |
|
|
KALMAIN |
BEGSR |
|
|
|
|
|
|
|
|
|
|
C |
* |
|
|
-------------------------------------- |
|
|
C |
* |
|
|
Text für Kalender ausgeben |
|
|
C |
* |
|
|
-------------------------------------- |
|
|
C |
|
|
*BLANKS |
IFNE |
TEKALENDER |
|
|
|
|
|
|
|
|
|
C |
|
|
|
CLEAR |
|
COLOR7 |
|
|
|
|
|
|
|
|
C |
|
|
|
EXSR |
TEXTCOLOR |
|
|
|
|
|
|
|
|
|
C |
|
|
|
EVAL |
BUFV = TEKALENDER |
|
|
C |
|
|
|
EXSR |
TEXTSMILYSB |
|
|
|
|
|
|
|
|
|
C |
|
|
|
EVAL |
BUF = '<table border=0 + |
|
|
C |
|
|
|
|
cellspacing=0 + |
|
|
C |
|
|
|
|
cellpadding=8 summary="">§+ |
|
|
C |
|
|
|
|
<tr><td'+MAXWIDTHSTYLE+'><div' |
|
|
C |
|
|
|
EXSR |
BUFBGCOLOR |
|
|
|
|
|
|
|
|
|
C |
|
|
|
EVAL |
BUF = |
|
|
C |
|
|
|
|
BUF + '>' |
|
|
C |
* |
|
|
-------------------------------------- |
|
|
C |
* |
|
|
Abstand ausgeben |
|
|
C |
* |
|
|
-------------------------------------- |
|
|
C |
|
|
PFADXX |
IFEQ |
HTML |
|
|
|
|
|
|
|
|
|
C |
|
|
|
EVAL |
BUF = %TRIM(ABSTAND) + BUF |
|
|
C |
|
|
|
ENDIF |
|
|
|
|
|
|
|
|
|
|
C |
|
|
|
EXSR |
WRSTOUT |
|
|
|
|
|
|
|
|
|
C |
|
|
|
EXSR |
WRSTOUTV |
|
|
|
|
|
|
|
|
|
C |
|
|
|
EVAL |
BUF = |
|
|
C |
|
|
|
|
BUF + '</div></td></tr></table>' |
|
|
C |
|
|
|
EXSR |
WRSTOUT |
|
|
|
|
|
|
|
|
|
C |
|
|
|
MOVEL(P) |
ABSTAND2 |
ABSTAND |
|
|
|
|
|
|
|
|
C |
|
|
|
ENDIF |
|
|
|
|
|
|
|
|
|
|
C |
|
|
|
ENDSR |
|
|
|
|
|
|
|
|
|
|
C |
|
|
|
|
|
|
|
|
X |
* |
SENDXML |
EXSR |
BAR$SEND |
|
|
|
|
|
|
|
|
|
X |
* |
SENDRSS |
EXSR |
BAR$SEND |
|
|
|
|
|
|
|
|
|
X |
* |
SENDATOM |
EXSR |
BAR$SEND |
|
|
|
|
|
|
|
|
|
X |
* |
SENDHTML |
EXSR |
BAR$SEND |
|
|
|
|
|
|
|
|
|
X |
|
|
|
C |
|
|
ARTMAIN |
BEGSR |
|
|
|
|
|
|
|
|
|
|
C |
|
|
|
EVAL |
BUF = '' |
|
|
C |
* |
|
|
-------------------------------------- |
|
|
C |
* |
|
|
Bild/Film/Anlage/Text ausgeben |
|
|
C |
* |
|
|
-------------------------------------- |
|
|
C |
|
|
PFADXX |
IFEQ |
HTML |
|
|
|
|
|
|
|
|
|
C |
|
|
|
EVAL |
BUF = '<div id="main">' |
|
|
C |
|
|
|
ENDIF |
|
|
|
|
|
|
|
|
|
|
C |
* |
|
|
-------------------------------------- |
|
|
C |
* |
|
|
Abstand ausgeben |
|
|
C |
* |
|
|
-------------------------------------- |
|
|
C |
|
|
PFADXX |
IFEQ |
HTML |
|
|
|
|
|
|
|
|
|
C |
|
|
|
EVAL |
BUF = %TRIM(ABSTAND) + BUF |
|
|
C |
|
|
|
ENDIF |
|
|
|
|
|
|
|
|
|
|
C |
* |
|
|
-------------------------------------- |
|
|
C |
* |
|
|
Bild/Film/Anlage ausgeben |
|
|
C |
* |
|
|
-------------------------------------- |
|
|
C |
|
|
|
EXSR |
ARTFILE |
|
|
|
|
|
|
|
|
|
C |
|
|
|
|
|
|
|
|
C |
* |
|
|
-------------------------------------- |
|
|
C |
* |
|
|
Text ausgeben |
|
|
C |
* |
|
|
-------------------------------------- |
|
|
C |
|
|
|
EXSR |
ARTTEXT |
|
|
|
|
|
|
|
|
|
C |
|
|
|
|
|
|
|
|
C |
* |
|
|
-------------------------------------- |
|
|
C |
* |
|
|
Bild/Film/Anlage/Text ausgeben |
|
|
C |
* |
|
|
-------------------------------------- |
|
|
C |
|
|
PFADXX |
IFEQ |
HTML |
|
|
|
|
|
|
|
|
|
C |
|
|
|
EVAL |
BUF = |
|
|
C |
|
|
|
|
BUF + '</div>' |
|
|
C |
|
|
|
ENDIF |
|
|
|
|
|
|
|
|
|
|
C |
* |
|
|
-------------------------------------- |
|
|
C |
* |
|
|
Bild/Film/Anlage/Text ausgeben |
|
|
C |
* |
|
|
-------------------------------------- |
|
|
C |
|
|
|
EXSR |
WRSTOUT |
|
|
|
|
|
|
|
|
|
C |
|
72 |
|
MOVEL(P) |
ABSTAND2 |
ABSTAND |
|
|
|
|
|
|
|
|
C |
|
|
|
ENDSR |
|
|
|
|
|
|
|
|
|
|
C |
|
|
|
|
|
|
|
|
X |
* |
ARTMAIN |
EXSR |
BAR$ART |
|
|
|
|
|
|
|
|
|
X |
|
|
|
C |
|
|
ARTFILE |
BEGSR |
|
|
|
|
|
|
|
|
|
|
C |
* |
|
|
-------------------------------------- |
|
|
C |
* |
|
|
Bild/Film/Anlage ausgeben |
|
|
C |
* |
|
|
-------------------------------------- |
|
|
C |
|
|
*BLANKS |
IFNE |
WWFILEX |
|
|
|
|
|
|
|
|
|
C |
|
|
'-' |
ANDNE |
WWFILEX |
|
|
|
|
|
|
|
|
|
C |
|
|
|
|
|
|
|
|
C |
* |
|
|
-------------------------------------- |
|
|
C |
* |
|
|
Bild/Film/Anlage ermitteln |
|
|
C |
* |
|
|
-------------------------------------- |
|
|
C |
|
|
|
SELECT |
|
|
|
|
C |
|
|
*BLANKS |
WHENNE |
WWNAV |
|
|
|
|
|
|
|
|
|
C |
|
|
|
EVAL |
SRC = %TRIM |
( |
WWNAV) + |
|
|
C |
|
|
|
|
%TRIM |
( |
ELEMENTMIN) + |
|
|
C |
|
|
|
|
%TRIM |
( |
WWFILEX) |
|
|
C |
|
|
TARGETPARENT |
WHENEQ |
TARGET |
|
|
|
|
|
|
|
|
|
C |
|
|
|
EVAL |
SRC = %TRIM |
( |
%SUBST(PFAD:1:PFADLEN3)) + |
|
|
C |
|
|
|
|
%TRIM |
( |
ELEMENTMIN) + |
|
|
C |
|
|
|
|
%TRIM |
( |
WWFILEX) |
|
|
C |
|
|
|
OTHER |
|
|
|
|
|
|
|
|
|
|
C |
|
|
|
EVAL |
SRC = %TRIM |
( |
PFAD) + |
|
|
C |
|
|
|
|
%TRIM |
( |
WWFILEX) |
|
|
C |
|
|
|
ENDSL |
|
|
|
|
|
|
|
|
|
|
C |
* |
|
|
-------------------------------------- |
|
|
C |
* |
|
|
Bild/Film/Anlage vorhanden? |
|
|
C |
* |
|
|
-------------------------------------- |
|
|
C |
|
|
|
EXSR |
ARTFILEWW |
|
|
|
|
|
|
|
|
|
C |
|
|
*BLANKS |
IFNE |
SRC |
|
|
|
|
|
|
|
|
|
C |
|
|
|
|
|
|
|
|
C |
* |
|
|
-------------------------------------- |
|
|
C |
* |
|
|
Bild/Film/Anlage anzeigen erlauben |
|
|
C |
* |
|
|
-------------------------------------- |
|
|
C |
|
|
*BLANKS |
IFNE |
ZEIGEN |
|
|
|
|
|
|
|
|
|
C |
|
|
*BLANKS |
COMP |
QUERY |
|
|
|
— |
— |
78 |
|
|
|
C |
|
78 |
|
EVAL |
BUF2 = '?' |
|
|
C |
|
N78 |
|
EVAL |
BUF2 = '&' |
|
|
C |
|
|
|
EVAL |
SRC = SRC + BUF2 + ZEIGENNAME + '1' |
|
|
C |
|
|
|
ENDIF |
|
|
|
|
|
|
|
|
|
|
C |
|
|
|
ENDIF |
|
|
|
|
|
|
|
|
|
|
C |
* |
|
|
-------------------------------------- |
|
|
C |
* |
|
|
Bild/Film/Anlage ausgeben |
|
|
C |
* |
|
|
-------------------------------------- |
|
|
C |
|
|
PFADXX |
CASEQ |
XML |
ARTFILEXML |
|
|
|
|
|
|
|
|
C |
|
|
PFADXX |
CASEQ |
RSS |
ARTFILERSS |
|
|
|
|
|
|
|
|
C |
|
|
PFADXX |
CASEQ |
ATOM |
ARTFILEATOM |
|
|
|
|
|
|
|
|
C |
|
|
PFADXX |
CASEQ |
HTML |
ARTFILEHTML |
|
|
|
|
|
|
|
|
C |
|
|
|
ENDCS |
|
|
|
|
|
|
|
|
|
|
C |
|
|
|
ENDIF |
|
|
|
|
|
|
|
|
|
|
C |
|
|
|
ENDSR |
|
|
|
|
|
|
|
|
|
|
C |
|
|
|
|
|
|
|
|
X |
* |
ARTFILE |
EXSR |
BAR$ART |
|
|
|
|
|
|
|
|
|
X |
|
|
|
C |
|
|
ARTFILEWW |
BEGSR |
|
|
|
|
|
|
|
|
|
|
C |
|
|
|
EVAL |
STMF = SRC |
|
|
C |
* |
|
|
-------------------------------------- |
|
|
C |
* |
|
|
Prüfen ob Anlage vorhanden ist |
|
|
C |
* |
|
|
-------------------------------------- |
|
|
C |
|
|
|
EVAL |
FILEIFS = %TRIM(MAPFAD)+'/'+ |
|
|
C |
|
|
|
|
%TRIM(SRC) |
|
|
C |
|
|
|
CALL |
'IFS$EXIST' |
IFS$EXISTPARM |
|
|
— |
77 |
— |
|
|
|
C |
|
|
|
|
|
|
|
|
C |
* |
|
|
-------------------------------------- |
|
|
C |
* |
|
|
Adresse zum Einbinden ermitteln |
|
|
C |
* |
|
|
-------------------------------------- |
|
|
C |
|
|
*IN77 |
IFEQ |
*OFF |
|
|
|
|
|
|
|
|
|
C |
|
|
|
|
|
|
|
|
C |
* |
|
|
-------------------------------------- |
|
|
C |
* |
|
|
Adresse zum Einbinden ermitteln |
|
|
C |
* |
|
|
-------------------------------------- |
|
|
C |
|
|
PFADXX |
IFEQ |
HTML |
|
|
|
|
|
|
|
|
|
C |
|
|
|
|
|
|
|
|
C |
|
|
*BLANKS |
COMP |
ELEMENT |
|
|
|
— |
— |
78 |
|
|
|
C |
|
N78 |
|
MOVEL(P) |
ELEMENT |
ELEMENT8 |
|
|
|
|
|
|
|
|
C |
|
78 |
|
MOVEL(P) |
INDEXNAV |
ELEMENT8 |
|
|
|
|
|
|
|
|
C |
|
|
|
|
|
|
|
|
C |
|
|
|
EVAL |
SRC = %TRIM |
( |
ELEMENT8) + |
|
|
C |
|
|
|
|
%TRIM |
( |
ELEMENTERRT) + |
|
|
C |
|
|
|
|
%TRIM |
( |
ELEMENTERR) + |
|
|
C |
|
|
|
|
%TRIM |
( |
WWFILEX) + |
|
|
C |
|
|
|
|
%TRIM |
( |
QUERY) |
|
|
C |
|
|
|
ELSE |
|
|
|
|
|
|
|
|
|
|
C |
|
|
|
EVAL |
SRC = %TRIM |
( |
HTTP) + |
|
|
C |
|
|
|
|
%TRIM |
( |
PFAD) + |
|
|
C |
|
|
|
|
%TRIM |
( |
ELEMENTERRT) + |
|
|
C |
|
|
|
|
%TRIM |
( |
ELEMENTERR) + |
|
|
C |
|
|
|
|
%TRIM |
( |
WWFILEX) + |
|
|
C |
|
|
|
|
%TRIM |
( |
QUERY) |
|
|
C |
|
|
|
ENDIF |
|
|
|
|
|
|
|
|
|
|
C |
|
|
|
ELSE |
|
|
|
|
|
|
|
|
|
|
C |
|
|
|
EVAL |
SRC = '' |
|
|
C |
|
|
|
ENDIF |
|
|
|
|
|
|
|
|
|
|
C |
|
|
|
ENDSR |
|
|
|
|
|
|
|
|
|
|
C |
|
|
|
|
|
|
|
|
X |
* |
ARTFILE |
CASEQ |
BAR$ART |
|
|
|
|
|
|
|
|
|
X |
|
|
|
C |
|
|
ARTFILEXML |
BEGSR |
|
|
|
|
|
|
|
|
|
|
C |
|
|
*BLANKS |
IFNE |
SRC |
|
|
|
|
|
|
|
|
|
C |
* |
|
|
-------------------------------------- |
|
|
C |
* |
|
|
Bild/Film/Anlage ausgeben |
|
|
C |
* |
|
|
-------------------------------------- |
|
|
C |
|
|
|
ENDIF |
|
|
|
|
|
|
|
|
|
|
C |
|
|
|
ENDSR |
|
|
|
|
|
|
|
|
|
|
C |
|
|
|
|
|
|
|
|
X |
* |
ARTFILE |
CASEQ |
BAR$ART |
|
|
|
|
|
|
|
|
|
X |
|
|
|
C |
|
|
ARTFILERSS |
BEGSR |
|
|
|
|
|
|
|
|
|
|
C |
|
|
*BLANKS |
IFNE |
SRC |
|
|
|
|
|
|
|
|
|
C |
* |
|
|
-------------------------------------- |
|
|
C |
* |
|
|
Bild/Film/Anlage ausgeben |
|
|
C |
* |
|
|
-------------------------------------- |
|
|
C |
|
|
|
EVAL |
BUF = |
|
|
C |
|
|
|
|
BUF +'§<content src="'+%TRIM(SRC)+'">+ |
|
|
C |
|
|
|
|
</content>' |
|
|
C |
|
|
|
EXSR |
WRSTOUT |
|
|
|
|
|
|
|
|
|
C |
|
|
|
ENDIF |
|
|
|
|
|
|
|
|
|
|
C |
|
|
|
ENDSR |
|
|
|
|
|
|
|
|
|
|
C |
|
|
|
|
|
|
|
|
X |
* |
ARTFILE |
CASEQ |
BAR$ART |
|
|
|
|
|
|
|
|
|
X |
|
|
|
C |
|
|
ARTFILEATOM |
BEGSR |
|
|
|
|
|
|
|
|
|
|
C |
|
|
*BLANKS |
IFNE |
SRC |
|
|
|
|
|
|
|
|
|
C |
* |
|
|
-------------------------------------- |
|
|
C |
* |
|
|
Bild/Film/Anlage ausgeben |
|
|
C |
* |
|
|
-------------------------------------- |
|
|
C |
|
|
|
EVAL |
BUF = |
|
|
C |
|
|
|
|
BUF +'§<content src="'+%TRIM(SRC)+'" />' |
|
|
C |
|
|
|
EXSR |
WRSTOUT |
|
|
|
|
|
|
|
|
|
C |
|
|
|
ENDIF |
|
|
|
|
|
|
|
|
|
|
C |
|
|
|
ENDSR |
|
|
|
|
|
|
|
|
|
|
C |
|
|
|
|
|
|
|
|
X |
* |
ARTFILE |
CASEQ |
BAR$ART |
|
|
|
|
|
|
|
|
|
X |
|
|
|
C |
|
|
ARTFILEHTML |
BEGSR |
|
|
|
|
|
|
|
|
|
|
C |
|
|
*BLANKS |
IFNE |
SRC |
|
|
|
|
|
|
|
|
|
C |
* |
|
|
-------------------------------------- |
|
|
C |
* |
|
|
Bild/Film/Anlage ausgeben |
|
|
C |
* |
|
|
-------------------------------------- |
|
|
C |
|
|
|
|
|
|
|
|
C |
|
|
|
SELECT |
|
|
|
|
C |
* |
|
|
-------------------------------------- |
|
|
C |
* |
|
|
Bild |
|
|
C |
* |
|
|
-------------------------------------- |
|
|
C |
|
|
JPG |
WHENEQ |
WWFILEXX |
|
|
|
|
|
|
|
|
|
C |
|
|
PNG |
OREQ |
WWFILEXX |
|
|
|
|
|
|
|
|
|
C |
|
|
TIF |
OREQ |
WWFILEXX |
|
|
|
|
|
|
|
|
|
C |
|
|
GIF |
OREQ |
WWFILEXX |
|
|
|
|
|
|
|
|
|
C |
|
|
BMP |
OREQ |
WWFILEXX |
|
|
|
|
|
|
|
|
|
C |
|
|
ICO |
OREQ |
WWFILEXX |
|
|
|
|
|
|
|
|
|
C |
|
|
|
EXSR |
SENDTITEL2 |
|
|
|
|
|
|
|
|
|
C |
|
|
|
EVAL |
BUF2 = '<img id="image" + |
|
|
C |
|
|
|
|
border=0 + |
|
|
C |
|
|
|
|
title="" + |
|
|
C |
|
|
|
|
alt="'+%TRIM(MYTITEL)+'" + |
|
|
C |
|
|
|
|
src="'+%TRIM(SRC)+'"'+ |
|
|
C |
|
|
|
|
MAXWIDTHSTYLE2+'>' |
|
|
C |
|
|
|
|
|
|
|
|
C |
* |
|
|
-------------------------------------- |
|
|
C |
* |
|
|
Film |
|
|
C |
* |
|
|
-------------------------------------- |
|
|
C |
|
|
MOV |
WHENEQ |
WWFILEXX |
|
|
|
|
|
|
|
|
|
C |
|
|
|
EXSR |
LINKANLAGE |
|
|
|
|
|
|
|
|
|
C |
|
|
|
EVAL |
BUF2 = '§§<video src="'+SRC+'" autoplay>§+ |
|
|
C |
|
|
|
|
<embed src="'+SRC+'" + |
|
|
C |
|
|
|
|
autoplay="true" + |
|
|
C |
|
|
|
|
autostart="true" + |
|
|
C |
|
|
|
|
|
cache="true"></video><br>+ |
|
|
C |
|
|
|
|
§ '+%TRIM(LINK)+'§§' |
|
|
C |
|
|
|
|
|
|
|
|
C |
* |
|
|
-------------------------------------- |
|
|
C |
* |
|
|
Anlage |
|
|
C |
* |
|
|
-------------------------------------- |
|
|
C |
|
|
PDF |
WHENEQ |
WWFILEXX |
|
|
|
|
|
|
|
|
|
C |
|
|
TTF |
OREQ |
WWFILEXX |
|
|
|
|
|
|
|
|
|
C |
|
|
WOFF |
OREQ |
WWFILEXX |
|
|
|
|
|
|
|
|
|
C |
|
|
|
EXSR |
LINKANLAGE |
|
|
|
|
|
|
|
|
|
C |
|
|
|
EVAL |
BUF2 = %TRIM |
( |
LINK) |
|
|
C |
|
|
|
EVAL |
LINK2 = %TRIM |
( |
SRC) |
|
|
C |
|
|
|
EXSR |
LINKMIN |
|
|
|
|
|
|
|
|
|
C |
|
|
*BLANKS |
IFNE |
LINK |
|
|
|
|
|
|
|
|
|
C |
|
|
|
EVAL |
BUF2 = '<a href="'+%TRIM(LINK2)+'">'+ |
|
|
C |
|
|
|
|
|
%TRIM(LINK)+'</a>+ |
|
|
C |
|
|
|
|
|
<br> '+BUF2 |
|
|
C |
|
|
|
ENDIF |
|
|
|
|
|
|
|
|
|
|
C |
* |
|
|
-------------------------------------- |
|
|
C |
* |
|
|
Anlage |
|
|
C |
* |
|
|
-------------------------------------- |
|
|
C |
|
|
|
OTHER |
|
|
|
|
|
|
|
|
|
|
C |
|
|
|
EXSR |
LINKANLAGE |
|
|
|
|
|
|
|
|
|
C |
|
|
|
EVAL |
BUF2 = %TRIM(LINK) |
|
|
C |
|
|
|
ENDSL |
|
|
|
|
|
|
|
|
|
|
C |
* |
|
|
-------------------------------------- |
|
|
C |
* |
|
|
Bild/Film/Anlage ausgeben |
|
|
C |
* |
|
|
-------------------------------------- |
|
|
C |
|
|
|
EVAL |
BUF = |
|
|
C |
|
|
|
|
BUF +'§<table border=0 + |
|
|
C |
|
|
|
|
cellspacing=0 + |
|
|
C |
|
|
|
|
cellpadding=8 summary="">§+ |
|
|
C |
|
|
|
|
<tr><td'+%TRIMR(TDCENTER) + |
|
|
C |
|
|
|
|
|
%TRIMR(MAINCOLOR)+'>'+ |
|
|
C |
|
|
|
|
|
%TRIMR(FONT) + |
|
|
C |
|
|
|
|
BUF2 + %TRIMR(FONTX)+ |
|
|
C |
|
|
|
|
'</td></tr></table>' |
|
|
C |
|
|
|
SETON |
|
|
|
|
— |
72 |
— |
|
|
|
C |
* |
|
|
-------------------------------------- |
|
|
C |
* |
|
|
Bild |
|
|
C |
* |
|
|
-------------------------------------- |
|
|
C |
|
|
JPG |
IFEQ |
WWFILEXX |
|
|
|
|
|
|
|
|
|
C |
|
|
PNG |
OREQ |
WWFILEXX |
|
|
|
|
|
|
|
|
|
C |
|
|
TIF |
OREQ |
WWFILEXX |
|
|
|
|
|
|
|
|
|
C |
|
|
GIF |
OREQ |
WWFILEXX |
|
|
|
|
|
|
|
|
|
C |
|
|
BMP |
OREQ |
WWFILEXX |
|
|
|
|
|
|
|
|
|
C |
|
|
|
EXSR |
ARTRESIZE |
|
|
|
|
|
|
|
|
|
C |
|
|
|
ENDIF |
|
|
|
|
|
|
|
|
|
|
C |
|
|
|
ENDIF |
|
|
|
|
|
|
|
|
|
|
C |
|
|
|
EXSR |
WRSTOUT |
|
|
|
|
|
|
|
|
|
C |
|
|
|
ENDSR |
|
|
|
|
|
|
|
|
|
|
C |
|
|
|
|
|
|
|
|
X |
* |
LINKMIN |
EXSR |
BAR$LINK |
|
|
|
|
|
|
|
|
|
X |
* |
SENDRSS |
EXSR |
BAR$SEND |
|
|
|
|
|
|
|
|
|
X |
* |
SENDATOM |
EXSR |
BAR$SEND |
|
|
|
|
|
|
|
|
|
X |
|
|
|
C |
|
|
ARTFILEMIN |
BEGSR |
|
|
|
|
|
|
|
|
|
|
C |
* |
|
|
-------------------------------------- |
|
|
C |
* |
|
|
Minibild ermitteln |
|
|
C |
* |
|
|
-------------------------------------- |
|
|
C |
|
|
|
SELECT |
|
|
|
|
C |
|
|
*BLANKS |
WHENNE |
WWNAV |
|
|
|
|
|
|
|
|
|
C |
|
|
|
EVAL |
SRC = %TRIM |
( |
WWNAV) + |
|
|
C |
|
|
|
|
|
MIN+MINX |
|
|
C |
|
|
TARGETPARENT |
WHENEQ |
TARGET |
|
|
|
|
|
|
|
|
|
C |
|
|
|
EVAL |
SRC = %TRIM |
( |
%SUBST(PFAD:1:PFADLEN3)) + |
|
|
C |
|
|
|
|
|
MIN+MINX |
|
|
C |
|
|
|
OTHER |
|
|
|
|
|
|
|
|
|
|
C |
|
|
|
EVAL |
SRC = %TRIM |
( |
PFAD) + |
|
|
C |
|
|
|
|
|
MIN+MINX |
|
|
C |
|
|
|
ENDSL |
|
|
|
|
|
|
|
|
|
|
C |
* |
|
|
-------------------------------------- |
|
|
C |
* |
|
|
Prüfen ob Minibild vorhanden |
|
|
C |
* |
|
|
-------------------------------------- |
|
|
C |
|
|
|
EXSR |
ARTFILEMINWW |
|
|
|
|
|
|
|
|
|
C |
|
|
*BLANKS |
IFNE |
SRC |
|
|
|
|
|
|
|
|
|
C |
|
|
|
|
|
|
|
|
C |
* |
|
|
-------------------------------------- |
|
|
C |
* |
|
|
Minibild anzeigen erlauben |
|
|
C |
* |
|
|
-------------------------------------- |
|
|
C |
|
|
*BLANKS |
IFNE |
ZEIGEN |
|
|
|
|
|
|
|
|
|
C |
|
|
*BLANKS |
COMP |
QUERY |
|
|
|
— |
— |
78 |
|
|
|
C |
|
78 |
|
EVAL |
BUF2 = '?' |
|
|
C |
|
N78 |
|
EVAL |
BUF2 = '&' |
|
|
C |
|
|
|
EVAL |
SRC = SRC + BUF2 + ZEIGENNAME + '1' |
|
|
C |
|
|
|
ENDIF |
|
|
|
|
|
|
|
|
|
|
C |
* |
|
|
-------------------------------------- |
|
|
C |
* |
|
|
Symbolbild ermitteln |
|
|
C |
* |
|
|
-------------------------------------- |
|
|
C |
|
|
|
ELSE |
|
|
|
|
|
|
|
|
|
|
C |
|
|
|
MOVEL(P) |
WWFILEX |
MYFILEX |
|
|
|
|
|
|
|
|
C |
|
|
|
EXSR |
ARTFILEICN |
|
|
|
|
|
|
|
|
|
C |
|
|
|
ENDIF |
|
|
|
|
|
|
|
|
|
|
C |
|
|
|
ENDSR |
|
|
|
|
|
|
|
|
|
|
C |
|
|
|
|
|
|
|
|
X |
* |
ARTFILEMIN |
EXSR |
BAR$ART |
|
|
|
|
|
|
|
|
|
X |
|
|
|
C |
|
|
ARTFILEMINWW |
BEGSR |
|
|
|
|
|
|
|
|
|
|
C |
|
|
|
EVAL |
STMF = SRC |
|
|
C |
* |
|
|
-------------------------------------- |
|
|
C |
* |
|
|
Prüfen ob Anlage vorhanden ist |
|
|
C |
* |
|
|
-------------------------------------- |
|
|
C |
|
|
|
EVAL |
FILEIFS = %TRIM(MAPFAD)+'/'+ |
|
|
C |
|
|
|
|
%TRIM(SRC) |
|
|
C |
|
|
|
CALL |
'IFS$EXIST' |
IFS$EXISTPARM |
|
|
— |
77 |
— |
|
|
|
C |
|
|
|
|
|
|
|
|
C |
* |
|
|
-------------------------------------- |
|
|
C |
* |
|
|
Adresse zum Einbinden ermitteln |
|
|
C |
* |
|
|
-------------------------------------- |
|
|
C |
|
|
*IN77 |
IFEQ |
*OFF |
|
|
|
|
|
|
|
|
|
C |
|
|
|
|
|
|
|
|
C |
* |
|
|
-------------------------------------- |
|
|
C |
* |
|
|
Adresse zum Einbinden ermitteln |
|
|
C |
* |
|
|
-------------------------------------- |
|
|
C |
|
|
PFADXX |
IFEQ |
HTML |
|
|
|
|
|
|
|
|
|
C |
|
|
|
|
|
|
|
|
C |
|
|
*BLANKS |
COMP |
ELEMENT |
|
|
|
— |
— |
78 |
|
|
|
C |
|
N78 |
|
MOVEL(P) |
ELEMENT |
ELEMENT8 |
|
|
|
|
|
|
|
|
C |
|
78 |
|
MOVEL(P) |
INDEXNAV |
ELEMENT8 |
|
|
|
|
|
|
|
|
C |
|
|
|
|
|
|
|
|
C |
|
|
|
EVAL |
SRC = %TRIM |
( |
ELEMENT8) + |
|
|
C |
|
|
|
|
%TRIM |
( |
ELEMENTERRT) + |
|
|
C |
|
|
|
|
%TRIM |
( |
ELEMENTERR) + |
|
|
C |
|
|
|
|
|
MIN+MINX + |
|
|
C |
|
|
|
|
%TRIM |
( |
QUERY) |
|
|
C |
|
|
|
ELSE |
|
|
|
|
|
|
|
|
|
|
C |
|
|
|
EVAL |
SRC = %TRIM |
( |
HTTP) + |
|
|
C |
|
|
|
|
%TRIM |
( |
PFAD) + |
|
|
C |
|
|
|
|
%TRIM |
( |
ELEMENTERRT) + |
|
|
C |
|
|
|
|
%TRIM |
( |
ELEMENTERR) + |
|
|
C |
|
|
|
|
|
MIN+MINX + |
|
|
C |
|
|
|
|
%TRIM |
( |
QUERY) |
|
|
C |
|
|
|
ENDIF |
|
|
|
|
|
|
|
|
|
|
C |
|
|
|
ELSE |
|
|
|
|
|
|
|
|
|
|
C |
|
|
|
EVAL |
SRC = '' |
|
|
C |
|
|
|
ENDIF |
|
|
|
|
|
|
|
|
|
|
C |
|
|
|
ENDSR |
|
|
|
|
|
|
|
|
|
|
C |
|
|
|
|
|
|
|
|
X |
* |
LINKARTFILE2 |
EXSR |
BAR$LINK |
|
|
|
|
|
|
|
|
|
X |
* |
LINKRUBFILE2 |
EXSR |
BAR$LINK |
|
|
|
|
|
|
|
|
|
X |
* |
LINKNAVFILE2 |
EXSR |
BAR$LINK |
|
|
|
|
|
|
|
|
|
X |
|
|
|
C |
|
|
ARTFILESRC |
BEGSR |
|
|
|
|
|
|
|
|
|
|
C |
|
|
*BLANKS |
IFNE |
SRC |
|
|
|
|
|
|
|
|
|
C |
* |
|
|
-------------------------------------- |
|
|
C |
* |
|
|
Minibild ermitteln |
|
|
C |
* |
|
|
-------------------------------------- |
|
|
C |
|
|
*BLANKS |
IFNE |
MYFILEX |
|
|
|
|
|
|
|
|
|
C |
|
|
'-' |
ANDNE |
MYFILEX |
|
|
|
|
|
|
|
|
|
C |
|
|
|
|
|
|
|
|
C |
* |
|
|
-------------------------------------- |
|
|
C |
* |
|
|
Minibild ermitteln |
|
|
C |
* |
|
|
-------------------------------------- |
|
|
C |
|
|
*BLANKS |
IFEQ |
MYSPERRE |
|
|
|
|
|
|
|
|
|
C |
|
|
|
|
|
|
|
|
C |
* |
|
|
-------------------------------------- |
|
|
C |
* |
|
|
Bild/Film/Anlage ausgeben |
|
|
C |
* |
|
|
-------------------------------------- |
|
|
C |
|
|
|
EXSR |
SRCEXIST |
|
|
|
|
|
|
|
|
|
C |
|
|
*BLANKS |
IFNE |
SRC |
|
|
|
|
|
|
|
|
|
C |
|
|
|
|
|
|
|
|
C |
* |
|
|
-------------------------------------- |
|
|
C |
* |
|
|
Minibild anzeigen erlauben |
|
|
C |
* |
|
|
-------------------------------------- |
|
|
C |
|
|
*BLANKS |
IFNE |
ZEIGEN |
|
|
|
|
|
|
|
|
|
C |
|
|
*BLANKS |
COMP |
QUERY |
|
|
|
— |
— |
78 |
|
|
|
C |
|
78 |
|
EVAL |
BUF2 = '?' |
|
|
C |
|
N78 |
|
EVAL |
BUF2 = '&' |
|
|
C |
|
|
|
EVAL |
SRC = SRC + BUF2 + ZEIGENNAME + '1' |
|
|
C |
|
|
|
ENDIF |
|
|
|
|
|
|
|
|
|
|
C |
* |
|
|
-------------------------------------- |
|
|
C |
* |
|
|
Symbolbild ermitteln |
|
|
C |
* |
|
|
-------------------------------------- |
|
|
C |
|
|
|
ELSE |
|
|
|
|
|
|
|
|
|
|
C |
|
|
|
EXSR |
ARTFILEICN |
|
|
|
|
|
|
|
|
|
C |
|
|
|
ENDIF |
|
|
|
|
|
|
|
|
|
|
C |
* |
|
|
-------------------------------------- |
|
|
C |
* |
|
|
Symbolbild ermitteln |
|
|
C |
* |
|
|
-------------------------------------- |
|
|
C |
|
|
|
ELSE |
|
|
|
|
|
|
|
|
|
|
C |
|
|
|
EXSR |
ARTFILEICN |
|
|
|
|
|
|
|
|
|
C |
|
|
|
ENDIF |
|
|
|
|
|
|
|
|
|
|
C |
* |
|
|
-------------------------------------- |
|
|
C |
* |
|
|
Ohne Bild |
|
|
C |
* |
|
|
-------------------------------------- |
|
|
C |
|
|
|
ELSE |
|
|
|
|
|
|
|
|
|
|
C |
|
|
|
CLEAR |
|
SRC |
|
|
|
|
|
|
|
|
C |
|
|
|
ENDIF |
|
|
|
|
|
|
|
|
|
|
C |
|
|
|
ENDIF |
|
|
|
|
|
|
|
|
|
|
C |
|
|
|
ENDSR |
|
|
|
|
|
|
|
|
|
|
C |
|
|
|
|
|
|
|
|
X |
* |
ARTFILEMIN |
EXSR |
BAR$ART |
|
|
|
|
|
|
|
|
|
X |
* |
ARTFILESRC |
EXSR |
BAR$ART |
|
|
|
|
|
|
|
|
|
X |
* |
ARTFILESRC |
EXSR |
BAR$ART |
|
|
|
|
|
|
|
|
|
X |
* |
LINKNAVFILE2 |
EXSR |
BAR$LINK |
|
|
|
|
|
|
|
|
|
X |
|
|
|
C |
|
|
ARTFILEICN |
BEGSR |
|
|
|
|
|
|
|
|
|
|
C |
|
|
|
CLEAR |
|
SRC |
|
|
|
|
|
|
|
|
C |
|
|
|
MOVEL(P) |
NAVIDS |
NAVISAVE |
|
|
|
|
|
|
|
|
C |
* |
|
|
-------------------------------------- |
|
|
C |
* |
|
|
Symbolbild ermitteln |
|
|
C |
* |
|
|
-------------------------------------- |
|
|
C |
|
|
*BLANKS |
IFNE |
MYFILEX |
|
|
|
|
|
|
|
|
|
C |
|
|
'-' |
ANDNE |
MYFILEX |
|
|
|
|
|
|
|
|
|
C |
|
|
UPPER:LOWER |
XLATE(P) |
MYFILEX |
MYFILEXX |
|
|
|
|
|
|
|
|
C |
|
|
|
MOVEL(P) |
TYPICNS |
NATYP |
|
|
|
|
|
|
|
|
C |
|
|
|
EXSR |
NATYPNAV |
|
|
|
|
|
|
|
|
|
C |
|
|
|
EVAL |
SRC = %TRIM(NANAV)+'/'+ |
|
|
C |
|
|
|
|
%TRIM(%SUBST(MYFILEXX:2))+GIF |
|
|
C |
|
|
|
EXSR |
SRCEXIST |
|
|
|
|
|
|
|
|
|
C |
|
|
|
ENDIF |
|
|
|
|
|
|
|
|
|
|
C |
|
|
*BLANKS |
IFEQ |
SRC |
|
|
|
|
|
|
|
|
|
C |
|
|
|
|
|
|
|
|
C |
* |
|
|
-------------------------------------- |
|
|
C |
* |
|
|
Allgemeines Symbolbild ermitteln |
|
|
C |
* |
|
|
-------------------------------------- |
|
|
C |
|
|
|
MOVEL(P) |
TYPICNS |
NATYP |
|
|
|
|
|
|
|
|
C |
|
|
|
EXSR |
NATYPNAV |
|
|
|
|
|
|
|
|
|
C |
|
|
|
EVAL |
SRC = %TRIM(NANAV)+'/dummy.gif' |
|
|
C |
|
|
|
EXSR |
SRCEXIST |
|
|
|
|
|
|
|
|
|
C |
|
|
|
ENDIF |
|
|
|
|
|
|
|
|
|
|
C |
|
|
|
MOVEL(P) |
NAVISAVE |
NAVIDS |
|
|
|
|
|
|
|
|
C |
|
|
|
ENDSR |
|
|
|
|
|
|
|
|
|
|
C |
|
|
|
|
|
|
|
|
X |
* |
ARTMAIN |
EXSR |
BAR$ART |
|
|
|
|
|
|
|
|
|
X |
|
|
|
C |
|
|
ARTTEXT |
BEGSR |
|
|
|
|
|
|
|
|
|
|
C |
* |
|
|
-------------------------------------- |
|
|
C |
* |
|
|
Text ausgeben |
|
|
C |
* |
|
|
-------------------------------------- |
|
|
C |
|
|
*BLANKS |
IFEQ |
WWSPERRE |
|
|
|
|
|
|
|
|
|
C |
|
|
|
|
|
|
|
|
C |
|
|
|
SELECT |
|
|
|
|
C |
* |
|
|
-------------------------------------- |
|
|
C |
* |
|
|
Text ausgeben |
|
|
C |
* |
|
|
-------------------------------------- |
|
|
C |
|
|
WWTYPSAVE |
WHENEQ |
TYPPN |
|
|
|
|
|
|
|
|
|
C |
|
|
WWTYPSAVE |
OREQ |
TYPART |
|
|
|
|
|
|
|
|
|
C |
|
|
WWTYPSAVE |
OREQ |
TYPFRA |
|
|
|
|
|
|
|
|
|
C |
|
|
WWTYPSAVE |
OREQ |
TYPFRR |
|
|
|
|
|
|
|
|
|
C |
|
|
|
EVAL |
|
BUFV = ARTEXT |
|
|
C |
|
|
XLATE2:XLATE1 |
XLATE(P) |
BUFV |
BUFV |
|
|
|
|
|
|
|
|
C |
|
|
|
|
|
|
|
|
C |
|
|
WWTYPSAVE |
WHENEQ |
TYPAW |
|
|
|
|
|
|
|
|
|
C |
|
|
|
EVAL |
|
BUFV = AWTEXT |
|
|
C |
|
|
XLATE2:XLATE1 |
XLATE(P) |
BUFV |
BUFV |
|
|
|
|
|
|
|
|
C |
|
|
|
|
|
|
|
|
C |
|
|
|
OTHER |
|
|
|
|
|
|
|
|
|
|
C |
|
|
|
EVAL |
BUFV = '' |
|
|
C |
|
|
|
ENDSL |
|
|
|
|
|
|
|
|
|
|
C |
* |
|
|
-------------------------------------- |
|
|
C |
* |
|
|
Text ausgeben |
|
|
C |
* |
|
|
-------------------------------------- |
|
|
C |
|
|
PFADXX |
CASEQ |
XML |
ARTTEXTXML |
|
|
|
|
|
|
|
|
C |
|
|
PFADXX |
CASEQ |
RSS |
ARTTEXTRSS |
|
|
|
|
|
|
|
|
C |
|
|
PFADXX |
CASEQ |
ATOM |
ARTTEXTATOM |
|
|
|
|
|
|
|
|
C |
|
|
PFADXX |
CASEQ |
HTML |
ARTTEXTHTML |
|
|
|
|
|
|
|
|
C |
|
|
|
ENDCS |
|
|
|
|
|
|
|
|
|
|
C |
|
|
|
ENDIF |
|
|
|
|
|
|
|
|
|
|
C |
|
|
|
ENDSR |
|
|
|
|
|
|
|
|
|
|
C |
|
|
|
|
|
|
|
|
X |
* |
ARTTEXT |
CASEQ |
BAR$ART |
|
|
|
|
|
|
|
|
|
X |
|
|
|
C |
|
|
ARTTEXTXML |
BEGSR |
|
|
|
|
|
|
|
|
|
|
C |
|
|
*BLANKS |
IFNE |
BUFV |
|
|
|
|
|
|
|
|
|
C |
|
|
|
EXSR |
TEXTSMILYS |
|
|
|
|
|
|
|
|
|
C |
|
|
|
EXSR |
MYBUFV2FORM |
|
|
|
|
|
|
|
|
|
C |
* |
|
|
-------------------------------------- |
|
|
C |
* |
|
|
Text ausgeben |
|
|
C |
* |
|
|
-------------------------------------- |
|
|
C |
|
|
|
EVAL |
BUF = |
|
|
C |
|
|
|
|
BUF +'§<content>' |
|
|
C |
|
|
|
EXSR |
WRSTOUT |
|
|
|
|
|
|
|
|
|
C |
|
|
|
EXSR |
WRSTOUTV |
|
|
|
|
|
|
|
|
|
C |
|
|
|
EVAL |
BUF = |
|
|
C |
|
|
|
|
BUF +'</content>' |
|
|
C |
|
|
|
EXSR |
WRSTOUT |
|
|
|
|
|
|
|
|
|
C |
|
|
|
ENDIF |
|
|
|
|
|
|
|
|
|
|
C |
|
|
|
ENDSR |
|
|
|
|
|
|
|
|
|
|
C |
|
|
|
|
|
|
|
|
X |
* |
ARTTEXT |
CASEQ |
BAR$ART |
|
|
|
|
|
|
|
|
|
X |
|
|
|
C |
|
|
ARTTEXTRSS |
BEGSR |
|
|
|
|
|
|
|
|
|
|
C |
|
|
*BLANKS |
IFNE |
BUFV |
|
|
|
|
|
|
|
|
|
C |
|
|
|
EXSR |
TEXTSMILYS |
|
|
|
|
|
|
|
|
|
C |
|
|
|
EXSR |
MYBUFV2FORM |
|
|
|
|
|
|
|
|
|
C |
* |
|
|
-------------------------------------- |
|
|
C |
* |
|
|
Text ausgeben |
|
|
C |
* |
|
|
-------------------------------------- |
|
|
C |
|
|
|
EVAL |
BUF = |
|
|
C |
|
|
|
|
BUF +'§<content>' |
|
|
C |
|
|
|
EXSR |
WRSTOUT |
|
|
|
|
|
|
|
|
|
C |
|
|
|
EXSR |
WRSTOUTV |
|
|
|
|
|
|
|
|
|
C |
|
|
|
EVAL |
BUF = |
|
|
C |
|
|
|
|
BUF +'</content>' |
|
|
C |
|
|
|
EXSR |
WRSTOUT |
|
|
|
|
|
|
|
|
|
C |
|
|
|
ENDIF |
|
|
|
|
|
|
|
|
|
|
C |
|
|
|
ENDSR |
|
|
|
|
|
|
|
|
|
|
C |
|
|
|
|
|
|
|
|
X |
* |
ARTTEXT |
CASEQ |
BAR$ART |
|
|
|
|
|
|
|
|
|
X |
|
|
|
C |
|
|
ARTTEXTATOM |
BEGSR |
|
|
|
|
|
|
|
|
|
|
C |
|
|
*BLANKS |
IFNE |
BUFV |
|
|
|
|
|
|
|
|
|
C |
|
|
|
EXSR |
TEXTSMILYS |
|
|
|
|
|
|
|
|
|
C |
|
|
|
EXSR |
MYBUFV2FORM |
|
|
|
|
|
|
|
|
|
C |
* |
|
|
-------------------------------------- |
|
|
C |
* |
|
|
Text ausgeben |
|
|
C |
* |
|
|
-------------------------------------- |
|
|
C |
|
|
|
EVAL |
BUF = |
|
|
C |
|
|
|
|
BUF +'§<content type="html">' |
|
|
C |
|
|
|
EXSR |
WRSTOUT |
|
|
|
|
|
|
|
|
|
C |
|
|
|
EXSR |
WRSTOUTV |
|
|
|
|
|
|
|
|
|
C |
|
|
|
EVAL |
BUF = |
|
|
C |
|
|
|
|
BUF +'</content>' |
|
|
C |
|
|
|
EXSR |
WRSTOUT |
|
|
|
|
|
|
|
|
|
C |
|
|
|
ENDIF |
|
|
|
|
|
|
|
|
|
|
C |
|
|
|
ENDSR |
|
|
|
|
|
|
|
|
|
|
C |
|
|
|
|
|
|
|
|
X |
* |
ARTTEXT |
CASEQ |
BAR$ART |
|
|
|
|
|
|
|
|
|
X |
|
|
|
C |
|
|
ARTTEXTHTML |
BEGSR |
|
|
|
|
|
|
|
|
|
|
C |
|
|
*BLANKS |
IFNE |
BUFV |
|
|
|
|
|
|
|
|
|
C |
|
|
|
EXSR |
TEXTSMILYS |
|
|
|
|
|
|
|
|
|
C |
* |
|
|
-------------------------------------- |
|
|
C |
* |
|
|
Text ausgeben |
|
|
C |
* |
|
|
-------------------------------------- |
|
|
C |
|
|
|
EVAL |
BUF = |
|
|
C |
|
|
|
|
BUF +'§<table border=0 + |
|
|
C |
|
|
|
|
cellspacing=0 + |
|
|
C |
|
|
|
|
cellpadding=8 summary="">§+ |
|
|
C |
|
|
|
|
<tr><td'+%TRIMR(MAINCOLOR)+ |
|
|
C |
|
|
|
|
|
MAXWIDTHSTYLE+'>' |
|
|
C |
|
|
|
EXSR |
WRSTOUT |
|
|
|
|
|
|
|
|
|
C |
|
|
|
EXSR |
WRSTOUTV |
|
|
|
|
|
|
|
|
|
C |
|
|
|
EVAL |
BUF = |
|
|
C |
|
|
|
|
BUF + '</td></tr></table>' |
|
|
C |
|
|
|
EXSR |
WRSTOUT |
|
|
|
|
|
|
|
|
|
C |
|
|
|
SETON |
|
|
|
|
— |
72 |
— |
|
|
|
C |
|
|
|
ENDIF |
|
|
|
|
|
|
|
|
|
|
C |
|
|
|
ENDSR |
|
|
|
|
|
|
|
|
|
|
C |
|
|
|
|
|
|
|
|
X |
* |
ZEILEAW2 |
EXSR |
BAR$ZEILE |
|
|
|
|
|
|
|
|
|
X |
* |
ZEILEAWFRA2 |
EXSR |
BAR$ZEILE |
|
|
|
|
|
|
|
|
|
X |
* |
ZEILEAWINF |
EXSR |
BAR$ZEILE |
|
|
|
|
|
|
|
|
|
X |
|
|
|
C |
|
|
ARTTEXTAW |
BEGSR |
|
|
|
|
|
|
|
|
|
|
C |
|
|
|
CLEAR |
|
BUFV |
|
|
|
|
|
|
|
|
C |
|
|
|
CLEAR |
|
MYSPERRE |
|
|
|
|
|
|
|
|
C |
* |
|
|
-------------------------------------- |
|
|
C |
* |
|
|
Antwort-Text ermitteln |
|
|
C |
* |
|
|
-------------------------------------- |
|
|
C |
|
|
NOMIT |
IFEQ |
ARPN |
|
|
|
|
|
|
|
|
|
C |
|
|
BEMIT |
OREQ |
ARPN |
|
|
|
|
|
|
|
|
|
C |
|
|
NOMIT |
OREQ |
ARMIT |
|
|
|
|
|
|
|
|
|
C |
|
|
BEMIT |
OREQ |
ARMIT |
|
|
|
|
|
|
|
|
|
C |
|
|
NOMIT |
OREQ |
AWMIT |
|
|
|
|
|
|
|
|
|
C |
|
|
BEMIT |
OREQ |
AWMIT |
|
|
|
|
|
|
|
|
|
C |
|
|
NOMIT |
OREQ |
AWAUT |
|
|
|
|
|
|
|
|
|
C |
|
|
BEMIT |
OREQ |
AWAUT |
|
|
|
|
|
|
|
|
|
C |
|
|
|
|
|
|
|
|
C |
|
|
NONFM |
IFEQ |
ARNFM |
|
|
|
|
|
|
|
|
|
C |
|
|
NODLT |
ANDEQ |
AWDLT |
|
|
|
|
|
|
|
|
|
C |
|
|
NOMIT |
ORNE |
BEMIT |
|
|
|
|
|
|
|
|
|
C |
|
|
NODLT |
ANDEQ |
AWDLT |
|
|
|
|
|
|
|
|
|
C |
|
|
NOMIT |
ORNE |
BEMIT |
|
|
|
|
|
|
|
|
|
C |
|
|
*BLANKS |
ANDNE |
ZEIGEN |
|
|
|
|
|
|
|
|
|
C |
|
|
|
|
|
|
|
|
C |
|
|
|
EVAL |
|
BUFV = AWTEXT |
|
|
C |
|
|
XLATE2:XLATE1 |
XLATE(P) |
BUFV |
BUFV |
|
|
|
|
|
|
|
|
C |
|
|
|
ELSE |
|
|
|
|
|
|
|
|
|
|
C |
|
|
|
MOVEL(P) |
'SPSPERREX' |
MYTYP |
|
|
|
|
|
|
|
|
C |
|
|
|
EXSR |
MYTYPSPERREX |
|
|
|
|
|
|
|
|
|
C |
|
|
|
EVAL |
|
BUFV = %TRIM(MYSPERREX)+' ' |
|
|
C |
|
|
|
MOVEL(P) |
'X' |
MYSPERRE |
|
|
|
|
|
|
|
|
C |
|
|
|
MOVEL(P) |
'X' |
MYSPERREN |
|
|
|
|
|
|
|
|
C |
|
|
|
ENDIF |
|
|
|
|
|
|
|
|
|
|
C |
|
|
|
ENDIF |
|
|
|
|
|
|
|
|
|
|
C |
|
|
|
ENDSR |
|
|
|
|
|
|
|
|
|
|
C |
|
|
|
|
|
|
|
|
X |
* |
LINKART |
EXSR |
BAR$LINK |
|
|
|
|
|
|
|
|
|
X |
* |
LINKARTAW |
EXSR |
BAR$LINK |
|
|
|
|
|
|
|
|
|
X |
* |
ZEILEARTINF |
EXSR |
BAR$ZEILE |
|
|
|
|
|
|
|
|
|
X |
|
|
|
C |
|
|
ARTTITEL |
BEGSR |
|
|
|
|
|
|
|
|
|
|
C |
|
|
|
CLEAR |
|
MYSPERRE |
|
|
|
|
|
|
|
|
C |
* |
|
|
-------------------------------------- |
|
|
C |
* |
|
|
Artikel-Titel |
|
|
C |
* |
|
|
-------------------------------------- |
|
|
C |
|
|
NOMIT |
IFEQ |
ARPN |
|
|
|
|
|
|
|
|
|
C |
|
|
BEMIT |
OREQ |
ARPN |
|
|
|
|
|
|
|
|
|
C |
|
|
NOMIT |
OREQ |
ARMIT |
|
|
|
|
|
|
|
|
|
C |
|
|
BEMIT |
OREQ |
ARMIT |
|
|
|
|
|
|
|
|
|
C |
|
|
|
|
|
|
|
|
C |
|
|
NODLT |
IFEQ |
ARDLT |
|
|
|
|
|
|
|
|
|
C |
|
|
NOMIT |
ORNE |
BEMIT |
|
|
|
|
|
|
|
|
|
C |
|
|
*BLANKS |
ANDNE |
ZEIGEN |
|
|
|
|
|
|
|
|
|
C |
|
|
XLATE2:XLATE1 |
XLATE(P) |
ARTITEL |
MYTITEL |
|
|
|
|
|
|
|
|
C |
|
|
|
|
|
|
|
|
C |
* |
|
|
-------------------------------------- |
|
|
C |
* |
|
|
Falls Artikel gesperrt |
|
|
C |
* |
|
|
-------------------------------------- |
|
|
C |
|
|
|
ELSE |
|
|
|
|
|
|
|
|
|
|
C |
|
|
|
MOVEL(P) |
TYPSPERRE |
NATYP |
|
|
|
|
|
|
|
|
C |
|
|
|
EXSR |
NATYPNAV |
|
|
|
|
|
|
|
|
|
C |
|
|
|
MOVEL(P) |
TITITEL |
MYTITEL |
|
|
|
|
|
|
|
|
C |
|
|
|
MOVEL(P) |
'X' |
MYSPERRE |
|
|
|
|
|
|
|
|
C |
|
|
|
MOVEL(P) |
'X' |
MYSPERREN |
|
|
|
|
|
|
|
|
C |
|
|
|
ENDIF |
|
|
|
|
|
|
|
|
|
|
C |
* |
|
|
-------------------------------------- |
|
|
C |
* |
|
|
Allgemeinen Titel für Nachricht setzen |
|
|
C |
* |
|
|
-------------------------------------- |
|
|
C |
|
|
|
ELSE |
|
|
|
|
|
|
|
|
|
|
C |
|
|
|
MOVEL(P) |
TYPPN |
NATYP |
|
|
|
|
|
|
|
|
C |
|
|
|
EXSR |
NATYPNAV |
|
|
|
|
|
|
|
|
|
C |
|
|
|
MOVEL(P) |
TITITEL |
MYTITEL |
|
|
|
|
|
|
|
|
C |
|
|
|
ENDIF |
|
|
|
|
|
|
|
|
|
|
C |
* |
|
|
-------------------------------------- |
|
|
C |
* |
|
|
Falls Titel leer dann Nummer anzeigen |
|
|
C |
* |
|
|
-------------------------------------- |
|
|
C |
|
|
*BLANKS |
IFEQ |
MYTITEL |
|
|
|
|
|
|
|
|
|
C |
|
|
*ZERO |
ADD |
ARART |
NUM |
|
|
|
|
|
|
|
|
C |
|
|
|
EXSR |
NUMSTR |
|
|
|
|
|
|
|
|
|
C |
|
|
|
MOVEL(P) |
STR |
MYTITEL |
|
|
|
|
|
|
|
|
C |
|
|
|
ENDIF |
|
|
|
|
|
|
|
|
|
|
C |
|
|
|
ENDSR |
|
|
|
|
|
|
|
|
|
|
C |
|
|
|
|
|
|
|
|
X |
* |
ZEILEARTINF |
EXSR |
BAR$ZEILE |
|
|
|
|
|
|
|
|
|
X |
|
|
|
C |
|
|
ARTTITEL2 |
BEGSR |
|
|
|
|
|
|
|
|
|
|
C |
|
|
|
EVAL |
BUFV = '' |
|
|
C |
* |
|
|
-------------------------------------- |
|
|
C |
* |
|
|
Artikel-Beschreibung |
|
|
C |
* |
|
|
-------------------------------------- |
|
|
C |
|
|
NOMIT |
IFEQ |
ARPN |
|
|
|
|
|
|
|
|
|
C |
|
|
BEMIT |
OREQ |
ARPN |
|
|
|
|
|
|
|
|
|
C |
|
|
NOMIT |
OREQ |
ARMIT |
|
|
|
|
|
|
|
|
|
C |
|
|
BEMIT |
OREQ |
ARMIT |
|
|
|
|
|
|
|
|
|
C |
|
|
|
|
|
|
|
|
C |
|
|
NODLT |
IFEQ |
ARDLT |
|
|
|
|
|
|
|
|
|
C |
|
|
NOMIT |
ORNE |
BEMIT |
|
|
|
|
|
|
|
|
|
C |
|
|
*BLANKS |
ANDNE |
ZEIGEN |
|
|
|
|
|
|
|
|
|
C |
|
|
|
EVAL |
|
BUFV = %TRIM(ARTITEL2) |
|
|
C |
|
|
XLATE2:XLATE1 |
XLATE(P) |
BUFV |
BUFV |
|
|
|
|
|
|
|
|
C |
|
|
|
ENDIF |
|
|
|
|
|
|
|
|
|
|
C |
|
|
|
ENDIF |
|
|
|
|
|
|
|
|
|
|
C |
|
|
|
ENDSR |
|
|
|
|
|
|
|
|
|
|
C |
|
|
|
|
|
|
|
|
X |
* |
LINKARTFILE2 |
EXSR |
BAR$LINK |
|
|
|
|
|
|
|
|
|
X |
|
|
|
C |
|
|
ARTSPERRE |
BEGSR |
|
|
|
|
|
|
|
|
|
|
C |
|
|
|
MOVEL(P) |
'X' |
MYSPERRE |
|
|
|
|
|
|
|
|
C |
* |
|
|
-------------------------------------- |
|
|
C |
* |
|
|
Artikel anzeigen erlaubt? |
|
|
C |
* |
|
|
-------------------------------------- |
|
|
C |
|
|
NOMIT |
IFEQ |
ARPN |
|
|
|
|
|
|
|
|
|
C |
|
|
BEMIT |
OREQ |
ARPN |
|
|
|
|
|
|
|
|
|
C |
|
|
NOMIT |
OREQ |
ARMIT |
|
|
|
|
|
|
|
|
|
C |
|
|
BEMIT |
OREQ |
ARMIT |
|
|
|
|
|
|
|
|
|
C |
|
|
|
|
|
|
|
|
C |
|
|
NONFM |
IFEQ |
ARNFM |
|
|
|
|
|
|
|
|
|
C |
|
|
NODLT |
ANDEQ |
ARDLT |
|
|
|
|
|
|
|
|
|
C |
|
|
NOMIT |
ORNE |
BEMIT |
|
|
|
|
|
|
|
|
|
C |
|
|
NODLT |
ANDEQ |
ARDLT |
|
|
|
|
|
|
|
|
|
C |
|
|
NOMIT |
ORNE |
BEMIT |
|
|
|
|
|
|
|
|
|
C |
|
|
*BLANKS |
ANDNE |
ZEIGEN |
|
|
|
|
|
|
|
|
|
C |
|
|
|
CLEAR |
|
MYSPERRE |
|
|
|
|
|
|
|
|
C |
|
|
|
ENDIF |
|
|
|
|
|
|
|
|
|
|
C |
|
|
|
ENDIF |
|
|
|
|
|
|
|
|
|
|
C |
|
|
|
ENDSR |
|
|
|
|
|
|
|
|
|
|
C |
|
|
|
|
|
|
|
|
X |
* |
SENDHTML |
EXSR |
BAR$SEND |
|
|
|
|
|
|
|
|
|
X |
|
|
|
C |
|
|
ARTINFO |
BEGSR |
|
|
|
|
|
|
|
|
|
|
C |
|
|
|
SELECT |
|
|
|
|
C |
* |
|
|
-------------------------------------- |
|
|
C |
* |
|
|
Information ausgeben |
|
|
C |
* |
|
|
-------------------------------------- |
|
|
C |
|
|
WWTYP |
WHENEQ |
TYPPN |
|
|
|
|
|
|
|
|
|
C |
|
|
WWTYP |
OREQ |
TYPART |
|
|
|
|
|
|
|
|
|
C |
|
|
WWTYP |
OREQ |
TYPFRA |
|
|
|
|
|
|
|
|
|
C |
|
|
WWTYP |
OREQ |
TYPFRR |
|
|
|
|
|
|
|
|
|
C |
|
|
WWBAR |
IFEQ |
NOBAR |
|
|
|
|
|
|
|
|
|
C |
|
|
|
EXSR |
ARTINFOART |
|
|
|
|
|
|
|
|
|
C |
|
|
|
ENDIF |
|
|
|
|
|
|
|
|
|
|
C |
* |
|
|
-------------------------------------- |
|
|
C |
* |
|
|
Information ausgeben |
|
|
C |
* |
|
|
-------------------------------------- |
|
|
C |
|
|
WWTYP |
WHENEQ |
TYPAW |
|
|
|
|
|
|
|
|
|
C |
|
|
|
EXSR |
ARTINFOAW |
|
|
|
|
|
|
|
|
|
C |
|
|
|
ENDSL |
|
|
|
|
|
|
|
|
|
|
C |
|
|
|
ENDSR |
|
|
|
|
|
|
|
|
|
|
C |
|
|
|
|
|
|
|
|
X |
* |
ARTINFO |
EXSR |
BAR$ART |
|
|
|
|
|
|
|
|
|
X |
|
|
|
C |
|
|
ARTINFOART |
BEGSR |
|
|
|
|
|
|
|
|
|
|
C |
|
|
|
MOVEL(P) |
'information' |
DIV |
|
|
|
|
|
|
|
|
C |
|
|
|
MOVEL(P) |
ABSTAND1 |
ABSTAND |
|
|
|
|
|
|
|
|
C |
* |
|
|
-------------------------------------- |
|
|
C |
* |
|
|
Information ausgeben |
|
|
C |
* |
|
|
-------------------------------------- |
|
|
C |
|
|
|
EXSR |
TABLE8 |
|
|
|
|
|
|
|
|
|
C |
|
|
*ZERO |
ADD |
1 |
ROWROWSMAX |
|
|
|
|
|
|
|
|
C |
|
|
|
|
|
|
|
|
C |
* |
|
|
-------------------------------------- |
|
|
C |
* |
|
|
Verweis auf vorherigen Artikel |
|
|
C |
* |
|
|
-------------------------------------- |
|
|
C |
|
|
|
EXSR |
ROW |
|
|
|
|
|
|
|
|
|
C |
|
|
|
EXSR |
ARTVOR |
|
|
|
|
|
|
|
|
|
C |
|
|
|
EXSR |
COLLEFT |
|
|
|
|
|
|
|
|
|
C |
|
|
|
|
|
|
|
|
C |
* |
|
|
-------------------------------------- |
|
|
C |
* |
|
|
Artikel von/am/um/in/an |
|
|
C |
* |
|
|
-------------------------------------- |
|
|
C |
|
|
*ZERO |
ADD |
ARMIT |
MIMIT |
|
|
|
|
|
|
|
|
C |
|
|
|
MOVEL(P) |
'SPVONV' |
MYTYP |
|
|
|
|
|
|
|
|
C |
|
|
|
EXSR |
MYTYPTITEL |
|
|
|
|
|
|
|
|
|
C |
|
|
|
EXSR |
MYTITELX |
|
|
|
|
|
|
|
|
|
C |
|
|
|
MOVEL(P) |
MYTITEL |
LINK6 |
|
|
|
|
|
|
|
|
C |
|
|
|
CAT |
'<b' |
:1 |
LINK6 |
|
|
|
|
|
|
|
|
C |
|
66 |
|
CAT |
NAVSTYLE |
:0 |
LINK6 |
|
|
|
|
|
|
|
|
C |
|
|
|
CAT |
'>' |
:0 |
LINK6 |
|
|
|
|
|
|
|
|
C |
|
|
|
EXSR |
LINKMIT |
|
|
|
|
|
|
|
|
|
C |
|
|
|
CAT |
LINK |
:0 |
LINK6 |
|
|
|
|
|
|
|
|
C |
|
|
|
CAT |
'</b>' |
:0 |
LINK6 |
|
|
|
|
|
|
|
|
C |
|
N66 |
|
EXSR |
ARTINFOART2 |
|
|
|
|
|
|
|
|
|
C |
|
|
|
SELECT |
|
|
|
|
C |
|
|
NOPN |
WHENNE |
ARPN |
|
|
|
|
|
|
|
|
|
C |
|
|
*ZERO |
ADD |
ARPN |
MIMIT |
|
|
|
|
|
|
|
|
C |
|
|
|
MOVEL(P) |
'SPAN' |
MYTYP |
|
|
|
|
|
|
|
|
C |
|
|
|
EXSR |
MYTYPTITEL |
|
|
|
|
|
|
|
|
|
C |
|
|
|
EXSR |
MYTITELX |
|
|
|
|
|
|
|
|
|
C |
|
|
|
CAT |
MYTITEL |
:1 |
LINK6 |
|
|
|
|
|
|
|
|
C |
|
|
|
CAT |
'<b' |
:1 |
LINK6 |
|
|
|
|
|
|
|
|
C |
|
66 |
|
CAT |
NAVSTYLE |
:0 |
LINK6 |
|
|
|
|
|
|
|
|
C |
|
|
|
CAT |
'>' |
:0 |
LINK6 |
|
|
|
|
|
|
|
|
C |
|
|
|
EXSR |
LINKMIT |
|
|
|
|
|
|
|
|
|
C |
|
|
|
CAT |
LINK |
:0 |
LINK6 |
|
|
|
|
|
|
|
|
C |
|
|
|
CAT |
'</b>' |
:0 |
LINK6 |
|
|
|
|
|
|
|
|
C |
|
|
|
|
|
|
|
|
C |
|
|
NORUB |
WHENNE |
ARRUB |
|
|
|
|
|
|
|
|
|
C |
|
|
*ZERO |
ADD |
ARRUB |
RURUB |
|
|
|
|
|
|
|
|
C |
|
|
|
MOVEL(P) |
'SPIN' |
MYTYP |
|
|
|
|
|
|
|
|
C |
|
|
|
EXSR |
MYTYPTITEL |
|
|
|
|
|
|
|
|
|
C |
|
|
|
EXSR |
MYTITELX |
|
|
|
|
|
|
|
|
|
C |
|
|
|
CAT |
MYTITEL |
:1 |
LINK6 |
|
|
|
|
|
|
|
|
C |
|
|
|
CAT |
'<b' |
:1 |
LINK6 |
|
|
|
|
|
|
|
|
C |
|
|
|
CAT |
NAVSTYLE |
:0 |
LINK6 |
|
|
|
|
|
|
|
|
C |
|
|
|
CAT |
'>' |
:0 |
LINK6 |
|
|
|
|
|
|
|
|
C |
|
|
|
EXSR |
LINKRUB |
|
|
|
|
|
|
|
|
|
C |
|
|
|
CAT |
LINK |
:0 |
LINK6 |
|
|
|
|
|
|
|
|
C |
|
|
|
CAT |
'</b>' |
:0 |
LINK6 |
|
|
|
|
|
|
|
|
C |
|
|
|
ENDSL |
|
|
|
|
|
|
|
|
|
|
C |
|
66 |
|
EXSR |
ARTINFOART2 |
|
|
|
|
|
|
|
|
|
C |
|
|
|
MOVEL(P) |
LINK6 |
LINK |
|
|
|
|
|
|
|
|
C |
|
|
|
EXSR |
COLCENTER |
|
|
|
|
|
|
|
|
|
C |
|
|
|
|
|
|
|
|
C |
* |
|
|
-------------------------------------- |
|
|
C |
* |
|
|
Verweis auf nachfolgenden Artikel |
|
|
C |
* |
|
|
-------------------------------------- |
|
|
C |
|
|
|
EXSR |
ARTNACH |
|
|
|
|
|
|
|
|
|
C |
|
|
|
EXSR |
COLRIGHT |
|
|
|
|
|
|
|
|
|
C |
|
|
|
EXSR |
ROWX |
|
|
|
|
|
|
|
|
|
C |
|
|
|
EXSR |
TABLEX |
|
|
|
|
|
|
|
|
|
C |
|
|
|
MOVEL(P) |
ABSTAND2 |
ABSTAND |
|
|
|
|
|
|
|
|
C |
|
|
|
ENDSR |
|
|
|
|
|
|
|
|
|
|
C |
|
|
|
|
|
|
|
|
X |
* |
ARTINFOART |
EXSR |
BAR$ART |
|
|
|
|
|
|
|
|
|
X |
* |
ARTINFOART |
EXSR |
BAR$ART |
|
|
|
|
|
|
|
|
|
X |
|
|
|
C |
|
|
ARTINFOART2 |
BEGSR |
|
|
|
|
|
|
|
|
|
|
C |
* |
|
|
-------------------------------------- |
|
|
C |
* |
|
|
Information ausgeben |
|
|
C |
* |
|
|
-------------------------------------- |
|
|
C |
|
|
NODAT |
IFNE |
ARDAT |
|
|
|
|
|
|
|
|
|
C |
|
|
|
MOVE |
ARDAT |
DATUM |
|
|
|
|
|
|
|
|
C |
|
|
|
MOVEL(P) |
DATUM |
DATUM2 |
|
|
|
|
|
|
|
|
C |
|
66 |
|
CAT |
'<br>' |
:0 |
LINK6 |
|
|
|
|
|
|
|
|
C |
|
|
|
MOVEL(P) |
'SPAM' |
MYTYP |
|
|
|
|
|
|
|
|
C |
|
|
|
EXSR |
MYTYPTITEL |
|
|
|
|
|
|
|
|
|
C |
|
|
|
EXSR |
MYTITELX |
|
|
|
|
|
|
|
|
|
C |
|
|
|
CAT |
MYTITEL |
:1 |
LINK6 |
|
|
|
|
|
|
|
|
C |
|
|
|
CAT |
DATUM2 |
:1 |
LINK6 |
|
|
|
|
|
|
|
|
C |
|
|
ARDAT |
IFGT |
DATETIME7 |
|
|
|
|
|
|
|
|
|
C |
|
|
|
MOVE |
ARDAT |
ZEIT |
|
|
|
|
|
|
|
|
C |
|
|
|
MOVEL(P) |
ZEIT |
ZEIT2 |
|
|
|
|
|
|
|
|
C |
|
|
5 |
SUBST(P) |
ZEIT2 |
ZEIT2 |
|
|
|
|
|
|
|
|
C |
|
|
|
MOVEL(P) |
'SPUM' |
MYTYP |
|
|
|
|
|
|
|
|
C |
|
|
|
EXSR |
MYTYPTITEL |
|
|
|
|
|
|
|
|
|
C |
|
|
|
EXSR |
MYTITELX |
|
|
|
|
|
|
|
|
|
C |
|
|
|
CAT |
MYTITEL |
:1 |
LINK6 |
|
|
|
|
|
|
|
|
C |
|
|
|
CAT |
'<a' |
:1 |
LINK6 |
|
|
|
|
|
|
|
|
C |
|
|
|
CAT |
NAVSTYLE |
:0 |
LINK6 |
|
|
|
|
|
|
|
|
C |
|
|
|
CAT |
'>' |
:0 |
LINK6 |
|
|
|
|
|
|
|
|
C |
|
|
|
CAT |
ZEIT2 |
:0 |
LINK6 |
|
|
|
|
|
|
|
|
C |
|
|
|
MOVEL(P) |
'SPUHR' |
MYTYP |
|
|
|
|
|
|
|
|
C |
|
|
|
EXSR |
MYTYPTITEL |
|
|
|
|
|
|
|
|
|
C |
|
|
|
EXSR |
MYTITELX |
|
|
|
|
|
|
|
|
|
C |
|
|
|
CAT |
MYTITEL |
:1 |
LINK6 |
|
|
|
|
|
|
|
|
C |
|
|
|
CAT |
'</a>' |
:0 |
LINK6 |
|
|
|
|
|
|
|
|
C |
|
|
|
ENDIF |
|
|
|
|
|
|
|
|
|
|
C |
|
|
|
ENDIF |
|
|
|
|
|
|
|
|
|
|
C |
|
|
|
ENDSR |
|
|
|
|
|
|
|
|
|
|
C |
|
|
|
|
|
|
|
|
X |
* |
ARTINFO |
EXSR |
BAR$ART |
|
|
|
|
|
|
|
|
|
X |
|
|
|
C |
|
|
ARTINFOAW |
BEGSR |
|
|
|
|
|
|
|
|
|
|
C |
|
|
|
MOVEL(P) |
'information' |
DIV |
|
|
|
|
|
|
|
|
C |
|
|
|
MOVEL(P) |
ABSTAND1 |
ABSTAND |
|
|
|
|
|
|
|
|
C |
* |
|
|
-------------------------------------- |
|
|
C |
* |
|
|
Information ausgeben |
|
|
C |
* |
|
|
-------------------------------------- |
|
|
C |
|
|
|
EXSR |
TABLE8 |
|
|
|
|
|
|
|
|
|
C |
|
|
*ZERO |
ADD |
1 |
ROWROWSMAX |
|
|
|
|
|
|
|
|
C |
|
|
|
|
|
|
|
|
C |
* |
|
|
-------------------------------------- |
|
|
C |
* |
|
|
Verweis auf vorherige Antwort |
|
|
C |
* |
|
|
-------------------------------------- |
|
|
C |
|
|
|
EXSR |
ROW |
|
|
|
|
|
|
|
|
|
C |
** |
|
|
EXSR |
AWVOR |
|
|
|
|
|
|
|
|
|
C |
|
|
|
EXSR |
COLLEFT |
|
|
|
|
|
|
|
|
|
C |
|
|
|
|
|
|
|
|
C |
* |
|
|
-------------------------------------- |
|
|
C |
* |
|
|
Antwort von/am/um/in |
|
|
C |
* |
|
|
-------------------------------------- |
|
|
C |
|
|
*ZERO |
ADD |
AWAUT |
MIMIT |
|
|
|
|
|
|
|
|
C |
|
|
|
MOVEL(P) |
'SPVONV' |
MYTYP |
|
|
|
|
|
|
|
|
C |
|
|
|
EXSR |
MYTYPTITEL |
|
|
|
|
|
|
|
|
|
C |
|
|
|
EXSR |
MYTITELX |
|
|
|
|
|
|
|
|
|
C |
|
|
|
MOVEL(P) |
MYTITEL |
LINK6 |
|
|
|
|
|
|
|
|
C |
|
|
|
CAT |
'<b' |
:1 |
LINK6 |
|
|
|
|
|
|
|
|
C |
|
66 |
|
CAT |
NAVSTYLE |
:0 |
LINK6 |
|
|
|
|
|
|
|
|
C |
|
|
|
CAT |
'>' |
:0 |
LINK6 |
|
|
|
|
|
|
|
|
C |
|
|
|
EXSR |
LINKMIT |
|
|
|
|
|
|
|
|
|
C |
|
|
|
CAT |
LINK |
:0 |
LINK6 |
|
|
|
|
|
|
|
|
C |
|
|
|
CAT |
'</b>' |
:0 |
LINK6 |
|
|
|
|
|
|
|
|
C |
|
N66 |
|
EXSR |
ARTINFOAW2 |
|
|
|
|
|
|
|
|
|
C |
|
|
*ZERO |
ADD |
ARMIT |
ARMIT |
|
|
|
|
|
|
|
|
C |
|
|
*ZERO |
ADD |
ARART |
ARART |
|
|
|
|
|
|
|
|
C |
|
|
|
MOVEL(P) |
'SPIN' |
MYTYP |
|
|
|
|
|
|
|
|
C |
|
|
|
EXSR |
MYTYPTITEL |
|
|
|
|
|
|
|
|
|
C |
|
|
|
EXSR |
MYTITELX |
|
|
|
|
|
|
|
|
|
C |
|
|
|
CAT |
MYTITEL |
:1 |
LINK6 |
|
|
|
|
|
|
|
|
C |
|
|
|
CAT |
'<b' |
:1 |
LINK6 |
|
|
|
|
|
|
|
|
C |
|
N66 |
|
CAT |
NAVSTYLE |
:0 |
LINK6 |
|
|
|
|
|
|
|
|
C |
|
|
|
CAT |
'>' |
:0 |
LINK6 |
|
|
|
|
|
|
|
|
C |
|
|
|
EXSR |
LINKARTAW |
|
|
|
|
|
|
|
|
|
C |
|
|
|
CAT |
LINK |
:0 |
LINK6 |
|
|
|
|
|
|
|
|
C |
|
|
|
CAT |
'</b>' |
:0 |
LINK6 |
|
|
|
|
|
|
|
|
C |
|
66 |
|
EXSR |
ARTINFOAW2 |
|
|
|
|
|
|
|
|
|
C |
|
|
|
MOVEL(P) |
LINK6 |
LINK |
|
|
|
|
|
|
|
|
C |
|
|
|
EXSR |
COLCENTER |
|
|
|
|
|
|
|
|
|
C |
|
|
|
|
|
|
|
|
C |
* |
|
|
-------------------------------------- |
|
|
C |
* |
|
|
Verweis auf nachfolgende Antwort |
|
|
C |
* |
|
|
-------------------------------------- |
|
|
C |
** |
|
|
EXSR |
AWNACH |
|
|
|
|
|
|
|
|
|
C |
|
|
|
EXSR |
COLRIGHT |
|
|
|
|
|
|
|
|
|
C |
|
|
|
EXSR |
ROWX |
|
|
|
|
|
|
|
|
|
C |
|
|
|
EXSR |
TABLEX |
|
|
|
|
|
|
|
|
|
C |
|
|
|
MOVEL(P) |
ABSTAND2 |
ABSTAND |
|
|
|
|
|
|
|
|
C |
|
|
|
ENDSR |
|
|
|
|
|
|
|
|
|
|
C |
|
|
|
|
|
|
|
|
X |
* |
ARTINFOAW |
EXSR |
BAR$ART |
|
|
|
|
|
|
|
|
|
X |
* |
ARTINFOAW |
EXSR |
BAR$ART |
|
|
|
|
|
|
|
|
|
X |
|
|
|
C |
|
|
ARTINFOAW2 |
BEGSR |
|
|
|
|
|
|
|
|
|
|
C |
* |
|
|
-------------------------------------- |
|
|
C |
* |
|
|
Information ausgeben |
|
|
C |
* |
|
|
-------------------------------------- |
|
|
C |
|
|
NODAT |
IFNE |
AWDAT |
|
|
|
|
|
|
|
|
|
C |
|
|
|
MOVE |
AWDAT |
DATUM |
|
|
|
|
|
|
|
|
C |
|
|
|
MOVEL(P) |
DATUM |
DATUM2 |
|
|
|
|
|
|
|
|
C |
|
66 |
|
CAT |
'<br>' |
:0 |
LINK6 |
|
|
|
|
|
|
|
|
C |
|
|
|
MOVEL(P) |
'SPAM' |
MYTYP |
|
|
|
|
|
|
|
|
C |
|
|
|
EXSR |
MYTYPTITEL |
|
|
|
|
|
|
|
|
|
C |
|
|
|
EXSR |
MYTITELX |
|
|
|
|
|
|
|
|
|
C |
|
|
|
CAT |
MYTITEL |
:1 |
LINK6 |
|
|
|
|
|
|
|
|
C |
|
|
|
CAT |
DATUM2 |
:1 |
LINK6 |
|
|
|
|
|
|
|
|
C |
|
|
AWDAT |
IFGT |
DATETIME7 |
|
|
|
|
|
|
|
|
|
C |
|
|
|
MOVE |
AWDAT |
ZEIT |
|
|
|
|
|
|
|
|
C |
|
|
|
MOVEL(P) |
ZEIT |
ZEIT2 |
|
|
|
|
|
|
|
|
C |
|
|
5 |
SUBST(P) |
ZEIT2 |
ZEIT2 |
|
|
|
|
|
|
|
|
C |
|
|
|
MOVEL(P) |
'SPUM' |
MYTYP |
|
|
|
|
|
|
|
|
C |
|
|
|
EXSR |
MYTYPTITEL |
|
|
|
|
|
|
|
|
|
C |
|
|
|
EXSR |
MYTITELX |
|
|
|
|
|
|
|
|
|
C |
|
|
|
CAT |
MYTITEL |
:1 |
LINK6 |
|
|
|
|
|
|
|
|
C |
|
|
|
CAT |
'<a' |
:1 |
LINK6 |
|
|
|
|
|
|
|
|
C |
|
|
|
CAT |
NAVSTYLE |
:0 |
LINK6 |
|
|
|
|
|
|
|
|
C |
|
|
|
CAT |
'>' |
:0 |
LINK6 |
|
|
|
|
|
|
|
|
C |
|
|
|
CAT |
ZEIT2 |
:0 |
LINK6 |
|
|
|
|
|
|
|
|
C |
|
|
|
MOVEL(P) |
'SPUHR' |
MYTYP |
|
|
|
|
|
|
|
|
C |
|
|
|
EXSR |
MYTYPTITEL |
|
|
|
|
|
|
|
|
|
C |
|
|
|
EXSR |
MYTITELX |
|
|
|
|
|
|
|
|
|
C |
|
|
|
CAT |
MYTITEL |
:1 |
LINK6 |
|
|
|
|
|
|
|
|
C |
|
|
|
CAT |
'</a>' |
:0 |
LINK6 |
|
|
|
|
|
|
|
|
C |
|
|
|
ENDIF |
|
|
|
|
|
|
|
|
|
|
C |
|
|
|
ENDIF |
|
|
|
|
|
|
|
|
|
|
C |
|
|
|
ENDSR |
|
|
|
|
|
|
|
|
|
|
C |
|
|
|
|
|
|
|
|
X |
* |
ARTINFOART |
EXSR |
BAR$ART |
|
|
|
|
|
|
|
|
|
X |
|
|
|
C |
|
|
ARTVOR |
BEGSR |
|
|
|
|
|
|
|
|
|
|
C |
|
|
|
EXSR |
ARTVOR3 |
|
|
|
|
|
|
|
|
|
C |
* |
|
|
-------------------------------------- |
|
|
C |
* |
|
|
Verweis auf vorigen Artikel |
|
|
C |
* |
|
|
-------------------------------------- |
|
|
C |
|
|
|
SELECT |
|
|
|
|
C |
|
|
NOPN |
WHENNE |
ARPN |
|
|
|
|
|
|
|
|
|
C |
|
|
BEMIT |
COMP |
ARMIT |
|
|
|
— |
— |
78 |
|
|
|
C |
|
|
|
OPEN |
ARTIKELLO |
|
|
|
— |
77 |
— |
|
|
|
C |
|
78 |
ARKEYO1SET |
SETGT |
ARTIKELLO |
|
|
|
— |
77 |
— |
|
|
|
C |
|
N78 |
ARKEYO2SET |
SETGT |
ARTIKELLO |
|
|
|
— |
77 |
— |
|
|
|
C |
|
N77 |
ARKEYO |
READE |
ARTIKELLO |
|
|
|
— |
77 |
77 |
|
|
|
C |
|
|
|
OTHER |
|
|
|
|
|
|
|
|
|
|
C |
|
|
NOSERIE |
COMP |
RUSERIE |
|
|
|
— |
— |
78 |
|
|
|
C |
|
78 |
|
EXSR |
ARTVOR2 |
|
|
|
|
|
|
|
|
|
C |
|
N78 |
|
EXSR |
ARTNACH2 |
|
|
|
|
|
|
|
|
|
C |
|
|
|
ENDSL |
|
|
|
|
|
|
|
|
|
|
C |
|
|
|
EXSR |
LINKART$ |
|
|
|
|
|
|
|
|
|
C |
|
|
|
EXSR |
LINKADDB |
|
|
|
|
|
|
|
|
|
C |
|
|
|
ENDSR |
|
|
|
|
|
|
|
|
|
|
C |
|
|
|
|
|
|
|
|
X |
* |
ARTVOR |
EXSR |
BAR$ART |
|
|
|
|
|
|
|
|
|
X |
* |
ARTNACH |
EXSR |
BAR$ART |
|
|
|
|
|
|
|
|
|
X |
|
|
|
C |
|
|
ARTVOR2 |
BEGSR |
|
|
|
|
|
|
|
|
|
|
C |
* |
|
|
-------------------------------------- |
|
|
C |
* |
|
|
Verweis auf vorigen Artikel |
|
|
C |
* |
|
|
-------------------------------------- |
|
|
C |
|
|
NOMIT |
IFNE |
BEMIT |
|
|
|
|
|
|
|
|
|
C |
|
|
|
OPEN |
ARTIKELLT |
|
|
|
— |
77 |
— |
|
|
|
C |
|
|
ARKEYTSET |
SETGT |
ARTIKELLT |
|
|
|
— |
77 |
— |
|
|
|
C |
|
N77 |
ARKEYT |
READE |
ARTIKELLT |
|
|
|
— |
77 |
77 |
|
|
|
C |
|
|
|
ELSE |
|
|
|
|
|
|
|
|
|
|
C |
|
|
|
OPEN |
ARTIKELLU |
|
|
|
— |
77 |
— |
|
|
|
C |
|
|
ARKEYUSET |
SETGT |
ARTIKELLU |
|
|
|
— |
77 |
— |
|
|
|
C |
|
N77 |
ARKEYU |
READE |
ARTIKELLU |
|
|
|
— |
77 |
77 |
|
|
|
C |
|
|
|
ENDIF |
|
|
|
|
|
|
|
|
|
|
C |
|
|
|
ENDSR |
|
|
|
|
|
|
|
|
|
|
C |
|
|
|
|
|
|
|
|
X |
* |
ARTVOR |
EXSR |
BAR$ART |
|
|
|
|
|
|
|
|
|
X |
|
|
|
C |
|
|
ARTVOR3 |
BEGSR |
|
|
|
|
|
|
|
|
|
|
C |
* |
|
|
-------------------------------------- |
|
|
C |
* |
|
|
Verweis auf vorigen Artikel |
|
|
C |
* |
|
|
-------------------------------------- |
|
|
C |
|
|
|
MOVEL(P) |
BILDVOR |
MYTITEL |
|
|
|
|
|
|
|
|
C |
|
|
|
MOVEL(P) |
'vor.gif' |
EDTITEL |
|
|
|
|
|
|
|
|
C |
|
|
|
MOVEL(P) |
DISPLAYBLOCK |
BILDADD |
|
|
|
|
|
|
|
|
C |
|
|
|
EXSR |
LINKBILD |
|
|
|
|
|
|
|
|
|
C |
|
|
|
MOVEL(P) |
LINK |
LINK2 |
|
|
|
|
|
|
|
|
C |
|
|
|
|
|
|
|
|
C |
|
|
|
MOVEL(P) |
BILDVOR |
MYTITEL |
|
|
|
|
|
|
|
|
C |
|
|
|
MOVEL(P) |
'vor3.gif' |
EDTITEL |
|
|
|
|
|
|
|
|
C |
|
|
|
MOVEL(P) |
VISIHIDDEN5 |
BILDADD |
|
|
|
|
|
|
|
|
C |
|
|
|
EXSR |
LINKBILD |
|
|
|
|
|
|
|
|
|
C |
|
|
|
MOVEL(P) |
LINK |
LINK3 |
|
|
|
|
|
|
|
|
C |
|
|
|
ENDSR |
|
|
|
|
|
|
|
|
|
|
C |
|
|
|
|
|
|
|
|
X |
* |
ARTINFOART |
EXSR |
BAR$ART |
|
|
|
|
|
|
|
|
|
X |
|
|
|
C |
|
|
ARTNACH |
BEGSR |
|
|
|
|
|
|
|
|
|
|
C |
|
|
|
EXSR |
ARTNACH3 |
|
|
|
|
|
|
|
|
|
C |
* |
|
|
-------------------------------------- |
|
|
C |
* |
|
|
Verweis auf nächsten Artikel |
|
|
C |
* |
|
|
-------------------------------------- |
|
|
C |
|
|
|
SELECT |
|
|
|
|
C |
|
|
NOPN |
WHENNE |
ARPN |
|
|
|
|
|
|
|
|
|
C |
|
|
BEMIT |
COMP |
ARMIT |
|
|
|
— |
— |
78 |
|
|
|
C |
|
|
|
OPEN |
ARTIKELLO |
|
|
|
— |
77 |
— |
|
|
|
C |
|
78 |
ARKEYO1SET |
SETLL |
ARTIKELLO |
|
|
|
— |
77 |
— |
|
|
|
C |
|
N78 |
ARKEYO2SET |
SETLL |
ARTIKELLO |
|
|
|
— |
77 |
— |
|
|
|
C |
|
N77 |
ARKEYO |
READPE |
ARTIKELLO |
|
|
|
— |
77 |
77 |
|
|
|
C |
|
|
|
OTHER |
|
|
|
|
|
|
|
|
|
|
C |
|
|
NOSERIE |
COMP |
RUSERIE |
|
|
|
— |
— |
78 |
|
|
|
C |
|
78 |
|
EXSR |
ARTNACH2 |
|
|
|
|
|
|
|
|
|
C |
|
N78 |
|
EXSR |
ARTVOR2 |
|
|
|
|
|
|
|
|
|
C |
|
|
|
ENDSL |
|
|
|
|
|
|
|
|
|
|
C |
|
|
|
EXSR |
LINKART$ |
|
|
|
|
|
|
|
|
|
C |
|
|
|
EXSR |
LINKADDB |
|
|
|
|
|
|
|
|
|
C |
|
|
|
ENDSR |
|
|
|
|
|
|
|
|
|
|
C |
|
|
|
|
|
|
|
|
X |
* |
ARTVOR |
EXSR |
BAR$ART |
|
|
|
|
|
|
|
|
|
X |
* |
ARTNACH |
EXSR |
BAR$ART |
|
|
|
|
|
|
|
|
|
X |
|
|
|
C |
|
|
ARTNACH2 |
BEGSR |
|
|
|
|
|
|
|
|
|
|
C |
* |
|
|
-------------------------------------- |
|
|
C |
* |
|
|
Verweis auf nächsten Artikel |
|
|
C |
* |
|
|
-------------------------------------- |
|
|
C |
|
|
NOMIT |
IFNE |
BEMIT |
|
|
|
|
|
|
|
|
|
C |
|
|
|
OPEN |
ARTIKELLT |
|
|
|
— |
77 |
— |
|
|
|
C |
|
|
ARKEYTSET |
SETLL |
ARTIKELLT |
|
|
|
— |
77 |
— |
|
|
|
C |
|
N77 |
ARKEYT |
READPE |
ARTIKELLT |
|
|
|
— |
77 |
77 |
|
|
|
C |
|
|
|
ELSE |
|
|
|
|
|
|
|
|
|
|
C |
|
|
|
OPEN |
ARTIKELLU |
|
|
|
— |
77 |
— |
|
|
|
C |
|
|
ARKEYUSET |
SETLL |
ARTIKELLU |
|
|
|
— |
77 |
— |
|
|
|
C |
|
N77 |
ARKEYU |
READPE |
ARTIKELLU |
|
|
|
— |
77 |
77 |
|
|
|
C |
|
|
|
ENDIF |
|
|
|
|
|
|
|
|
|
|
C |
|
|
|
ENDSR |
|
|
|
|
|
|
|
|
|
|
C |
|
|
|
|
|
|
|
|
X |
* |
ARTNACH |
EXSR |
BAR$ART |
|
|
|
|
|
|
|
|
|
X |
|
|
|
C |
|
|
ARTNACH3 |
BEGSR |
|
|
|
|
|
|
|
|
|
|
C |
* |
|
|
-------------------------------------- |
|
|
C |
* |
|
|
Verweis auf nächsten Artikel |
|
|
C |
* |
|
|
-------------------------------------- |
|
|
C |
|
|
|
MOVEL(P) |
BILDNACH |
MYTITEL |
|
|
|
|
|
|
|
|
C |
|
|
|
MOVEL(P) |
'nach.gif' |
EDTITEL |
|
|
|
|
|
|
|
|
C |
|
|
|
MOVEL(P) |
DISPLAYBLOCK |
BILDADD |
|
|
|
|
|
|
|
|
C |
|
|
|
EXSR |
LINKBILD |
|
|
|
|
|
|
|
|
|
C |
|
|
|
MOVEL(P) |
LINK |
LINK2 |
|
|
|
|
|
|
|
|
C |
|
|
|
|
|
|
|
|
C |
|
|
|
MOVEL(P) |
BILDNACH |
MYTITEL |
|
|
|
|
|
|
|
|
C |
|
|
|
MOVEL(P) |
'nach3.gif' |
EDTITEL |
|
|
|
|
|
|
|
|
C |
|
|
|
MOVEL(P) |
VISIHIDDEN5 |
BILDADD |
|
|
|
|
|
|
|
|
C |
|
|
|
EXSR |
LINKBILD |
|
|
|
|
|
|
|
|
|
C |
|
|
|
MOVEL(P) |
LINK |
LINK3 |
|
|
|
|
|
|
|
|
C |
|
|
|
ENDSR |
|
|
|
|
|
|
|
|
|
|
C |
|
|
|
|
|
|
|
|
X |
* |
ARTVOR |
READE |
BAR$ART |
|
|
|
|
|
|
|
|
|
X |
* |
ARTNACH |
READPE |
BAR$ART |
|
|
|
|
|
|
|
|
|
X |
|
|
|
C |
|
|
ARKEYO |
KLIST |
|
|
|
|
|
|
|
|
|
|
C |
|
|
|
KFLD |
|
ARMAN |
|
|
|
|
|
|
|
|
C |
|
|
|
KFLD |
|
BEMIT |
|
|
|
|
|
|
|
|
C |
|
|
|
|
|
|
|
|
X |
* |
ARTVOR |
SETGT |
BAR$ART |
|
|
|
|
|
|
|
|
|
X |
* |
ARTNACH |
SETLL |
BAR$ART |
|
|
|
|
|
|
|
|
|
X |
|
|
|
C |
|
|
ARKEYO1SET |
KLIST |
|
|
|
|
|
|
|
|
|
|
C |
|
|
|
KFLD |
|
ARMAN |
|
|
|
|
|
|
|
|
C |
|
|
|
KFLD |
|
ARMIT |
|
|
|
|
|
|
|
|
C |
|
|
|
KFLD |
|
ARDATAW |
|
|
|
|
|
|
|
|
C |
|
|
|
KFLD |
|
ARPN |
|
|
|
|
|
|
|
|
C |
|
|
|
KFLD |
|
ARART |
|
|
|
|
|
|
|
|
C |
|
|
|
|
|
|
|
|
X |
* |
ARTVOR |
SETGT |
BAR$ART |
|
|
|
|
|
|
|
|
|
X |
* |
ARTNACH |
SETLL |
BAR$ART |
|
|
|
|
|
|
|
|
|
X |
|
|
|
C |
|
|
ARKEYO2SET |
KLIST |
|
|
|
|
|
|
|
|
|
|
C |
|
|
|
KFLD |
|
ARMAN |
|
|
|
|
|
|
|
|
C |
|
|
|
KFLD |
|
ARPN |
|
|
|
|
|
|
|
|
C |
|
|
|
KFLD |
|
ARDATAW |
|
|
|
|
|
|
|
|
C |
|
|
|
KFLD |
|
ARMIT |
|
|
|
|
|
|
|
|
C |
|
|
|
KFLD |
|
ARART |
|
|
|
|
|
|
|
|
C |
|
|
|
|
|
|
|
|
X |
* |
ARTVOR2 |
READE |
BAR$ART |
|
|
|
|
|
|
|
|
|
X |
* |
ARTNACH2 |
READPE |
BAR$ART |
|
|
|
|
|
|
|
|
|
X |
|
|
|
C |
|
|
ARKEYT |
KLIST |
|
|
|
|
|
|
|
|
|
|
C |
|
|
|
KFLD |
|
ARMAN |
|
|
|
|
|
|
|
|
C |
|
|
|
KFLD |
|
ARPN |
|
|
|
|
|
|
|
|
C |
|
|
|
KFLD |
|
ARRUB |
|
|
|
|
|
|
|
|
C |
|
|
|
|
|
|
|
|
X |
* |
ARTVOR2 |
SETGT |
BAR$ART |
|
|
|
|
|
|
|
|
|
X |
* |
ARTNACH2 |
SETLL |
BAR$ART |
|
|
|
|
|
|
|
|
|
X |
|
|
|
C |
|
|
ARKEYTSET |
KLIST |
|
|
|
|
|
|
|
|
|
|
C |
|
|
|
KFLD |
|
ARMAN |
|
|
|
|
|
|
|
|
C |
|
|
|
KFLD |
|
ARPN |
|
|
|
|
|
|
|
|
C |
|
|
|
KFLD |
|
ARRUB |
|
|
|
|
|
|
|
|
C |
|
|
|
KFLD |
|
ARDAT |
|
|
|
|
|
|
|
|
C |
|
|
|
KFLD |
|
ARMIT |
|
|
|
|
|
|
|
|
C |
|
|
|
KFLD |
|
ARART |
|
|
|
|
|
|
|
|
C |
|
|
|
|
|
|
|
|
X |
* |
ARTVOR2 |
READE |
BAR$ART |
|
|
|
|
|
|
|
|
|
X |
* |
ARTNACH2 |
READPE |
BAR$ART |
|
|
|
|
|
|
|
|
|
X |
|
|
|
C |
|
|
ARKEYU |
KLIST |
|
|
|
|
|
|
|
|
|
|
C |
|
|
|
KFLD |
|
ARMAN |
|
|
|
|
|
|
|
|
C |
|
|
|
KFLD |
|
ARPN |
|
|
|
|
|
|
|
|
C |
|
|
|
KFLD |
|
ARRUB |
|
|
|
|
|
|
|
|
C |
|
|
|
|
|
|
|
|
X |
* |
ARTVOR2 |
SETGT |
BAR$ART |
|
|
|
|
|
|
|
|
|
X |
* |
ARTNACH2 |
SETLL |
BAR$ART |
|
|
|
|
|
|
|
|
|
X |
|
|
|
C |
|
|
ARKEYUSET |
KLIST |
|
|
|
|
|
|
|
|
|
|
C |
|
|
|
KFLD |
|
ARMAN |
|
|
|
|
|
|
|
|
C |
|
|
|
KFLD |
|
ARPN |
|
|
|
|
|
|
|
|
C |
|
|
|
KFLD |
|
ARRUB |
|
|
|
|
|
|
|
|
C |
|
|
|
KFLD |
|
ARDAT |
|
|
|
|
|
|
|
|
C |
|
|
|
KFLD |
|
ARMIT |
|
|
|
|
|
|
|
|
C |
|
|
|
KFLD |
|
ARART |
|
|
|
|
|
|
|
|
C |
|
|
|
|
|
|
|
|
X |
* |
ARTFILEHTML |
EXSR |
BAR$ART |
|
|
|
|
|
|
|
|
|
X |
|
|
|
C |
|
|
ARTRESIZE |
BEGSR |
|
|
|
|
|
|
|
|
|
|
C |
* |
|
|
-------------------------------------- |
|
|
C |
* |
|
|
Bild in Fenster einpassen |
|
|
C |
* |
|
|
-------------------------------------- |
|
|
C |
|
|
WWTYP |
IFNE |
TYPFRD |
|
|
|
|
|
|
|
|
|
C |
|
|
WWTYP |
ANDNE |
TYPFRR |
|
|
|
|
|
|
|
|
|
C |
|
|
|
EVAL |
SRC = %TRIM(OBJEKTNAV)+'/resize.js' |
|
|
C |
|
|
|
EXSR |
SRCEXISTJS |
|
|
|
|
|
|
|
|
|
C |
|
|
*BLANKS |
IFNE |
SRC |
|
|
|
|
|
|
|
|
|
C |
|
|
|
EVAL |
BUF = |
|
|
C |
|
|
|
|
BUF + '<script type="text/javascript" + |
|
|
C |
|
|
|
|
language="javascript" + |
|
|
C |
|
|
|
|
|
src="'+SRC+'" + |
|
|
C |
|
|
|
|
|
id="resize">+ |
|
|
C |
|
|
|
|
|
</script>' |
|
|
C |
|
|
|
ENDIF |
|
|
|
|
|
|
|
|
|
|
C |
|
|
|
ENDIF |
|
|
|
|
|
|
|
|
|
|
C |
* |
|
|
-------------------------------------- |
|
|
C |
* |
|
|
Aktuelles Kamerabild anzeigen? |
|
|
C |
* |
|
|
-------------------------------------- |
|
|
C |
|
|
WWTYP |
IFEQ |
TYPPN |
|
|
|
|
|
|
|
|
|
C |
|
|
WWTYP |
OREQ |
TYPART |
|
|
|
|
|
|
|
|
|
C |
|
|
*BLANKS |
IFNE |
ARKAMERA |
|
|
|
|
|
|
|
|
|
C |
|
|
XLATE2:XLATE1 |
XLATE(P) |
ARKAMERA |
MYTITEL |
|
|
|
|
|
|
|
|
C |
|
|
UPPER:LOWER |
XLATE(P) |
MYTITEL |
CHARS |
|
|
|
|
|
|
|
|
C |
|
|
'ftp://' |
IFEQ |
CHARS6 |
|
|
|
|
|
|
|
|
|
C |
|
|
'ftps://' |
OREQ |
CHARS7 |
|
|
|
|
|
|
|
|
|
C |
|
|
'sftp://' |
OREQ |
CHARS7 |
|
|
|
|
|
|
|
|
|
C |
|
|
'http://' |
OREQ |
CHARS7 |
|
|
|
|
|
|
|
|
|
C |
|
|
'https://' |
OREQ |
CHARS8 |
|
|
|
|
|
|
|
|
|
C |
|
|
'shttp://' |
OREQ |
CHARS8 |
|
|
|
|
|
|
|
|
|
C |
|
|
|
EVAL |
MYKAMERA = ARKAMERA |
|
|
C |
|
|
|
ENDIF |
|
|
|
|
|
|
|
|
|
|
C |
|
|
|
ENDIF |
|
|
|
|
|
|
|
|
|
|
C |
|
|
|
ENDIF |
|
|
|
|
|
|
|
|
|
|
C |
|
|
|
ENDSR |
|
|
|
|
|
|
|
|
|