Variablen

BAR$VAR (RPGLE)



D                    
D *COPYRIGHT JÜRGEN REULE 2010-2024
D                    
D SIDALL     S           INZ LIKE(SID)
D SIDQUERY     S           INZ LIKE(SID)
D SIDCOOKIE     S           INZ LIKE(SID)
D                    
D DEBUGALL     S           INZ LIKE(DEBUG)
D DEBUGQUERY     S           INZ LIKE(DEBUG)
D DEBUGCOOKIE     S           INZ LIKE(DEBUG)
D                    
D SPRACHEALL     S           INZ LIKE(SPRACHE)
D SPRACHEQUERY     S           INZ LIKE(SPRACHE)
D SPRACHECOOKIE     S           INZ LIKE(SPRACHE)
D                    
D SUCHEALL     S           INZ LIKE(SUCHE)
D SCHMALALL     S           INZ LIKE(SCHMAL)
D BENUTZERALL     S           INZ LIKE(BENUTZER)
D KENNWORTALL     S           INZ LIKE(KENNWORT)
D                    
D SUCH     S           INZ LIKE(SUCHE)
D SUCHLEN     S   5 S 0   INZ
D                    
D TYP     S           INZ LIKE(AFTYP)
D DNT     S           INZ LIKE(AFDNT)
D STMF     S           INZ LIKE(AFSTMF)
D DAUER     S           INZ LIKE(AFDAUER)
D AGENT     S           INZ LIKE(AGAGENT)
D MOBILE     S           INZ LIKE(AFMOBILE)
D METHOD     S           INZ LIKE(AFMETHOD)
D METHOD2     S           INZ LIKE(AFMETHOD)
D REFERRER     S           INZ LIKE(AFREFERRER)
D STATUS     S           INZ LIKE(AFSTATUS)
D STATUSSAVE     S           INZ LIKE(AFSTATUS)
D                    
D DTAQDS     DS            
D DTAQ         10 A     INZ('ANFRAGEQ')
D DTAQLIB         10 A     INZ('*CURLIB')
D                    
D ANFRAGEDSLEN     C           CONST(%SIZE(ANFRAGEDS))
D ANFRAGEDSLENX     S   5 P 0   INZ
D                    
D FORMDATADSLEN     C           CONST(%SIZE(FORMDATADS))
D FORMDATADSLENX     S   10 I 0   INZ
D                    
D RCDFMT#     C           CONST('CGI')
D                    
D MYTYPX     S   1 A     INZ
D MYARTPN     S   1 A     INZ
D MYREMOVE     S   1 A     INZ
D MYSPERRE     S   1 A     INZ
D MYSPERREN     S           INZ LIKE(MYSPERRE)
D                    
D MYMW     S           INZ LIKE(MIMW)
D MYSID     S           INZ LIKE(MISID)
D MYPOS     S           INZ LIKE(RUPOS)
D MYART     S           INZ LIKE(ARART)
D MYBAR     S           INZ LIKE(NATYP)
D MYTYP     S           INZ LIKE(NATYP)
D MYSIZE     S           INZ LIKE(FISIZE)
D MYROW2     S           INZ LIKE(FAROW2)
D MYNONE     S           INZ LIKE(TITITEL)
D MYMONO     S           INZ LIKE(TITITEL)
D MYBLASE     S           INZ LIKE(TITITEL)
D MYFARBE     S           INZ LIKE(FAFARBE)
D MYFILEX     S           INZ LIKE(ARFILEX)
D MYFILEXX     S           INZ LIKE(ARFILEX)
D MYKAMERA     S           INZ LIKE(ARKAMERA)
D MYSRCMBR     S           INZ LIKE(LASRCMBR)
D MYSPERREX     S           INZ LIKE(TITITEL)
D                    
D EDTITEL     S   200 A     INZ
D EDTITEL2     S   500 A     INZ
D DLTITEL     S           INZ LIKE(EDTITEL)
D RCTITEL     S           INZ LIKE(EDTITEL)
D SNTITEL     S           INZ LIKE(EDTITEL)
D SWTITEL     S           INZ LIKE(EDTITEL)
D MYTITEL     S           INZ LIKE(EDTITEL)
D MYTITEL2     S           INZ LIKE(EDTITEL2)
D MYTITELADD     S           INZ LIKE(EDTITEL)
D MYTITELMIT     S   1 A     INZ
D MYTITELRUB     S   1 A     INZ
D MYTITELFILES     S   1 A     INZ
D MYTITELAG     S   1 A     INZ
D                    
D MYTITELLEN     C           CONST(%SIZE(MYTITEL))
D                    
D NOPN     S           INZ LIKE(ARPN)
D NOMIT     S           INZ LIKE(ARMIT)
D NOBEN     S           INZ LIKE(GEBEN)
D NOAUT     S           INZ LIKE(AWAUT)
D NORUB     S           INZ LIKE(RURUB)
D NONFM     S           INZ LIKE(ARNFM)
D NODLT     S           INZ LIKE(ARDLT)
D NODAT     S           INZ LIKE(ARDAT)
D NOBAR     S           INZ LIKE(MYBAR)
D NOTYPX     S           INZ LIKE(MYTYPX)
D NOCHAT     S           INZ LIKE(ARCHAT)
D NOFARBE     S           INZ LIKE(FAFARBE)
D NOSERIE     S           INZ LIKE(RUSERIE)
D NOREMOVE     S           INZ LIKE(MYREMOVE)
D NOSEQLINE     S           INZ LIKE(LASEQLINE)
D                    
D NETEXT     S           INZ LIKE(AWTEXT)
D NEMIT     S           INZ LIKE(MIMIT)
D NERUB     S           INZ LIKE(RURUB)
D NEART     S           INZ LIKE(ARART)
D NEAW     S           INZ LIKE(AWAW)
D NEAG     S           INZ LIKE(AGAG)
D                    
D MYNAV     S           INZ LIKE(NANAV)
D EDNAV     S           INZ LIKE(NANAV)
D DLNAV     S           INZ LIKE(NANAV)
D RCNAV     S           INZ LIKE(NANAV)
D FRNAV0     S           INZ LIKE(NANAV)
D FRNAV1     S           INZ LIKE(NANAV)
D FRNAV2     S           INZ LIKE(NANAV)
D FRNAV3     S           INZ LIKE(NANAV)
D FRNAV4     S           INZ LIKE(NANAV)
D FRNAV5     S           INZ LIKE(NANAV)
D FRNAV6     S           INZ LIKE(NANAV)
D FRNAV7     S           INZ LIKE(NANAV)
D INDEXNAV     S           INZ LIKE(NANAV)
D SMILYNAV     S           INZ LIKE(NANAV)
D OBJEKTNAV     S           INZ LIKE(NANAV)
D                    
D SMILYX     S           INZ LIKE(SMILY)
D OBJEKT3     S           INZ LIKE(OBJEKT)
D OBJEKTX     S           INZ LIKE(OBJEKT)
D RUBRIKX     S           INZ LIKE(RUBRIK)
D MITGLIEDX     S           INZ LIKE(MITGLIED)
D LANGUAGE     S           INZ LIKE(SPRACHE)
D                    
D TARGET     S   500 A     INZ
D TARGET2     S           INZ LIKE(TARGET)
D TARGETX     S           INZ LIKE(TARGET)
D TARGETFRD     S           INZ LIKE(TARGET)
D TARGETSAVE     S           INZ LIKE(TARGET)
D                    
D LINK     S   1000 A     INZ
D LINK1     S           INZ LIKE(LINK)
D LINK2     S           INZ LIKE(LINK)
D LINK3     S           INZ LIKE(LINK)
D LINK4     S           INZ LIKE(LINK)
D LINK5     S           INZ LIKE(LINK)
D LINK6     S           INZ LIKE(LINK)
D LINK7     S           INZ LIKE(LINK)
D LINK8     S           INZ LIKE(LINK)
D LINK9     S           INZ LIKE(LINK)
D LINKX     S           INZ LIKE(LINK)
D                    
D LINKADD     S           INZ LIKE(LINK)
D LINKADDSAVE     S           INZ LIKE(LINK)
D                    
D LINKADDID     S   100 A     INZ
D LINKADDNAME     S           INZ LIKE(LINKADDID)
D LINKADDTYPE     S           INZ LIKE(LINKADDID)
D LINKADDVALUE     S           INZ LIKE(LINKADDID)
D LINKADDLABEL     S           INZ LIKE(LINKADDID)
D LINKADDCHANGE     S           INZ LIKE(LINKADDID)
D                    
D LINKADDLEN     S   5 S 0   INZ
D LINKADDSIZE     S           INZ LIKE(LINKADDLEN)
D LINKADDROWS     S           INZ LIKE(LINKADDLEN)
D LINKADDCOLS     S           INZ LIKE(LINKADDLEN)
D                    
D NEU     S           INZ LIKE(LINK)
D NEU3     S           INZ LIKE(LINK)
D NEUSP     S           INZ LIKE(LINK)
D NEUSP3     S           INZ LIKE(LINK)
D BESUCH     S           INZ LIKE(LINK)
D BESUCHNEU     S           INZ LIKE(LINK)
D VALUE     S           INZ LIKE(LINK)
D BLINK     S           INZ LIKE(LINK)
D                    
D ELEMENT     S   500 A     INZ
D ELEMENTX     S   1 A     INZ
D ELEMENT2     S           INZ LIKE(ELEMENT)
D ELEMENT3     S           INZ LIKE(ELEMENT)
D ELEMENT8     S           INZ LIKE(ELEMENT)
D ELEMENT9     S           INZ LIKE(ELEMENT)
D ELEMENTNAV     S           INZ LIKE(ELEMENT)
D ELEMENTERR     S           INZ LIKE(ELEMENT)
D ELEMENTERRT     S           INZ LIKE(ELEMENTX)
D                    
D ELEMENTMIN     S           INZ LIKE(AFPFADMIN)
D ELEMENTMINXX     S           INZ LIKE(AFPFADMIN)
D                    
D WEBMASTER     S           INZ LIKE(MIMIT)
D                    
D NATYPDIR     S           INZ LIKE(NATYP)
D NATYPFILE     S           INZ LIKE(NATYP)
D WWTYPSAVE     S           INZ LIKE(NATYP)
D                    
D OOFARBEALL     S           INZ LIKE(MYFARBE)
D OOFARBESAVE     S           INZ LIKE(MYFARBE)
D OOTYPEDTSAVE     S           INZ LIKE(NATYP)
D                    
D OOTYP     S           INZ LIKE(NATYP)
D OOTYPEDT     S           INZ LIKE(NATYP)
D OOTYPX     S           INZ LIKE(MYTYPX)
D OOMIT     S           INZ LIKE(ARMIT)
D OORUB     S           INZ LIKE(ARRUB)
D OONAV     S           INZ LIKE(NANAV)
D OOBAR     S           INZ LIKE(MYBAR)
D OOCHAT     S           INZ LIKE(ARCHAT)
D OOARTPN     S           INZ LIKE(MYARTPN)
D OOFARBE     S           INZ LIKE(MYFARBE)
D OOSPERRE     S           INZ LIKE(MYSPERRE)
D OOFILEX     S           INZ LIKE(MYFILEX)
D OOFILEXX     S           INZ LIKE(MYFILEXX)
D OOTITEL     S           INZ LIKE(MYTITEL)
D OOTITEL2     S           INZ LIKE(MYTITEL2)
D OOTITELADD     S           INZ LIKE(MYTITELADD)
D OOTITELMIT     S           INZ LIKE(MYTITELMIT)
D OOTITELRUB     S           INZ LIKE(MYTITELRUB)
D OOTITELFILES     S           INZ LIKE(MYTITELFILES)
D OOTITELAG     S           INZ LIKE(MYTITELAG)
D                    
D WWTYP     S           INZ LIKE(NATYP)
D WWTYPEDT     S           INZ LIKE(NATYP)
D WWTYPX     S           INZ LIKE(MYTYPX)
D WWMIT     S           INZ LIKE(ARMIT)
D WWRUB     S           INZ LIKE(ARRUB)
D WWNAV     S           INZ LIKE(NANAV)
D WWBAR     S           INZ LIKE(MYBAR)
D WWCHAT     S           INZ LIKE(ARCHAT)
D WWARTPN     S           INZ LIKE(MYARTPN)
D WWFARBE     S           INZ LIKE(MYFARBE)
D WWSPERRE     S           INZ LIKE(MYSPERRE)
D WWFILEX     S           INZ LIKE(MYFILEX)
D WWFILEXX     S           INZ LIKE(MYFILEXX)
D WWTITEL     S           INZ LIKE(MYTITEL)
D WWTITEL2     S           INZ LIKE(MYTITEL2)
D WWTITELADD     S           INZ LIKE(MYTITELADD)
D WWTITELMIT     S           INZ LIKE(MYTITELMIT)
D WWTITELRUB     S           INZ LIKE(MYTITELRUB)
D WWTITELFILES     S           INZ LIKE(MYTITELFILES)
D WWTITELAG     S           INZ LIKE(MYTITELAG)
D                    
D SUTITEL     S           INZ LIKE(ARTITEL)
D SUTITEL2     S           INZ LIKE(ARTITEL2)
D                    
D SUTYP     S           INZ LIKE(NATYP)
D SUNAV     S           INZ LIKE(NANAV)
D SUNAME     S           INZ LIKE(FINAME)
D                    
D SUMBR     S           INZ LIKE(SRCMBR)
D SUTYPE     S           INZ LIKE(SRCTYPE)
D SUTEXTX     S           INZ LIKE(SRCTEXT)
D                    
D SUKAMERADS     DS            
D SUKAMERA                 INZ LIKE(ARKAMERA)
D SUKAMERA$                 INZ LIKE(KAMERA)
D                    OVERLAY(SUKAMERADS:3)
D                    
D SUTEXTDS     DS            
D SUTEXT                 INZ LIKE(ARTEXT)
D SUTEXT$                 INZ LIKE(TEXT)
D                    OVERLAY(SUTEXTDS:3)
D                    
D WWW     S   2000 A     INZ
D WWW2     S           INZ LIKE(WWW)
D WWWANKER     S           INZ LIKE(WWW)
D WWWQUERY     S           INZ LIKE(WWW)
D                    
D QUERY     S           INZ LIKE(WWW)
D QUERY2     S           INZ LIKE(WWW)
D QUERY$     S           INZ LIKE(WWW)
D QUERYJS     S           INZ LIKE(WWW)
D QUERYLOC     S           INZ LIKE(WWW)
D QUERYSUCHE     S           INZ LIKE(WWW)
D QUERYSUCHEJS     S           INZ LIKE(WWW)
D                    
D EXTERN     S           INZ LIKE(WWW)
D LOCATION     S           INZ LIKE(WWW)
D REDIRECT     S           INZ LIKE(WWW)
D REDIRECT#     S   32 A     INZ
D                    
D ROBOT     S   1 A     INZ
D BESUCHER     S   500 A     INZ VARYING
D TEXTBROWSER     S   1 N     INZ
D                    
D COOKIE     S   500 A     INZ
D COOKIE2     S           INZ LIKE(COOKIE)
D COOKIE3     S           INZ LIKE(COOKIE)
D                    
D CACHE     S   200 A     INZ
D CACHESAVE     S           INZ LIKE(CACHE)
D RANGE     S   200 A     INZ
D RANGESAVE     S           INZ LIKE(RANGE)
D MODIFIED     S   100 A     INZ
D MODIFIEDSAVE     S           INZ LIKE(MODIFIED)
D LENGTH     S   100 A     INZ
D LENGTHSAVE     S           INZ LIKE(LENGTH)
D                    
D TAP     S   200 A     INZ VARYING
D                    
D TAPSTYLE     S   200 A     INZ VARYING
D TAPSTYLESAVE     S           INZ LIKE(TAPSTYLE)
D TAPCOLOR     S   200 A     INZ VARYING
D TAPCOLORSAVE     S           INZ LIKE(TAPCOLOR)
D BARCOLOR     S   200 A     INZ VARYING
D BARCOLORSAVE     S           INZ LIKE(BARCOLOR)
D                    
D ROWCOLOR     S   50 A     INZ
D ROWCOLOR1     S           INZ LIKE(ROWCOLOR)
D ROWCOLOR2     S           INZ LIKE(ROWCOLOR)
D ROWCOLORT     S           INZ LIKE(ROWCOLOR)
D                    
D NAVCOLOR     S           INZ LIKE(ROWCOLOR)
D REDCOLOR     S           INZ LIKE(ROWCOLOR)
D MAINCOLOR     S           INZ LIKE(ROWCOLOR)
D LIVECOLOR     S           INZ LIKE(ROWCOLOR)
D DEBUGCOLOR     S           INZ LIKE(ROWCOLOR)
D                    
D TRCOLOR     S           INZ LIKE(ROWCOLOR)
D TDCOLOR     S           INZ LIKE(ROWCOLOR)
D TDCOLORSAVE     S           INZ LIKE(ROWCOLOR)
D                    
D PWD     S           INZ LIKE(MIPWD)
D PWD1     S           INZ LIKE(MIPWD)
D PWD2     S           INZ LIKE(MIPWD2)
D PWD3     S           INZ LIKE(MIPWD2)
D                    
D POS     S   10 I 0   INZ
D POS2     S           INZ LIKE(POS)
D POS3     S           INZ LIKE(POS)
D POSX     S           INZ LIKE(POS)
D                    
D POSADD     S           INZ LIKE(POS)
D POSANKER     S           INZ LIKE(POS)
D POSQUERY     S           INZ LIKE(POS)
D                    
D TPOS     S           INZ LIKE(POS)
D WWWPOS     S           INZ LIKE(POS)
D MSGPOS     S           INZ LIKE(POS)
D SRCPOS     S           INZ LIKE(POS)
D SRCPOS2     S           INZ LIKE(POS)
D LOCPOS     S           INZ LIKE(POS)
D LOCLEN     S           INZ LIKE(POS)
D                    
D LEN     S           INZ LIKE(POS)
D LEN2     S           INZ LIKE(POS)
D LEN3     S           INZ LIKE(POS)
D                    
D RAND     S   5 U 0   INZ
D MAXNUM     S   5 U 0   INZ(*HIVAL)
D                    
D ENVRCV     S   32767 A     INZ
D ENVRCVLEN     C           CONST(%SIZE(ENVRCV))
D ENVLEN     S   10 I 0   INZ
D                    
D DATAPTR     S     *     INZ
D DATALEN     S   10 I 0   INZ
D DATABUF     S   32767 A     BASED(DATAPTR)
D DATABUFLEN     C           CONST(%SIZE(DATABUF))
D                    
D FILEPTR     S     *     INZ
D FILELEN     S   10 I 0   INZ
D FILEBUF2A     S   2 A     BASED(FILEPTR)
D                    
D FILEX     S           INZ LIKE(ARFILEX)
D FILEXX     S           INZ LIKE(ARFILEX)
D                    
D FILEDS     DS            
D           10 A     INZ('FORMDATAP')
D           10 A     INZ('*CURLIB')
D                    
D RSPCDE     S   10 I 0   INZ
D                    
D FORMTYPE     S   200 A     INZ
D DATATYPE     S           INZ LIKE(MIMIME)
D FILETYPE     S           INZ LIKE(MIMIME)
D                    
D HTTPXPATH     S   5000 A     INZ
D                    
D PATHIFS     S   5000 A     INZ VARYING
D FILEIFS     S           INZ LIKE(PATHIFS)
D FILEIFSMIN     S           INZ LIKE(PATHIFS)
D FILEIFSDLT     S           INZ LIKE(PATHIFS)
D                    
D HREFCSS     S   1000 A     INZ VARYING
D HREFXML     S   1000 A     INZ VARYING
D HREFRSS     S   1000 A     INZ VARYING
D HREFATOM     S   1000 A     INZ VARYING
D HREFOSDX     S   1000 A     INZ VARYING
D                    
D RELCSS     S   1000 A     INZ VARYING
D RELXML     S   1000 A     INZ VARYING
D RELRSS     S   1000 A     INZ VARYING
D RELATOM     S   1000 A     INZ VARYING
D RELOSDX     S   1000 A     INZ VARYING
D                    
D RELICON     S   1000 A     INZ VARYING
D RELICON2     S   1000 A     INZ VARYING
D RELTOUCH     S   1000 A     INZ VARYING
D                    
D REFRESH     S   1000 A     INZ VARYING
D CHARSET     S   1000 A     INZ VARYING
D                    
D HOST     S   500 A     INZ VARYING
D SECURE     S   500 A     INZ VARYING
D SCHEME     S   500 A     INZ VARYING
D SCRIPT     S   500 A     INZ VARYING
D SCRIPT2     S   500 A     INZ VARYING
D                    
D HTTP     S           INZ LIKE(MAPFAD)
D HTTP2     S           INZ LIKE(MAPFAD)
D                    
D PFAD     S           INZ LIKE(MAPFAD)
D PFAD2     S           INZ LIKE(MAPFAD)
D PFAD3     S           INZ LIKE(MAPFAD)
D PFADS     S           INZ LIKE(MAPFAD)
D                    
D PFADX     S           INZ LIKE(AFPFADX)
D PFADXX     S           INZ LIKE(AFPFADX)
D PFAD2X     S           INZ LIKE(AFPFADX)
D PFAD2XX     S           INZ LIKE(AFPFADX)
D                    
D PFADIFS     S           INZ LIKE(MAPFAD)
D PFADREL     S           INZ LIKE(MAPFAD)
D PFADREL1     S   10 A     INZ
D                    
D PFADLEN3     S           INZ LIKE(LEN)
D                    
D MYSPAM$     S           INZ LIKE(MYTITEL)
D                    
D MYMS#     S           INZ LIKE(MYTITEL)
D MYROBOT#     S           INZ LIKE(MYTITEL)
D MYSPAM$#     S           INZ LIKE(MYTITEL)
D MYSPAM$BOX#     S           INZ LIKE(MYTITEL)
D MYNOINDEX#     S           INZ LIKE(MYTITEL)
D MYNOFOLLOW#     S           INZ LIKE(MYTITEL)
D MYSUCHE#     S           INZ LIKE(MYTITEL)
D MYLOGIN#     S           INZ LIKE(MYTITEL)
D MYMOBILE#     S           INZ LIKE(MYTITEL)
D MYSCHMAL#     S           INZ LIKE(MYTITEL)
D                    
D MYHEUTE#     S           INZ LIKE(MYTITEL)
D MYGESTERN#     S           INZ LIKE(MYTITEL)
D MYMORGEN#     S           INZ LIKE(MYTITEL)
D MYLIVE#     S           INZ LIKE(MYTITEL)
D MYNFM#     S           INZ LIKE(MYTITEL)
D MYUHR#     S           INZ LIKE(MYTITEL)
D MYDAT#     S           INZ LIKE(MYTITEL)
D                    
D MYPN#     S           INZ LIKE(MYTITEL)
D MYART#     S           INZ LIKE(MYTITEL)
D MYMIT#     S           INZ LIKE(MYTITEL)
D MYRUB#     S           INZ LIKE(MYTITEL)
D MYAW#     S           INZ LIKE(MYTITEL)
D                    
D MYPN#N     S           INZ LIKE(MYTITEL)
D MYART#N     S           INZ LIKE(MYTITEL)
D MYMIT#N     S           INZ LIKE(MYTITEL)
D MYRUB#N     S           INZ LIKE(MYTITEL)
D MYAW#N     S           INZ LIKE(MYTITEL)
D                    
D MYB#     S           INZ LIKE(MYTITEL)
D MYKB#     S           INZ LIKE(MYTITEL)
D MYMB#     S           INZ LIKE(MYTITEL)
D MYGB#     S           INZ LIKE(MYTITEL)
D                    
D KB     S   15 P 0   INZ
D MB     S   15 P 0   INZ
D GB     S   15 P 0   INZ
D                    
D RGB6     S   6 A     INZ
D RGB3     DS            
D R         3 U 0   INZ
D G         3 U 0   INZ
D B         3 U 0   INZ
D                    
D STRUB     S   10 P 0   INZ
D STMIT     S   10 P 0   INZ
D STPN     S   10 P 0   INZ
D START     S   10 P 0   INZ
D STAW     S   10 P 0   INZ
D                    
D SIMODEL     S   4 A     INZ
D SIPRCGRP     S   3 A     INZ
D SIPRCFEAT     S   4 A     INZ
D SISYSNAME     S   8 A     INZ
D SIRELEASE     S   10 A     INZ
D SILASTIPL     DS           INZ
D SILASTIPLDATE         7 A     INZ
D SILASTIPLTIME         6 A     INZ
D                    
D MLFROM     S   64 A     INZ
D MLFROMNAME     S   64 A     INZ
D MLTO     S   64 A     INZ
D MLTONAME     S   64 A     INZ
D MLSUBJECT     S   60 A     INZ
D MLLONGMSG     S   5000 A     INZ
D MLSUBMIT     S   1 A     INZ
D                    
D SRCMBRDS     DS            
D SRCFILE         10 A     INZ
D SRCMBR         10 A     INZ
D SRCREL         5 A     INZ
D SRCTYPE         10 A     INZ
D SRCCHG                 INZ
D SRCCHGDATE         7 A     INZ OVERLAY(SRCCHG)
D SRCCHGTIME         6 A     INZ OVERLAY(SRCCHG:*NEXT)
D SRCTEXT         50 A     INZ
D SRCLINES         10 P 0   INZ
D                    
D SRCMBRSAVE     S           INZ LIKE(SRCMBRDS)
D                    
D RPGTYPE     S           INZ LIKE(LATYPE)
D RPGSUBR     S           INZ LIKE(LASUBR)
D RPGLIST     S           INZ LIKE(LALABEL)
D RPGLABEL     S           INZ LIKE(LALABEL)
D RPGSRCMBR     S           INZ LIKE(LASRCMBR)
D RPGSRCSEQ     S           INZ LIKE(LASRCSEQ)
D RPGSEQLINE     S           INZ LIKE(LASEQLINE)
D                    
D SRCMBRCOMP     S   3 A     INZ
D SRCMBRCOMP2     S           INZ LIKE(SRCMBRCOMP)
D                    
D FINAMECOMP     S           INZ LIKE(FINAME)
D FINAMECOMP2     S           INZ LIKE(FINAME)
D FINAMECOMP3     S           INZ LIKE(FINAME)
D FINAMECOMP4     S           INZ LIKE(FINAME)
D                    
D AGAGCOMP     S           INZ LIKE(AGAG)
D AFAGCOMP     S           INZ LIKE(AFAG)
D AFDATCOMP     S           INZ LIKE(AFDAT)
D                    
D SALZ     DS            
D             Z     INZ
D                    
D SPAMDS     DS            
D           8 A     INZ
D SPAM1         1 A     INZ
D           16 A     INZ
D SPAM4         4 A     INZ
D SPAM2         1 A     INZ
D           13 A     INZ
D SPAM3A                  
D           3 A     INZ OVERLAY(SPAM3A)
D SPAM3         1 A     INZ OVERLAY(SPAM3A:*NEXT)
D           1 A     INZ
D                    
D SPAM$DS     DS           INZ
D SPAM$1         1 A     INZ
D SPAM$2         1 A     INZ
D SPAM$3         1 A     INZ
D SPAM$                 INZ OVERLAY(SPAM$DS)
D                        LIKE(AFSPAM$)
D                    
D TD     S   20 A     INZ
D TDADD     S   100 A     INZ
D TDVALIGN     S   20 A     INZ
D                    
D ZAHL1     S   1 P 0   INZ
D DEBUG0     S           INZ LIKE(DEBUG)
D SCHMAL0     S           INZ LIKE(SCHMAL)
D NOTFOUND     S   1 N     INZ
D ROWSPACE     S   1 A     INZ
D                    
D PSSR     S   1 A     INZ
D LINEX     S   1 A     INZ
D ANKER     S   10 A     INZ
D HOCH     S   10 A     INZ
D ALPHA     S   32 A     INZ
D VSPACE     S   32 A     INZ
D ABSTAND     S   64 A     INZ
D ABSTAND$     S           INZ LIKE(ABSTAND)
D                    
D ROWS     S   10 I 0   INZ
D ROWROWS     S   10 I 0   INZ
D ROWROWSMAX     S   10 I 0   INZ
D ROWHEIGHT     S   10 I 0   INZ
D ROWSSAVE     S   10 I 0   INZ
D                    
D COLS     S   10 I 0   INZ
D COLSPAN     S   10 I 0   INZ
D                    
D NAVCOLS     S   10 I 0   INZ
D                    
D TAG     S   10 I 0   INZ
D TRYS     S   10 I 0   INZ
D LINES     S   10 I 0   INZ
D COUNT     S   10 I 0   INZ
D TIMEOUT     S   10 I 0   INZ
D MAXIDXBILD2     S   10 I 0   INZ
D MAXIDXTEXT2     S   10 I 0   INZ
D                    
D SRC     S   500 A     INZ VARYING
D TITLE     S   500 A     INZ
D MYLINK     S   500 A     INZ
D ORGANIZATION     S   500 A     INZ
D COPYRIGHT     S   500 A     INZ
D                    
D LANG     S   200 A     INZ VARYING
D DOCTYPE     S   200 A     INZ VARYING
D FORMCHARSET     S   200 A     INZ VARYING
D VIEWPORT     S   200 A     INZ
D ROBOTS     S   200 A     INZ
D                    
D BILDADD     S   100 A     INZ
D SMILYADD     S           INZ LIKE(BILDADD)
D TEXTBILDADD     S           INZ LIKE(BILDADD)
D DATE     S           INZ LIKE(HTTPDATE)
D                    
D SUBJECT     S           INZ LIKE(MLSUBJECT)
D LONGMSG     S           INZ LIKE(MLLONGMSG)
D                    
D DIV     S   100 A     INZ
D                    
D ADD     S   500 A     INZ VARYING
D ADDX     S           INZ LIKE(ADD)
D                    
D FONT     S   500 A     INZ VARYING
D FONTX     S           INZ LIKE(FONT)
D FONTSAVE     S           INZ LIKE(FONT)
D FONTSAVEX     S           INZ LIKE(FONT)
D                    
D AUTOCOMPLETE     S   100 A     INZ VARYING
D AUTOCAPITALIZE     S   100 A     INZ VARYING
D                    
D NAVSTYLE     S   500 A     INZ VARYING
D NAVSTYLESAVE     S           INZ LIKE(NAVSTYLE)
D FILESTYLE     S           INZ LIKE(NAVSTYLE)
D INPUTSTYLE     S           INZ LIKE(NAVSTYLE)
D BUTTONSTYLE     S           INZ LIKE(NAVSTYLE)
D TEXTAREASTYLE     S           INZ LIKE(NAVSTYLE)
D                    
D MAXWIDTHSTYLE     S   1000 A     INZ VARYING
D MAXWIDTHSTYLE2     S   1000 A     INZ VARYING
D                    
D ONLOADS     S   1000 A     INZ VARYING
D STYLES     S   32767 A     INZ VARYING
D                    
D JAVASCRIPTS     S   32767 A     INZ VARYING
D JAVASCRIPTERROR     S   32767 A     INZ VARYING
D                    
D BLASEBUF1     S   32767 A     INZ VARYING
D BLASEBUF2     S   32767 A     INZ VARYING
D BLASENUM     S   10 I 0   INZ
D                    
D FORMAT     S   4 A     INZ
D                    
D TYPE3     S   2 S 0   INZ
D SIZE3     S   10 S 0   INZ
D TIME3     S   10 S 0   INZ
D                    
D SIZE6     S           INZ LIKE(SIZE3)
D SIZE6SAVE     S           INZ LIKE(SIZE3)
D                    
D OFFSET     S   10 S 0   INZ
D OFFSETX     S           INZ LIKE(OFFSET)
D OFFSETMIN     S           INZ LIKE(OFFSET)
D OFFSETMAX     S           INZ LIKE(OFFSET)
D                    
D MYFILENAME     S           INZ LIKE(FILENAME)
D                    
D NUM32     DS            
D NUM1                 LIKE(MAXNUM)
D NUM2                 LIKE(MAXNUM)
D NUM3                 LIKE(MAXNUM)
D NUM4                 LIKE(MAXNUM)
D NUM5                 LIKE(MAXNUM)
D NUM6                 LIKE(MAXNUM)
D NUM7                 LIKE(MAXNUM)
D NUM8                 LIKE(MAXNUM)
D                    
D NUM     S   31 S 0   INZ
D STR     S   32 A     INZ
D STRPM     S   1 A     INZ
D COLOR1     S           INZ LIKE(MICOLOR)
D                    
D MSG     S   52 A     INZ
D STRX     S           INZ LIKE(STR)
D STR32     S   32 A     INZ
D LOCABS     S           INZ LIKE(WWW)
D COLOR7     S           INZ LIKE(MICOLOR)
D PWDHASH     S           INZ LIKE(MIPWD)
D                    
D MSGLEN     C           CONST(%SIZE(MSG))
D STRXLEN     C           CONST(%SIZE(STRX))
D STR32LEN     C           CONST(%SIZE(STR32))
D LOCABSLEN     C           CONST(%SIZE(LOCABS))
D COLOR7LEN     C           CONST(%SIZE(COLOR7))
D PWDHASHLEN     C           CONST(%SIZE(PWDHASH))
D                    
D CMD     S   32702 A     INZ
D CMDLEN     S   15 P 5   INZ(%SIZE(CMD))
D                    
D       DS            
D SMILYTEXT         32767 A     INZ VARYING
D SMILYTEXTLEN         5 U 0   OVERLAY(SMILYTEXT)
D                    
D       DS            
D TEXT1         32767 A     INZ VARYING
D TEXT1LEN         5 U 0   OVERLAY(TEXT1)
D                    
D       DS            
D TEXT2         32767 A     INZ VARYING
D TEXT2LEN         5 U 0   OVERLAY(TEXT2)
D                    
D       DS            
D BUF         32767 A     INZ VARYING
D BUFLEN         5 U 0   OVERLAY(BUF)
D BUFTEXT         32767 A     OVERLAY(BUF:*NEXT)
D BUFTEXTLEN     C           CONST(%SIZE(BUFTEXT))
D                    
D       DS            
D BUF2         32767 A     INZ VARYING
D BUF2LEN         5 U 0   OVERLAY(BUF2)
D BUF2TEXT         32767 A     OVERLAY(BUF2:*NEXT)
D BUF2TEXTLEN     C           CONST(%SIZE(BUF2TEXT))
D                    
D       DS            
D BUFV         32767 A     INZ VARYING
D BUFVLEN         5 U 0   OVERLAY(BUFV)
D BUFVTEXT         32767 A     OVERLAY(BUFV:*NEXT)
D BUFVTEXTLEN     C           CONST(%SIZE(BUFVTEXT))
D                    
D BUFVSAVE     S   32767 A     INZ VARYING
D                    
D CHARS     DS            
D CHARS1         1 A     INZ OVERLAY(CHARS)
D CHARS2         2 A     INZ OVERLAY(CHARS)
D CHARS3         3 A     INZ OVERLAY(CHARS)
D CHARS4         4 A     INZ OVERLAY(CHARS)
D CHARS5         5 A     INZ OVERLAY(CHARS)
D CHARS6         6 A     INZ OVERLAY(CHARS)
D CHARS7         7 A     INZ OVERLAY(CHARS)
D CHARS8         8 A     INZ OVERLAY(CHARS)
D CHARS9         9 A     INZ OVERLAY(CHARS)
D CHARS10         10 A     INZ OVERLAY(CHARS)
D CHARS11         11 A     INZ OVERLAY(CHARS)
D CHARS12         12 A     INZ OVERLAY(CHARS)
D                    
D CHAR     S   1 A     INZ
D CHAR2     S   2 A     INZ
D CHAR3     S   3 A     INZ
D CHAR4     S   4 A     INZ
D CHAR5     S   5 A     INZ
D CHAR6     S   6 A     INZ
D CHAR7     S   7 A     INZ
D                    
D HTTPDATE     S   200 A     INZ
D DATETYPE     S   2 S 0   INZ
D                    
D DATETIME     S     Z     INZ
D DATETIME2     S     Z     INZ
D DATETIME3     S     Z     INZ
D DATETIME4     S     Z     INZ
D DATETIME5     S     Z     INZ
D DATETIME6     S     Z     INZ
D DATETIME7     S     Z     INZ
D DATETIMEEDT     S     Z     INZ
D                    
D GESTERN     S     D     INZ DATFMT(*EUR)
D HEUTE     S     D     INZ DATFMT(*EUR)
D MORGEN     S     D     INZ DATFMT(*EUR)
D DATUM     S     D     INZ DATFMT(*EUR)
D ZEIT     S     T     INZ TIMFMT(*HMS)
D                    
D DATUM2     S   20 A     INZ
D ZEIT2     S   20 A     INZ
D                    
D NOHEUTE     S   1 A     INZ
D NOZEIT     S   1 A     INZ
D                    
D SRCDAT2     S           INZ LIKE(SRCDAT)
D                    
D SRC1     S   64 A     INZ
D SRC2     S           INZ LIKE(SRC1)
D SRCLEN     C           CONST(%SIZE(SRC1))
D                    
D SRCCHAR     DS            
D SRCNUM         3 U 0   INZ OVERLAY(SRCCHAR)
D                    
D STR2A     DS            
D NUM5U         5 U 0   INZ OVERLAY(STR2A)
D                    
D SMCHAR     DS            
D SMNUM         3 U 0   INZ OVERLAY(SMCHAR)
D                    
D IDX     S   10 I 0   INZ
D SMILYAB     S           INZ LIKE(POS)
D SMILYANZ     S           INZ LIKE(IDX)
D SMILYBUF     S           INZ LIKE(SMTITEL)
D SMILY$IDX     S   3 S 0   INZ
D                    
D SYDS     DS           INZ OCCURS(MAXSMILYS)
D SYTITEL                 INZ LIKE(SMTITEL)
D SYTITEL2         2 A      OVERLAY(SYTITEL)
D SYNAV                 INZ LIKE(SMNAV)
D SYFILEX                 INZ LIKE(SMFILEX)
D SYLEN                 INZ LIKE(LEN)
D SYEXIST         1 A     INZ
D                    
D SMILY$     DS           INZ OCCURS(256)
D SMILY$1                 INZ LIKE(SMILYANZ)
D SMILY$N                 INZ LIKE(SMILYANZ)
D                    
D HTTPDATEX     PR           EXTPGM('HTTPDATE')
D HTTPDATEX                 LIKE(HTTPDATE)
D DATETIMEX                 LIKE(DATETIME)
D DATETYPEX                 LIKE(DATETYPE) CONST
D                    
D UTF8X     PR           EXTPGM('UTF8')
D BUFTEXT         32767 A      
D BUFTEXTLEN         10 I 0   CONST
D BUFLEN         10 I 0    
D TYPE1         1 A     CONST
D TYPE2         1 A     CONST
D                    
D DATEDS     DS           INZ
D DATE1         1 A     INZ
D DATE2         1 A     INZ
D DATE3         1 A     INZ
D DATE4         1 A     INZ
D           6 A     INZ
D                    
D DATEDMY     DS           INZ
D DATEDDS         3 A     INZ
D DATEMMS         3 A     INZ
D DATEYYS         4 A     INZ
D                    
D DATE8     S   8 A     INZ
D DATE10     S   10 A     INZ
D DATEDX     S     D     INZ

824 ms | Contact | Information | Aibo-Bar © 2005-2024