1*e1f63238SAndrew Rist /************************************************************** 2cdf0e10cSrcweir * 3*e1f63238SAndrew Rist * Licensed to the Apache Software Foundation (ASF) under one 4*e1f63238SAndrew Rist * or more contributor license agreements. See the NOTICE file 5*e1f63238SAndrew Rist * distributed with this work for additional information 6*e1f63238SAndrew Rist * regarding copyright ownership. The ASF licenses this file 7*e1f63238SAndrew Rist * to you under the Apache License, Version 2.0 (the 8*e1f63238SAndrew Rist * "License"); you may not use this file except in compliance 9*e1f63238SAndrew Rist * with the License. You may obtain a copy of the License at 10*e1f63238SAndrew Rist * 11*e1f63238SAndrew Rist * http://www.apache.org/licenses/LICENSE-2.0 12*e1f63238SAndrew Rist * 13*e1f63238SAndrew Rist * Unless required by applicable law or agreed to in writing, 14*e1f63238SAndrew Rist * software distributed under the License is distributed on an 15*e1f63238SAndrew Rist * "AS IS" BASIS, WITHOUT WARRANTIES OR CONDITIONS OF ANY 16*e1f63238SAndrew Rist * KIND, either express or implied. See the License for the 17*e1f63238SAndrew Rist * specific language governing permissions and limitations 18*e1f63238SAndrew Rist * under the License. 19*e1f63238SAndrew Rist * 20*e1f63238SAndrew Rist *************************************************************/ 21*e1f63238SAndrew Rist 22*e1f63238SAndrew Rist 23cdf0e10cSrcweir 24cdf0e10cSrcweir // MARKER(update_precomp.py): autogen include statement, do not remove 25cdf0e10cSrcweir #include "precompiled_basic.hxx" 26cdf0e10cSrcweir 27cdf0e10cSrcweir #include "runtime.hxx" 28cdf0e10cSrcweir #include "stdobj.hxx" 29cdf0e10cSrcweir #include "rtlproto.hxx" 30cdf0e10cSrcweir #include "errobject.hxx" 31cdf0e10cSrcweir 32cdf0e10cSrcweir 33cdf0e10cSrcweir // Properties und Methoden legen beim Get (bWrite = sal_False) den Returnwert 34cdf0e10cSrcweir // im Element 0 des Argv ab; beim Put (bWrite = sal_True) wird der Wert aus 35cdf0e10cSrcweir // Element 0 gespeichert. 36cdf0e10cSrcweir RTLFUNC(Erl)37cdf0e10cSrcweirRTLFUNC(Erl) 38cdf0e10cSrcweir { 39cdf0e10cSrcweir (void)pBasic; 40cdf0e10cSrcweir (void)bWrite; 41cdf0e10cSrcweir 42cdf0e10cSrcweir rPar.Get( 0 )->PutLong( StarBASIC::GetErl() ); 43cdf0e10cSrcweir } 44cdf0e10cSrcweir RTLFUNC(Err)45cdf0e10cSrcweirRTLFUNC(Err) 46cdf0e10cSrcweir { 47cdf0e10cSrcweir (void)pBasic; 48cdf0e10cSrcweir (void)bWrite; 49cdf0e10cSrcweir 50cdf0e10cSrcweir if( SbiRuntime::isVBAEnabled() ) 51cdf0e10cSrcweir { 52cdf0e10cSrcweir rPar.Get( 0 )->PutObject( SbxErrObject::getErrObject() ); 53cdf0e10cSrcweir } 54cdf0e10cSrcweir else 55cdf0e10cSrcweir { 56cdf0e10cSrcweir if( bWrite ) 57cdf0e10cSrcweir { 58cdf0e10cSrcweir sal_Int32 nVal = rPar.Get( 0 )->GetLong(); 59cdf0e10cSrcweir if( nVal <= 65535L ) 60cdf0e10cSrcweir StarBASIC::Error( StarBASIC::GetSfxFromVBError( (sal_uInt16) nVal ) ); 61cdf0e10cSrcweir } 62cdf0e10cSrcweir else 63cdf0e10cSrcweir rPar.Get( 0 )->PutLong( StarBASIC::GetVBErrorCode( StarBASIC::GetErrBasic() ) ); 64cdf0e10cSrcweir } 65cdf0e10cSrcweir } 66cdf0e10cSrcweir RTLFUNC(False)67cdf0e10cSrcweirRTLFUNC(False) 68cdf0e10cSrcweir { 69cdf0e10cSrcweir (void)pBasic; 70cdf0e10cSrcweir (void)bWrite; 71cdf0e10cSrcweir 72cdf0e10cSrcweir rPar.Get(0)->PutBool( sal_False ); 73cdf0e10cSrcweir } 74cdf0e10cSrcweir RTLFUNC(Empty)75cdf0e10cSrcweirRTLFUNC(Empty) 76cdf0e10cSrcweir { 77cdf0e10cSrcweir (void)pBasic; 78cdf0e10cSrcweir (void)bWrite; 79cdf0e10cSrcweir (void)rPar; 80cdf0e10cSrcweir } 81cdf0e10cSrcweir RTLFUNC(Nothing)82cdf0e10cSrcweirRTLFUNC(Nothing) 83cdf0e10cSrcweir { 84cdf0e10cSrcweir (void)pBasic; 85cdf0e10cSrcweir (void)bWrite; 86cdf0e10cSrcweir 87cdf0e10cSrcweir // liefert eine leere Objekt-Variable. 88cdf0e10cSrcweir rPar.Get( 0 )->PutObject( NULL ); 89cdf0e10cSrcweir } 90cdf0e10cSrcweir RTLFUNC(Null)91cdf0e10cSrcweirRTLFUNC(Null) 92cdf0e10cSrcweir { 93cdf0e10cSrcweir (void)pBasic; 94cdf0e10cSrcweir (void)bWrite; 95cdf0e10cSrcweir 96cdf0e10cSrcweir // liefert eine leere Objekt-Variable. 97cdf0e10cSrcweir rPar.Get( 0 )->PutNull(); 98cdf0e10cSrcweir } 99cdf0e10cSrcweir RTLFUNC(PI)100cdf0e10cSrcweirRTLFUNC(PI) 101cdf0e10cSrcweir { 102cdf0e10cSrcweir (void)pBasic; 103cdf0e10cSrcweir (void)bWrite; 104cdf0e10cSrcweir 105cdf0e10cSrcweir rPar.Get( 0 )->PutDouble( F_PI ); 106cdf0e10cSrcweir } 107cdf0e10cSrcweir RTLFUNC(True)108cdf0e10cSrcweirRTLFUNC(True) 109cdf0e10cSrcweir { 110cdf0e10cSrcweir (void)pBasic; 111cdf0e10cSrcweir (void)bWrite; 112cdf0e10cSrcweir 113cdf0e10cSrcweir rPar.Get( 0 )->PutBool( sal_True ); 114cdf0e10cSrcweir } 115cdf0e10cSrcweir RTLFUNC(ATTR_NORMAL)116cdf0e10cSrcweirRTLFUNC(ATTR_NORMAL) 117cdf0e10cSrcweir { 118cdf0e10cSrcweir (void)pBasic; 119cdf0e10cSrcweir (void)bWrite; 120cdf0e10cSrcweir 121cdf0e10cSrcweir rPar.Get(0)->PutInteger(0); 122cdf0e10cSrcweir } RTLFUNC(ATTR_READONLY)123cdf0e10cSrcweirRTLFUNC(ATTR_READONLY) 124cdf0e10cSrcweir { 125cdf0e10cSrcweir (void)pBasic; 126cdf0e10cSrcweir (void)bWrite; 127cdf0e10cSrcweir 128cdf0e10cSrcweir rPar.Get(0)->PutInteger(1); 129cdf0e10cSrcweir } RTLFUNC(ATTR_HIDDEN)130cdf0e10cSrcweirRTLFUNC(ATTR_HIDDEN) 131cdf0e10cSrcweir { 132cdf0e10cSrcweir (void)pBasic; 133cdf0e10cSrcweir (void)bWrite; 134cdf0e10cSrcweir 135cdf0e10cSrcweir rPar.Get(0)->PutInteger(2); 136cdf0e10cSrcweir } RTLFUNC(ATTR_SYSTEM)137cdf0e10cSrcweirRTLFUNC(ATTR_SYSTEM) 138cdf0e10cSrcweir { 139cdf0e10cSrcweir (void)pBasic; 140cdf0e10cSrcweir (void)bWrite; 141cdf0e10cSrcweir 142cdf0e10cSrcweir rPar.Get(0)->PutInteger(4); 143cdf0e10cSrcweir } RTLFUNC(ATTR_VOLUME)144cdf0e10cSrcweirRTLFUNC(ATTR_VOLUME) 145cdf0e10cSrcweir { 146cdf0e10cSrcweir (void)pBasic; 147cdf0e10cSrcweir (void)bWrite; 148cdf0e10cSrcweir 149cdf0e10cSrcweir rPar.Get(0)->PutInteger(8); 150cdf0e10cSrcweir } RTLFUNC(ATTR_DIRECTORY)151cdf0e10cSrcweirRTLFUNC(ATTR_DIRECTORY) 152cdf0e10cSrcweir { 153cdf0e10cSrcweir (void)pBasic; 154cdf0e10cSrcweir (void)bWrite; 155cdf0e10cSrcweir 156cdf0e10cSrcweir rPar.Get(0)->PutInteger(16); 157cdf0e10cSrcweir } RTLFUNC(ATTR_ARCHIVE)158cdf0e10cSrcweirRTLFUNC(ATTR_ARCHIVE) 159cdf0e10cSrcweir { 160cdf0e10cSrcweir (void)pBasic; 161cdf0e10cSrcweir (void)bWrite; 162cdf0e10cSrcweir 163cdf0e10cSrcweir rPar.Get(0)->PutInteger(32); 164cdf0e10cSrcweir } 165cdf0e10cSrcweir RTLFUNC(V_EMPTY)166cdf0e10cSrcweirRTLFUNC(V_EMPTY) 167cdf0e10cSrcweir { 168cdf0e10cSrcweir (void)pBasic; 169cdf0e10cSrcweir (void)bWrite; 170cdf0e10cSrcweir 171cdf0e10cSrcweir rPar.Get(0)->PutInteger(0); 172cdf0e10cSrcweir } RTLFUNC(V_NULL)173cdf0e10cSrcweirRTLFUNC(V_NULL) 174cdf0e10cSrcweir { 175cdf0e10cSrcweir (void)pBasic; 176cdf0e10cSrcweir (void)bWrite; 177cdf0e10cSrcweir 178cdf0e10cSrcweir rPar.Get(0)->PutInteger(1); 179cdf0e10cSrcweir } RTLFUNC(V_INTEGER)180cdf0e10cSrcweirRTLFUNC(V_INTEGER) 181cdf0e10cSrcweir { 182cdf0e10cSrcweir (void)pBasic; 183cdf0e10cSrcweir (void)bWrite; 184cdf0e10cSrcweir 185cdf0e10cSrcweir rPar.Get(0)->PutInteger(2); 186cdf0e10cSrcweir } RTLFUNC(V_LONG)187cdf0e10cSrcweirRTLFUNC(V_LONG) 188cdf0e10cSrcweir { 189cdf0e10cSrcweir (void)pBasic; 190cdf0e10cSrcweir (void)bWrite; 191cdf0e10cSrcweir 192cdf0e10cSrcweir rPar.Get(0)->PutInteger(3); 193cdf0e10cSrcweir } RTLFUNC(V_SINGLE)194cdf0e10cSrcweirRTLFUNC(V_SINGLE) 195cdf0e10cSrcweir { 196cdf0e10cSrcweir (void)pBasic; 197cdf0e10cSrcweir (void)bWrite; 198cdf0e10cSrcweir 199cdf0e10cSrcweir rPar.Get(0)->PutInteger(4); 200cdf0e10cSrcweir } RTLFUNC(V_DOUBLE)201cdf0e10cSrcweirRTLFUNC(V_DOUBLE) 202cdf0e10cSrcweir { 203cdf0e10cSrcweir (void)pBasic; 204cdf0e10cSrcweir (void)bWrite; 205cdf0e10cSrcweir 206cdf0e10cSrcweir rPar.Get(0)->PutInteger(5); 207cdf0e10cSrcweir } RTLFUNC(V_CURRENCY)208cdf0e10cSrcweirRTLFUNC(V_CURRENCY) 209cdf0e10cSrcweir { 210cdf0e10cSrcweir (void)pBasic; 211cdf0e10cSrcweir (void)bWrite; 212cdf0e10cSrcweir 213cdf0e10cSrcweir rPar.Get(0)->PutInteger(6); 214cdf0e10cSrcweir } RTLFUNC(V_DATE)215cdf0e10cSrcweirRTLFUNC(V_DATE) 216cdf0e10cSrcweir { 217cdf0e10cSrcweir (void)pBasic; 218cdf0e10cSrcweir (void)bWrite; 219cdf0e10cSrcweir 220cdf0e10cSrcweir rPar.Get(0)->PutInteger(7); 221cdf0e10cSrcweir } RTLFUNC(V_STRING)222cdf0e10cSrcweirRTLFUNC(V_STRING) 223cdf0e10cSrcweir { 224cdf0e10cSrcweir (void)pBasic; 225cdf0e10cSrcweir (void)bWrite; 226cdf0e10cSrcweir 227cdf0e10cSrcweir rPar.Get(0)->PutInteger(8); 228cdf0e10cSrcweir } 229cdf0e10cSrcweir RTLFUNC(MB_OK)230cdf0e10cSrcweirRTLFUNC(MB_OK) 231cdf0e10cSrcweir { 232cdf0e10cSrcweir (void)pBasic; 233cdf0e10cSrcweir (void)bWrite; 234cdf0e10cSrcweir 235cdf0e10cSrcweir rPar.Get(0)->PutInteger(0); 236cdf0e10cSrcweir } RTLFUNC(MB_OKCANCEL)237cdf0e10cSrcweirRTLFUNC(MB_OKCANCEL) 238cdf0e10cSrcweir { 239cdf0e10cSrcweir (void)pBasic; 240cdf0e10cSrcweir (void)bWrite; 241cdf0e10cSrcweir 242cdf0e10cSrcweir rPar.Get(0)->PutInteger(1); 243cdf0e10cSrcweir } RTLFUNC(MB_ABORTRETRYIGNORE)244cdf0e10cSrcweirRTLFUNC(MB_ABORTRETRYIGNORE) 245cdf0e10cSrcweir { 246cdf0e10cSrcweir (void)pBasic; 247cdf0e10cSrcweir (void)bWrite; 248cdf0e10cSrcweir 249cdf0e10cSrcweir rPar.Get(0)->PutInteger(2); 250cdf0e10cSrcweir } RTLFUNC(MB_YESNOCANCEL)251cdf0e10cSrcweirRTLFUNC(MB_YESNOCANCEL) 252cdf0e10cSrcweir { 253cdf0e10cSrcweir (void)pBasic; 254cdf0e10cSrcweir (void)bWrite; 255cdf0e10cSrcweir 256cdf0e10cSrcweir rPar.Get(0)->PutInteger(3); 257cdf0e10cSrcweir } RTLFUNC(MB_YESNO)258cdf0e10cSrcweirRTLFUNC(MB_YESNO) 259cdf0e10cSrcweir { 260cdf0e10cSrcweir (void)pBasic; 261cdf0e10cSrcweir (void)bWrite; 262cdf0e10cSrcweir 263cdf0e10cSrcweir rPar.Get(0)->PutInteger(4); 264cdf0e10cSrcweir } RTLFUNC(MB_RETRYCANCEL)265cdf0e10cSrcweirRTLFUNC(MB_RETRYCANCEL) 266cdf0e10cSrcweir { 267cdf0e10cSrcweir (void)pBasic; 268cdf0e10cSrcweir (void)bWrite; 269cdf0e10cSrcweir 270cdf0e10cSrcweir rPar.Get(0)->PutInteger(5); 271cdf0e10cSrcweir } RTLFUNC(MB_ICONSTOP)272cdf0e10cSrcweirRTLFUNC(MB_ICONSTOP) 273cdf0e10cSrcweir { 274cdf0e10cSrcweir (void)pBasic; 275cdf0e10cSrcweir (void)bWrite; 276cdf0e10cSrcweir 277cdf0e10cSrcweir rPar.Get(0)->PutInteger(16); 278cdf0e10cSrcweir } RTLFUNC(MB_ICONQUESTION)279cdf0e10cSrcweirRTLFUNC(MB_ICONQUESTION) 280cdf0e10cSrcweir { 281cdf0e10cSrcweir (void)pBasic; 282cdf0e10cSrcweir (void)bWrite; 283cdf0e10cSrcweir 284cdf0e10cSrcweir rPar.Get(0)->PutInteger(32); 285cdf0e10cSrcweir } RTLFUNC(MB_ICONEXCLAMATION)286cdf0e10cSrcweirRTLFUNC(MB_ICONEXCLAMATION) 287cdf0e10cSrcweir { 288cdf0e10cSrcweir (void)pBasic; 289cdf0e10cSrcweir (void)bWrite; 290cdf0e10cSrcweir 291cdf0e10cSrcweir rPar.Get(0)->PutInteger(48); 292cdf0e10cSrcweir } RTLFUNC(MB_ICONINFORMATION)293cdf0e10cSrcweirRTLFUNC(MB_ICONINFORMATION) 294cdf0e10cSrcweir { 295cdf0e10cSrcweir (void)pBasic; 296cdf0e10cSrcweir (void)bWrite; 297cdf0e10cSrcweir 298cdf0e10cSrcweir rPar.Get(0)->PutInteger(64); 299cdf0e10cSrcweir } RTLFUNC(MB_DEFBUTTON1)300cdf0e10cSrcweirRTLFUNC(MB_DEFBUTTON1) 301cdf0e10cSrcweir { 302cdf0e10cSrcweir (void)pBasic; 303cdf0e10cSrcweir (void)bWrite; 304cdf0e10cSrcweir 305cdf0e10cSrcweir rPar.Get(0)->PutInteger(0); 306cdf0e10cSrcweir } RTLFUNC(MB_DEFBUTTON2)307cdf0e10cSrcweirRTLFUNC(MB_DEFBUTTON2) 308cdf0e10cSrcweir { 309cdf0e10cSrcweir (void)pBasic; 310cdf0e10cSrcweir (void)bWrite; 311cdf0e10cSrcweir 312cdf0e10cSrcweir rPar.Get(0)->PutInteger(256); 313cdf0e10cSrcweir } RTLFUNC(MB_DEFBUTTON3)314cdf0e10cSrcweirRTLFUNC(MB_DEFBUTTON3) 315cdf0e10cSrcweir { 316cdf0e10cSrcweir (void)pBasic; 317cdf0e10cSrcweir (void)bWrite; 318cdf0e10cSrcweir 319cdf0e10cSrcweir rPar.Get(0)->PutInteger(512); 320cdf0e10cSrcweir } RTLFUNC(MB_APPLMODAL)321cdf0e10cSrcweirRTLFUNC(MB_APPLMODAL) 322cdf0e10cSrcweir { 323cdf0e10cSrcweir (void)pBasic; 324cdf0e10cSrcweir (void)bWrite; 325cdf0e10cSrcweir 326cdf0e10cSrcweir rPar.Get(0)->PutInteger(0); 327cdf0e10cSrcweir } RTLFUNC(MB_SYSTEMMODAL)328cdf0e10cSrcweirRTLFUNC(MB_SYSTEMMODAL) 329cdf0e10cSrcweir { 330cdf0e10cSrcweir (void)pBasic; 331cdf0e10cSrcweir (void)bWrite; 332cdf0e10cSrcweir 333cdf0e10cSrcweir rPar.Get(0)->PutInteger(4096); 334cdf0e10cSrcweir } 335cdf0e10cSrcweir RTLFUNC(IDOK)336cdf0e10cSrcweirRTLFUNC(IDOK) 337cdf0e10cSrcweir { 338cdf0e10cSrcweir (void)pBasic; 339cdf0e10cSrcweir (void)bWrite; 340cdf0e10cSrcweir 341cdf0e10cSrcweir rPar.Get(0)->PutInteger(1); 342cdf0e10cSrcweir } 343cdf0e10cSrcweir RTLFUNC(IDCANCEL)344cdf0e10cSrcweirRTLFUNC(IDCANCEL) 345cdf0e10cSrcweir { 346cdf0e10cSrcweir (void)pBasic; 347cdf0e10cSrcweir (void)bWrite; 348cdf0e10cSrcweir 349cdf0e10cSrcweir rPar.Get(0)->PutInteger(2); 350cdf0e10cSrcweir } RTLFUNC(IDABORT)351cdf0e10cSrcweirRTLFUNC(IDABORT) 352cdf0e10cSrcweir { 353cdf0e10cSrcweir (void)pBasic; 354cdf0e10cSrcweir (void)bWrite; 355cdf0e10cSrcweir 356cdf0e10cSrcweir rPar.Get(0)->PutInteger(3); 357cdf0e10cSrcweir } RTLFUNC(IDRETRY)358cdf0e10cSrcweirRTLFUNC(IDRETRY) 359cdf0e10cSrcweir { 360cdf0e10cSrcweir (void)pBasic; 361cdf0e10cSrcweir (void)bWrite; 362cdf0e10cSrcweir 363cdf0e10cSrcweir rPar.Get(0)->PutInteger(4); 364cdf0e10cSrcweir } RTLFUNC(IDYES)365cdf0e10cSrcweirRTLFUNC(IDYES) 366cdf0e10cSrcweir { 367cdf0e10cSrcweir (void)pBasic; 368cdf0e10cSrcweir (void)bWrite; 369cdf0e10cSrcweir 370cdf0e10cSrcweir rPar.Get(0)->PutInteger(6); 371cdf0e10cSrcweir } RTLFUNC(IDNO)372cdf0e10cSrcweirRTLFUNC(IDNO) 373cdf0e10cSrcweir { 374cdf0e10cSrcweir (void)pBasic; 375cdf0e10cSrcweir (void)bWrite; 376cdf0e10cSrcweir 377cdf0e10cSrcweir rPar.Get(0)->PutInteger(7); 378cdf0e10cSrcweir } 379cdf0e10cSrcweir RTLFUNC(CF_TEXT)380cdf0e10cSrcweirRTLFUNC(CF_TEXT) 381cdf0e10cSrcweir { 382cdf0e10cSrcweir (void)pBasic; 383cdf0e10cSrcweir (void)bWrite; 384cdf0e10cSrcweir 385cdf0e10cSrcweir rPar.Get(0)->PutInteger(1); 386cdf0e10cSrcweir } RTLFUNC(CF_BITMAP)387cdf0e10cSrcweirRTLFUNC(CF_BITMAP) 388cdf0e10cSrcweir { 389cdf0e10cSrcweir (void)pBasic; 390cdf0e10cSrcweir (void)bWrite; 391cdf0e10cSrcweir 392cdf0e10cSrcweir rPar.Get(0)->PutInteger(2); 393cdf0e10cSrcweir } RTLFUNC(CF_METAFILEPICT)394cdf0e10cSrcweirRTLFUNC(CF_METAFILEPICT) 395cdf0e10cSrcweir { 396cdf0e10cSrcweir (void)pBasic; 397cdf0e10cSrcweir (void)bWrite; 398cdf0e10cSrcweir 399cdf0e10cSrcweir rPar.Get(0)->PutInteger(3); 400cdf0e10cSrcweir } 401cdf0e10cSrcweir RTLFUNC(TYP_AUTHORFLD)402cdf0e10cSrcweirRTLFUNC(TYP_AUTHORFLD) 403cdf0e10cSrcweir { 404cdf0e10cSrcweir (void)pBasic; 405cdf0e10cSrcweir (void)bWrite; 406cdf0e10cSrcweir 407cdf0e10cSrcweir rPar.Get(0)->PutInteger(7); 408cdf0e10cSrcweir } RTLFUNC(TYP_CHAPTERFLD)409cdf0e10cSrcweirRTLFUNC(TYP_CHAPTERFLD) 410cdf0e10cSrcweir { 411cdf0e10cSrcweir (void)pBasic; 412cdf0e10cSrcweir (void)bWrite; 413cdf0e10cSrcweir 414cdf0e10cSrcweir rPar.Get(0)->PutInteger(4); 415cdf0e10cSrcweir } RTLFUNC(TYP_CONDTXTFLD)416cdf0e10cSrcweirRTLFUNC(TYP_CONDTXTFLD) 417cdf0e10cSrcweir { 418cdf0e10cSrcweir (void)pBasic; 419cdf0e10cSrcweir (void)bWrite; 420cdf0e10cSrcweir 421cdf0e10cSrcweir rPar.Get(0)->PutInteger(27); 422cdf0e10cSrcweir } RTLFUNC(TYP_DATEFLD)423cdf0e10cSrcweirRTLFUNC(TYP_DATEFLD) 424cdf0e10cSrcweir { 425cdf0e10cSrcweir (void)pBasic; 426cdf0e10cSrcweir (void)bWrite; 427cdf0e10cSrcweir 428cdf0e10cSrcweir rPar.Get(0)->PutInteger(0); 429cdf0e10cSrcweir } RTLFUNC(TYP_DBFLD)430cdf0e10cSrcweirRTLFUNC(TYP_DBFLD) 431cdf0e10cSrcweir { 432cdf0e10cSrcweir (void)pBasic; 433cdf0e10cSrcweir (void)bWrite; 434cdf0e10cSrcweir 435cdf0e10cSrcweir rPar.Get(0)->PutInteger(19); 436cdf0e10cSrcweir } RTLFUNC(TYP_DBNAMEFLD)437cdf0e10cSrcweirRTLFUNC(TYP_DBNAMEFLD) 438cdf0e10cSrcweir { 439cdf0e10cSrcweir (void)pBasic; 440cdf0e10cSrcweir (void)bWrite; 441cdf0e10cSrcweir 442cdf0e10cSrcweir rPar.Get(0)->PutInteger(3); 443cdf0e10cSrcweir } RTLFUNC(TYP_DBNEXTSETFLD)444cdf0e10cSrcweirRTLFUNC(TYP_DBNEXTSETFLD) 445cdf0e10cSrcweir { 446cdf0e10cSrcweir (void)pBasic; 447cdf0e10cSrcweir (void)bWrite; 448cdf0e10cSrcweir 449cdf0e10cSrcweir rPar.Get(0)->PutInteger(24); 450cdf0e10cSrcweir } RTLFUNC(TYP_DBNUMSETFLD)451cdf0e10cSrcweirRTLFUNC(TYP_DBNUMSETFLD) 452cdf0e10cSrcweir { 453cdf0e10cSrcweir (void)pBasic; 454cdf0e10cSrcweir (void)bWrite; 455cdf0e10cSrcweir 456cdf0e10cSrcweir rPar.Get(0)->PutInteger(25); 457cdf0e10cSrcweir } RTLFUNC(TYP_DBSETNUMBERFLD)458cdf0e10cSrcweirRTLFUNC(TYP_DBSETNUMBERFLD) 459cdf0e10cSrcweir { 460cdf0e10cSrcweir (void)pBasic; 461cdf0e10cSrcweir (void)bWrite; 462cdf0e10cSrcweir 463cdf0e10cSrcweir rPar.Get(0)->PutInteger(26); 464cdf0e10cSrcweir } RTLFUNC(TYP_DDEFLD)465cdf0e10cSrcweirRTLFUNC(TYP_DDEFLD) 466cdf0e10cSrcweir { 467cdf0e10cSrcweir (void)pBasic; 468cdf0e10cSrcweir (void)bWrite; 469cdf0e10cSrcweir 470cdf0e10cSrcweir rPar.Get(0)->PutInteger(14); 471cdf0e10cSrcweir } RTLFUNC(TYP_DOCINFOFLD)472cdf0e10cSrcweirRTLFUNC(TYP_DOCINFOFLD) 473cdf0e10cSrcweir { 474cdf0e10cSrcweir (void)pBasic; 475cdf0e10cSrcweir (void)bWrite; 476cdf0e10cSrcweir 477cdf0e10cSrcweir rPar.Get(0)->PutInteger(18); 478cdf0e10cSrcweir } RTLFUNC(TYP_DOCSTATFLD)479cdf0e10cSrcweirRTLFUNC(TYP_DOCSTATFLD) 480cdf0e10cSrcweir { 481cdf0e10cSrcweir (void)pBasic; 482cdf0e10cSrcweir (void)bWrite; 483cdf0e10cSrcweir 484cdf0e10cSrcweir rPar.Get(0)->PutInteger(6); 485cdf0e10cSrcweir } RTLFUNC(TYP_EXTUSERFLD)486cdf0e10cSrcweirRTLFUNC(TYP_EXTUSERFLD) 487cdf0e10cSrcweir { 488cdf0e10cSrcweir (void)pBasic; 489cdf0e10cSrcweir (void)bWrite; 490cdf0e10cSrcweir 491cdf0e10cSrcweir rPar.Get(0)->PutInteger(30); 492cdf0e10cSrcweir } RTLFUNC(TYP_FILENAMEFLD)493cdf0e10cSrcweirRTLFUNC(TYP_FILENAMEFLD) 494cdf0e10cSrcweir { 495cdf0e10cSrcweir (void)pBasic; 496cdf0e10cSrcweir (void)bWrite; 497cdf0e10cSrcweir 498cdf0e10cSrcweir rPar.Get(0)->PutInteger(2); 499cdf0e10cSrcweir } RTLFUNC(TYP_FIXDATEFLD)500cdf0e10cSrcweirRTLFUNC(TYP_FIXDATEFLD) 501cdf0e10cSrcweir { 502cdf0e10cSrcweir (void)pBasic; 503cdf0e10cSrcweir (void)bWrite; 504cdf0e10cSrcweir 505cdf0e10cSrcweir rPar.Get(0)->PutInteger(31); 506cdf0e10cSrcweir } RTLFUNC(TYP_FIXTIMEFLD)507cdf0e10cSrcweirRTLFUNC(TYP_FIXTIMEFLD) 508cdf0e10cSrcweir { 509cdf0e10cSrcweir (void)pBasic; 510cdf0e10cSrcweir (void)bWrite; 511cdf0e10cSrcweir 512cdf0e10cSrcweir rPar.Get(0)->PutInteger(32); 513cdf0e10cSrcweir } RTLFUNC(TYP_FORMELFLD)514cdf0e10cSrcweirRTLFUNC(TYP_FORMELFLD) 515cdf0e10cSrcweir { 516cdf0e10cSrcweir (void)pBasic; 517cdf0e10cSrcweir (void)bWrite; 518cdf0e10cSrcweir 519cdf0e10cSrcweir rPar.Get(0)->PutInteger(10); 520cdf0e10cSrcweir } RTLFUNC(TYP_GETFLD)521cdf0e10cSrcweirRTLFUNC(TYP_GETFLD) 522cdf0e10cSrcweir { 523cdf0e10cSrcweir (void)pBasic; 524cdf0e10cSrcweir (void)bWrite; 525cdf0e10cSrcweir 526cdf0e10cSrcweir rPar.Get(0)->PutInteger(9); 527cdf0e10cSrcweir } RTLFUNC(TYP_GETREFFLD)528cdf0e10cSrcweirRTLFUNC(TYP_GETREFFLD) 529cdf0e10cSrcweir { 530cdf0e10cSrcweir (void)pBasic; 531cdf0e10cSrcweir (void)bWrite; 532cdf0e10cSrcweir 533cdf0e10cSrcweir rPar.Get(0)->PutInteger(13); 534cdf0e10cSrcweir } RTLFUNC(TYP_HIDDENPARAFLD)535cdf0e10cSrcweirRTLFUNC(TYP_HIDDENPARAFLD) 536cdf0e10cSrcweir { 537cdf0e10cSrcweir (void)pBasic; 538cdf0e10cSrcweir (void)bWrite; 539cdf0e10cSrcweir 540cdf0e10cSrcweir rPar.Get(0)->PutInteger(17); 541cdf0e10cSrcweir } RTLFUNC(TYP_HIDDENTXTFLD)542cdf0e10cSrcweirRTLFUNC(TYP_HIDDENTXTFLD) 543cdf0e10cSrcweir { 544cdf0e10cSrcweir (void)pBasic; 545cdf0e10cSrcweir (void)bWrite; 546cdf0e10cSrcweir 547cdf0e10cSrcweir rPar.Get(0)->PutInteger(11); 548cdf0e10cSrcweir } RTLFUNC(TYP_INPUTFLD)549cdf0e10cSrcweirRTLFUNC(TYP_INPUTFLD) 550cdf0e10cSrcweir { 551cdf0e10cSrcweir (void)pBasic; 552cdf0e10cSrcweir (void)bWrite; 553cdf0e10cSrcweir 554cdf0e10cSrcweir rPar.Get(0)->PutInteger(16); 555cdf0e10cSrcweir } RTLFUNC(TYP_MACROFLD)556cdf0e10cSrcweirRTLFUNC(TYP_MACROFLD) 557cdf0e10cSrcweir { 558cdf0e10cSrcweir (void)pBasic; 559cdf0e10cSrcweir (void)bWrite; 560cdf0e10cSrcweir 561cdf0e10cSrcweir rPar.Get(0)->PutInteger(15); 562cdf0e10cSrcweir } RTLFUNC(TYP_NEXTPAGEFLD)563cdf0e10cSrcweirRTLFUNC(TYP_NEXTPAGEFLD) 564cdf0e10cSrcweir { 565cdf0e10cSrcweir (void)pBasic; 566cdf0e10cSrcweir (void)bWrite; 567cdf0e10cSrcweir 568cdf0e10cSrcweir rPar.Get(0)->PutInteger(28); 569cdf0e10cSrcweir } RTLFUNC(TYP_PAGENUMBERFLD)570cdf0e10cSrcweirRTLFUNC(TYP_PAGENUMBERFLD) 571cdf0e10cSrcweir { 572cdf0e10cSrcweir (void)pBasic; 573cdf0e10cSrcweir (void)bWrite; 574cdf0e10cSrcweir 575cdf0e10cSrcweir rPar.Get(0)->PutInteger(5); 576cdf0e10cSrcweir } RTLFUNC(TYP_POSTITFLD)577cdf0e10cSrcweirRTLFUNC(TYP_POSTITFLD) 578cdf0e10cSrcweir { 579cdf0e10cSrcweir (void)pBasic; 580cdf0e10cSrcweir (void)bWrite; 581cdf0e10cSrcweir 582cdf0e10cSrcweir rPar.Get(0)->PutInteger(21); 583cdf0e10cSrcweir } RTLFUNC(TYP_PREVPAGEFLD)584cdf0e10cSrcweirRTLFUNC(TYP_PREVPAGEFLD) 585cdf0e10cSrcweir { 586cdf0e10cSrcweir (void)pBasic; 587cdf0e10cSrcweir (void)bWrite; 588cdf0e10cSrcweir 589cdf0e10cSrcweir rPar.Get(0)->PutInteger(29); 590cdf0e10cSrcweir } RTLFUNC(TYP_SEQFLD)591cdf0e10cSrcweirRTLFUNC(TYP_SEQFLD) 592cdf0e10cSrcweir { 593cdf0e10cSrcweir (void)pBasic; 594cdf0e10cSrcweir (void)bWrite; 595cdf0e10cSrcweir 596cdf0e10cSrcweir rPar.Get(0)->PutInteger(23); 597cdf0e10cSrcweir } RTLFUNC(TYP_SETFLD)598cdf0e10cSrcweirRTLFUNC(TYP_SETFLD) 599cdf0e10cSrcweir { 600cdf0e10cSrcweir (void)pBasic; 601cdf0e10cSrcweir (void)bWrite; 602cdf0e10cSrcweir 603cdf0e10cSrcweir rPar.Get(0)->PutInteger(8); 604cdf0e10cSrcweir } RTLFUNC(TYP_SETINPFLD)605cdf0e10cSrcweirRTLFUNC(TYP_SETINPFLD) 606cdf0e10cSrcweir { 607cdf0e10cSrcweir (void)pBasic; 608cdf0e10cSrcweir (void)bWrite; 609cdf0e10cSrcweir 610cdf0e10cSrcweir rPar.Get(0)->PutInteger(33); 611cdf0e10cSrcweir } RTLFUNC(TYP_SETREFFLD)612cdf0e10cSrcweirRTLFUNC(TYP_SETREFFLD) 613cdf0e10cSrcweir { 614cdf0e10cSrcweir (void)pBasic; 615cdf0e10cSrcweir (void)bWrite; 616cdf0e10cSrcweir 617cdf0e10cSrcweir rPar.Get(0)->PutInteger(12); 618cdf0e10cSrcweir } RTLFUNC(TYP_TEMPLNAMEFLD)619cdf0e10cSrcweirRTLFUNC(TYP_TEMPLNAMEFLD) 620cdf0e10cSrcweir { 621cdf0e10cSrcweir (void)pBasic; 622cdf0e10cSrcweir (void)bWrite; 623cdf0e10cSrcweir 624cdf0e10cSrcweir rPar.Get(0)->PutInteger(22); 625cdf0e10cSrcweir } RTLFUNC(TYP_TIMEFLD)626cdf0e10cSrcweirRTLFUNC(TYP_TIMEFLD) 627cdf0e10cSrcweir { 628cdf0e10cSrcweir (void)pBasic; 629cdf0e10cSrcweir (void)bWrite; 630cdf0e10cSrcweir 631cdf0e10cSrcweir rPar.Get(0)->PutInteger(1); 632cdf0e10cSrcweir } RTLFUNC(TYP_USERFLD)633cdf0e10cSrcweirRTLFUNC(TYP_USERFLD) 634cdf0e10cSrcweir { 635cdf0e10cSrcweir (void)pBasic; 636cdf0e10cSrcweir (void)bWrite; 637cdf0e10cSrcweir 638cdf0e10cSrcweir rPar.Get(0)->PutInteger(20); 639cdf0e10cSrcweir } RTLFUNC(TYP_USRINPFLD)640cdf0e10cSrcweirRTLFUNC(TYP_USRINPFLD) 641cdf0e10cSrcweir { 642cdf0e10cSrcweir (void)pBasic; 643cdf0e10cSrcweir (void)bWrite; 644cdf0e10cSrcweir 645cdf0e10cSrcweir rPar.Get(0)->PutInteger(34); 646cdf0e10cSrcweir } RTLFUNC(TYP_SETREFPAGEFLD)647cdf0e10cSrcweirRTLFUNC(TYP_SETREFPAGEFLD) 648cdf0e10cSrcweir { 649cdf0e10cSrcweir (void)pBasic; 650cdf0e10cSrcweir (void)bWrite; 651cdf0e10cSrcweir 652cdf0e10cSrcweir rPar.Get(0)->PutInteger(35); 653cdf0e10cSrcweir } RTLFUNC(TYP_GETREFPAGEFLD)654cdf0e10cSrcweirRTLFUNC(TYP_GETREFPAGEFLD) 655cdf0e10cSrcweir { 656cdf0e10cSrcweir (void)pBasic; 657cdf0e10cSrcweir (void)bWrite; 658cdf0e10cSrcweir 659cdf0e10cSrcweir rPar.Get(0)->PutInteger(36); 660cdf0e10cSrcweir } RTLFUNC(TYP_INTERNETFLD)661cdf0e10cSrcweirRTLFUNC(TYP_INTERNETFLD) 662cdf0e10cSrcweir { 663cdf0e10cSrcweir (void)pBasic; 664cdf0e10cSrcweir (void)bWrite; 665cdf0e10cSrcweir 666cdf0e10cSrcweir rPar.Get(0)->PutInteger(37); 667cdf0e10cSrcweir } 668cdf0e10cSrcweir RTLFUNC(SET_ON)669cdf0e10cSrcweirRTLFUNC(SET_ON) 670cdf0e10cSrcweir { 671cdf0e10cSrcweir (void)pBasic; 672cdf0e10cSrcweir (void)bWrite; 673cdf0e10cSrcweir 674cdf0e10cSrcweir rPar.Get(0)->PutInteger(1); 675cdf0e10cSrcweir } RTLFUNC(SET_OFF)676cdf0e10cSrcweirRTLFUNC(SET_OFF) 677cdf0e10cSrcweir { 678cdf0e10cSrcweir (void)pBasic; 679cdf0e10cSrcweir (void)bWrite; 680cdf0e10cSrcweir 681cdf0e10cSrcweir rPar.Get(0)->PutInteger(0); 682cdf0e10cSrcweir } RTLFUNC(TOGGLE)683cdf0e10cSrcweirRTLFUNC(TOGGLE) 684cdf0e10cSrcweir { 685cdf0e10cSrcweir (void)pBasic; 686cdf0e10cSrcweir (void)bWrite; 687cdf0e10cSrcweir 688cdf0e10cSrcweir rPar.Get(0)->PutInteger(2); 689cdf0e10cSrcweir } 690cdf0e10cSrcweir RTLFUNC(FRAMEANCHORPAGE)691cdf0e10cSrcweirRTLFUNC(FRAMEANCHORPAGE) 692cdf0e10cSrcweir { 693cdf0e10cSrcweir (void)pBasic; 694cdf0e10cSrcweir (void)bWrite; 695cdf0e10cSrcweir 696cdf0e10cSrcweir rPar.Get(0)->PutInteger(1); 697cdf0e10cSrcweir } RTLFUNC(FRAMEANCHORPARA)698cdf0e10cSrcweirRTLFUNC(FRAMEANCHORPARA) 699cdf0e10cSrcweir { 700cdf0e10cSrcweir (void)pBasic; 701cdf0e10cSrcweir (void)bWrite; 702cdf0e10cSrcweir 703cdf0e10cSrcweir rPar.Get(0)->PutInteger(14); 704cdf0e10cSrcweir } RTLFUNC(FRAMEANCHORCHAR)705cdf0e10cSrcweirRTLFUNC(FRAMEANCHORCHAR) 706cdf0e10cSrcweir { 707cdf0e10cSrcweir (void)pBasic; 708cdf0e10cSrcweir (void)bWrite; 709cdf0e10cSrcweir 710cdf0e10cSrcweir rPar.Get(0)->PutInteger(15); 711cdf0e10cSrcweir } 712cdf0e10cSrcweir RTLFUNC(CLEAR_ALLTABS)713cdf0e10cSrcweirRTLFUNC(CLEAR_ALLTABS) 714cdf0e10cSrcweir { 715cdf0e10cSrcweir (void)pBasic; 716cdf0e10cSrcweir (void)bWrite; 717cdf0e10cSrcweir 718cdf0e10cSrcweir rPar.Get(0)->PutInteger(2); 719cdf0e10cSrcweir } RTLFUNC(CLEAR_TAB)720cdf0e10cSrcweirRTLFUNC(CLEAR_TAB) 721cdf0e10cSrcweir { 722cdf0e10cSrcweir (void)pBasic; 723cdf0e10cSrcweir (void)bWrite; 724cdf0e10cSrcweir 725cdf0e10cSrcweir rPar.Get(0)->PutInteger(1); 726cdf0e10cSrcweir } RTLFUNC(SET_TAB)727cdf0e10cSrcweirRTLFUNC(SET_TAB) 728cdf0e10cSrcweir { 729cdf0e10cSrcweir (void)pBasic; 730cdf0e10cSrcweir (void)bWrite; 731cdf0e10cSrcweir 732cdf0e10cSrcweir rPar.Get(0)->PutInteger(0); 733cdf0e10cSrcweir } 734cdf0e10cSrcweir RTLFUNC(LINEPROP)735cdf0e10cSrcweirRTLFUNC(LINEPROP) 736cdf0e10cSrcweir { 737cdf0e10cSrcweir (void)pBasic; 738cdf0e10cSrcweir (void)bWrite; 739cdf0e10cSrcweir 740cdf0e10cSrcweir rPar.Get(0)->PutInteger(0); 741cdf0e10cSrcweir } RTLFUNC(LINE_1)742cdf0e10cSrcweirRTLFUNC(LINE_1) 743cdf0e10cSrcweir { 744cdf0e10cSrcweir (void)pBasic; 745cdf0e10cSrcweir (void)bWrite; 746cdf0e10cSrcweir 747cdf0e10cSrcweir rPar.Get(0)->PutInteger(1); 748cdf0e10cSrcweir } RTLFUNC(LINE_15)749cdf0e10cSrcweirRTLFUNC(LINE_15) 750cdf0e10cSrcweir { 751cdf0e10cSrcweir (void)pBasic; 752cdf0e10cSrcweir (void)bWrite; 753cdf0e10cSrcweir 754cdf0e10cSrcweir rPar.Get(0)->PutInteger(2); 755cdf0e10cSrcweir } RTLFUNC(LINE_2)756cdf0e10cSrcweirRTLFUNC(LINE_2) 757cdf0e10cSrcweir { 758cdf0e10cSrcweir (void)pBasic; 759cdf0e10cSrcweir (void)bWrite; 760cdf0e10cSrcweir 761cdf0e10cSrcweir rPar.Get(0)->PutInteger(3); 762cdf0e10cSrcweir } 763cdf0e10cSrcweir RTLFUNC(TYP_JUMPEDITFLD)764cdf0e10cSrcweirRTLFUNC(TYP_JUMPEDITFLD) 765cdf0e10cSrcweir { 766cdf0e10cSrcweir (void)pBasic; 767cdf0e10cSrcweir (void)bWrite; 768cdf0e10cSrcweir 769cdf0e10cSrcweir rPar.Get(0)->PutInteger(38); 770cdf0e10cSrcweir } 771cdf0e10cSrcweir 772cdf0e10cSrcweir 773