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