df/20071131-full.df

   1 UPDATE DATABASE "?"\r
   2 \r
   3 ADD SEQUENCE "AuditTrailID"\r
   4   INITIAL 1\r
   5   INCREMENT 1\r
   6   CYCLE-ON-LIMIT no\r
   7   MIN-VAL 1\r
   8 \r
   9 ADD SEQUENCE "CollisionID"\r
  10   INITIAL 1\r
  11   INCREMENT 1\r
  12   CYCLE-ON-LIMIT no\r
  13   MIN-VAL 1\r
  14 \r
  15 ADD SEQUENCE "ReplID"\r
  16   INITIAL 1\r
  17   INCREMENT 1\r
  18   CYCLE-ON-LIMIT no\r
  19   MIN-VAL 1\r
  20 \r
  21 ADD SEQUENCE "NoteCode"\r
  22   INITIAL 10000\r
  23   INCREMENT 1\r
  24   CYCLE-ON-LIMIT no\r
  25   MIN-VAL 10000\r
  26 \r
  27 ADD SEQUENCE "PersonCode"\r
  28   INITIAL 10000\r
  29   INCREMENT 1\r
  30   CYCLE-ON-LIMIT no\r
  31   MIN-VAL 10000\r
  32 \r
  33 ADD SEQUENCE "JobLogNo"\r
  34   INITIAL 0\r
  35   INCREMENT 1\r
  36   CYCLE-ON-LIMIT no\r
  37 \r
  38 ADD TABLE "AccountGroup"\r
  39   AREA "Schema Area"\r
  40   VALEXP "NOT ( CAN-FIND( FIRST ChartOfAccount WHERE ChartOfAccount.AccountGroupCode = AccountGroup.AccountGroupCode ) )"\r
  41   VALMSG "Cannot delete referenced account group records"\r
  42   DUMP-NAME "accountg"\r
  43   TABLE-TRIGGER "CREATE" OVERRIDE PROCEDURE "cractgrp.p" CRC "?" \r
  44   TABLE-TRIGGER "WRITE" OVERRIDE PROCEDURE "wractgrp.p" CRC "?" \r
  45 \r
  46 ADD FIELD "AccountGroupCode" OF "AccountGroup" AS character \r
  47   DESCRIPTION "The code for a grouping of accounts within the chart of accounts."\r
  48   FORMAT "X(6)"\r
  49   INITIAL ""\r
  50   LABEL "Group"\r
  51   POSITION 2\r
  52   SQL-WIDTH 12\r
  53   LENGTH 0\r
  54   ORDER 10\r
  55 \r
  56 ADD FIELD "Name" OF "AccountGroup" AS character \r
  57   DESCRIPTION "The name of this grouping of accounts, for example 'Rental Income' or 'Property Expenses'."\r
  58   FORMAT "X(50)"\r
  59   INITIAL ""\r
  60   POSITION 3\r
  61   SQL-WIDTH 100\r
  62   ORDER 20\r
  63 \r
  64 ADD FIELD "SequenceCode" OF "AccountGroup" AS integer \r
  65   FORMAT ">>>9"\r
  66   INITIAL "9999"\r
  67   POSITION 4\r
  68   SQL-WIDTH 4\r
  69   ORDER 30\r
  70 \r
  71 ADD FIELD "CreditGroup" OF "AccountGroup" AS logical \r
  72   FORMAT "Cr/Db"\r
  73   INITIAL "Db"\r
  74   LABEL "C/D"\r
  75   POSITION 5\r
  76   SQL-WIDTH 1\r
  77   ORDER 40\r
  78 \r
  79 ADD FIELD "GroupType" OF "AccountGroup" AS character \r
  80   FORMAT "X"\r
  81   INITIAL ""\r
  82   LABEL "Type"\r
  83   POSITION 6\r
  84   SQL-WIDTH 2\r
  85   HELP "I=Income, E=Expense, A=Asset, L=Liability"\r
  86   ORDER 50\r
  87 \r
  88 ADD INDEX "AccountGroups" ON "AccountGroup" \r
  89   AREA "Schema Area"\r
  90   UNIQUE\r
  91   PRIMARY\r
  92   INDEX-FIELD "AccountGroupCode" ASCENDING \r
  93 \r
  94 ADD INDEX "XAK1SequenceCode" ON "AccountGroup" \r
  95   AREA "Schema Area"\r
  96   INDEX-FIELD "SequenceCode" ASCENDING \r
  97 \r
  98 ADD INDEX "XAK2AccountGroup" ON "AccountGroup" \r
  99   AREA "Schema Area"\r
 100   INDEX-FIELD "GroupType" ASCENDING \r
 101   INDEX-FIELD "SequenceCode" ASCENDING \r
 102 \r
 103 ADD TABLE "AcctTran"\r
 104   AREA "Schema Area"\r
 105   DUMP-NAME "accttran"\r
 106   TABLE-TRIGGER "WRITE" OVERRIDE PROCEDURE "wracctrn.p" CRC "?" \r
 107 \r
 108 ADD FIELD "BatchCode" OF "AcctTran" AS integer \r
 109   DESCRIPTION "The batch which this transaction is part of."\r
 110   FORMAT ">>>>>9"\r
 111   INITIAL "0"\r
 112   LABEL "Batch No."\r
 113   POSITION 2\r
 114   SQL-WIDTH 4\r
 115   COLUMN-LABEL "Batch"\r
 116   ORDER 10\r
 117 \r
 118 ADD FIELD "DocumentCode" OF "AcctTran" AS integer \r
 119   DESCRIPTION "The document within the batch which this transaction is a part of."\r
 120   FORMAT ">>>>>9"\r
 121   INITIAL "0"\r
 122   LABEL "Document No."\r
 123   POSITION 3\r
 124   SQL-WIDTH 4\r
 125   COLUMN-LABEL "Doc #"\r
 126   ORDER 20\r
 127 \r
 128 ADD FIELD "TransactionCode" OF "AcctTran" AS integer \r
 129   DESCRIPTION "A sequence number identifying this transaction within the document."\r
 130   FORMAT ">>>>>9"\r
 131   INITIAL "0"\r
 132   LABEL "Trans No."\r
 133   POSITION 4\r
 134   SQL-WIDTH 4\r
 135   COLUMN-LABEL "Trans"\r
 136   COLUMN-LABEL-SA "C"\r
 137   ORDER 30\r
 138 \r
 139 ADD FIELD "AccountCode" OF "AcctTran" AS decimal \r
 140   DESCRIPTION "The account against which this transaction applies."\r
 141   FORMAT "9999.99"\r
 142   INITIAL "0"\r
 143   LABEL "Account"\r
 144   POSITION 5\r
 145   SQL-WIDTH 17\r
 146   COLUMN-LABEL-SA "C"\r
 147   DECIMALS 2\r
 148   ORDER 40\r
 149   MANDATORY\r
 150 \r
 151 ADD FIELD "Date" OF "AcctTran" AS date \r
 152   DESCRIPTION "The date applying to the transaction."\r
 153   FORMAT "99/99/9999"\r
 154   INITIAL ?\r
 155   POSITION 6\r
 156   SQL-WIDTH 4\r
 157   COLUMN-LABEL-SA "C"\r
 158   ORDER 50\r
 159 \r
 160 ADD FIELD "Description" OF "AcctTran" AS character \r
 161   DESCRIPTION "A description of this transaction, overriding the description of the document."\r
 162   FORMAT "X(50)"\r
 163   INITIAL ""\r
 164   POSITION 7\r
 165   SQL-WIDTH 100\r
 166   HELP "A narrative which overrides the document narrative."\r
 167   LENGTH 0\r
 168   ORDER 60\r
 169 \r
 170 ADD FIELD "EntityType" OF "AcctTran" AS character \r
 171   DESCRIPTION "A reference to the entity types table indicating the type of entity against which this transaction applies (Company, Property, Project, Creditor or Tenant)."\r
 172   FORMAT "X"\r
 173   INITIAL ""\r
 174   LABEL "Entity type"\r
 175   POSITION 8\r
 176   SQL-WIDTH 2\r
 177   COLUMN-LABEL "Type"\r
 178   COLUMN-LABEL-SA "C"\r
 179   LENGTH 0\r
 180   ORDER 70\r
 181   MANDATORY\r
 182 \r
 183 ADD FIELD "EntityCode" OF "AcctTran" AS integer \r
 184   FORMAT "99999"\r
 185   INITIAL "0"\r
 186   LABEL "Code"\r
 187   POSITION 9\r
 188   SQL-WIDTH 4\r
 189   COLUMN-LABEL-SA "C"\r
 190   ORDER 80\r
 191 \r
 192 ADD FIELD "Amount" OF "AcctTran" AS decimal \r
 193   FORMAT "->>>,>>>,>>9.99"\r
 194   INITIAL "0"\r
 195   POSITION 10\r
 196   SQL-WIDTH 17\r
 197   COLUMN-LABEL-SA "C"\r
 198   DECIMALS 2\r
 199   ORDER 100\r
 200 \r
 201 ADD FIELD "MonthCode" OF "AcctTran" AS integer \r
 202   DESCRIPTION "The code used to refer to a month."\r
 203   FORMAT "9999"\r
 204   INITIAL "0"\r
 205   LABEL "Month code"\r
 206   POSITION 11\r
 207   SQL-WIDTH 4\r
 208   COLUMN-LABEL "Mth #"\r
 209   COLUMN-LABEL-SA "C"\r
 210   ORDER 110\r
 211 \r
 212 ADD FIELD "ClosingGroup" OF "AcctTran" AS integer \r
 213   DESCRIPTION "A number, if applicable, to identify this 'group' of transactions as 'closed'.  The sum of such a group of transactions will be zero."\r
 214   FORMAT ">>>,>>>,>>9"\r
 215   INITIAL ?\r
 216   POSITION 12\r
 217   SQL-WIDTH 4\r
 218   HELP "System maintained."\r
 219   ORDER 120\r
 220 \r
 221 ADD FIELD "FlagAttention" OF "AcctTran" AS character \r
 222   FORMAT "X(4)"\r
 223   INITIAL ""\r
 224   LABEL "Attn"\r
 225   POSITION 13\r
 226   SQL-WIDTH 8\r
 227   HELP "Flag for the attention of..."\r
 228   LENGTH 0\r
 229   ORDER 130\r
 230 \r
 231 ADD FIELD "FlaggedBy" OF "AcctTran" AS integer \r
 232   DESCRIPTION "The person code of the person who last set this flag."\r
 233   FORMAT "99999"\r
 234   INITIAL ?\r
 235   LABEL "Flagged by"\r
 236   POSITION 14\r
 237   SQL-WIDTH 4\r
 238   HELP "System maintained."\r
 239   ORDER 140\r
 240 \r
 241 ADD FIELD "Reference" OF "AcctTran" AS character \r
 242   DESCRIPTION "Overrides the reference at document level for some display situations."\r
 243   FORMAT "X(12)"\r
 244   INITIAL ""\r
 245   LABEL "Ref"\r
 246   POSITION 15\r
 247   SQL-WIDTH 24\r
 248   HELP "Enter a reference to override the document reference"\r
 249   LENGTH 0\r
 250   ORDER 150\r
 251 \r
 252 ADD FIELD "ConsequenceOf" OF "AcctTran" AS integer \r
 253   DESCRIPTION "Indicates which transactioncode in this document caused this transaction to be created during the transaction update process."\r
 254   FORMAT ">>>>9"\r
 255   INITIAL "0"\r
 256   POSITION 16\r
 257   SQL-WIDTH 4\r
 258   HELP "System maintained."\r
 259   ORDER 160\r
 260 \r
 261 ADD FIELD "ClosedState" OF "AcctTran" AS character \r
 262   DESCRIPTION "C=Closed, P=Partial, O=Open, ???"\r
 263   FORMAT "X"\r
 264   INITIAL "O"\r
 265   POSITION 17\r
 266   SQL-WIDTH 2\r
 267   ORDER 170\r
 268   MANDATORY\r
 269 \r
 270 ADD INDEX "Transactions" ON "AcctTran" \r
 271   AREA "Schema Area"\r
 272   UNIQUE\r
 273   PRIMARY\r
 274   INDEX-FIELD "BatchCode" ASCENDING \r
 275   INDEX-FIELD "DocumentCode" ASCENDING \r
 276   INDEX-FIELD "TransactionCode" ASCENDING \r
 277 \r
 278 ADD INDEX "XAK1AcctTran" ON "AcctTran" \r
 279   AREA "Schema Area"\r
 280   INDEX-FIELD "EntityType" ASCENDING \r
 281   INDEX-FIELD "EntityCode" ASCENDING \r
 282   INDEX-FIELD "AccountCode" ASCENDING \r
 283   INDEX-FIELD "MonthCode" ASCENDING \r
 284 \r
 285 ADD INDEX "XAK3CodeAndClosingGroup" ON "AcctTran" \r
 286   AREA "Schema Area"\r
 287   INDEX-FIELD "EntityType" ASCENDING \r
 288   INDEX-FIELD "EntityCode" ASCENDING \r
 289   INDEX-FIELD "AccountCode" ASCENDING \r
 290   INDEX-FIELD "ClosingGroup" ASCENDING \r
 291 \r
 292 ADD INDEX "XPKAcctTran" ON "AcctTran" \r
 293   AREA "Schema Area"\r
 294   INDEX-FIELD "EntityType" ASCENDING \r
 295   INDEX-FIELD "EntityCode" ASCENDING \r
 296   INDEX-FIELD "AccountCode" ASCENDING \r
 297   INDEX-FIELD "MonthCode" DESCENDING \r
 298   INDEX-FIELD "Date" DESCENDING \r
 299 \r
 300 ADD TABLE "AreaStatus"\r
 301   AREA "Schema Area"\r
 302   DUMP-NAME "areastat"\r
 303 \r
 304 ADD FIELD "AreaStatus" OF "AreaStatus" AS character \r
 305   FORMAT "X(4)"\r
 306   INITIAL ?\r
 307   LABEL "Status"\r
 308   POSITION 2\r
 309   SQL-WIDTH 8\r
 310   COLUMN-LABEL ""\r
 311   LENGTH 0\r
 312   ORDER 10\r
 313   MANDATORY\r
 314 \r
 315 ADD FIELD "Description" OF "AreaStatus" AS character \r
 316   FORMAT "X(50)"\r
 317   INITIAL ""\r
 318   POSITION 3\r
 319   SQL-WIDTH 100\r
 320   ORDER 20\r
 321 \r
 322 ADD INDEX "XPKAreaStatus" ON "AreaStatus" \r
 323   AREA "Schema Area"\r
 324   UNIQUE\r
 325   PRIMARY\r
 326   INDEX-FIELD "AreaStatus" ASCENDING \r
 327 \r
 328 ADD TABLE "AreaType"\r
 329   AREA "Schema Area"\r
 330   DUMP-NAME "areatype"\r
 331 \r
 332 ADD FIELD "AreaType" OF "AreaType" AS character \r
 333   FORMAT "X(4)"\r
 334   INITIAL ""\r
 335   LABEL "Type"\r
 336   POSITION 2\r
 337   SQL-WIDTH 8\r
 338   LENGTH 0\r
 339   ORDER 10\r
 340   MANDATORY\r
 341 \r
 342 ADD FIELD "Description" OF "AreaType" AS character \r
 343   FORMAT "X(50)"\r
 344   INITIAL ""\r
 345   POSITION 3\r
 346   SQL-WIDTH 100\r
 347   ORDER 20\r
 348 \r
 349 ADD FIELD "AccountCode" OF "AreaType" AS decimal \r
 350   DESCRIPTION "The code of the account which rent is charged to for this area type."\r
 351   FORMAT "9999.99"\r
 352   INITIAL "0"\r
 353   LABEL "Account"\r
 354   POSITION 4\r
 355   SQL-WIDTH 17\r
 356   DECIMALS 2\r
 357   ORDER 30\r
 358   MANDATORY\r
 359 \r
 360 ADD FIELD "IsFloorArea" OF "AreaType" AS logical \r
 361   FORMAT "yes/no"\r
 362   INITIAL "no"\r
 363   POSITION 5\r
 364   SQL-WIDTH 1\r
 365   ORDER 40\r
 366 \r
 367 ADD FIELD "IsCarPark" OF "AreaType" AS logical \r
 368   FORMAT "yes/no"\r
 369   INITIAL "no"\r
 370   POSITION 6\r
 371   SQL-WIDTH 1\r
 372   ORDER 50\r
 373 \r
 374 ADD INDEX "XPKAreaTypes" ON "AreaType" \r
 375   AREA "Schema Area"\r
 376   UNIQUE\r
 377   PRIMARY\r
 378   INDEX-FIELD "AreaType" ASCENDING \r
 379 \r
 380 ADD TABLE "Batch"\r
 381   AREA "Schema Area"\r
 382   DUMP-NAME "batch"\r
 383   TABLE-TRIGGER "DELETE" OVERRIDE PROCEDURE "debatch.p" CRC "?" \r
 384 \r
 385 ADD FIELD "BatchCode" OF "Batch" AS integer \r
 386   DESCRIPTION "The code of a batch of documents."\r
 387   FORMAT ">>>>>9"\r
 388   INITIAL "0"\r
 389   LABEL "Batch No."\r
 390   POSITION 2\r
 391   SQL-WIDTH 4\r
 392   COLUMN-LABEL "Batch"\r
 393   ORDER 10\r
 394 \r
 395 ADD FIELD "OperatorCode" OF "Batch" AS integer \r
 396   DESCRIPTION "The staff contact code for the operator who updated this batch of documents."\r
 397   FORMAT ">>>>>>9"\r
 398   INITIAL "0"\r
 399   LABEL "Operator"\r
 400   POSITION 3\r
 401   SQL-WIDTH 4\r
 402   ORDER 20\r
 403   MANDATORY\r
 404 \r
 405 ADD FIELD "DocumentCount" OF "Batch" AS integer \r
 406   DESCRIPTION "The total number of documents in the batch"\r
 407   FORMAT ">,>>>,>>9"\r
 408   INITIAL "0"\r
 409   LABEL "Documents"\r
 410   POSITION 4\r
 411   SQL-WIDTH 4\r
 412   ORDER 40\r
 413 \r
 414 ADD FIELD "Total" OF "Batch" AS decimal \r
 415   DESCRIPTION "The total value of the documents in the batch."\r
 416   FORMAT "->>>,>>>,>>9.99"\r
 417   INITIAL "0"\r
 418   POSITION 5\r
 419   SQL-WIDTH 17\r
 420   COLUMN-LABEL "Batch Total"\r
 421   DECIMALS 2\r
 422   ORDER 50\r
 423 \r
 424 ADD FIELD "UpdatedAt" OF "Batch" AS integer \r
 425   DESCRIPTION "The time that the batch update was completed."\r
 426   FORMAT "->,>>>,>>9"\r
 427   INITIAL "0"\r
 428   LABEL "Updated At"\r
 429   POSITION 6\r
 430   SQL-WIDTH 4\r
 431   COLUMN-LABEL-SA "C"\r
 432   ORDER 60\r
 433 \r
 434 ADD FIELD "UpdatedOn" OF "Batch" AS date \r
 435   DESCRIPTION "The date on which the batch update was completed."\r
 436   FORMAT "99/99/9999"\r
 437   INITIAL ?\r
 438   LABEL "Updated On"\r
 439   POSITION 7\r
 440   SQL-WIDTH 4\r
 441   COLUMN-LABEL-SA "C"\r
 442   ORDER 70\r
 443 \r
 444 ADD FIELD "Description" OF "Batch" AS character \r
 445   FORMAT "X(50)"\r
 446   INITIAL ""\r
 447   POSITION 8\r
 448   SQL-WIDTH 100\r
 449   HELP "A description of the documents in this batch"\r
 450   LENGTH 0\r
 451   ORDER 80\r
 452 \r
 453 ADD FIELD "UpdatedBy" OF "Batch" AS character \r
 454   FORMAT "X(12)"\r
 455   INITIAL ""\r
 456   LABEL "Updated By"\r
 457   POSITION 9\r
 458   SQL-WIDTH 24\r
 459   ORDER 90\r
 460 \r
 461 ADD INDEX "Batches" ON "Batch" \r
 462   AREA "Schema Area"\r
 463   UNIQUE\r
 464   PRIMARY\r
 465   INDEX-FIELD "BatchCode" ASCENDING \r
 466 \r
 467 ADD INDEX "XAK1Description" ON "Batch" \r
 468   AREA "Schema Area"\r
 469   INDEX-FIELD "Description" ASCENDING \r
 470 \r
 471 ADD INDEX "XAK2Batch" ON "Batch" \r
 472   AREA "Schema Area"\r
 473   INDEX-FIELD "UpdatedOn" ASCENDING \r
 474   INDEX-FIELD "UpdatedAt" ASCENDING \r
 475 \r
 476 ADD INDEX "XAK3Batch" ON "Batch" \r
 477   AREA "Schema Area"\r
 478   INDEX-FIELD "UpdatedBy" ASCENDING \r
 479   INDEX-FIELD "UpdatedOn" DESCENDING \r
 480   INDEX-FIELD "UpdatedAt" DESCENDING \r
 481 \r
 482 ADD TABLE "BatchType"\r
 483   AREA "Schema Area"\r
 484   DUMP-NAME "batchtyp"\r
 485 \r
 486 ADD FIELD "BatchType" OF "BatchType" AS character \r
 487   DESCRIPTION "A code to indicate the type of a batch"\r
 488   FORMAT "X(4)"\r
 489   INITIAL ""\r
 490   LABEL "Type"\r
 491   POSITION 2\r
 492   SQL-WIDTH 8\r
 493   LENGTH 0\r
 494   ORDER 10\r
 495   MANDATORY\r
 496 \r
 497 ADD FIELD "Description" OF "BatchType" AS character \r
 498   FORMAT "X(50)"\r
 499   INITIAL ""\r
 500   POSITION 3\r
 501   SQL-WIDTH 100\r
 502   ORDER 20\r
 503 \r
 504 ADD INDEX "XPKBatchStatuses" ON "BatchType" \r
 505   AREA "Schema Area"\r
 506   UNIQUE\r
 507   PRIMARY\r
 508   INDEX-FIELD "BatchType" ASCENDING \r
 509 \r
 510 ADD TABLE "BuildingEvent"\r
 511   AREA "Schema Area"\r
 512   DUMP-NAME "building"\r
 513 \r
 514 ADD FIELD "PropertyCode" OF "BuildingEvent" AS integer \r
 515   FORMAT "99999"\r
 516   INITIAL "0"\r
 517   LABEL "Property"\r
 518   POSITION 2\r
 519   SQL-WIDTH 4\r
 520   ORDER 10\r
 521   MANDATORY\r
 522 \r
 523 ADD FIELD "BuildingSystemType" OF "BuildingEvent" AS integer \r
 524   FORMAT ">>>>>9"\r
 525   INITIAL "0"\r
 526   LABEL "System type"\r
 527   POSITION 3\r
 528   SQL-WIDTH 4\r
 529   ORDER 20\r
 530   MANDATORY\r
 531 \r
 532 ADD FIELD "TaskCode" OF "BuildingEvent" AS integer \r
 533   DESCRIPTION "The month which this transaction was updated against. Should this be stored at the 'document' level?  Probably. Check with GK."\r
 534   FORMAT ">>>>>>9"\r
 535   INITIAL "0"\r
 536   LABEL "Current Task"\r
 537   POSITION 4\r
 538   SQL-WIDTH 4\r
 539   COLUMN-LABEL "Task"\r
 540   ORDER 30\r
 541 \r
 542 ADD FIELD "DateDue" OF "BuildingEvent" AS date \r
 543   DESCRIPTION "The date that the task is due to be completed."\r
 544   FORMAT "99/99/9999"\r
 545   INITIAL ?\r
 546   LABEL "Due by"\r
 547   POSITION 5\r
 548   SQL-WIDTH 4\r
 549   ORDER 40\r
 550 \r
 551 ADD FIELD "Notes" OF "BuildingEvent" AS integer \r
 552   DESCRIPTION "Any notes."\r
 553   FORMAT ">>>>>9"\r
 554   INITIAL "0"\r
 555   POSITION 6\r
 556   SQL-WIDTH 4\r
 557   ORDER 50\r
 558   MANDATORY\r
 559 \r
 560 ADD FIELD "PersonCode" OF "BuildingEvent" AS integer \r
 561   DESCRIPTION "The contractor person responsible for the task."\r
 562   FORMAT ">>>>>9"\r
 563   INITIAL "0"\r
 564   LABEL "Person"\r
 565   POSITION 7\r
 566   SQL-WIDTH 4\r
 567   ORDER 70\r
 568   MANDATORY\r
 569 \r
 570 ADD FIELD "ContractorCode" OF "BuildingEvent" AS integer \r
 571   DESCRIPTION "The contractor who has been directed to perform the task."\r
 572   FORMAT ">>>>>9"\r
 573   INITIAL "0"\r
 574   LABEL "Contractor"\r
 575   POSITION 8\r
 576   SQL-WIDTH 4\r
 577   ORDER 60\r
 578 \r
 579 ADD FIELD "TaskStatus" OF "BuildingEvent" AS character \r
 580   FORMAT "X(4)"\r
 581   INITIAL ""\r
 582   LABEL "Current Task Status"\r
 583   POSITION 9\r
 584   SQL-WIDTH 8\r
 585   LENGTH 0\r
 586   ORDER 80\r
 587   MANDATORY\r
 588 \r
 589 ADD FIELD "DateDone" OF "BuildingEvent" AS date \r
 590   DESCRIPTION "The date that the task was completed."\r
 591   FORMAT "99/99/9999"\r
 592   INITIAL ?\r
 593   LABEL "Date done"\r
 594   POSITION 10\r
 595   SQL-WIDTH 4\r
 596   ORDER 90\r
 597 \r
 598 ADD FIELD "Passed" OF "BuildingEvent" AS logical \r
 599   DESCRIPTION "Whether the building system has passed the check, if applicable."\r
 600   FORMAT "yes/no"\r
 601   INITIAL "no"\r
 602   POSITION 11\r
 603   SQL-WIDTH 1\r
 604   ORDER 100\r
 605 \r
 606 ADD FIELD "Results" OF "BuildingEvent" AS character \r
 607   DESCRIPTION "A description of the results of the task."\r
 608   FORMAT "X(8)"\r
 609   INITIAL ""\r
 610   POSITION 12\r
 611   SQL-WIDTH 16\r
 612   ORDER 110\r
 613 \r
 614 ADD FIELD "EventStatus" OF "BuildingEvent" AS character \r
 615   FORMAT "X(18)"\r
 616   INITIAL ""\r
 617   LABEL "Event Status"\r
 618   POSITION 13\r
 619   SQL-WIDTH 36\r
 620   LENGTH 0\r
 621   ORDER 120\r
 622 \r
 623 ADD INDEX "BuildingEvents" ON "BuildingEvent" \r
 624   AREA "Schema Area"\r
 625   UNIQUE\r
 626   PRIMARY\r
 627   INDEX-FIELD "PropertyCode" ASCENDING \r
 628   INDEX-FIELD "BuildingSystemType" ASCENDING \r
 629   INDEX-FIELD "TaskCode" ASCENDING \r
 630   INDEX-FIELD "DateDue" ASCENDING \r
 631 \r
 632 ADD TABLE "BuildingSystem"\r
 633   AREA "Schema Area"\r
 634   DUMP-NAME "buildin1"\r
 635 \r
 636 ADD FIELD "PropertyCode" OF "BuildingSystem" AS integer \r
 637   DESCRIPTION "The property where the system is"\r
 638   FORMAT "99999"\r
 639   INITIAL "0"\r
 640   LABEL "Property No."\r
 641   POSITION 2\r
 642   SQL-WIDTH 4\r
 643   COLUMN-LABEL "Property"\r
 644   ORDER 10\r
 645 \r
 646 ADD FIELD "BuildingSystemType" OF "BuildingSystem" AS integer \r
 647   DESCRIPTION "The type of building system."\r
 648   FORMAT ">>>>>9"\r
 649   INITIAL "0"\r
 650   LABEL "System Type"\r
 651   POSITION 3\r
 652   SQL-WIDTH 4\r
 653   COLUMN-LABEL "Type"\r
 654   ORDER 20\r
 655 \r
 656 ADD FIELD "InspectorIQP" OF "BuildingSystem" AS integer \r
 657   FORMAT "->,>>>,>>9"\r
 658   INITIAL "0"\r
 659   POSITION 4\r
 660   SQL-WIDTH 4\r
 661   HELP "The independent qualified inspector"\r
 662   ORDER 30\r
 663 \r
 664 ADD FIELD "InspectorOwner" OF "BuildingSystem" AS integer \r
 665   FORMAT "->,>>>,>>9"\r
 666   INITIAL "0"\r
 667   POSITION 5\r
 668   SQL-WIDTH 4\r
 669   HELP "The onwer representative inspector"\r
 670   ORDER 40\r
 671 \r
 672 ADD FIELD "IQPCertificate" OF "BuildingSystem" AS logical \r
 673   FORMAT "yes/no"\r
 674   INITIAL "no"\r
 675   POSITION 6\r
 676   SQL-WIDTH 1\r
 677   HELP "Is an IQP certificate required"\r
 678   ORDER 50\r
 679 \r
 680 ADD INDEX "BuildingSystems" ON "BuildingSystem" \r
 681   AREA "Schema Area"\r
 682   UNIQUE\r
 683   PRIMARY\r
 684   INDEX-FIELD "PropertyCode" ASCENDING \r
 685   INDEX-FIELD "BuildingSystemType" ASCENDING \r
 686 \r
 687 ADD TABLE "BuildingSystemType"\r
 688   AREA "Schema Area"\r
 689   DUMP-NAME "buildin2"\r
 690 \r
 691 ADD FIELD "BuildingSystemType" OF "BuildingSystemType" AS integer \r
 692   DESCRIPTION "A code used to refer to this type of building system."\r
 693   FORMAT ">>>>>9"\r
 694   INITIAL "0"\r
 695   LABEL "System Type"\r
 696   POSITION 2\r
 697   SQL-WIDTH 4\r
 698   COLUMN-LABEL "Type"\r
 699   ORDER 10\r
 700   MANDATORY\r
 701 \r
 702 ADD FIELD "Description" OF "BuildingSystemType" AS character \r
 703   DESCRIPTION "The full legal description of this type of building system for use in official letters"\r
 704   FORMAT "X(256)"\r
 705   INITIAL ""\r
 706   POSITION 3\r
 707   SQL-WIDTH 512\r
 708   HELP "Full legal description of this type of building system"\r
 709   ORDER 40\r
 710 \r
 711 ADD FIELD "Name" OF "BuildingSystemType" AS character \r
 712   DESCRIPTION "A name used to refer to this type of building system. Types of building systems include (but are not limited to): Air conditioning, BMU's or gantries, Lifts/escalators, Sump pumps, Fire warning systems, Smoke stop doors, Fire sprinkler systems, Checks for salinity of concrete where corrosion present, Backflow preventers, Exhaust extract fans, Pressurised escape routes, Evacuation procedures, Fire hose reels, Boilers, Emergency exit signage, Electrical safety checks."\r
 713   FORMAT "X(50)"\r
 714   INITIAL ""\r
 715   POSITION 4\r
 716   SQL-WIDTH 100\r
 717   LENGTH 0\r
 718   ORDER 20\r
 719 \r
 720 ADD FIELD "SystemType" OF "BuildingSystemType" AS character \r
 721   DESCRIPTION "The type of building system type (!) - B or L"\r
 722   FORMAT "X"\r
 723   INITIAL "B"\r
 724   POSITION 5\r
 725   SQL-WIDTH 2\r
 726   ORDER 30\r
 727 \r
 728 ADD INDEX "BuildingSystemTypes" ON "BuildingSystemType" \r
 729   AREA "Schema Area"\r
 730   UNIQUE\r
 731   PRIMARY\r
 732   INDEX-FIELD "BuildingSystemType" ASCENDING \r
 733 \r
 734 ADD TABLE "BuildingTask"\r
 735   AREA "Schema Area"\r
 736   DUMP-NAME "buildin3"\r
 737 \r
 738 ADD FIELD "PropertyCode" OF "BuildingTask" AS integer \r
 739   DESCRIPTION "The property that this task relates to."\r
 740   FORMAT "99999"\r
 741   INITIAL "0"\r
 742   LABEL "Property No."\r
 743   POSITION 2\r
 744   SQL-WIDTH 4\r
 745   COLUMN-LABEL "Property"\r
 746   ORDER 10\r
 747 \r
 748 ADD FIELD "BuildingSystemType" OF "BuildingTask" AS integer \r
 749   DESCRIPTION "The system that this task relates to."\r
 750   FORMAT ">>>>>9"\r
 751   INITIAL "0"\r
 752   LABEL "System Type"\r
 753   POSITION 3\r
 754   SQL-WIDTH 4\r
 755   COLUMN-LABEL "Type"\r
 756   ORDER 20\r
 757 \r
 758 ADD FIELD "TaskCode" OF "BuildingTask" AS integer \r
 759   DESCRIPTION "A sequence number to differentiate this task from other tasks for the same building system"\r
 760   FORMAT ">>>>>9"\r
 761   INITIAL "0"\r
 762   POSITION 4\r
 763   SQL-WIDTH 4\r
 764   ORDER 30\r
 765 \r
 766 ADD FIELD "Notes" OF "BuildingTask" AS integer \r
 767   DESCRIPTION "Any notes"\r
 768   FORMAT ">>>>>9"\r
 769   INITIAL "0"\r
 770   POSITION 5\r
 771   SQL-WIDTH 4\r
 772   ORDER 40\r
 773   MANDATORY\r
 774 \r
 775 ADD FIELD "FrequencyCode" OF "BuildingTask" AS integer \r
 776   DESCRIPTION "The regularity of this building task"\r
 777   FORMAT ">>>>>9"\r
 778   INITIAL "0"\r
 779   POSITION 6\r
 780   SQL-WIDTH 4\r
 781   ORDER 50\r
 782   MANDATORY\r
 783 \r
 784 ADD FIELD "ContractorCode" OF "BuildingTask" AS integer \r
 785   DESCRIPTION "The preferred contractor for this task"\r
 786   FORMAT ">>>>>9"\r
 787   INITIAL "0"\r
 788   POSITION 7\r
 789   SQL-WIDTH 4\r
 790   ORDER 60\r
 791 \r
 792 ADD FIELD "Duration" OF "BuildingTask" AS integer \r
 793   DESCRIPTION "The number of days duration it usually takes for this task to go to completion"\r
 794   FORMAT ">>>>>9"\r
 795   INITIAL "0"\r
 796   POSITION 8\r
 797   SQL-WIDTH 4\r
 798   ORDER 70\r
 799 \r
 800 ADD FIELD "IQPTask" OF "BuildingTask" AS logical \r
 801   DESCRIPTION "Whether the task requires an independently qualified person."\r
 802   FORMAT "yes/no"\r
 803   INITIAL "no"\r
 804   POSITION 9\r
 805   SQL-WIDTH 1\r
 806   ORDER 80\r
 807 \r
 808 ADD FIELD "LastDone" OF "BuildingTask" AS date \r
 809   DESCRIPTION "The date that this task was last done"\r
 810   FORMAT "99/99/9999"\r
 811   INITIAL ?\r
 812   POSITION 10\r
 813   SQL-WIDTH 4\r
 814   ORDER 90\r
 815 \r
 816 ADD FIELD "NextDue" OF "BuildingTask" AS date \r
 817   DESCRIPTION "The date that this task is next due to be completed by"\r
 818   FORMAT "99/99/9999"\r
 819   INITIAL ?\r
 820   POSITION 11\r
 821   SQL-WIDTH 4\r
 822   ORDER 100\r
 823 \r
 824 ADD FIELD "WOFTask" OF "BuildingTask" AS character \r
 825   DESCRIPTION "Whether the task is required for a WOF"\r
 826   FORMAT "X(8)"\r
 827   INITIAL ""\r
 828   POSITION 12\r
 829   SQL-WIDTH 16\r
 830   ORDER 110\r
 831 \r
 832 ADD INDEX "BuildingTasks" ON "BuildingTask" \r
 833   AREA "Schema Area"\r
 834   UNIQUE\r
 835   PRIMARY\r
 836   INDEX-FIELD "PropertyCode" ASCENDING \r
 837   INDEX-FIELD "BuildingSystemType" ASCENDING \r
 838   INDEX-FIELD "TaskCode" ASCENDING \r
 839 \r
 840 ADD TABLE "CashFlowType"\r
 841   AREA "Schema Area"\r
 842   DUMP-NAME "cashflow"\r
 843 \r
 844 ADD FIELD "CashFlowType" OF "CashFlowType" AS character \r
 845   FORMAT "X(4)"\r
 846   INITIAL ""\r
 847   LABEL "Cash Flow Type"\r
 848   POSITION 2\r
 849   SQL-WIDTH 8\r
 850   COLUMN-LABEL "CF Type"\r
 851   LENGTH 0\r
 852   ORDER 10\r
 853   MANDATORY\r
 854 \r
 855 ADD FIELD "Description" OF "CashFlowType" AS character \r
 856   FORMAT "X(50)"\r
 857   INITIAL ""\r
 858   POSITION 3\r
 859   SQL-WIDTH 100\r
 860   ORDER 20\r
 861 \r
 862 ADD FIELD "SystemGenerated" OF "CashFlowType" AS logical \r
 863   DESCRIPTION "Identifies cash flow reserved for the system"\r
 864   FORMAT "Y/N"\r
 865   INITIAL "Y"\r
 866   LABEL "System Generated"\r
 867   POSITION 4\r
 868   SQL-WIDTH 1\r
 869   ORDER 30\r
 870 \r
 871 ADD INDEX "XPKCashFlowTypes" ON "CashFlowType" \r
 872   AREA "Schema Area"\r
 873   UNIQUE\r
 874   PRIMARY\r
 875   INDEX-FIELD "CashFlowType" ASCENDING \r
 876 \r
 877 ADD INDEX "XAK1CashflowType" ON "CashFlowType" \r
 878   AREA "Schema Area"\r
 879   UNIQUE\r
 880   INDEX-FIELD "SystemGenerated" ASCENDING \r
 881   INDEX-FIELD "CashFlowType" ASCENDING \r
 882 \r
 883 ADD TABLE "ChartOfAccount"\r
 884   AREA "Schema Area"\r
 885   DUMP-NAME "chartofa"\r
 886   TABLE-TRIGGER "WRITE" OVERRIDE PROCEDURE "wrchoact.p" CRC "?" \r
 887 \r
 888 ADD FIELD "AccountCode" OF "ChartOfAccount" AS decimal \r
 889   DESCRIPTION "The code of the account."\r
 890   FORMAT "9999.99"\r
 891   INITIAL ?\r
 892   LABEL "Account"\r
 893   POSITION 2\r
 894   SQL-WIDTH 17\r
 895   DECIMALS 2\r
 896   ORDER 10\r
 897   MANDATORY\r
 898 \r
 899 ADD FIELD "AccountGroupCode" OF "ChartOfAccount" AS character \r
 900   DESCRIPTION "The grouping which this account falls within."\r
 901   FORMAT "X(6)"\r
 902   INITIAL ""\r
 903   LABEL "Group"\r
 904   POSITION 3\r
 905   SQL-WIDTH 12\r
 906   LENGTH 0\r
 907   ORDER 20\r
 908 \r
 909 ADD FIELD "AlternativeCode" OF "ChartOfAccount" AS character \r
 910   DESCRIPTION "An alternative code to use for this account when consolidating accounts into an alternative structure."\r
 911   FORMAT "X(50)"\r
 912   INITIAL ""\r
 913   LABEL "Alt Code"\r
 914   POSITION 4\r
 915   SQL-WIDTH 100\r
 916   LENGTH 0\r
 917   ORDER 30\r
 918 \r
 919 ADD FIELD "Name" OF "ChartOfAccount" AS character \r
 920   DESCRIPTION "The name of the account."\r
 921   FORMAT "X(50)"\r
 922   INITIAL ""\r
 923   POSITION 5\r
 924   SQL-WIDTH 100\r
 925   LENGTH 0\r
 926   ORDER 40\r
 927   MANDATORY\r
 928 \r
 929 ADD FIELD "UpdateTo" OF "ChartOfAccount" AS character \r
 930   DESCRIPTION "A comma-delimited list of entity type codes that this account may have transactions entered for."\r
 931   FORMAT "X(10)"\r
 932   INITIAL ""\r
 933   LABEL "Update to"\r
 934   POSITION 6\r
 935   SQL-WIDTH 20\r
 936   HELP "A list of entity codes, separated by commas"\r
 937   LENGTH 0\r
 938   ORDER 50\r
 939 \r
 940 ADD FIELD "HighVolume" OF "ChartOfAccount" AS logical \r
 941   DESCRIPTION "Whether or not the account should show totals only by default on a transaction report."\r
 942   FORMAT "yes/no"\r
 943   INITIAL "no"\r
 944   LABEL "High volume"\r
 945   POSITION 7\r
 946   SQL-WIDTH 1\r
 947   COLUMN-LABEL "HiVol"\r
 948   ORDER 60\r
 949 \r
 950 ADD FIELD "Security" OF "ChartOfAccount" AS integer \r
 951   FORMAT "->,>>>,>>9"\r
 952   INITIAL "0"\r
 953   POSITION 8\r
 954   SQL-WIDTH 4\r
 955   ORDER 70\r
 956 \r
 957 ADD FIELD "LastModifiedDate" OF "ChartOfAccount" AS date \r
 958   DESCRIPTION "The date when this record was last modified.  Maintained by a WRITE trigger."\r
 959   FORMAT "99/99/9999"\r
 960   INITIAL "1/1/0001"\r
 961   POSITION 9\r
 962   SQL-WIDTH 4\r
 963   ORDER 80\r
 964   MANDATORY\r
 965 \r
 966 ADD FIELD "LastModifiedTime" OF "ChartOfAccount" AS integer \r
 967   DESCRIPTION "The time that this record was last modified"\r
 968   FORMAT "->,>>>,>>9"\r
 969   INITIAL "0"\r
 970   POSITION 10\r
 971   SQL-WIDTH 4\r
 972   ORDER 90\r
 973 \r
 974 ADD FIELD "LastModifiedUser" OF "ChartOfAccount" AS character \r
 975   DESCRIPTION "The user who last modified this record.  Maintained by a WRITE trigger."\r
 976   FORMAT "X(8)"\r
 977   INITIAL ""\r
 978   POSITION 11\r
 979   SQL-WIDTH 16\r
 980   LENGTH 0\r
 981   ORDER 100\r
 982 \r
 983 ADD FIELD "AuditRecordId" OF "ChartOfAccount" AS integer \r
 984   FORMAT "->,>>>,>>9"\r
 985   INITIAL "0"\r
 986   POSITION 12\r
 987   SQL-WIDTH 4\r
 988   ORDER 110\r
 989 \r
 990 ADD FIELD "ShortName" OF "ChartOfAccount" AS character \r
 991   FORMAT "X(10)"\r
 992   INITIAL ""\r
 993   LABEL "Short name"\r
 994   POSITION 13\r
 995   SQL-WIDTH 20\r
 996   ORDER 120\r
 997 \r
 998 ADD FIELD "LedgerControl" OF "ChartOfAccount" AS decimal \r
 999   DESCRIPTION "GL Control Account Code"\r
1000   FORMAT "9999.99"\r
1001   INITIAL "0"\r
1002   POSITION 14\r
1003   SQL-WIDTH 17\r
1004   DECIMALS 2\r
1005   ORDER 130\r
1006 \r
1007 ADD FIELD "ExpenseRecoveryType" OF "ChartOfAccount" AS character \r
1008   FORMAT "X"\r
1009   INITIAL ""\r
1010   POSITION 15\r
1011   SQL-WIDTH 2\r
1012   HELP "Method of Expense Recovery: X=None, P=Property Budgets, O=Override"\r
1013   ORDER 140\r
1014 \r
1015 ADD INDEX "NChartOfAccounts" ON "ChartOfAccount" \r
1016   AREA "Schema Area"\r
1017   UNIQUE\r
1018   PRIMARY\r
1019   INDEX-FIELD "AccountCode" ASCENDING \r
1020 \r
1021 ADD INDEX "NAccountGroups" ON "ChartOfAccount" \r
1022   AREA "Schema Area"\r
1023   UNIQUE\r
1024   INDEX-FIELD "AccountGroupCode" ASCENDING \r
1025   INDEX-FIELD "AccountCode" ASCENDING \r
1026 \r
1027 ADD INDEX "XAK1ChartOfAccounts" ON "ChartOfAccount" \r
1028   AREA "Schema Area"\r
1029   INDEX-FIELD "Name" ASCENDING ABBREVIATED \r
1030 \r
1031 ADD TABLE "Company"\r
1032   AREA "Schema Area"\r
1033   DUMP-NAME "company"\r
1034   TABLE-TRIGGER "WRITE" OVERRIDE PROCEDURE "wrcompny.p" CRC "?" \r
1035 \r
1036 ADD FIELD "CompanyCode" OF "Company" AS integer \r
1037   DESCRIPTION "The code used to refer to a company."\r
1038   FORMAT ">>999"\r
1039   INITIAL "0"\r
1040   LABEL "Company"\r
1041   POSITION 2\r
1042   SQL-WIDTH 4\r
1043   ORDER 10\r
1044   MANDATORY\r
1045 \r
1046 ADD FIELD "BankAccountCode" OF "Company" AS character \r
1047   FORMAT "X(4)"\r
1048   INITIAL ""\r
1049   LABEL "Bank a/c"\r
1050   POSITION 3\r
1051   SQL-WIDTH 8\r
1052   ORDER 20\r
1053   MANDATORY\r
1054 \r
1055 ADD FIELD "ParentCode" OF "Company" AS integer \r
1056   FORMAT ">>>>>9"\r
1057   INITIAL "0"\r
1058   LABEL "Parent"\r
1059   POSITION 4\r
1060   SQL-WIDTH 4\r
1061   ORDER 30\r
1062 \r
1063 ADD FIELD "ClientCode" OF "Company" AS character \r
1064   FORMAT "X(8)"\r
1065   INITIAL ""\r
1066   POSITION 5\r
1067   SQL-WIDTH 16\r
1068   ORDER 240\r
1069 \r
1070 ADD FIELD "LegalName" OF "Company" AS character \r
1071   DESCRIPTION "The full legal name of the company."\r
1072   FORMAT "X(100)"\r
1073   INITIAL ""\r
1074   POSITION 6\r
1075   SQL-WIDTH 200\r
1076   ORDER 50\r
1077 \r
1078 ADD FIELD "RegisteredAddress" OF "Company" AS character \r
1079   DESCRIPTION "The registered address of the company."\r
1080   FORMAT "X(50)"\r
1081   INITIAL ""\r
1082   POSITION 7\r
1083   SQL-WIDTH 100\r
1084   ORDER 60\r
1085 \r
1086 ADD FIELD "ShortName" OF "Company" AS character \r
1087   DESCRIPTION "A short name used to refer to the company in reports, especially within column headings."\r
1088   FORMAT "X(15)"\r
1089   INITIAL ""\r
1090   POSITION 8\r
1091   SQL-WIDTH 30\r
1092   LENGTH 0\r
1093   ORDER 70\r
1094   MANDATORY\r
1095 \r
1096 ADD FIELD "TaxNo" OF "Company" AS character \r
1097   DESCRIPTION "The IRD number (or it's Australian equivalent) of the company.  The format will either have to be configurable, or accommodate both countries (probably that as it's not an important data item)."\r
1098   FORMAT "X(20)"\r
1099   INITIAL ""\r
1100   POSITION 9\r
1101   SQL-WIDTH 40\r
1102   ORDER 80\r
1103 \r
1104 ADD FIELD "ParValue" OF "Company" AS decimal \r
1105   FORMAT "->>,>>9.99"\r
1106   INITIAL "0"\r
1107   POSITION 10\r
1108   SQL-WIDTH 17\r
1109   DECIMALS 2\r
1110   ORDER 250\r
1111 \r
1112 ADD FIELD "NextAnnualReturn" OF "Company" AS date \r
1113   DESCRIPTION "The date when returns should be field next"\r
1114   FORMAT "99/99/9999"\r
1115   INITIAL ?\r
1116   LABEL "Next Annual Return Date"\r
1117   POSITION 11\r
1118   SQL-WIDTH 4\r
1119   ORDER 110\r
1120 \r
1121 ADD FIELD "AuthorisedCapital" OF "Company" AS decimal \r
1122   FORMAT "->,>>>,>>>,>>9.99"\r
1123   INITIAL "0"\r
1124   LABEL "Authorised Capital"\r
1125   POSITION 12\r
1126   SQL-WIDTH 17\r
1127   DECIMALS 2\r
1128   ORDER 120\r
1129 \r
1130 ADD FIELD "IsssuedCapital" OF "Company" AS decimal \r
1131   FORMAT "->,>>>,>>>,>>9.99"\r
1132   INITIAL "0"\r
1133   LABEL "Issued Capital"\r
1134   POSITION 13\r
1135   SQL-WIDTH 17\r
1136   DECIMALS 2\r
1137   ORDER 130\r
1138 \r
1139 ADD FIELD "Paid" OF "Company" AS logical \r
1140   DESCRIPTION "Identifies if the issued capital for this compnay has been paid"\r
1141   FORMAT "Y/N"\r
1142   INITIAL "Y"\r
1143   POSITION 14\r
1144   SQL-WIDTH 1\r
1145   VIEW-AS "VIEW-AS TOGGLE-BOX"\r
1146   ORDER 140\r
1147 \r
1148 ADD FIELD "Secretary" OF "Company" AS integer \r
1149   DESCRIPTION "The person that is a secretary of this company"\r
1150   FORMAT ">>>>>9"\r
1151   INITIAL "0"\r
1152   POSITION 15\r
1153   SQL-WIDTH 4\r
1154   ORDER 150\r
1155   MANDATORY\r
1156 \r
1157 ADD FIELD "PreviousNames" OF "Company" AS character \r
1158   DESCRIPTION "Any previous names of the company"\r
1159   FORMAT "X(256)"\r
1160   INITIAL ""\r
1161   LABEL "Previous Names"\r
1162   POSITION 16\r
1163   SQL-WIDTH 512\r
1164   VIEW-AS "VIEW-AS EDITOR SIZE-CHARS 70 BY 3\r
1165  SCROLLBAR-VERTICAL"\r
1166   LENGTH 0\r
1167   ORDER 160\r
1168 \r
1169 ADD FIELD "OperationalCountry" OF "Company" AS character \r
1170   FORMAT "X(3)"\r
1171   INITIAL "NZL"\r
1172   POSITION 17\r
1173   SQL-WIDTH 6\r
1174   VIEW-AS "VIEW-AS RADIO-SET\r
1175   RADIO-BUTTONS\r
1176   ""New Zealand"", ""NZL"",\r
1177   ""Australian"",  ""AUS"",\r
1178   ""Other"",       ""OTH""\r
1179   VERTICAL\r
1180   SIZE-CHARS 16 by 3\r
1181 "\r
1182   LENGTH 0\r
1183   ORDER 170\r
1184   MANDATORY\r
1185 \r
1186 ADD FIELD "OwnCreditors" OF "Company" AS logical \r
1187   FORMAT "yes/no"\r
1188   INITIAL "no"\r
1189   LABEL "Own creditors"\r
1190   POSITION 18\r
1191   SQL-WIDTH 1\r
1192   ORDER 180\r
1193 \r
1194 ADD FIELD "LastModifiedDate" OF "Company" AS date \r
1195   DESCRIPTION "The date when this record was last modified.  Maintained by a WRITE trigger."\r
1196   FORMAT "99/99/9999"\r
1197   INITIAL "1/1/0001"\r
1198   POSITION 19\r
1199   SQL-WIDTH 4\r
1200   ORDER 190\r
1201   MANDATORY\r
1202 \r
1203 ADD FIELD "LastModifiedTime" OF "Company" AS integer \r
1204   DESCRIPTION "The time that this record was last modified"\r
1205   FORMAT "->,>>>,>>9"\r
1206   INITIAL "0"\r
1207   POSITION 20\r
1208   SQL-WIDTH 4\r
1209   ORDER 200\r
1210 \r
1211 ADD FIELD "LastModifiedUser" OF "Company" AS character \r
1212   DESCRIPTION "The user who last modified this record.  Maintained by a WRITE trigger."\r
1213   FORMAT "X(8)"\r
1214   INITIAL ""\r
1215   POSITION 21\r
1216   SQL-WIDTH 16\r
1217   LENGTH 0\r
1218   ORDER 210\r
1219 \r
1220 ADD FIELD "AuditRecordId" OF "Company" AS integer \r
1221   FORMAT "->,>>>,>>9"\r
1222   INITIAL "0"\r
1223   POSITION 22\r
1224   SQL-WIDTH 4\r
1225   ORDER 220\r
1226 \r
1227 ADD FIELD "Active" OF "Company" AS logical \r
1228   FORMAT "yes/no"\r
1229   INITIAL "Yes"\r
1230   POSITION 23\r
1231   SQL-WIDTH 1\r
1232   ORDER 230\r
1233 \r
1234 ADD FIELD "RegisteredNo" OF "Company" AS character \r
1235   DESCRIPTION "Registered company code"\r
1236   FORMAT "X(20)"\r
1237   INITIAL ""\r
1238   POSITION 24\r
1239   SQL-WIDTH 40\r
1240   ORDER 260\r
1241 \r
1242 ADD FIELD "TaxRegistered" OF "Company" AS logical \r
1243   DESCRIPTION "Whether the company has been registered for tax purposes or not."\r
1244   FORMAT "yes/no"\r
1245   INITIAL "no"\r
1246   POSITION 25\r
1247   SQL-WIDTH 1\r
1248   ORDER 270\r
1249 \r
1250 ADD FIELD "IncorporationDate" OF "Company" AS date \r
1251   DESCRIPTION "The date on which the company was officially incorporated or registered"\r
1252   FORMAT "99/99/9999"\r
1253   INITIAL ?\r
1254   LABEL "Incorporated"\r
1255   POSITION 26\r
1256   SQL-WIDTH 4\r
1257   COLUMN-LABEL "Incorp. Date"\r
1258   ORDER 280\r
1259 \r
1260 ADD FIELD "BusinessNo" OF "Company" AS character \r
1261   FORMAT "X(12)"\r
1262   INITIAL ""\r
1263   LABEL "Registered Business No"\r
1264   POSITION 27\r
1265   SQL-WIDTH 24\r
1266   ORDER 290\r
1267 \r
1268 ADD INDEX "XPKCompanies" ON "Company" \r
1269   AREA "Schema Area"\r
1270   UNIQUE\r
1271   PRIMARY\r
1272   INDEX-FIELD "CompanyCode" ASCENDING \r
1273 \r
1274 ADD INDEX "XAK1Companies" ON "Company" \r
1275   AREA "Schema Area"\r
1276   INDEX-FIELD "ShortName" ASCENDING ABBREVIATED \r
1277 \r
1278 ADD TABLE "Contact"\r
1279   AREA "Schema Area"\r
1280   DUMP-NAME "contact"\r
1281   TABLE-TRIGGER "DELETE" OVERRIDE PROCEDURE "decontct.p" CRC "?" \r
1282   TABLE-TRIGGER "WRITE" OVERRIDE PROCEDURE "wrcontct.p" CRC "?" \r
1283 \r
1284 ADD FIELD "PersonCode" OF "Contact" AS integer \r
1285   DESCRIPTION "A reference to the contact person."\r
1286   FORMAT ">>>>>9"\r
1287   INITIAL "0"\r
1288   LABEL "Person"\r
1289   POSITION 2\r
1290   SQL-WIDTH 4\r
1291   ORDER 10\r
1292 \r
1293 ADD FIELD "ContactType" OF "Contact" AS character \r
1294   DESCRIPTION "The type of contact involved."\r
1295   FORMAT "X(4)"\r
1296   INITIAL ""\r
1297   LABEL "Type"\r
1298   POSITION 3\r
1299   SQL-WIDTH 8\r
1300   LENGTH 0\r
1301   ORDER 20\r
1302   MANDATORY\r
1303 \r
1304 ADD FIELD "Notes" OF "Contact" AS integer \r
1305   DESCRIPTION "Any notes applying to the contact"\r
1306   FORMAT ">>>>>9"\r
1307   INITIAL "0"\r
1308   LABEL "Notes"\r
1309   POSITION 4\r
1310   SQL-WIDTH 4\r
1311   ORDER 30\r
1312   MANDATORY\r
1313 \r
1314 ADD FIELD "SystemCode" OF "Contact" AS logical \r
1315   FORMAT "yes/no"\r
1316   INITIAL "no"\r
1317   POSITION 5\r
1318   SQL-WIDTH 1\r
1319   HELP "Set to ""yes"" for system-maintained codes, ""no"" for user codes"\r
1320   ORDER 40\r
1321   MANDATORY\r
1322 \r
1323 ADD FIELD "Sort1" OF "Contact" AS character \r
1324   FORMAT "X(8)"\r
1325   INITIAL ""\r
1326   POSITION 6\r
1327   SQL-WIDTH 16\r
1328   ORDER 50\r
1329 \r
1330 ADD FIELD "Sort2" OF "Contact" AS character \r
1331   FORMAT "X(8)"\r
1332   INITIAL ""\r
1333   POSITION 7\r
1334   SQL-WIDTH 16\r
1335   ORDER 60\r
1336 \r
1337 ADD FIELD "Sort3" OF "Contact" AS character \r
1338   FORMAT "X(8)"\r
1339   INITIAL ""\r
1340   POSITION 8\r
1341   SQL-WIDTH 16\r
1342   ORDER 70\r
1343 \r
1344 ADD FIELD "Soundex1" OF "Contact" AS character \r
1345   DESCRIPTION "Soundex coding for the primary sort key"\r
1346   FORMAT "X(4)"\r
1347   INITIAL ""\r
1348   POSITION 9\r
1349   SQL-WIDTH 8\r
1350   ORDER 80\r
1351 \r
1352 ADD INDEX "Contacts" ON "Contact" \r
1353   AREA "Schema Area"\r
1354   UNIQUE\r
1355   PRIMARY\r
1356   INDEX-FIELD "PersonCode" ASCENDING \r
1357   INDEX-FIELD "ContactType" ASCENDING \r
1358 \r
1359 ADD INDEX "XAK1Contacts" ON "Contact" \r
1360   AREA "Schema Area"\r
1361   UNIQUE\r
1362   INDEX-FIELD "ContactType" ASCENDING \r
1363   INDEX-FIELD "PersonCode" ASCENDING \r
1364 \r
1365 ADD TABLE "ContactType"\r
1366   AREA "Schema Area"\r
1367   DUMP-NAME "contactt"\r
1368   TABLE-TRIGGER "WRITE" OVERRIDE PROCEDURE "wrctctyp.p" CRC "?" \r
1369 \r
1370 ADD FIELD "ContactType" OF "ContactType" AS character \r
1371   FORMAT "X(4)"\r
1372   INITIAL ""\r
1373   LABEL "Type"\r
1374   POSITION 2\r
1375   SQL-WIDTH 8\r
1376   LENGTH 0\r
1377   ORDER 10\r
1378   MANDATORY\r
1379 \r
1380 ADD FIELD "Description" OF "ContactType" AS character \r
1381   FORMAT "X(50)"\r
1382   INITIAL ""\r
1383   POSITION 3\r
1384   SQL-WIDTH 100\r
1385   LENGTH 0\r
1386   ORDER 20\r
1387 \r
1388 ADD FIELD "SystemCode" OF "ContactType" AS logical \r
1389   FORMAT "yes/no"\r
1390   INITIAL "no"\r
1391   POSITION 4\r
1392   SQL-WIDTH 1\r
1393   HELP "Set to ""yes"" for system-maintained codes, ""no"" for user codes"\r
1394   ORDER 30\r
1395   MANDATORY\r
1396 \r
1397 ADD INDEX "XPKContactTypes" ON "ContactType" \r
1398   AREA "Schema Area"\r
1399   UNIQUE\r
1400   PRIMARY\r
1401   INDEX-FIELD "ContactType" ASCENDING \r
1402 \r
1403 ADD TABLE "Contract"\r
1404   AREA "Schema Area"\r
1405   DUMP-NAME "contract"\r
1406   TABLE-TRIGGER "WRITE" OVERRIDE PROCEDURE "wrcontrt.p" CRC "?" \r
1407 \r
1408 ADD FIELD "CreditorCode" OF "Contract" AS integer \r
1409   DESCRIPTION "The creditor who is contracted to provide this service for this property"\r
1410   FORMAT "99999"\r
1411   INITIAL "0"\r
1412   LABEL "Creditor code"\r
1413   POSITION 2\r
1414   SQL-WIDTH 4\r
1415   COLUMN-LABEL "Code"\r
1416   ORDER 10\r
1417 \r
1418 ADD FIELD "PropertyCode" OF "Contract" AS integer \r
1419   DESCRIPTION "The property the service is being provided for."\r
1420   FORMAT "99999"\r
1421   INITIAL "0"\r
1422   LABEL "Property"\r
1423   POSITION 3\r
1424   SQL-WIDTH 4\r
1425   ORDER 20\r
1426 \r
1427 ADD FIELD "ServiceType" OF "Contract" AS character \r
1428   FORMAT "X(4)"\r
1429   INITIAL ""\r
1430   LABEL "Service type"\r
1431   POSITION 4\r
1432   SQL-WIDTH 8\r
1433   COLUMN-LABEL "Service"\r
1434   LENGTH 0\r
1435   ORDER 30\r
1436   MANDATORY\r
1437 \r
1438 ADD FIELD "Contact" OF "Contract" AS integer \r
1439   DESCRIPTION "A person to contact for problems relating to this area of service."\r
1440   FORMAT ">>>>>9"\r
1441   INITIAL "0"\r
1442   LABEL "Contact"\r
1443   POSITION 5\r
1444   SQL-WIDTH 4\r
1445   ORDER 40\r
1446   MANDATORY\r
1447 \r
1448 ADD FIELD "NoteCode" OF "Contract" AS integer \r
1449   DESCRIPTION "Any notes relating specifically to this contract."\r
1450   FORMAT ">>>>>9"\r
1451   INITIAL "0"\r
1452   POSITION 6\r
1453   SQL-WIDTH 4\r
1454   ORDER 50\r
1455   MANDATORY\r
1456 \r
1457 ADD FIELD "AnnualEstimate" OF "Contract" AS decimal \r
1458   DESCRIPTION "The estimated annual amount payable to the contractor for this service, where the service is not covered by a fixed price contract."\r
1459   FORMAT "->,>>>,>>9.99"\r
1460   INITIAL "0"\r
1461   LABEL "Estimate p.a."\r
1462   POSITION 7\r
1463   SQL-WIDTH 17\r
1464   DECIMALS 2\r
1465   ORDER 60\r
1466 \r
1467 ADD FIELD "ContractReference" OF "Contract" AS character \r
1468   DESCRIPTION "A reference to the physical contract documentation."\r
1469   FORMAT "X(50)"\r
1470   INITIAL ""\r
1471   LABEL "Description"\r
1472   POSITION 8\r
1473   SQL-WIDTH 100\r
1474   COLUMN-LABEL "Description / Reference"\r
1475   LENGTH 0\r
1476   ORDER 70\r
1477   MANDATORY\r
1478 \r
1479 ADD FIELD "EndDate" OF "Contract" AS date \r
1480   DESCRIPTION "The date on which the contract finishes."\r
1481   FORMAT "99/99/9999"\r
1482   INITIAL ?\r
1483   LABEL "End date"\r
1484   POSITION 9\r
1485   SQL-WIDTH 4\r
1486   ORDER 80\r
1487 \r
1488 ADD FIELD "FixedAmount" OF "Contract" AS decimal \r
1489   DESCRIPTION "The annual amount payable on this contract, if it is for a fixed amount."\r
1490   FORMAT "->,>>>,>>9.99"\r
1491   INITIAL "0"\r
1492   LABEL "Fixed"\r
1493   POSITION 10\r
1494   SQL-WIDTH 17\r
1495   DECIMALS 2\r
1496   ORDER 90\r
1497 \r
1498 ADD FIELD "FrequencyCode" OF "Contract" AS character \r
1499   DESCRIPTION "The frequency with which payments are made for any fixed amount payable under this contract."\r
1500   FORMAT "X(4)"\r
1501   INITIAL ""\r
1502   LABEL "Pmt Frequency"\r
1503   POSITION 11\r
1504   SQL-WIDTH 8\r
1505   LENGTH 0\r
1506   ORDER 130\r
1507   MANDATORY\r
1508 \r
1509 ADD FIELD "ReviewDate" OF "Contract" AS date \r
1510   DESCRIPTION "The date on which the contract should next be reviewed, if desired."\r
1511   FORMAT "99/99/9999"\r
1512   INITIAL ?\r
1513   LABEL "Review"\r
1514   POSITION 12\r
1515   SQL-WIDTH 4\r
1516   ORDER 110\r
1517 \r
1518 ADD FIELD "StartDate" OF "Contract" AS date \r
1519   DESCRIPTION "The date on which the contract commences."\r
1520   FORMAT "99/99/9999"\r
1521   INITIAL ?\r
1522   LABEL "Start"\r
1523   POSITION 13\r
1524   SQL-WIDTH 4\r
1525   ORDER 120\r
1526 \r
1527 ADD FIELD "LastModifiedDate" OF "Contract" AS date \r
1528   DESCRIPTION "The date when this record was last modified.  Maintained by a WRITE trigger."\r
1529   FORMAT "99/99/9999"\r
1530   INITIAL "1/1/0001"\r
1531   POSITION 14\r
1532   SQL-WIDTH 4\r
1533   ORDER 140\r
1534   MANDATORY\r
1535 \r
1536 ADD FIELD "LastModifiedTime" OF "Contract" AS integer \r
1537   DESCRIPTION "The time that this record was last modified"\r
1538   FORMAT "->,>>>,>>9"\r
1539   INITIAL "0"\r
1540   POSITION 15\r
1541   SQL-WIDTH 4\r
1542   ORDER 150\r
1543 \r
1544 ADD FIELD "LastModifiedUser" OF "Contract" AS character \r
1545   DESCRIPTION "The user who last modified this record.  Maintained by a WRITE trigger."\r
1546   FORMAT "X(8)"\r
1547   INITIAL ""\r
1548   POSITION 16\r
1549   SQL-WIDTH 16\r
1550   LENGTH 0\r
1551   ORDER 160\r
1552 \r
1553 ADD FIELD "AuditRecordId" OF "Contract" AS integer \r
1554   FORMAT "->,>>>,>>9"\r
1555   INITIAL "0"\r
1556   POSITION 17\r
1557   SQL-WIDTH 4\r
1558   ORDER 170\r
1559 \r
1560 ADD FIELD "TerminationNotice" OF "Contract" AS integer \r
1561   FORMAT ">>9"\r
1562   INITIAL "0"\r
1563   LABEL "Term. Notice"\r
1564   POSITION 18\r
1565   SQL-WIDTH 4\r
1566   COLUMN-LABEL "Term. Not."\r
1567   HELP "No. of months notice required to terminate the contract"\r
1568   ORDER 180\r
1569 \r
1570 ADD FIELD "Renewing" OF "Contract" AS logical \r
1571   DESCRIPTION "No, if the contract ends permanently after the end date, Yes if we will still require a contract for this service (used for forecasting"\r
1572   FORMAT "yes/no"\r
1573   INITIAL "Yes"\r
1574   POSITION 19\r
1575   SQL-WIDTH 1\r
1576   ORDER 190\r
1577 \r
1578 ADD FIELD "Recoverable" OF "Contract" AS logical \r
1579   DESCRIPTION "Whether the contract costs are recoverable from tenants"\r
1580   FORMAT "yes/no"\r
1581   INITIAL "Yes"\r
1582   POSITION 20\r
1583   SQL-WIDTH 1\r
1584   COLUMN-LABEL "Rec"\r
1585   ORDER 200\r
1586 \r
1587 ADD FIELD "PaymentDate" OF "Contract" AS date \r
1588   DESCRIPTION "A date on which payment has been made to aid calculation of future payment dates"\r
1589   FORMAT "99/99/9999"\r
1590   INITIAL ?\r
1591   LABEL "Payment Cycle"\r
1592   POSITION 21\r
1593   SQL-WIDTH 4\r
1594   ORDER 210\r
1595 \r
1596 ADD FIELD "ContractSeq" OF "Contract" AS integer \r
1597   FORMAT "->,>>>,>>9"\r
1598   INITIAL "10"\r
1599   LABEL "Seq#"\r
1600   POSITION 22\r
1601   SQL-WIDTH 4\r
1602   ORDER 220\r
1603 \r
1604 ADD FIELD "IsContracted" OF "Contract" AS logical \r
1605   FORMAT "yes/no"\r
1606   INITIAL "no"\r
1607   LABEL "Contracted"\r
1608   POSITION 23\r
1609   SQL-WIDTH 1\r
1610   HELP "Is this a contracted expense, or an estimated one"\r
1611   ORDER 230\r
1612 \r
1613 ADD FIELD "OrderCode" OF "Contract" AS integer \r
1614   DESCRIPTION "Associated order for contracted supply."\r
1615   FORMAT ">>>>9"\r
1616   INITIAL "0"\r
1617   POSITION 24\r
1618   SQL-WIDTH 4\r
1619   ORDER 240\r
1620 \r
1621 ADD FIELD "Active" OF "Contract" AS logical \r
1622   DESCRIPTION "Flag to indicate whether the contract is active or inactive"\r
1623   FORMAT "yes/no"\r
1624   INITIAL "yes"\r
1625   POSITION 25\r
1626   SQL-WIDTH 1\r
1627   ORDER 250\r
1628 \r
1629 ADD INDEX "XPKContracts" ON "Contract" \r
1630   AREA "Schema Area"\r
1631   UNIQUE\r
1632   PRIMARY\r
1633   INDEX-FIELD "PropertyCode" ASCENDING \r
1634   INDEX-FIELD "ServiceType" ASCENDING \r
1635   INDEX-FIELD "CreditorCode" ASCENDING \r
1636   INDEX-FIELD "ContractSeq" ASCENDING \r
1637 \r
1638 ADD INDEX "XAK1Contracts" ON "Contract" \r
1639   AREA "Schema Area"\r
1640   UNIQUE\r
1641   INDEX-FIELD "CreditorCode" ASCENDING \r
1642   INDEX-FIELD "ServiceType" ASCENDING \r
1643   INDEX-FIELD "PropertyCode" ASCENDING \r
1644   INDEX-FIELD "ContractSeq" ASCENDING \r
1645 \r
1646 ADD TABLE "CashFlow"\r
1647   AREA "Schema Area"\r
1648   DUMP-NAME "contrac1"\r
1649 \r
1650 ADD FIELD "ScenarioCode" OF "CashFlow" AS integer \r
1651   DESCRIPTION "A code identifying the scenario that this cash flow belongs to."\r
1652   FORMAT ">>>>>9"\r
1653   INITIAL "0"\r
1654   LABEL "Scenario"\r
1655   POSITION 2\r
1656   SQL-WIDTH 4\r
1657   ORDER 10\r
1658 \r
1659 ADD FIELD "EntityType" OF "CashFlow" AS character \r
1660   FORMAT "X(4)"\r
1661   INITIAL ""\r
1662   LABEL "Entity type"\r
1663   POSITION 3\r
1664   SQL-WIDTH 8\r
1665   LENGTH 0\r
1666   ORDER 20\r
1667   MANDATORY\r
1668 \r
1669 ADD FIELD "EntityCode" OF "CashFlow" AS integer \r
1670   FORMAT "99999"\r
1671   INITIAL "0"\r
1672   LABEL "Entity"\r
1673   POSITION 4\r
1674   SQL-WIDTH 4\r
1675   ORDER 30\r
1676   MANDATORY\r
1677 \r
1678 ADD FIELD "AccountCode" OF "CashFlow" AS decimal \r
1679   DESCRIPTION "An account, from the chart of accounts, that this cash flow relates to."\r
1680   FORMAT "9999.99"\r
1681   INITIAL "0"\r
1682   LABEL "Account"\r
1683   POSITION 5\r
1684   SQL-WIDTH 17\r
1685   DECIMALS 2\r
1686   ORDER 40\r
1687 \r
1688 ADD FIELD "FrequencyCode" OF "CashFlow" AS character \r
1689   DESCRIPTION "The code used to refer to this kind of regularity"\r
1690   FORMAT "X(4)"\r
1691   INITIAL ""\r
1692   POSITION 6\r
1693   SQL-WIDTH 8\r
1694   ORDER 140\r
1695 \r
1696 ADD FIELD "Sequence" OF "CashFlow" AS integer \r
1697   DESCRIPTION "An arbitrary sequence number to make the record key for the contracted cash flows file unique."\r
1698   FORMAT ">>>>>9"\r
1699   INITIAL "0"\r
1700   POSITION 7\r
1701   SQL-WIDTH 4\r
1702   ORDER 60\r
1703 \r
1704 ADD FIELD "CashFlowType" OF "CashFlow" AS character \r
1705   FORMAT "X(4)"\r
1706   INITIAL ""\r
1707   LABEL "Type"\r
1708   POSITION 8\r
1709   SQL-WIDTH 8\r
1710   LENGTH 0\r
1711   ORDER 70\r
1712   MANDATORY\r
1713 \r
1714 ADD FIELD "CFChangeType" OF "CashFlow" AS character \r
1715   FORMAT "X(4)"\r
1716   INITIAL ""\r
1717   LABEL "Change type"\r
1718   POSITION 9\r
1719   SQL-WIDTH 8\r
1720   COLUMN-LABEL "Change"\r
1721   ORDER 150\r
1722 \r
1723 ADD FIELD "Amount" OF "CashFlow" AS decimal \r
1724   DESCRIPTION "The amount of each occurrence of the cash flow."\r
1725   FORMAT "->>,>>>,>>>,>>9.99"\r
1726   INITIAL "0"\r
1727   POSITION 10\r
1728   SQL-WIDTH 17\r
1729   DECIMALS 2\r
1730   ORDER 90\r
1731 \r
1732 ADD FIELD "Description" OF "CashFlow" AS character \r
1733   DESCRIPTION "A brief description of the cash flow."\r
1734   FORMAT "X(50)"\r
1735   INITIAL ""\r
1736   POSITION 11\r
1737   SQL-WIDTH 100\r
1738   ORDER 110\r
1739 \r
1740 ADD FIELD "EndDate" OF "CashFlow" AS date \r
1741   DESCRIPTION "The date after which this cash flow no longer occurs."\r
1742   FORMAT "99/99/9999"\r
1743   INITIAL ?\r
1744   LABEL "Finish"\r
1745   POSITION 12\r
1746   SQL-WIDTH 4\r
1747   ORDER 120\r
1748 \r
1749 ADD FIELD "StartDate" OF "CashFlow" AS date \r
1750   DESCRIPTION "The date on which this cash flow first occurs."\r
1751   FORMAT "99/99/9999"\r
1752   INITIAL ?\r
1753   LABEL "Start"\r
1754   POSITION 13\r
1755   SQL-WIDTH 4\r
1756   ORDER 130\r
1757 \r
1758 ADD FIELD "RelatedKey" OF "CashFlow" AS character \r
1759   DESCRIPTION "Key to related record in database"\r
1760   FORMAT "X(50)"\r
1761   INITIAL ""\r
1762   POSITION 14\r
1763   SQL-WIDTH 100\r
1764   ORDER 160\r
1765 \r
1766 ADD INDEX "XPKCashFlow" ON "CashFlow" \r
1767   AREA "Schema Area"\r
1768   UNIQUE\r
1769   PRIMARY\r
1770   INDEX-FIELD "ScenarioCode" ASCENDING \r
1771   INDEX-FIELD "EntityType" ASCENDING \r
1772   INDEX-FIELD "EntityCode" ASCENDING \r
1773   INDEX-FIELD "AccountCode" ASCENDING \r
1774   INDEX-FIELD "Sequence" ASCENDING \r
1775   INDEX-FIELD "CashFlowType" ASCENDING \r
1776 \r
1777 ADD INDEX "XAK1CashFlow" ON "CashFlow" \r
1778   AREA "Schema Area"\r
1779   INDEX-FIELD "ScenarioCode" ASCENDING \r
1780   INDEX-FIELD "CashFlowType" ASCENDING \r
1781 \r
1782 ADD INDEX "XAK2CashFlow" ON "CashFlow" \r
1783   AREA "Schema Area"\r
1784   INDEX-FIELD "ScenarioCode" ASCENDING \r
1785   INDEX-FIELD "RelatedKey" ASCENDING \r
1786   INDEX-FIELD "StartDate" ASCENDING \r
1787 \r
1788 ADD TABLE "Creditor"\r
1789   AREA "Schema Area"\r
1790   DUMP-NAME "creditor"\r
1791   TABLE-TRIGGER "CREATE" OVERRIDE PROCEDURE "crcdtor.p" CRC "?" \r
1792   TABLE-TRIGGER "WRITE" OVERRIDE PROCEDURE "wrcrdtor.p" CRC "?" \r
1793 \r
1794 ADD FIELD "CreditorCode" OF "Creditor" AS integer \r
1795   DESCRIPTION "The code used to refer to a creditor."\r
1796   FORMAT "99999"\r
1797   INITIAL "0"\r
1798   LABEL "Creditor"\r
1799   POSITION 2\r
1800   SQL-WIDTH 4\r
1801   ORDER 10\r
1802 \r
1803 ADD FIELD "PaymentContact" OF "Creditor" AS integer \r
1804   DESCRIPTION "A primary contact for matters relating to payment of this creditor.  The address will be used for correspondence related to accounts, especially remittances."\r
1805   FORMAT ">>>>>9"\r
1806   INITIAL "0"\r
1807   LABEL "Payment contact"\r
1808   POSITION 3\r
1809   SQL-WIDTH 4\r
1810   ORDER 20\r
1811 \r
1812 ADD FIELD "Name" OF "Creditor" AS character \r
1813   DESCRIPTION "A name used to refer to this creditor."\r
1814   FORMAT "X(50)"\r
1815   INITIAL ""\r
1816   POSITION 4\r
1817   SQL-WIDTH 100\r
1818   ORDER 30\r
1819   MANDATORY\r
1820 \r
1821 ADD FIELD "PayeeName" OF "Creditor" AS character \r
1822   DESCRIPTION "A name used only for the 'Payee Name' in the writing of cheques to this creditor.  Auditing of changes will be required.  This will be recorded against each cheque record in any case."\r
1823   FORMAT "X(100)"\r
1824   INITIAL ""\r
1825   LABEL "Payee name"\r
1826   POSITION 5\r
1827   SQL-WIDTH 200\r
1828   LENGTH 0\r
1829   ORDER 40\r
1830 \r
1831 ADD FIELD "OtherContact" OF "Creditor" AS integer \r
1832   DESCRIPTION "A secondary contact for matters relating to this creditor."\r
1833   FORMAT ">>>>>9"\r
1834   INITIAL "0"\r
1835   LABEL "Other contact"\r
1836   POSITION 6\r
1837   SQL-WIDTH 4\r
1838   ORDER 50\r
1839   MANDATORY\r
1840 \r
1841 ADD FIELD "Active" OF "Creditor" AS logical \r
1842   DESCRIPTION "Flag to indicate whether the creditor is active or inactive"\r
1843   FORMAT "yes/no"\r
1844   INITIAL "no"\r
1845   POSITION 7\r
1846   SQL-WIDTH 1\r
1847   ORDER 60\r
1848 \r
1849 ADD FIELD "PaymentStyle" OF "Creditor" AS character \r
1850   FORMAT "X(4)"\r
1851   INITIAL "CHEQ"\r
1852   LABEL "Pay By"\r
1853   POSITION 8\r
1854   SQL-WIDTH 8\r
1855   ORDER 190\r
1856 \r
1857 ADD FIELD "BankDetails" OF "Creditor" AS character \r
1858   FORMAT "X(70)"\r
1859   INITIAL ""\r
1860   LABEL "A/c details"\r
1861   POSITION 9\r
1862   SQL-WIDTH 140\r
1863   COLUMN-LABEL "Bank Account Details"\r
1864   ORDER 200\r
1865 \r
1866 ADD FIELD "CompanyCode" OF "Creditor" AS integer \r
1867   DESCRIPTION "The code used to refer to a company."\r
1868   FORMAT "99999"\r
1869   INITIAL "0"\r
1870   LABEL "Company"\r
1871   POSITION 10\r
1872   SQL-WIDTH 4\r
1873   ORDER 90\r
1874 \r
1875 ADD FIELD "LastModifiedDate" OF "Creditor" AS date \r
1876   DESCRIPTION "The date when this record was last modified.  Maintained by a WRITE trigger."\r
1877   FORMAT "99/99/9999"\r
1878   INITIAL "1/1/0001"\r
1879   POSITION 11\r
1880   SQL-WIDTH 4\r
1881   ORDER 100\r
1882   MANDATORY\r
1883 \r
1884 ADD FIELD "LastModifiedTime" OF "Creditor" AS integer \r
1885   DESCRIPTION "The time that this record was last modified"\r
1886   FORMAT "->,>>>,>>9"\r
1887   INITIAL "0"\r
1888   POSITION 12\r
1889   SQL-WIDTH 4\r
1890   ORDER 110\r
1891 \r
1892 ADD FIELD "LastModifiedUser" OF "Creditor" AS character \r
1893   DESCRIPTION "The user who last modified this record.  Maintained by a WRITE trigger."\r
1894   FORMAT "X(8)"\r
1895   INITIAL ""\r
1896   POSITION 13\r
1897   SQL-WIDTH 16\r
1898   LENGTH 0\r
1899   ORDER 120\r
1900 \r
1901 ADD FIELD "AuditRecordId" OF "Creditor" AS integer \r
1902   FORMAT "->,>>>,>>9"\r
1903   INITIAL "0"\r
1904   POSITION 14\r
1905   SQL-WIDTH 4\r
1906   ORDER 130\r
1907 \r
1908 ADD FIELD "ChequesPerMonth" OF "Creditor" AS integer \r
1909   FORMAT ">>9"\r
1910   INITIAL "31"\r
1911   LABEL "Cheques/mth"\r
1912   POSITION 15\r
1913   SQL-WIDTH 4\r
1914   ORDER 140\r
1915 \r
1916 ADD FIELD "VchrEntityType" OF "Creditor" AS character \r
1917   FORMAT "X"\r
1918   INITIAL ""\r
1919   POSITION 16\r
1920   SQL-WIDTH 2\r
1921   ORDER 150\r
1922 \r
1923 ADD FIELD "VchrEntityCode" OF "Creditor" AS integer \r
1924   FORMAT "99999"\r
1925   INITIAL "0"\r
1926   POSITION 17\r
1927   SQL-WIDTH 4\r
1928   ORDER 160\r
1929 \r
1930 ADD FIELD "VchrAccountCode" OF "Creditor" AS decimal \r
1931   FORMAT "9999.99"\r
1932   INITIAL "0"\r
1933   POSITION 18\r
1934   SQL-WIDTH 17\r
1935   DECIMALS 2\r
1936   ORDER 170\r
1937 \r
1938 ADD FIELD "VchrApprover" OF "Creditor" AS character \r
1939   FORMAT "X(4)"\r
1940   INITIAL ""\r
1941   POSITION 19\r
1942   SQL-WIDTH 8\r
1943   ORDER 180\r
1944 \r
1945 ADD FIELD "BankDetailsChangedBy" OF "Creditor" AS character \r
1946   FORMAT "X(20)"\r
1947   INITIAL ""\r
1948   LABEL "Changed By User"\r
1949   POSITION 20\r
1950   SQL-WIDTH 40\r
1951   COLUMN-LABEL "Changed"\r
1952   HELP "The user who last changed the Bank A/C details"\r
1953   ORDER 210\r
1954   MANDATORY\r
1955 \r
1956 ADD FIELD "EnableDirectPayment" OF "Creditor" AS logical \r
1957   FORMAT "yes/no"\r
1958   INITIAL "no"\r
1959   POSITION 21\r
1960   SQL-WIDTH 1\r
1961   HELP "Whether or not direct payments are enabled"\r
1962   ORDER 220\r
1963 \r
1964 ADD FIELD "DirectPaymentEnabledBy" OF "Creditor" AS character \r
1965   FORMAT "X(20)"\r
1966   INITIAL ""\r
1967   LABEL "User Name"\r
1968   POSITION 22\r
1969   SQL-WIDTH 40\r
1970   COLUMN-LABEL "User"\r
1971   HELP "The user who enabled direct payments"\r
1972   ORDER 230\r
1973   MANDATORY\r
1974 \r
1975 ADD FIELD "NonAccounting" OF "Creditor" AS logical \r
1976   DESCRIPTION "True if this creditor is a non-accounting creditor.  If so then the AcctCreditorCode would usually be set to the actual accounting creditor"\r
1977   FORMAT "yes/no"\r
1978   INITIAL "No"\r
1979   POSITION 23\r
1980   SQL-WIDTH 1\r
1981   COLUMN-LABEL "Non-A"\r
1982   HELP "If this creditor should not allow transactions"\r
1983   ORDER 240\r
1984 \r
1985 ADD FIELD "AcctCreditorCode" OF "Creditor" AS integer \r
1986   DESCRIPTION "The code of another creditor if this creditor is a non-accounting creditor"\r
1987   FORMAT "99999"\r
1988   INITIAL "0"\r
1989   LABEL "Acct Creditor"\r
1990   POSITION 24\r
1991   SQL-WIDTH 4\r
1992   COLUMN-LABEL "A/C Crd"\r
1993   HELP "Creditor code of the actual accounting creditor"\r
1994   ORDER 250\r
1995 \r
1996 ADD FIELD "DcStatementText" OF "Creditor" AS character \r
1997   DESCRIPTION "The details from the creditor which should appear on their bank statement when we pay them by direct credit"\r
1998   FORMAT "X(24)"\r
1999   INITIAL ""\r
2000   LABEL "Their Coding"\r
2001   POSITION 25\r
2002   SQL-WIDTH 48\r
2003   COLUMN-LABEL "Cred A/C #"\r
2004   HELP "Our account number with the creditor, or other statement detail"\r
2005   ORDER 260\r
2006 \r
2007 ADD FIELD "DcRemittanceEmail" OF "Creditor" AS character \r
2008   DESCRIPTION "The e-mail address of someone to send the PDF remittance advice to"\r
2009   FORMAT "X(50)"\r
2010   INITIAL ""\r
2011   LABEL "EMail Remittance To"\r
2012   POSITION 26\r
2013   SQL-WIDTH 100\r
2014   HELP "The e-mail address to send the remittance to"\r
2015   ORDER 270\r
2016 \r
2017 ADD INDEX "Creditors" ON "Creditor" \r
2018   AREA "Schema Area"\r
2019   UNIQUE\r
2020   PRIMARY\r
2021   INDEX-FIELD "CreditorCode" ASCENDING \r
2022 \r
2023 ADD INDEX "XAK1Creditors" ON "Creditor" \r
2024   AREA "Schema Area"\r
2025   INDEX-FIELD "Name" ASCENDING \r
2026 \r
2027 ADD INDEX "XAK3Creditors" ON "Creditor" \r
2028   AREA "Schema Area"\r
2029   UNIQUE\r
2030   INDEX-FIELD "Active" ASCENDING \r
2031   INDEX-FIELD "CreditorCode" ASCENDING \r
2032 \r
2033 ADD INDEX "XAK4Creditors" ON "Creditor" \r
2034   AREA "Schema Area"\r
2035   INDEX-FIELD "Active" ASCENDING \r
2036   INDEX-FIELD "Name" ASCENDING \r
2037 \r
2038 ADD INDEX "XAK6Creditors" ON "Creditor" \r
2039   AREA "Schema Area"\r
2040   UNIQUE\r
2041   INDEX-FIELD "Active" ASCENDING \r
2042   INDEX-FIELD "NonAccounting" ASCENDING \r
2043   INDEX-FIELD "CreditorCode" ASCENDING \r
2044 \r
2045 ADD INDEX "XAK7Creditors" ON "Creditor" \r
2046   AREA "Schema Area"\r
2047   INDEX-FIELD "Active" ASCENDING \r
2048   INDEX-FIELD "NonAccounting" ASCENDING \r
2049   INDEX-FIELD "Name" ASCENDING \r
2050 \r
2051 ADD INDEX "XAK8Creditors" ON "Creditor" \r
2052   AREA "Schema Area"\r
2053   INDEX-FIELD "PaymentContact" ASCENDING \r
2054 \r
2055 ADD TABLE "Directorship"\r
2056   AREA "Schema Area"\r
2057   DUMP-NAME "director"\r
2058   TABLE-TRIGGER "DELETE" OVERRIDE PROCEDURE "dedrctor.p" CRC "?" \r
2059 \r
2060 ADD FIELD "CompanyCode" OF "Directorship" AS integer \r
2061   DESCRIPTION "The code of the company that this person is a director of."\r
2062   FORMAT "99999"\r
2063   INITIAL "0"\r
2064   LABEL "Company"\r
2065   POSITION 2\r
2066   SQL-WIDTH 4\r
2067   ORDER 10\r
2068 \r
2069 ADD FIELD "PersonCode" OF "Directorship" AS integer \r
2070   DESCRIPTION "The person that is a director of this company"\r
2071   FORMAT ">>>>>9"\r
2072   INITIAL "0"\r
2073   LABEL "Person"\r
2074   POSITION 3\r
2075   SQL-WIDTH 4\r
2076   ORDER 20\r
2077   MANDATORY\r
2078 \r
2079 ADD FIELD "NoteCode" OF "Directorship" AS integer \r
2080   DESCRIPTION "Any notes about the directorship."\r
2081   FORMAT ">>>>>9"\r
2082   INITIAL "0"\r
2083   POSITION 4\r
2084   SQL-WIDTH 4\r
2085   ORDER 30\r
2086 \r
2087 ADD INDEX "Directorships" ON "Directorship" \r
2088   AREA "Schema Area"\r
2089   UNIQUE\r
2090   PRIMARY\r
2091   INDEX-FIELD "CompanyCode" ASCENDING \r
2092   INDEX-FIELD "PersonCode" ASCENDING \r
2093 \r
2094 ADD TABLE "Document"\r
2095   AREA "Schema Area"\r
2096   DUMP-NAME "document"\r
2097   TABLE-TRIGGER "DELETE" OVERRIDE PROCEDURE "dedocmnt.p" CRC "?" \r
2098 \r
2099 ADD FIELD "BatchCode" OF "Document" AS integer \r
2100   DESCRIPTION "The batch which this document is a part of."\r
2101   FORMAT ">>>>>9"\r
2102   INITIAL "0"\r
2103   LABEL "Batch No."\r
2104   POSITION 2\r
2105   SQL-WIDTH 4\r
2106   COLUMN-LABEL "Batch"\r
2107   COLUMN-LABEL-SA "C"\r
2108   ORDER 10\r
2109 \r
2110 ADD FIELD "DocumentCode" OF "Document" AS integer \r
2111   DESCRIPTION "The code used to refer to this document within the batch."\r
2112   FORMAT ">>>>>9"\r
2113   INITIAL "0"\r
2114   LABEL "Document No."\r
2115   POSITION 3\r
2116   SQL-WIDTH 4\r
2117   COLUMN-LABEL "Doc #"\r
2118   COLUMN-LABEL-SA "C"\r
2119   ORDER 20\r
2120 \r
2121 ADD FIELD "Description" OF "Document" AS character \r
2122   DESCRIPTION "A description of this document."\r
2123   FORMAT "X(50)"\r
2124   INITIAL ""\r
2125   POSITION 4\r
2126   SQL-WIDTH 100\r
2127   ORDER 30\r
2128 \r
2129 ADD FIELD "Reference" OF "Document" AS character \r
2130   DESCRIPTION "Any reference applying  to this document."\r
2131   FORMAT "X(12)"\r
2132   INITIAL ""\r
2133   POSITION 5\r
2134   SQL-WIDTH 24\r
2135   ORDER 40\r
2136 \r
2137 ADD FIELD "TransactionCount" OF "Document" AS integer \r
2138   DESCRIPTION "The total number of transactions which make up this document."\r
2139   FORMAT ">>>>>9"\r
2140   INITIAL "0"\r
2141   LABEL "Transactions"\r
2142   POSITION 6\r
2143   SQL-WIDTH 4\r
2144   COLUMN-LABEL "# Trn"\r
2145   ORDER 50\r
2146 \r
2147 ADD FIELD "DocumentType" OF "Document" AS character \r
2148   FORMAT "X(4)"\r
2149   INITIAL ?\r
2150   LABEL "Type"\r
2151   POSITION 7\r
2152   SQL-WIDTH 8\r
2153   COLUMN-LABEL "T"\r
2154   HELP "Journal, Cheque, Invoice, Voucher,Bank statement, ..."\r
2155   LENGTH 0\r
2156   ORDER 60\r
2157   MANDATORY\r
2158 \r
2159 ADD INDEX "Documents" ON "Document" \r
2160   AREA "Schema Area"\r
2161   UNIQUE\r
2162   PRIMARY\r
2163   INDEX-FIELD "BatchCode" ASCENDING \r
2164   INDEX-FIELD "DocumentCode" ASCENDING \r
2165 \r
2166 ADD TABLE "EntityType"\r
2167   AREA "Schema Area"\r
2168   DUMP-NAME "entityty"\r
2169 \r
2170 ADD FIELD "EntityType" OF "EntityType" AS character \r
2171   FORMAT "X(4)"\r
2172   INITIAL ""\r
2173   LABEL "Entity type code"\r
2174   POSITION 2\r
2175   SQL-WIDTH 8\r
2176   LENGTH 0\r
2177   ORDER 10\r
2178   MANDATORY\r
2179 \r
2180 ADD FIELD "Description" OF "EntityType" AS character \r
2181   FORMAT "X(50)"\r
2182   INITIAL ""\r
2183   POSITION 3\r
2184   SQL-WIDTH 100\r
2185   LENGTH 0\r
2186   ORDER 20\r
2187 \r
2188 ADD INDEX "XPKEntityTypes" ON "EntityType" \r
2189   AREA "Schema Area"\r
2190   UNIQUE\r
2191   PRIMARY\r
2192   INDEX-FIELD "EntityType" ASCENDING \r
2193 \r
2194 ADD TABLE "FinancialYear"\r
2195   AREA "Schema Area"\r
2196   DUMP-NAME "financia"\r
2197 \r
2198 ADD FIELD "FinancialYearCode" OF "FinancialYear" AS integer \r
2199   DESCRIPTION "The code used to refer to a financial year."\r
2200   FORMAT ">>>9"\r
2201   INITIAL "0"\r
2202   LABEL "Year"\r
2203   POSITION 2\r
2204   SQL-WIDTH 4\r
2205   ORDER 10\r
2206 \r
2207 ADD FIELD "Description" OF "FinancialYear" AS character \r
2208   DESCRIPTION "Text describing the financial year."\r
2209   FORMAT "X(50)"\r
2210   INITIAL ""\r
2211   POSITION 3\r
2212   SQL-WIDTH 100\r
2213   LENGTH 0\r
2214   ORDER 20\r
2215 \r
2216 ADD INDEX "FinancialYears" ON "FinancialYear" \r
2217   AREA "Schema Area"\r
2218   UNIQUE\r
2219   PRIMARY\r
2220   INDEX-FIELD "FinancialYearCode" ASCENDING \r
2221 \r
2222 ADD TABLE "FrequencyType"\r
2223   AREA "Schema Area"\r
2224   DUMP-NAME "frequenc"\r
2225 \r
2226 ADD FIELD "FrequencyCode" OF "FrequencyType" AS character \r
2227   DESCRIPTION "The code used to refer to this kind of regularity"\r
2228   FORMAT "X(4)"\r
2229   INITIAL ""\r
2230   POSITION 2\r
2231   SQL-WIDTH 8\r
2232   LENGTH 0\r
2233   ORDER 10\r
2234 \r
2235 ADD FIELD "DaysOfMonth" OF "FrequencyType" AS character \r
2236   DESCRIPTION "The days of the month when it is valid for this frequency to occur, e.g. '8-14' would be the second week of the month."\r
2237   FORMAT "X(50)"\r
2238   INITIAL ""\r
2239   LABEL "Days of month"\r
2240   POSITION 3\r
2241   SQL-WIDTH 100\r
2242   HELP "e.g 8-14 would be only during the second week."\r
2243   LENGTH 0\r
2244   ORDER 20\r
2245 \r
2246 ADD FIELD "DaysOfWeek" OF "FrequencyType" AS character \r
2247   DESCRIPTION "The days of the week when it is valid for this repeat to occur, e.g. 'Mon-Fri' would allow the event only on business days."\r
2248   FORMAT "X(50)"\r
2249   INITIAL ""\r
2250   LABEL "Days of week"\r
2251   POSITION 4\r
2252   SQL-WIDTH 100\r
2253   HELP "e.g. Mon-Fri would be only business days"\r
2254   LENGTH 0\r
2255   ORDER 30\r
2256 \r
2257 ADD FIELD "Description" OF "FrequencyType" AS character \r
2258   DESCRIPTION "A description of this frequency - '5 per year' or 'Monthly' for example."\r
2259   FORMAT "X(50)"\r
2260   INITIAL ""\r
2261   POSITION 5\r
2262   SQL-WIDTH 100\r
2263   ORDER 40\r
2264 \r
2265 ADD FIELD "MonthsOfYear" OF "FrequencyType" AS character \r
2266   DESCRIPTION "The months of the year when it is valid for this frequency to occur, e.g. '2,7,11' would mean the event could only happen in February, July, and November."\r
2267   FORMAT "X(50)"\r
2268   INITIAL ""\r
2269   LABEL "Months of year"\r
2270   POSITION 6\r
2271   SQL-WIDTH 100\r
2272   HELP "e.g. 2,7 would mean only February and July"\r
2273   LENGTH 0\r
2274   ORDER 50\r
2275 \r
2276 ADD FIELD "RepeatUnits" OF "FrequencyType" AS character \r
2277   DESCRIPTION "A code identifying the type of units that this frequency repeats with (e.g. Day, Week, Month, Year, Arbitrary)"\r
2278   FORMAT "X(4)"\r
2279   INITIAL ""\r
2280   LABEL "Repeat units"\r
2281   POSITION 7\r
2282   SQL-WIDTH 8\r
2283   HELP "Units for the repeat frequency (Day, Month, Year...)"\r
2284   LENGTH 0\r
2285   ORDER 60\r
2286   MANDATORY\r
2287 \r
2288 ADD FIELD "UnitCount" OF "FrequencyType" AS integer \r
2289   DESCRIPTION "The number of repeat units involved in a cycle, i.e. '2' months,  '73' days"\r
2290   FORMAT ">>>>>9"\r
2291   INITIAL "0"\r
2292   LABEL "No of Units"\r
2293   POSITION 8\r
2294   SQL-WIDTH 4\r
2295   HELP "No of units between occurrences"\r
2296   ORDER 70\r
2297 \r
2298 ADD INDEX "XPKFrequencyType" ON "FrequencyType" \r
2299   AREA "Schema Area"\r
2300   UNIQUE\r
2301   PRIMARY\r
2302   INDEX-FIELD "FrequencyCode" ASCENDING \r
2303 \r
2304 ADD TABLE "GroundLease"\r
2305   AREA "Schema Area"\r
2306   DUMP-NAME "groundle"\r
2307 \r
2308 ADD FIELD "PropertyCode" OF "GroundLease" AS integer \r
2309   DESCRIPTION "The code of the property which this ground lease applies to."\r
2310   FORMAT "99999"\r
2311   INITIAL "0"\r
2312   LABEL "Property"\r
2313   POSITION 2\r
2314   SQL-WIDTH 4\r
2315   ORDER 10\r
2316 \r
2317 ADD FIELD "TitleCode" OF "GroundLease" AS integer \r
2318   DESCRIPTION "The code of the property which this ground lease is for."\r
2319   FORMAT ">>>>>9"\r
2320   INITIAL "0"\r
2321   LABEL "Title"\r
2322   POSITION 3\r
2323   SQL-WIDTH 4\r
2324   ORDER 20\r
2325 \r
2326 ADD FIELD "GroundLeaseCode" OF "GroundLease" AS integer \r
2327   DESCRIPTION "The sequence of this ground lease within the title. Just reassure me: there won't always be just one, will there?"\r
2328   FORMAT ">>>>>9"\r
2329   INITIAL "0"\r
2330   LABEL "Ground lease code"\r
2331   POSITION 4\r
2332   SQL-WIDTH 4\r
2333   ORDER 30\r
2334 \r
2335 ADD FIELD "LeaseExpiry" OF "GroundLease" AS date \r
2336   DESCRIPTION "The date on which the lease expires."\r
2337   FORMAT "99/99/9999"\r
2338   INITIAL ?\r
2339   LABEL "Expiry"\r
2340   POSITION 5\r
2341   SQL-WIDTH 4\r
2342   ORDER 40\r
2343 \r
2344 ADD FIELD "Lessor" OF "GroundLease" AS integer \r
2345   DESCRIPTION "The creditor who we lease this from."\r
2346   FORMAT ">>>>>9"\r
2347   INITIAL "0"\r
2348   POSITION 6\r
2349   SQL-WIDTH 4\r
2350   ORDER 50\r
2351 \r
2352 ADD FIELD "NextRentReview" OF "GroundLease" AS date \r
2353   DESCRIPTION "The date of the next rent review"\r
2354   FORMAT "99/99/9999"\r
2355   INITIAL ?\r
2356   LABEL "Next Review"\r
2357   POSITION 7\r
2358   SQL-WIDTH 4\r
2359   ORDER 60\r
2360 \r
2361 ADD FIELD "Rental" OF "GroundLease" AS decimal \r
2362   DESCRIPTION "The annual rental paid for this lease."\r
2363   FORMAT "->>,>>9.99"\r
2364   INITIAL "0"\r
2365   POSITION 8\r
2366   SQL-WIDTH 17\r
2367   DECIMALS 2\r
2368   ORDER 70\r
2369 \r
2370 ADD FIELD "RentReviewNotice" OF "GroundLease" AS integer \r
2371   DESCRIPTION "The number of months notice required prior to a rent review being applied."\r
2372   FORMAT ">>>>>9"\r
2373   INITIAL "0"\r
2374   LABEL "Review notice"\r
2375   POSITION 9\r
2376   SQL-WIDTH 4\r
2377   HELP "Notice required prior to rent review (months)"\r
2378   ORDER 80\r
2379 \r
2380 ADD FIELD "RightsOfRenewal" OF "GroundLease" AS character \r
2381   DESCRIPTION "The rights of renewal for the ground lease."\r
2382   FORMAT "X(10)"\r
2383   INITIAL ""\r
2384   LABEL "Rights of renewal"\r
2385   POSITION 10\r
2386   SQL-WIDTH 20\r
2387   LENGTH 0\r
2388   ORDER 90\r
2389 \r
2390 ADD FIELD "NoteCode" OF "GroundLease" AS integer \r
2391   DESCRIPTION "A unique code identifying this note."\r
2392   FORMAT ">>>>>9"\r
2393   INITIAL ?\r
2394   POSITION 11\r
2395   SQL-WIDTH 4\r
2396   ORDER 100\r
2397 \r
2398 ADD INDEX "XPKGroundLeases" ON "GroundLease" \r
2399   AREA "Schema Area"\r
2400   UNIQUE\r
2401   PRIMARY\r
2402   INDEX-FIELD "PropertyCode" ASCENDING \r
2403   INDEX-FIELD "GroundLeaseCode" ASCENDING \r
2404 \r
2405 ADD TABLE "Guarantor"\r
2406   AREA "Schema Area"\r
2407   DUMP-NAME "guaranto"\r
2408 \r
2409 ADD FIELD "TenancyLeaseCode" OF "Guarantor" AS integer \r
2410   DESCRIPTION "The lease this person/organisation is acting as a guarantor for."\r
2411   FORMAT "99999"\r
2412   INITIAL "0"\r
2413   LABEL "Lease code"\r
2414   POSITION 2\r
2415   SQL-WIDTH 4\r
2416   ORDER 10\r
2417 \r
2418 ADD FIELD "PersonCode" OF "Guarantor" AS integer \r
2419   DESCRIPTION "The person/organisation acting as a guarantor for this lease."\r
2420   FORMAT ">>>>>9"\r
2421   INITIAL "0"\r
2422   LABEL "Person code"\r
2423   POSITION 3\r
2424   SQL-WIDTH 4\r
2425   ORDER 20\r
2426   MANDATORY\r
2427 \r
2428 ADD FIELD "AnyData" OF "Guarantor" AS character \r
2429   DESCRIPTION "Any data we want to store against each lease guarantor."\r
2430   FORMAT "X(200)"\r
2431   INITIAL ""\r
2432   POSITION 4\r
2433   SQL-WIDTH 400\r
2434   HELP "Whatever we want."\r
2435   LENGTH 0\r
2436   ORDER 30\r
2437 \r
2438 ADD FIELD "Type" OF "Guarantor" AS character \r
2439   FORMAT "X"\r
2440   INITIAL ""\r
2441   POSITION 5\r
2442   SQL-WIDTH 2\r
2443   LENGTH 0\r
2444   ORDER 40\r
2445 \r
2446 ADD FIELD "Limit" OF "Guarantor" AS decimal \r
2447   FORMAT ">>,>>>,>>9.99"\r
2448   INITIAL "0"\r
2449   POSITION 6\r
2450   SQL-WIDTH 17\r
2451   DECIMALS 2\r
2452   ORDER 50\r
2453 \r
2454 ADD INDEX "Guarantors" ON "Guarantor" \r
2455   AREA "Schema Area"\r
2456   UNIQUE\r
2457   PRIMARY\r
2458   INDEX-FIELD "TenancyLeaseCode" ASCENDING \r
2459   INDEX-FIELD "PersonCode" ASCENDING \r
2460 \r
2461 ADD TABLE "Image"\r
2462   AREA "Schema Area"\r
2463   DUMP-NAME "image"\r
2464 \r
2465 ADD FIELD "PropertyCode" OF "Image" AS integer \r
2466   FORMAT "99999"\r
2467   INITIAL "0"\r
2468   POSITION 2\r
2469   SQL-WIDTH 4\r
2470   ORDER 10\r
2471 \r
2472 ADD FIELD "ImageCode" OF "Image" AS integer \r
2473   DESCRIPTION "A code used to refer to this image"\r
2474   FORMAT ">>>>>9"\r
2475   INITIAL "0"\r
2476   POSITION 3\r
2477   SQL-WIDTH 4\r
2478   ORDER 20\r
2479 \r
2480 ADD FIELD "Description" OF "Image" AS integer \r
2481   DESCRIPTION "A description of the image"\r
2482   FORMAT ">>>>>9"\r
2483   INITIAL "0"\r
2484   POSITION 4\r
2485   SQL-WIDTH 4\r
2486   ORDER 30\r
2487   MANDATORY\r
2488 \r
2489 ADD FIELD "ImageData" OF "Image" AS character \r
2490   DESCRIPTION "The actual image.  Probably implemented as a reference to an external file."\r
2491   FORMAT "X(100)"\r
2492   INITIAL ""\r
2493   POSITION 5\r
2494   SQL-WIDTH 200\r
2495   ORDER 40\r
2496 \r
2497 ADD FIELD "ImageType" OF "Image" AS character \r
2498   DESCRIPTION "The type of image data, e.g. JPEG, GIF, Photo CD, AutoCAD Drawing etc."\r
2499   FORMAT "X(4)"\r
2500   INITIAL ""\r
2501   POSITION 6\r
2502   SQL-WIDTH 8\r
2503   ORDER 50\r
2504   MANDATORY\r
2505 \r
2506 ADD FIELD "RentalSpaceCode" OF "Image" AS integer \r
2507   DESCRIPTION "The rental space that this image applies to, or blank if it applies to the whole property."\r
2508   FORMAT ">>>>>9"\r
2509   INITIAL "0"\r
2510   POSITION 7\r
2511   SQL-WIDTH 4\r
2512   ORDER 60\r
2513 \r
2514 ADD INDEX "Images" ON "Image" \r
2515   AREA "Schema Area"\r
2516   UNIQUE\r
2517   PRIMARY\r
2518   INDEX-FIELD "PropertyCode" ASCENDING \r
2519   INDEX-FIELD "ImageCode" ASCENDING \r
2520 \r
2521 ADD INDEX "XAK1Images" ON "Image" \r
2522   AREA "Schema Area"\r
2523   INDEX-FIELD "PropertyCode" ASCENDING \r
2524 \r
2525 ADD INDEX "XAK2Images" ON "Image" \r
2526   AREA "Schema Area"\r
2527   INDEX-FIELD "RentalSpaceCode" ASCENDING \r
2528 \r
2529 ADD TABLE "ImageType"\r
2530   AREA "Schema Area"\r
2531   DUMP-NAME "imagetyp"\r
2532 \r
2533 ADD FIELD "ImageType" OF "ImageType" AS character \r
2534   FORMAT "X(4)"\r
2535   INITIAL ""\r
2536   POSITION 2\r
2537   SQL-WIDTH 8\r
2538   ORDER 10\r
2539   MANDATORY\r
2540 \r
2541 ADD FIELD "Description" OF "ImageType" AS character \r
2542   FORMAT "X(50)"\r
2543   INITIAL ""\r
2544   POSITION 3\r
2545   SQL-WIDTH 100\r
2546   ORDER 20\r
2547 \r
2548 ADD FIELD "ImageViewer" OF "ImageType" AS character \r
2549   FORMAT "X(70)"\r
2550   INITIAL ""\r
2551   LABEL "Viewer"\r
2552   POSITION 4\r
2553   SQL-WIDTH 140\r
2554   ORDER 30\r
2555 \r
2556 ADD INDEX "XPKImageTypes" ON "ImageType" \r
2557   AREA "Schema Area"\r
2558   UNIQUE\r
2559   PRIMARY\r
2560   INDEX-FIELD "ImageType" ASCENDING \r
2561 \r
2562 ADD TABLE "LeaseImage"\r
2563   AREA "Schema Area"\r
2564   DUMP-NAME "leaseima"\r
2565 \r
2566 ADD FIELD "LeaseImageSeq" OF "LeaseImage" AS integer \r
2567   FORMAT ">>>>>9"\r
2568   INITIAL "0"\r
2569   POSITION 2\r
2570   SQL-WIDTH 4\r
2571   ORDER 10\r
2572   MANDATORY\r
2573 \r
2574 ADD FIELD "TenancyLeaseCode" OF "LeaseImage" AS integer \r
2575   FORMAT ">>>>>9"\r
2576   INITIAL "0"\r
2577   POSITION 3\r
2578   SQL-WIDTH 4\r
2579   ORDER 20\r
2580 \r
2581 ADD FIELD "PropertyCode" OF "LeaseImage" AS integer \r
2582   FORMAT ">>>>>9"\r
2583   INITIAL "0"\r
2584   POSITION 4\r
2585   SQL-WIDTH 4\r
2586   ORDER 30\r
2587 \r
2588 ADD FIELD "TitleCode" OF "LeaseImage" AS integer \r
2589   FORMAT ">>>>>9"\r
2590   INITIAL "0"\r
2591   POSITION 5\r
2592   SQL-WIDTH 4\r
2593   ORDER 40\r
2594 \r
2595 ADD FIELD "GroundLeaseCode" OF "LeaseImage" AS integer \r
2596   FORMAT ">>>>>9"\r
2597   INITIAL "0"\r
2598   POSITION 6\r
2599   SQL-WIDTH 4\r
2600   ORDER 50\r
2601 \r
2602 ADD FIELD "Description" OF "LeaseImage" AS character \r
2603   FORMAT "X(50)"\r
2604   INITIAL ""\r
2605   POSITION 7\r
2606   SQL-WIDTH 100\r
2607   ORDER 60\r
2608 \r
2609 ADD INDEX "XPKLeaseImages" ON "LeaseImage" \r
2610   AREA "Schema Area"\r
2611   UNIQUE\r
2612   PRIMARY\r
2613   INDEX-FIELD "LeaseImageSeq" ASCENDING \r
2614 \r
2615 ADD TABLE "LeaseImagePage"\r
2616   AREA "Schema Area"\r
2617   DUMP-NAME "leaseim1"\r
2618 \r
2619 ADD FIELD "LeaseImageSeq" OF "LeaseImagePage" AS integer \r
2620   FORMAT ">>>>>9"\r
2621   INITIAL "0"\r
2622   POSITION 2\r
2623   SQL-WIDTH 4\r
2624   ORDER 10\r
2625   MANDATORY\r
2626 \r
2627 ADD FIELD "PageNumber" OF "LeaseImagePage" AS integer \r
2628   FORMAT ">>>>>9"\r
2629   INITIAL "0"\r
2630   POSITION 3\r
2631   SQL-WIDTH 4\r
2632   ORDER 20\r
2633   MANDATORY\r
2634 \r
2635 ADD FIELD "ImageReference" OF "LeaseImagePage" AS character \r
2636   FORMAT "X(50)"\r
2637   INITIAL ""\r
2638   POSITION 4\r
2639   SQL-WIDTH 100\r
2640   ORDER 30\r
2641 \r
2642 ADD FIELD "ContentDescription" OF "LeaseImagePage" AS character \r
2643   FORMAT "X(50)"\r
2644   INITIAL ""\r
2645   POSITION 5\r
2646   SQL-WIDTH 100\r
2647   ORDER 40\r
2648 \r
2649 ADD INDEX "XPKLeaseImagePages" ON "LeaseImagePage" \r
2650   AREA "Schema Area"\r
2651   UNIQUE\r
2652   PRIMARY\r
2653   INDEX-FIELD "LeaseImageSeq" ASCENDING \r
2654   INDEX-FIELD "PageNumber" ASCENDING \r
2655 \r
2656 ADD TABLE "LeaseIndex"\r
2657   AREA "Schema Area"\r
2658   DUMP-NAME "leaseind"\r
2659 \r
2660 ADD FIELD "LeaseIndexSeq" OF "LeaseIndex" AS integer \r
2661   FORMAT ">>>>>9"\r
2662   INITIAL "0"\r
2663   POSITION 2\r
2664   SQL-WIDTH 4\r
2665   ORDER 10\r
2666   MANDATORY\r
2667 \r
2668 ADD FIELD "Searchword" OF "LeaseIndex" AS character \r
2669   FORMAT "X(18)"\r
2670   INITIAL ""\r
2671   POSITION 3\r
2672   SQL-WIDTH 36\r
2673   ORDER 20\r
2674 \r
2675 ADD FIELD "LeaseImageSeq" OF "LeaseIndex" AS integer \r
2676   FORMAT ">>>>>9"\r
2677   INITIAL "0"\r
2678   POSITION 4\r
2679   SQL-WIDTH 4\r
2680   ORDER 30\r
2681   MANDATORY\r
2682 \r
2683 ADD FIELD "PageNumber" OF "LeaseIndex" AS integer \r
2684   FORMAT ">>>>>9"\r
2685   INITIAL "0"\r
2686   POSITION 5\r
2687   SQL-WIDTH 4\r
2688   ORDER 40\r
2689   MANDATORY\r
2690 \r
2691 ADD INDEX "XPKLeaseIndex" ON "LeaseIndex" \r
2692   AREA "Schema Area"\r
2693   UNIQUE\r
2694   PRIMARY\r
2695   INDEX-FIELD "LeaseIndexSeq" ASCENDING \r
2696 \r
2697 ADD TABLE "LeaseStatus"\r
2698   AREA "Schema Area"\r
2699   DUMP-NAME "leasesta"\r
2700 \r
2701 ADD FIELD "LeaseStatus" OF "LeaseStatus" AS character \r
2702   FORMAT "X(4)"\r
2703   INITIAL ""\r
2704   POSITION 2\r
2705   SQL-WIDTH 8\r
2706   ORDER 10\r
2707   MANDATORY\r
2708 \r
2709 ADD FIELD "Description" OF "LeaseStatus" AS character \r
2710   FORMAT "X(50)"\r
2711   INITIAL ""\r
2712   POSITION 3\r
2713   SQL-WIDTH 100\r
2714   ORDER 20\r
2715 \r
2716 ADD INDEX "XPKLeaseStatuses" ON "LeaseStatus" \r
2717   AREA "Schema Area"\r
2718   UNIQUE\r
2719   PRIMARY\r
2720   INDEX-FIELD "LeaseStatus" ASCENDING \r
2721 \r
2722 ADD TABLE "LeaseType"\r
2723   AREA "Schema Area"\r
2724   DUMP-NAME "leasetyp"\r
2725 \r
2726 ADD FIELD "LeaseType" OF "LeaseType" AS character \r
2727   FORMAT "X(4)"\r
2728   INITIAL ""\r
2729   POSITION 2\r
2730   SQL-WIDTH 8\r
2731   ORDER 10\r
2732   MANDATORY\r
2733 \r
2734 ADD FIELD "Description" OF "LeaseType" AS character \r
2735   FORMAT "X(50)"\r
2736   INITIAL ""\r
2737   POSITION 3\r
2738   SQL-WIDTH 100\r
2739   ORDER 20\r
2740 \r
2741 ADD INDEX "XPKLeaseTypes" ON "LeaseType" \r
2742   AREA "Schema Area"\r
2743   UNIQUE\r
2744   PRIMARY\r
2745   INDEX-FIELD "LeaseType" ASCENDING \r
2746 \r
2747 ADD TABLE "Month"\r
2748   AREA "Schema Area"\r
2749   DUMP-NAME "month"\r
2750   TABLE-TRIGGER "WRITE" OVERRIDE PROCEDURE "wrmonth.p" CRC "?" \r
2751 \r
2752 ADD FIELD "MonthCode" OF "Month" AS integer \r
2753   DESCRIPTION "The code used to refer to a month."\r
2754   FORMAT ">>>>>9"\r
2755   INITIAL "0"\r
2756   POSITION 2\r
2757   SQL-WIDTH 4\r
2758   ORDER 10\r
2759 \r
2760 ADD FIELD "MonthName" OF "Month" AS character \r
2761   DESCRIPTION "The name of the month, such as 'January', or 'Year End Journals'."\r
2762   FORMAT "X(4)"\r
2763   INITIAL ""\r
2764   LABEL "Month"\r
2765   POSITION 3\r
2766   SQL-WIDTH 8\r
2767   ORDER 20\r
2768   MANDATORY\r
2769 \r
2770 ADD FIELD "FinancialYearCode" OF "Month" AS integer \r
2771   DESCRIPTION "The financial year that this month is part of."\r
2772   FORMAT ">>>9"\r
2773   INITIAL "0"\r
2774   LABEL "Year"\r
2775   POSITION 4\r
2776   SQL-WIDTH 4\r
2777   ORDER 30\r
2778   MANDATORY\r
2779 \r
2780 ADD FIELD "MonthStatus" OF "Month" AS character \r
2781   FORMAT "X(4)"\r
2782   INITIAL ""\r
2783   POSITION 5\r
2784   SQL-WIDTH 8\r
2785   ORDER 40\r
2786   MANDATORY\r
2787 \r
2788 ADD FIELD "StartDate" OF "Month" AS date \r
2789   FORMAT "99/99/9999"\r
2790   INITIAL ?\r
2791   LABEL "Start date"\r
2792   POSITION 6\r
2793   SQL-WIDTH 4\r
2794   HELP "The first day of the month"\r
2795   ORDER 50\r
2796   MANDATORY\r
2797   FIELD-TRIGGER "ASSIGN" OVERRIDE PROCEDURE "a-mthstd.p" CRC "?" \r
2798 \r
2799 ADD FIELD "EndDate" OF "Month" AS date \r
2800   FORMAT "99/99/9999"\r
2801   INITIAL "12/31/2075"\r
2802   LABEL "End date"\r
2803   POSITION 7\r
2804   SQL-WIDTH 4\r
2805   COLUMN-LABEL "Ending"\r
2806   ORDER 60\r
2807 \r
2808 ADD FIELD "LastModifiedDate" OF "Month" AS date \r
2809   DESCRIPTION "The date when this record was last modified.  Maintained by a WRITE trigger."\r
2810   FORMAT "99/99/9999"\r
2811   INITIAL "1/1/0001"\r
2812   POSITION 8\r
2813   SQL-WIDTH 4\r
2814   ORDER 70\r
2815   MANDATORY\r
2816 \r
2817 ADD FIELD "LastModifiedTime" OF "Month" AS integer \r
2818   DESCRIPTION "The time that this record was last modified"\r
2819   FORMAT "->,>>>,>>9"\r
2820   INITIAL "0"\r
2821   POSITION 9\r
2822   SQL-WIDTH 4\r
2823   ORDER 80\r
2824 \r
2825 ADD FIELD "LastModifiedUser" OF "Month" AS character \r
2826   DESCRIPTION "The user who last modified this record.  Maintained by a WRITE trigger."\r
2827   FORMAT "X(8)"\r
2828   INITIAL ""\r
2829   POSITION 10\r
2830   SQL-WIDTH 16\r
2831   LENGTH 0\r
2832   ORDER 90\r
2833 \r
2834 ADD FIELD "AuditRecordId" OF "Month" AS integer \r
2835   FORMAT "->,>>>,>>9"\r
2836   INITIAL "0"\r
2837   POSITION 11\r
2838   SQL-WIDTH 4\r
2839   ORDER 100\r
2840 \r
2841 ADD INDEX "XAK1Months" ON "Month" \r
2842   AREA "Schema Area"\r
2843   UNIQUE\r
2844   PRIMARY\r
2845   INDEX-FIELD "FinancialYearCode" ASCENDING \r
2846   INDEX-FIELD "MonthCode" ASCENDING \r
2847 \r
2848 ADD INDEX "XAK2Months" ON "Month" \r
2849   AREA "Schema Area"\r
2850   UNIQUE\r
2851   INDEX-FIELD "StartDate" ASCENDING \r
2852 \r
2853 ADD INDEX "XAK3Months" ON "Month" \r
2854   AREA "Schema Area"\r
2855   UNIQUE\r
2856   INDEX-FIELD "MonthCode" ASCENDING \r
2857 \r
2858 ADD INDEX "XPKMonths" ON "Month" \r
2859   AREA "Schema Area"\r
2860   INDEX-FIELD "EndDate" ASCENDING \r
2861 \r
2862 ADD TABLE "MonthName"\r
2863   AREA "Schema Area"\r
2864   DUMP-NAME "monthnam"\r
2865 \r
2866 ADD FIELD "MonthName" OF "MonthName" AS character \r
2867   FORMAT "X(4)"\r
2868   INITIAL ""\r
2869   POSITION 2\r
2870   SQL-WIDTH 8\r
2871   ORDER 10\r
2872   MANDATORY\r
2873 \r
2874 ADD FIELD "Description" OF "MonthName" AS character \r
2875   FORMAT "X(50)"\r
2876   INITIAL ""\r
2877   POSITION 3\r
2878   SQL-WIDTH 100\r
2879   ORDER 20\r
2880 \r
2881 ADD INDEX "XPKMonthNames" ON "MonthName" \r
2882   AREA "Schema Area"\r
2883   UNIQUE\r
2884   PRIMARY\r
2885   INDEX-FIELD "MonthName" ASCENDING \r
2886 \r
2887 ADD TABLE "MonthStatus"\r
2888   AREA "Schema Area"\r
2889   DUMP-NAME "monthsta"\r
2890 \r
2891 ADD FIELD "MonthStatus" OF "MonthStatus" AS character \r
2892   FORMAT "X(4)"\r
2893   INITIAL ""\r
2894   POSITION 2\r
2895   SQL-WIDTH 8\r
2896   ORDER 10\r
2897   MANDATORY\r
2898 \r
2899 ADD FIELD "Description" OF "MonthStatus" AS character \r
2900   FORMAT "X(50)"\r
2901   INITIAL ""\r
2902   POSITION 3\r
2903   SQL-WIDTH 100\r
2904   ORDER 20\r
2905 \r
2906 ADD INDEX "XPKMonthStatus" ON "MonthStatus" \r
2907   AREA "Schema Area"\r
2908   UNIQUE\r
2909   PRIMARY\r
2910   INDEX-FIELD "MonthStatus" ASCENDING \r
2911 \r
2912 ADD TABLE "Note"\r
2913   AREA "Schema Area"\r
2914   DUMP-NAME "note"\r
2915   TABLE-TRIGGER "CREATE" OVERRIDE PROCEDURE "crnote.p" CRC "?" \r
2916 \r
2917 ADD FIELD "NoteCode" OF "Note" AS integer \r
2918   DESCRIPTION "A unique code identifying this note."\r
2919   FORMAT ">>>>>9"\r
2920   INITIAL "0"\r
2921   POSITION 2\r
2922   SQL-WIDTH 4\r
2923   ORDER 10\r
2924   MANDATORY\r
2925 \r
2926 ADD FIELD "Details" OF "Note" AS character \r
2927   DESCRIPTION "A note relating to the current record"\r
2928   FORMAT "X(28000)"\r
2929   INITIAL ?\r
2930   POSITION 3\r
2931   SQL-WIDTH 31995\r
2932   VIEW-AS "VIEW-AS EDITOR INNER-CHARS 100 INNER-LINES 7 SCROLLBAR-VERTICAL"\r
2933   LENGTH 0\r
2934   ORDER 20\r
2935   MANDATORY\r
2936 \r
2937 ADD FIELD "NoteTable" OF "Note" AS character \r
2938   FORMAT "X(20)"\r
2939   INITIAL ""\r
2940   POSITION 4\r
2941   SQL-WIDTH 40\r
2942   ORDER 30\r
2943 \r
2944 ADD FIELD "NoteTableKey" OF "Note" AS character \r
2945   FORMAT "X(20)"\r
2946   INITIAL ""\r
2947   POSITION 5\r
2948   SQL-WIDTH 40\r
2949   ORDER 40\r
2950 \r
2951 ADD FIELD "NoteDate" OF "Note" AS date \r
2952   FORMAT "99/99/9999"\r
2953   INITIAL ?\r
2954   POSITION 6\r
2955   SQL-WIDTH 4\r
2956   ORDER 50\r
2957 \r
2958 ADD INDEX "XPKNote" ON "Note" \r
2959   AREA "Schema Area"\r
2960   UNIQUE\r
2961   PRIMARY\r
2962   INDEX-FIELD "NoteCode" ASCENDING \r
2963 \r
2964 ADD TABLE "OutgoingsBasis"\r
2965   AREA "Schema Area"\r
2966   DUMP-NAME "outgoing"\r
2967 \r
2968 ADD FIELD "OutgoingBasis" OF "OutgoingsBasis" AS character \r
2969   FORMAT "X(18)"\r
2970   INITIAL ""\r
2971   POSITION 2\r
2972   SQL-WIDTH 36\r
2973   ORDER 10\r
2974   MANDATORY\r
2975 \r
2976 ADD FIELD "Description" OF "OutgoingsBasis" AS character \r
2977   FORMAT "X(18)"\r
2978   INITIAL ""\r
2979   POSITION 3\r
2980   SQL-WIDTH 36\r
2981   ORDER 20\r
2982 \r
2983 ADD INDEX "XPKOutgoingsBasis" ON "OutgoingsBasis" \r
2984   AREA "Schema Area"\r
2985   UNIQUE\r
2986   PRIMARY\r
2987   INDEX-FIELD "OutgoingBasis" ASCENDING \r
2988 \r
2989 ADD TABLE "Person"\r
2990   AREA "Schema Area"\r
2991   DUMP-NAME "person"\r
2992   TABLE-TRIGGER "CREATE" OVERRIDE PROCEDURE "crperson.p" CRC "?" \r
2993   TABLE-TRIGGER "DELETE" OVERRIDE PROCEDURE "deperson.p" CRC "?" \r
2994   TABLE-TRIGGER "WRITE" OVERRIDE PROCEDURE "wrperson.p" CRC "?" \r
2995 \r
2996 ADD FIELD "PersonCode" OF "Person" AS integer \r
2997   DESCRIPTION "A code used to refer to this person."\r
2998   FORMAT "99999"\r
2999   INITIAL ?\r
3000   LABEL "Person code"\r
3001   POSITION 2\r
3002   SQL-WIDTH 4\r
3003   COLUMN-LABEL "Person"\r
3004   ORDER 10\r
3005   MANDATORY\r
3006 \r
3007 ADD FIELD "PersonTitle" OF "Person" AS character \r
3008   FORMAT "X(6)"\r
3009   INITIAL ""\r
3010   LABEL "Title"\r
3011   POSITION 3\r
3012   SQL-WIDTH 12\r
3013   HELP "Mr, Mrs, Ms, Sir and so forth"\r
3014   ORDER 20\r
3015 \r
3016 ADD FIELD "DateOfBirth" OF "Person" AS date \r
3017   DESCRIPTION "The person's date of birth, if known."\r
3018   FORMAT "99/99/9999"\r
3019   INITIAL ?\r
3020   LABEL "Date of Birth"\r
3021   POSITION 4\r
3022   SQL-WIDTH 4\r
3023   COLUMN-LABEL "Birth date"\r
3024   ORDER 30\r
3025 \r
3026 ADD FIELD "FirstName" OF "Person" AS character \r
3027   DESCRIPTION "The person's first name"\r
3028   FORMAT "X(20)"\r
3029   INITIAL ""\r
3030   LABEL "First name"\r
3031   POSITION 5\r
3032   SQL-WIDTH 40\r
3033   LENGTH 0\r
3034   ORDER 40\r
3035 \r
3036 ADD FIELD "Company" OF "Person" AS character \r
3037   FORMAT "X(50)"\r
3038   INITIAL ""\r
3039   POSITION 6\r
3040   SQL-WIDTH 100\r
3041   LENGTH 0\r
3042   ORDER 100\r
3043 \r
3044 ADD FIELD "GolfHandicap" OF "Person" AS integer \r
3045   DESCRIPTION "The person's last known golf handicap."\r
3046   FORMAT "->9"\r
3047   INITIAL ?\r
3048   LABEL "Golf handicap"\r
3049   POSITION 7\r
3050   SQL-WIDTH 4\r
3051   COLUMN-LABEL "H'cap"\r
3052   ORDER 60\r
3053 \r
3054 ADD FIELD "LastName" OF "Person" AS character \r
3055   DESCRIPTION "The person's last name"\r
3056   FORMAT "X(20)"\r
3057   INITIAL ""\r
3058   LABEL "Last name"\r
3059   POSITION 8\r
3060   SQL-WIDTH 40\r
3061   LENGTH 0\r
3062   ORDER 70\r
3063 \r
3064 ADD FIELD "Preferred" OF "Person" AS character \r
3065   DESCRIPTION "A name that the person prefers to be called by, if this differs from their first name."\r
3066   FORMAT "X(30)"\r
3067   INITIAL ""\r
3068   POSITION 9\r
3069   SQL-WIDTH 60\r
3070   ORDER 80\r
3071 \r
3072 ADD FIELD "Sex" OF "Person" AS logical \r
3073   DESCRIPTION "The person's sex."\r
3074   FORMAT "Male/Female"\r
3075   INITIAL ?\r
3076   POSITION 10\r
3077   SQL-WIDTH 1\r
3078   ORDER 90\r
3079 \r
3080 ADD FIELD "JobTitle" OF "Person" AS character \r
3081   FORMAT "X(30)"\r
3082   INITIAL ""\r
3083   LABEL "Job Title"\r
3084   POSITION 11\r
3085   SQL-WIDTH 60\r
3086   LENGTH 0\r
3087   ORDER 110\r
3088 \r
3089 ADD FIELD "Office" OF "Person" AS character \r
3090   FORMAT "X(30)"\r
3091   INITIAL ""\r
3092   POSITION 12\r
3093   SQL-WIDTH 60\r
3094   LENGTH 0\r
3095   ORDER 120\r
3096 \r
3097 ADD FIELD "CreatorID" OF "Person" AS character \r
3098   FORMAT "X(5)"\r
3099   INITIAL ""\r
3100   POSITION 13\r
3101   SQL-WIDTH 10\r
3102   LENGTH 0\r
3103   ORDER 130\r
3104 \r
3105 ADD FIELD "LastModified" OF "Person" AS date \r
3106   FORMAT "99/99/9999"\r
3107   INITIAL ?\r
3108   LABEL "Last modified"\r
3109   POSITION 14\r
3110   SQL-WIDTH 4\r
3111   ORDER 140\r
3112 \r
3113 ADD FIELD "Department" OF "Person" AS character \r
3114   FORMAT "X(30)"\r
3115   INITIAL ""\r
3116   POSITION 15\r
3117   SQL-WIDTH 60\r
3118   LENGTH 0\r
3119   ORDER 150\r
3120 \r
3121 ADD FIELD "Spouse" OF "Person" AS character \r
3122   FORMAT "X(20)"\r
3123   INITIAL ""\r
3124   POSITION 16\r
3125   SQL-WIDTH 40\r
3126   LENGTH 0\r
3127   ORDER 160\r
3128 \r
3129 ADD FIELD "LastValidated" OF "Person" AS date \r
3130   FORMAT "99/99/9999"\r
3131   INITIAL ?\r
3132   LABEL "Validated"\r
3133   POSITION 17\r
3134   SQL-WIDTH 4\r
3135   ORDER 170\r
3136 \r
3137 ADD FIELD "Notes" OF "Person" AS integer \r
3138   DESCRIPTION "A unique code identifying this note."\r
3139   FORMAT ">>>>>9"\r
3140   INITIAL ?\r
3141   POSITION 18\r
3142   SQL-WIDTH 4\r
3143   ORDER 180\r
3144 \r
3145 ADD FIELD "SystemContact" OF "Person" AS logical \r
3146   DESCRIPTION "System maintained, indicates that this is _solely_ a system initiated contact."\r
3147   FORMAT "yes/no"\r
3148   INITIAL "no"\r
3149   POSITION 19\r
3150   SQL-WIDTH 1\r
3151   ORDER 190\r
3152 \r
3153 ADD FIELD "SchedulePlusID" OF "Person" AS character \r
3154   FORMAT "X(8)"\r
3155   INITIAL ""\r
3156   POSITION 20\r
3157   SQL-WIDTH 16\r
3158   LENGTH 0\r
3159   ORDER 200\r
3160 \r
3161 ADD FIELD "SortOn" OF "Person" AS character \r
3162   FORMAT "X(40)"\r
3163   INITIAL ""\r
3164   POSITION 21\r
3165   SQL-WIDTH 80\r
3166   ORDER 210\r
3167 \r
3168 ADD FIELD "Initials" OF "Person" AS character \r
3169   FORMAT "X(8)"\r
3170   INITIAL ""\r
3171   POSITION 22\r
3172   SQL-WIDTH 16\r
3173   ORDER 220\r
3174 \r
3175 ADD FIELD "MiddleNames" OF "Person" AS character \r
3176   DESCRIPTION "The persons middle name or names"\r
3177   FORMAT "X(24)"\r
3178   INITIAL ""\r
3179   POSITION 23\r
3180   SQL-WIDTH 48\r
3181   HELP "The persons middle name or names"\r
3182   ORDER 230\r
3183 \r
3184 ADD FIELD "NameSuffix" OF "Person" AS character \r
3185   DESCRIPTION "Any suffix such as Snr or Jr following the persons name"\r
3186   FORMAT "X(8)"\r
3187   INITIAL ""\r
3188   POSITION 24\r
3189   SQL-WIDTH 16\r
3190   HELP "Any suffix such as Snr or Jr following the persons name"\r
3191   ORDER 240\r
3192 \r
3193 ADD FIELD "MailOut" OF "Person" AS logical \r
3194   DESCRIPTION "Is person OK to include in mailouts"\r
3195   FORMAT "yes/no"\r
3196   INITIAL "yes"\r
3197   POSITION 25\r
3198   SQL-WIDTH 1\r
3199   COLUMN-LABEL "Mail?"\r
3200   HELP "Is person OK to include in mailouts"\r
3201   ORDER 250\r
3202 \r
3203 ADD FIELD "TempGroup" OF "Person" AS logical \r
3204   DESCRIPTION "Used for temporarily grouping people for bulk actions"\r
3205   FORMAT "yes/no"\r
3206   INITIAL "no"\r
3207   POSITION 26\r
3208   SQL-WIDTH 1\r
3209   ORDER 260\r
3210 \r
3211 ADD INDEX "People" ON "Person" \r
3212   AREA "Schema Area"\r
3213   UNIQUE\r
3214   PRIMARY\r
3215   INDEX-FIELD "PersonCode" ASCENDING \r
3216 \r
3217 ADD INDEX "XAK1People" ON "Person" \r
3218   AREA "Schema Area"\r
3219   INDEX-FIELD "Company" ASCENDING \r
3220   INDEX-FIELD "LastName" ASCENDING \r
3221   INDEX-FIELD "FirstName" ASCENDING \r
3222 \r
3223 ADD INDEX "XAK2People" ON "Person" \r
3224   AREA "Schema Area"\r
3225   INDEX-FIELD "FirstName" ASCENDING \r
3226 \r
3227 ADD INDEX "XAK3People" ON "Person" \r
3228   AREA "Schema Area"\r
3229   INDEX-FIELD "LastName" ASCENDING \r
3230   INDEX-FIELD "FirstName" ASCENDING \r
3231   INDEX-FIELD "Company" ASCENDING \r
3232 \r
3233 ADD INDEX "XAK4People" ON "Person" \r
3234   AREA "Schema Area"\r
3235   INDEX-FIELD "Company" ASCENDING ABBREVIATED \r
3236 \r
3237 ADD INDEX "XAK5People" ON "Person" \r
3238   AREA "Schema Area"\r
3239   INDEX-FIELD "SchedulePlusID" ASCENDING \r
3240 \r
3241 ADD INDEX "XAKPeople-SCLF" ON "Person" \r
3242   AREA "Schema Area"\r
3243   INDEX-FIELD "SystemContact" ASCENDING \r
3244   INDEX-FIELD "Company" ASCENDING \r
3245   INDEX-FIELD "LastName" ASCENDING \r
3246   INDEX-FIELD "FirstName" ASCENDING ABBREVIATED \r
3247 \r
3248 ADD INDEX "XAKPeople-SLFC" ON "Person" \r
3249   AREA "Schema Area"\r
3250   INDEX-FIELD "SystemContact" ASCENDING \r
3251   INDEX-FIELD "LastName" ASCENDING \r
3252   INDEX-FIELD "FirstName" ASCENDING \r
3253   INDEX-FIELD "Company" ASCENDING ABBREVIATED \r
3254 \r
3255 ADD TABLE "PhoneDetail"\r
3256   AREA "Schema Area"\r
3257   DUMP-NAME "phonedet"\r
3258   TABLE-TRIGGER "CREATE" OVERRIDE PROCEDURE "crphndet.p" CRC "?" \r
3259   TABLE-TRIGGER "WRITE" OVERRIDE PROCEDURE "wrphndet.p" CRC "?" \r
3260 \r
3261 ADD FIELD "PersonCode" OF "PhoneDetail" AS integer \r
3262   DESCRIPTION "The person that this phone number relates to"\r
3263   FORMAT ">>>>>9"\r
3264   INITIAL "0"\r
3265   POSITION 2\r
3266   SQL-WIDTH 4\r
3267   ORDER 10\r
3268 \r
3269 ADD FIELD "PhoneType" OF "PhoneDetail" AS character \r
3270   DESCRIPTION "The type of phone number that this is."\r
3271   FORMAT "X(4)"\r
3272   INITIAL ""\r
3273   POSITION 3\r
3274   SQL-WIDTH 8\r
3275   ORDER 20\r
3276   MANDATORY\r
3277 \r
3278 ADD FIELD "Number" OF "PhoneDetail" AS character \r
3279   DESCRIPTION "The phone number"\r
3280   FORMAT "X(30)"\r
3281   INITIAL ""\r
3282   POSITION 4\r
3283   SQL-WIDTH 60\r
3284   ORDER 30\r
3285 \r
3286 ADD FIELD "CountryCode" OF "PhoneDetail" AS integer \r
3287   FORMAT ">>9"\r
3288   INITIAL "0"\r
3289   LABEL "Country"\r
3290   POSITION 5\r
3291   SQL-WIDTH 4\r
3292   ORDER 40\r
3293 \r
3294 ADD FIELD "STDCode" OF "PhoneDetail" AS integer \r
3295   FORMAT ">>>9"\r
3296   INITIAL "0"\r
3297   LABEL "STD"\r
3298   POSITION 6\r
3299   SQL-WIDTH 4\r
3300   ORDER 50\r
3301 \r
3302 ADD FIELD "cCountryCode" OF "PhoneDetail" AS character \r
3303   FORMAT "X(5)"\r
3304   INITIAL ""\r
3305   LABEL "Country Code"\r
3306   POSITION 7\r
3307   SQL-WIDTH 10\r
3308   COLUMN-LABEL "Country"\r
3309   ORDER 60\r
3310 \r
3311 ADD FIELD "cSTDCode" OF "PhoneDetail" AS character \r
3312   FORMAT "X(5)"\r
3313   INITIAL ""\r
3314   LABEL "STD Code"\r
3315   POSITION 8\r
3316   SQL-WIDTH 10\r
3317   COLUMN-LABEL "STD"\r
3318   ORDER 70\r
3319 \r
3320 ADD INDEX "PhoneDetails" ON "PhoneDetail" \r
3321   AREA "Schema Area"\r
3322   UNIQUE\r
3323   PRIMARY\r
3324   INDEX-FIELD "PersonCode" ASCENDING \r
3325   INDEX-FIELD "PhoneType" ASCENDING \r
3326 \r
3327 ADD INDEX "XAK1PhoneDetails" ON "PhoneDetail" \r
3328   AREA "Schema Area"\r
3329   INDEX-FIELD "CountryCode" ASCENDING \r
3330   INDEX-FIELD "STDCode" ASCENDING \r
3331   INDEX-FIELD "Number" ASCENDING \r
3332 \r
3333 ADD INDEX "XAK2PhoneDetails" ON "PhoneDetail" \r
3334   AREA "Schema Area"\r
3335   INDEX-FIELD "cCountryCode" ASCENDING \r
3336   INDEX-FIELD "cSTDCode" ASCENDING \r
3337   INDEX-FIELD "PhoneType" ASCENDING \r
3338 \r
3339 ADD TABLE "PhoneType"\r
3340   AREA "Schema Area"\r
3341   DUMP-NAME "phonetyp"\r
3342 \r
3343 ADD FIELD "PhoneType" OF "PhoneType" AS character \r
3344   FORMAT "X(4)"\r
3345   INITIAL ""\r
3346   POSITION 2\r
3347   SQL-WIDTH 8\r
3348   ORDER 10\r
3349   MANDATORY\r
3350 \r
3351 ADD FIELD "Description" OF "PhoneType" AS character \r
3352   FORMAT "X(50)"\r
3353   INITIAL ""\r
3354   POSITION 3\r
3355   SQL-WIDTH 100\r
3356   ORDER 20\r
3357 \r
3358 ADD INDEX "XPKPhoneTypes" ON "PhoneType" \r
3359   AREA "Schema Area"\r
3360   UNIQUE\r
3361   PRIMARY\r
3362   INDEX-FIELD "PhoneType" ASCENDING \r
3363 \r
3364 ADD TABLE "PostalDetail"\r
3365   AREA "Schema Area"\r
3366   DUMP-NAME "postalde"\r
3367   TABLE-TRIGGER "CREATE" OVERRIDE PROCEDURE "crpstdet.p" CRC "?" \r
3368   TABLE-TRIGGER "WRITE" OVERRIDE PROCEDURE "wrpstdet.p" CRC "?" \r
3369 \r
3370 ADD FIELD "PersonCode" OF "PostalDetail" AS integer \r
3371   DESCRIPTION "The person that this postal address applies to"\r
3372   FORMAT ">>>>>9"\r
3373   INITIAL "0"\r
3374   POSITION 2\r
3375   SQL-WIDTH 4\r
3376   ORDER 10\r
3377 \r
3378 ADD FIELD "PostalType" OF "PostalDetail" AS character \r
3379   DESCRIPTION "The type of postal address that this is"\r
3380   FORMAT "X(4)"\r
3381   INITIAL ""\r
3382   POSITION 3\r
3383   SQL-WIDTH 8\r
3384   ORDER 20\r
3385   MANDATORY\r
3386 \r
3387 ADD FIELD "Address" OF "PostalDetail" AS character \r
3388   DESCRIPTION "The postal address"\r
3389   FORMAT "X(256)"\r
3390   INITIAL ""\r
3391   POSITION 4\r
3392   SQL-WIDTH 512\r
3393   VIEW-AS "VIEW-AS EDITOR INNER-CHARS 40 INNER-LINES 3 SCROLLBAR-VERTICAL"\r
3394   LENGTH 0\r
3395   ORDER 30\r
3396 \r
3397 ADD FIELD "City" OF "PostalDetail" AS character \r
3398   FORMAT "X(30)"\r
3399   INITIAL ""\r
3400   POSITION 5\r
3401   SQL-WIDTH 60\r
3402   LENGTH 0\r
3403   ORDER 40\r
3404 \r
3405 ADD FIELD "State" OF "PostalDetail" AS character \r
3406   FORMAT "X(15)"\r
3407   INITIAL ""\r
3408   POSITION 6\r
3409   SQL-WIDTH 30\r
3410   LENGTH 0\r
3411   ORDER 50\r
3412 \r
3413 ADD FIELD "Country" OF "PostalDetail" AS character \r
3414   FORMAT "X(30)"\r
3415   INITIAL ""\r
3416   POSITION 7\r
3417   SQL-WIDTH 60\r
3418   LENGTH 0\r
3419   ORDER 60\r
3420 \r
3421 ADD FIELD "Zip" OF "PostalDetail" AS character \r
3422   FORMAT "X(20)"\r
3423   INITIAL ""\r
3424   POSITION 8\r
3425   SQL-WIDTH 40\r
3426   LENGTH 0\r
3427   ORDER 70\r
3428 \r
3429 ADD INDEX "PostalDetails" ON "PostalDetail" \r
3430   AREA "Schema Area"\r
3431   UNIQUE\r
3432   PRIMARY\r
3433   INDEX-FIELD "PersonCode" ASCENDING \r
3434   INDEX-FIELD "PostalType" ASCENDING \r
3435 \r
3436 ADD INDEX "XAK1PostalDetails" ON "PostalDetail" \r
3437   AREA "Schema Area"\r
3438   INDEX-FIELD "Country" ASCENDING \r
3439   INDEX-FIELD "State" ASCENDING \r
3440   INDEX-FIELD "City" ASCENDING \r
3441 \r
3442 ADD TABLE "PostalType"\r
3443   AREA "Schema Area"\r
3444   DUMP-NAME "postalty"\r
3445 \r
3446 ADD FIELD "PostalType" OF "PostalType" AS character \r
3447   FORMAT "X(4)"\r
3448   INITIAL ""\r
3449   POSITION 2\r
3450   SQL-WIDTH 8\r
3451   ORDER 10\r
3452   MANDATORY\r
3453 \r
3454 ADD FIELD "Description" OF "PostalType" AS character \r
3455   FORMAT "X(50)"\r
3456   INITIAL ""\r
3457   POSITION 3\r
3458   SQL-WIDTH 100\r
3459   ORDER 20\r
3460 \r
3461 ADD INDEX "XPKPostalType" ON "PostalType" \r
3462   AREA "Schema Area"\r
3463   UNIQUE\r
3464   PRIMARY\r
3465   INDEX-FIELD "PostalType" ASCENDING \r
3466 \r
3467 ADD TABLE "Project"\r
3468   AREA "Schema Area"\r
3469   DUMP-NAME "project"\r
3470   TABLE-TRIGGER "CREATE" OVERRIDE PROCEDURE "crprjct.p" CRC "?" \r
3471   TABLE-TRIGGER "WRITE" OVERRIDE PROCEDURE "wrprojct.p" CRC "?" \r
3472 \r
3473 ADD FIELD "ProjectCode" OF "Project" AS integer \r
3474   FORMAT "99999"\r
3475   INITIAL "0"\r
3476   POSITION 2\r
3477   SQL-WIDTH 4\r
3478   ORDER 5\r
3479 \r
3480 ADD FIELD "EntityType" OF "Project" AS character \r
3481   FORMAT "X(4)"\r
3482   INITIAL ""\r
3483   LABEL "Entity type code"\r
3484   POSITION 3\r
3485   SQL-WIDTH 8\r
3486   LENGTH 0\r
3487   ORDER 10\r
3488   MANDATORY\r
3489 \r
3490 ADD FIELD "Name" OF "Project" AS character \r
3491   FORMAT "X(50)"\r
3492   INITIAL ""\r
3493   POSITION 4\r
3494   SQL-WIDTH 100\r
3495   ORDER 160\r
3496 \r
3497 ADD FIELD "EntityCode" OF "Project" AS integer \r
3498   FORMAT "99999"\r
3499   INITIAL "0"\r
3500   LABEL "Code"\r
3501   POSITION 5\r
3502   SQL-WIDTH 4\r
3503   COLUMN-LABEL-SA "C"\r
3504   ORDER 20\r
3505 \r
3506 ADD FIELD "EntityAccount" OF "Project" AS decimal \r
3507   DESCRIPTION "The code of the account."\r
3508   FORMAT "9999.99"\r
3509   INITIAL "0000.00"\r
3510   LABEL "Account"\r
3511   POSITION 6\r
3512   SQL-WIDTH 17\r
3513   DECIMALS 2\r
3514   ORDER 30\r
3515   MANDATORY\r
3516 \r
3517 ADD FIELD "LastModifiedDate" OF "Project" AS date \r
3518   DESCRIPTION "The date when this record was last modified.  Maintained by a WRITE trigger."\r
3519   FORMAT "99/99/9999"\r
3520   INITIAL "1/1/0001"\r
3521   POSITION 7\r
3522   SQL-WIDTH 4\r
3523   ORDER 110\r
3524   MANDATORY\r
3525 \r
3526 ADD FIELD "LastModifiedTime" OF "Project" AS integer \r
3527   DESCRIPTION "The time that this record was last modified"\r
3528   FORMAT "->,>>>,>>9"\r
3529   INITIAL "0"\r
3530   POSITION 8\r
3531   SQL-WIDTH 4\r
3532   ORDER 120\r
3533 \r
3534 ADD FIELD "LastModifiedUser" OF "Project" AS character \r
3535   DESCRIPTION "The user who last modified this record.  Maintained by a WRITE trigger."\r
3536   FORMAT "X(8)"\r
3537   INITIAL ""\r
3538   POSITION 9\r
3539   SQL-WIDTH 16\r
3540   LENGTH 0\r
3541   ORDER 130\r
3542 \r
3543 ADD FIELD "Proposer" OF "Project" AS integer \r
3544   DESCRIPTION "A code used to refer to this proposer of this Project."\r
3545   FORMAT "99999"\r
3546   INITIAL "0"\r
3547   LABEL "Proposer"\r
3548   POSITION 10\r
3549   SQL-WIDTH 4\r
3550   ORDER 40\r
3551   MANDATORY\r
3552 \r
3553 ADD FIELD "FirstApprover" OF "Project" AS character \r
3554   DESCRIPTION "The short alphanumeric code that identifies this approver."\r
3555   FORMAT "X(4)"\r
3556   INITIAL ""\r
3557   LABEL "Approval"\r
3558   POSITION 11\r
3559   SQL-WIDTH 8\r
3560   ORDER 140\r
3561   MANDATORY\r
3562 \r
3563 ADD FIELD "SecondApprover" OF "Project" AS character \r
3564   DESCRIPTION "The short alphanumeric code that identifies this approver."\r
3565   FORMAT "X(4)"\r
3566   INITIAL ""\r
3567   LABEL "Approval"\r
3568   POSITION 12\r
3569   SQL-WIDTH 8\r
3570   ORDER 150\r
3571   MANDATORY\r
3572 \r
3573 ADD FIELD "StartDate" OF "Project" AS date \r
3574   FORMAT "99/99/9999"\r
3575   INITIAL ?\r
3576   LABEL "Start Date"\r
3577   POSITION 13\r
3578   SQL-WIDTH 4\r
3579   ORDER 70\r
3580 \r
3581 ADD FIELD "CompleteDate" OF "Project" AS date \r
3582   FORMAT "99/99/9999"\r
3583   INITIAL ?\r
3584   LABEL "Completion Date"\r
3585   POSITION 14\r
3586   SQL-WIDTH 4\r
3587   ORDER 80\r
3588 \r
3589 ADD FIELD "ApprovedAmount" OF "Project" AS decimal \r
3590   FORMAT ">>>,>>>,>>9.99"\r
3591   INITIAL "0"\r
3592   LABEL "Approved Amount"\r
3593   POSITION 15\r
3594   SQL-WIDTH 17\r
3595   DECIMALS 2\r
3596   ORDER 90\r
3597 \r
3598 ADD FIELD "ExpenditureType" OF "Project" AS character \r
3599   FORMAT "X(4)"\r
3600   INITIAL ""\r
3601   LABEL "Expenditure Type"\r
3602   POSITION 16\r
3603   SQL-WIDTH 8\r
3604   ORDER 100\r
3605 \r
3606 ADD FIELD "Description" OF "Project" AS character \r
3607   FORMAT "X(256)"\r
3608   INITIAL ""\r
3609   POSITION 17\r
3610   SQL-WIDTH 512\r
3611   ORDER 170\r
3612 \r
3613 ADD FIELD "ProposedDate" OF "Project" AS date \r
3614   FORMAT "99/99/9999"\r
3615   INITIAL ?\r
3616   LABEL "Proposed"\r
3617   POSITION 18\r
3618   SQL-WIDTH 4\r
3619   ORDER 180\r
3620 \r
3621 ADD FIELD "ApproveDate" OF "Project" AS date \r
3622   FORMAT "99/99/9999"\r
3623   INITIAL ?\r
3624   LABEL "CapEx Approved"\r
3625   POSITION 19\r
3626   SQL-WIDTH 4\r
3627   ORDER 190\r
3628 \r
3629 ADD FIELD "SecondApproveDate" OF "Project" AS date \r
3630   FORMAT "99/99/9999"\r
3631   INITIAL ?\r
3632   LABEL "2nd Approved"\r
3633   POSITION 20\r
3634   SQL-WIDTH 4\r
3635   ORDER 200\r
3636 \r
3637 ADD FIELD "ClosedDate" OF "Project" AS date \r
3638   FORMAT "99/99/9999"\r
3639   INITIAL ?\r
3640   LABEL "Closed"\r
3641   POSITION 21\r
3642   SQL-WIDTH 4\r
3643   ORDER 210\r
3644 \r
3645 ADD FIELD "NotApprovedDate" OF "Project" AS date \r
3646   FORMAT "99/99/9999"\r
3647   INITIAL ?\r
3648   LABEL "Not Approved"\r
3649   POSITION 22\r
3650   SQL-WIDTH 4\r
3651   ORDER 220\r
3652 \r
3653 ADD FIELD "NotApprovedReason" OF "Project" AS character \r
3654   FORMAT "X(80)"\r
3655   INITIAL ?\r
3656   LABEL "Why not"\r
3657   POSITION 23\r
3658   SQL-WIDTH 160\r
3659   ORDER 230\r
3660 \r
3661 ADD FIELD "NotApprovedBy" OF "Project" AS integer \r
3662   FORMAT "->,>>>,>>9"\r
3663   INITIAL "0"\r
3664   POSITION 24\r
3665   SQL-WIDTH 4\r
3666   ORDER 240\r
3667 \r
3668 ADD FIELD "BudgetsFrozen" OF "Project" AS logical \r
3669   FORMAT "yes/no"\r
3670   INITIAL "no"\r
3671   LABEL "Freeze Budgets"\r
3672   POSITION 25\r
3673   SQL-WIDTH 1\r
3674   ORDER 250\r
3675 \r
3676 ADD FIELD "Active" OF "Project" AS logical \r
3677   DESCRIPTION "Flag to indicate whether the project is active or inactive"\r
3678   FORMAT "yes/no"\r
3679   INITIAL "Yes"\r
3680   POSITION 26\r
3681   SQL-WIDTH 1\r
3682   ORDER 260\r
3683 \r
3684 ADD FIELD "ProjectType" OF "Project" AS character \r
3685   FORMAT "X(4)"\r
3686   INITIAL ""\r
3687   LABEL "Type"\r
3688   POSITION 27\r
3689   SQL-WIDTH 8\r
3690   ORDER 270\r
3691 \r
3692 ADD FIELD "BudgetAmount" OF "Project" AS decimal \r
3693   DESCRIPTION "Amount proposed or budgetted for the project"\r
3694   FORMAT "->>>,>>>,>>9.99"\r
3695   INITIAL "0"\r
3696   POSITION 28\r
3697   SQL-WIDTH 17\r
3698   HELP "Amount proposed or budgetted for the project"\r
3699   DECIMALS 2\r
3700   ORDER 85\r
3701 \r
3702 ADD FIELD "Approved" OF "Project" AS logical \r
3703   DESCRIPTION "Flag indicating approval status of the project"\r
3704   FORMAT "yes/no"\r
3705   INITIAL "no"\r
3706   POSITION 29\r
3707   SQL-WIDTH 1\r
3708   HELP "Whether or not the capital expenditure is approved"\r
3709   ORDER 280\r
3710 \r
3711 ADD FIELD "AreaSize" OF "Project" AS decimal \r
3712   DESCRIPTION "Size of the area affected/created by the project to allow project costs to be apportioned on a PSM basis"\r
3713   FORMAT "->>,>>9.99"\r
3714   INITIAL "0"\r
3715   POSITION 30\r
3716   SQL-WIDTH 17\r
3717   DECIMALS 2\r
3718   ORDER 290\r
3719 \r
3720 ADD INDEX "XPKProject" ON "Project" \r
3721   AREA "Schema Area"\r
3722   UNIQUE\r
3723   PRIMARY\r
3724   INDEX-FIELD "ProjectCode" ASCENDING \r
3725 \r
3726 ADD INDEX "XAK1Project" ON "Project" \r
3727   AREA "Schema Area"\r
3728   INDEX-FIELD "EntityType" ASCENDING \r
3729   INDEX-FIELD "EntityCode" ASCENDING \r
3730   INDEX-FIELD "ProjectCode" ASCENDING \r
3731 \r
3732 ADD INDEX "XAK2Projects" ON "Project" \r
3733   AREA "Schema Area"\r
3734   INDEX-FIELD "ProjectType" ASCENDING \r
3735   INDEX-FIELD "StartDate" ASCENDING \r
3736   INDEX-FIELD "ProjectCode" ASCENDING \r
3737 \r
3738 ADD TABLE "Property"\r
3739   AREA "Schema Area"\r
3740   DUMP-NAME "property"\r
3741   TABLE-TRIGGER "WRITE" OVERRIDE PROCEDURE "wrproper.p" CRC "?" \r
3742 \r
3743 ADD FIELD "PropertyCode" OF "Property" AS integer \r
3744   DESCRIPTION "The code used to refer to a property"\r
3745   FORMAT "99999"\r
3746   INITIAL "0"\r
3747   LABEL "Code"\r
3748   POSITION 2\r
3749   SQL-WIDTH 4\r
3750   ORDER 10\r
3751   FIELD-TRIGGER "ASSIGN" OVERRIDE PROCEDURE "a-procde.p" CRC "?" \r
3752 \r
3753 ADD FIELD "LocationDescription" OF "Property" AS integer \r
3754   DESCRIPTION "Descriptive paragraphs about the location of the property."\r
3755   FORMAT ">>>>>9"\r
3756   INITIAL "0"\r
3757   LABEL "Location"\r
3758   POSITION 3\r
3759   SQL-WIDTH 4\r
3760   ORDER 20\r
3761   MANDATORY\r
3762 \r
3763 ADD FIELD "Administrator" OF "Property" AS integer \r
3764   DESCRIPTION "The staff member who is involved in administration of the property."\r
3765   FORMAT ">>>>>9"\r
3766   INITIAL "0"\r
3767   POSITION 4\r
3768   SQL-WIDTH 4\r
3769   ORDER 30\r
3770   MANDATORY\r
3771 \r
3772 ADD FIELD "CompanyCode" OF "Property" AS integer \r
3773   DESCRIPTION "The company which owns this property"\r
3774   FORMAT "99999"\r
3775   INITIAL "0"\r
3776   LABEL "Company"\r
3777   POSITION 5\r
3778   SQL-WIDTH 4\r
3779   ORDER 40\r
3780   MANDATORY\r
3781 \r
3782 ADD FIELD "Name" OF "Property" AS character \r
3783   DESCRIPTION "A name used to refer to this property."\r
3784   FORMAT "X(50)"\r
3785   INITIAL ""\r
3786   POSITION 6\r
3787   SQL-WIDTH 100\r
3788   ORDER 50\r
3789 \r
3790 ADD FIELD "ShortName" OF "Property" AS character \r
3791   DESCRIPTION "A short name for this property which will be used as a column header on some reports"\r
3792   FORMAT "X(10)"\r
3793   INITIAL ""\r
3794   LABEL "Short name"\r
3795   POSITION 7\r
3796   SQL-WIDTH 20\r
3797   LENGTH 0\r
3798   ORDER 60\r
3799 \r
3800 ADD FIELD "StreetAddress" OF "Property" AS character \r
3801   DESCRIPTION "The address of the property"\r
3802   FORMAT "X(50)"\r
3803   INITIAL ""\r
3804   LABEL "Street address"\r
3805   POSITION 8\r
3806   SQL-WIDTH 100\r
3807   LENGTH 0\r
3808   ORDER 70\r
3809 \r
3810 ADD FIELD "ChiefWarden" OF "Property" AS integer \r
3811   DESCRIPTION "The person who is the chief building warden."\r
3812   FORMAT ">>>>>9"\r
3813   INITIAL "0"\r
3814   LABEL "Chief warden"\r
3815   POSITION 9\r
3816   SQL-WIDTH 4\r
3817   ORDER 80\r
3818   MANDATORY\r
3819 \r
3820 ADD FIELD "DeputyWarden" OF "Property" AS integer \r
3821   DESCRIPTION "The person who is the deputy building warden."\r
3822   FORMAT ">>>>>9"\r
3823   INITIAL "0"\r
3824   LABEL "Deputy warden"\r
3825   POSITION 10\r
3826   SQL-WIDTH 4\r
3827   ORDER 90\r
3828   MANDATORY\r
3829 \r
3830 ADD FIELD "Manager" OF "Property" AS integer \r
3831   DESCRIPTION "The staff member who manages the property"\r
3832   FORMAT ">>>>>9"\r
3833   INITIAL "0"\r
3834   POSITION 11\r
3835   SQL-WIDTH 4\r
3836   ORDER 100\r
3837   MANDATORY\r
3838 \r
3839 ADD FIELD "Active" OF "Property" AS logical \r
3840   DESCRIPTION "Flag to indicate whether the property is active or inactive"\r
3841   FORMAT "yes/no"\r
3842   INITIAL "no"\r
3843   POSITION 12\r
3844   SQL-WIDTH 1\r
3845   ORDER 110\r
3846 \r
3847 ADD FIELD "ComplianceNo" OF "Property" AS character \r
3848   FORMAT "X(20)"\r
3849   INITIAL ""\r
3850   LABEL "Compliance No"\r
3851   POSITION 13\r
3852   SQL-WIDTH 40\r
3853   HELP "The reference code for building warrant of fitness use"\r
3854   ORDER 450\r
3855 \r
3856 ADD FIELD "Ranking" OF "Property" AS integer \r
3857   DESCRIPTION "A number indicating this buildings ranking within the portfolio"\r
3858   FORMAT "->,>>>,>>9"\r
3859   INITIAL "0"\r
3860   POSITION 14\r
3861   SQL-WIDTH 4\r
3862   HELP "A number indicating this buildings ranking within the portfolio"\r
3863   ORDER 460\r
3864 \r
3865 ADD FIELD "NoteCode" OF "Property" AS integer \r
3866   DESCRIPTION "A unique code identifying this note."\r
3867   FORMAT ">>>>>9"\r
3868   INITIAL ?\r
3869   POSITION 15\r
3870   SQL-WIDTH 4\r
3871   ORDER 140\r
3872 \r
3873 ADD FIELD "PurchaseAgreement" OF "Property" AS date \r
3874   FORMAT "99/99/9999"\r
3875   INITIAL ?\r
3876   POSITION 16\r
3877   SQL-WIDTH 4\r
3878   ORDER 250\r
3879 \r
3880 ADD FIELD "PurchasePrice" OF "Property" AS decimal \r
3881   FORMAT ">>>,>>>,>>9.99"\r
3882   INITIAL "0"\r
3883   POSITION 17\r
3884   SQL-WIDTH 17\r
3885   DECIMALS 2\r
3886   ORDER 160\r
3887 \r
3888 ADD FIELD "PurchaseCosts" OF "Property" AS decimal \r
3889   FORMAT ">>,>>>,>>9.99"\r
3890   INITIAL "0"\r
3891   POSITION 18\r
3892   SQL-WIDTH 17\r
3893   HELP "Costs associated with purchasing the property"\r
3894   DECIMALS 2\r
3895   ORDER 170\r
3896 \r
3897 ADD FIELD "City" OF "Property" AS character \r
3898   FORMAT "X(20)"\r
3899   INITIAL ""\r
3900   POSITION 19\r
3901   SQL-WIDTH 40\r
3902   LENGTH 0\r
3903   ORDER 180\r
3904 \r
3905 ADD FIELD "PurchasedFrom" OF "Property" AS character \r
3906   FORMAT "X(50)"\r
3907   INITIAL ""\r
3908   POSITION 20\r
3909   SQL-WIDTH 100\r
3910   LENGTH 0\r
3911   ORDER 190\r
3912 \r
3913 ADD FIELD "PurchaseSettlement" OF "Property" AS date \r
3914   FORMAT "99/99/9999"\r
3915   INITIAL ?\r
3916   POSITION 21\r
3917   SQL-WIDTH 4\r
3918   ORDER 260\r
3919 \r
3920 ADD FIELD "SalePrice" OF "Property" AS decimal \r
3921   FORMAT ">>>,>>>,>>9.99"\r
3922   INITIAL "0"\r
3923   POSITION 22\r
3924   SQL-WIDTH 17\r
3925   DECIMALS 2\r
3926   ORDER 210\r
3927 \r
3928 ADD FIELD "SaleAgreement" OF "Property" AS date \r
3929   FORMAT "99/99/9999"\r
3930   INITIAL ?\r
3931   POSITION 23\r
3932   SQL-WIDTH 4\r
3933   ORDER 270\r
3934 \r
3935 ADD FIELD "SoldTo" OF "Property" AS character \r
3936   FORMAT "X(50)"\r
3937   INITIAL ""\r
3938   POSITION 24\r
3939   SQL-WIDTH 100\r
3940   LENGTH 0\r
3941   ORDER 230\r
3942 \r
3943 ADD FIELD "BuildingType" OF "Property" AS character \r
3944   FORMAT "X(4)"\r
3945   INITIAL ""\r
3946   LABEL "Type"\r
3947   POSITION 25\r
3948   SQL-WIDTH 8\r
3949   LENGTH 0\r
3950   ORDER 240\r
3951 \r
3952 ADD FIELD "SaleSettlement" OF "Property" AS date \r
3953   FORMAT "99/99/9999"\r
3954   INITIAL ?\r
3955   POSITION 26\r
3956   SQL-WIDTH 4\r
3957   ORDER 280\r
3958 \r
3959 ADD FIELD "Region" OF "Property" AS character \r
3960   DESCRIPTION "Code to refer to region the property is in"\r
3961   FORMAT "X(4)"\r
3962   INITIAL ""\r
3963   POSITION 27\r
3964   SQL-WIDTH 8\r
3965   HELP "Enter region code"\r
3966   LENGTH 0\r
3967   ORDER 290\r
3968 \r
3969 ADD FIELD "ExternallyManaged" OF "Property" AS logical \r
3970   DESCRIPTION "True if the building is managed externally through a separated organisation."\r
3971   FORMAT "yes/no"\r
3972   INITIAL "no"\r
3973   LABEL "Ext Mgmt"\r
3974   POSITION 28\r
3975   SQL-WIDTH 1\r
3976   COLUMN-LABEL "Ext"\r
3977   ORDER 300\r
3978 \r
3979 ADD FIELD "LastModifiedDate" OF "Property" AS date \r
3980   DESCRIPTION "The date when this record was last modified.  Maintained by a WRITE trigger."\r
3981   FORMAT "99/99/9999"\r
3982   INITIAL "1/1/0001"\r
3983   POSITION 29\r
3984   SQL-WIDTH 4\r
3985   ORDER 330\r
3986   MANDATORY\r
3987 \r
3988 ADD FIELD "LastModifiedTime" OF "Property" AS integer \r
3989   DESCRIPTION "The time that this record was last modified"\r
3990   FORMAT "->,>>>,>>9"\r
3991   INITIAL "0"\r
3992   POSITION 30\r
3993   SQL-WIDTH 4\r
3994   ORDER 340\r
3995 \r
3996 ADD FIELD "LastModifiedUser" OF "Property" AS character \r
3997   DESCRIPTION "The user who last modified this record.  Maintained by a WRITE trigger."\r
3998   FORMAT "X(8)"\r
3999   INITIAL ""\r
4000   POSITION 31\r
4001   SQL-WIDTH 16\r
4002   LENGTH 0\r
4003   ORDER 350\r
4004 \r
4005 ADD FIELD "AuditRecordId" OF "Property" AS integer \r
4006   FORMAT "->,>>>,>>9"\r
4007   INITIAL "0"\r
4008   POSITION 32\r
4009   SQL-WIDTH 4\r
4010   ORDER 360\r
4011 \r
4012 ADD FIELD "OpexEstimate" OF "Property" AS decimal \r
4013   DESCRIPTION "Estimated OPEX PSM for the building."\r
4014   FORMAT "->>>,>>>,>>9.99"\r
4015   INITIAL "0"\r
4016   POSITION 33\r
4017   SQL-WIDTH 17\r
4018   DECIMALS 2\r
4019   ORDER 370\r
4020 \r
4021 ADD FIELD "MarketRental" OF "Property" AS decimal \r
4022   DESCRIPTION "Estimated Achievable Rental (Net Income) for the whole building"\r
4023   FORMAT "->>>,>>>,>>9.99"\r
4024   INITIAL "0"\r
4025   LABEL "Market Rental"\r
4026   POSITION 34\r
4027   SQL-WIDTH 17\r
4028   DECIMALS 2\r
4029   ORDER 380\r
4030 \r
4031 ADD FIELD "WofExpiryDate" OF "Property" AS date \r
4032   FORMAT "99/99/9999"\r
4033   INITIAL ?\r
4034   LABEL "WOF Expiry"\r
4035   POSITION 35\r
4036   SQL-WIDTH 4\r
4037   ORDER 390\r
4038 \r
4039 ADD FIELD "BusIntIndemnityPeriod" OF "Property" AS integer \r
4040   FORMAT ">,>>9"\r
4041   INITIAL "0"\r
4042   LABEL "Indemnity period"\r
4043   POSITION 36\r
4044   SQL-WIDTH 4\r
4045   ORDER 400\r
4046 \r
4047 ADD FIELD "InsuranceBroker" OF "Property" AS integer \r
4048   FORMAT "->,>>>,>>9"\r
4049   INITIAL "0"\r
4050   POSITION 37\r
4051   SQL-WIDTH 4\r
4052   ORDER 410\r
4053 \r
4054 ADD FIELD "TotalArea" OF "Property" AS decimal \r
4055   FORMAT "->,>>>,>>9.999"\r
4056   INITIAL "0"\r
4057   LABEL "Total Area"\r
4058   POSITION 38\r
4059   SQL-WIDTH 17\r
4060   DECIMALS 2\r
4061   ORDER 420\r
4062 \r
4063 ADD FIELD "TotalParks" OF "Property" AS integer \r
4064   FORMAT "->,>>>,>>9"\r
4065   INITIAL "0"\r
4066   LABEL "Total Parks"\r
4067   POSITION 39\r
4068   SQL-WIDTH 4\r
4069   ORDER 430\r
4070 \r
4071 ADD FIELD "ReconciliationDue" OF "Property" AS date \r
4072   FORMAT "99/99/9999"\r
4073   INITIAL ?\r
4074   LABEL "Annual Rec Due"\r
4075   POSITION 40\r
4076   SQL-WIDTH 4\r
4077   COLUMN-LABEL "Annual Rec"\r
4078   HELP "The date that the annual o/g reconciliation is due."\r
4079   ORDER 440\r
4080 \r
4081 ADD FIELD "MarketCarpark" OF "Property" AS decimal \r
4082   DESCRIPTION "Market rental for carparks in this building"\r
4083   FORMAT "->>,>>9.99"\r
4084   INITIAL "0"\r
4085   POSITION 41\r
4086   SQL-WIDTH 17\r
4087   HELP "Market rental for carparks in this building"\r
4088   DECIMALS 2\r
4089   ORDER 470\r
4090 \r
4091 ADD INDEX "Properties" ON "Property" \r
4092   AREA "Schema Area"\r
4093   UNIQUE\r
4094   PRIMARY\r
4095   INDEX-FIELD "PropertyCode" ASCENDING \r
4096 \r
4097 ADD INDEX "XAK1Properties" ON "Property" \r
4098   AREA "Schema Area"\r
4099   INDEX-FIELD "ShortName" ASCENDING ABBREVIATED \r
4100 \r
4101 ADD INDEX "XAKRegion" ON "Property" \r
4102   AREA "Schema Area"\r
4103   INDEX-FIELD "Region" ASCENDING ABBREVIATED \r
4104 \r
4105 ADD TABLE "PropertyTitle"\r
4106   AREA "Schema Area"\r
4107   DUMP-NAME "propert2"\r
4108 \r
4109 ADD FIELD "PropertyCode" OF "PropertyTitle" AS integer \r
4110   DESCRIPTION "The code of the property which this title relates to."\r
4111   FORMAT "99999"\r
4112   INITIAL "0"\r
4113   POSITION 2\r
4114   SQL-WIDTH 4\r
4115   ORDER 10\r
4116 \r
4117 ADD FIELD "TitleCode" OF "PropertyTitle" AS integer \r
4118   DESCRIPTION "The sequence of this title within the property"\r
4119   FORMAT ">>>>>9"\r
4120   INITIAL "0"\r
4121   POSITION 3\r
4122   SQL-WIDTH 4\r
4123   ORDER 20\r
4124 \r
4125 ADD FIELD "CTReference" OF "PropertyTitle" AS character \r
4126   DESCRIPTION "The reference to the certificate of title."\r
4127   FORMAT "X(8)"\r
4128   INITIAL ""\r
4129   POSITION 4\r
4130   SQL-WIDTH 16\r
4131   ORDER 30\r
4132 \r
4133 ADD FIELD "Easements" OF "PropertyTitle" AS character \r
4134   DESCRIPTION "Descriptions of any easements"\r
4135   FORMAT "X(8)"\r
4136   INITIAL ""\r
4137   POSITION 5\r
4138   SQL-WIDTH 16\r
4139   ORDER 40\r
4140 \r
4141 ADD FIELD "LegalDescription" OF "PropertyTitle" AS character \r
4142   DESCRIPTION "The legal description of the title."\r
4143   FORMAT "X(8)"\r
4144   INITIAL ""\r
4145   POSITION 6\r
4146   SQL-WIDTH 16\r
4147   ORDER 50\r
4148 \r
4149 ADD FIELD "RightsOfWay" OF "PropertyTitle" AS character \r
4150   DESCRIPTION "Descriptions of any rights of way."\r
4151   FORMAT "X(8)"\r
4152   INITIAL ""\r
4153   POSITION 7\r
4154   SQL-WIDTH 16\r
4155   ORDER 60\r
4156 \r
4157 ADD FIELD "WhereHeld" OF "PropertyTitle" AS character \r
4158   DESCRIPTION "Where the original title documents are held (usually a lawyer?).  Could we use a lookup table? Discuss with AP."\r
4159   FORMAT "X(50)"\r
4160   INITIAL ""\r
4161   POSITION 8\r
4162   SQL-WIDTH 100\r
4163   ORDER 70\r
4164 \r
4165 ADD INDEX "Titles" ON "PropertyTitle" \r
4166   AREA "Schema Area"\r
4167   UNIQUE\r
4168   PRIMARY\r
4169   INDEX-FIELD "PropertyCode" ASCENDING \r
4170   INDEX-FIELD "TitleCode" ASCENDING \r
4171 \r
4172 ADD TABLE "RentReview"\r
4173   AREA "Schema Area"\r
4174   DUMP-NAME "rentrevi"\r
4175   TABLE-TRIGGER "WRITE" OVERRIDE PROCEDURE "wrrntrvw.p" CRC "?" \r
4176 \r
4177 ADD FIELD "TenancyLeaseCode" OF "RentReview" AS integer \r
4178   DESCRIPTION "The lease that this rent review applies to."\r
4179   FORMAT "99999"\r
4180   INITIAL "0"\r
4181   POSITION 2\r
4182   SQL-WIDTH 4\r
4183   ORDER 10\r
4184 \r
4185 ADD FIELD "DateDue" OF "RentReview" AS date \r
4186   DESCRIPTION "The date on which this rent review is due"\r
4187   FORMAT "99/99/9999"\r
4188   INITIAL ?\r
4189   POSITION 3\r
4190   SQL-WIDTH 4\r
4191   ORDER 20\r
4192 \r
4193 ADD FIELD "DateComplete" OF "RentReview" AS date \r
4194   DESCRIPTION "The date on which this rent review was completed"\r
4195   FORMAT "99/99/9999"\r
4196   INITIAL ?\r
4197   POSITION 4\r
4198   SQL-WIDTH 4\r
4199   ORDER 30\r
4200 \r
4201 ADD FIELD "EstimateBasis" OF "RentReview" AS character \r
4202   DESCRIPTION "A brief description of the basis of the market rental estimate."\r
4203   FORMAT "X(100)"\r
4204   INITIAL ""\r
4205   POSITION 5\r
4206   SQL-WIDTH 200\r
4207   ORDER 40\r
4208 \r
4209 ADD FIELD "MarketRental" OF "RentReview" AS decimal \r
4210   DESCRIPTION "The estimated rental for the lease at current market rates."\r
4211   FORMAT "->>,>>>,>>9.99"\r
4212   INITIAL "0"\r
4213   POSITION 6\r
4214   SQL-WIDTH 17\r
4215   DECIMALS 2\r
4216   ORDER 50\r
4217 \r
4218 ADD FIELD "MarketRentalDate" OF "RentReview" AS date \r
4219   DESCRIPTION "The date at which the market rental was last estimated."\r
4220   FORMAT "99/99/9999"\r
4221   INITIAL ?\r
4222   POSITION 7\r
4223   SQL-WIDTH 4\r
4224   ORDER 60\r
4225 \r
4226 ADD FIELD "NewRentAppliesFrom" OF "RentReview" AS date \r
4227   DESCRIPTION "The date from which the new rent will apply.  This may be prior to the new rent start date, which would indicate that a portion would be charged in arrears on that date."\r
4228   FORMAT "99/99/9999"\r
4229   INITIAL ?\r
4230   POSITION 8\r
4231   SQL-WIDTH 4\r
4232   ORDER 70\r
4233 \r
4234 ADD FIELD "NewRentStart" OF "RentReview" AS date \r
4235   DESCRIPTION "The date on which the tenant will first be charged for the new rental"\r
4236   FORMAT "99/99/9999"\r
4237   INITIAL ?\r
4238   POSITION 9\r
4239   SQL-WIDTH 4\r
4240   ORDER 80\r
4241 \r
4242 ADD FIELD "ReviewStatus" OF "RentReview" AS character \r
4243   FORMAT "X(4)"\r
4244   INITIAL ""\r
4245   POSITION 10\r
4246   SQL-WIDTH 8\r
4247   ORDER 90\r
4248   MANDATORY\r
4249 \r
4250 ADD FIELD "ReviewType" OF "RentReview" AS character \r
4251   FORMAT "X(4)"\r
4252   INITIAL ""\r
4253   POSITION 11\r
4254   SQL-WIDTH 8\r
4255   ORDER 100\r
4256   MANDATORY\r
4257 \r
4258 ADD FIELD "OldRental" OF "RentReview" AS decimal \r
4259   FORMAT "->>,>>>,>>9.99"\r
4260   INITIAL "0"\r
4261   LABEL "Old Rental"\r
4262   POSITION 12\r
4263   SQL-WIDTH 17\r
4264   DECIMALS 2\r
4265   ORDER 110\r
4266 \r
4267 ADD FIELD "NewRental" OF "RentReview" AS decimal \r
4268   FORMAT "->>,>>>,>>9.99"\r
4269   INITIAL "0"\r
4270   LABEL "New Rental"\r
4271   POSITION 13\r
4272   SQL-WIDTH 17\r
4273   DECIMALS 2\r
4274   ORDER 120\r
4275 \r
4276 ADD FIELD "LastModifiedDate" OF "RentReview" AS date \r
4277   DESCRIPTION "The date when this record was last modified.  Maintained by a WRITE trigger."\r
4278   FORMAT "99/99/9999"\r
4279   INITIAL "1/1/0001"\r
4280   POSITION 14\r
4281   SQL-WIDTH 4\r
4282   ORDER 130\r
4283   MANDATORY\r
4284 \r
4285 ADD FIELD "LastModifiedTime" OF "RentReview" AS integer \r
4286   DESCRIPTION "The time that this record was last modified"\r
4287   FORMAT "->,>>>,>>9"\r
4288   INITIAL "0"\r
4289   POSITION 15\r
4290   SQL-WIDTH 4\r
4291   ORDER 140\r
4292 \r
4293 ADD FIELD "LastModifiedUser" OF "RentReview" AS character \r
4294   DESCRIPTION "The user who last modified this record.  Maintained by a WRITE trigger."\r
4295   FORMAT "X(8)"\r
4296   INITIAL ""\r
4297   POSITION 16\r
4298   SQL-WIDTH 16\r
4299   LENGTH 0\r
4300   ORDER 150\r
4301 \r
4302 ADD FIELD "AuditRecordId" OF "RentReview" AS integer \r
4303   FORMAT "->,>>>,>>9"\r
4304   INITIAL "0"\r
4305   POSITION 17\r
4306   SQL-WIDTH 4\r
4307   ORDER 160\r
4308 \r
4309 ADD FIELD "Earliest" OF "RentReview" AS date \r
4310   DESCRIPTION "Earliest date at which the rent review can be done"\r
4311   FORMAT "99/99/9999"\r
4312   INITIAL ?\r
4313   POSITION 18\r
4314   SQL-WIDTH 4\r
4315   ORDER 170\r
4316 \r
4317 ADD FIELD "Latest" OF "RentReview" AS date \r
4318   DESCRIPTION "Latest date at which the rent review can be done"\r
4319   FORMAT "99/99/9999"\r
4320   INITIAL ?\r
4321   POSITION 19\r
4322   SQL-WIDTH 4\r
4323   ORDER 180\r
4324 \r
4325 ADD INDEX "RentReviews" ON "RentReview" \r
4326   AREA "Schema Area"\r
4327   UNIQUE\r
4328   PRIMARY\r
4329   INDEX-FIELD "TenancyLeaseCode" ASCENDING \r
4330   INDEX-FIELD "DateDue" ASCENDING \r
4331 \r
4332 ADD INDEX "XAK1RentReviews" ON "RentReview" \r
4333   AREA "Schema Area"\r
4334   INDEX-FIELD "DateDue" ASCENDING \r
4335 \r
4336 ADD TABLE "ReviewStatus"\r
4337   AREA "Schema Area"\r
4338   DUMP-NAME "reviewst"\r
4339 \r
4340 ADD FIELD "ReviewStatus" OF "ReviewStatus" AS character \r
4341   FORMAT "X(4)"\r
4342   INITIAL ""\r
4343   POSITION 2\r
4344   SQL-WIDTH 8\r
4345   ORDER 10\r
4346   MANDATORY\r
4347 \r
4348 ADD FIELD "Description" OF "ReviewStatus" AS character \r
4349   FORMAT "X(50)"\r
4350   INITIAL ""\r
4351   POSITION 3\r
4352   SQL-WIDTH 100\r
4353   ORDER 20\r
4354 \r
4355 ADD INDEX "XPKReviewStatus" ON "ReviewStatus" \r
4356   AREA "Schema Area"\r
4357   UNIQUE\r
4358   PRIMARY\r
4359   INDEX-FIELD "ReviewStatus" ASCENDING \r
4360 \r
4361 ADD TABLE "ReviewType"\r
4362   AREA "Schema Area"\r
4363   DUMP-NAME "reviewty"\r
4364 \r
4365 ADD FIELD "ReviewType" OF "ReviewType" AS character \r
4366   FORMAT "X(4)"\r
4367   INITIAL ""\r
4368   POSITION 2\r
4369   SQL-WIDTH 8\r
4370   ORDER 10\r
4371   MANDATORY\r
4372 \r
4373 ADD FIELD "Description" OF "ReviewType" AS character \r
4374   FORMAT "X(50)"\r
4375   INITIAL ""\r
4376   POSITION 3\r
4377   SQL-WIDTH 100\r
4378   ORDER 20\r
4379 \r
4380 ADD INDEX "XPKReviewTypes" ON "ReviewType" \r
4381   AREA "Schema Area"\r
4382   UNIQUE\r
4383   PRIMARY\r
4384   INDEX-FIELD "ReviewType" ASCENDING \r
4385 \r
4386 ADD TABLE "Scenario"\r
4387   AREA "Schema Area"\r
4388   DUMP-NAME "scenario"\r
4389 \r
4390 ADD FIELD "ScenarioCode" OF "Scenario" AS integer \r
4391   DESCRIPTION "A code to identify the scenario."\r
4392   FORMAT ">>>>>9"\r
4393   INITIAL "0"\r
4394   POSITION 2\r
4395   SQL-WIDTH 4\r
4396   ORDER 10\r
4397 \r
4398 ADD FIELD "Description" OF "Scenario" AS character \r
4399   FORMAT "X(50)"\r
4400   INITIAL ""\r
4401   POSITION 3\r
4402   SQL-WIDTH 100\r
4403   ORDER 60\r
4404 \r
4405 ADD FIELD "Name" OF "Scenario" AS character \r
4406   DESCRIPTION "A brief name to identify the scenario"\r
4407   FORMAT "X(50)"\r
4408   INITIAL ""\r
4409   POSITION 4\r
4410   SQL-WIDTH 100\r
4411   ORDER 30\r
4412 \r
4413 ADD FIELD "PersonCode" OF "Scenario" AS integer \r
4414   DESCRIPTION "A code used to refer to the person who created the scenario."\r
4415   FORMAT "99999"\r
4416   INITIAL "0"\r
4417   LABEL "Person code"\r
4418   POSITION 5\r
4419   SQL-WIDTH 4\r
4420   COLUMN-LABEL "Person"\r
4421   ORDER 70\r
4422   MANDATORY\r
4423 \r
4424 ADD FIELD "ScenarioStatus" OF "Scenario" AS character \r
4425   FORMAT "X(4)"\r
4426   INITIAL ""\r
4427   POSITION 6\r
4428   SQL-WIDTH 8\r
4429   ORDER 50\r
4430   MANDATORY\r
4431 \r
4432 ADD FIELD "ModificationRights" OF "Scenario" AS character \r
4433   FORMAT "X(20)"\r
4434   INITIAL ""\r
4435   POSITION 7\r
4436   SQL-WIDTH 40\r
4437   ORDER 80\r
4438 \r
4439 ADD INDEX "Scenarios" ON "Scenario" \r
4440   AREA "Schema Area"\r
4441   UNIQUE\r
4442   PRIMARY\r
4443   INDEX-FIELD "ScenarioCode" ASCENDING \r
4444 \r
4445 ADD TABLE "ScenarioStatus"\r
4446   AREA "Schema Area"\r
4447   DUMP-NAME "scenari1"\r
4448 \r
4449 ADD FIELD "ScenarioStatus" OF "ScenarioStatus" AS character \r
4450   FORMAT "X(4)"\r
4451   INITIAL ""\r
4452   POSITION 2\r
4453   SQL-WIDTH 8\r
4454   ORDER 10\r
4455   MANDATORY\r
4456 \r
4457 ADD FIELD "Description" OF "ScenarioStatus" AS character \r
4458   FORMAT "X(50)"\r
4459   INITIAL ""\r
4460   POSITION 3\r
4461   SQL-WIDTH 100\r
4462   ORDER 20\r
4463 \r
4464 ADD INDEX "XPKScenarioStatus" ON "ScenarioStatus" \r
4465   AREA "Schema Area"\r
4466   UNIQUE\r
4467   PRIMARY\r
4468   INDEX-FIELD "ScenarioStatus" ASCENDING \r
4469 \r
4470 ADD TABLE "ServiceType"\r
4471   AREA "Schema Area"\r
4472   DUMP-NAME "servicet"\r
4473 \r
4474 ADD FIELD "ServiceType" OF "ServiceType" AS character \r
4475   FORMAT "X(4)"\r
4476   INITIAL ""\r
4477   POSITION 2\r
4478   SQL-WIDTH 8\r
4479   ORDER 10\r
4480   MANDATORY\r
4481 \r
4482 ADD FIELD "Description" OF "ServiceType" AS character \r
4483   FORMAT "X(50)"\r
4484   INITIAL ""\r
4485   POSITION 3\r
4486   SQL-WIDTH 100\r
4487   ORDER 20\r
4488 \r
4489 ADD FIELD "AccountCode" OF "ServiceType" AS decimal \r
4490   DESCRIPTION "The aacount that this service type applies to."\r
4491   FORMAT "9999.99"\r
4492   INITIAL ?\r
4493   LABEL "Account"\r
4494   POSITION 4\r
4495   SQL-WIDTH 17\r
4496   DECIMALS 2\r
4497   ORDER 30\r
4498 \r
4499 ADD FIELD "NRAccountCode" OF "ServiceType" AS decimal \r
4500   DESCRIPTION "The code of the account when the service contract is specified as non-recoverable"\r
4501   FORMAT "9999.99"\r
4502   INITIAL ?\r
4503   LABEL "Account"\r
4504   POSITION 5\r
4505   SQL-WIDTH 17\r
4506   DECIMALS 2\r
4507   ORDER 40\r
4508 \r
4509 ADD INDEX "XPKServiceTypes" ON "ServiceType" \r
4510   AREA "Schema Area"\r
4511   UNIQUE\r
4512   PRIMARY\r
4513   INDEX-FIELD "ServiceType" ASCENDING \r
4514 \r
4515 ADD TABLE "StreetFrontage"\r
4516   AREA "Schema Area"\r
4517   DUMP-NAME "streetfr"\r
4518 \r
4519 ADD FIELD "PropertyCode" OF "StreetFrontage" AS integer \r
4520   DESCRIPTION "The property which this street frontage applies to"\r
4521   FORMAT "99999"\r
4522   INITIAL "0"\r
4523   POSITION 2\r
4524   SQL-WIDTH 4\r
4525   ORDER 10\r
4526 \r
4527 ADD FIELD "FrontageCode" OF "StreetFrontage" AS integer \r
4528   DESCRIPTION "A sequence number for this street frontage."\r
4529   FORMAT ">>>>>9"\r
4530   INITIAL "0"\r
4531   POSITION 3\r
4532   SQL-WIDTH 4\r
4533   ORDER 20\r
4534 \r
4535 ADD FIELD "Description" OF "StreetFrontage" AS character \r
4536   FORMAT "X(50)"\r
4537   INITIAL ""\r
4538   POSITION 4\r
4539   SQL-WIDTH 100\r
4540   LENGTH 0\r
4541   ORDER 30\r
4542 \r
4543 ADD FIELD "Length" OF "StreetFrontage" AS decimal \r
4544   DESCRIPTION "The length of the street frontage, in metres."\r
4545   FORMAT "->>,>>9.99"\r
4546   INITIAL "0"\r
4547   POSITION 5\r
4548   SQL-WIDTH 17\r
4549   DECIMALS 2\r
4550   ORDER 40\r
4551 \r
4552 ADD FIELD "RentalSpaceCode" OF "StreetFrontage" AS integer \r
4553   DESCRIPTION "A rental space that this street frontage applies to, or blank if it applies to a title."\r
4554   FORMAT ">>>>>9"\r
4555   INITIAL "0"\r
4556   POSITION 6\r
4557   SQL-WIDTH 4\r
4558   ORDER 50\r
4559 \r
4560 ADD FIELD "TitleCode" OF "StreetFrontage" AS integer \r
4561   DESCRIPTION "A title that this street frontage applies to, or blank if it applies to a rental space."\r
4562   FORMAT ">>>>>9"\r
4563   INITIAL "0"\r
4564   POSITION 7\r
4565   SQL-WIDTH 4\r
4566   ORDER 60\r
4567 \r
4568 ADD INDEX "StreetFrontages" ON "StreetFrontage" \r
4569   AREA "Schema Area"\r
4570   UNIQUE\r
4571   PRIMARY\r
4572   INDEX-FIELD "PropertyCode" ASCENDING \r
4573   INDEX-FIELD "FrontageCode" ASCENDING \r
4574 \r
4575 ADD TABLE "TenancyLease"\r
4576   AREA "Schema Area"\r
4577   DUMP-NAME "tenancyl"\r
4578   TABLE-TRIGGER "CREATE" OVERRIDE PROCEDURE "crtlscde.p" CRC "?" \r
4579   TABLE-TRIGGER "DELETE" OVERRIDE PROCEDURE "detntlse.p" CRC "?" \r
4580   TABLE-TRIGGER "WRITE" OVERRIDE PROCEDURE "wrtntlse.p" CRC "?" \r
4581 \r
4582 ADD FIELD "TenancyLeaseCode" OF "TenancyLease" AS integer \r
4583   DESCRIPTION "A code used to refer to this tenancy lease"\r
4584   FORMAT "99999"\r
4585   INITIAL "0"\r
4586   LABEL "Code"\r
4587   POSITION 2\r
4588   SQL-WIDTH 4\r
4589   ORDER 10\r
4590 \r
4591 ADD FIELD "AssignedLeaseCode" OF "TenancyLease" AS integer \r
4592   DESCRIPTION "The prior lease in the chain of assigned leases."\r
4593   FORMAT "99999"\r
4594   INITIAL "0"\r
4595   LABEL "Assigned to"\r
4596   POSITION 3\r
4597   SQL-WIDTH 4\r
4598   ORDER 20\r
4599 \r
4600 ADD FIELD "AssignmentDate" OF "TenancyLease" AS date \r
4601   DESCRIPTION "The date on which this lease was assigned from the prior one."\r
4602   FORMAT "99/99/9999"\r
4603   INITIAL ?\r
4604   LABEL "Assign date"\r
4605   POSITION 4\r
4606   SQL-WIDTH 4\r
4607   ORDER 30\r
4608 \r
4609 ADD FIELD "LeaseEndDate" OF "TenancyLease" AS date \r
4610   DESCRIPTION "The date on which the lease ends."\r
4611   FORMAT "99/99/9999"\r
4612   INITIAL ?\r
4613   LABEL "Lease end"\r
4614   POSITION 5\r
4615   SQL-WIDTH 4\r
4616   ORDER 40\r
4617 \r
4618 ADD FIELD "LeaseStartDate" OF "TenancyLease" AS date \r
4619   DESCRIPTION "The date that the lease commenced (which could be in the future)."\r
4620   FORMAT "99/99/9999"\r
4621   INITIAL ?\r
4622   LABEL "Lease start"\r
4623   POSITION 6\r
4624   SQL-WIDTH 4\r
4625   ORDER 50\r
4626 \r
4627 ADD FIELD "LeaseStatus" OF "TenancyLease" AS character \r
4628   FORMAT "X(4)"\r
4629   INITIAL ""\r
4630   LABEL "Status"\r
4631   POSITION 7\r
4632   SQL-WIDTH 8\r
4633   LENGTH 0\r
4634   ORDER 60\r
4635   MANDATORY\r
4636 \r
4637 ADD FIELD "LeaseType" OF "TenancyLease" AS character \r
4638   DESCRIPTION "A code classifying the type of lease."\r
4639   FORMAT "X(4)"\r
4640   INITIAL ""\r
4641   LABEL "Type"\r
4642   POSITION 8\r
4643   SQL-WIDTH 8\r
4644   LENGTH 0\r
4645   ORDER 70\r
4646   MANDATORY\r
4647 \r
4648 ADD FIELD "NoteCode" OF "TenancyLease" AS integer \r
4649   DESCRIPTION "Any notes relating to this lease"\r
4650   FORMAT ">>>>>9"\r
4651   INITIAL "0"\r
4652   LABEL "Notes key"\r
4653   POSITION 9\r
4654   SQL-WIDTH 4\r
4655   ORDER 80\r
4656 \r
4657 ADD FIELD "RatchetClause" OF "TenancyLease" AS character \r
4658   DESCRIPTION "The type of ratchet clause included in the lease, e.g. None, Full, Partial etc."\r
4659   FORMAT "X(4)"\r
4660   INITIAL ?\r
4661   LABEL "Ratchet"\r
4662   POSITION 10\r
4663   SQL-WIDTH 8\r
4664   HELP "Ratchet clause type: None, full, part etc."\r
4665   LENGTH 0\r
4666   ORDER 90\r
4667 \r
4668 ADD FIELD "RentStartDate" OF "TenancyLease" AS date \r
4669   FORMAT "99/99/9999"\r
4670   INITIAL ?\r
4671   LABEL "Rent start"\r
4672   POSITION 11\r
4673   SQL-WIDTH 4\r
4674   HELP "The date on which the tenant starts being liable for rent"\r
4675   ORDER 100\r
4676 \r
4677 ADD FIELD "ReviewNoticePeriod" OF "TenancyLease" AS integer \r
4678   FORMAT ">>>>>9"\r
4679   INITIAL "3"\r
4680   LABEL "Review notice"\r
4681   POSITION 12\r
4682   SQL-WIDTH 4\r
4683   COLUMN-LABEL "RR notice"\r
4684   HELP "The number of months of notice required for a rent review."\r
4685   ORDER 110\r
4686 \r
4687 ADD FIELD "RightsOfRenewal" OF "TenancyLease" AS character \r
4688   FORMAT "X(10)"\r
4689   INITIAL "none"\r
4690   LABEL "Rights of Renewal"\r
4691   POSITION 13\r
4692   SQL-WIDTH 20\r
4693   COLUMN-LABEL "RoR"\r
4694   HELP "The rights of renewal written into the lease."\r
4695   LENGTH 0\r
4696   ORDER 120\r
4697 \r
4698 ADD FIELD "RORNoticePeriod" OF "TenancyLease" AS integer \r
4699   DESCRIPTION "The number of months of notice required for exercise of the rights of renewal."\r
4700   FORMAT ">>>>>9"\r
4701   INITIAL "3"\r
4702   LABEL "RoR notice"\r
4703   POSITION 14\r
4704   SQL-WIDTH 4\r
4705   HELP "Months notice required for exercise of renewal rights"\r
4706   ORDER 130\r
4707 \r
4708 ADD FIELD "TenantCode" OF "TenancyLease" AS integer \r
4709   DESCRIPTION "The tenant who should be billed with transactions relating to this lease.  This should be the same as the TenancyLeaseCode unless people change their minds..."\r
4710   FORMAT ">>>>>9"\r
4711   INITIAL "0"\r
4712   LABEL "Tenant"\r
4713   POSITION 15\r
4714   SQL-WIDTH 4\r
4715   HELP "The tenant code for accounting for this lease."\r
4716   ORDER 140\r
4717 \r
4718 ADD FIELD "DocumentLocation" OF "TenancyLease" AS integer \r
4719   DESCRIPTION "The current location of the lease\r
4720 Foreign key on the 'Note' table."\r
4721   FORMAT ">>>>>9"\r
4722   INITIAL ?\r
4723   LABEL "Document Location Notes"\r
4724   POSITION 16\r
4725   SQL-WIDTH 4\r
4726   COLUMN-LABEL "NotesKey"\r
4727   HELP "A 'note' indicating the current location of the lease docs."\r
4728   ORDER 150\r
4729 \r
4730 ADD FIELD "RecoveryType" OF "TenancyLease" AS character \r
4731   FORMAT "X"\r
4732   INITIAL ""\r
4733   POSITION 17\r
4734   SQL-WIDTH 2\r
4735   HELP "The method of Outgoings Recovery: F=Fixed, B=Budget, N=None"\r
4736   ORDER 390\r
4737 \r
4738 ADD FIELD "PropertyCode" OF "TenancyLease" AS integer \r
4739   DESCRIPTION "The property that the rental spaces in this lease are a part of."\r
4740   FORMAT "99999"\r
4741   INITIAL "0"\r
4742   LABEL "Property"\r
4743   POSITION 18\r
4744   SQL-WIDTH 4\r
4745   ORDER 180\r
4746 \r
4747 ADD FIELD "TermYears" OF "TenancyLease" AS integer \r
4748   FORMAT ">>9"\r
4749   INITIAL "0"\r
4750   LABEL "Years"\r
4751   POSITION 19\r
4752   SQL-WIDTH 4\r
4753   ORDER 190\r
4754 \r
4755 ADD FIELD "TermMonths" OF "TenancyLease" AS integer \r
4756   FORMAT ">9"\r
4757   INITIAL "0"\r
4758   POSITION 20\r
4759   SQL-WIDTH 4\r
4760   VALEXP "TermMonths >= 0 AND TermMonths < 12"\r
4761   VALMSG "Must be between 0 and 11"\r
4762   ORDER 200\r
4763 \r
4764 ADD FIELD "TermDays" OF "TenancyLease" AS integer \r
4765   FORMAT ">>9"\r
4766   INITIAL "0"\r
4767   POSITION 21\r
4768   SQL-WIDTH 4\r
4769   VALEXP "TermDays >= 0 AND TermDays < 32"\r
4770   VALMSG "Must be between 0 and 31"\r
4771   ORDER 210\r
4772 \r
4773 ADD FIELD "ElectricityUnitRate" OF "TenancyLease" AS decimal \r
4774   FORMAT ">9.99"\r
4775   INITIAL "0.15"\r
4776   LABEL "Electricity Rate"\r
4777   POSITION 22\r
4778   SQL-WIDTH 19\r
4779   DECIMALS 4\r
4780   ORDER 250\r
4781 \r
4782 ADD FIELD "OutgoingsBudget" OF "TenancyLease" AS decimal \r
4783   DESCRIPTION "Basis for charging outgoings to a tenant."\r
4784   FORMAT ">,>>>,>>9.99"\r
4785   INITIAL "0"\r
4786   POSITION 23\r
4787   SQL-WIDTH 17\r
4788   DECIMALS 2\r
4789   ORDER 260\r
4790 \r
4791 ADD FIELD "TaxApplies" OF "TenancyLease" AS logical \r
4792   FORMAT "yes/no"\r
4793   INITIAL "Yes"\r
4794   LABEL "Tax applies"\r
4795   POSITION 24\r
4796   SQL-WIDTH 1\r
4797   COLUMN-LABEL "Taxable"\r
4798   ORDER 270\r
4799 \r
4800 ADD FIELD "LastModifiedDate" OF "TenancyLease" AS date \r
4801   DESCRIPTION "The date when this record was last modified.  Maintained by a WRITE trigger."\r
4802   FORMAT "99/99/9999"\r
4803   INITIAL "1/1/0001"\r
4804   POSITION 25\r
4805   SQL-WIDTH 4\r
4806   ORDER 280\r
4807   MANDATORY\r
4808 \r
4809 ADD FIELD "LastModifiedTime" OF "TenancyLease" AS integer \r
4810   DESCRIPTION "The time that this record was last modified"\r
4811   FORMAT "->,>>>,>>9"\r
4812   INITIAL "0"\r
4813   POSITION 26\r
4814   SQL-WIDTH 4\r
4815   ORDER 290\r
4816 \r
4817 ADD FIELD "LastModifiedUser" OF "TenancyLease" AS character \r
4818   DESCRIPTION "The user who last modified this record.  Maintained by a WRITE trigger."\r
4819   FORMAT "X(8)"\r
4820   INITIAL ""\r
4821   POSITION 27\r
4822   SQL-WIDTH 16\r
4823   LENGTH 0\r
4824   ORDER 300\r
4825 \r
4826 ADD FIELD "AuditRecordId" OF "TenancyLease" AS integer \r
4827   FORMAT "->,>>>,>>9"\r
4828   INITIAL "0"\r
4829   POSITION 28\r
4830   SQL-WIDTH 4\r
4831   ORDER 310\r
4832 \r
4833 ADD FIELD "RentEndDate" OF "TenancyLease" AS date \r
4834   FORMAT "99/99/9999"\r
4835   INITIAL ?\r
4836   LABEL "Rent end"\r
4837   POSITION 29\r
4838   SQL-WIDTH 4\r
4839   HELP "The date on which the tenant stops being liable for rent"\r
4840   ORDER 105\r
4841 \r
4842 ADD FIELD "IncentiveNotes" OF "TenancyLease" AS character \r
4843   DESCRIPTION "Just some notes that get written in when the lease is settled (i.e when a new lease is setup)."\r
4844   FORMAT "X(256)"\r
4845   INITIAL ""\r
4846   POSITION 30\r
4847   SQL-WIDTH 512\r
4848   LENGTH 0\r
4849   ORDER 320\r
4850 \r
4851 ADD FIELD "PrimarySpace" OF "TenancyLease" AS integer \r
4852   DESCRIPTION "A sequence number which identifies the primary rental space within the property."\r
4853   FORMAT ">>>>9"\r
4854   INITIAL ?\r
4855   LABEL "Primary Space"\r
4856   POSITION 31\r
4857   SQL-WIDTH 4\r
4858   COLUMN-LABEL "Primary"\r
4859   ORDER 330\r
4860 \r
4861 ADD FIELD "OutgoingsRate" OF "TenancyLease" AS decimal \r
4862   FORMAT "->>9.99"\r
4863   INITIAL "0"\r
4864   LABEL "O/G Rate"\r
4865   POSITION 32\r
4866   SQL-WIDTH 17\r
4867   DECIMALS 2\r
4868   ORDER 340\r
4869 \r
4870 ADD FIELD "GrossLease" OF "TenancyLease" AS logical \r
4871   FORMAT "G/N"\r
4872   INITIAL "No"\r
4873   LABEL "Gross Lease"\r
4874   POSITION 33\r
4875   SQL-WIDTH 1\r
4876   COLUMN-LABEL "G/N"\r
4877   ORDER 350\r
4878 \r
4879 ADD FIELD "AreaDescription" OF "TenancyLease" AS character \r
4880   FORMAT "X(50)"\r
4881   INITIAL ""\r
4882   LABEL "Areas Rented"\r
4883   POSITION 34\r
4884   SQL-WIDTH 100\r
4885   ORDER 360\r
4886 \r
4887 ADD FIELD "FirstLeaseStart" OF "TenancyLease" AS date \r
4888   FORMAT "99/99/9999"\r
4889   INITIAL ?\r
4890   LABEL "First lease start"\r
4891   POSITION 35\r
4892   SQL-WIDTH 4\r
4893   COLUMN-LABEL "First Start"\r
4894   HELP "The date the first lease on this space by this tenant commenced"\r
4895   ORDER 370\r
4896 \r
4897 ADD FIELD "PaymentFrequency" OF "TenancyLease" AS character \r
4898   DESCRIPTION "The code used to refer to this kind of regularity"\r
4899   FORMAT "X(4)"\r
4900   INITIAL ""\r
4901   POSITION 36\r
4902   SQL-WIDTH 8\r
4903   ORDER 380\r
4904 \r
4905 ADD FIELD "HasRatchet" OF "TenancyLease" AS logical \r
4906   DESCRIPTION "Is the rental ratcheted"\r
4907   FORMAT "Yes/No"\r
4908   INITIAL "Yes"\r
4909   LABEL "Ratchet"\r
4910   POSITION 37\r
4911   SQL-WIDTH 1\r
4912   ORDER 400\r
4913 \r
4914 ADD INDEX "TenancyLeases" ON "TenancyLease" \r
4915   AREA "Schema Area"\r
4916   UNIQUE\r
4917   PRIMARY\r
4918   INDEX-FIELD "TenancyLeaseCode" ASCENDING \r
4919 \r
4920 ADD INDEX "XAK1TenancyLeases" ON "TenancyLease" \r
4921   AREA "Schema Area"\r
4922   INDEX-FIELD "TenantCode" ASCENDING \r
4923 \r
4924 ADD INDEX "XAK2TenancyLeases" ON "TenancyLease" \r
4925   AREA "Schema Area"\r
4926   INDEX-FIELD "PropertyCode" ASCENDING \r
4927 \r
4928 ADD TABLE "TenancyOutgoing"\r
4929   AREA "Schema Area"\r
4930   DUMP-NAME "tenancyo"\r
4931 \r
4932 ADD FIELD "TenancyLeaseCode" OF "TenancyOutgoing" AS integer \r
4933   DESCRIPTION "The lease that this outgoings charge relates to."\r
4934   FORMAT "99999"\r
4935   INITIAL "0"\r
4936   POSITION 2\r
4937   SQL-WIDTH 4\r
4938   ORDER 10\r
4939 \r
4940 ADD FIELD "AccountCode" OF "TenancyOutgoing" AS decimal \r
4941   DESCRIPTION "The account, from the chart of accounts, that this outgoings charge accrues to."\r
4942   FORMAT "9999.99"\r
4943   INITIAL "0"\r
4944   POSITION 3\r
4945   SQL-WIDTH 17\r
4946   DECIMALS 2\r
4947   ORDER 20\r
4948 \r
4949 ADD FIELD "AccumulatedAmount" OF "TenancyOutgoing" AS decimal \r
4950   DESCRIPTION "The amount of actual charges accumulated in respect of this tenant since the last reconciliation of the account."\r
4951   FORMAT "->,>>>,>>9.99"\r
4952   INITIAL "0"\r
4953   POSITION 4\r
4954   SQL-WIDTH 17\r
4955   DECIMALS 2\r
4956   ORDER 30\r
4957 \r
4958 ADD FIELD "BaseYear" OF "TenancyOutgoing" AS date \r
4959   DESCRIPTION "The base year end, if applicable."\r
4960   FORMAT "99/99/9999"\r
4961   INITIAL ?\r
4962   POSITION 5\r
4963   SQL-WIDTH 4\r
4964   ORDER 40\r
4965 \r
4966 ADD FIELD "BaseYearAmount" OF "TenancyOutgoing" AS decimal \r
4967   DESCRIPTION "The amount of the outgoings charge applying in the base year, if applicable."\r
4968   FORMAT "->,>>>,>>9.99"\r
4969   INITIAL "0"\r
4970   POSITION 6\r
4971   SQL-WIDTH 17\r
4972   DECIMALS 2\r
4973   ORDER 50\r
4974 \r
4975 ADD FIELD "FixedAmount" OF "TenancyOutgoing" AS decimal \r
4976   DESCRIPTION "If applicable, an annual total of the tenants fixed charges for this account."\r
4977   FORMAT "->,>>>,>>9.99"\r
4978   INITIAL "0"\r
4979   POSITION 7\r
4980   SQL-WIDTH 17\r
4981   DECIMALS 2\r
4982   ORDER 60\r
4983 \r
4984 ADD FIELD "LastReconciliation" OF "TenancyOutgoing" AS integer \r
4985   DESCRIPTION "The month up to which the last reconciliation of outgoings applied for this account."\r
4986   FORMAT ">>>>>9"\r
4987   INITIAL "0"\r
4988   POSITION 8\r
4989   SQL-WIDTH 4\r
4990   ORDER 70\r
4991 \r
4992 ADD FIELD "OutgoingBasis" OF "TenancyOutgoing" AS character \r
4993   FORMAT "X(18)"\r
4994   INITIAL ""\r
4995   POSITION 9\r
4996   SQL-WIDTH 36\r
4997   ORDER 80\r
4998   MANDATORY\r
4999 \r
5000 ADD FIELD "Percentage" OF "TenancyOutgoing" AS decimal \r
5001   DESCRIPTION "The fraction of the total property outgoings for this account which should accumulate against this tenant."\r
5002   FORMAT "->>,>>9.99"\r
5003   INITIAL "0"\r
5004   POSITION 10\r
5005   SQL-WIDTH 17\r
5006   DECIMALS 2\r
5007   ORDER 90\r
5008 \r
5009 ADD FIELD "ReconciliationDue" OF "TenancyOutgoing" AS date \r
5010   DESCRIPTION "The date on which the next reconciliation of outgoings is due for this tenancy lease account."\r
5011   FORMAT "99/99/9999"\r
5012   INITIAL ?\r
5013   POSITION 11\r
5014   SQL-WIDTH 4\r
5015   ORDER 100\r
5016 \r
5017 ADD INDEX "TenancyOutgoings" ON "TenancyOutgoing" \r
5018   AREA "Schema Area"\r
5019   UNIQUE\r
5020   PRIMARY\r
5021   INDEX-FIELD "TenancyLeaseCode" ASCENDING \r
5022   INDEX-FIELD "AccountCode" ASCENDING \r
5023 \r
5024 ADD TABLE "Tenant"\r
5025   AREA "Schema Area"\r
5026   VALEXP "NOT CAN-FIND( FIRST AcctTran WHERE\r
5027   AcctTran.EntityType = 'T' AND \r
5028   AcctTran.EntityCode = Tenant.TenantCode )"\r
5029   VALMSG "You cannot delete a tenant who has transactions !"\r
5030   DUMP-NAME "tenant"\r
5031   TABLE-TRIGGER "CREATE" OVERRIDE PROCEDURE "crtenant.p" CRC "?" \r
5032   TABLE-TRIGGER "DELETE" OVERRIDE PROCEDURE "detenant.p" CRC "?" \r
5033   TABLE-TRIGGER "WRITE" OVERRIDE PROCEDURE "wrtenant.p" CRC "?" \r
5034 \r
5035 ADD FIELD "TenantCode" OF "Tenant" AS integer \r
5036   DESCRIPTION "A code used to refer to this tenant."\r
5037   FORMAT "99999"\r
5038   INITIAL "0"\r
5039   POSITION 2\r
5040   SQL-WIDTH 4\r
5041   ORDER 10\r
5042 \r
5043 ADD FIELD "BillingContact" OF "Tenant" AS integer \r
5044   DESCRIPTION "A person to whom the bills should be addressed."\r
5045   FORMAT ">>>>>9"\r
5046   INITIAL "0"\r
5047   POSITION 3\r
5048   SQL-WIDTH 4\r
5049   ORDER 20\r
5050 \r
5051 ADD FIELD "Name" OF "Tenant" AS character \r
5052   DESCRIPTION "The name used to refer to this tenant."\r
5053   FORMAT "X(50)"\r
5054   INITIAL ""\r
5055   POSITION 4\r
5056   SQL-WIDTH 100\r
5057   ORDER 30\r
5058   MANDATORY\r
5059 \r
5060 ADD FIELD "PropertyContact" OF "Tenant" AS integer \r
5061   DESCRIPTION "Contact personfor Property matters"\r
5062   FORMAT ">>>>>9"\r
5063   INITIAL "0"\r
5064   POSITION 5\r
5065   SQL-WIDTH 4\r
5066   ORDER 40\r
5067 \r
5068 ADD FIELD "Active" OF "Tenant" AS logical \r
5069   DESCRIPTION "Flag to indicate whether the tenant is active or inactive"\r
5070   FORMAT "yes/no"\r
5071   INITIAL "no"\r
5072   POSITION 6\r
5073   SQL-WIDTH 1\r
5074   ORDER 50\r
5075 \r
5076 ADD FIELD "DebtClassification" OF "Tenant" AS character \r
5077   FORMAT "X(4)"\r
5078   INITIAL ""\r
5079   LABEL "Debt Class"\r
5080   POSITION 7\r
5081   SQL-WIDTH 8\r
5082   COLUMN-LABEL ""\r
5083   ORDER 350\r
5084 \r
5085 ADD FIELD "VarianceClassification" OF "Tenant" AS character \r
5086   FORMAT "X(4)"\r
5087   INITIAL ""\r
5088   LABEL "Variance Class"\r
5089   POSITION 8\r
5090   SQL-WIDTH 8\r
5091   ORDER 360\r
5092 \r
5093 ADD FIELD "EntityCode" OF "Tenant" AS integer \r
5094   DESCRIPTION "The code used to refer to a company or property."\r
5095   FORMAT "99999"\r
5096   INITIAL "0"\r
5097   LABEL "Co/Prop"\r
5098   POSITION 9\r
5099   SQL-WIDTH 4\r
5100   ORDER 80\r
5101   MANDATORY\r
5102 \r
5103 ADD FIELD "NoteCode" OF "Tenant" AS integer \r
5104   DESCRIPTION "A unique code identifying this note."\r
5105   FORMAT ">>>>>9"\r
5106   INITIAL ?\r
5107   POSITION 10\r
5108   SQL-WIDTH 4\r
5109   ORDER 90\r
5110 \r
5111 ADD FIELD "Quality" OF "Tenant" AS integer \r
5112   DESCRIPTION "A number indicating the quality of the tenant"\r
5113   FORMAT "->>9"\r
5114   INITIAL "0"\r
5115   POSITION 11\r
5116   SQL-WIDTH 4\r
5117   ORDER 370\r
5118 \r
5119 ADD FIELD "AH1Contact" OF "Tenant" AS integer \r
5120   FORMAT "->,>>>,>>9"\r
5121   INITIAL "0"\r
5122   LABEL "After Hours #1"\r
5123   POSITION 12\r
5124   SQL-WIDTH 4\r
5125   ORDER 280\r
5126 \r
5127 ADD FIELD "EntityType" OF "Tenant" AS character \r
5128   DESCRIPTION "The type of the related entity specified in EntityCode"\r
5129   FORMAT "X"\r
5130   INITIAL "L"\r
5131   POSITION 13\r
5132   SQL-WIDTH 2\r
5133   VALEXP "EntityType = ""P"" OR EntityType = ""L"""\r
5134   VALMSG "May only equal ""L"" or ""P"""\r
5135   LENGTH 0\r
5136   ORDER 79\r
5137 \r
5138 ADD FIELD "LegalName" OF "Tenant" AS character \r
5139   FORMAT "X(100)"\r
5140   INITIAL ""\r
5141   LABEL "Legal name"\r
5142   POSITION 14\r
5143   SQL-WIDTH 200\r
5144   LENGTH 0\r
5145   ORDER 130\r
5146 \r
5147 ADD FIELD "PaymentStyle" OF "Tenant" AS character \r
5148   FORMAT "X(4)"\r
5149   INITIAL ""\r
5150   LABEL "Pay By"\r
5151   POSITION 15\r
5152   SQL-WIDTH 8\r
5153   LENGTH 0\r
5154   ORDER 140\r
5155 \r
5156 ADD FIELD "LastModifiedDate" OF "Tenant" AS date \r
5157   DESCRIPTION "The date when this record was last modified.  Maintained by a WRITE trigger."\r
5158   FORMAT "99/99/9999"\r
5159   INITIAL "1/1/0001"\r
5160   POSITION 16\r
5161   SQL-WIDTH 4\r
5162   ORDER 150\r
5163   MANDATORY\r
5164 \r
5165 ADD FIELD "LastModifiedTime" OF "Tenant" AS integer \r
5166   DESCRIPTION "The time that this record was last modified"\r
5167   FORMAT "->,>>>,>>9"\r
5168   INITIAL "0"\r
5169   POSITION 17\r
5170   SQL-WIDTH 4\r
5171   ORDER 160\r
5172 \r
5173 ADD FIELD "LastModifiedUser" OF "Tenant" AS character \r
5174   DESCRIPTION "The user who last modified this record.  Maintained by a WRITE trigger."\r
5175   FORMAT "X(8)"\r
5176   INITIAL ""\r
5177   POSITION 18\r
5178   SQL-WIDTH 16\r
5179   LENGTH 0\r
5180   ORDER 170\r
5181 \r
5182 ADD FIELD "AuditRecordId" OF "Tenant" AS integer \r
5183   FORMAT "->,>>>,>>9"\r
5184   INITIAL "0"\r
5185   POSITION 19\r
5186   SQL-WIDTH 4\r
5187   ORDER 180\r
5188 \r
5189 ADD FIELD "AH2Contact" OF "Tenant" AS integer \r
5190   FORMAT "->,>>>,>>9"\r
5191   INITIAL "0"\r
5192   LABEL "After Hours #2"\r
5193   POSITION 20\r
5194   SQL-WIDTH 4\r
5195   ORDER 290\r
5196 \r
5197 ADD FIELD "BusinessType" OF "Tenant" AS character \r
5198   FORMAT "X(30)"\r
5199   INITIAL ""\r
5200   LABEL "Business type"\r
5201   POSITION 21\r
5202   SQL-WIDTH 60\r
5203   ORDER 340\r
5204 \r
5205 ADD FIELD "LastRentTotal" OF "Tenant" AS decimal \r
5206   DESCRIPTION "The total amount of rent charged last rent run"\r
5207   FORMAT "->>,>>>,>>9.99"\r
5208   INITIAL "0"\r
5209   POSITION 22\r
5210   SQL-WIDTH 17\r
5211   DECIMALS 2\r
5212   ORDER 380\r
5213 \r
5214 ADD FIELD "CFBalance" OF "Tenant" AS decimal \r
5215   DESCRIPTION "The balance carried forward on the last invoice/statement"\r
5216   FORMAT "->>,>>>,>>9.99"\r
5217   INITIAL "0"\r
5218   POSITION 23\r
5219   SQL-WIDTH 17\r
5220   DECIMALS 2\r
5221   ORDER 390\r
5222 \r
5223 ADD FIELD "BatchLastStatement" OF "Tenant" AS integer \r
5224   DESCRIPTION "The number of the last posted batch when the last invoice / statement was produced"\r
5225   FORMAT "->,>>>,>>9"\r
5226   INITIAL "0"\r
5227   POSITION 24\r
5228   SQL-WIDTH 4\r
5229   ORDER 400\r
5230 \r
5231 ADD INDEX "Tenants" ON "Tenant" \r
5232   AREA "Schema Area"\r
5233   UNIQUE\r
5234   PRIMARY\r
5235   INDEX-FIELD "TenantCode" ASCENDING \r
5236 \r
5237 ADD INDEX "XAK1Tenants" ON "Tenant" \r
5238   AREA "Schema Area"\r
5239   INDEX-FIELD "Name" ASCENDING ABBREVIATED \r
5240 \r
5241 ADD INDEX "XAK2Tenants" ON "Tenant" \r
5242   AREA "Schema Area"\r
5243   INDEX-FIELD "Active" ASCENDING \r
5244   INDEX-FIELD "TenantCode" ASCENDING \r
5245 \r
5246 ADD INDEX "XAK3Tenants" ON "Tenant" \r
5247   AREA "Schema Area"\r
5248   INDEX-FIELD "EntityType" DESCENDING \r
5249   INDEX-FIELD "EntityCode" ASCENDING \r
5250 \r
5251 ADD INDEX "XAK4Tenants" ON "Tenant" \r
5252   AREA "Schema Area"\r
5253   INDEX-FIELD "Active" ASCENDING \r
5254   INDEX-FIELD "EntityType" DESCENDING \r
5255   INDEX-FIELD "EntityCode" ASCENDING \r
5256 \r
5257 ADD INDEX "XAK5Tenants" ON "Tenant" \r
5258   AREA "Schema Area"\r
5259   INDEX-FIELD "Active" ASCENDING \r
5260   INDEX-FIELD "Name" ASCENDING \r
5261 \r
5262 ADD TABLE "Valuation"\r
5263   AREA "Schema Area"\r
5264   DUMP-NAME "valuatio"\r
5265 \r
5266 ADD FIELD "PropertyCode" OF "Valuation" AS integer \r
5267   DESCRIPTION "The property that this valuation applies to"\r
5268   FORMAT "99999"\r
5269   INITIAL "0"\r
5270   POSITION 2\r
5271   SQL-WIDTH 4\r
5272   ORDER 10\r
5273 \r
5274 ADD FIELD "ValuationType" OF "Valuation" AS character \r
5275   FORMAT "X(4)"\r
5276   INITIAL ""\r
5277   POSITION 3\r
5278   SQL-WIDTH 8\r
5279   ORDER 20\r
5280   MANDATORY\r
5281 \r
5282 ADD FIELD "ValuationCode" OF "Valuation" AS integer \r
5283   DESCRIPTION "A sequence separating this valuation from others for the same property."\r
5284   FORMAT ">>>>>9"\r
5285   INITIAL "0"\r
5286   POSITION 4\r
5287   SQL-WIDTH 4\r
5288   ORDER 30\r
5289 \r
5290 ADD FIELD "Amount" OF "Valuation" AS decimal \r
5291   DESCRIPTION "The valuation."\r
5292   FORMAT "->>,>>9.99"\r
5293   INITIAL "0"\r
5294   POSITION 5\r
5295   SQL-WIDTH 17\r
5296   DECIMALS 2\r
5297   ORDER 40\r
5298 \r
5299 ADD FIELD "DateDone" OF "Valuation" AS date \r
5300   DESCRIPTION "The date that the valuation was done."\r
5301   FORMAT "99/99/9999"\r
5302   INITIAL ?\r
5303   POSITION 6\r
5304   SQL-WIDTH 4\r
5305   ORDER 50\r
5306 \r
5307 ADD FIELD "Valuer" OF "Valuation" AS character \r
5308   DESCRIPTION "The person who performed the valuation"\r
5309   FORMAT "X(18)"\r
5310   INITIAL ""\r
5311   POSITION 7\r
5312   SQL-WIDTH 36\r
5313   ORDER 60\r
5314 \r
5315 ADD INDEX "XPKValuations" ON "Valuation" \r
5316   AREA "Schema Area"\r
5317   UNIQUE\r
5318   PRIMARY\r
5319   INDEX-FIELD "PropertyCode" ASCENDING \r
5320   INDEX-FIELD "DateDone" DESCENDING \r
5321   INDEX-FIELD "ValuationType" ASCENDING \r
5322 \r
5323 ADD INDEX "XAK1Valuations" ON "Valuation" \r
5324   AREA "Schema Area"\r
5325   INDEX-FIELD "ValuationType" ASCENDING \r
5326   INDEX-FIELD "DateDone" DESCENDING \r
5327 \r
5328 ADD INDEX "XAK2Valuations" ON "Valuation" \r
5329   AREA "Schema Area"\r
5330   INDEX-FIELD "DateDone" DESCENDING \r
5331 \r
5332 ADD TABLE "ValuationType"\r
5333   AREA "Schema Area"\r
5334   DUMP-NAME "valuati1"\r
5335 \r
5336 ADD FIELD "ValuationType" OF "ValuationType" AS character \r
5337   FORMAT "X(4)"\r
5338   INITIAL ""\r
5339   POSITION 2\r
5340   SQL-WIDTH 8\r
5341   ORDER 10\r
5342   MANDATORY\r
5343 \r
5344 ADD FIELD "Description" OF "ValuationType" AS character \r
5345   FORMAT "X(50)"\r
5346   INITIAL ""\r
5347   POSITION 3\r
5348   SQL-WIDTH 100\r
5349   ORDER 20\r
5350 \r
5351 ADD INDEX "XPKValuationTypes" ON "ValuationType" \r
5352   AREA "Schema Area"\r
5353   UNIQUE\r
5354   PRIMARY\r
5355   INDEX-FIELD "ValuationType" ASCENDING \r
5356 \r
5357 ADD TABLE "Cheque"\r
5358   AREA "Schema Area"\r
5359   DUMP-NAME "cheque"\r
5360   TABLE-TRIGGER "WRITE" OVERRIDE PROCEDURE "wrcheque.p" CRC "?" \r
5361 \r
5362 ADD FIELD "ChequeNo" OF "Cheque" AS integer \r
5363   DESCRIPTION "Number identifying the cheque."\r
5364   FORMAT "999999"\r
5365   INITIAL "0"\r
5366   LABEL "Cheque"\r
5367   POSITION 2\r
5368   SQL-WIDTH 4\r
5369   ORDER 10\r
5370 \r
5371 ADD FIELD "BankAccountCode" OF "Cheque" AS character \r
5372   FORMAT "X(4)"\r
5373   INITIAL ""\r
5374   LABEL "Bank a/c"\r
5375   POSITION 3\r
5376   SQL-WIDTH 8\r
5377   ORDER 150\r
5378   MANDATORY\r
5379 \r
5380 ADD FIELD "CreditorCode" OF "Cheque" AS integer \r
5381   DESCRIPTION "Code of the creditor that this cheque is payable to."\r
5382   FORMAT "99999"\r
5383   INITIAL "0"\r
5384   LABEL "Creditor"\r
5385   POSITION 4\r
5386   SQL-WIDTH 4\r
5387   ORDER 30\r
5388 \r
5389 ADD FIELD "Amount" OF "Cheque" AS decimal \r
5390   DESCRIPTION "Dollar amount for the cheque."\r
5391   FORMAT "->>>,>>>,>>9.99"\r
5392   INITIAL "0"\r
5393   POSITION 5\r
5394   SQL-WIDTH 17\r
5395   DECIMALS 2\r
5396   ORDER 40\r
5397 \r
5398 ADD FIELD "BatchCode" OF "Cheque" AS integer \r
5399   DESCRIPTION "Code of the batch of documents that this cheque belongs to."\r
5400   FORMAT "999999"\r
5401   INITIAL "0"\r
5402   LABEL "Batch No."\r
5403   POSITION 6\r
5404   SQL-WIDTH 4\r
5405   COLUMN-LABEL "Batch"\r
5406   ORDER 50\r
5407 \r
5408 ADD FIELD "DocumentCode" OF "Cheque" AS integer \r
5409   DESCRIPTION "Code of the document that this cheque applies to."\r
5410   FORMAT "99999"\r
5411   INITIAL "0"\r
5412   LABEL "Document No."\r
5413   POSITION 7\r
5414   SQL-WIDTH 4\r
5415   COLUMN-LABEL "Doc No."\r
5416   ORDER 60\r
5417 \r
5418 ADD FIELD "PayeeName" OF "Cheque" AS character \r
5419   DESCRIPTION "Name of the payee as printed for the cheque."\r
5420   FORMAT "X(50)"\r
5421   INITIAL ""\r
5422   POSITION 8\r
5423   SQL-WIDTH 100\r
5424   LENGTH 0\r
5425   ORDER 70\r
5426 \r
5427 ADD FIELD "Date" OF "Cheque" AS date \r
5428   DESCRIPTION "The date as printed for the cheque."\r
5429   FORMAT "99/99/9999"\r
5430   INITIAL ?\r
5431   POSITION 9\r
5432   SQL-WIDTH 4\r
5433   ORDER 80\r
5434 \r
5435 ADD FIELD "Cancelled" OF "Cheque" AS logical \r
5436   DESCRIPTION "A value corresponding to the cancellation status of the cheque."\r
5437   FORMAT "yes/no"\r
5438   INITIAL "no"\r
5439   POSITION 10\r
5440   SQL-WIDTH 1\r
5441   ORDER 90\r
5442 \r
5443 ADD FIELD "DatePresented" OF "Cheque" AS date \r
5444   DESCRIPTION "The date this cheque was presented.\r
5445 "\r
5446   FORMAT "99/99/9999"\r
5447   INITIAL ?\r
5448   LABEL "Presented"\r
5449   POSITION 11\r
5450   SQL-WIDTH 4\r
5451   ORDER 100\r
5452 \r
5453 ADD FIELD "PresentedAmount" OF "Cheque" AS decimal \r
5454   FORMAT ">>>,>>>,>>9.99"\r
5455   INITIAL "0"\r
5456   POSITION 12\r
5457   SQL-WIDTH 17\r
5458   DECIMALS 2\r
5459   ORDER 160\r
5460 \r
5461 ADD FIELD "DateSent" OF "Cheque" AS date \r
5462   DESCRIPTION "The date the cheque was actually sent to the creditor"\r
5463   FORMAT "99/99/9999"\r
5464   INITIAL ?\r
5465   LABEL "Date Sent"\r
5466   POSITION 13\r
5467   SQL-WIDTH 4\r
5468   ORDER 170\r
5469 \r
5470 ADD INDEX "XPKChequeDate" ON "Cheque" \r
5471   AREA "Schema Area"\r
5472   UNIQUE\r
5473   PRIMARY\r
5474   INDEX-FIELD "BankAccountCode" ASCENDING \r
5475   INDEX-FIELD "Date" DESCENDING \r
5476   INDEX-FIELD "ChequeNo" DESCENDING \r
5477 \r
5478 ADD INDEX "XAK1Cheques" ON "Cheque" \r
5479   AREA "Schema Area"\r
5480   INDEX-FIELD "CreditorCode" ASCENDING \r
5481   INDEX-FIELD "Date" DESCENDING \r
5482 \r
5483 ADD INDEX "XPKCheque" ON "Cheque" \r
5484   AREA "Schema Area"\r
5485   UNIQUE\r
5486   INDEX-FIELD "BankAccountCode" ASCENDING \r
5487   INDEX-FIELD "ChequeNo" ASCENDING \r
5488 \r
5489 ADD TABLE "InvoiceLine"\r
5490   AREA "Schema Area"\r
5491   DUMP-NAME "invoicel"\r
5492   TABLE-TRIGGER "DELETE" OVERRIDE PROCEDURE "deinvlne.p" CRC "?" \r
5493   TABLE-TRIGGER "WRITE" OVERRIDE PROCEDURE "wrinvlne.p" CRC "?" \r
5494 \r
5495 ADD FIELD "InvoiceNo" OF "InvoiceLine" AS integer \r
5496   FORMAT ">>>>>9"\r
5497   INITIAL ?\r
5498   LABEL "Invoice No"\r
5499   POSITION 2\r
5500   SQL-WIDTH 4\r
5501   COLUMN-LABEL "Invoice"\r
5502   ORDER 10\r
5503 \r
5504 ADD FIELD "AccountCode" OF "InvoiceLine" AS decimal \r
5505   DESCRIPTION "The account against which this transaction applies."\r
5506   FORMAT "9999.99"\r
5507   INITIAL "0"\r
5508   LABEL "Account"\r
5509   POSITION 3\r
5510   SQL-WIDTH 17\r
5511   COLUMN-LABEL-SA "C"\r
5512   DECIMALS 2\r
5513   ORDER 20\r
5514   MANDATORY\r
5515 \r
5516 ADD FIELD "AccountText" OF "InvoiceLine" AS character \r
5517   FORMAT "X(50)"\r
5518   INITIAL ""\r
5519   LABEL "Description"\r
5520   POSITION 4\r
5521   SQL-WIDTH 100\r
5522   LENGTH 0\r
5523   ORDER 30\r
5524 \r
5525 ADD FIELD "Amount" OF "InvoiceLine" AS decimal \r
5526   FORMAT "->,>>>,>>9.99"\r
5527   INITIAL "0"\r
5528   POSITION 5\r
5529   SQL-WIDTH 17\r
5530   DECIMALS 2\r
5531   ORDER 40\r
5532   MANDATORY\r
5533 \r
5534 ADD FIELD "Percent" OF "InvoiceLine" AS decimal \r
5535   FORMAT ">>9.99"\r
5536   INITIAL "0"\r
5537   POSITION 6\r
5538   SQL-WIDTH 17\r
5539   DECIMALS 2\r
5540   ORDER 50\r
5541   MANDATORY\r
5542 \r
5543 ADD FIELD "YourShare" OF "InvoiceLine" AS decimal \r
5544   FORMAT "->,>>>,>>9.99"\r
5545   INITIAL "0"\r
5546   LABEL "Share"\r
5547   POSITION 7\r
5548   SQL-WIDTH 17\r
5549   DECIMALS 2\r
5550   ORDER 60\r
5551   FIELD-TRIGGER "ASSIGN" OVERRIDE PROCEDURE "a-ivlysh.p" CRC "?" \r
5552 \r
5553 ADD FIELD "LineSeq" OF "InvoiceLine" AS integer \r
5554   FORMAT "->,>>>,>>9"\r
5555   INITIAL "0"\r
5556   LABEL "Line#"\r
5557   POSITION 8\r
5558   SQL-WIDTH 4\r
5559   ORDER 70\r
5560 \r
5561 ADD FIELD "Quantity" OF "InvoiceLine" AS decimal \r
5562   DESCRIPTION "The quantity of goods invoiced"\r
5563   FORMAT "->>,>>9.99"\r
5564   INITIAL "1"\r
5565   POSITION 9\r
5566   SQL-WIDTH 17\r
5567   DECIMALS 2\r
5568   ORDER 80\r
5569 \r
5570 ADD FIELD "EntityType" OF "InvoiceLine" AS character \r
5571   DESCRIPTION "A reference to the entity types table indicating the type of entity against which this transaction applies (Company, Property, Project, Creditor or Tenant)."\r
5572   FORMAT "X"\r
5573   INITIAL ?\r
5574   LABEL "Entity type"\r
5575   POSITION 10\r
5576   SQL-WIDTH 2\r
5577   COLUMN-LABEL "T"\r
5578   COLUMN-LABEL-SA "C"\r
5579   ORDER 90\r
5580 \r
5581 ADD FIELD "EntityCode" OF "InvoiceLine" AS integer \r
5582   FORMAT "99999"\r
5583   INITIAL ?\r
5584   LABEL "Code"\r
5585   POSITION 11\r
5586   SQL-WIDTH 4\r
5587   COLUMN-LABEL-SA "C"\r
5588   ORDER 100\r
5589 \r
5590 ADD INDEX "XPKInvoiceLine" ON "InvoiceLine" \r
5591   AREA "Schema Area"\r
5592   UNIQUE\r
5593   PRIMARY\r
5594   INDEX-FIELD "InvoiceNo" ASCENDING \r
5595   INDEX-FIELD "LineSeq" ASCENDING \r
5596 \r
5597 ADD INDEX "XAK1InvoiceLines" ON "InvoiceLine" \r
5598   AREA "Schema Area"\r
5599   INDEX-FIELD "InvoiceNo" ASCENDING \r
5600   INDEX-FIELD "AccountCode" ASCENDING \r
5601 \r
5602 ADD TABLE "VoucherStatus"\r
5603   AREA "Schema Area"\r
5604   DUMP-NAME "vouchers"\r
5605 \r
5606 ADD FIELD "Description" OF "VoucherStatus" AS character \r
5607   FORMAT "X(50)"\r
5608   INITIAL ""\r
5609   POSITION 2\r
5610   SQL-WIDTH 100\r
5611   LENGTH 0\r
5612   ORDER 20\r
5613 \r
5614 ADD FIELD "VoucherStatus" OF "VoucherStatus" AS character \r
5615   FORMAT "X(4)"\r
5616   INITIAL ""\r
5617   POSITION 3\r
5618   SQL-WIDTH 8\r
5619   LENGTH 0\r
5620   ORDER 10\r
5621 \r
5622 ADD FIELD "SequenceCode" OF "VoucherStatus" AS integer \r
5623   FORMAT "9"\r
5624   INITIAL "0"\r
5625   LABEL "Sequence"\r
5626   POSITION 4\r
5627   SQL-WIDTH 4\r
5628   ORDER 30\r
5629   MANDATORY\r
5630 \r
5631 ADD INDEX "XPKVoucherStatus" ON "VoucherStatus" \r
5632   AREA "Schema Area"\r
5633   PRIMARY\r
5634   INDEX-FIELD "VoucherStatus" ASCENDING \r
5635 \r
5636 ADD INDEX "XAK1Sequence" ON "VoucherStatus" \r
5637   AREA "Schema Area"\r
5638   INDEX-FIELD "SequenceCode" ASCENDING \r
5639 \r
5640 ADD TABLE "Approver"\r
5641   AREA "Schema Area"\r
5642   DESCRIPTION "Short Codes for approval persons"\r
5643   DUMP-NAME "approver"\r
5644   TABLE-TRIGGER "WRITE" OVERRIDE PROCEDURE "wrapprvr.p" CRC "?" \r
5645 \r
5646 ADD FIELD "ApproverCode" OF "Approver" AS character \r
5647   DESCRIPTION "The short alphanumeric code that identifies this approver."\r
5648   FORMAT "X(4)"\r
5649   INITIAL ""\r
5650   LABEL "Approval"\r
5651   POSITION 2\r
5652   SQL-WIDTH 8\r
5653   LENGTH 0\r
5654   ORDER 10\r
5655   MANDATORY\r
5656 \r
5657 ADD FIELD "PersonCode" OF "Approver" AS integer \r
5658   FORMAT "99999"\r
5659   INITIAL "0"\r
5660   LABEL "Person"\r
5661   POSITION 3\r
5662   SQL-WIDTH 4\r
5663   ORDER 20\r
5664   MANDATORY\r
5665 \r
5666 ADD FIELD "ApprovalLimit" OF "Approver" AS decimal \r
5667   FORMAT "->>,>>>,>>9.99"\r
5668   INITIAL "0"\r
5669   LABEL "Approval Limit"\r
5670   POSITION 4\r
5671   SQL-WIDTH 17\r
5672   DECIMALS 2\r
5673   ORDER 30\r
5674 \r
5675 ADD FIELD "SignatoryLimit" OF "Approver" AS decimal \r
5676   FORMAT "->>,>>>,>>9.99"\r
5677   INITIAL "0"\r
5678   LABEL "Chq Signing Limit"\r
5679   POSITION 5\r
5680   SQL-WIDTH 17\r
5681   DECIMALS 2\r
5682   ORDER 40\r
5683 \r
5684 ADD FIELD "Active" OF "Approver" AS logical \r
5685   DESCRIPTION "Flag to indicate whether the creditor is active or inactive"\r
5686   FORMAT "yes/no"\r
5687   INITIAL "yes"\r
5688   POSITION 6\r
5689   SQL-WIDTH 1\r
5690   ORDER 50\r
5691 \r
5692 ADD FIELD "LastModifiedDate" OF "Approver" AS date \r
5693   DESCRIPTION "The date when this record was last modified.  Maintained by a WRITE trigger."\r
5694   FORMAT "99/99/9999"\r
5695   INITIAL "1/1/0001"\r
5696   POSITION 7\r
5697   SQL-WIDTH 4\r
5698   ORDER 60\r
5699   MANDATORY\r
5700 \r
5701 ADD FIELD "LastModifiedTime" OF "Approver" AS integer \r
5702   DESCRIPTION "The time that this record was last modified"\r
5703   FORMAT "->,>>>,>>9"\r
5704   INITIAL "0"\r
5705   POSITION 8\r
5706   SQL-WIDTH 4\r
5707   ORDER 70\r
5708 \r
5709 ADD FIELD "LastModifiedUser" OF "Approver" AS character \r
5710   DESCRIPTION "The user who last modified this record.  Maintained by a WRITE trigger."\r
5711   FORMAT "X(8)"\r
5712   INITIAL ""\r
5713   POSITION 9\r
5714   SQL-WIDTH 16\r
5715   LENGTH 0\r
5716   ORDER 80\r
5717 \r
5718 ADD FIELD "AuditRecordId" OF "Approver" AS integer \r
5719   FORMAT "->,>>>,>>9"\r
5720   INITIAL "0"\r
5721   POSITION 10\r
5722   SQL-WIDTH 4\r
5723   ORDER 90\r
5724 \r
5725 ADD FIELD "OverBudgetLimit" OF "Approver" AS decimal \r
5726   FORMAT "->>,>>>,>>9.99"\r
5727   INITIAL "0"\r
5728   LABEL "Over Budget Limit"\r
5729   POSITION 11\r
5730   SQL-WIDTH 17\r
5731   DECIMALS 2\r
5732   ORDER 100\r
5733 \r
5734 ADD INDEX "XPKApprover" ON "Approver" \r
5735   AREA "Schema Area"\r
5736   UNIQUE\r
5737   PRIMARY\r
5738   INDEX-FIELD "ApproverCode" ASCENDING \r
5739   INDEX-FIELD "PersonCode" ASCENDING \r
5740 \r
5741 ADD TABLE "BankAccount"\r
5742   AREA "Schema Area"\r
5743   DUMP-NAME "bankacco"\r
5744   TABLE-TRIGGER "WRITE" OVERRIDE PROCEDURE "wrbnkact.p" CRC "?" \r
5745 \r
5746 ADD FIELD "BankAccountCode" OF "BankAccount" AS character \r
5747   FORMAT "X(4)"\r
5748   INITIAL ""\r
5749   LABEL "Bank a/c"\r
5750   POSITION 2\r
5751   SQL-WIDTH 8\r
5752   ORDER 80\r
5753   MANDATORY\r
5754 \r
5755 ADD FIELD "AccountName" OF "BankAccount" AS character \r
5756   FORMAT "X(100)"\r
5757   INITIAL ""\r
5758   LABEL "Account name"\r
5759   POSITION 3\r
5760   SQL-WIDTH 200\r
5761   LENGTH 0\r
5762   ORDER 20\r
5763 \r
5764 ADD FIELD "BankBranchName" OF "BankAccount" AS character \r
5765   FORMAT "X(50)"\r
5766   INITIAL ""\r
5767   LABEL "BranchName"\r
5768   POSITION 4\r
5769   SQL-WIDTH 100\r
5770   LENGTH 0\r
5771   ORDER 30\r
5772 \r
5773 ADD FIELD "BankName" OF "BankAccount" AS character \r
5774   FORMAT "X(50)"\r
5775   INITIAL ""\r
5776   LABEL "Bank Name"\r
5777   POSITION 5\r
5778   SQL-WIDTH 100\r
5779   LENGTH 0\r
5780   ORDER 40\r
5781 \r
5782 ADD FIELD "BankAccount" OF "BankAccount" AS character \r
5783   FORMAT "99-9999-9999999-999"\r
5784   INITIAL ""\r
5785   LABEL "Bank"\r
5786   POSITION 6\r
5787   SQL-WIDTH 38\r
5788   LENGTH 0\r
5789   ORDER 50\r
5790 \r
5791 ADD FIELD "CompanyCode" OF "BankAccount" AS integer \r
5792   FORMAT "99999"\r
5793   INITIAL "0"\r
5794   LABEL "Company"\r
5795   POSITION 7\r
5796   SQL-WIDTH 4\r
5797   HELP "The ledger that transactions should go to"\r
5798   ORDER 60\r
5799 \r
5800 ADD FIELD "AccountCode" OF "BankAccount" AS decimal \r
5801   FORMAT "9999.99"\r
5802   INITIAL "0"\r
5803   LABEL "GL Account"\r
5804   POSITION 8\r
5805   SQL-WIDTH 17\r
5806   HELP "The GL account for transactions"\r
5807   DECIMALS 2\r
5808   ORDER 70\r
5809 \r
5810 ADD FIELD "LastModifiedDate" OF "BankAccount" AS date \r
5811   DESCRIPTION "The date when this record was last modified.  Maintained by a WRITE trigger."\r
5812   FORMAT "99/99/9999"\r
5813   INITIAL "1/1/0001"\r
5814   POSITION 9\r
5815   SQL-WIDTH 4\r
5816   ORDER 90\r
5817   MANDATORY\r
5818 \r
5819 ADD FIELD "LastModifiedTime" OF "BankAccount" AS integer \r
5820   DESCRIPTION "The time that this record was last modified"\r
5821   FORMAT "->,>>>,>>9"\r
5822   INITIAL "0"\r
5823   POSITION 10\r
5824   SQL-WIDTH 4\r
5825   ORDER 100\r
5826 \r
5827 ADD FIELD "LastModifiedUser" OF "BankAccount" AS character \r
5828   DESCRIPTION "The user who last modified this record.  Maintained by a WRITE trigger."\r
5829   FORMAT "X(8)"\r
5830   INITIAL ""\r
5831   POSITION 11\r
5832   SQL-WIDTH 16\r
5833   LENGTH 0\r
5834   ORDER 110\r
5835 \r
5836 ADD FIELD "AuditRecordId" OF "BankAccount" AS integer \r
5837   FORMAT "->,>>>,>>9"\r
5838   INITIAL "0"\r
5839   POSITION 12\r
5840   SQL-WIDTH 4\r
5841   ORDER 120\r
5842 \r
5843 ADD FIELD "ChequeAccount" OF "BankAccount" AS logical \r
5844   FORMAT "yes/no"\r
5845   INITIAL "no"\r
5846   LABEL "Cheque Account"\r
5847   POSITION 13\r
5848   SQL-WIDTH 1\r
5849   VIEW-AS "VIEW-AS TOGGLE-BOX"\r
5850   ORDER 130\r
5851 \r
5852 ADD FIELD "Active" OF "BankAccount" AS logical \r
5853   FORMAT "yes/no"\r
5854   INITIAL "Yes"\r
5855   POSITION 14\r
5856   SQL-WIDTH 1\r
5857   HELP "Is this bank account active"\r
5858   ORDER 140\r
5859 \r
5860 ADD FIELD "DEUserId" OF "BankAccount" AS character \r
5861   FORMAT "X(6)"\r
5862   INITIAL ""\r
5863   POSITION 16\r
5864   SQL-WIDTH 6\r
5865   ORDER 150\r
5866 \r
5867 ADD INDEX "BankAccounts" ON "BankAccount" \r
5868   AREA "Schema Area"\r
5869   PRIMARY\r
5870   INDEX-FIELD "BankAccountCode" ASCENDING \r
5871 \r
5872 ADD TABLE "Office"\r
5873   AREA "Schema Area"\r
5874   DUMP-NAME "office"\r
5875   TABLE-TRIGGER "WRITE" OVERRIDE PROCEDURE "wroffice.p" CRC "?" \r
5876 \r
5877 ADD FIELD "OfficeCode" OF "Office" AS character \r
5878   FORMAT "X(4)"\r
5879   INITIAL ""\r
5880   LABEL "Office"\r
5881   POSITION 2\r
5882   SQL-WIDTH 8\r
5883   LENGTH 0\r
5884   ORDER 10\r
5885 \r
5886 ADD FIELD "Name" OF "Office" AS character \r
5887   FORMAT "X(50)"\r
5888   INITIAL ""\r
5889   POSITION 3\r
5890   SQL-WIDTH 100\r
5891   LENGTH 0\r
5892   ORDER 20\r
5893 \r
5894 ADD FIELD "ThisOffice" OF "Office" AS logical \r
5895   FORMAT "yes/no"\r
5896   INITIAL "no"\r
5897   POSITION 4\r
5898   SQL-WIDTH 1\r
5899   ORDER 30\r
5900   MANDATORY\r
5901   FIELD-TRIGGER "ASSIGN" OVERRIDE PROCEDURE "a-ofcths.p" CRC "?" \r
5902 \r
5903 ADD FIELD "GSTNo" OF "Office" AS integer \r
5904   FORMAT "999999999"\r
5905   INITIAL "0"\r
5906   POSITION 5\r
5907   SQL-WIDTH 4\r
5908   ORDER 80\r
5909 \r
5910 ADD FIELD "AccountingContact" OF "Office" AS integer \r
5911   DESCRIPTION "A primary contact for matters relating to accounting within this office."\r
5912   FORMAT ">>>>>9"\r
5913   INITIAL "0"\r
5914   LABEL "Accounting contact"\r
5915   POSITION 6\r
5916   SQL-WIDTH 4\r
5917   ORDER 90\r
5918 \r
5919 ADD FIELD "GST" OF "Office" AS decimal \r
5920   FORMAT ">>9.99"\r
5921   INITIAL "0"\r
5922   POSITION 7\r
5923   SQL-WIDTH 17\r
5924   HELP "The GST rate applicable in this office"\r
5925   DECIMALS 2\r
5926   ORDER 70\r
5927 \r
5928 ADD FIELD "StreetAddress" OF "Office" AS character \r
5929   FORMAT "X(8)"\r
5930   INITIAL ""\r
5931   LABEL "Street Address"\r
5932   POSITION 8\r
5933   SQL-WIDTH 16\r
5934   VIEW-AS "VIEW-AS EDITOR\r
5935   SIZE-CHARS 50 by 5\r
5936   SCROLLBAR-VERTICAL\r
5937 "\r
5938   LENGTH 0\r
5939   ORDER 100\r
5940   MANDATORY\r
5941 \r
5942 ADD INDEX "Offices" ON "Office" \r
5943   AREA "Schema Area"\r
5944   UNIQUE\r
5945   PRIMARY\r
5946   INDEX-FIELD "OfficeCode" ASCENDING \r
5947 \r
5948 ADD INDEX "ThisOffice" ON "Office" \r
5949   AREA "Schema Area"\r
5950   INDEX-FIELD "ThisOffice" ASCENDING \r
5951 \r
5952 ADD TABLE "Invoice"\r
5953   AREA "Schema Area"\r
5954   DUMP-NAME "invoice"\r
5955   TABLE-TRIGGER "CREATE" OVERRIDE PROCEDURE "crinvoce.p" CRC "?" \r
5956   TABLE-TRIGGER "DELETE" OVERRIDE PROCEDURE "deinvoce.p" CRC "?" \r
5957 \r
5958 ADD FIELD "InvoiceNo" OF "Invoice" AS integer \r
5959   FORMAT ">>>>>9"\r
5960   INITIAL "0"\r
5961   LABEL "Invoice No"\r
5962   POSITION 2\r
5963   SQL-WIDTH 4\r
5964   COLUMN-LABEL "Invoice"\r
5965   ORDER 10\r
5966   MANDATORY\r
5967 \r
5968 ADD FIELD "EntityType" OF "Invoice" AS character \r
5969   FORMAT "X(4)"\r
5970   INITIAL ""\r
5971   LABEL "Entity type"\r
5972   POSITION 3\r
5973   SQL-WIDTH 8\r
5974   COLUMN-LABEL "Type"\r
5975   LENGTH 0\r
5976   ORDER 20\r
5977   MANDATORY\r
5978 \r
5979 ADD FIELD "EntityCode" OF "Invoice" AS integer \r
5980   FORMAT "99999"\r
5981   INITIAL "0"\r
5982   LABEL "Code"\r
5983   POSITION 4\r
5984   SQL-WIDTH 4\r
5985   COLUMN-LABEL-SA "C"\r
5986   ORDER 30\r
5987 \r
5988 ADD FIELD "InvoiceDate" OF "Invoice" AS date \r
5989   FORMAT "99/99/9999"\r
5990   INITIAL ?\r
5991   LABEL "Invoice date"\r
5992   POSITION 5\r
5993   SQL-WIDTH 4\r
5994   COLUMN-LABEL "Date"\r
5995   ORDER 40\r
5996 \r
5997 ADD FIELD "ToPay" OF "Invoice" AS character \r
5998   FORMAT "X(4)"\r
5999   INITIAL ""\r
6000   LABEL "To"\r
6001   POSITION 6\r
6002   SQL-WIDTH 8\r
6003   LENGTH 0\r
6004   ORDER 50\r
6005 \r
6006 ADD FIELD "ToDetail" OF "Invoice" AS character \r
6007   FORMAT "X(50)"\r
6008   INITIAL ""\r
6009   LABEL "To"\r
6010   POSITION 7\r
6011   SQL-WIDTH 100\r
6012   LENGTH 0\r
6013   ORDER 60\r
6014 \r
6015 ADD FIELD "TaxApplies" OF "Invoice" AS logical \r
6016   FORMAT "yes/no"\r
6017   INITIAL "y"\r
6018   LABEL "Taxable"\r
6019   POSITION 8\r
6020   SQL-WIDTH 1\r
6021   ORDER 70\r
6022   MANDATORY\r
6023 \r
6024 ADD FIELD "TermsCode" OF "Invoice" AS character \r
6025   FORMAT "X(8)"\r
6026   INITIAL ""\r
6027   LABEL "Terms"\r
6028   POSITION 9\r
6029   SQL-WIDTH 16\r
6030   LENGTH 0\r
6031   ORDER 80\r
6032   MANDATORY\r
6033 \r
6034 ADD FIELD "TaxAmount" OF "Invoice" AS decimal \r
6035   FORMAT "->,>>>,>>9.99"\r
6036   INITIAL "0"\r
6037   LABEL "Tax"\r
6038   POSITION 10\r
6039   SQL-WIDTH 17\r
6040   DECIMALS 2\r
6041   ORDER 90\r
6042 \r
6043 ADD FIELD "Total" OF "Invoice" AS decimal \r
6044   FORMAT "->>,>>>,>>>,>>9.99"\r
6045   INITIAL "0"\r
6046   POSITION 11\r
6047   SQL-WIDTH 17\r
6048   DECIMALS 2\r
6049   ORDER 100\r
6050 \r
6051 ADD FIELD "Blurb" OF "Invoice" AS character \r
6052   DESCRIPTION "Blurb for this invoice"\r
6053   FORMAT "X(256)"\r
6054   INITIAL ""\r
6055   LABEL "Blurb"\r
6056   POSITION 12\r
6057   SQL-WIDTH 512\r
6058   VIEW-AS "VIEW-AS EDITOR SIZE-PIXELS 600 by 300\r
6059   SCROLLBAR-VERTICAL"\r
6060   LENGTH 0\r
6061   ORDER 110\r
6062 \r
6063 ADD FIELD "InvoiceStatus" OF "Invoice" AS character \r
6064   FORMAT "X"\r
6065   INITIAL ""\r
6066   LABEL "Status"\r
6067   POSITION 13\r
6068   SQL-WIDTH 2\r
6069   LENGTH 0\r
6070   ORDER 120\r
6071 \r
6072 ADD FIELD "InvoiceType" OF "Invoice" AS character \r
6073   DESCRIPTION "A system-maintained code which indicates what type of invoice this is, and (most importantly) what it should look like when being presented for viewing or maintenance, or printing."\r
6074   FORMAT "X(4)"\r
6075   INITIAL "NORM"\r
6076   LABEL "Type"\r
6077   POSITION 14\r
6078   SQL-WIDTH 8\r
6079   ORDER 130\r
6080 \r
6081 ADD FIELD "DueDate" OF "Invoice" AS date \r
6082   DESCRIPTION "Due date for Invoice payment. If left blank then the due date printed on the invoice is invoice date + no of days as stipulated by the Terms type."\r
6083   FORMAT "99/99/9999"\r
6084   INITIAL ?\r
6085   LABEL "Due Date"\r
6086   POSITION 15\r
6087   SQL-WIDTH 4\r
6088   COLUMN-LABEL "Due Date"\r
6089   HELP "Enter a due date otherwise it will be calculated from terms."\r
6090   ORDER 140\r
6091 \r
6092 ADD FIELD "AttnTo" OF "Invoice" AS character \r
6093   DESCRIPTION "Used to store the Attn details for the person sent the invoice."\r
6094   FORMAT "X(30)"\r
6095   INITIAL ""\r
6096   POSITION 16\r
6097   SQL-WIDTH 60\r
6098   ORDER 150\r
6099 \r
6100 ADD INDEX "Invoices" ON "Invoice" \r
6101   AREA "Schema Area"\r
6102   UNIQUE\r
6103   PRIMARY\r
6104   INDEX-FIELD "InvoiceNo" ASCENDING \r
6105 \r
6106 ADD INDEX "XAK1Entity" ON "Invoice" \r
6107   AREA "Schema Area"\r
6108   INDEX-FIELD "EntityType" ASCENDING \r
6109   INDEX-FIELD "EntityCode" ASCENDING \r
6110 \r
6111 ADD INDEX "XAK2Date" ON "Invoice" \r
6112   AREA "Schema Area"\r
6113   INDEX-FIELD "InvoiceDate" ASCENDING \r
6114 \r
6115 ADD INDEX "XAK3Invoices" ON "Invoice" \r
6116   AREA "Schema Area"\r
6117   INDEX-FIELD "InvoiceStatus" ASCENDING \r
6118   INDEX-FIELD "InvoiceNo" ASCENDING \r
6119 \r
6120 ADD INDEX "XAK4Invoice" ON "Invoice" \r
6121   AREA "Schema Area"\r
6122   INDEX-FIELD "InvoiceStatus" ASCENDING \r
6123   INDEX-FIELD "InvoiceDate" ASCENDING \r
6124 \r
6125 ADD INDEX "XAK5Invoice" ON "Invoice" \r
6126   AREA "Schema Area"\r
6127   INDEX-FIELD "InvoiceStatus" ASCENDING \r
6128   INDEX-FIELD "EntityType" ASCENDING \r
6129   INDEX-FIELD "EntityCode" ASCENDING \r
6130 \r
6131 ADD TABLE "InvoiceTerms"\r
6132   AREA "Schema Area"\r
6133   DUMP-NAME "invoicet"\r
6134 \r
6135 ADD FIELD "TermsCode" OF "InvoiceTerms" AS character \r
6136   FORMAT "X(4)"\r
6137   INITIAL ""\r
6138   LABEL "Terms"\r
6139   POSITION 2\r
6140   SQL-WIDTH 8\r
6141   LENGTH 0\r
6142   ORDER 10\r
6143   MANDATORY\r
6144 \r
6145 ADD FIELD "Description" OF "InvoiceTerms" AS character \r
6146   FORMAT "X(50)"\r
6147   INITIAL ""\r
6148   POSITION 3\r
6149   SQL-WIDTH 100\r
6150   LENGTH 0\r
6151   ORDER 20\r
6152 \r
6153 ADD INDEX "InvoiceTerms" ON "InvoiceTerms" \r
6154   AREA "Schema Area"\r
6155   UNIQUE\r
6156   PRIMARY\r
6157   INDEX-FIELD "TermsCode" ASCENDING \r
6158 \r
6159 ADD TABLE "NewAcctTrans"\r
6160   AREA "Schema Area"\r
6161   DESCRIPTION "Holds transactions to be updated."\r
6162   DUMP-NAME "newtrans"\r
6163   TABLE-TRIGGER "DELETE" OVERRIDE PROCEDURE "denactrn.p" CRC "?" \r
6164   TABLE-TRIGGER "WRITE" OVERRIDE PROCEDURE "wrnactrn.p" CRC "?" \r
6165 \r
6166 ADD FIELD "BatchCode" OF "NewAcctTrans" AS integer \r
6167   FORMAT ">>>>>9"\r
6168   INITIAL "0"\r
6169   LABEL "Batch"\r
6170   POSITION 2\r
6171   SQL-WIDTH 4\r
6172   ORDER 10\r
6173   MANDATORY\r
6174 \r
6175 ADD FIELD "DocumentCode" OF "NewAcctTrans" AS integer \r
6176   FORMAT ">>>>>9"\r
6177   INITIAL "0"\r
6178   LABEL "Document"\r
6179   POSITION 3\r
6180   SQL-WIDTH 4\r
6181   ORDER 20\r
6182   MANDATORY\r
6183 \r
6184 ADD FIELD "TransactionCode" OF "NewAcctTrans" AS integer \r
6185   FORMAT ">>>>>9"\r
6186   INITIAL "0"\r
6187   LABEL "Tran #"\r
6188   POSITION 4\r
6189   SQL-WIDTH 4\r
6190   ORDER 30\r
6191   MANDATORY\r
6192 \r
6193 ADD FIELD "EntityType" OF "NewAcctTrans" AS character \r
6194   FORMAT "X"\r
6195   INITIAL ?\r
6196   LABEL "Type"\r
6197   POSITION 5\r
6198   SQL-WIDTH 2\r
6199   COLUMN-LABEL "T"\r
6200   LENGTH 0\r
6201   ORDER 40\r
6202 \r
6203 ADD FIELD "EntityCode" OF "NewAcctTrans" AS integer \r
6204   FORMAT "99999"\r
6205   INITIAL "0"\r
6206   LABEL "Entity"\r
6207   POSITION 6\r
6208   SQL-WIDTH 4\r
6209   HELP "Code of Tenant, Company, Creditor or etc."\r
6210   ORDER 50\r
6211   MANDATORY\r
6212 \r
6213 ADD FIELD "AccountCode" OF "NewAcctTrans" AS decimal \r
6214   FORMAT "9999.99"\r
6215   INITIAL "0"\r
6216   LABEL "Account"\r
6217   POSITION 7\r
6218   SQL-WIDTH 17\r
6219   DECIMALS 2\r
6220   ORDER 60\r
6221   MANDATORY\r
6222 \r
6223 ADD FIELD "Date" OF "NewAcctTrans" AS date \r
6224   FORMAT "99/99/9999"\r
6225   INITIAL ?\r
6226   POSITION 8\r
6227   SQL-WIDTH 4\r
6228   ORDER 70\r
6229 \r
6230 ADD FIELD "Description" OF "NewAcctTrans" AS character \r
6231   FORMAT "X(30)"\r
6232   INITIAL ""\r
6233   POSITION 9\r
6234   SQL-WIDTH 60\r
6235   LENGTH 0\r
6236   ORDER 80\r
6237 \r
6238 ADD FIELD "Amount" OF "NewAcctTrans" AS decimal \r
6239   FORMAT "->>,>>>,>>>,>>9.99"\r
6240   INITIAL "0"\r
6241   POSITION 10\r
6242   SQL-WIDTH 17\r
6243   DECIMALS 2\r
6244   ORDER 90\r
6245   FIELD-TRIGGER "ASSIGN" OVERRIDE PROCEDURE "a-trnamt.p" CRC "?" \r
6246 \r
6247 ADD FIELD "Reference" OF "NewAcctTrans" AS character \r
6248   DESCRIPTION "Overrides the reference at document level for some display situations."\r
6249   FORMAT "X(20)"\r
6250   INITIAL ""\r
6251   LABEL "Ref"\r
6252   POSITION 11\r
6253   SQL-WIDTH 40\r
6254   HELP "Enter a reference to override the document reference"\r
6255   LENGTH 0\r
6256   ORDER 100\r
6257 \r
6258 ADD FIELD "ConsequenceOf" OF "NewAcctTrans" AS integer \r
6259   DESCRIPTION "Indicates which transactioncode in this document caused this transaction to be created during the transaction update process."\r
6260   FORMAT ">>>>9"\r
6261   INITIAL "0"\r
6262   POSITION 12\r
6263   SQL-WIDTH 4\r
6264   HELP "System maintained."\r
6265   ORDER 110\r
6266 \r
6267 ADD FIELD "MonthCode" OF "NewAcctTrans" AS integer \r
6268   DESCRIPTION "The code of the month that this transaction should update to."\r
6269   FORMAT ">>>>>9"\r
6270   INITIAL ?\r
6271   LABEL "Month"\r
6272   POSITION 13\r
6273   SQL-WIDTH 4\r
6274   HELP "The code of the month that this transaction should update to."\r
6275   ORDER 120\r
6276 \r
6277 ADD INDEX "NewTransactions" ON "NewAcctTrans" \r
6278   AREA "Schema Area"\r
6279   UNIQUE\r
6280   PRIMARY\r
6281   INDEX-FIELD "BatchCode" ASCENDING \r
6282   INDEX-FIELD "DocumentCode" ASCENDING \r
6283   INDEX-FIELD "TransactionCode" ASCENDING \r
6284 \r
6285 ADD TABLE "NewDocument"\r
6286   AREA "Schema Area"\r
6287   DESCRIPTION "Hold documents to be updated."\r
6288   DUMP-NAME "newdocum"\r
6289   TABLE-TRIGGER "DELETE" OVERRIDE PROCEDURE "denewdoc.p" CRC "?" \r
6290   TABLE-TRIGGER "WRITE" OVERRIDE PROCEDURE "wrnewdoc.p" CRC "?" \r
6291 \r
6292 ADD FIELD "BatchCode" OF "NewDocument" AS integer \r
6293   FORMAT ">>>>>9"\r
6294   INITIAL "0"\r
6295   LABEL "Batch"\r
6296   POSITION 2\r
6297   SQL-WIDTH 4\r
6298   ORDER 10\r
6299   MANDATORY\r
6300   FIELD-TRIGGER "ASSIGN" OVERRIDE PROCEDURE "a-ndcbch.p" CRC "?" \r
6301 \r
6302 ADD FIELD "DocumentCode" OF "NewDocument" AS integer \r
6303   FORMAT ">>>>>9"\r
6304   INITIAL "0"\r
6305   LABEL "Document"\r
6306   POSITION 3\r
6307   SQL-WIDTH 4\r
6308   ORDER 20\r
6309   MANDATORY\r
6310 \r
6311 ADD FIELD "Description" OF "NewDocument" AS character \r
6312   FORMAT "X(50)"\r
6313   INITIAL ""\r
6314   POSITION 4\r
6315   SQL-WIDTH 100\r
6316   LENGTH 0\r
6317   ORDER 30\r
6318   MANDATORY\r
6319 \r
6320 ADD FIELD "Reference" OF "NewDocument" AS character \r
6321   FORMAT "X(12)"\r
6322   INITIAL ""\r
6323   POSITION 5\r
6324   SQL-WIDTH 24\r
6325   LENGTH 0\r
6326   ORDER 40\r
6327   MANDATORY\r
6328 \r
6329 ADD FIELD "DocumentType" OF "NewDocument" AS character \r
6330   FORMAT "X(4)"\r
6331   INITIAL "JRNL"\r
6332   LABEL "Type"\r
6333   POSITION 6\r
6334   SQL-WIDTH 8\r
6335   COLUMN-LABEL "T"\r
6336   HELP "Invoice, Journal, Voucher, etc."\r
6337   LENGTH 0\r
6338   ORDER 50\r
6339   MANDATORY\r
6340 \r
6341 ADD INDEX "NewDocuments" ON "NewDocument" \r
6342   AREA "Schema Area"\r
6343   UNIQUE\r
6344   PRIMARY\r
6345   INDEX-FIELD "BatchCode" ASCENDING \r
6346   INDEX-FIELD "DocumentCode" ASCENDING \r
6347 \r
6348 ADD TABLE "NewBatch"\r
6349   AREA "Schema Area"\r
6350   DESCRIPTION "Holds batch control records for 'new' batches - i.e. those that could be 'posted' to update accounts."\r
6351   DUMP-NAME "newbatch"\r
6352   TABLE-TRIGGER "CREATE" OVERRIDE PROCEDURE "crnewbch.p" CRC "?" \r
6353   TABLE-TRIGGER "DELETE" OVERRIDE PROCEDURE "denewbch.p" CRC "?" \r
6354 \r
6355 ADD FIELD "BatchCode" OF "NewBatch" AS integer \r
6356   FORMAT ">>>>>9"\r
6357   INITIAL ?\r
6358   LABEL "Batch"\r
6359   POSITION 2\r
6360   SQL-WIDTH 4\r
6361   ORDER 10\r
6362   MANDATORY\r
6363 \r
6364 ADD FIELD "PersonCode" OF "NewBatch" AS integer \r
6365   FORMAT ">>>>>>9"\r
6366   INITIAL ?\r
6367   LABEL "Operator"\r
6368   POSITION 3\r
6369   SQL-WIDTH 4\r
6370   ORDER 20\r
6371   MANDATORY\r
6372 \r
6373 ADD FIELD "BatchType" OF "NewBatch" AS character \r
6374   FORMAT "X(4)"\r
6375   INITIAL "NORM"\r
6376   LABEL "Type"\r
6377   POSITION 4\r
6378   SQL-WIDTH 8\r
6379   LENGTH 0\r
6380   ORDER 70\r
6381   MANDATORY\r
6382 \r
6383 ADD FIELD "DocumentCount" OF "NewBatch" AS integer \r
6384   FORMAT ">>>,>>9"\r
6385   INITIAL "0"\r
6386   LABEL "Documents"\r
6387   POSITION 5\r
6388   SQL-WIDTH 4\r
6389   ORDER 40\r
6390   MANDATORY\r
6391 \r
6392 ADD FIELD "Total" OF "NewBatch" AS decimal \r
6393   FORMAT "->>>,>>>,>>9.99"\r
6394   INITIAL "0"\r
6395   POSITION 6\r
6396   SQL-WIDTH 17\r
6397   DECIMALS 2\r
6398   ORDER 50\r
6399   MANDATORY\r
6400 \r
6401 ADD FIELD "Description" OF "NewBatch" AS character \r
6402   FORMAT "X(50)"\r
6403   INITIAL ""\r
6404   POSITION 7\r
6405   SQL-WIDTH 100\r
6406   VALEXP "Description <> """" AND Description <> ?"\r
6407   VALMSG "The batch description may not be null"\r
6408   LENGTH 0\r
6409   ORDER 60\r
6410 \r
6411 ADD INDEX "XPKNewBatch" ON "NewBatch" \r
6412   AREA "Schema Area"\r
6413   UNIQUE\r
6414   PRIMARY\r
6415   INDEX-FIELD "BatchCode" ASCENDING \r
6416 \r
6417 ADD INDEX "XAK1NewBatch" ON "NewBatch" \r
6418   AREA "Schema Area"\r
6419   UNIQUE\r
6420   INDEX-FIELD "BatchType" ASCENDING \r
6421   INDEX-FIELD "BatchCode" DESCENDING \r
6422 \r
6423 ADD INDEX "XAKDescription" ON "NewBatch" \r
6424   AREA "Schema Area"\r
6425   INDEX-FIELD "Description" ASCENDING \r
6426 \r
6427 ADD TABLE "DocumentType"\r
6428   AREA "Schema Area"\r
6429   DESCRIPTION "Types of documents"\r
6430   DUMP-NAME "docutype"\r
6431 \r
6432 ADD FIELD "DocumentType" OF "DocumentType" AS character \r
6433   FORMAT "X(4)"\r
6434   INITIAL ?\r
6435   LABEL "Document Type"\r
6436   POSITION 2\r
6437   SQL-WIDTH 8\r
6438   COLUMN-LABEL "Code"\r
6439   LENGTH 0\r
6440   ORDER 10\r
6441   MANDATORY\r
6442 \r
6443 ADD FIELD "Description" OF "DocumentType" AS character \r
6444   FORMAT "X(20)"\r
6445   INITIAL ?\r
6446   POSITION 3\r
6447   SQL-WIDTH 40\r
6448   LENGTH 0\r
6449   ORDER 20\r
6450   MANDATORY\r
6451 \r
6452 ADD INDEX "DocumentTypes" ON "DocumentType" \r
6453   AREA "Schema Area"\r
6454   UNIQUE\r
6455   PRIMARY\r
6456   INDEX-FIELD "DocumentType" ASCENDING \r
6457 \r
6458 ADD TABLE "AccountBalance"\r
6459   AREA "Schema Area"\r
6460   DUMP-NAME "accountb"\r
6461   TABLE-TRIGGER "DELETE" OVERRIDE PROCEDURE "deactbal.p" CRC "?" \r
6462   TABLE-TRIGGER "WRITE" OVERRIDE PROCEDURE "wractbal.p" CRC "?" \r
6463 \r
6464 ADD FIELD "EntityType" OF "AccountBalance" AS character \r
6465   DESCRIPTION "A reference to the entity types table indicating the type of entity against which this transaction applies (Company, Property, Project, Creditor or Tenant)."\r
6466   FORMAT "X"\r
6467   INITIAL ?\r
6468   LABEL "Entity type"\r
6469   POSITION 2\r
6470   SQL-WIDTH 2\r
6471   COLUMN-LABEL "T"\r
6472   COLUMN-LABEL-SA "C"\r
6473   LENGTH 0\r
6474   ORDER 70\r
6475   MANDATORY\r
6476 \r
6477 ADD FIELD "EntityCode" OF "AccountBalance" AS integer \r
6478   FORMAT "99999"\r
6479   INITIAL ?\r
6480   LABEL "Code"\r
6481   POSITION 3\r
6482   SQL-WIDTH 4\r
6483   COLUMN-LABEL-SA "C"\r
6484   ORDER 80\r
6485   MANDATORY\r
6486 \r
6487 ADD FIELD "AccountCode" OF "AccountBalance" AS decimal \r
6488   DESCRIPTION "The code of the account from within the chart of accounts that this ledger account applies to."\r
6489   FORMAT "9999.99"\r
6490   INITIAL ?\r
6491   LABEL "Account"\r
6492   POSITION 4\r
6493   SQL-WIDTH 17\r
6494   DECIMALS 2\r
6495   ORDER 90\r
6496   MANDATORY\r
6497 \r
6498 ADD FIELD "MonthCode" OF "AccountBalance" AS integer \r
6499   DESCRIPTION "The code of the month that this account applies to."\r
6500   FORMAT ">>>>>9"\r
6501   INITIAL ?\r
6502   LABEL "Month"\r
6503   POSITION 5\r
6504   SQL-WIDTH 4\r
6505   ORDER 100\r
6506   MANDATORY\r
6507 \r
6508 ADD FIELD "Balance" OF "AccountBalance" AS decimal \r
6509   DESCRIPTION "The sum of the months transactions against this creditor ledger account."\r
6510   FORMAT "->>,>>>,>>>,>>9.99"\r
6511   INITIAL "0"\r
6512   POSITION 6\r
6513   SQL-WIDTH 17\r
6514   DECIMALS 2\r
6515   ORDER 110\r
6516 \r
6517 ADD FIELD "Budget" OF "AccountBalance" AS decimal \r
6518   FORMAT "->>,>>>,>>>,>>9.99"\r
6519   INITIAL "0"\r
6520   POSITION 7\r
6521   SQL-WIDTH 17\r
6522   DECIMALS 2\r
6523   ORDER 120\r
6524 \r
6525 ADD FIELD "RevisedBudget" OF "AccountBalance" AS decimal \r
6526   FORMAT "->>,>>>,>>>,>>9.99"\r
6527   INITIAL "0"\r
6528   LABEL "Revised"\r
6529   POSITION 8\r
6530   SQL-WIDTH 17\r
6531   DECIMALS 2\r
6532   ORDER 130\r
6533 \r
6534 ADD FIELD "NoteCode" OF "AccountBalance" AS integer \r
6535   DESCRIPTION "A unique code identifying this note."\r
6536   FORMAT ">>>>>9"\r
6537   INITIAL ?\r
6538   POSITION 9\r
6539   SQL-WIDTH 4\r
6540   ORDER 140\r
6541 \r
6542 ADD INDEX "XPKAccountBalances" ON "AccountBalance" \r
6543   AREA "Schema Area"\r
6544   UNIQUE\r
6545   PRIMARY\r
6546   INDEX-FIELD "EntityType" ASCENDING \r
6547   INDEX-FIELD "EntityCode" ASCENDING \r
6548   INDEX-FIELD "AccountCode" ASCENDING \r
6549   INDEX-FIELD "MonthCode" ASCENDING \r
6550 \r
6551 ADD INDEX "XAK1AccountBalances" ON "AccountBalance" \r
6552   AREA "Schema Area"\r
6553   INDEX-FIELD "EntityType" ASCENDING \r
6554   INDEX-FIELD "AccountCode" ASCENDING \r
6555   INDEX-FIELD "MonthCode" ASCENDING \r
6556 \r
6557 ADD TABLE "OfficeControlAccount"\r
6558   AREA "Schema Area"\r
6559   DUMP-NAME "officeco"\r
6560 \r
6561 ADD FIELD "OfficeCode" OF "OfficeControlAccount" AS character \r
6562   FORMAT "X(4)"\r
6563   INITIAL ""\r
6564   LABEL "Office"\r
6565   POSITION 2\r
6566   SQL-WIDTH 8\r
6567   HELP "Office that this control account applies to"\r
6568   LENGTH 0\r
6569   ORDER 10\r
6570   MANDATORY\r
6571 \r
6572 ADD FIELD "EntityType" OF "OfficeControlAccount" AS character \r
6573   DESCRIPTION "A reference to the entity types table indicating the type of entity against which this control account applies (Company, Property, Project, Creditor or Tenant)."\r
6574   FORMAT "X"\r
6575   INITIAL ""\r
6576   LABEL "Entity type"\r
6577   POSITION 3\r
6578   SQL-WIDTH 2\r
6579   COLUMN-LABEL "Type"\r
6580   COLUMN-LABEL-SA "C"\r
6581   HELP "Entity type of control account"\r
6582   LENGTH 0\r
6583   ORDER 20\r
6584   MANDATORY\r
6585 \r
6586 ADD FIELD "EntityCode" OF "OfficeControlAccount" AS integer \r
6587   FORMAT "99999"\r
6588   INITIAL "0"\r
6589   LABEL "Code"\r
6590   POSITION 4\r
6591   SQL-WIDTH 4\r
6592   COLUMN-LABEL-SA "C"\r
6593   HELP "An optional entity code if applicable"\r
6594   ORDER 30\r
6595 \r
6596 ADD FIELD "AccountCode" OF "OfficeControlAccount" AS decimal \r
6597   DESCRIPTION "The code of this control account."\r
6598   FORMAT "9999.99"\r
6599   INITIAL "0"\r
6600   LABEL "Account"\r
6601   POSITION 5\r
6602   SQL-WIDTH 17\r
6603   COLUMN-LABEL-SA "C"\r
6604   HELP "The code of this control account."\r
6605   DECIMALS 2\r
6606   ORDER 40\r
6607   MANDATORY\r
6608 \r
6609 ADD FIELD "Description" OF "OfficeControlAccount" AS character \r
6610   DESCRIPTION "A description of this control account."\r
6611   FORMAT "X(50)"\r
6612   INITIAL ""\r
6613   POSITION 6\r
6614   SQL-WIDTH 100\r
6615   HELP "A description of this control account."\r
6616   LENGTH 0\r
6617   ORDER 50\r
6618 \r
6619 ADD FIELD "Name" OF "OfficeControlAccount" AS character \r
6620   FORMAT "X(12)"\r
6621   INITIAL ""\r
6622   POSITION 7\r
6623   SQL-WIDTH 24\r
6624   HELP "The name of this sequence"\r
6625   ORDER 5\r
6626   MANDATORY\r
6627 \r
6628 ADD INDEX "XPKOfficeControlAccounts" ON "OfficeControlAccount" \r
6629   AREA "Schema Area"\r
6630   PRIMARY\r
6631   INDEX-FIELD "OfficeCode" ASCENDING \r
6632   INDEX-FIELD "Name" ASCENDING \r
6633 \r
6634 ADD TABLE "AutoText"\r
6635   AREA "Schema Area"\r
6636   DUMP-NAME "autotext"\r
6637 \r
6638 ADD FIELD "AutoTextCode" OF "AutoText" AS character \r
6639   FORMAT "X(8)"\r
6640   INITIAL ?\r
6641   LABEL "Auto Text code"\r
6642   POSITION 2\r
6643   SQL-WIDTH 16\r
6644   COLUMN-LABEL "AutoCode"\r
6645   LENGTH 0\r
6646   ORDER 10\r
6647 \r
6648 ADD FIELD "Description" OF "AutoText" AS character \r
6649   FORMAT "X(256)"\r
6650   INITIAL ""\r
6651   LABEL "Auto Text Description"\r
6652   POSITION 3\r
6653   SQL-WIDTH 512\r
6654   COLUMN-LABEL "Text"\r
6655   LENGTH 0\r
6656   ORDER 20\r
6657 \r
6658 ADD INDEX "XPKAutoTextCode" ON "AutoText" \r
6659   AREA "Schema Area"\r
6660   UNIQUE\r
6661   PRIMARY\r
6662   INDEX-FIELD "AutoTextCode" ASCENDING \r
6663 \r
6664 ADD TABLE "TenantSubLease"\r
6665   AREA "Schema Area"\r
6666   DUMP-NAME "tenantsu"\r
6667 \r
6668 ADD FIELD "TenantSubLeaseCode" OF "TenantSubLease" AS integer \r
6669   FORMAT ">>>>9"\r
6670   INITIAL "0"\r
6671   LABEL "Code"\r
6672   POSITION 2\r
6673   SQL-WIDTH 4\r
6674   ORDER 10\r
6675   MANDATORY\r
6676 \r
6677 ADD FIELD "TenancyLeaseCode" OF "TenantSubLease" AS integer \r
6678   DESCRIPTION "A code used to refer to this tenancy lease"\r
6679   FORMAT "99999"\r
6680   INITIAL "0"\r
6681   LABEL "Code"\r
6682   POSITION 3\r
6683   SQL-WIDTH 4\r
6684   ORDER 20\r
6685 \r
6686 ADD FIELD "Notes" OF "TenantSubLease" AS integer \r
6687   DESCRIPTION "Any notes relating to this lease"\r
6688   FORMAT ">>>>>9"\r
6689   INITIAL "0"\r
6690   LABEL "Notes key"\r
6691   POSITION 4\r
6692   SQL-WIDTH 4\r
6693   ORDER 30\r
6694   MANDATORY\r
6695 \r
6696 ADD FIELD "Name" OF "TenantSubLease" AS character \r
6697   FORMAT "X(50)"\r
6698   INITIAL ""\r
6699   POSITION 5\r
6700   SQL-WIDTH 100\r
6701   LENGTH 0\r
6702   ORDER 40\r
6703   MANDATORY\r
6704 \r
6705 ADD INDEX "XPKTenantSubLeases" ON "TenantSubLease" \r
6706   AREA "Schema Area"\r
6707   UNIQUE\r
6708   PRIMARY\r
6709   INDEX-FIELD "TenantSubLeaseCode" ASCENDING \r
6710 \r
6711 ADD INDEX "XAK1TenantSubLease" ON "TenantSubLease" \r
6712   AREA "Schema Area"\r
6713   INDEX-FIELD "TenancyLeaseCode" ASCENDING \r
6714 \r
6715 ADD INDEX "XAK2TenantSubLeases" ON "TenantSubLease" \r
6716   AREA "Schema Area"\r
6717   INDEX-FIELD "Name" ASCENDING \r
6718 \r
6719 ADD TABLE "Usr"\r
6720   AREA "Schema Area"\r
6721   DUMP-NAME "usr"\r
6722   TABLE-TRIGGER "CREATE" OVERRIDE PROCEDURE "crusr.p" CRC "?" \r
6723   TABLE-TRIGGER "DELETE" OVERRIDE PROCEDURE "deusr.p" CRC "?" \r
6724   TABLE-TRIGGER "WRITE" OVERRIDE PROCEDURE "wrusr.p" CRC "?" \r
6725 \r
6726 ADD FIELD "UserName" OF "Usr" AS character \r
6727   FORMAT "X(20)"\r
6728   INITIAL ""\r
6729   LABEL "User Name"\r
6730   POSITION 2\r
6731   SQL-WIDTH 40\r
6732   COLUMN-LABEL "User"\r
6733   LENGTH 0\r
6734   ORDER 10\r
6735   MANDATORY\r
6736 \r
6737 ADD FIELD "Abbreviation" OF "Usr" AS character \r
6738   FORMAT "X(4)"\r
6739   INITIAL ""\r
6740   LABEL "Abbreviation"\r
6741   POSITION 3\r
6742   SQL-WIDTH 8\r
6743   LENGTH 0\r
6744   ORDER 20\r
6745 \r
6746 ADD FIELD "PersonCode" OF "Usr" AS integer \r
6747   DESCRIPTION "The person code used to refer to this System User."\r
6748   FORMAT "99999"\r
6749   INITIAL "0"\r
6750   LABEL "Person code"\r
6751   POSITION 4\r
6752   SQL-WIDTH 4\r
6753   COLUMN-LABEL "Person"\r
6754   ORDER 30\r
6755   MANDATORY\r
6756 \r
6757 ADD INDEX "XPKUserName" ON "Usr" \r
6758   AREA "Schema Area"\r
6759   UNIQUE\r
6760   PRIMARY\r
6761   INDEX-FIELD "UserName" ASCENDING \r
6762 \r
6763 ADD INDEX "XAK1PersonCode" ON "Usr" \r
6764   AREA "Schema Area"\r
6765   INDEX-FIELD "PersonCode" ASCENDING \r
6766 \r
6767 ADD INDEX "XAK2Abbreviation" ON "Usr" \r
6768   AREA "Schema Area"\r
6769   INDEX-FIELD "Abbreviation" ASCENDING \r
6770 \r
6771 ADD TABLE "UsrGroup"\r
6772   AREA "Schema Area"\r
6773   DUMP-NAME "usrgroup"\r
6774   TABLE-TRIGGER "DELETE" OVERRIDE PROCEDURE "deusrgrp.p" CRC "?" \r
6775   TABLE-TRIGGER "WRITE" OVERRIDE PROCEDURE "wrusrgrp.p" CRC "?" \r
6776 \r
6777 ADD FIELD "GroupName" OF "UsrGroup" AS character \r
6778   FORMAT "X(20)"\r
6779   INITIAL ""\r
6780   LABEL "Group Name"\r
6781   POSITION 2\r
6782   SQL-WIDTH 40\r
6783   COLUMN-LABEL "Group"\r
6784   LENGTH 0\r
6785   ORDER 10\r
6786   MANDATORY\r
6787 \r
6788 ADD FIELD "Description" OF "UsrGroup" AS character \r
6789   FORMAT "X(50)"\r
6790   INITIAL ""\r
6791   POSITION 3\r
6792   SQL-WIDTH 100\r
6793   LENGTH 0\r
6794   ORDER 20\r
6795 \r
6796 ADD FIELD "Sequence" OF "UsrGroup" AS integer \r
6797   FORMAT "->,>>>,>>9"\r
6798   INITIAL "0"\r
6799   POSITION 4\r
6800   SQL-WIDTH 4\r
6801   ORDER 30\r
6802 \r
6803 ADD INDEX "XPKUsrGroup" ON "UsrGroup" \r
6804   AREA "Schema Area"\r
6805   UNIQUE\r
6806   PRIMARY\r
6807   INDEX-FIELD "GroupName" ASCENDING \r
6808 \r
6809 ADD INDEX "XAK1UsrGroup" ON "UsrGroup" \r
6810   AREA "Schema Area"\r
6811   INDEX-FIELD "Sequence" ASCENDING \r
6812 \r
6813 ADD TABLE "ProgramLink"\r
6814   AREA "Schema Area"\r
6815   DUMP-NAME "programl"\r
6816   TABLE-TRIGGER "CREATE" OVERRIDE PROCEDURE "crprglnk.p" CRC "?" \r
6817   TABLE-TRIGGER "DELETE" OVERRIDE PROCEDURE "deprglnk.p" CRC "?" \r
6818   TABLE-TRIGGER "WRITE" OVERRIDE PROCEDURE "wrprglnk.p" CRC "?" \r
6819 \r
6820 ADD FIELD "LinkType" OF "ProgramLink" AS character \r
6821   FORMAT "X(3)"\r
6822   INITIAL ""\r
6823   LABEL "Link Type"\r
6824   POSITION 2\r
6825   SQL-WIDTH 6\r
6826   LENGTH 0\r
6827   ORDER 10\r
6828   MANDATORY\r
6829 \r
6830 ADD FIELD "Description" OF "ProgramLink" AS character \r
6831   FORMAT "X(70)"\r
6832   INITIAL ""\r
6833   POSITION 3\r
6834   SQL-WIDTH 140\r
6835   LENGTH 0\r
6836   ORDER 20\r
6837   MANDATORY\r
6838 \r
6839 ADD FIELD "Source" OF "ProgramLink" AS integer \r
6840   FORMAT ">>9"\r
6841   INITIAL "0"\r
6842   POSITION 4\r
6843   SQL-WIDTH 4\r
6844   ORDER 30\r
6845   MANDATORY\r
6846 \r
6847 ADD FIELD "Target" OF "ProgramLink" AS integer \r
6848   FORMAT ">>9"\r
6849   INITIAL "0"\r
6850   POSITION 5\r
6851   SQL-WIDTH 4\r
6852   ORDER 40\r
6853   MANDATORY\r
6854 \r
6855 ADD FIELD "Viewer" OF "ProgramLink" AS character \r
6856   FORMAT "X(8)"\r
6857   INITIAL ""\r
6858   POSITION 6\r
6859   SQL-WIDTH 16\r
6860   LENGTH 0\r
6861   ORDER 50\r
6862 \r
6863 ADD FIELD "Function" OF "ProgramLink" AS character \r
6864   FORMAT "X(20)"\r
6865   INITIAL ""\r
6866   POSITION 7\r
6867   SQL-WIDTH 40\r
6868   LENGTH 0\r
6869   ORDER 80\r
6870 \r
6871 ADD FIELD "CreateViewer" OF "ProgramLink" AS logical \r
6872   FORMAT "Y/N"\r
6873   INITIAL "Y"\r
6874   POSITION 8\r
6875   SQL-WIDTH 1\r
6876   ORDER 75\r
6877 \r
6878 ADD FIELD "ButtonLabel" OF "ProgramLink" AS character \r
6879   FORMAT "X(20)"\r
6880   INITIAL ""\r
6881   POSITION 9\r
6882   SQL-WIDTH 40\r
6883   LENGTH 0\r
6884   ORDER 47\r
6885 \r
6886 ADD FIELD "FillName" OF "ProgramLink" AS character \r
6887   FORMAT "X(20)"\r
6888   INITIAL ""\r
6889   POSITION 10\r
6890   SQL-WIDTH 40\r
6891   LENGTH 0\r
6892   ORDER 100\r
6893 \r
6894 ADD FIELD "CodeName" OF "ProgramLink" AS character \r
6895   FORMAT "X(20)"\r
6896   INITIAL ""\r
6897   POSITION 11\r
6898   SQL-WIDTH 40\r
6899   LENGTH 0\r
6900   ORDER 110\r
6901 \r
6902 ADD FIELD "LinkCode" OF "ProgramLink" AS integer \r
6903   FORMAT ">>>9"\r
6904   INITIAL "0"\r
6905   POSITION 12\r
6906   SQL-WIDTH 4\r
6907   ORDER 5\r
6908 \r
6909 ADD FIELD "SortPanel" OF "ProgramLink" AS logical \r
6910   FORMAT "Y/N"\r
6911   INITIAL "N"\r
6912   POSITION 13\r
6913   SQL-WIDTH 1\r
6914   VIEW-AS "VIEW-AS TOGGLE-BOX"\r
6915   ORDER 120\r
6916 \r
6917 ADD FIELD "FilterPanel" OF "ProgramLink" AS logical \r
6918   FORMAT "Y/N"\r
6919   INITIAL "N"\r
6920   POSITION 14\r
6921   SQL-WIDTH 1\r
6922   VIEW-AS "VIEW-AS TOGGLE-BOX"\r
6923   ORDER 130\r
6924 \r
6925 ADD INDEX "XPKLinkCode" ON "ProgramLink" \r
6926   AREA "Schema Area"\r
6927   UNIQUE\r
6928   PRIMARY\r
6929   INDEX-FIELD "LinkCode" ASCENDING \r
6930 \r
6931 ADD INDEX "XAK1ProgramLinkSrc" ON "ProgramLink" \r
6932   AREA "Schema Area"\r
6933   INDEX-FIELD "Source" ASCENDING \r
6934   INDEX-FIELD "Description" ASCENDING \r
6935 \r
6936 ADD INDEX "XAK2ProgramLinkTgt" ON "ProgramLink" \r
6937   AREA "Schema Area"\r
6938   INDEX-FIELD "Target" ASCENDING \r
6939   INDEX-FIELD "Description" ASCENDING \r
6940 \r
6941 ADD TABLE "UsrGroupMember"\r
6942   AREA "Schema Area"\r
6943   DUMP-NAME "usrgrpmm"\r
6944   TABLE-TRIGGER "CREATE" OVERRIDE PROCEDURE "crusgmem.p" CRC "?" \r
6945   TABLE-TRIGGER "DELETE" OVERRIDE PROCEDURE "deusgmem.p" CRC "?" \r
6946   TABLE-TRIGGER "WRITE" OVERRIDE PROCEDURE "wrusgmem.p" CRC "?" \r
6947 \r
6948 ADD FIELD "UserName" OF "UsrGroupMember" AS character \r
6949   FORMAT "X(20)"\r
6950   INITIAL ?\r
6951   LABEL "User Name"\r
6952   POSITION 2\r
6953   SQL-WIDTH 40\r
6954   COLUMN-LABEL "User"\r
6955   LENGTH 0\r
6956   ORDER 10\r
6957   MANDATORY\r
6958 \r
6959 ADD FIELD "GroupName" OF "UsrGroupMember" AS character \r
6960   FORMAT "X(20)"\r
6961   INITIAL ""\r
6962   LABEL "Group Name"\r
6963   POSITION 3\r
6964   SQL-WIDTH 40\r
6965   COLUMN-LABEL "Group"\r
6966   LENGTH 0\r
6967   ORDER 20\r
6968   MANDATORY\r
6969 \r
6970 ADD INDEX "XPKUserGroup" ON "UsrGroupMember" \r
6971   AREA "Schema Area"\r
6972   UNIQUE\r
6973   PRIMARY\r
6974   INDEX-FIELD "UserName" ASCENDING \r
6975   INDEX-FIELD "GroupName" ASCENDING \r
6976 \r
6977 ADD INDEX "XAK1GroupUser" ON "UsrGroupMember" \r
6978   AREA "Schema Area"\r
6979   UNIQUE\r
6980   INDEX-FIELD "GroupName" ASCENDING \r
6981   INDEX-FIELD "UserName" ASCENDING \r
6982 \r
6983 ADD TABLE "UsrGroupMenuItem"\r
6984   AREA "Schema Area"\r
6985   DUMP-NAME "usrgrpmi"\r
6986   TABLE-TRIGGER "CREATE" OVERRIDE PROCEDURE "crusgmni.p" CRC "?" \r
6987   TABLE-TRIGGER "DELETE" OVERRIDE PROCEDURE "deusgmni.p" CRC "?" \r
6988   TABLE-TRIGGER "WRITE" OVERRIDE PROCEDURE "wrusgmni.p" CRC "?" \r
6989 \r
6990 ADD FIELD "LinkCode" OF "UsrGroupMenuItem" AS integer \r
6991   FORMAT ">>>9"\r
6992   INITIAL "0"\r
6993   POSITION 2\r
6994   SQL-WIDTH 4\r
6995   ORDER 30\r
6996 \r
6997 ADD FIELD "GroupName" OF "UsrGroupMenuItem" AS character \r
6998   FORMAT "X(20)"\r
6999   INITIAL ""\r
7000   LABEL "Group Name"\r
7001   POSITION 3\r
7002   SQL-WIDTH 40\r
7003   COLUMN-LABEL "Group"\r
7004   LENGTH 0\r
7005   ORDER 10\r
7006   MANDATORY\r
7007 \r
7008 ADD FIELD "SequenceCode" OF "UsrGroupMenuItem" AS integer \r
7009   FORMAT ">9"\r
7010   INITIAL "0"\r
7011   POSITION 4\r
7012   SQL-WIDTH 4\r
7013   ORDER 40\r
7014 \r
7015 ADD FIELD "ButtonLabel" OF "UsrGroupMenuItem" AS character \r
7016   DESCRIPTION "If this button is non null then it will be used in place of the default label"\r
7017   FORMAT "X(20)"\r
7018   INITIAL ""\r
7019   POSITION 5\r
7020   SQL-WIDTH 40\r
7021   LENGTH 0\r
7022   ORDER 50\r
7023 \r
7024 ADD FIELD "MenuName" OF "UsrGroupMenuItem" AS character \r
7025   FORMAT "X(30)"\r
7026   INITIAL ""\r
7027   POSITION 6\r
7028   SQL-WIDTH 60\r
7029   LENGTH 0\r
7030   ORDER 20\r
7031   MANDATORY\r
7032 \r
7033 ADD INDEX "XPKGroupMenu" ON "UsrGroupMenuItem" \r
7034   AREA "Schema Area"\r
7035   PRIMARY\r
7036   INDEX-FIELD "GroupName" ASCENDING \r
7037   INDEX-FIELD "MenuName" ASCENDING \r
7038   INDEX-FIELD "SequenceCode" ASCENDING \r
7039 \r
7040 ADD INDEX "XAK1LinkCode" ON "UsrGroupMenuItem" \r
7041   AREA "Schema Area"\r
7042   INDEX-FIELD "LinkCode" ASCENDING \r
7043 \r
7044 ADD TABLE "LinkNode"\r
7045   AREA "Schema Area"\r
7046   DUMP-NAME "linknode"\r
7047   TABLE-TRIGGER "CREATE" OVERRIDE PROCEDURE "crlnknde.p" CRC "?" \r
7048   TABLE-TRIGGER "DELETE" OVERRIDE PROCEDURE "delnknde.p" CRC "?" \r
7049   TABLE-TRIGGER "WRITE" OVERRIDE PROCEDURE "wrlnknde.p" CRC "?" \r
7050 \r
7051 ADD FIELD "NodeCode" OF "LinkNode" AS integer \r
7052   FORMAT ">>9"\r
7053   INITIAL "0"\r
7054   POSITION 2\r
7055   SQL-WIDTH 4\r
7056   ORDER 10\r
7057   MANDATORY\r
7058 \r
7059 ADD FIELD "NodeType" OF "LinkNode" AS character \r
7060   DESCRIPTION "The type of the system window i.e Menu, Drill, Maintain etc\r
7061 "\r
7062   FORMAT "XX"\r
7063   INITIAL ""\r
7064   POSITION 3\r
7065   SQL-WIDTH 4\r
7066   LENGTH 0\r
7067   ORDER 20\r
7068   MANDATORY\r
7069 \r
7070 ADD FIELD "Description" OF "LinkNode" AS character \r
7071   FORMAT "X(70)"\r
7072   INITIAL ""\r
7073   POSITION 4\r
7074   SQL-WIDTH 140\r
7075   LENGTH 0\r
7076   ORDER 30\r
7077 \r
7078 ADD FIELD "Path" OF "LinkNode" AS character \r
7079   FORMAT "X(30)"\r
7080   INITIAL ""\r
7081   POSITION 5\r
7082   SQL-WIDTH 60\r
7083   LENGTH 0\r
7084   ORDER 40\r
7085   MANDATORY\r
7086 \r
7087 ADD FIELD "File" OF "LinkNode" AS character \r
7088   FORMAT "X(8)"\r
7089   INITIAL ""\r
7090   POSITION 6\r
7091   SQL-WIDTH 16\r
7092   LENGTH 0\r
7093   ORDER 50\r
7094   MANDATORY\r
7095 \r
7096 ADD FIELD "RunFile" OF "LinkNode" AS character \r
7097   FORMAT "X(8)"\r
7098   INITIAL ""\r
7099   POSITION 7\r
7100   SQL-WIDTH 16\r
7101   LENGTH 0\r
7102   ORDER 60\r
7103 \r
7104 ADD INDEX "XPKNodeCode" ON "LinkNode" \r
7105   AREA "Schema Area"\r
7106   UNIQUE\r
7107   PRIMARY\r
7108   INDEX-FIELD "NodeCode" ASCENDING \r
7109 \r
7110 ADD INDEX "XAK1NodeType" ON "LinkNode" \r
7111   AREA "Schema Area"\r
7112   UNIQUE\r
7113   INDEX-FIELD "NodeType" ASCENDING \r
7114   INDEX-FIELD "Description" ASCENDING \r
7115 \r
7116 ADD INDEX "XAK2File" ON "LinkNode" \r
7117   AREA "Schema Area"\r
7118   UNIQUE\r
7119   INDEX-FIELD "File" ASCENDING \r
7120 \r
7121 ADD INDEX "XAK2NodeType" ON "LinkNode" \r
7122   AREA "Schema Area"\r
7123   INDEX-FIELD "NodeType" ASCENDING \r
7124 \r
7125 ADD TABLE "OutgoingDescription"\r
7126   AREA "Schema Area"\r
7127   DUMP-NAME "outgodes"\r
7128 \r
7129 ADD FIELD "Percentage" OF "OutgoingDescription" AS decimal \r
7130   FORMAT "->>9.99"\r
7131   INITIAL "0"\r
7132   LABEL "%age"\r
7133   POSITION 2\r
7134   SQL-WIDTH 17\r
7135   HELP "Percentage of this outgoing"\r
7136   DECIMALS 2\r
7137   ORDER 20\r
7138   MANDATORY\r
7139 \r
7140 ADD FIELD "TenancyLeaseCode" OF "OutgoingDescription" AS integer \r
7141   DESCRIPTION "A code used to refer to this tenancy lease"\r
7142   FORMAT "99999"\r
7143   INITIAL "0"\r
7144   LABEL "Code"\r
7145   POSITION 3\r
7146   SQL-WIDTH 4\r
7147   ORDER 10\r
7148   MANDATORY\r
7149 \r
7150 ADD FIELD "Description" OF "OutgoingDescription" AS character \r
7151   FORMAT "X(50)"\r
7152   INITIAL ""\r
7153   LABEL "Description"\r
7154   POSITION 4\r
7155   SQL-WIDTH 100\r
7156   LENGTH 0\r
7157   ORDER 30\r
7158   MANDATORY\r
7159 \r
7160 ADD INDEX "XPKOutgoingDescriptions" ON "OutgoingDescription" \r
7161   AREA "Schema Area"\r
7162   PRIMARY\r
7163   INDEX-FIELD "TenancyLeaseCode" ASCENDING \r
7164 \r
7165 ADD TABLE "AccountSummary"\r
7166   AREA "Schema Area"\r
7167   DUMP-NAME "accounts"\r
7168 \r
7169 ADD FIELD "EntityType" OF "AccountSummary" AS character \r
7170   DESCRIPTION "A reference to the entity types table indicating the type of entity against which this transaction applies (Company, Property, Project, Creditor or Tenant)."\r
7171   FORMAT "X"\r
7172   INITIAL ?\r
7173   LABEL "Entity type"\r
7174   POSITION 2\r
7175   SQL-WIDTH 2\r
7176   COLUMN-LABEL "T"\r
7177   COLUMN-LABEL-SA "C"\r
7178   LENGTH 0\r
7179   ORDER 10\r
7180   MANDATORY\r
7181 \r
7182 ADD FIELD "EntityCode" OF "AccountSummary" AS integer \r
7183   FORMAT "99999"\r
7184   INITIAL ?\r
7185   LABEL "Code"\r
7186   POSITION 3\r
7187   SQL-WIDTH 4\r
7188   COLUMN-LABEL-SA "C"\r
7189   ORDER 20\r
7190   MANDATORY\r
7191 \r
7192 ADD FIELD "AccountCode" OF "AccountSummary" AS decimal \r
7193   DESCRIPTION "The code of the account from within the chart of accounts that this ledger account applies to."\r
7194   FORMAT "9999.99"\r
7195   INITIAL ?\r
7196   LABEL "Account"\r
7197   POSITION 4\r
7198   SQL-WIDTH 17\r
7199   DECIMALS 2\r
7200   ORDER 30\r
7201   MANDATORY\r
7202 \r
7203 ADD FIELD "Balance" OF "AccountSummary" AS decimal \r
7204   DESCRIPTION "The sum of the months transactions against this creditor ledger account."\r
7205   FORMAT "->>,>>>,>>>,>>9.99"\r
7206   INITIAL "0"\r
7207   POSITION 5\r
7208   SQL-WIDTH 17\r
7209   DECIMALS 2\r
7210   ORDER 40\r
7211 \r
7212 ADD FIELD "Budget" OF "AccountSummary" AS decimal \r
7213   FORMAT "->>,>>>,>>>,>>9.99"\r
7214   INITIAL "0"\r
7215   POSITION 6\r
7216   SQL-WIDTH 17\r
7217   DECIMALS 2\r
7218   ORDER 50\r
7219 \r
7220 ADD FIELD "RevisedBudget" OF "AccountSummary" AS decimal \r
7221   FORMAT "->>,>>>,>>>,>>9.99"\r
7222   INITIAL "0"\r
7223   LABEL "Revised"\r
7224   POSITION 7\r
7225   SQL-WIDTH 17\r
7226   DECIMALS 2\r
7227   ORDER 60\r
7228 \r
7229 ADD FIELD "NoteCode" OF "AccountSummary" AS integer \r
7230   DESCRIPTION "A unique code identifying this note."\r
7231   FORMAT ">>>>>9"\r
7232   INITIAL ?\r
7233   POSITION 8\r
7234   SQL-WIDTH 4\r
7235   ORDER 70\r
7236 \r
7237 ADD INDEX "XPKAccountSummary" ON "AccountSummary" \r
7238   AREA "Schema Area"\r
7239   UNIQUE\r
7240   PRIMARY\r
7241   INDEX-FIELD "EntityType" ASCENDING \r
7242   INDEX-FIELD "EntityCode" ASCENDING \r
7243   INDEX-FIELD "AccountCode" ASCENDING \r
7244 \r
7245 ADD INDEX "XAK1AccountCode" ON "AccountSummary" \r
7246   AREA "Schema Area"\r
7247   INDEX-FIELD "AccountCode" ASCENDING \r
7248 \r
7249 ADD TABLE "Voucher"\r
7250   AREA "Schema Area"\r
7251   LABEL "Voucher"\r
7252   DESCRIPTION "Invoices are received for payment and registered onto the system, an approval form is generated which accompanies the physical piece of paper around the organisation until the invoice is approved for payment. Invoices may also be held, or cancelled, prior to payment. 6420 Vouchers were processed in Wellington in 1995."\r
7253   DUMP-NAME "voucher"\r
7254   TABLE-TRIGGER "CREATE" OVERRIDE PROCEDURE "crvouchr.p" CRC "?" \r
7255   TABLE-TRIGGER "WRITE" OVERRIDE PROCEDURE "wrvouchr.p" CRC "?" \r
7256 \r
7257 ADD FIELD "CreditorCode" OF "Voucher" AS integer \r
7258   DESCRIPTION "The code of the Creditor that this Voucher applies to."\r
7259   FORMAT "99999"\r
7260   INITIAL "0"\r
7261   POSITION 2\r
7262   SQL-WIDTH 4\r
7263   ORDER 10\r
7264 \r
7265 ADD FIELD "Date" OF "Voucher" AS date \r
7266   DESCRIPTION "The date applying to the voucher."\r
7267   FORMAT "99/99/9999"\r
7268   INITIAL ?\r
7269   POSITION 3\r
7270   SQL-WIDTH 4\r
7271   ORDER 20\r
7272 \r
7273 ADD FIELD "InvoiceReference" OF "Voucher" AS character \r
7274   DESCRIPTION "Reference to the invoice that the voucher applies to.\r
7275 "\r
7276   FORMAT "X(20)"\r
7277   INITIAL ""\r
7278   POSITION 4\r
7279   SQL-WIDTH 40\r
7280   LENGTH 0\r
7281   ORDER 30\r
7282 \r
7283 ADD FIELD "OurOrderNo" OF "Voucher" AS character \r
7284   DESCRIPTION "Internal order number for this voucher.\r
7285 "\r
7286   FORMAT "X(20)"\r
7287   INITIAL ""\r
7288   POSITION 5\r
7289   SQL-WIDTH 40\r
7290   LENGTH 0\r
7291   ORDER 40\r
7292 \r
7293 ADD FIELD "CapExCode" OF "Voucher" AS integer \r
7294   DESCRIPTION "Code for the Capital Expenditure that this voucher applies to."\r
7295   FORMAT "99999"\r
7296   INITIAL "0"\r
7297   POSITION 6\r
7298   SQL-WIDTH 4\r
7299   ORDER 50\r
7300 \r
7301 ADD FIELD "ApproverCode" OF "Voucher" AS character \r
7302   DESCRIPTION "The short alpha code for the person who approved the voucher."\r
7303   FORMAT "X(4)"\r
7304   INITIAL ""\r
7305   LABEL "Approval"\r
7306   POSITION 7\r
7307   SQL-WIDTH 8\r
7308   LENGTH 0\r
7309   ORDER 60\r
7310 \r
7311 ADD FIELD "GoodsValue" OF "Voucher" AS decimal \r
7312   DESCRIPTION "Value of the goods for this voucher."\r
7313   FORMAT "->,>>>,>>9.99"\r
7314   INITIAL "0"\r
7315   POSITION 8\r
7316   SQL-WIDTH 17\r
7317   DECIMALS 2\r
7318   ORDER 70\r
7319 \r
7320 ADD FIELD "TaxValue" OF "Voucher" AS decimal \r
7321   DESCRIPTION "Tax value for the goods of this voucher."\r
7322   FORMAT "->>>,>>9.99"\r
7323   INITIAL "0"\r
7324   POSITION 9\r
7325   SQL-WIDTH 17\r
7326   DECIMALS 2\r
7327   ORDER 80\r
7328 \r
7329 ADD FIELD "Description" OF "Voucher" AS character \r
7330   DESCRIPTION "Description of the voucher."\r
7331   FORMAT "X(50)"\r
7332   INITIAL ""\r
7333   POSITION 10\r
7334   SQL-WIDTH 100\r
7335   LENGTH 0\r
7336   ORDER 90\r
7337 \r
7338 ADD FIELD "BatchCode" OF "Voucher" AS integer \r
7339   FORMAT "9999999"\r
7340   INITIAL "0"\r
7341   POSITION 11\r
7342   SQL-WIDTH 4\r
7343   ORDER 100\r
7344 \r
7345 ADD FIELD "DocumentCode" OF "Voucher" AS integer \r
7346   DESCRIPTION "The code of the document that this voucher applies to."\r
7347   FORMAT "9999999"\r
7348   INITIAL "0"\r
7349   POSITION 12\r
7350   SQL-WIDTH 4\r
7351   ORDER 110\r
7352 \r
7353 ADD FIELD "BankAccountCode" OF "Voucher" AS character \r
7354   FORMAT "X(4)"\r
7355   INITIAL ""\r
7356   LABEL "Bank a/c"\r
7357   POSITION 13\r
7358   SQL-WIDTH 8\r
7359   LENGTH 0\r
7360   ORDER 240\r
7361   MANDATORY\r
7362 \r
7363 ADD FIELD "DateDue" OF "Voucher" AS date \r
7364   DESCRIPTION "Due Date for voucher resolution."\r
7365   FORMAT "99/99/9999"\r
7366   INITIAL ?\r
7367   POSITION 14\r
7368   SQL-WIDTH 4\r
7369   ORDER 130\r
7370 \r
7371 ADD FIELD "VoucherSeq" OF "Voucher" AS integer \r
7372   DESCRIPTION "Unique sequence number for this voucher."\r
7373   FORMAT "99999999"\r
7374   INITIAL "0"\r
7375   POSITION 15\r
7376   SQL-WIDTH 4\r
7377   ORDER 140\r
7378 \r
7379 ADD FIELD "AccountCode" OF "Voucher" AS decimal \r
7380   DESCRIPTION "The code of the account that this voucher applies to.\r
7381 "\r
7382   FORMAT "9999.99"\r
7383   INITIAL "0"\r
7384   POSITION 16\r
7385   SQL-WIDTH 17\r
7386   DECIMALS 2\r
7387   ORDER 170\r
7388 \r
7389 ADD FIELD "VoucherStatus" OF "Voucher" AS character \r
7390   DESCRIPTION "The code for the voucher status that this voucher applies to.\r
7391 "\r
7392   FORMAT "X(4)"\r
7393   INITIAL ""\r
7394   POSITION 17\r
7395   SQL-WIDTH 8\r
7396   LENGTH 0\r
7397   ORDER 180\r
7398 \r
7399 ADD FIELD "EntityType" OF "Voucher" AS character \r
7400   DESCRIPTION "A reference to the entity types table indicating the type of entity against which this voucher applies (Company, Property, Project, Creditor or Tenant)."\r
7401   FORMAT "X"\r
7402   INITIAL "P"\r
7403   LABEL "Entity type"\r
7404   POSITION 18\r
7405   SQL-WIDTH 2\r
7406   COLUMN-LABEL "T"\r
7407   COLUMN-LABEL-SA "C"\r
7408   LENGTH 0\r
7409   ORDER 190\r
7410 \r
7411 ADD FIELD "EntityCode" OF "Voucher" AS integer \r
7412   FORMAT "99999"\r
7413   INITIAL "0"\r
7414   LABEL "Code"\r
7415   POSITION 19\r
7416   SQL-WIDTH 4\r
7417   COLUMN-LABEL-SA "C"\r
7418   ORDER 200\r
7419 \r
7420 ADD FIELD "LastModifiedDate" OF "Voucher" AS date \r
7421   DESCRIPTION "The date when this record was last modified.  Maintained by a WRITE trigger."\r
7422   FORMAT "99/99/9999"\r
7423   INITIAL "1/1/0001"\r
7424   POSITION 20\r
7425   SQL-WIDTH 4\r
7426   ORDER 210\r
7427   MANDATORY\r
7428 \r
7429 ADD FIELD "LastModifiedTime" OF "Voucher" AS integer \r
7430   DESCRIPTION "The time that this record was last modified"\r
7431   FORMAT "->,>>>,>>9"\r
7432   INITIAL "0"\r
7433   POSITION 21\r
7434   SQL-WIDTH 4\r
7435   ORDER 220\r
7436 \r
7437 ADD FIELD "LastModifiedUser" OF "Voucher" AS character \r
7438   DESCRIPTION "The user who last modified this record.  Maintained by a WRITE trigger."\r
7439   FORMAT "X(8)"\r
7440   INITIAL ""\r
7441   POSITION 22\r
7442   SQL-WIDTH 16\r
7443   LENGTH 0\r
7444   ORDER 230\r
7445 \r
7446 ADD FIELD "ChequeNo" OF "Voucher" AS integer \r
7447   DESCRIPTION "Number identifying the cheque."\r
7448   FORMAT "999999"\r
7449   INITIAL "0"\r
7450   LABEL "Cheque"\r
7451   POSITION 23\r
7452   SQL-WIDTH 4\r
7453   ORDER 250\r
7454 \r
7455 ADD FIELD "SecondApprover" OF "Voucher" AS character \r
7456   DESCRIPTION "The short alpha code for the person who approved the voucher."\r
7457   FORMAT "X(4)"\r
7458   INITIAL ""\r
7459   LABEL "Second Approval"\r
7460   POSITION 24\r
7461   SQL-WIDTH 8\r
7462   LENGTH 0\r
7463   ORDER 260\r
7464 \r
7465 ADD FIELD "OrderCode" OF "Voucher" AS integer \r
7466   FORMAT ">>>>9"\r
7467   INITIAL "0"\r
7468   POSITION 25\r
7469   SQL-WIDTH 4\r
7470   ORDER 270\r
7471 \r
7472 ADD FIELD "ProjectCode" OF "Voucher" AS integer \r
7473   FORMAT "99999"\r
7474   INITIAL "0"\r
7475   POSITION 26\r
7476   SQL-WIDTH 4\r
7477   ORDER 280\r
7478 \r
7479 ADD FIELD "CreatedDate" OF "Voucher" AS date \r
7480   FORMAT "99/99/9999"\r
7481   INITIAL ?\r
7482   LABEL "Created"\r
7483   POSITION 27\r
7484   SQL-WIDTH 4\r
7485   ORDER 290\r
7486 \r
7487 ADD FIELD "PaymentStyle" OF "Voucher" AS character \r
7488   FORMAT "X(4)"\r
7489   INITIAL "CHEQ"\r
7490   LABEL "Pay By"\r
7491   POSITION 28\r
7492   SQL-WIDTH 8\r
7493   ORDER 300\r
7494 \r
7495 ADD FIELD "InvoicePeriod" OF "Voucher" AS character \r
7496   FORMAT "X(15)"\r
7497   INITIAL ""\r
7498   LABEL "Period"\r
7499   POSITION 29\r
7500   SQL-WIDTH 30\r
7501   COLUMN-LABEL "Invoice Period"\r
7502   ORDER 310\r
7503 \r
7504 ADD INDEX "VoucherSeq" ON "Voucher" \r
7505   AREA "Schema Area"\r
7506   UNIQUE\r
7507   PRIMARY\r
7508   INDEX-FIELD "VoucherSeq" ASCENDING \r
7509 \r
7510 ADD INDEX "XAK10Vouchers" ON "Voucher" \r
7511   AREA "Schema Area"\r
7512   INDEX-FIELD "CreditorCode" ASCENDING \r
7513   INDEX-FIELD "VoucherStatus" ASCENDING \r
7514   INDEX-FIELD "DateDue" ASCENDING \r
7515 \r
7516 ADD INDEX "XAK11Vouchers" ON "Voucher" \r
7517   AREA "Schema Area"\r
7518   INDEX-FIELD "BankAccountCode" ASCENDING \r
7519   INDEX-FIELD "ChequeNo" ASCENDING \r
7520 \r
7521 ADD INDEX "XAK12Vouchers" ON "Voucher" \r
7522   AREA "Schema Area"\r
7523   INDEX-FIELD "ProjectCode" ASCENDING \r
7524   INDEX-FIELD "OrderCode" ASCENDING \r
7525 \r
7526 ADD INDEX "XAK13Vouchers" ON "Voucher" \r
7527   AREA "Schema Area"\r
7528   INDEX-FIELD "ApproverCode" ASCENDING \r
7529   INDEX-FIELD "VoucherStatus" ASCENDING \r
7530   INDEX-FIELD "Date" ASCENDING \r
7531 \r
7532 ADD INDEX "XAK2Vouchers" ON "Voucher" \r
7533   AREA "Schema Area"\r
7534   INDEX-FIELD "EntityType" ASCENDING \r
7535   INDEX-FIELD "EntityCode" ASCENDING \r
7536   INDEX-FIELD "VoucherSeq" ASCENDING \r
7537 \r
7538 ADD INDEX "XAK3Vouchers" ON "Voucher" \r
7539   AREA "Schema Area"\r
7540   INDEX-FIELD "CreditorCode" ASCENDING \r
7541   INDEX-FIELD "VoucherSeq" ASCENDING \r
7542 \r
7543 ADD INDEX "XAK4Vouchers" ON "Voucher" \r
7544   AREA "Schema Area"\r
7545   INDEX-FIELD "ApproverCode" ASCENDING \r
7546   INDEX-FIELD "VoucherSeq" DESCENDING \r
7547 \r
7548 ADD INDEX "XAK5Vouchers" ON "Voucher" \r
7549   AREA "Schema Area"\r
7550   INDEX-FIELD "VoucherStatus" ASCENDING \r
7551   INDEX-FIELD "VoucherSeq" ASCENDING \r
7552 \r
7553 ADD INDEX "XAK6Vouchers" ON "Voucher" \r
7554   AREA "Schema Area"\r
7555   INDEX-FIELD "EntityType" ASCENDING \r
7556   INDEX-FIELD "EntityCode" ASCENDING \r
7557   INDEX-FIELD "AccountCode" ASCENDING \r
7558 \r
7559 ADD INDEX "XAK7Vouchers" ON "Voucher" \r
7560   AREA "Schema Area"\r
7561   INDEX-FIELD "VoucherStatus" ASCENDING \r
7562   INDEX-FIELD "EntityType" ASCENDING \r
7563   INDEX-FIELD "EntityCode" ASCENDING \r
7564   INDEX-FIELD "AccountCode" ASCENDING \r
7565 \r
7566 ADD INDEX "XAK8Vouchers" ON "Voucher" \r
7567   AREA "Schema Area"\r
7568   INDEX-FIELD "Date" DESCENDING \r
7569 \r
7570 ADD INDEX "XAK9Vouchers" ON "Voucher" \r
7571   AREA "Schema Area"\r
7572   INDEX-FIELD "VoucherStatus" DESCENDING \r
7573   INDEX-FIELD "Date" DESCENDING \r
7574 \r
7575 ADD TABLE "ShareHolder"\r
7576   AREA "Schema Area"\r
7577   DUMP-NAME "sharehol"\r
7578   TABLE-TRIGGER "DELETE" OVERRIDE PROCEDURE "deshrhld.p" CRC "?" \r
7579 \r
7580 ADD FIELD "CompanyCode" OF "ShareHolder" AS integer \r
7581   DESCRIPTION "The code of the company that this person is a shareholder of."\r
7582   FORMAT "99999"\r
7583   INITIAL "0"\r
7584   LABEL "Company"\r
7585   POSITION 2\r
7586   SQL-WIDTH 4\r
7587   ORDER 10\r
7588 \r
7589 ADD FIELD "PersonCode" OF "ShareHolder" AS integer \r
7590   DESCRIPTION "The person that is a shareholder of this company"\r
7591   FORMAT ">>>>>9"\r
7592   INITIAL "0"\r
7593   LABEL "Person"\r
7594   POSITION 3\r
7595   SQL-WIDTH 4\r
7596   ORDER 20\r
7597   MANDATORY\r
7598 \r
7599 ADD FIELD "NoteCode" OF "ShareHolder" AS integer \r
7600   DESCRIPTION "Any notes about the shareholder."\r
7601   FORMAT ">>>>>9"\r
7602   INITIAL "0"\r
7603   POSITION 4\r
7604   SQL-WIDTH 4\r
7605   ORDER 30\r
7606 \r
7607 ADD FIELD "HolderCompany" OF "ShareHolder" AS integer \r
7608   FORMAT ">>999"\r
7609   INITIAL ?\r
7610   LABEL "Holder"\r
7611   POSITION 5\r
7612   SQL-WIDTH 4\r
7613   ORDER 40\r
7614 \r
7615 ADD FIELD "SharesHeld" OF "ShareHolder" AS integer \r
7616   FORMAT ">,>>>,>>>,>>9"\r
7617   INITIAL "0"\r
7618   POSITION 6\r
7619   SQL-WIDTH 4\r
7620   ORDER 50\r
7621 \r
7622 ADD INDEX "XPKShareHolders" ON "ShareHolder" \r
7623   AREA "Schema Area"\r
7624   UNIQUE\r
7625   PRIMARY\r
7626   INDEX-FIELD "CompanyCode" ASCENDING \r
7627   INDEX-FIELD "PersonCode" ASCENDING \r
7628   INDEX-FIELD "HolderCompany" ASCENDING \r
7629 \r
7630 ADD TABLE "InvoiceStatus"\r
7631   AREA "Schema Area"\r
7632   DUMP-NAME "invoices"\r
7633 \r
7634 ADD FIELD "InvoiceStatus" OF "InvoiceStatus" AS character \r
7635   FORMAT "X"\r
7636   INITIAL ""\r
7637   LABEL "Status"\r
7638   POSITION 2\r
7639   SQL-WIDTH 2\r
7640   LENGTH 0\r
7641   ORDER 10\r
7642   MANDATORY\r
7643 \r
7644 ADD FIELD "Description" OF "InvoiceStatus" AS character \r
7645   FORMAT "X(50)"\r
7646   INITIAL ""\r
7647   POSITION 3\r
7648   SQL-WIDTH 100\r
7649   LENGTH 0\r
7650   ORDER 20\r
7651   MANDATORY\r
7652 \r
7653 ADD INDEX "XPKInvoiceStatus" ON "InvoiceStatus" \r
7654   AREA "Schema Area"\r
7655   UNIQUE\r
7656   PRIMARY\r
7657   INDEX-FIELD "InvoiceStatus" ASCENDING \r
7658 \r
7659 ADD TABLE "BuildingType"\r
7660   AREA "Schema Area"\r
7661   DUMP-NAME "bldtype"\r
7662 \r
7663 ADD FIELD "BuildingType" OF "BuildingType" AS character \r
7664   FORMAT "X"\r
7665   INITIAL ""\r
7666   POSITION 2\r
7667   SQL-WIDTH 2\r
7668   LENGTH 0\r
7669   ORDER 10\r
7670   MANDATORY\r
7671 \r
7672 ADD FIELD "Description" OF "BuildingType" AS character \r
7673   FORMAT "X(50)"\r
7674   INITIAL ""\r
7675   POSITION 3\r
7676   SQL-WIDTH 100\r
7677   LENGTH 0\r
7678   ORDER 20\r
7679   MANDATORY\r
7680 \r
7681 ADD INDEX "XPKBuildingType" ON "BuildingType" \r
7682   AREA "Schema Area"\r
7683   UNIQUE\r
7684   PRIMARY\r
7685   INDEX-FIELD "BuildingType" ASCENDING \r
7686 \r
7687 ADD TABLE "RP"\r
7688   AREA "Schema Area"\r
7689   DUMP-NAME "reptparm"\r
7690 \r
7691 ADD FIELD "ReportID" OF "RP" AS character \r
7692   FORMAT "X(8)"\r
7693   INITIAL ""\r
7694   POSITION 2\r
7695   SQL-WIDTH 16\r
7696   LENGTH 0\r
7697   ORDER 10\r
7698   MANDATORY\r
7699 \r
7700 ADD FIELD "UserName" OF "RP" AS character \r
7701   FORMAT "X(20)"\r
7702   INITIAL ""\r
7703   LABEL "User Name"\r
7704   POSITION 3\r
7705   SQL-WIDTH 40\r
7706   COLUMN-LABEL "User"\r
7707   LENGTH 0\r
7708   ORDER 20\r
7709   MANDATORY\r
7710 \r
7711 ADD FIELD "Char1" OF "RP" AS character \r
7712   FORMAT "X(8)"\r
7713   INITIAL ""\r
7714   POSITION 4\r
7715   SQL-WIDTH 16\r
7716   LENGTH 0\r
7717   ORDER 90\r
7718 \r
7719 ADD FIELD "Char2" OF "RP" AS character \r
7720   FORMAT "X(8)"\r
7721   INITIAL ""\r
7722   POSITION 5\r
7723   SQL-WIDTH 16\r
7724   LENGTH 0\r
7725   ORDER 100\r
7726 \r
7727 ADD FIELD "Char3" OF "RP" AS character \r
7728   FORMAT "X(8)"\r
7729   INITIAL ""\r
7730   POSITION 6\r
7731   SQL-WIDTH 16\r
7732   LENGTH 0\r
7733   ORDER 110\r
7734 \r
7735 ADD FIELD "Char4" OF "RP" AS character \r
7736   FORMAT "X(8)"\r
7737   INITIAL ""\r
7738   POSITION 7\r
7739   SQL-WIDTH 16\r
7740   LENGTH 0\r
7741   ORDER 120\r
7742 \r
7743 ADD FIELD "Char5" OF "RP" AS character \r
7744   FORMAT "X(8)"\r
7745   INITIAL ""\r
7746   POSITION 8\r
7747   SQL-WIDTH 16\r
7748   LENGTH 0\r
7749   ORDER 130\r
7750 \r
7751 ADD FIELD "Char6" OF "RP" AS character \r
7752   FORMAT "X(8)"\r
7753   INITIAL ""\r
7754   POSITION 9\r
7755   SQL-WIDTH 16\r
7756   LENGTH 0\r
7757   ORDER 140\r
7758 \r
7759 ADD FIELD "Int1" OF "RP" AS integer \r
7760   FORMAT "->,>>>,>>9"\r
7761   INITIAL "0"\r
7762   POSITION 10\r
7763   SQL-WIDTH 4\r
7764   ORDER 150\r
7765 \r
7766 ADD FIELD "Int2" OF "RP" AS integer \r
7767   FORMAT "->,>>>,>>9"\r
7768   INITIAL "0"\r
7769   POSITION 11\r
7770   SQL-WIDTH 4\r
7771   ORDER 160\r
7772 \r
7773 ADD FIELD "Int3" OF "RP" AS integer \r
7774   FORMAT "->,>>>,>>9"\r
7775   INITIAL "0"\r
7776   POSITION 12\r
7777   SQL-WIDTH 4\r
7778   ORDER 170\r
7779 \r
7780 ADD FIELD "Int4" OF "RP" AS integer \r
7781   FORMAT "->,>>>,>>9"\r
7782   INITIAL "0"\r
7783   POSITION 13\r
7784   SQL-WIDTH 4\r
7785   ORDER 180\r
7786 \r
7787 ADD FIELD "Int5" OF "RP" AS integer \r
7788   FORMAT "->,>>>,>>9"\r
7789   INITIAL "0"\r
7790   POSITION 14\r
7791   SQL-WIDTH 4\r
7792   ORDER 190\r
7793 \r
7794 ADD FIELD "Int6" OF "RP" AS integer \r
7795   FORMAT "->,>>>,>>9"\r
7796   INITIAL "0"\r
7797   POSITION 15\r
7798   SQL-WIDTH 4\r
7799   ORDER 200\r
7800 \r
7801 ADD FIELD "Int7" OF "RP" AS integer \r
7802   FORMAT "->,>>>,>>9"\r
7803   INITIAL "0"\r
7804   POSITION 16\r
7805   SQL-WIDTH 4\r
7806   ORDER 210\r
7807 \r
7808 ADD FIELD "Int8" OF "RP" AS integer \r
7809   FORMAT "->,>>>,>>9"\r
7810   INITIAL "0"\r
7811   POSITION 17\r
7812   SQL-WIDTH 4\r
7813   ORDER 220\r
7814 \r
7815 ADD FIELD "Date1" OF "RP" AS date \r
7816   FORMAT "99/99/9999"\r
7817   INITIAL ?\r
7818   POSITION 18\r
7819   SQL-WIDTH 4\r
7820   ORDER 230\r
7821 \r
7822 ADD FIELD "Date2" OF "RP" AS date \r
7823   FORMAT "99/99/9999"\r
7824   INITIAL ?\r
7825   POSITION 19\r
7826   SQL-WIDTH 4\r
7827   ORDER 240\r
7828 \r
7829 ADD FIELD "Date3" OF "RP" AS date \r
7830   FORMAT "99/99/9999"\r
7831   INITIAL ?\r
7832   POSITION 20\r
7833   SQL-WIDTH 4\r
7834   ORDER 250\r
7835 \r
7836 ADD FIELD "Date4" OF "RP" AS date \r
7837   FORMAT "99/99/9999"\r
7838   INITIAL ?\r
7839   POSITION 21\r
7840   SQL-WIDTH 4\r
7841   ORDER 260\r
7842 \r
7843 ADD FIELD "Dec1" OF "RP" AS decimal \r
7844   FORMAT "->>,>>9.99"\r
7845   INITIAL "0"\r
7846   POSITION 22\r
7847   SQL-WIDTH 17\r
7848   DECIMALS 2\r
7849   ORDER 280\r
7850 \r
7851 ADD FIELD "Dec2" OF "RP" AS decimal \r
7852   FORMAT "->>,>>9.99"\r
7853   INITIAL "0"\r
7854   POSITION 23\r
7855   SQL-WIDTH 17\r
7856   DECIMALS 2\r
7857   ORDER 290\r
7858 \r
7859 ADD FIELD "Dec3" OF "RP" AS decimal \r
7860   FORMAT "->>,>>9.99"\r
7861   INITIAL "0"\r
7862   POSITION 24\r
7863   SQL-WIDTH 17\r
7864   DECIMALS 2\r
7865   ORDER 300\r
7866 \r
7867 ADD FIELD "Dec4" OF "RP" AS decimal \r
7868   FORMAT "->>,>>9.99"\r
7869   INITIAL "0"\r
7870   POSITION 25\r
7871   SQL-WIDTH 17\r
7872   DECIMALS 2\r
7873   ORDER 310\r
7874 \r
7875 ADD FIELD "Dec5" OF "RP" AS decimal \r
7876   FORMAT "->>,>>9.99"\r
7877   INITIAL "0"\r
7878   POSITION 26\r
7879   SQL-WIDTH 17\r
7880   DECIMALS 2\r
7881   ORDER 320\r
7882 \r
7883 ADD FIELD "Dec6" OF "RP" AS decimal \r
7884   FORMAT "->>,>>9.99"\r
7885   INITIAL "0"\r
7886   POSITION 27\r
7887   SQL-WIDTH 17\r
7888   DECIMALS 2\r
7889   ORDER 330\r
7890 \r
7891 ADD FIELD "Log1" OF "RP" AS logical \r
7892   FORMAT "yes/no"\r
7893   INITIAL "no"\r
7894   POSITION 28\r
7895   SQL-WIDTH 1\r
7896   VIEW-AS "VIEW-AS TOGGLE-BOX"\r
7897   ORDER 340\r
7898 \r
7899 ADD FIELD "Log2" OF "RP" AS logical \r
7900   FORMAT "yes/no"\r
7901   INITIAL "no"\r
7902   POSITION 29\r
7903   SQL-WIDTH 1\r
7904   VIEW-AS "VIEW-AS TOGGLE-BOX"\r
7905   ORDER 350\r
7906 \r
7907 ADD FIELD "Log3" OF "RP" AS logical \r
7908   FORMAT "yes/no"\r
7909   INITIAL "no"\r
7910   POSITION 30\r
7911   SQL-WIDTH 1\r
7912   VIEW-AS "VIEW-AS TOGGLE-BOX"\r
7913   ORDER 360\r
7914 \r
7915 ADD FIELD "Log4" OF "RP" AS logical \r
7916   FORMAT "yes/no"\r
7917   INITIAL "no"\r
7918   POSITION 31\r
7919   SQL-WIDTH 1\r
7920   VIEW-AS "VIEW-AS TOGGLE-BOX"\r
7921   ORDER 370\r
7922 \r
7923 ADD FIELD "Log5" OF "RP" AS logical \r
7924   FORMAT "yes/no"\r
7925   INITIAL "no"\r
7926   POSITION 32\r
7927   SQL-WIDTH 1\r
7928   VIEW-AS "VIEW-AS TOGGLE-BOX"\r
7929   ORDER 380\r
7930 \r
7931 ADD FIELD "Log6" OF "RP" AS logical \r
7932   FORMAT "yes/no"\r
7933   INITIAL "no"\r
7934   POSITION 33\r
7935   SQL-WIDTH 1\r
7936   VIEW-AS "VIEW-AS TOGGLE-BOX"\r
7937   ORDER 390\r
7938 \r
7939 ADD FIELD "Log7" OF "RP" AS logical \r
7940   FORMAT "yes/no"\r
7941   INITIAL "no"\r
7942   POSITION 34\r
7943   SQL-WIDTH 1\r
7944   VIEW-AS "VIEW-AS TOGGLE-BOX"\r
7945   ORDER 400\r
7946 \r
7947 ADD FIELD "Log8" OF "RP" AS logical \r
7948   FORMAT "yes/no"\r
7949   INITIAL "no"\r
7950   POSITION 35\r
7951   SQL-WIDTH 1\r
7952   VIEW-AS "VIEW-AS TOGGLE-BOX"\r
7953   ORDER 410\r
7954 \r
7955 ADD FIELD "Log9" OF "RP" AS logical \r
7956   FORMAT "yes/no"\r
7957   INITIAL "no"\r
7958   POSITION 36\r
7959   SQL-WIDTH 1\r
7960   VIEW-AS "VIEW-AS TOGGLE-BOX"\r
7961   ORDER 420\r
7962 \r
7963 ADD INDEX "XAKReportParameters" ON "RP" \r
7964   AREA "Schema Area"\r
7965   UNIQUE\r
7966   PRIMARY\r
7967   INDEX-FIELD "ReportID" ASCENDING \r
7968   INDEX-FIELD "UserName" ASCENDING \r
7969 \r
7970 ADD TABLE "PropertyOutgoing"\r
7971   AREA "Schema Area"\r
7972   DUMP-NAME "propoutg"\r
7973 \r
7974 ADD FIELD "PropertyCode" OF "PropertyOutgoing" AS integer \r
7975   DESCRIPTION "The code used to refer to a property outgoing"\r
7976   FORMAT "99999"\r
7977   INITIAL "0"\r
7978   LABEL "Code"\r
7979   POSITION 2\r
7980   SQL-WIDTH 4\r
7981   ORDER 10\r
7982   MANDATORY\r
7983 \r
7984 ADD FIELD "AccountCode" OF "PropertyOutgoing" AS decimal \r
7985   DESCRIPTION "The account, from the chart of accounts, that this outgoings charge accrues to."\r
7986   FORMAT "9999.99"\r
7987   INITIAL "0"\r
7988   POSITION 3\r
7989   SQL-WIDTH 17\r
7990   DECIMALS 2\r
7991   ORDER 20\r
7992   MANDATORY\r
7993 \r
7994 ADD FIELD "BudgetAmount" OF "PropertyOutgoing" AS decimal \r
7995   DESCRIPTION "If applicable, an annual total of the property's fixed charges for this account."\r
7996   FORMAT "->>,>>>,>>9.99"\r
7997   INITIAL "0"\r
7998   POSITION 4\r
7999   SQL-WIDTH 17\r
8000   DECIMALS 2\r
8001   ORDER 30\r
8002 \r
8003 ADD INDEX "XPKPropertyOutgoing" ON "PropertyOutgoing" \r
8004   AREA "Schema Area"\r
8005   UNIQUE\r
8006   PRIMARY\r
8007   INDEX-FIELD "PropertyCode" ASCENDING \r
8008   INDEX-FIELD "AccountCode" ASCENDING \r
8009 \r
8010 ADD TABLE "UsrGroupMenu"\r
8011   AREA "Schema Area"\r
8012   DUMP-NAME "usrgrpmn"\r
8013   TABLE-TRIGGER "CREATE" OVERRIDE PROCEDURE "crusgmnu.p" CRC "?" \r
8014   TABLE-TRIGGER "DELETE" OVERRIDE PROCEDURE "deusgmnu.p" CRC "?" \r
8015   TABLE-TRIGGER "WRITE" OVERRIDE PROCEDURE "wrusgmnu.p" CRC "?" \r
8016 \r
8017 ADD FIELD "GroupName" OF "UsrGroupMenu" AS character \r
8018   FORMAT "X(20)"\r
8019   INITIAL ""\r
8020   LABEL "Group Name"\r
8021   POSITION 2\r
8022   SQL-WIDTH 40\r
8023   COLUMN-LABEL "Group"\r
8024   LENGTH 0\r
8025   ORDER 10\r
8026   MANDATORY\r
8027 \r
8028 ADD FIELD "Autostart" OF "UsrGroupMenu" AS logical \r
8029   DESCRIPTION "\r
8030 "\r
8031   FORMAT "Y/N"\r
8032   INITIAL "N"\r
8033   POSITION 3\r
8034   SQL-WIDTH 1\r
8035   ORDER 40\r
8036 \r
8037 ADD FIELD "MenuName" OF "UsrGroupMenu" AS character \r
8038   FORMAT "X(30)"\r
8039   INITIAL "User Menu"\r
8040   POSITION 4\r
8041   SQL-WIDTH 60\r
8042   LENGTH 0\r
8043   ORDER 20\r
8044   MANDATORY\r
8045 \r
8046 ADD FIELD "NodeCode" OF "UsrGroupMenu" AS integer \r
8047   FORMAT ">>9"\r
8048   INITIAL "0"\r
8049   POSITION 5\r
8050   SQL-WIDTH 4\r
8051   ORDER 30\r
8052   MANDATORY\r
8053 \r
8054 ADD INDEX "XPKUsrGroupMenu" ON "UsrGroupMenu" \r
8055   AREA "Schema Area"\r
8056   UNIQUE\r
8057   PRIMARY\r
8058   INDEX-FIELD "GroupName" ASCENDING \r
8059   INDEX-FIELD "NodeCode" ASCENDING \r
8060 \r
8061 ADD INDEX "XAK1UsrGroup" ON "UsrGroupMenu" \r
8062   AREA "Schema Area"\r
8063   UNIQUE\r
8064   INDEX-FIELD "GroupName" ASCENDING \r
8065   INDEX-FIELD "MenuName" ASCENDING \r
8066 \r
8067 ADD TABLE "SupplyMeter"\r
8068   AREA "Schema Area"\r
8069   LABEL "Supply Meter"\r
8070   DUMP-NAME "supplyme"\r
8071 \r
8072 ADD FIELD "OldMeterCode" OF "SupplyMeter" AS integer \r
8073   FORMAT ">>9"\r
8074   INITIAL "0"\r
8075   LABEL "Meter"\r
8076   POSITION 2\r
8077   SQL-WIDTH 4\r
8078   ORDER 11\r
8079   MANDATORY\r
8080 \r
8081 ADD FIELD "Description" OF "SupplyMeter" AS character \r
8082   FORMAT "X(50)"\r
8083   INITIAL ""\r
8084   POSITION 3\r
8085   SQL-WIDTH 100\r
8086   LENGTH 0\r
8087   ORDER 20\r
8088   MANDATORY\r
8089 \r
8090 ADD FIELD "PropertyCode" OF "SupplyMeter" AS integer \r
8091   FORMAT "99999"\r
8092   INITIAL ?\r
8093   LABEL "Code"\r
8094   POSITION 4\r
8095   SQL-WIDTH 4\r
8096   COLUMN-LABEL-SA "C"\r
8097   ORDER 30\r
8098 \r
8099 ADD FIELD "EntityType" OF "SupplyMeter" AS character \r
8100   DESCRIPTION "A reference to the entity types table indicating the type of entity against which this meter is charged (Company, Property, Project, Creditor or Tenant)."\r
8101   FORMAT "X"\r
8102   INITIAL ?\r
8103   LABEL "Entity type"\r
8104   POSITION 5\r
8105   SQL-WIDTH 2\r
8106   COLUMN-LABEL "T"\r
8107   COLUMN-LABEL-SA "C"\r
8108   ORDER 40\r
8109 \r
8110 ADD FIELD "EntityCode" OF "SupplyMeter" AS integer \r
8111   FORMAT "99999"\r
8112   INITIAL ?\r
8113   LABEL "Code"\r
8114   POSITION 6\r
8115   SQL-WIDTH 4\r
8116   COLUMN-LABEL-SA "C"\r
8117   ORDER 50\r
8118 \r
8119 ADD FIELD "AccountCode" OF "SupplyMeter" AS decimal \r
8120   DESCRIPTION "The code of the account from within the chart of accounts that this ledger account applies to."\r
8121   FORMAT "9999.99"\r
8122   INITIAL ?\r
8123   LABEL "Account"\r
8124   POSITION 7\r
8125   SQL-WIDTH 17\r
8126   DECIMALS 2\r
8127   ORDER 60\r
8128 \r
8129 ADD FIELD "ElectricityUnitRate" OF "SupplyMeter" AS decimal \r
8130   FORMAT ">>>,>>>9.9999"\r
8131   INITIAL "0.0"\r
8132   LABEL "Electricity Rate"\r
8133   POSITION 8\r
8134   SQL-WIDTH 19\r
8135   DECIMALS 4\r
8136   ORDER 70\r
8137 \r
8138 ADD FIELD "Multiplier" OF "SupplyMeter" AS decimal \r
8139   FORMAT "->>>,>>9.9999"\r
8140   INITIAL "0"\r
8141   POSITION 9\r
8142   SQL-WIDTH 17\r
8143   HELP "The amount to multiply readings by to get units"\r
8144   DECIMALS 2\r
8145   ORDER 80\r
8146 \r
8147 ADD FIELD "Level" OF "SupplyMeter" AS integer \r
8148   FORMAT "->>9"\r
8149   INITIAL "0"\r
8150   POSITION 10\r
8151   SQL-WIDTH 4\r
8152   HELP "The level within the building which the meter is located on"\r
8153   ORDER 90\r
8154 \r
8155 ADD FIELD "SupplyType" OF "SupplyMeter" AS character \r
8156   FORMAT "X(4)"\r
8157   INITIAL ""\r
8158   POSITION 11\r
8159   SQL-WIDTH 8\r
8160   HELP "The type of supply metered"\r
8161   ORDER 100\r
8162 \r
8163 ADD FIELD "MeterCode" OF "SupplyMeter" AS character \r
8164   FORMAT "X(8)"\r
8165   INITIAL ""\r
8166   POSITION 12\r
8167   SQL-WIDTH 16\r
8168   ORDER 10\r
8169 \r
8170 ADD INDEX "XPKSupplyMeter" ON "SupplyMeter" \r
8171   AREA "Schema Area"\r
8172   UNIQUE\r
8173   PRIMARY\r
8174   INDEX-FIELD "PropertyCode" ASCENDING \r
8175   INDEX-FIELD "MeterCode" ASCENDING \r
8176 \r
8177 ADD TABLE "ConsolidationList"\r
8178   AREA "Schema Area"\r
8179   DUMP-NAME "con-list"\r
8180 \r
8181 ADD FIELD "Name" OF "ConsolidationList" AS character \r
8182   FORMAT "X(4)"\r
8183   INITIAL ""\r
8184   LABEL "List name"\r
8185   POSITION 2\r
8186   SQL-WIDTH 8\r
8187   LENGTH 0\r
8188   ORDER 10\r
8189 \r
8190 ADD FIELD "Description" OF "ConsolidationList" AS character \r
8191   FORMAT "X(50)"\r
8192   INITIAL ""\r
8193   LABEL "Description"\r
8194   POSITION 3\r
8195   SQL-WIDTH 100\r
8196   LENGTH 0\r
8197   ORDER 20\r
8198 \r
8199 ADD FIELD "CompanyList" OF "ConsolidationList" AS character \r
8200   FORMAT "X(256)"\r
8201   INITIAL ""\r
8202   LABEL "List"\r
8203   POSITION 4\r
8204   SQL-WIDTH 512\r
8205   HELP "Comma separated list of company codes"\r
8206   LENGTH 0\r
8207   ORDER 30\r
8208 \r
8209 ADD INDEX "XPKConsolidationList" ON "ConsolidationList" \r
8210   AREA "Schema Area"\r
8211   UNIQUE\r
8212   PRIMARY\r
8213   INDEX-FIELD "Name" ASCENDING \r
8214 \r
8215 ADD TABLE "ClosingGroup"\r
8216   AREA "Schema Area"\r
8217   DUMP-NAME "closingg"\r
8218 \r
8219 ADD FIELD "EntityType" OF "ClosingGroup" AS character \r
8220   DESCRIPTION "A reference to the entity types table indicating the type of entity against which this transaction applies (Company, Property, Project, Creditor or Tenant)."\r
8221   FORMAT "X"\r
8222   INITIAL ?\r
8223   LABEL "Entity type"\r
8224   POSITION 2\r
8225   SQL-WIDTH 2\r
8226   COLUMN-LABEL "T"\r
8227   COLUMN-LABEL-SA "C"\r
8228   LENGTH 0\r
8229   ORDER 10\r
8230   MANDATORY\r
8231 \r
8232 ADD FIELD "EntityCode" OF "ClosingGroup" AS integer \r
8233   FORMAT "99999"\r
8234   INITIAL ?\r
8235   LABEL "Code"\r
8236   POSITION 3\r
8237   SQL-WIDTH 4\r
8238   COLUMN-LABEL-SA "C"\r
8239   ORDER 20\r
8240   MANDATORY\r
8241 \r
8242 ADD FIELD "AccountCode" OF "ClosingGroup" AS decimal \r
8243   DESCRIPTION "The code of the account."\r
8244   FORMAT "9999.99"\r
8245   INITIAL ?\r
8246   LABEL "Account"\r
8247   POSITION 4\r
8248   SQL-WIDTH 17\r
8249   DECIMALS 2\r
8250   ORDER 30\r
8251   MANDATORY\r
8252 \r
8253 ADD FIELD "ClosingGroup" OF "ClosingGroup" AS integer \r
8254   DESCRIPTION "A number, if applicable, to identify this 'group' of transactions as 'closed'.  The sum of such a group of transactions will be zero."\r
8255   FORMAT ">>>,>>>,>>9"\r
8256   INITIAL ?\r
8257   POSITION 5\r
8258   SQL-WIDTH 4\r
8259   HELP "System maintained."\r
8260   ORDER 40\r
8261 \r
8262 ADD FIELD "DateClosed" OF "ClosingGroup" AS date \r
8263   DESCRIPTION "The date on which the group of transactions to which this record applies were closed."\r
8264   FORMAT "99/99/9999"\r
8265   INITIAL ?\r
8266   POSITION 6\r
8267   SQL-WIDTH 4\r
8268   ORDER 50\r
8269 \r
8270 ADD FIELD "ClosedStatus" OF "ClosingGroup" AS character \r
8271   FORMAT "X"\r
8272   INITIAL "F"\r
8273   LABEL "Status"\r
8274   POSITION 7\r
8275   SQL-WIDTH 2\r
8276   COLUMN-LABEL "S"\r
8277   HELP "F=Full, P=Partial"\r
8278   ORDER 60\r
8279 \r
8280 ADD FIELD "Description" OF "ClosingGroup" AS character \r
8281   DESCRIPTION "The description of the outstanding amount for partially closed groups"\r
8282   FORMAT "X(50)"\r
8283   INITIAL ""\r
8284   LABEL "Description"\r
8285   POSITION 8\r
8286   SQL-WIDTH 100\r
8287   ORDER 70\r
8288 \r
8289 ADD INDEX "XPKClosingGroup" ON "ClosingGroup" \r
8290   AREA "Schema Area"\r
8291   UNIQUE\r
8292   PRIMARY\r
8293   INDEX-FIELD "EntityType" ASCENDING \r
8294   INDEX-FIELD "EntityCode" ASCENDING \r
8295   INDEX-FIELD "AccountCode" ASCENDING \r
8296   INDEX-FIELD "ClosingGroup" ASCENDING \r
8297 \r
8298 ADD INDEX "XAK1ClosingGroup" ON "ClosingGroup" \r
8299   AREA "Schema Area"\r
8300   INDEX-FIELD "EntityType" ASCENDING \r
8301   INDEX-FIELD "EntityCode" ASCENDING \r
8302   INDEX-FIELD "AccountCode" ASCENDING \r
8303   INDEX-FIELD "ClosedStatus" ASCENDING \r
8304 \r
8305 ADD TABLE "SubLease"\r
8306   AREA "Schema Area"\r
8307   DUMP-NAME "sublease"\r
8308 \r
8309 ADD FIELD "TenancyLeaseCode" OF "SubLease" AS integer \r
8310   DESCRIPTION "A code used to refer to this tenancy lease"\r
8311   FORMAT "99999"\r
8312   INITIAL "0"\r
8313   LABEL "Code"\r
8314   POSITION 2\r
8315   SQL-WIDTH 4\r
8316   ORDER 10\r
8317 \r
8318 ADD FIELD "SubLeaseCode" OF "SubLease" AS integer \r
8319   FORMAT ">>>>9"\r
8320   INITIAL "0"\r
8321   POSITION 3\r
8322   SQL-WIDTH 4\r
8323   ORDER 20\r
8324 \r
8325 ADD FIELD "LeaseStartDate" OF "SubLease" AS date \r
8326   DESCRIPTION "The date that the lease commenced (which could be in the future)."\r
8327   FORMAT "99/99/9999"\r
8328   INITIAL ?\r
8329   LABEL "Lease start"\r
8330   POSITION 4\r
8331   SQL-WIDTH 4\r
8332   ORDER 50\r
8333 \r
8334 ADD FIELD "LeaseEndDate" OF "SubLease" AS date \r
8335   DESCRIPTION "The date on which the lease ends."\r
8336   FORMAT "99/99/9999"\r
8337   INITIAL ?\r
8338   LABEL "Lease end"\r
8339   POSITION 5\r
8340   SQL-WIDTH 4\r
8341   ORDER 60\r
8342 \r
8343 ADD FIELD "PersonCode" OF "SubLease" AS integer \r
8344   DESCRIPTION "A code used to refer to this person."\r
8345   FORMAT "99999"\r
8346   INITIAL ?\r
8347   LABEL "Person code"\r
8348   POSITION 6\r
8349   SQL-WIDTH 4\r
8350   COLUMN-LABEL "Person"\r
8351   ORDER 70\r
8352   MANDATORY\r
8353 \r
8354 ADD FIELD "Details" OF "SubLease" AS character \r
8355   FORMAT "X(1024)"\r
8356   INITIAL ""\r
8357   POSITION 7\r
8358   SQL-WIDTH 2048\r
8359   VIEW-AS "VIEW-AS EDITOR INNER-CHARS 51 INNER-LINES 4 SCROLLBAR-VERTICAL"\r
8360   LENGTH 0\r
8361   ORDER 80\r
8362 \r
8363 ADD FIELD "Name" OF "SubLease" AS character \r
8364   FORMAT "X(50)"\r
8365   INITIAL ""\r
8366   POSITION 8\r
8367   SQL-WIDTH 100\r
8368   LENGTH 0\r
8369   ORDER 30\r
8370 \r
8371 ADD FIELD "AnnualRental" OF "SubLease" AS decimal \r
8372   FORMAT "->>,>>>,>>9.99"\r
8373   INITIAL "0"\r
8374   LABEL "Annual rental"\r
8375   POSITION 9\r
8376   SQL-WIDTH 17\r
8377   DECIMALS 2\r
8378   ORDER 40\r
8379 \r
8380 ADD FIELD "Location" OF "SubLease" AS character \r
8381   FORMAT "X(50)"\r
8382   INITIAL ""\r
8383   POSITION 10\r
8384   SQL-WIDTH 100\r
8385   HELP "Location description"\r
8386   ORDER 90\r
8387 \r
8388 ADD FIELD "AreaSize" OF "SubLease" AS decimal \r
8389   FORMAT "->,>>>,>>9.99"\r
8390   INITIAL "0"\r
8391   LABEL "Area"\r
8392   POSITION 11\r
8393   SQL-WIDTH 17\r
8394   HELP "The area (Sq.M) of the space subleased"\r
8395   DECIMALS 2\r
8396   ORDER 100\r
8397 \r
8398 ADD FIELD "NoteCode" OF "SubLease" AS integer \r
8399   DESCRIPTION "A unique code identifying this note."\r
8400   FORMAT ">>>>>9"\r
8401   INITIAL ?\r
8402   POSITION 12\r
8403   SQL-WIDTH 4\r
8404   ORDER 110\r
8405 \r
8406 ADD INDEX "XPKSubLeases" ON "SubLease" \r
8407   AREA "Schema Area"\r
8408   UNIQUE\r
8409   PRIMARY\r
8410   INDEX-FIELD "TenancyLeaseCode" ASCENDING \r
8411   INDEX-FIELD "SubLeaseCode" ASCENDING \r
8412 \r
8413 ADD TABLE "Region"\r
8414   AREA "Schema Area"\r
8415   DUMP-NAME "region"\r
8416 \r
8417 ADD FIELD "Region" OF "Region" AS character \r
8418   FORMAT "X(4)"\r
8419   INITIAL ""\r
8420   POSITION 2\r
8421   SQL-WIDTH 8\r
8422   LENGTH 0\r
8423   ORDER 10\r
8424 \r
8425 ADD FIELD "Name" OF "Region" AS character \r
8426   FORMAT "X(50)"\r
8427   INITIAL ""\r
8428   POSITION 3\r
8429   SQL-WIDTH 100\r
8430   LENGTH 0\r
8431   ORDER 20\r
8432 \r
8433 ADD INDEX "XPKRegion" ON "Region" \r
8434   AREA "Schema Area"\r
8435   UNIQUE\r
8436   PRIMARY\r
8437   INDEX-FIELD "Region" ASCENDING ABBREVIATED \r
8438 \r
8439 ADD TABLE "VoucherLine"\r
8440   AREA "Schema Area"\r
8441   DUMP-NAME "vchrline"\r
8442   TABLE-TRIGGER "DELETE" OVERRIDE PROCEDURE "devchlne.p" CRC "?" \r
8443   TABLE-TRIGGER "WRITE" OVERRIDE PROCEDURE "wrvchlne.p" CRC "?" \r
8444 \r
8445 ADD FIELD "EntityType" OF "VoucherLine" AS character \r
8446   DESCRIPTION "A reference to the entity types table indicating the type of entity against which this transaction applies (Company, Property, Project, Creditor or Tenant)."\r
8447   FORMAT "X"\r
8448   INITIAL ?\r
8449   LABEL "Entity type"\r
8450   POSITION 2\r
8451   SQL-WIDTH 2\r
8452   COLUMN-LABEL "T"\r
8453   COLUMN-LABEL-SA "C"\r
8454   LENGTH 0\r
8455   ORDER 20\r
8456   MANDATORY\r
8457 \r
8458 ADD FIELD "EntityCode" OF "VoucherLine" AS integer \r
8459   FORMAT "99999"\r
8460   INITIAL ?\r
8461   LABEL "Code"\r
8462   POSITION 3\r
8463   SQL-WIDTH 4\r
8464   COLUMN-LABEL-SA "C"\r
8465   ORDER 30\r
8466   MANDATORY\r
8467 \r
8468 ADD FIELD "AccountCode" OF "VoucherLine" AS decimal \r
8469   DESCRIPTION "The code of the account from within the chart of accounts that this ledger account applies to."\r
8470   FORMAT "9999.99"\r
8471   INITIAL ?\r
8472   LABEL "Account"\r
8473   POSITION 4\r
8474   SQL-WIDTH 17\r
8475   DECIMALS 2\r
8476   ORDER 40\r
8477   MANDATORY\r
8478 \r
8479 ADD FIELD "Description" OF "VoucherLine" AS character \r
8480   DESCRIPTION "A description of this transaction, overriding the description of the document."\r
8481   FORMAT "X(50)"\r
8482   INITIAL ""\r
8483   POSITION 5\r
8484   SQL-WIDTH 100\r
8485   HELP "A narrative which overrides the document narrative."\r
8486   LENGTH 0\r
8487   ORDER 50\r
8488 \r
8489 ADD FIELD "Amount" OF "VoucherLine" AS decimal \r
8490   FORMAT "->>>,>>>,>>9.99"\r
8491   INITIAL "0"\r
8492   POSITION 6\r
8493   SQL-WIDTH 17\r
8494   COLUMN-LABEL-SA "C"\r
8495   DECIMALS 2\r
8496   ORDER 60\r
8497 \r
8498 ADD FIELD "VoucherSeq" OF "VoucherLine" AS integer \r
8499   DESCRIPTION "Unique sequence number for this voucher."\r
8500   FORMAT "99999999"\r
8501   INITIAL "0"\r
8502   POSITION 7\r
8503   SQL-WIDTH 4\r
8504   ORDER 10\r
8505 \r
8506 ADD FIELD "LineSeq" OF "VoucherLine" AS integer \r
8507   FORMAT "->,>>>,>>9"\r
8508   INITIAL "0"\r
8509   LABEL "Line#"\r
8510   POSITION 8\r
8511   SQL-WIDTH 4\r
8512   ORDER 70\r
8513 \r
8514 ADD FIELD "TaxAmount" OF "VoucherLine" AS decimal \r
8515   DESCRIPTION "Tax value for this line of allocation for the voucher"\r
8516   FORMAT "->>,>>>,>>9.99"\r
8517   INITIAL "0"\r
8518   POSITION 9\r
8519   SQL-WIDTH 17\r
8520   DECIMALS 2\r
8521   ORDER 80\r
8522 \r
8523 ADD INDEX "XPKVoucherLine" ON "VoucherLine" \r
8524   AREA "Schema Area"\r
8525   UNIQUE\r
8526   PRIMARY\r
8527   INDEX-FIELD "VoucherSeq" ASCENDING \r
8528   INDEX-FIELD "LineSeq" ASCENDING \r
8529 \r
8530 ADD INDEX "XAK1VoucherLines" ON "VoucherLine" \r
8531   AREA "Schema Area"\r
8532   INDEX-FIELD "VoucherSeq" ASCENDING \r
8533   INDEX-FIELD "EntityCode" ASCENDING \r
8534   INDEX-FIELD "AccountCode" ASCENDING \r
8535 \r
8536 ADD TABLE "JournalDescription"\r
8537   AREA "Schema Area"\r
8538   DUMP-NAME "journald"\r
8539   TABLE-TRIGGER "CREATE" OVERRIDE PROCEDURE "crjnldsc.p" CRC "?" \r
8540 \r
8541 ADD FIELD "JournalCode" OF "JournalDescription" AS integer \r
8542   FORMAT ">>>>9"\r
8543   INITIAL "0"\r
8544   LABEL "Code"\r
8545   POSITION 2\r
8546   SQL-WIDTH 4\r
8547   ORDER 10\r
8548 \r
8549 ADD FIELD "BatchCode" OF "JournalDescription" AS integer \r
8550   DESCRIPTION "The batch which this journal applies to."\r
8551   FORMAT ">>>>>9"\r
8552   INITIAL "0"\r
8553   LABEL "Batch No."\r
8554   POSITION 3\r
8555   SQL-WIDTH 4\r
8556   COLUMN-LABEL "Batch"\r
8557   ORDER 20\r
8558 \r
8559 ADD FIELD "DocumentCode" OF "JournalDescription" AS integer \r
8560   DESCRIPTION "The document within the batch which this journal is a part of."\r
8561   FORMAT ">>>>>9"\r
8562   INITIAL "0"\r
8563   LABEL "Document No."\r
8564   POSITION 4\r
8565   SQL-WIDTH 4\r
8566   COLUMN-LABEL "Doc #"\r
8567   ORDER 30\r
8568 \r
8569 ADD FIELD "Description" OF "JournalDescription" AS character \r
8570   FORMAT "X(256)"\r
8571   INITIAL ""\r
8572   POSITION 5\r
8573   SQL-WIDTH 512\r
8574   VIEW-AS "VIEW-AS EDITOR\r
8575   SIZE-CHARS 80 by 5\r
8576   SCROLLBAR-HORIZONTAL SCROLLBAR-VERTICAL\r
8577 "\r
8578   LENGTH 0\r
8579   ORDER 40\r
8580 \r
8581 ADD INDEX "XPKJournalDescription" ON "JournalDescription" \r
8582   AREA "Schema Area"\r
8583   UNIQUE\r
8584   PRIMARY\r
8585   INDEX-FIELD "JournalCode" ASCENDING \r
8586 \r
8587 ADD INDEX "XAK1JournalDescription" ON "JournalDescription" \r
8588   AREA "Schema Area"\r
8589   UNIQUE\r
8590   INDEX-FIELD "BatchCode" ASCENDING \r
8591   INDEX-FIELD "DocumentCode" ASCENDING \r
8592 \r
8593 ADD TABLE "PeriodicDetail"\r
8594   AREA "Schema Area"\r
8595   DUMP-NAME "periodic"\r
8596 \r
8597 ADD FIELD "ReportID" OF "PeriodicDetail" AS character \r
8598   DESCRIPTION "Identifies the report from which this piece of detail belongs."\r
8599   FORMAT "X(4)"\r
8600   INITIAL ""\r
8601   POSITION 2\r
8602   SQL-WIDTH 8\r
8603   LENGTH 0\r
8604   ORDER 10\r
8605 \r
8606 ADD FIELD "EntityID" OF "PeriodicDetail" AS character \r
8607   DESCRIPTION "Along with the ReportID, this field identifies the entity that this detail refers to."\r
8608   FORMAT "X(8)"\r
8609   INITIAL ""\r
8610   POSITION 3\r
8611   SQL-WIDTH 16\r
8612   LENGTH 0\r
8613   ORDER 20\r
8614 \r
8615 ADD FIELD "DetailType" OF "PeriodicDetail" AS character \r
8616   DESCRIPTION "Identifies the type of detail - ""D"" for data, ""C"" for Comment"\r
8617   FORMAT "X"\r
8618   INITIAL ""\r
8619   POSITION 4\r
8620   SQL-WIDTH 2\r
8621   LENGTH 0\r
8622   ORDER 30\r
8623 \r
8624 ADD FIELD "Date" OF "PeriodicDetail" AS date \r
8625   DESCRIPTION "The date that the detail was generated/modified."\r
8626   FORMAT "99/99/9999"\r
8627   INITIAL ?\r
8628   POSITION 5\r
8629   SQL-WIDTH 4\r
8630   ORDER 40\r
8631 \r
8632 ADD FIELD "Data" OF "PeriodicDetail" AS character \r
8633   DESCRIPTION "The actual detail"\r
8634   FORMAT "X(256)"\r
8635   INITIAL ""\r
8636   POSITION 6\r
8637   SQL-WIDTH 512\r
8638   LENGTH 0\r
8639   ORDER 50\r
8640 \r
8641 ADD FIELD "BreakValue1" OF "PeriodicDetail" AS character \r
8642   DESCRIPTION "This is used in the report output process to break items."\r
8643   FORMAT "X(50)"\r
8644   INITIAL ""\r
8645   POSITION 7\r
8646   SQL-WIDTH 100\r
8647   LENGTH 0\r
8648   ORDER 60\r
8649 \r
8650 ADD FIELD "BreakValue2" OF "PeriodicDetail" AS character \r
8651   DESCRIPTION "This is used in the report output process to break items."\r
8652   FORMAT "X(50)"\r
8653   INITIAL ""\r
8654   POSITION 8\r
8655   SQL-WIDTH 100\r
8656   LENGTH 0\r
8657   ORDER 70\r
8658 \r
8659 ADD FIELD "BreakValue3" OF "PeriodicDetail" AS character \r
8660   DESCRIPTION "This is used in the report output process to break items."\r
8661   FORMAT "X(50)"\r
8662   INITIAL ""\r
8663   POSITION 9\r
8664   SQL-WIDTH 100\r
8665   LENGTH 0\r
8666   ORDER 80\r
8667 \r
8668 ADD INDEX "XPKPeriodicDetail" ON "PeriodicDetail" \r
8669   AREA "Schema Area"\r
8670   PRIMARY\r
8671   INDEX-FIELD "ReportID" ASCENDING \r
8672   INDEX-FIELD "Date" ASCENDING \r
8673   INDEX-FIELD "EntityID" ASCENDING \r
8674   INDEX-FIELD "DetailType" ASCENDING \r
8675 \r
8676 ADD INDEX "XAK1PeriodicDetail" ON "PeriodicDetail" \r
8677   AREA "Schema Area"\r
8678   INDEX-FIELD "ReportID" ASCENDING \r
8679   INDEX-FIELD "Date" ASCENDING \r
8680   INDEX-FIELD "DetailType" ASCENDING \r
8681   INDEX-FIELD "BreakValue1" ASCENDING \r
8682 \r
8683 ADD INDEX "XAK2PeriodicDetail" ON "PeriodicDetail" \r
8684   AREA "Schema Area"\r
8685   INDEX-FIELD "ReportID" ASCENDING \r
8686   INDEX-FIELD "Date" ASCENDING \r
8687   INDEX-FIELD "DetailType" ASCENDING \r
8688   INDEX-FIELD "BreakValue2" ASCENDING \r
8689 \r
8690 ADD INDEX "XAK3PeriodicDetail" ON "PeriodicDetail" \r
8691   AREA "Schema Area"\r
8692   INDEX-FIELD "ReportID" ASCENDING \r
8693   INDEX-FIELD "Date" ASCENDING \r
8694   INDEX-FIELD "DetailType" ASCENDING \r
8695   INDEX-FIELD "BreakValue3" ASCENDING \r
8696 \r
8697 ADD INDEX "XAK4PeriodicDetail" ON "PeriodicDetail" \r
8698   AREA "Schema Area"\r
8699   INDEX-FIELD "ReportID" ASCENDING \r
8700   INDEX-FIELD "EntityID" ASCENDING \r
8701   INDEX-FIELD "DetailType" ASCENDING \r
8702   INDEX-FIELD "Date" ASCENDING \r
8703 \r
8704 ADD TABLE "AuditTrail"\r
8705   AREA "Schema Area"\r
8706   DUMP-NAME "audit"\r
8707   TABLE-TRIGGER "CREATE" OVERRIDE PROCEDURE "craudit.p" CRC "?" \r
8708 \r
8709 ADD FIELD "AuditRecordId" OF "AuditTrail" AS integer \r
8710   FORMAT "->,>>>,>>9"\r
8711   INITIAL "0"\r
8712   POSITION 2\r
8713   SQL-WIDTH 4\r
8714   ORDER 90\r
8715 \r
8716 ADD FIELD "AuditOf" OF "AuditTrail" AS character \r
8717   FORMAT "X(20)"\r
8718   INITIAL ""\r
8719   POSITION 3\r
8720   SQL-WIDTH 40\r
8721   LENGTH 0\r
8722   ORDER 100\r
8723 \r
8724 ADD FIELD "AuditEvent" OF "AuditTrail" AS character \r
8725   FORMAT "X(8)"\r
8726   INITIAL ""\r
8727   POSITION 4\r
8728   SQL-WIDTH 16\r
8729   LENGTH 0\r
8730   ORDER 110\r
8731 \r
8732 ADD FIELD "OldValue" OF "AuditTrail" AS character \r
8733   FORMAT "X(255)"\r
8734   INITIAL ""\r
8735   POSITION 5\r
8736   SQL-WIDTH 510\r
8737   LENGTH 0\r
8738   ORDER 120\r
8739 \r
8740 ADD FIELD "NewValue" OF "AuditTrail" AS character \r
8741   FORMAT "X(255)"\r
8742   INITIAL ""\r
8743   POSITION 6\r
8744   SQL-WIDTH 510\r
8745   LENGTH 0\r
8746   ORDER 130\r
8747 \r
8748 ADD INDEX "XPKAudittrail" ON "AuditTrail" \r
8749   AREA "Schema Area"\r
8750   UNIQUE\r
8751   PRIMARY\r
8752   INDEX-FIELD "AuditRecordId" ASCENDING \r
8753 \r
8754 ADD TABLE "OfficeSettings"\r
8755   AREA "Schema Area"\r
8756   DUMP-NAME "officset"\r
8757 \r
8758 ADD FIELD "OfficeCode" OF "OfficeSettings" AS character \r
8759   FORMAT "X(4)"\r
8760   INITIAL ""\r
8761   LABEL "Office"\r
8762   POSITION 2\r
8763   SQL-WIDTH 8\r
8764   LENGTH 0\r
8765   ORDER 10\r
8766 \r
8767 ADD FIELD "SetName" OF "OfficeSettings" AS character \r
8768   FORMAT "X(20)"\r
8769   INITIAL ""\r
8770   POSITION 3\r
8771   SQL-WIDTH 40\r
8772   LENGTH 0\r
8773   ORDER 20\r
8774 \r
8775 ADD FIELD "SetValue" OF "OfficeSettings" AS character \r
8776   FORMAT "X(100)"\r
8777   INITIAL ""\r
8778   POSITION 4\r
8779   SQL-WIDTH 200\r
8780   LENGTH 0\r
8781   ORDER 30\r
8782 \r
8783 ADD INDEX "XPKOfficeSettings" ON "OfficeSettings" \r
8784   AREA "Schema Area"\r
8785   UNIQUE\r
8786   PRIMARY\r
8787   INDEX-FIELD "OfficeCode" ASCENDING \r
8788   INDEX-FIELD "SetName" ASCENDING \r
8789 \r
8790 ADD TABLE "RentSpaceHistory"\r
8791   AREA "Schema Area"\r
8792   DUMP-NAME "rspchist"\r
8793 \r
8794 ADD FIELD "PropertyCode" OF "RentSpaceHistory" AS integer \r
8795   DESCRIPTION "The code used to refer to a property"\r
8796   FORMAT "99999"\r
8797   INITIAL "0"\r
8798   LABEL "Code"\r
8799   POSITION 2\r
8800   SQL-WIDTH 4\r
8801   ORDER 10\r
8802 \r
8803 ADD FIELD "RentalSpaceCode" OF "RentSpaceHistory" AS integer \r
8804   DESCRIPTION "A sequence number which identifies this rental space within the property."\r
8805   FORMAT ">>>>9"\r
8806   INITIAL "0"\r
8807   LABEL "Rental space code"\r
8808   POSITION 3\r
8809   SQL-WIDTH 4\r
8810   COLUMN-LABEL "Space"\r
8811   ORDER 20\r
8812   MANDATORY\r
8813 \r
8814 ADD FIELD "Description" OF "RentSpaceHistory" AS character \r
8815   DESCRIPTION "A brief description of the space"\r
8816   FORMAT "X(100)"\r
8817   INITIAL ""\r
8818   POSITION 4\r
8819   SQL-WIDTH 200\r
8820   LENGTH 0\r
8821   ORDER 40\r
8822 \r
8823 ADD FIELD "AreaStatus" OF "RentSpaceHistory" AS character \r
8824   DESCRIPTION "The Status of the rental space, eg. Leased, Vacant"\r
8825   FORMAT "X(4)"\r
8826   INITIAL ""\r
8827   LABEL "Status"\r
8828   POSITION 5\r
8829   SQL-WIDTH 8\r
8830   LENGTH 0\r
8831   ORDER 50\r
8832   MANDATORY\r
8833 \r
8834 ADD FIELD "AreaSize" OF "RentSpaceHistory" AS decimal \r
8835   DESCRIPTION "The area of the rental space in square metres."\r
8836   FORMAT "->>,>>9.99"\r
8837   INITIAL "0"\r
8838   LABEL "Sq M."\r
8839   POSITION 6\r
8840   SQL-WIDTH 21\r
8841   COLUMN-LABEL-SA "C"\r
8842   DECIMALS 6\r
8843   ORDER 60\r
8844 \r
8845 ADD FIELD "ContractedRental" OF "RentSpaceHistory" AS decimal \r
8846   DESCRIPTION "The annual rental which tenants have contracted to pay for this space."\r
8847   FORMAT "->,>>>,>>9.99"\r
8848   INITIAL "0"\r
8849   LABEL "Contract Rental"\r
8850   POSITION 7\r
8851   SQL-WIDTH 17\r
8852   DECIMALS 2\r
8853   ORDER 70\r
8854 \r
8855 ADD FIELD "ChargedRental" OF "RentSpaceHistory" AS decimal \r
8856   FORMAT "->,>>>,>>9.99"\r
8857   INITIAL "0"\r
8858   LABEL "Charged Rent"\r
8859   POSITION 8\r
8860   SQL-WIDTH 17\r
8861   DECIMALS 2\r
8862   ORDER 80\r
8863 \r
8864 ADD FIELD "MarketRental" OF "RentSpaceHistory" AS decimal \r
8865   DESCRIPTION "The estimated market rental which the space is worth at current market rates."\r
8866   FORMAT "->,>>>,>>9.99"\r
8867   INITIAL "0"\r
8868   LABEL "Market"\r
8869   POSITION 9\r
8870   SQL-WIDTH 17\r
8871   DECIMALS 2\r
8872   ORDER 90\r
8873 \r
8874 ADD FIELD "MarketRentalDate" OF "RentSpaceHistory" AS date \r
8875   DESCRIPTION "The date at which the market rental was last estimated."\r
8876   FORMAT "99/99/9999"\r
8877   INITIAL ?\r
8878   LABEL "Market rental date"\r
8879   POSITION 10\r
8880   SQL-WIDTH 4\r
8881   COLUMN-LABEL "Mkt date"\r
8882   ORDER 100\r
8883 \r
8884 ADD FIELD "TenancyLeaseCode" OF "RentSpaceHistory" AS integer \r
8885   DESCRIPTION "The code referring to the tenancy lease record applying to this rental space."\r
8886   FORMAT ">>>>>9"\r
8887   INITIAL "0"\r
8888   LABEL "Lease"\r
8889   POSITION 11\r
8890   SQL-WIDTH 4\r
8891   ORDER 110\r
8892 \r
8893 ADD FIELD "DateChanged" OF "RentSpaceHistory" AS date \r
8894   FORMAT "99/99/9999"\r
8895   INITIAL ?\r
8896   POSITION 12\r
8897   SQL-WIDTH 4\r
8898   ORDER 30\r
8899 \r
8900 ADD FIELD "VacationDate" OF "RentSpaceHistory" AS date \r
8901   DESCRIPTION "The date that this rental space was vacated. This only applies \r
8902 if AreaStatus = ""V""."\r
8903   FORMAT "99/99/9999"\r
8904   INITIAL ?\r
8905   LABEL "Date Vacated"\r
8906   POSITION 13\r
8907   SQL-WIDTH 4\r
8908   COLUMN-LABEL "Vacated"\r
8909   ORDER 120\r
8910 \r
8911 ADD FIELD "VacantCosts" OF "RentSpaceHistory" AS decimal \r
8912   FORMAT "->,>>>,>>9.99"\r
8913   INITIAL "0"\r
8914   POSITION 14\r
8915   SQL-WIDTH 17\r
8916   DECIMALS 2\r
8917   ORDER 130\r
8918 \r
8919 ADD FIELD "OutgoingsPercentage" OF "RentSpaceHistory" AS decimal \r
8920   FORMAT "->>9.99"\r
8921   INITIAL "0"\r
8922   LABEL "O/G Percent"\r
8923   POSITION 15\r
8924   SQL-WIDTH 17\r
8925   DECIMALS 2\r
8926   ORDER 140\r
8927 \r
8928 ADD INDEX "XPKRentalSpaceHistory" ON "RentSpaceHistory" \r
8929   AREA "Schema Area"\r
8930   UNIQUE\r
8931   PRIMARY\r
8932   INDEX-FIELD "PropertyCode" ASCENDING \r
8933   INDEX-FIELD "RentalSpaceCode" ASCENDING \r
8934   INDEX-FIELD "DateChanged" DESCENDING \r
8935 \r
8936 ADD TABLE "UsrGroupRights"\r
8937   AREA "Schema Area"\r
8938   DUMP-NAME "ugrights"\r
8939 \r
8940 ADD FIELD "GroupName" OF "UsrGroupRights" AS character \r
8941   FORMAT "X(20)"\r
8942   INITIAL ""\r
8943   LABEL "Group Name"\r
8944   POSITION 2\r
8945   SQL-WIDTH 40\r
8946   COLUMN-LABEL "Group"\r
8947   LENGTH 0\r
8948   ORDER 10\r
8949   MANDATORY\r
8950 \r
8951 ADD FIELD "ApplicationCode" OF "UsrGroupRights" AS character \r
8952   FORMAT "X(20)"\r
8953   INITIAL ""\r
8954   POSITION 3\r
8955   SQL-WIDTH 40\r
8956   LENGTH 0\r
8957   ORDER 20\r
8958 \r
8959 ADD FIELD "Action" OF "UsrGroupRights" AS character \r
8960   FORMAT "X(20)"\r
8961   INITIAL ""\r
8962   POSITION 4\r
8963   SQL-WIDTH 40\r
8964   LENGTH 0\r
8965   ORDER 30\r
8966 \r
8967 ADD FIELD "Rights" OF "UsrGroupRights" AS logical \r
8968   FORMAT "yes/no"\r
8969   INITIAL ?\r
8970   POSITION 5\r
8971   SQL-WIDTH 1\r
8972   ORDER 40\r
8973 \r
8974 ADD INDEX "XPKUsrGroupRights" ON "UsrGroupRights" \r
8975   AREA "Schema Area"\r
8976   UNIQUE\r
8977   PRIMARY\r
8978   INDEX-FIELD "GroupName" ASCENDING \r
8979   INDEX-FIELD "ApplicationCode" ASCENDING \r
8980   INDEX-FIELD "Action" ASCENDING \r
8981 \r
8982 ADD TABLE "Order"\r
8983   AREA "Schema Area"\r
8984   DUMP-NAME "order"\r
8985   TABLE-TRIGGER "DELETE" OVERRIDE PROCEDURE "deorder.p" CRC "?" \r
8986   TABLE-TRIGGER "WRITE" OVERRIDE PROCEDURE "wrorder.p" CRC "?" \r
8987 \r
8988 ADD FIELD "ProjectCode" OF "Order" AS integer \r
8989   FORMAT "99999"\r
8990   INITIAL "0"\r
8991   POSITION 2\r
8992   SQL-WIDTH 4\r
8993   ORDER 5\r
8994 \r
8995 ADD FIELD "OrderCode" OF "Order" AS integer \r
8996   FORMAT ">>>>9"\r
8997   INITIAL "0"\r
8998   POSITION 3\r
8999   SQL-WIDTH 4\r
9000   ORDER 145\r
9001 \r
9002 ADD FIELD "AccountCode" OF "Order" AS decimal \r
9003   DESCRIPTION "The code of the account."\r
9004   FORMAT "9999.99"\r
9005   INITIAL ?\r
9006   LABEL "Account"\r
9007   POSITION 4\r
9008   SQL-WIDTH 17\r
9009   DECIMALS 2\r
9010   ORDER 25\r
9011   MANDATORY\r
9012 \r
9013 ADD FIELD "CreditorCode" OF "Order" AS integer \r
9014   DESCRIPTION "The code used to refer to a creditor."\r
9015   FORMAT "99999"\r
9016   INITIAL "0"\r
9017   LABEL "Creditor"\r
9018   POSITION 5\r
9019   SQL-WIDTH 4\r
9020   ORDER 35\r
9021 \r
9022 ADD FIELD "ApprovedAmount" OF "Order" AS decimal \r
9023   FORMAT "->>>,>>>,>>9.99"\r
9024   INITIAL "0"\r
9025   POSITION 6\r
9026   SQL-WIDTH 17\r
9027   DECIMALS 2\r
9028   ORDER 45\r
9029 \r
9030 ADD FIELD "OrderAmount" OF "Order" AS decimal \r
9031   FORMAT "->>>,>>>,>>9.99"\r
9032   INITIAL "0"\r
9033   POSITION 7\r
9034   SQL-WIDTH 17\r
9035   DECIMALS 2\r
9036   ORDER 55\r
9037 \r
9038 ADD FIELD "TaxAmount" OF "Order" AS decimal \r
9039   FORMAT "->>>,>>>,>>9.99"\r
9040   INITIAL "0"\r
9041   POSITION 8\r
9042   SQL-WIDTH 17\r
9043   DECIMALS 2\r
9044   ORDER 65\r
9045 \r
9046 ADD FIELD "FirstApprover" OF "Order" AS character \r
9047   DESCRIPTION "The short alphanumeric code that identifies this approver."\r
9048   FORMAT "X(4)"\r
9049   INITIAL ""\r
9050   LABEL "Approval"\r
9051   POSITION 9\r
9052   SQL-WIDTH 8\r
9053   ORDER 115\r
9054   MANDATORY\r
9055 \r
9056 ADD FIELD "SecondApprover" OF "Order" AS character \r
9057   DESCRIPTION "The short alphanumeric code that identifies this approver."\r
9058   FORMAT "X(4)"\r
9059   INITIAL ""\r
9060   LABEL "Approval"\r
9061   POSITION 10\r
9062   SQL-WIDTH 8\r
9063   ORDER 125\r
9064   MANDATORY\r
9065 \r
9066 ADD FIELD "QuotedAmount" OF "Order" AS decimal \r
9067   FORMAT "->>>,>>>,>>9.99"\r
9068   INITIAL "0"\r
9069   POSITION 11\r
9070   SQL-WIDTH 17\r
9071   DECIMALS 2\r
9072   ORDER 95\r
9073 \r
9074 ADD FIELD "OrderDate" OF "Order" AS date \r
9075   FORMAT "99/99/9999"\r
9076   INITIAL ?\r
9077   LABEL "Order Date"\r
9078   POSITION 12\r
9079   SQL-WIDTH 4\r
9080   ORDER 105\r
9081 \r
9082 ADD FIELD "Description" OF "Order" AS character \r
9083   FORMAT "X(256)"\r
9084   INITIAL ""\r
9085   POSITION 13\r
9086   SQL-WIDTH 512\r
9087   VIEW-AS "VIEW-AS EDITOR\r
9088   SIZE-CHARS 80 by 60\r
9089    SCROLLBAR-VERTICAL\r
9090 "\r
9091   ORDER 135\r
9092 \r
9093 ADD FIELD "EntityType" OF "Order" AS character \r
9094   DESCRIPTION "A reference to the entity types table indicating the type of entity against which this transaction applies (Company, Property, Project, Creditor or Tenant)."\r
9095   FORMAT "X"\r
9096   INITIAL ?\r
9097   LABEL "Entity type"\r
9098   POSITION 14\r
9099   SQL-WIDTH 2\r
9100   COLUMN-LABEL "T"\r
9101   COLUMN-LABEL-SA "C"\r
9102   ORDER 155\r
9103 \r
9104 ADD FIELD "EntityCode" OF "Order" AS integer \r
9105   FORMAT "99999"\r
9106   INITIAL ?\r
9107   LABEL "Code"\r
9108   POSITION 15\r
9109   SQL-WIDTH 4\r
9110   COLUMN-LABEL-SA "C"\r
9111   ORDER 165\r
9112 \r
9113 ADD FIELD "OrderStatus" OF "Order" AS character \r
9114   FORMAT "X(4)"\r
9115   INITIAL "NEW"\r
9116   POSITION 16\r
9117   SQL-WIDTH 8\r
9118   ORDER 175\r
9119 \r
9120 ADD FIELD "OverridePaid" OF "Order" AS decimal \r
9121   FORMAT "->>,>>>,>>9.99"\r
9122   INITIAL ?\r
9123   LABEL "Paid"\r
9124   POSITION 17\r
9125   SQL-WIDTH 17\r
9126   DECIMALS 2\r
9127   ORDER 185\r
9128 \r
9129 ADD INDEX "XPKOrder" ON "Order" \r
9130   AREA "Schema Area"\r
9131   UNIQUE\r
9132   PRIMARY\r
9133   INDEX-FIELD "ProjectCode" ASCENDING \r
9134   INDEX-FIELD "OrderCode" ASCENDING \r
9135 \r
9136 ADD INDEX "XAK1Orders" ON "Order" \r
9137   AREA "Schema Area"\r
9138   INDEX-FIELD "ProjectCode" ASCENDING \r
9139   INDEX-FIELD "AccountCode" ASCENDING \r
9140   INDEX-FIELD "OrderCode" ASCENDING \r
9141 \r
9142 ADD INDEX "XAK2Orders" ON "Order" \r
9143   AREA "Schema Area"\r
9144   INDEX-FIELD "EntityType" ASCENDING \r
9145   INDEX-FIELD "EntityCode" ASCENDING \r
9146   INDEX-FIELD "OrderCode" ASCENDING \r
9147 \r
9148 ADD INDEX "XAK3Orders" ON "Order" \r
9149   AREA "Schema Area"\r
9150   INDEX-FIELD "EntityType" ASCENDING \r
9151   INDEX-FIELD "EntityCode" ASCENDING \r
9152   INDEX-FIELD "AccountCode" ASCENDING \r
9153   INDEX-FIELD "OrderCode" ASCENDING \r
9154 \r
9155 ADD INDEX "XAK4Orders" ON "Order" \r
9156   AREA "Schema Area"\r
9157   INDEX-FIELD "OrderStatus" ASCENDING \r
9158   INDEX-FIELD "EntityType" ASCENDING \r
9159   INDEX-FIELD "EntityCode" ASCENDING \r
9160   INDEX-FIELD "OrderCode" ASCENDING \r
9161 \r
9162 ADD TABLE "ProjectBudget"\r
9163   AREA "Schema Area"\r
9164   DUMP-NAME "projectb"\r
9165   TABLE-TRIGGER "WRITE" OVERRIDE PROCEDURE "wrprjbdg.p" CRC "?" \r
9166 \r
9167 ADD FIELD "ProjectCode" OF "ProjectBudget" AS integer \r
9168   FORMAT "99999"\r
9169   INITIAL "0"\r
9170   POSITION 2\r
9171   SQL-WIDTH 4\r
9172   ORDER 10\r
9173 \r
9174 ADD FIELD "AccountCode" OF "ProjectBudget" AS decimal \r
9175   DESCRIPTION "The code of the account."\r
9176   FORMAT "9999.99"\r
9177   INITIAL "0000.00"\r
9178   LABEL "Account"\r
9179   POSITION 3\r
9180   SQL-WIDTH 17\r
9181   DECIMALS 2\r
9182   ORDER 20\r
9183   MANDATORY\r
9184 \r
9185 ADD FIELD "OriginalBudget" OF "ProjectBudget" AS decimal \r
9186   FORMAT ">>>,>>>,>>9.99"\r
9187   INITIAL "0"\r
9188   POSITION 4\r
9189   SQL-WIDTH 17\r
9190   DECIMALS 2\r
9191   ORDER 30\r
9192 \r
9193 ADD FIELD "CommittedBudget" OF "ProjectBudget" AS decimal \r
9194   FORMAT ">>>,>>>,>>9.99"\r
9195   INITIAL "0"\r
9196   POSITION 5\r
9197   SQL-WIDTH 17\r
9198   DECIMALS 2\r
9199   ORDER 40\r
9200 \r
9201 ADD FIELD "Adjustment" OF "ProjectBudget" AS decimal \r
9202   FORMAT "->>>,>>>,>>9.99"\r
9203   INITIAL "0"\r
9204   POSITION 6\r
9205   SQL-WIDTH 17\r
9206   DECIMALS 2\r
9207   ORDER 100\r
9208 \r
9209 ADD FIELD "AgreedVariation" OF "ProjectBudget" AS decimal \r
9210   FORMAT ">>>,>>>,>>9.99"\r
9211   INITIAL "0"\r
9212   POSITION 7\r
9213   SQL-WIDTH 17\r
9214   DECIMALS 2\r
9215   ORDER 60\r
9216 \r
9217 ADD FIELD "EntityType" OF "ProjectBudget" AS character \r
9218   FORMAT "X(4)"\r
9219   INITIAL ""\r
9220   LABEL "Entity type code"\r
9221   POSITION 8\r
9222   SQL-WIDTH 8\r
9223   LENGTH 0\r
9224   ORDER 22\r
9225   MANDATORY\r
9226 \r
9227 ADD FIELD "EntityCode" OF "ProjectBudget" AS integer \r
9228   FORMAT "99999"\r
9229   INITIAL "0"\r
9230   LABEL "Code"\r
9231   POSITION 9\r
9232   SQL-WIDTH 4\r
9233   COLUMN-LABEL-SA "C"\r
9234   ORDER 24\r
9235 \r
9236 ADD FIELD "EntityAccount" OF "ProjectBudget" AS decimal \r
9237   DESCRIPTION "The code of the account."\r
9238   FORMAT "9999.99"\r
9239   INITIAL "0000.00"\r
9240   LABEL "Account"\r
9241   POSITION 10\r
9242   SQL-WIDTH 17\r
9243   DECIMALS 2\r
9244   ORDER 26\r
9245   MANDATORY\r
9246 \r
9247 ADD FIELD "AdjustmentReviewed" OF "ProjectBudget" AS logical \r
9248   FORMAT "Y/N"\r
9249   INITIAL "Y"\r
9250   LABEL "Adjustment Reviewed?"\r
9251   POSITION 11\r
9252   SQL-WIDTH 1\r
9253   VIEW-AS "VIEW-AS TOGGLE-BOX"\r
9254   ORDER 70\r
9255 \r
9256 ADD FIELD "AdjustmentReviewDate" OF "ProjectBudget" AS date \r
9257   FORMAT "99/99/9999"\r
9258   INITIAL ?\r
9259   POSITION 12\r
9260   SQL-WIDTH 4\r
9261   ORDER 80\r
9262 \r
9263 ADD FIELD "Description" OF "ProjectBudget" AS character \r
9264   FORMAT "X(50)"\r
9265   INITIAL ""\r
9266   POSITION 13\r
9267   SQL-WIDTH 100\r
9268   ORDER 90\r
9269 \r
9270 ADD FIELD "UncommittedBudget" OF "ProjectBudget" AS decimal \r
9271   FORMAT "->>>,>>>,>>9.99"\r
9272   INITIAL "0"\r
9273   POSITION 14\r
9274   SQL-WIDTH 17\r
9275   DECIMALS 2\r
9276   ORDER 50\r
9277 \r
9278 ADD FIELD "HighVolume" OF "ProjectBudget" AS logical \r
9279   DESCRIPTION "Whether or not the account should show totals only by default on a transaction report."\r
9280   FORMAT "yes/no"\r
9281   INITIAL "no"\r
9282   LABEL "High volume"\r
9283   POSITION 15\r
9284   SQL-WIDTH 1\r
9285   COLUMN-LABEL "HiVol"\r
9286   ORDER 110\r
9287 \r
9288 ADD FIELD "AllowPosting" OF "ProjectBudget" AS logical \r
9289   DESCRIPTION "Whether or not users can post to this in transaction entry, or if posting must be done automatically through children."\r
9290   FORMAT "yes/no"\r
9291   INITIAL "yes"\r
9292   LABEL "Post"\r
9293   POSITION 16\r
9294   SQL-WIDTH 1\r
9295   ORDER 120\r
9296 \r
9297 ADD FIELD "ProjectExpenseCategory" OF "ProjectBudget" AS character \r
9298   FORMAT "X(4)"\r
9299   INITIAL ""\r
9300   LABEL "Type"\r
9301   POSITION 17\r
9302   SQL-WIDTH 8\r
9303   ORDER 130\r
9304 \r
9305 ADD INDEX "XPKProjectBudget" ON "ProjectBudget" \r
9306   AREA "Schema Area"\r
9307   UNIQUE\r
9308   PRIMARY\r
9309   INDEX-FIELD "ProjectCode" ASCENDING \r
9310   INDEX-FIELD "AccountCode" ASCENDING \r
9311 \r
9312 ADD TABLE "ConstructionDetails"\r
9313   AREA "Schema Area"\r
9314   DUMP-NAME "construc"\r
9315 \r
9316 ADD FIELD "PropertyCode" OF "ConstructionDetails" AS integer \r
9317   DESCRIPTION "The code used to refer to a property"\r
9318   FORMAT "99999"\r
9319   INITIAL "0"\r
9320   LABEL "Code"\r
9321   POSITION 2\r
9322   SQL-WIDTH 4\r
9323   ORDER 10\r
9324 \r
9325 ADD FIELD "ConstructionDate" OF "ConstructionDetails" AS date \r
9326   FORMAT "99/99/9999"\r
9327   INITIAL ?\r
9328   LABEL "Constructed"\r
9329   POSITION 3\r
9330   SQL-WIDTH 4\r
9331   ORDER 20\r
9332 \r
9333 ADD FIELD "Classification" OF "ConstructionDetails" AS character \r
9334   FORMAT "X(4)"\r
9335   INITIAL ""\r
9336   POSITION 4\r
9337   SQL-WIDTH 8\r
9338   ORDER 30\r
9339 \r
9340 ADD FIELD "IntendedLife" OF "ConstructionDetails" AS integer \r
9341   FORMAT "->,>>>,>>9"\r
9342   INITIAL "0"\r
9343   POSITION 5\r
9344   SQL-WIDTH 4\r
9345   ORDER 40\r
9346 \r
9347 ADD FIELD "LocationText" OF "ConstructionDetails" AS character \r
9348   FORMAT "X(256)"\r
9349   INITIAL ""\r
9350   POSITION 6\r
9351   SQL-WIDTH 512\r
9352   ORDER 50\r
9353 \r
9354 ADD FIELD "DescriptionText" OF "ConstructionDetails" AS character \r
9355   FORMAT "X(256)"\r
9356   INITIAL ""\r
9357   POSITION 7\r
9358   SQL-WIDTH 512\r
9359   ORDER 60\r
9360 \r
9361 ADD FIELD "LegalText" OF "ConstructionDetails" AS character \r
9362   FORMAT "X(256)"\r
9363   INITIAL ""\r
9364   POSITION 8\r
9365   SQL-WIDTH 512\r
9366   ORDER 70\r
9367 \r
9368 ADD FIELD "ZoningText" OF "ConstructionDetails" AS character \r
9369   FORMAT "X(256)"\r
9370   INITIAL ""\r
9371   POSITION 9\r
9372   SQL-WIDTH 512\r
9373   ORDER 80\r
9374 \r
9375 ADD FIELD "TerritorialAuthority" OF "ConstructionDetails" AS character \r
9376   FORMAT "X(8)"\r
9377   INITIAL ""\r
9378   POSITION 10\r
9379   SQL-WIDTH 16\r
9380   ORDER 90\r
9381 \r
9382 ADD FIELD "UsageText" OF "ConstructionDetails" AS character \r
9383   DESCRIPTION "The designed or actual usage of the building"\r
9384   FORMAT "X(50)"\r
9385   INITIAL ""\r
9386   LABEL "Building Usage"\r
9387   POSITION 11\r
9388   SQL-WIDTH 100\r
9389   HELP "The designed or actual usage of the building"\r
9390   ORDER 100\r
9391 \r
9392 ADD INDEX "XPKConstructionDetails" ON "ConstructionDetails" \r
9393   AREA "Schema Area"\r
9394   UNIQUE\r
9395   PRIMARY\r
9396   INDEX-FIELD "PropertyCode" ASCENDING \r
9397 \r
9398 ADD TABLE "ScenarioParameter"\r
9399   AREA "Schema Area"\r
9400   DUMP-NAME "scenarip"\r
9401 \r
9402 ADD FIELD "ScenarioCode" OF "ScenarioParameter" AS integer \r
9403   DESCRIPTION "A code to identify the scenario."\r
9404   FORMAT ">>>>>9"\r
9405   INITIAL "0"\r
9406   POSITION 2\r
9407   SQL-WIDTH 4\r
9408   ORDER 10\r
9409 \r
9410 ADD FIELD "ParameterID" OF "ScenarioParameter" AS character \r
9411   DESCRIPTION "Identifies the parameter - for use by the programs which use it."\r
9412   FORMAT "X(20)"\r
9413   INITIAL ""\r
9414   POSITION 3\r
9415   SQL-WIDTH 40\r
9416   ORDER 20\r
9417 \r
9418 ADD FIELD "Data" OF "ScenarioParameter" AS character \r
9419   DESCRIPTION "Parameter data values."\r
9420   FORMAT "X(50)"\r
9421   INITIAL ""\r
9422   POSITION 4\r
9423   SQL-WIDTH 100\r
9424   ORDER 30\r
9425 \r
9426 ADD INDEX "XPKScenarioParameter" ON "ScenarioParameter" \r
9427   AREA "Schema Area"\r
9428   UNIQUE\r
9429   PRIMARY\r
9430   INDEX-FIELD "ScenarioCode" ASCENDING \r
9431   INDEX-FIELD "ParameterID" ASCENDING \r
9432 \r
9433 ADD TABLE "LeaseHistory"\r
9434   AREA "Schema Area"\r
9435   DUMP-NAME "leasehis"\r
9436 \r
9437 ADD FIELD "DateChanged" OF "LeaseHistory" AS date \r
9438   FORMAT "99/99/9999"\r
9439   INITIAL ?\r
9440   POSITION 2\r
9441   SQL-WIDTH 4\r
9442   ORDER 30\r
9443 \r
9444 ADD FIELD "TenancyLeaseCode" OF "LeaseHistory" AS integer \r
9445   DESCRIPTION "A code used to refer to this tenancy lease"\r
9446   FORMAT "99999"\r
9447   INITIAL "0"\r
9448   LABEL "Code"\r
9449   POSITION 3\r
9450   SQL-WIDTH 4\r
9451   ORDER 40\r
9452 \r
9453 ADD FIELD "AssignedLeaseCode" OF "LeaseHistory" AS integer \r
9454   DESCRIPTION "The prior lease in the chain of assigned leases."\r
9455   FORMAT "99999"\r
9456   INITIAL "0"\r
9457   LABEL "Assigned to"\r
9458   POSITION 4\r
9459   SQL-WIDTH 4\r
9460   ORDER 50\r
9461 \r
9462 ADD FIELD "AssignmentDate" OF "LeaseHistory" AS date \r
9463   DESCRIPTION "The date on which this lease was assigned from the prior one."\r
9464   FORMAT "99/99/9999"\r
9465   INITIAL ?\r
9466   LABEL "Assign date"\r
9467   POSITION 5\r
9468   SQL-WIDTH 4\r
9469   ORDER 60\r
9470 \r
9471 ADD FIELD "LeaseEndDate" OF "LeaseHistory" AS date \r
9472   DESCRIPTION "The date on which the lease ends."\r
9473   FORMAT "99/99/9999"\r
9474   INITIAL ?\r
9475   LABEL "Lease end"\r
9476   POSITION 6\r
9477   SQL-WIDTH 4\r
9478   ORDER 70\r
9479 \r
9480 ADD FIELD "LeaseStartDate" OF "LeaseHistory" AS date \r
9481   DESCRIPTION "The date that the lease commenced (which could be in the future)."\r
9482   FORMAT "99/99/9999"\r
9483   INITIAL ?\r
9484   LABEL "Lease start"\r
9485   POSITION 7\r
9486   SQL-WIDTH 4\r
9487   ORDER 80\r
9488 \r
9489 ADD FIELD "LeaseStatus" OF "LeaseHistory" AS character \r
9490   FORMAT "X(4)"\r
9491   INITIAL ""\r
9492   LABEL "Status"\r
9493   POSITION 8\r
9494   SQL-WIDTH 8\r
9495   LENGTH 0\r
9496   ORDER 90\r
9497   MANDATORY\r
9498 \r
9499 ADD FIELD "LeaseType" OF "LeaseHistory" AS character \r
9500   DESCRIPTION "A code classifying the type of lease."\r
9501   FORMAT "X(4)"\r
9502   INITIAL ""\r
9503   LABEL "Type"\r
9504   POSITION 9\r
9505   SQL-WIDTH 8\r
9506   LENGTH 0\r
9507   ORDER 100\r
9508   MANDATORY\r
9509 \r
9510 ADD FIELD "NoteCode" OF "LeaseHistory" AS integer \r
9511   DESCRIPTION "Any notes relating to this lease"\r
9512   FORMAT ">>>>>9"\r
9513   INITIAL "0"\r
9514   LABEL "Notes key"\r
9515   POSITION 10\r
9516   SQL-WIDTH 4\r
9517   ORDER 110\r
9518 \r
9519 ADD FIELD "RatchetClause" OF "LeaseHistory" AS character \r
9520   DESCRIPTION "The type of ratchet clause included in the lease, e.g. None, Full, Partial etc."\r
9521   FORMAT "X(4)"\r
9522   INITIAL ?\r
9523   LABEL "Ratchet"\r
9524   POSITION 11\r
9525   SQL-WIDTH 8\r
9526   HELP "Ratchet clause type: None, full, part etc."\r
9527   LENGTH 0\r
9528   ORDER 120\r
9529 \r
9530 ADD FIELD "RentStartDate" OF "LeaseHistory" AS date \r
9531   FORMAT "99/99/9999"\r
9532   INITIAL ?\r
9533   LABEL "Rent start"\r
9534   POSITION 12\r
9535   SQL-WIDTH 4\r
9536   HELP "The date on which the tenant starts being liable for rent"\r
9537   ORDER 130\r
9538 \r
9539 ADD FIELD "RentEndDate" OF "LeaseHistory" AS date \r
9540   FORMAT "99/99/9999"\r
9541   INITIAL ?\r
9542   LABEL "Rent end"\r
9543   POSITION 13\r
9544   SQL-WIDTH 4\r
9545   HELP "The date on which the tenant stops being liable for rent"\r
9546   ORDER 140\r
9547 \r
9548 ADD FIELD "ReviewNoticePeriod" OF "LeaseHistory" AS integer \r
9549   FORMAT ">>>>>9"\r
9550   INITIAL "3"\r
9551   LABEL "Review notice"\r
9552   POSITION 14\r
9553   SQL-WIDTH 4\r
9554   COLUMN-LABEL "RR notice"\r
9555   HELP "The number of months of notice required for a rent review."\r
9556   ORDER 150\r
9557 \r
9558 ADD FIELD "RightsOfRenewal" OF "LeaseHistory" AS character \r
9559   FORMAT "X(10)"\r
9560   INITIAL "none"\r
9561   LABEL "Rights of Renewal"\r
9562   POSITION 15\r
9563   SQL-WIDTH 20\r
9564   COLUMN-LABEL "RoR"\r
9565   HELP "The rights of renewal written into the lease."\r
9566   LENGTH 0\r
9567   ORDER 160\r
9568 \r
9569 ADD FIELD "RORNoticePeriod" OF "LeaseHistory" AS integer \r
9570   DESCRIPTION "The number of months of notice required for exercise of the rights of renewal."\r
9571   FORMAT ">>>>>9"\r
9572   INITIAL "3"\r
9573   LABEL "RoR notice"\r
9574   POSITION 16\r
9575   SQL-WIDTH 4\r
9576   HELP "Months notice required for exercise of renewal rights"\r
9577   ORDER 170\r
9578 \r
9579 ADD FIELD "TenantCode" OF "LeaseHistory" AS integer \r
9580   DESCRIPTION "The tenant who should be billed with transactions relating to this lease.  This should be the same as the TenancyLeaseCode unless people change their minds..."\r
9581   FORMAT ">>>>>9"\r
9582   INITIAL "0"\r
9583   LABEL "Tenant"\r
9584   POSITION 17\r
9585   SQL-WIDTH 4\r
9586   HELP "The tenant code for accounting for this lease."\r
9587   ORDER 180\r
9588 \r
9589 ADD FIELD "DocumentLocation" OF "LeaseHistory" AS integer \r
9590   DESCRIPTION "The current location of the lease\r
9591 Foreign key on the 'Note' table."\r
9592   FORMAT ">>>>>9"\r
9593   INITIAL ?\r
9594   LABEL "Document Location Notes"\r
9595   POSITION 18\r
9596   SQL-WIDTH 4\r
9597   COLUMN-LABEL "NotesKey"\r
9598   HELP "A 'note' indicating the current location of the lease docs."\r
9599   ORDER 190\r
9600 \r
9601 ADD FIELD "PrimarySpace" OF "LeaseHistory" AS integer \r
9602   DESCRIPTION "A sequence number which identifies the primary rental space within the property."\r
9603   FORMAT ">>>>9"\r
9604   INITIAL ?\r
9605   LABEL "Primary Space"\r
9606   POSITION 19\r
9607   SQL-WIDTH 4\r
9608   COLUMN-LABEL "Primary"\r
9609   ORDER 370\r
9610 \r
9611 ADD FIELD "OutgoingsRate" OF "LeaseHistory" AS decimal \r
9612   FORMAT "->>9.99"\r
9613   INITIAL "0"\r
9614   LABEL "O/G Rate"\r
9615   POSITION 20\r
9616   SQL-WIDTH 17\r
9617   DECIMALS 2\r
9618   ORDER 380\r
9619 \r
9620 ADD FIELD "PropertyCode" OF "LeaseHistory" AS integer \r
9621   DESCRIPTION "The property that the rental spaces in this lease are a part of."\r
9622   FORMAT "99999"\r
9623   INITIAL "0"\r
9624   LABEL "Property"\r
9625   POSITION 21\r
9626   SQL-WIDTH 4\r
9627   ORDER 220\r
9628 \r
9629 ADD FIELD "TermYears" OF "LeaseHistory" AS integer \r
9630   FORMAT ">>9"\r
9631   INITIAL "0"\r
9632   LABEL "Years"\r
9633   POSITION 22\r
9634   SQL-WIDTH 4\r
9635   ORDER 230\r
9636 \r
9637 ADD FIELD "TermMonths" OF "LeaseHistory" AS integer \r
9638   FORMAT ">9"\r
9639   INITIAL "0"\r
9640   POSITION 23\r
9641   SQL-WIDTH 4\r
9642   VALEXP "TermMonths >= 0 AND TermMonths < 12"\r
9643   VALMSG "Must be between 0 and 11"\r
9644   ORDER 240\r
9645 \r
9646 ADD FIELD "TermDays" OF "LeaseHistory" AS integer \r
9647   FORMAT ">>9"\r
9648   INITIAL "0"\r
9649   POSITION 24\r
9650   SQL-WIDTH 4\r
9651   VALEXP "TermDays >= 0 AND TermDays < 32"\r
9652   VALMSG "Must be between 0 and 31"\r
9653   ORDER 250\r
9654 \r
9655 ADD FIELD "GrossLease" OF "LeaseHistory" AS logical \r
9656   FORMAT "G/N"\r
9657   INITIAL "No"\r
9658   LABEL "Gross Lease"\r
9659   POSITION 25\r
9660   SQL-WIDTH 1\r
9661   COLUMN-LABEL "G/N"\r
9662   ORDER 390\r
9663 \r
9664 ADD FIELD "RevSequence" OF "LeaseHistory" AS integer \r
9665   DESCRIPTION "Sequence from Rev property system"\r
9666   FORMAT "->,>>>,>>9"\r
9667   INITIAL "0"\r
9668   POSITION 26\r
9669   SQL-WIDTH 4\r
9670   ORDER 270\r
9671 \r
9672 ADD FIELD "RevTenant" OF "LeaseHistory" AS character \r
9673   DESCRIPTION "Tenant code from Revelation system"\r
9674   FORMAT "X(8)"\r
9675   INITIAL ""\r
9676   POSITION 27\r
9677   SQL-WIDTH 16\r
9678   LENGTH 0\r
9679   ORDER 280\r
9680 \r
9681 ADD FIELD "ElectricityUnitRate" OF "LeaseHistory" AS decimal \r
9682   FORMAT ">9.99"\r
9683   INITIAL "0.15"\r
9684   LABEL "Electricity Rate"\r
9685   POSITION 28\r
9686   SQL-WIDTH 19\r
9687   DECIMALS 4\r
9688   ORDER 290\r
9689 \r
9690 ADD FIELD "OutgoingsBudget" OF "LeaseHistory" AS decimal \r
9691   DESCRIPTION "Basis for charging outgoings to a tenant."\r
9692   FORMAT ">,>>>,>>9.99"\r
9693   INITIAL "0"\r
9694   POSITION 29\r
9695   SQL-WIDTH 17\r
9696   DECIMALS 2\r
9697   ORDER 300\r
9698 \r
9699 ADD FIELD "TaxApplies" OF "LeaseHistory" AS logical \r
9700   FORMAT "yes/no"\r
9701   INITIAL "Yes"\r
9702   LABEL "Tax applies"\r
9703   POSITION 30\r
9704   SQL-WIDTH 1\r
9705   COLUMN-LABEL "Taxable"\r
9706   ORDER 310\r
9707 \r
9708 ADD FIELD "AreaDescription" OF "LeaseHistory" AS character \r
9709   FORMAT "G/N"\r
9710   INITIAL ""\r
9711   LABEL "Areas Rented"\r
9712   POSITION 31\r
9713   SQL-WIDTH 6\r
9714   ORDER 400\r
9715 \r
9716 ADD FIELD "FirstLeaseStart" OF "LeaseHistory" AS date \r
9717   FORMAT "99/99/9999"\r
9718   INITIAL ?\r
9719   LABEL "First lease start"\r
9720   POSITION 32\r
9721   SQL-WIDTH 4\r
9722   COLUMN-LABEL "First Start"\r
9723   HELP "The date the first lease on this space by this tenant commenced"\r
9724   ORDER 410\r
9725 \r
9726 ADD FIELD "IncentiveNotes" OF "LeaseHistory" AS character \r
9727   DESCRIPTION "Just some notes that get written in when the lease is settled (i.e when a new lease is setup)."\r
9728   FORMAT "X(256)"\r
9729   INITIAL ""\r
9730   POSITION 33\r
9731   SQL-WIDTH 512\r
9732   LENGTH 0\r
9733   ORDER 360\r
9734 \r
9735 ADD FIELD "ChangedBy" OF "LeaseHistory" AS character \r
9736   DESCRIPTION "A system controlled record of what process caused the lease information to change"\r
9737   FORMAT "X(20)"\r
9738   INITIAL ""\r
9739   POSITION 34\r
9740   SQL-WIDTH 40\r
9741   ORDER 420\r
9742 \r
9743 ADD INDEX "XPKLeaseHistory" ON "LeaseHistory" \r
9744   AREA "Schema Area"\r
9745   UNIQUE\r
9746   PRIMARY\r
9747   INDEX-FIELD "TenancyLeaseCode" ASCENDING \r
9748   INDEX-FIELD "DateChanged" DESCENDING \r
9749 \r
9750 ADD TABLE "RentalSpace"\r
9751   AREA "Schema Area"\r
9752   DUMP-NAME "rentalsp"\r
9753   TABLE-TRIGGER "WRITE" OVERRIDE PROCEDURE "wrrntspc.p" CRC "?" \r
9754 \r
9755 ADD FIELD "PropertyCode" OF "RentalSpace" AS integer \r
9756   DESCRIPTION "The property that this rental space is a part of"\r
9757   FORMAT "99999"\r
9758   INITIAL "0"\r
9759   LABEL "Property"\r
9760   POSITION 2\r
9761   SQL-WIDTH 4\r
9762   ORDER 10\r
9763   MANDATORY\r
9764   FIELD-TRIGGER "ASSIGN" OVERRIDE PROCEDURE "a-rsppcd.p" CRC "?" \r
9765 \r
9766 ADD FIELD "RentalSpaceCode" OF "RentalSpace" AS integer \r
9767   DESCRIPTION "A sequence number which identifies this rental space within the property."\r
9768   FORMAT ">>>>9"\r
9769   INITIAL "0"\r
9770   LABEL "Rental space code"\r
9771   POSITION 3\r
9772   SQL-WIDTH 4\r
9773   COLUMN-LABEL "Space"\r
9774   ORDER 50\r
9775   MANDATORY\r
9776 \r
9777 ADD FIELD "Contact" OF "RentalSpace" AS integer \r
9778   DESCRIPTION "A person to contact about things to do with this space."\r
9779   FORMAT ">>>>>9"\r
9780   INITIAL "0"\r
9781   POSITION 4\r
9782   SQL-WIDTH 4\r
9783   ORDER 140\r
9784   MANDATORY\r
9785 \r
9786 ADD FIELD "AreaType" OF "RentalSpace" AS character \r
9787   DESCRIPTION "The type of rental space eg. Office, Rental, Carpark, Warehouse, etc"\r
9788   FORMAT "X(4)"\r
9789   INITIAL ""\r
9790   LABEL "Area type"\r
9791   POSITION 5\r
9792   SQL-WIDTH 8\r
9793   COLUMN-LABEL "Type"\r
9794   LENGTH 0\r
9795   ORDER 70\r
9796   MANDATORY\r
9797 \r
9798 ADD FIELD "AreaStatus" OF "RentalSpace" AS character \r
9799   DESCRIPTION "The Status of the rental space, eg. Leased, Vacant"\r
9800   FORMAT "X(4)"\r
9801   INITIAL ""\r
9802   LABEL "Status"\r
9803   POSITION 6\r
9804   SQL-WIDTH 8\r
9805   LENGTH 0\r
9806   ORDER 80\r
9807   MANDATORY\r
9808 \r
9809 ADD FIELD "AreaSize" OF "RentalSpace" AS decimal \r
9810   DESCRIPTION "The area of the rental space in square metres."\r
9811   FORMAT "->>,>>9.99"\r
9812   INITIAL "0"\r
9813   LABEL "Sq M."\r
9814   POSITION 7\r
9815   SQL-WIDTH 21\r
9816   COLUMN-LABEL-SA "C"\r
9817   DECIMALS 6\r
9818   ORDER 90\r
9819 \r
9820 ADD FIELD "ContractedRental" OF "RentalSpace" AS decimal \r
9821   DESCRIPTION "The annual rental which tenants have contracted to pay for this space."\r
9822   FORMAT "->,>>>,>>9.99"\r
9823   INITIAL "0"\r
9824   LABEL "Contract Rental"\r
9825   POSITION 8\r
9826   SQL-WIDTH 17\r
9827   DECIMALS 2\r
9828   ORDER 100\r
9829 \r
9830 ADD FIELD "Description" OF "RentalSpace" AS character \r
9831   DESCRIPTION "A brief description of the space"\r
9832   FORMAT "X(50)"\r
9833   INITIAL ""\r
9834   POSITION 9\r
9835   SQL-WIDTH 100\r
9836   LENGTH 0\r
9837   ORDER 60\r
9838 \r
9839 ADD FIELD "MarketRental" OF "RentalSpace" AS decimal \r
9840   DESCRIPTION "The estimated market rental which the space is worth at current market rates."\r
9841   FORMAT "->,>>>,>>9.99"\r
9842   INITIAL "0"\r
9843   LABEL "Market"\r
9844   POSITION 10\r
9845   SQL-WIDTH 17\r
9846   DECIMALS 2\r
9847   ORDER 120\r
9848 \r
9849 ADD FIELD "MarketRentalDate" OF "RentalSpace" AS date \r
9850   DESCRIPTION "The date at which the market rental was last estimated."\r
9851   FORMAT "99/99/9999"\r
9852   INITIAL ?\r
9853   LABEL "Market rental date"\r
9854   POSITION 11\r
9855   SQL-WIDTH 4\r
9856   COLUMN-LABEL "Mkt date"\r
9857   ORDER 130\r
9858 \r
9859 ADD FIELD "TenancyLeaseCode" OF "RentalSpace" AS integer \r
9860   DESCRIPTION "The code referring to the tenancy lease record applying to this rental space."\r
9861   FORMAT ">>>>>9"\r
9862   INITIAL "0"\r
9863   LABEL "Lease"\r
9864   POSITION 12\r
9865   SQL-WIDTH 4\r
9866   ORDER 20\r
9867 \r
9868 ADD FIELD "Warden1" OF "RentalSpace" AS integer \r
9869   DESCRIPTION "The person who is the primary warden for the rental space."\r
9870   FORMAT ">>>>>9"\r
9871   INITIAL "0"\r
9872   POSITION 13\r
9873   SQL-WIDTH 4\r
9874   ORDER 150\r
9875 \r
9876 ADD FIELD "Warden2" OF "RentalSpace" AS integer \r
9877   DESCRIPTION "The person who is the secondary warden for the rental space."\r
9878   FORMAT ">>>>>9"\r
9879   INITIAL "0"\r
9880   POSITION 14\r
9881   SQL-WIDTH 4\r
9882   ORDER 160\r
9883   MANDATORY\r
9884 \r
9885 ADD FIELD "Level" OF "RentalSpace" AS integer \r
9886   FORMAT "->>9"\r
9887   INITIAL "0"\r
9888   POSITION 15\r
9889   SQL-WIDTH 4\r
9890   ORDER 30\r
9891 \r
9892 ADD FIELD "LevelSequence" OF "RentalSpace" AS integer \r
9893   FORMAT ">,>>9"\r
9894   INITIAL "0"\r
9895   LABEL "Sequence"\r
9896   POSITION 16\r
9897   SQL-WIDTH 4\r
9898   COLUMN-LABEL "Seq"\r
9899   ORDER 40\r
9900 \r
9901 ADD FIELD "NoteCode" OF "RentalSpace" AS integer \r
9902   FORMAT ">>>,>>9"\r
9903   INITIAL "0"\r
9904   POSITION 17\r
9905   SQL-WIDTH 4\r
9906   ORDER 170\r
9907 \r
9908 ADD FIELD "ChargedRental" OF "RentalSpace" AS decimal \r
9909   FORMAT "->,>>>,>>9.99"\r
9910   INITIAL "0"\r
9911   LABEL "Charged Rent"\r
9912   POSITION 18\r
9913   SQL-WIDTH 17\r
9914   DECIMALS 2\r
9915   ORDER 110\r
9916 \r
9917 ADD FIELD "AuditRecordId" OF "RentalSpace" AS integer \r
9918   FORMAT "->,>>>,>>9"\r
9919   INITIAL "0"\r
9920   POSITION 19\r
9921   SQL-WIDTH 4\r
9922   ORDER 180\r
9923 \r
9924 ADD FIELD "LastModifiedDate" OF "RentalSpace" AS date \r
9925   DESCRIPTION "The date when this record was last modified.  Maintained by a WRITE trigger."\r
9926   FORMAT "99/99/9999"\r
9927   INITIAL "1/1/0001"\r
9928   POSITION 20\r
9929   SQL-WIDTH 4\r
9930   ORDER 190\r
9931   MANDATORY\r
9932 \r
9933 ADD FIELD "LastModifiedTime" OF "RentalSpace" AS integer \r
9934   DESCRIPTION "The time that this record was last modified"\r
9935   FORMAT "->,>>>,>>9"\r
9936   INITIAL "0"\r
9937   POSITION 21\r
9938   SQL-WIDTH 4\r
9939   ORDER 200\r
9940 \r
9941 ADD FIELD "LastModifiedUser" OF "RentalSpace" AS character \r
9942   DESCRIPTION "The user who last modified this record.  Maintained by a WRITE trigger."\r
9943   FORMAT "X(8)"\r
9944   INITIAL ""\r
9945   POSITION 22\r
9946   SQL-WIDTH 16\r
9947   LENGTH 0\r
9948   ORDER 210\r
9949 \r
9950 ADD FIELD "VacantCosts" OF "RentalSpace" AS decimal \r
9951   FORMAT "->,>>>,>>9.99"\r
9952   INITIAL "0"\r
9953   POSITION 23\r
9954   SQL-WIDTH 17\r
9955   DECIMALS 2\r
9956   ORDER 240\r
9957 \r
9958 ADD FIELD "OutgoingsPercentage" OF "RentalSpace" AS decimal \r
9959   FORMAT "->>9.99"\r
9960   INITIAL "0"\r
9961   LABEL "O/G Percent"\r
9962   POSITION 24\r
9963   SQL-WIDTH 17\r
9964   DECIMALS 2\r
9965   ORDER 250\r
9966 \r
9967 ADD FIELD "TaxApplies" OF "RentalSpace" AS logical \r
9968   FORMAT "yes/no"\r
9969   INITIAL "Yes"\r
9970   LABEL "Tax applies"\r
9971   POSITION 25\r
9972   SQL-WIDTH 1\r
9973   COLUMN-LABEL "Taxable"\r
9974   ORDER 220\r
9975 \r
9976 ADD FIELD "VacationDate" OF "RentalSpace" AS date \r
9977   DESCRIPTION "The date that this rental space was vacated. This only applies \r
9978 if AreaStatus = ""V""."\r
9979   FORMAT "99/99/9999"\r
9980   INITIAL ?\r
9981   LABEL "Date Vacated"\r
9982   POSITION 26\r
9983   SQL-WIDTH 4\r
9984   COLUMN-LABEL "Vacated"\r
9985   ORDER 230\r
9986 \r
9987 ADD INDEX "RentalSpaces" ON "RentalSpace" \r
9988   AREA "Schema Area"\r
9989   UNIQUE\r
9990   PRIMARY\r
9991   INDEX-FIELD "PropertyCode" ASCENDING \r
9992   INDEX-FIELD "RentalSpaceCode" ASCENDING \r
9993 \r
9994 ADD INDEX "XAK1RentalSpaces" ON "RentalSpace" \r
9995   AREA "Schema Area"\r
9996   INDEX-FIELD "TenancyLeaseCode" ASCENDING \r
9997   INDEX-FIELD "RentalSpaceCode" ASCENDING \r
9998 \r
9999 ADD INDEX "XAK2RentalSpaces" ON "RentalSpace" \r
10000   AREA "Schema Area"\r
10001   INDEX-FIELD "PropertyCode" ASCENDING \r
10002   INDEX-FIELD "Level" ASCENDING \r
10003   INDEX-FIELD "LevelSequence" ASCENDING \r
10004 \r
10005 ADD TABLE "AssetType"\r
10006   AREA "Schema Area"\r
10007   DUMP-NAME "assettyp"\r
10008 \r
10009 ADD FIELD "AssetType" OF "AssetType" AS character \r
10010   FORMAT "X(4)"\r
10011   INITIAL ""\r
10012   POSITION 2\r
10013   SQL-WIDTH 8\r
10014   ORDER 10\r
10015 \r
10016 ADD FIELD "Description" OF "AssetType" AS character \r
10017   FORMAT "X(50)"\r
10018   INITIAL ""\r
10019   POSITION 3\r
10020   SQL-WIDTH 100\r
10021   ORDER 20\r
10022 \r
10023 ADD FIELD "DepreciationStyle" OF "AssetType" AS character \r
10024   FORMAT "X"\r
10025   INITIAL ""\r
10026   POSITION 4\r
10027   SQL-WIDTH 2\r
10028   ORDER 30\r
10029 \r
10030 ADD FIELD "DepreciationRate" OF "AssetType" AS decimal \r
10031   FORMAT ">99.99"\r
10032   INITIAL "0"\r
10033   POSITION 5\r
10034   SQL-WIDTH 17\r
10035   DECIMALS 2\r
10036   ORDER 40\r
10037 \r
10038 ADD FIELD "AccountCode" OF "AssetType" AS decimal \r
10039   FORMAT "9999.99"\r
10040   INITIAL "0"\r
10041   POSITION 6\r
10042   SQL-WIDTH 17\r
10043   DECIMALS 2\r
10044   ORDER 50\r
10045 \r
10046 ADD INDEX "XPKAssetType" ON "AssetType" \r
10047   AREA "Schema Area"\r
10048   UNIQUE\r
10049   PRIMARY\r
10050   INDEX-FIELD "AssetType" ASCENDING \r
10051 \r
10052 ADD TABLE "BatchQueue"\r
10053   AREA "Schema Area"\r
10054   DUMP-NAME "batchque"\r
10055 \r
10056 ADD FIELD "RunDate" OF "BatchQueue" AS date \r
10057   FORMAT "99/99/9999"\r
10058   INITIAL ?\r
10059   POSITION 2\r
10060   SQL-WIDTH 4\r
10061   ORDER 10\r
10062 \r
10063 ADD FIELD "RunTime" OF "BatchQueue" AS integer \r
10064   FORMAT "->,>>>,>>9"\r
10065   INITIAL "0"\r
10066   POSITION 3\r
10067   SQL-WIDTH 4\r
10068   ORDER 20\r
10069 \r
10070 ADD FIELD "RunStatus" OF "BatchQueue" AS character \r
10071   FORMAT "X(4)"\r
10072   INITIAL ""\r
10073   POSITION 4\r
10074   SQL-WIDTH 8\r
10075   ORDER 30\r
10076 \r
10077 ADD FIELD "RunProgram" OF "BatchQueue" AS character \r
10078   FORMAT "X(256)"\r
10079   INITIAL ""\r
10080   POSITION 5\r
10081   SQL-WIDTH 512\r
10082   ORDER 40\r
10083 \r
10084 ADD FIELD "RunParameters" OF "BatchQueue" AS character \r
10085   FORMAT "X(256)"\r
10086   INITIAL ""\r
10087   POSITION 6\r
10088   SQL-WIDTH 512\r
10089   ORDER 50\r
10090 \r
10091 ADD FIELD "RunOutput" OF "BatchQueue" AS character \r
10092   FORMAT "X(50)"\r
10093   INITIAL ""\r
10094   POSITION 7\r
10095   SQL-WIDTH 100\r
10096   ORDER 60\r
10097 \r
10098 ADD FIELD "RunErrors" OF "BatchQueue" AS character \r
10099   FORMAT "X(78)"\r
10100   INITIAL ""\r
10101   POSITION 8\r
10102   SQL-WIDTH 156\r
10103   HELP "Errors produced by the processing of this job"\r
10104   ORDER 70\r
10105 \r
10106 ADD FIELD "UserName" OF "BatchQueue" AS character \r
10107   FORMAT "X(16)"\r
10108   INITIAL ""\r
10109   POSITION 9\r
10110   SQL-WIDTH 32\r
10111   HELP "Name of user requesting batch job"\r
10112   ORDER 80\r
10113 \r
10114 ADD FIELD "StartedOn" OF "BatchQueue" AS date \r
10115   FORMAT "99/99/9999"\r
10116   INITIAL ?\r
10117   POSITION 10\r
10118   SQL-WIDTH 4\r
10119   HELP "Date job was started"\r
10120   ORDER 90\r
10121 \r
10122 ADD FIELD "StartedAt" OF "BatchQueue" AS integer \r
10123   FORMAT ">>,>>9"\r
10124   INITIAL "0"\r
10125   POSITION 11\r
10126   SQL-WIDTH 4\r
10127   HELP "Time job was started"\r
10128   ORDER 100\r
10129 \r
10130 ADD FIELD "Elapsed" OF "BatchQueue" AS integer \r
10131   FORMAT ">>,>>9"\r
10132   INITIAL "0"\r
10133   POSITION 12\r
10134   SQL-WIDTH 4\r
10135   HELP "Time job took to run"\r
10136   ORDER 110\r
10137 \r
10138 ADD INDEX "XPKBatchQueue" ON "BatchQueue" \r
10139   AREA "Schema Area"\r
10140   PRIMARY\r
10141   INDEX-FIELD "RunStatus" ASCENDING \r
10142   INDEX-FIELD "RunDate" ASCENDING \r
10143   INDEX-FIELD "RunTime" ASCENDING \r
10144 \r
10145 ADD TABLE "CFChangeType"\r
10146   AREA "Schema Area"\r
10147   DUMP-NAME "cfchgtyp"\r
10148 \r
10149 ADD FIELD "CFChangeType" OF "CFChangeType" AS character \r
10150   FORMAT "X(4)"\r
10151   INITIAL ""\r
10152   LABEL "Change type"\r
10153   POSITION 2\r
10154   SQL-WIDTH 8\r
10155   COLUMN-LABEL "Change"\r
10156   ORDER 10\r
10157 \r
10158 ADD FIELD "Description" OF "CFChangeType" AS character \r
10159   FORMAT "X(50)"\r
10160   INITIAL ""\r
10161   POSITION 3\r
10162   SQL-WIDTH 100\r
10163   ORDER 20\r
10164 \r
10165 ADD INDEX "XKPCFChangetype" ON "CFChangeType" \r
10166   AREA "Schema Area"\r
10167   UNIQUE\r
10168   PRIMARY\r
10169   INDEX-FIELD "CFChangeType" ASCENDING \r
10170 \r
10171 ADD TABLE "FixedAsset"\r
10172   AREA "Schema Area"\r
10173   DUMP-NAME "fixedass"\r
10174 \r
10175 ADD FIELD "AssetCode" OF "FixedAsset" AS integer \r
10176   FORMAT "99999"\r
10177   INITIAL "0"\r
10178   POSITION 2\r
10179   SQL-WIDTH 4\r
10180   ORDER 10\r
10181 \r
10182 ADD FIELD "Description" OF "FixedAsset" AS character \r
10183   FORMAT "X(256)"\r
10184   INITIAL ""\r
10185   POSITION 3\r
10186   SQL-WIDTH 512\r
10187   ORDER 20\r
10188 \r
10189 ADD FIELD "Active" OF "FixedAsset" AS logical \r
10190   FORMAT "Y/N"\r
10191   INITIAL "Y"\r
10192   POSITION 4\r
10193   SQL-WIDTH 1\r
10194   ORDER 30\r
10195 \r
10196 ADD FIELD "PurchaseDate" OF "FixedAsset" AS date \r
10197   FORMAT "99/99/9999"\r
10198   INITIAL ?\r
10199   POSITION 5\r
10200   SQL-WIDTH 4\r
10201   ORDER 40\r
10202 \r
10203 ADD FIELD "SaleDate" OF "FixedAsset" AS date \r
10204   FORMAT "99/99/9999"\r
10205   INITIAL ?\r
10206   POSITION 6\r
10207   SQL-WIDTH 4\r
10208   ORDER 50\r
10209 \r
10210 ADD FIELD "BookDepreciationType" OF "FixedAsset" AS character \r
10211   FORMAT "X(4)"\r
10212   INITIAL ""\r
10213   POSITION 7\r
10214   SQL-WIDTH 8\r
10215   ORDER 60\r
10216 \r
10217 ADD FIELD "TaxDepreciationType" OF "FixedAsset" AS character \r
10218   FORMAT "X(4)"\r
10219   INITIAL ""\r
10220   POSITION 8\r
10221   SQL-WIDTH 8\r
10222   ORDER 70\r
10223 \r
10224 ADD FIELD "LastModifiedDate" OF "FixedAsset" AS date \r
10225   DESCRIPTION "The date when this record was last modified.  Maintained by a WRITE trigger."\r
10226   FORMAT "99/99/9999"\r
10227   INITIAL "1/1/0001"\r
10228   POSITION 9\r
10229   SQL-WIDTH 4\r
10230   ORDER 80\r
10231   MANDATORY\r
10232 \r
10233 ADD FIELD "LastModifiedTime" OF "FixedAsset" AS integer \r
10234   DESCRIPTION "The time that this record was last modified"\r
10235   FORMAT "->,>>>,>>9"\r
10236   INITIAL "0"\r
10237   POSITION 10\r
10238   SQL-WIDTH 4\r
10239   ORDER 90\r
10240 \r
10241 ADD FIELD "LastModifiedUser" OF "FixedAsset" AS character \r
10242   DESCRIPTION "The user who last modified this record.  Maintained by a WRITE trigger."\r
10243   FORMAT "X(8)"\r
10244   INITIAL ""\r
10245   POSITION 11\r
10246   SQL-WIDTH 16\r
10247   LENGTH 0\r
10248   ORDER 100\r
10249 \r
10250 ADD FIELD "AuditRecordId" OF "FixedAsset" AS integer \r
10251   FORMAT "->,>>>,>>9"\r
10252   INITIAL "0"\r
10253   POSITION 12\r
10254   SQL-WIDTH 4\r
10255   ORDER 110\r
10256 \r
10257 ADD FIELD "NoteCode" OF "FixedAsset" AS integer \r
10258   DESCRIPTION "A unique code identifying this note."\r
10259   FORMAT ">>>>>9"\r
10260   INITIAL ?\r
10261   POSITION 13\r
10262   SQL-WIDTH 4\r
10263   ORDER 120\r
10264 \r
10265 ADD FIELD "AssetStatus" OF "FixedAsset" AS character \r
10266   FORMAT "X(4)"\r
10267   INITIAL ""\r
10268   LABEL "Status"\r
10269   POSITION 14\r
10270   SQL-WIDTH 8\r
10271   ORDER 130\r
10272 \r
10273 ADD FIELD "AssetType" OF "FixedAsset" AS character \r
10274   FORMAT "X(4)"\r
10275   INITIAL ""\r
10276   LABEL "Type"\r
10277   POSITION 15\r
10278   SQL-WIDTH 8\r
10279   ORDER 140\r
10280 \r
10281 ADD FIELD "ParentAssetCode" OF "FixedAsset" AS integer \r
10282   FORMAT ">>>>>9"\r
10283   INITIAL "0"\r
10284   POSITION 16\r
10285   SQL-WIDTH 4\r
10286   HELP "Asset code of parent asset that this asset belongs to (if applicable)"\r
10287   ORDER 150\r
10288 \r
10289 ADD FIELD "AssetReference" OF "FixedAsset" AS character \r
10290   FORMAT "X(50)"\r
10291   INITIAL ""\r
10292   LABEL "Reference"\r
10293   POSITION 17\r
10294   SQL-WIDTH 100\r
10295   HELP "Serial Number or external reference id"\r
10296   ORDER 160\r
10297 \r
10298 ADD FIELD "EntityType" OF "FixedAsset" AS character \r
10299   FORMAT "X"\r
10300   INITIAL ""\r
10301   POSITION 18\r
10302   SQL-WIDTH 2\r
10303   HELP "The type of accounting entity (company, property etc) owning this asset"\r
10304   ORDER 170\r
10305 \r
10306 ADD FIELD "EntityCode" OF "FixedAsset" AS integer \r
10307   FORMAT ">>999"\r
10308   INITIAL "0"\r
10309   POSITION 19\r
10310   SQL-WIDTH 4\r
10311   HELP "The accounting entity (company, property etc) with financial ownership of this asset"\r
10312   ORDER 180\r
10313 \r
10314 ADD FIELD "PurchaseFrom" OF "FixedAsset" AS character \r
10315   FORMAT "X(50)"\r
10316   INITIAL ""\r
10317   LABEL "Purchased from"\r
10318   POSITION 20\r
10319   SQL-WIDTH 100\r
10320   HELP "Person/company purchased from"\r
10321   ORDER 190\r
10322 \r
10323 ADD FIELD "WarrantyMonths" OF "FixedAsset" AS integer \r
10324   FORMAT "->>,>>9"\r
10325   INITIAL "0"\r
10326   POSITION 21\r
10327   SQL-WIDTH 4\r
10328   HELP "Length of warranty from purchase date, in months"\r
10329   ORDER 200\r
10330 \r
10331 ADD FIELD "NextDepreciationDate" OF "FixedAsset" AS date \r
10332   FORMAT "99/99/9999"\r
10333   INITIAL ?\r
10334   POSITION 22\r
10335   SQL-WIDTH 4\r
10336   HELP "Next date to depreciating asset on"\r
10337   ORDER 210\r
10338 \r
10339 ADD FIELD "DepreciationFreq" OF "FixedAsset" AS character \r
10340   FORMAT "X(4)"\r
10341   INITIAL ""\r
10342   POSITION 23\r
10343   SQL-WIDTH 8\r
10344   HELP "Frequency of depreciation"\r
10345   ORDER 220\r
10346 \r
10347 ADD FIELD "SoldTo" OF "FixedAsset" AS character \r
10348   FORMAT "X(50)"\r
10349   INITIAL ""\r
10350   LABEL "Sold to"\r
10351   POSITION 24\r
10352   SQL-WIDTH 100\r
10353   HELP "Person / company sold to"\r
10354   ORDER 230\r
10355 \r
10356 ADD INDEX "XPKFixedAsset" ON "FixedAsset" \r
10357   AREA "Schema Area"\r
10358   UNIQUE\r
10359   PRIMARY\r
10360   INDEX-FIELD "AssetCode" ASCENDING \r
10361 \r
10362 ADD INDEX "XAK1FixedAsset" ON "FixedAsset" \r
10363   AREA "Schema Area"\r
10364   INDEX-FIELD "Active" ASCENDING \r
10365   INDEX-FIELD "AssetCode" ASCENDING \r
10366 \r
10367 ADD INDEX "XAK1ParentAsset" ON "FixedAsset" \r
10368   AREA "Schema Area"\r
10369   INDEX-FIELD "ParentAssetCode" ASCENDING \r
10370 \r
10371 ADD INDEX "XAK2Description" ON "FixedAsset" \r
10372   AREA "Schema Area"\r
10373   INDEX-FIELD "Description" ASCENDING \r
10374 \r
10375 ADD INDEX "XAK3FixedAsset" ON "FixedAsset" \r
10376   AREA "Schema Area"\r
10377   INDEX-FIELD "Active" ASCENDING \r
10378   INDEX-FIELD "Description" ASCENDING \r
10379 \r
10380 ADD TABLE "ReplCollisionLog"\r
10381   AREA "Schema Area"\r
10382   DESCRIPTION "Collision Log"\r
10383   DUMP-NAME "replcoll"\r
10384 \r
10385 ADD FIELD "CollisionID" OF "ReplCollisionLog" AS integer \r
10386   DESCRIPTION "Unique Key Field"\r
10387   FORMAT ">>>,>>>,>>9"\r
10388   INITIAL "0"\r
10389   LABEL "Collision ID"\r
10390   POSITION 2\r
10391   SQL-WIDTH 4\r
10392   COLUMN-LABEL "Coll Id"\r
10393   ORDER 10\r
10394 \r
10395 ADD FIELD "ReplId" OF "ReplCollisionLog" AS integer \r
10396   DESCRIPTION "Relates back to the original replication record involved."\r
10397   FORMAT ">>>,>>>,>>9"\r
10398   INITIAL "0"\r
10399   LABEL "Replication Id"\r
10400   POSITION 3\r
10401   SQL-WIDTH 4\r
10402   COLUMN-LABEL "Rep Id"\r
10403   ORDER 20\r
10404 \r
10405 ADD FIELD "TransActID" OF "ReplCollisionLog" AS integer \r
10406   DESCRIPTION "Progress DBTASKID. Groups all records in the same transaction. None of them will be replicated."\r
10407   FORMAT ">,>>>,>>>,>>9"\r
10408   INITIAL "0"\r
10409   LABEL "Transaction ID"\r
10410   POSITION 4\r
10411   SQL-WIDTH 4\r
10412   COLUMN-LABEL "Trans. ID"\r
10413   ORDER 30\r
10414 \r
10415 ADD FIELD "ReplDate" OF "ReplCollisionLog" AS date \r
10416   DESCRIPTION "The date applying to the data change"\r
10417   FORMAT "99/99/9999"\r
10418   INITIAL ?\r
10419   POSITION 5\r
10420   SQL-WIDTH 4\r
10421   COLUMN-LABEL-SA "C"\r
10422   ORDER 40\r
10423 \r
10424 ADD FIELD "ReplTime" OF "ReplCollisionLog" AS integer \r
10425   DESCRIPTION "The time that this record was last modified"\r
10426   FORMAT "->,>>>,>>9"\r
10427   INITIAL "0"\r
10428   POSITION 6\r
10429   SQL-WIDTH 4\r
10430   ORDER 50\r
10431 \r
10432 ADD FIELD "ReplEvent" OF "ReplCollisionLog" AS character \r
10433   DESCRIPTION "Create, Modify, Delete"\r
10434   FORMAT "X(8)"\r
10435   INITIAL ""\r
10436   LABEL "Event"\r
10437   POSITION 7\r
10438   SQL-WIDTH 16\r
10439   COLUMN-LABEL "Event"\r
10440   ORDER 60\r
10441 \r
10442 ADD FIELD "ReplBI" OF "ReplCollisionLog" AS raw \r
10443   DESCRIPTION "RAW image of record before it changed"\r
10444   FORMAT "X(8)"\r
10445   INITIAL ""\r
10446   POSITION 8\r
10447   SQL-WIDTH 16\r
10448   ORDER 70\r
10449 \r
10450 ADD FIELD "ReplAI" OF "ReplCollisionLog" AS raw \r
10451   DESCRIPTION "Raw image of record after it changed"\r
10452   FORMAT "X(8)"\r
10453   INITIAL ""\r
10454   POSITION 9\r
10455   SQL-WIDTH 16\r
10456   ORDER 80\r
10457 \r
10458 ADD FIELD "LoadFile" OF "ReplCollisionLog" AS character \r
10459   DESCRIPTION "Taken from the dump file name"\r
10460   FORMAT "X(12)"\r
10461   INITIAL ""\r
10462   POSITION 10\r
10463   SQL-WIDTH 24\r
10464   ORDER 90\r
10465 \r
10466 ADD FIELD "Collided" OF "ReplCollisionLog" AS logical \r
10467   DESCRIPTION "Indicates whether this record was the one that collided. If ""no"" then it was just an innocent bystander in a transaction that cuased a collision."\r
10468   FORMAT "yes/no"\r
10469   INITIAL "no"\r
10470   LABEL "Collision Record"\r
10471   POSITION 11\r
10472   SQL-WIDTH 1\r
10473   COLUMN-LABEL "Coll Rec"\r
10474   ORDER 100\r
10475 \r
10476 ADD FIELD "TableToRepl" OF "ReplCollisionLog" AS character \r
10477   DESCRIPTION "Name of the table replicated"\r
10478   FORMAT "X(32)"\r
10479   INITIAL ""\r
10480   LABEL "Table Name"\r
10481   POSITION 12\r
10482   SQL-WIDTH 64\r
10483   COLUMN-LABEL "Table"\r
10484   ORDER 110\r
10485 \r
10486 ADD INDEX "ReplColl" ON "ReplCollisionLog" \r
10487   AREA "Schema Area"\r
10488   UNIQUE\r
10489   PRIMARY\r
10490   INDEX-FIELD "CollisionID" ASCENDING \r
10491 \r
10492 ADD INDEX "ReplCollTrans" ON "ReplCollisionLog" \r
10493   AREA "Schema Area"\r
10494   INDEX-FIELD "TransActID" ASCENDING \r
10495   INDEX-FIELD "CollisionID" ASCENDING \r
10496 \r
10497 ADD INDEX "ReplDateTime" ON "ReplCollisionLog" \r
10498   AREA "Schema Area"\r
10499   INDEX-FIELD "ReplDate" ASCENDING \r
10500   INDEX-FIELD "ReplTime" ASCENDING \r
10501   INDEX-FIELD "CollisionID" ASCENDING \r
10502 \r
10503 ADD TABLE "ReplLoadRule"\r
10504   AREA "Schema Area"\r
10505   LABEL "Replication Load Rules"\r
10506   DESCRIPTION "List of tables to load at a particular site. This table is site specific."\r
10507   DUMP-NAME "replload"\r
10508 \r
10509 ADD FIELD "TableToLoad" OF "ReplLoadRule" AS character \r
10510   FORMAT "X(32)"\r
10511   INITIAL ""\r
10512   LABEL "Table Name"\r
10513   POSITION 2\r
10514   SQL-WIDTH 64\r
10515   COLUMN-LABEL "Table"\r
10516   HELP "Enter the name of the replicated table to load"\r
10517   ORDER 10\r
10518 \r
10519 ADD FIELD "Activity" OF "ReplLoadRule" AS character \r
10520   DESCRIPTION "The activity on which replication will take place.\r
10521 Create, Modify, Delete. CMD"\r
10522   FORMAT "X(3)"\r
10523   INITIAL "CMD"\r
10524   LABEL "Activity"\r
10525   POSITION 3\r
10526   SQL-WIDTH 6\r
10527   COLUMN-LABEL "Activity"\r
10528   HELP "Enter 'C'reate, 'M'odify and/or 'D'elete"\r
10529   ORDER 20\r
10530 \r
10531 ADD FIELD "SourceSystem" OF "ReplLoadRule" AS character \r
10532   DESCRIPTION "System from which data to replicated. "\r
10533   FORMAT "X(8)"\r
10534   INITIAL ""\r
10535   LABEL "Source System"\r
10536   POSITION 4\r
10537   SQL-WIDTH 16\r
10538   COLUMN-LABEL "Source"\r
10539   HELP "Source system for replication."\r
10540   ORDER 30\r
10541 \r
10542 ADD FIELD "CollisionDetect" OF "ReplLoadRule" AS logical \r
10543   DESCRIPTION "Detect for collisions"\r
10544   FORMAT "yes/no"\r
10545   INITIAL "yes"\r
10546   LABEL "Collision Detect"\r
10547   POSITION 5\r
10548   SQL-WIDTH 1\r
10549   COLUMN-LABEL "C.D."\r
10550   ORDER 50\r
10551 \r
10552 ADD FIELD "UniqueIndex" OF "ReplLoadRule" AS character \r
10553   FORMAT "X(32)"\r
10554   INITIAL ""\r
10555   LABEL "Unique Index"\r
10556   POSITION 6\r
10557   SQL-WIDTH 64\r
10558   COLUMN-LABEL "Index"\r
10559   ORDER 60\r
10560 \r
10561 ADD INDEX "ReplLoad" ON "ReplLoadRule" \r
10562   AREA "Schema Area"\r
10563   UNIQUE\r
10564   PRIMARY\r
10565   INDEX-FIELD "TableToLoad" ASCENDING \r
10566   INDEX-FIELD "SourceSystem" ASCENDING \r
10567 \r
10568 ADD TABLE "ReplLog"\r
10569   AREA "Schema Area"\r
10570   LABEL "Replication Log"\r
10571   DESCRIPTION "Replication log"\r
10572   DUMP-NAME "repllog"\r
10573 \r
10574 ADD FIELD "OfficeCode" OF "ReplLog" AS character \r
10575   FORMAT "X(4)"\r
10576   INITIAL ""\r
10577   LABEL "Office"\r
10578   POSITION 2\r
10579   SQL-WIDTH 8\r
10580   ORDER 10\r
10581 \r
10582 ADD FIELD "ReplId" OF "ReplLog" AS integer \r
10583   FORMAT ">>>,>>>,>>9"\r
10584   INITIAL "0"\r
10585   LABEL "Replication Id"\r
10586   POSITION 3\r
10587   SQL-WIDTH 4\r
10588   COLUMN-LABEL "Rep Id"\r
10589   ORDER 20\r
10590 \r
10591 ADD FIELD "TransActID" OF "ReplLog" AS integer \r
10592   DESCRIPTION "Progress DBTASKID"\r
10593   FORMAT ">,>>>,>>>,>>9"\r
10594   INITIAL "0"\r
10595   LABEL "Transaction ID"\r
10596   POSITION 4\r
10597   SQL-WIDTH 4\r
10598   COLUMN-LABEL "Trans. ID"\r
10599   ORDER 30\r
10600 \r
10601 ADD FIELD "TableToRepl" OF "ReplLog" AS character \r
10602   DESCRIPTION "Name of the table replicated"\r
10603   FORMAT "X(32)"\r
10604   INITIAL ""\r
10605   LABEL "Table Name"\r
10606   POSITION 5\r
10607   SQL-WIDTH 64\r
10608   COLUMN-LABEL "Table"\r
10609   ORDER 40\r
10610 \r
10611 ADD FIELD "ReplDate" OF "ReplLog" AS date \r
10612   DESCRIPTION "The date applying to the data change"\r
10613   FORMAT "99/99/9999"\r
10614   INITIAL ?\r
10615   POSITION 6\r
10616   SQL-WIDTH 4\r
10617   COLUMN-LABEL-SA "C"\r
10618   ORDER 50\r
10619 \r
10620 ADD FIELD "ReplTime" OF "ReplLog" AS integer \r
10621   DESCRIPTION "The time that this record was last modified"\r
10622   FORMAT "->,>>>,>>9"\r
10623   INITIAL "0"\r
10624   POSITION 7\r
10625   SQL-WIDTH 4\r
10626   ORDER 60\r
10627 \r
10628 ADD FIELD "ReplEvent" OF "ReplLog" AS character \r
10629   DESCRIPTION "Create, Modify, Delete"\r
10630   FORMAT "X(8)"\r
10631   INITIAL ""\r
10632   LABEL "Event"\r
10633   POSITION 8\r
10634   SQL-WIDTH 16\r
10635   COLUMN-LABEL "Event"\r
10636   ORDER 70\r
10637 \r
10638 ADD FIELD "ReplBI" OF "ReplLog" AS raw \r
10639   DESCRIPTION "RAW image of record before it changed"\r
10640   FORMAT "X(8)"\r
10641   INITIAL ""\r
10642   POSITION 9\r
10643   SQL-WIDTH 16\r
10644   ORDER 80\r
10645 \r
10646 ADD FIELD "ReplAI" OF "ReplLog" AS raw \r
10647   DESCRIPTION "Raw image of record after it changed"\r
10648   FORMAT "X(8)"\r
10649   INITIAL ""\r
10650   POSITION 10\r
10651   SQL-WIDTH 16\r
10652   ORDER 90\r
10653 \r
10654 ADD FIELD "DumpFile" OF "ReplLog" AS character \r
10655   FORMAT "X(12)"\r
10656   INITIAL ""\r
10657   POSITION 11\r
10658   SQL-WIDTH 24\r
10659   ORDER 100\r
10660 \r
10661 ADD FIELD "TableRowID" OF "ReplLog" AS recid \r
10662   FORMAT ">>>>>>9"\r
10663   INITIAL ?\r
10664   POSITION 12\r
10665   SQL-WIDTH 4\r
10666   ORDER 110\r
10667 \r
10668 ADD INDEX "ReplOffice" ON "ReplLog" \r
10669   AREA "Schema Area"\r
10670   PRIMARY\r
10671   INDEX-FIELD "OfficeCode" ASCENDING \r
10672   INDEX-FIELD "ReplId" ASCENDING \r
10673 \r
10674 ADD INDEX "ReplRowid" ON "ReplLog" \r
10675   AREA "Schema Area"\r
10676   INDEX-FIELD "TableToRepl" ASCENDING \r
10677   INDEX-FIELD "TransActID" ASCENDING \r
10678   INDEX-FIELD "TableRowID" ASCENDING \r
10679 \r
10680 ADD INDEX "ReplTransAct" ON "ReplLog" \r
10681   AREA "Schema Area"\r
10682   INDEX-FIELD "TransActID" ASCENDING \r
10683   INDEX-FIELD "ReplId" ASCENDING \r
10684 \r
10685 ADD TABLE "ReplTrigger"\r
10686   AREA "Schema Area"\r
10687   DESCRIPTION "Replication triggers to be created"\r
10688   DUMP-NAME "repltrig"\r
10689 \r
10690 ADD FIELD "TableToRepl" OF "ReplTrigger" AS character \r
10691   DESCRIPTION "Name of the table to replicate"\r
10692   FORMAT "X(32)"\r
10693   INITIAL ""\r
10694   LABEL "Table Name"\r
10695   POSITION 2\r
10696   SQL-WIDTH 64\r
10697   COLUMN-LABEL "Table"\r
10698   ORDER 10\r
10699 \r
10700 ADD FIELD "Activity" OF "ReplTrigger" AS character \r
10701   DESCRIPTION "The activity on which replication will take place.\r
10702 Create, Modify, Delete. CMD"\r
10703   FORMAT "X(3)"\r
10704   INITIAL "CMD"\r
10705   LABEL "Activity"\r
10706   POSITION 3\r
10707   SQL-WIDTH 6\r
10708   COLUMN-LABEL "Activity"\r
10709   HELP "Enter 'C'reate, 'M'odify and/or 'D'elete"\r
10710   ORDER 20\r
10711 \r
10712 ADD INDEX "ReplTrigger" ON "ReplTrigger" \r
10713   AREA "Schema Area"\r
10714   PRIMARY\r
10715   INDEX-FIELD "TableToRepl" ASCENDING \r
10716 \r
10717 ADD TABLE "ToPost"\r
10718   AREA "Schema Area"\r
10719   DESCRIPTION "A list of batches that have been posted on a peer replication site"\r
10720   DUMP-NAME "topost"\r
10721 \r
10722 ADD FIELD "BatchCode" OF "ToPost" AS integer \r
10723   DESCRIPTION "The code of a batch of documents."\r
10724   FORMAT ">>>>>9"\r
10725   INITIAL "0"\r
10726   LABEL "Batch No."\r
10727   POSITION 2\r
10728   SQL-WIDTH 4\r
10729   COLUMN-LABEL "Batch"\r
10730   ORDER 10\r
10731 \r
10732 ADD FIELD "OperatorCode" OF "ToPost" AS integer \r
10733   DESCRIPTION "The staff contact code for the operator who updated this batch of documents."\r
10734   FORMAT ">>>>>>9"\r
10735   INITIAL "0"\r
10736   LABEL "Operator"\r
10737   POSITION 3\r
10738   SQL-WIDTH 4\r
10739   ORDER 20\r
10740   MANDATORY\r
10741 \r
10742 ADD FIELD "UpdatedAt" OF "ToPost" AS integer \r
10743   DESCRIPTION "The time that the batch update was completed."\r
10744   FORMAT "->,>>>,>>9"\r
10745   INITIAL "0"\r
10746   LABEL "Updated At"\r
10747   POSITION 4\r
10748   SQL-WIDTH 4\r
10749   COLUMN-LABEL-SA "C"\r
10750   ORDER 60\r
10751 \r
10752 ADD FIELD "UpdatedOn" OF "ToPost" AS date \r
10753   DESCRIPTION "The date on which the batch update was completed."\r
10754   FORMAT "99/99/9999"\r
10755   INITIAL ?\r
10756   LABEL "Updated On"\r
10757   POSITION 5\r
10758   SQL-WIDTH 4\r
10759   COLUMN-LABEL-SA "C"\r
10760   ORDER 70\r
10761 \r
10762 ADD FIELD "Description" OF "ToPost" AS character \r
10763   FORMAT "X(50)"\r
10764   INITIAL ""\r
10765   POSITION 6\r
10766   SQL-WIDTH 100\r
10767   HELP "A description of the documents in this batch"\r
10768   LENGTH 0\r
10769   ORDER 80\r
10770 \r
10771 ADD FIELD "UpdatedBy" OF "ToPost" AS character \r
10772   FORMAT "X(12)"\r
10773   INITIAL ""\r
10774   LABEL "Updated By"\r
10775   POSITION 7\r
10776   SQL-WIDTH 24\r
10777   ORDER 90\r
10778 \r
10779 ADD FIELD "OfficeCode" OF "ToPost" AS character \r
10780   DESCRIPTION "The office at which this batch was originally posted"\r
10781   FORMAT "X(4)"\r
10782   INITIAL ""\r
10783   LABEL "Office"\r
10784   POSITION 8\r
10785   SQL-WIDTH 8\r
10786   ORDER 100\r
10787 \r
10788 ADD FIELD "PostStatus" OF "ToPost" AS character \r
10789   FORMAT "X(4)"\r
10790   INITIAL ""\r
10791   POSITION 9\r
10792   SQL-WIDTH 8\r
10793   ORDER 110\r
10794 \r
10795 ADD INDEX "XPKToPost" ON "ToPost" \r
10796   AREA "Schema Area"\r
10797   UNIQUE\r
10798   PRIMARY\r
10799   INDEX-FIELD "BatchCode" ASCENDING \r
10800 \r
10801 ADD INDEX "XAK1ToPost" ON "ToPost" \r
10802   AREA "Schema Area"\r
10803   INDEX-FIELD "OfficeCode" ASCENDING \r
10804   INDEX-FIELD "PostStatus" ASCENDING \r
10805   INDEX-FIELD "BatchCode" ASCENDING \r
10806 \r
10807 ADD TABLE "ProjectExpenseCategory"\r
10808   AREA "Schema Area"\r
10809   DUMP-NAME "prjxpcat"\r
10810 \r
10811 ADD FIELD "ProjectExpenseCategory" OF "ProjectExpenseCategory" AS character \r
10812   FORMAT "X(4)"\r
10813   INITIAL ""\r
10814   LABEL "Type"\r
10815   POSITION 2\r
10816   SQL-WIDTH 8\r
10817   ORDER 10\r
10818   MANDATORY\r
10819 \r
10820 ADD FIELD "Description" OF "ProjectExpenseCategory" AS character \r
10821   FORMAT "X(50)"\r
10822   INITIAL ""\r
10823   POSITION 3\r
10824   SQL-WIDTH 100\r
10825   ORDER 20\r
10826 \r
10827 ADD INDEX "XPKProjectExpenseCategory" ON "ProjectExpenseCategory" \r
10828   AREA "Schema Area"\r
10829   UNIQUE\r
10830   PRIMARY\r
10831   INDEX-FIELD "ProjectExpenseCategory" ASCENDING \r
10832 \r
10833 ADD TABLE "ProjectType"\r
10834   AREA "Schema Area"\r
10835   DUMP-NAME "prjtype"\r
10836 \r
10837 ADD FIELD "ProjectType" OF "ProjectType" AS character \r
10838   FORMAT "X(4)"\r
10839   INITIAL ""\r
10840   LABEL "Type"\r
10841   POSITION 2\r
10842   SQL-WIDTH 8\r
10843   ORDER 10\r
10844   MANDATORY\r
10845 \r
10846 ADD FIELD "Description" OF "ProjectType" AS character \r
10847   FORMAT "X(50)"\r
10848   INITIAL ""\r
10849   POSITION 3\r
10850   SQL-WIDTH 100\r
10851   ORDER 20\r
10852 \r
10853 ADD INDEX "XPKProjectType" ON "ProjectType" \r
10854   AREA "Schema Area"\r
10855   UNIQUE\r
10856   PRIMARY\r
10857   INDEX-FIELD "ProjectType" ASCENDING \r
10858 \r
10859 ADD TABLE "Variation"\r
10860   AREA "Schema Area"\r
10861   DUMP-NAME "variatio"\r
10862   TABLE-TRIGGER "DELETE" OVERRIDE PROCEDURE "devaritn.p" CRC "?" \r
10863   TABLE-TRIGGER "WRITE" OVERRIDE PROCEDURE "wrvaritn.p" CRC "?" \r
10864 \r
10865 ADD FIELD "ProjectCode" OF "Variation" AS integer \r
10866   FORMAT "99999"\r
10867   INITIAL "0"\r
10868   POSITION 2\r
10869   SQL-WIDTH 4\r
10870   ORDER 10\r
10871 \r
10872 ADD FIELD "VariationCode" OF "Variation" AS integer \r
10873   FORMAT ">>>>9"\r
10874   INITIAL "0"\r
10875   POSITION 3\r
10876   SQL-WIDTH 4\r
10877   ORDER 20\r
10878 \r
10879 ADD FIELD "VariationType" OF "Variation" AS character \r
10880   FORMAT "X(4)"\r
10881   INITIAL ""\r
10882   LABEL "Type"\r
10883   POSITION 4\r
10884   SQL-WIDTH 8\r
10885   ORDER 30\r
10886 \r
10887 ADD FIELD "VariationDate" OF "Variation" AS date \r
10888   FORMAT "99/99/9999"\r
10889   INITIAL ?\r
10890   POSITION 5\r
10891   SQL-WIDTH 4\r
10892   ORDER 40\r
10893 \r
10894 ADD FIELD "Reason" OF "Variation" AS character \r
10895   FORMAT "X(50)"\r
10896   INITIAL ""\r
10897   POSITION 6\r
10898   SQL-WIDTH 100\r
10899   ORDER 50\r
10900 \r
10901 ADD FIELD "Approvers" OF "Variation" AS character \r
10902   FORMAT "X(4)"\r
10903   INITIAL ""\r
10904   POSITION 7\r
10905   SQL-WIDTH 30\r
10906   EXTENT 3\r
10907   ORDER 60\r
10908 \r
10909 ADD FIELD "VariationCategory" OF "Variation" AS character \r
10910   FORMAT "X(4)"\r
10911   INITIAL ""\r
10912   LABEL "Category"\r
10913   POSITION 8\r
10914   SQL-WIDTH 8\r
10915   ORDER 70\r
10916 \r
10917 ADD INDEX "XPKVariations" ON "Variation" \r
10918   AREA "Schema Area"\r
10919   UNIQUE\r
10920   PRIMARY\r
10921   INDEX-FIELD "ProjectCode" ASCENDING \r
10922   INDEX-FIELD "VariationCode" ASCENDING \r
10923 \r
10924 ADD INDEX "XAK1Variations" ON "Variation" \r
10925   AREA "Schema Area"\r
10926   INDEX-FIELD "ProjectCode" ASCENDING \r
10927   INDEX-FIELD "VariationDate" ASCENDING \r
10928 \r
10929 ADD INDEX "XAK2Variations" ON "Variation" \r
10930   AREA "Schema Area"\r
10931   UNIQUE\r
10932   INDEX-FIELD "ProjectCode" ASCENDING \r
10933   INDEX-FIELD "VariationType" ASCENDING \r
10934   INDEX-FIELD "VariationDate" ASCENDING \r
10935   INDEX-FIELD "VariationCode" ASCENDING \r
10936 \r
10937 ADD TABLE "VariationFlow"\r
10938   AREA "Schema Area"\r
10939   DUMP-NAME "var-flow"\r
10940   TABLE-TRIGGER "DELETE" OVERRIDE PROCEDURE "devarflw.p" CRC "?" \r
10941   TABLE-TRIGGER "WRITE" OVERRIDE PROCEDURE "wrvarflw.p" CRC "?" \r
10942 \r
10943 ADD FIELD "ProjectCode" OF "VariationFlow" AS integer \r
10944   FORMAT "99999"\r
10945   INITIAL "0"\r
10946   POSITION 2\r
10947   SQL-WIDTH 4\r
10948   ORDER 10\r
10949 \r
10950 ADD FIELD "VariationCode" OF "VariationFlow" AS integer \r
10951   FORMAT ">>>>9"\r
10952   INITIAL "0"\r
10953   POSITION 3\r
10954   SQL-WIDTH 4\r
10955   ORDER 20\r
10956 \r
10957 ADD FIELD "AccountCode" OF "VariationFlow" AS decimal \r
10958   DESCRIPTION "The code of the account."\r
10959   FORMAT "9999.99"\r
10960   INITIAL "0000.00"\r
10961   LABEL "Account"\r
10962   POSITION 4\r
10963   SQL-WIDTH 17\r
10964   DECIMALS 2\r
10965   ORDER 30\r
10966 \r
10967 ADD FIELD "MonthCode" OF "VariationFlow" AS integer \r
10968   DESCRIPTION "The code of the month that this account applies to."\r
10969   FORMAT ">>>>>9"\r
10970   INITIAL ?\r
10971   LABEL "Month"\r
10972   POSITION 5\r
10973   SQL-WIDTH 4\r
10974   ORDER 40\r
10975 \r
10976 ADD FIELD "Amount" OF "VariationFlow" AS decimal \r
10977   FORMAT "->>>,>>>,>>9.99"\r
10978   INITIAL "0"\r
10979   POSITION 6\r
10980   SQL-WIDTH 17\r
10981   COLUMN-LABEL-SA "C"\r
10982   DECIMALS 2\r
10983   ORDER 50\r
10984 \r
10985 ADD INDEX "XPKVariationFlows" ON "VariationFlow" \r
10986   AREA "Schema Area"\r
10987   UNIQUE\r
10988   PRIMARY\r
10989   INDEX-FIELD "ProjectCode" ASCENDING \r
10990   INDEX-FIELD "VariationCode" ASCENDING \r
10991   INDEX-FIELD "AccountCode" ASCENDING \r
10992   INDEX-FIELD "MonthCode" ASCENDING \r
10993 \r
10994 ADD INDEX "XAK1VariationFlows" ON "VariationFlow" \r
10995   AREA "Schema Area"\r
10996   INDEX-FIELD "ProjectCode" ASCENDING \r
10997   INDEX-FIELD "AccountCode" ASCENDING \r
10998   INDEX-FIELD "MonthCode" ASCENDING \r
10999 \r
11000 ADD TABLE "VariationType"\r
11001   AREA "Schema Area"\r
11002   DUMP-NAME "vartype"\r
11003 \r
11004 ADD FIELD "VariationType" OF "VariationType" AS character \r
11005   FORMAT "X(4)"\r
11006   INITIAL ""\r
11007   LABEL "Type"\r
11008   POSITION 2\r
11009   SQL-WIDTH 8\r
11010   ORDER 10\r
11011   MANDATORY\r
11012 \r
11013 ADD FIELD "Description" OF "VariationType" AS character \r
11014   FORMAT "X(50)"\r
11015   INITIAL ""\r
11016   POSITION 3\r
11017   SQL-WIDTH 100\r
11018   ORDER 20\r
11019 \r
11020 ADD INDEX "XPKVariationType" ON "VariationType" \r
11021   AREA "Schema Area"\r
11022   UNIQUE\r
11023   PRIMARY\r
11024   INDEX-FIELD "VariationType" ASCENDING \r
11025 \r
11026 ADD TABLE "RentCharge"\r
11027   AREA "Schema Area"\r
11028   DUMP-NAME "rentchag"\r
11029   TABLE-TRIGGER "DELETE" OVERRIDE PROCEDURE "derntchg.p" CRC "?" \r
11030   TABLE-TRIGGER "WRITE" OVERRIDE PROCEDURE "wrrntchg.p" CRC "?" \r
11031 \r
11032 ADD FIELD "TenancyLeaseCode" OF "RentCharge" AS integer \r
11033   DESCRIPTION "The tenancy lease  that this charge relates to"\r
11034   FORMAT "99999"\r
11035   INITIAL "0"\r
11036   LABEL "Code"\r
11037   POSITION 2\r
11038   SQL-WIDTH 4\r
11039   ORDER 10\r
11040 \r
11041 ADD FIELD "SequenceCode" OF "RentCharge" AS integer \r
11042   DESCRIPTION "This code groups sets of related charges for a particular lease."\r
11043   FORMAT "99"\r
11044   INITIAL "0"\r
11045   POSITION 3\r
11046   SQL-WIDTH 4\r
11047   ORDER 15\r
11048 \r
11049 ADD FIELD "RentChargeType" OF "RentCharge" AS character \r
11050   DESCRIPTION "The primary type of charge"\r
11051   FORMAT "X(4)"\r
11052   INITIAL ""\r
11053   POSITION 4\r
11054   SQL-WIDTH 8\r
11055   ORDER 20\r
11056 \r
11057 ADD FIELD "Description" OF "RentCharge" AS character \r
11058   DESCRIPTION "A brief description of this charge"\r
11059   FORMAT "X(50)"\r
11060   INITIAL ""\r
11061   POSITION 5\r
11062   SQL-WIDTH 100\r
11063   ORDER 90\r
11064 \r
11065 ADD FIELD "AccountCode" OF "RentCharge" AS decimal \r
11066   DESCRIPTION "The account against which this charge applies. If this is not set, then the account on the charge type will be used."\r
11067   FORMAT "9999.99"\r
11068   INITIAL "0"\r
11069   LABEL "Account"\r
11070   POSITION 6\r
11071   SQL-WIDTH 17\r
11072   COLUMN-LABEL-SA "C"\r
11073   DECIMALS 2\r
11074   ORDER 100\r
11075   MANDATORY\r
11076 \r
11077 ADD FIELD "EntityType" OF "RentCharge" AS character \r
11078   DESCRIPTION "A reference to the entity types table indicating the type of entity against which this charge applies (Company, Property, Project, Creditor or Tenant)."\r
11079   FORMAT "X"\r
11080   INITIAL ""\r
11081   LABEL "Entity type"\r
11082   POSITION 7\r
11083   SQL-WIDTH 2\r
11084   COLUMN-LABEL "Type"\r
11085   COLUMN-LABEL-SA "C"\r
11086   LENGTH 0\r
11087   ORDER 110\r
11088   MANDATORY\r
11089 \r
11090 ADD FIELD "EntityCode" OF "RentCharge" AS integer \r
11091   FORMAT "99999"\r
11092   INITIAL "0"\r
11093   LABEL "Code"\r
11094   POSITION 8\r
11095   SQL-WIDTH 4\r
11096   COLUMN-LABEL-SA "C"\r
11097   ORDER 120\r
11098 \r
11099 ADD FIELD "CurrentAnnualRental" OF "RentCharge" AS decimal \r
11100   DESCRIPTION "The last rent charged pro-rated to an annualised rental"\r
11101   FORMAT "->>,>>>,>>9.99"\r
11102   INITIAL "0"\r
11103   POSITION 9\r
11104   SQL-WIDTH 17\r
11105   HELP "The last rent charged pro-rated to an annualised rental"\r
11106   DECIMALS 2\r
11107   ORDER 40\r
11108 \r
11109 ADD FIELD "CurrentPeriodRental" OF "RentCharge" AS decimal \r
11110   DESCRIPTION "The actual last rent charged for a period, usually monthly"\r
11111   FORMAT "->>,>>>,>>9.99"\r
11112   INITIAL "0"\r
11113   POSITION 10\r
11114   SQL-WIDTH 17\r
11115   HELP "The actual last rent charged for a period, usually monthly"\r
11116   DECIMALS 2\r
11117   ORDER 50\r
11118 \r
11119 ADD FIELD "CurrentTotal" OF "RentCharge" AS decimal \r
11120   DESCRIPTION "The annualised total of the RentChargeLines currently in effect"\r
11121   FORMAT "->>,>>>,>>9.99"\r
11122   INITIAL "0"\r
11123   POSITION 11\r
11124   SQL-WIDTH 17\r
11125   HELP "The annualised total of the RentChargeLines currently in effect"\r
11126   DECIMALS 2\r
11127   ORDER 60\r
11128 \r
11129 ADD INDEX "XPKRentCharge" ON "RentCharge" \r
11130   AREA "Schema Area"\r
11131   UNIQUE\r
11132   PRIMARY\r
11133   INDEX-FIELD "TenancyLeaseCode" ASCENDING \r
11134   INDEX-FIELD "SequenceCode" ASCENDING \r
11135 \r
11136 ADD INDEX "XAK1RentCharge" ON "RentCharge" \r
11137   AREA "Schema Area"\r
11138   UNIQUE\r
11139   INDEX-FIELD "TenancyLeaseCode" ASCENDING \r
11140   INDEX-FIELD "RentChargeType" ASCENDING \r
11141   INDEX-FIELD "SequenceCode" ASCENDING \r
11142 \r
11143 ADD TABLE "RentChargeLine"\r
11144   AREA "Schema Area"\r
11145   DESCRIPTION "Stores a schedule of rent charges against a lease over time including rent review type\r
11146 information"\r
11147   DUMP-NAME "rentchar"\r
11148   TABLE-TRIGGER "WRITE" OVERRIDE PROCEDURE "wrrchgln.p" CRC "?" \r
11149 \r
11150 ADD FIELD "TenancyLeaseCode" OF "RentChargeLine" AS integer \r
11151   DESCRIPTION "The tenancy lease  that this charge relates to"\r
11152   FORMAT "99999"\r
11153   INITIAL "0"\r
11154   LABEL "Code"\r
11155   POSITION 2\r
11156   SQL-WIDTH 4\r
11157   ORDER 10\r
11158 \r
11159 ADD FIELD "Amount" OF "RentChargeLine" AS decimal \r
11160   FORMAT "->>>,>>>,>>9.99"\r
11161   INITIAL "0"\r
11162   POSITION 3\r
11163   SQL-WIDTH 17\r
11164   COLUMN-LABEL-SA "C"\r
11165   DECIMALS 2\r
11166   ORDER 60\r
11167 \r
11168 ADD FIELD "StartDate" OF "RentChargeLine" AS date \r
11169   DESCRIPTION "The date from which charging starts"\r
11170   FORMAT "99/99/9999"\r
11171   INITIAL ?\r
11172   POSITION 4\r
11173   SQL-WIDTH 4\r
11174   ORDER 30\r
11175 \r
11176 ADD FIELD "EndDate" OF "RentChargeLine" AS date \r
11177   DESCRIPTION "The date when charging ceases"\r
11178   FORMAT "99/99/9999"\r
11179   INITIAL ?\r
11180   POSITION 5\r
11181   SQL-WIDTH 4\r
11182   ORDER 50\r
11183 \r
11184 ADD FIELD "LastChargedDate" OF "RentChargeLine" AS date \r
11185   DESCRIPTION "The date when this charge was last charged."\r
11186   FORMAT "99/99/9999"\r
11187   INITIAL ?\r
11188   POSITION 6\r
11189   SQL-WIDTH 4\r
11190   ORDER 70\r
11191 \r
11192 ADD FIELD "FrequencyCode" OF "RentChargeLine" AS character \r
11193   DESCRIPTION "The frequency with which charges are issued."\r
11194   FORMAT "X(4)"\r
11195   INITIAL ""\r
11196   POSITION 7\r
11197   SQL-WIDTH 8\r
11198   ORDER 80\r
11199 \r
11200 ADD FIELD "RentChargeLineStatus" OF "RentChargeLine" AS character \r
11201   DESCRIPTION "The status of this rent charge line\r
11202 "\r
11203   FORMAT "X(4)"\r
11204   INITIAL ""\r
11205   POSITION 8\r
11206   SQL-WIDTH 8\r
11207   ORDER 40\r
11208 \r
11209 ADD FIELD "SequenceCode" OF "RentChargeLine" AS integer \r
11210   DESCRIPTION "This code groups sets of related charges for a particular lease."\r
11211   FORMAT "99"\r
11212   INITIAL "0"\r
11213   POSITION 9\r
11214   SQL-WIDTH 4\r
11215   ORDER 20\r
11216 \r
11217 ADD FIELD "LastModifiedDate" OF "RentChargeLine" AS date \r
11218   DESCRIPTION "The date when this record was last modified.  Maintained by a WRITE trigger."\r
11219   FORMAT "99/99/9999"\r
11220   INITIAL "1/1/0001"\r
11221   POSITION 10\r
11222   SQL-WIDTH 4\r
11223   ORDER 160\r
11224   MANDATORY\r
11225 \r
11226 ADD FIELD "LastModifiedTime" OF "RentChargeLine" AS integer \r
11227   DESCRIPTION "The time that this record was last modified"\r
11228   FORMAT "->,>>>,>>9"\r
11229   INITIAL "0"\r
11230   POSITION 11\r
11231   SQL-WIDTH 4\r
11232   ORDER 170\r
11233 \r
11234 ADD FIELD "LastModifiedUser" OF "RentChargeLine" AS character \r
11235   DESCRIPTION "The user who last modified this record.  Maintained by a WRITE trigger."\r
11236   FORMAT "X(8)"\r
11237   INITIAL ""\r
11238   POSITION 12\r
11239   SQL-WIDTH 16\r
11240   LENGTH 0\r
11241   ORDER 180\r
11242 \r
11243 ADD FIELD "AuditRecordId" OF "RentChargeLine" AS integer \r
11244   FORMAT "->,>>>,>>9"\r
11245   INITIAL "0"\r
11246   POSITION 13\r
11247   SQL-WIDTH 4\r
11248   ORDER 190\r
11249 \r
11250 ADD FIELD "DateCommitted" OF "RentChargeLine" AS date \r
11251   DESCRIPTION "The date that this scheuled charge was committed for charging"\r
11252   FORMAT "99/99/9999"\r
11253   INITIAL ?\r
11254   POSITION 14\r
11255   SQL-WIDTH 4\r
11256   ORDER 200\r
11257 \r
11258 ADD FIELD "EstimatedNetRentAmount" OF "RentChargeLine" AS decimal \r
11259   FORMAT "->>>,>>>,>>9.99"\r
11260   INITIAL "0"\r
11261   POSITION 15\r
11262   SQL-WIDTH 17\r
11263   COLUMN-LABEL-SA "C"\r
11264   DECIMALS 2\r
11265   ORDER 210\r
11266 \r
11267 ADD INDEX "XPKRentChargeLine" ON "RentChargeLine" \r
11268   AREA "Schema Area"\r
11269   PRIMARY\r
11270   INDEX-FIELD "TenancyLeaseCode" ASCENDING \r
11271   INDEX-FIELD "SequenceCode" ASCENDING \r
11272   INDEX-FIELD "StartDate" ASCENDING \r
11273 \r
11274 ADD TABLE "RentChargeLineStatus"\r
11275   AREA "Schema Area"\r
11276   DUMP-NAME "rentchas"\r
11277 \r
11278 ADD FIELD "RentChargeLineStatus" OF "RentChargeLineStatus" AS character \r
11279   DESCRIPTION "The status of this rent charge line i.e\r
11280 REVW - Under review ( for a rent review )\r
11281 INCO - Incomplete\r
11282 COMP - Complete"\r
11283   FORMAT "X(4)"\r
11284   INITIAL ""\r
11285   POSITION 2\r
11286   SQL-WIDTH 8\r
11287   ORDER 10\r
11288 \r
11289 ADD FIELD "Description" OF "RentChargeLineStatus" AS character \r
11290   DESCRIPTION "A brief description of this status"\r
11291   FORMAT "X(50)"\r
11292   INITIAL ""\r
11293   POSITION 3\r
11294   SQL-WIDTH 100\r
11295   ORDER 20\r
11296 \r
11297 ADD INDEX "XPKRentChargeLineStatus" ON "RentChargeLineStatus" \r
11298   AREA "Schema Area"\r
11299   UNIQUE\r
11300   PRIMARY\r
11301   INDEX-FIELD "RentChargeLineStatus" ASCENDING \r
11302 \r
11303 ADD TABLE "RentChargeType"\r
11304   AREA "Schema Area"\r
11305   DESCRIPTION "The primary type of rental charge\r
11306 e.g RENT, CLEAN etc."\r
11307   DUMP-NAME "rentchat"\r
11308 \r
11309 ADD FIELD "RentChargeType" OF "RentChargeType" AS character \r
11310   FORMAT "X(4)"\r
11311   INITIAL ""\r
11312   POSITION 2\r
11313   SQL-WIDTH 8\r
11314   ORDER 10\r
11315 \r
11316 ADD FIELD "Description" OF "RentChargeType" AS character \r
11317   FORMAT "X(50)"\r
11318   INITIAL ""\r
11319   POSITION 3\r
11320   SQL-WIDTH 100\r
11321   ORDER 20\r
11322 \r
11323 ADD FIELD "AccountCode" OF "RentChargeType" AS decimal \r
11324   DESCRIPTION "The account of the property against which this charge applies."\r
11325   FORMAT "9999.99"\r
11326   INITIAL "0"\r
11327   LABEL "Account"\r
11328   POSITION 4\r
11329   SQL-WIDTH 17\r
11330   COLUMN-LABEL-SA "C"\r
11331   DECIMALS 2\r
11332   ORDER 30\r
11333   MANDATORY\r
11334 \r
11335 ADD INDEX "XPKRentChargeType" ON "RentChargeType" \r
11336   AREA "Schema Area"\r
11337   UNIQUE\r
11338   PRIMARY\r
11339   INDEX-FIELD "RentChargeType" ASCENDING \r
11340 \r
11341 ADD TABLE "UnitType"\r
11342   AREA "Schema Area"\r
11343   DUMP-NAME "unittype"\r
11344 \r
11345 ADD FIELD "UnitType" OF "UnitType" AS character \r
11346   FORMAT "X(4)"\r
11347   INITIAL ""\r
11348   LABEL "Type"\r
11349   POSITION 2\r
11350   SQL-WIDTH 8\r
11351   ORDER 10\r
11352 \r
11353 ADD FIELD "Description" OF "UnitType" AS character \r
11354   FORMAT "X(50)"\r
11355   INITIAL ""\r
11356   POSITION 3\r
11357   SQL-WIDTH 100\r
11358   ORDER 20\r
11359 \r
11360 ADD FIELD "AllowInteger" OF "UnitType" AS logical \r
11361   FORMAT "yes/no"\r
11362   INITIAL "no"\r
11363   POSITION 4\r
11364   SQL-WIDTH 1\r
11365   ORDER 30\r
11366 \r
11367 ADD FIELD "AllowReal" OF "UnitType" AS logical \r
11368   FORMAT "yes/no"\r
11369   INITIAL "no"\r
11370   POSITION 5\r
11371   SQL-WIDTH 1\r
11372   ORDER 40\r
11373 \r
11374 ADD FIELD "AllowNegative" OF "UnitType" AS logical \r
11375   FORMAT "yes/no"\r
11376   INITIAL "no"\r
11377   POSITION 6\r
11378   SQL-WIDTH 1\r
11379   ORDER 50\r
11380 \r
11381 ADD INDEX "XPKUnitTypes" ON "UnitType" \r
11382   AREA "Schema Area"\r
11383   UNIQUE\r
11384   PRIMARY\r
11385   INDEX-FIELD "UnitType" ASCENDING \r
11386 \r
11387 ADD TABLE "Client"\r
11388   AREA "Schema Area"\r
11389   DUMP-NAME "client"\r
11390 \r
11391 ADD FIELD "ClientCode" OF "Client" AS character \r
11392   FORMAT "X(8)"\r
11393   INITIAL ""\r
11394   POSITION 2\r
11395   SQL-WIDTH 16\r
11396   ORDER 10\r
11397 \r
11398 ADD FIELD "Name" OF "Client" AS character \r
11399   FORMAT "X(50)"\r
11400   INITIAL ""\r
11401   POSITION 3\r
11402   SQL-WIDTH 100\r
11403   ORDER 20\r
11404 \r
11405 ADD FIELD "LegalName" OF "Client" AS character \r
11406   FORMAT "X(100)"\r
11407   INITIAL ""\r
11408   POSITION 4\r
11409   SQL-WIDTH 200\r
11410   ORDER 30\r
11411 \r
11412 ADD FIELD "AccountsContact" OF "Client" AS integer \r
11413   DESCRIPTION "A person with whom the accounts should be discussed.  Billing and payment address"\r
11414   FORMAT ">>>>>9"\r
11415   INITIAL "0"\r
11416   POSITION 5\r
11417   SQL-WIDTH 4\r
11418   ORDER 40\r
11419 \r
11420 ADD FIELD "PropertyContact" OF "Client" AS integer \r
11421   DESCRIPTION "A person with whom the property management issues should be discussed."\r
11422   FORMAT ">>>>>9"\r
11423   INITIAL "0"\r
11424   POSITION 6\r
11425   SQL-WIDTH 4\r
11426   ORDER 50\r
11427 \r
11428 ADD FIELD "TaxNo" OF "Client" AS character \r
11429   FORMAT "X(20)"\r
11430   INITIAL ""\r
11431   POSITION 7\r
11432   SQL-WIDTH 40\r
11433   ORDER 60\r
11434 \r
11435 ADD FIELD "LogoRoutine" OF "Client" AS character \r
11436   FORMAT "X(50)"\r
11437   INITIAL ""\r
11438   POSITION 8\r
11439   SQL-WIDTH 100\r
11440   ORDER 70\r
11441 \r
11442 ADD FIELD "RemittanceAddress" OF "Client" AS character \r
11443   FORMAT "X(256)"\r
11444   INITIAL ""\r
11445   LABEL "Remit to"\r
11446   POSITION 9\r
11447   SQL-WIDTH 512\r
11448   VIEW-AS "VIEW-AS EDITOR SIZE 78 BY 5 SCROLLBAR-HORIZONTAL SCROLLBAR-VERTICAL NO-WORD-WRAP"\r
11449   ORDER 80\r
11450 \r
11451 ADD FIELD "DefaultChequeAccount" OF "Client" AS character \r
11452   FORMAT "X(4)"\r
11453   INITIAL ""\r
11454   LABEL "Cheque a/c"\r
11455   POSITION 10\r
11456   SQL-WIDTH 8\r
11457   ORDER 90\r
11458 \r
11459 ADD FIELD "DefaultReceiptAccount" OF "Client" AS character \r
11460   FORMAT "X(4)"\r
11461   INITIAL ""\r
11462   LABEL "Receipt a/c"\r
11463   POSITION 11\r
11464   SQL-WIDTH 8\r
11465   ORDER 100\r
11466 \r
11467 ADD INDEX "XPKClients" ON "Client" \r
11468   AREA "Schema Area"\r
11469   UNIQUE\r
11470   PRIMARY\r
11471   INDEX-FIELD "ClientCode" ASCENDING \r
11472 \r
11473 ADD TABLE "PaymentStyle"\r
11474   AREA "Schema Area"\r
11475   DUMP-NAME "paystyle"\r
11476 \r
11477 ADD FIELD "PaymentStyle" OF "PaymentStyle" AS character \r
11478   FORMAT "X(4)"\r
11479   INITIAL ""\r
11480   LABEL "Pay By"\r
11481   POSITION 2\r
11482   SQL-WIDTH 8\r
11483   ORDER 10\r
11484 \r
11485 ADD FIELD "Description" OF "PaymentStyle" AS character \r
11486   FORMAT "X(50)"\r
11487   INITIAL ""\r
11488   POSITION 3\r
11489   SQL-WIDTH 100\r
11490   ORDER 20\r
11491 \r
11492 ADD FIELD "Payments" OF "PaymentStyle" AS logical \r
11493   FORMAT "yes/no"\r
11494   INITIAL "no"\r
11495   POSITION 4\r
11496   SQL-WIDTH 1\r
11497   VIEW-AS "VIEW-AS TOGGLE-BOX"\r
11498   ORDER 30\r
11499 \r
11500 ADD FIELD "Receipts" OF "PaymentStyle" AS logical \r
11501   FORMAT "yes/no"\r
11502   INITIAL "no"\r
11503   POSITION 5\r
11504   SQL-WIDTH 1\r
11505   VIEW-AS "VIEW-AS TOGGLE-BOX"\r
11506   ORDER 40\r
11507 \r
11508 ADD INDEX "XPKPaymentStyles" ON "PaymentStyle" \r
11509   AREA "Schema Area"\r
11510   UNIQUE\r
11511   PRIMARY\r
11512   INDEX-FIELD "PaymentStyle" ASCENDING \r
11513 \r
11514 ADD TABLE "DebtClassification"\r
11515   AREA "Schema Area"\r
11516   DUMP-NAME "debtclas"\r
11517 \r
11518 ADD FIELD "DebtClassification" OF "DebtClassification" AS character \r
11519   FORMAT "X(4)"\r
11520   INITIAL ""\r
11521   LABEL "Debt Class"\r
11522   POSITION 2\r
11523   SQL-WIDTH 8\r
11524   COLUMN-LABEL ""\r
11525   ORDER 10\r
11526 \r
11527 ADD FIELD "Description" OF "DebtClassification" AS character \r
11528   FORMAT "X(50)"\r
11529   INITIAL ""\r
11530   POSITION 3\r
11531   SQL-WIDTH 100\r
11532   ORDER 20\r
11533 \r
11534 ADD INDEX "XPKDebtClassifications" ON "DebtClassification" \r
11535   AREA "Schema Area"\r
11536   UNIQUE\r
11537   PRIMARY\r
11538   INDEX-FIELD "DebtClassification" ASCENDING \r
11539 \r
11540 ADD TABLE "EntityContact"\r
11541   AREA "Schema Area"\r
11542   DUMP-NAME "econtact"\r
11543 \r
11544 ADD FIELD "EntityType" OF "EntityContact" AS character \r
11545   DESCRIPTION "A reference to the entity types table indicating the type of entity to which this contact applies (Company, Property, Project, Creditor or Tenant)."\r
11546   FORMAT "X"\r
11547   INITIAL ?\r
11548   LABEL "Entity type"\r
11549   POSITION 2\r
11550   SQL-WIDTH 2\r
11551   COLUMN-LABEL "T"\r
11552   COLUMN-LABEL-SA "C"\r
11553   ORDER 10\r
11554 \r
11555 ADD FIELD "EntityCode" OF "EntityContact" AS integer \r
11556   FORMAT "99999"\r
11557   INITIAL ?\r
11558   LABEL "Code"\r
11559   POSITION 3\r
11560   SQL-WIDTH 4\r
11561   COLUMN-LABEL-SA "C"\r
11562   ORDER 20\r
11563 \r
11564 ADD FIELD "EntityContactType" OF "EntityContact" AS character \r
11565   FORMAT "X(4)"\r
11566   INITIAL ""\r
11567   LABEL "Contact Type"\r
11568   POSITION 4\r
11569   SQL-WIDTH 8\r
11570   ORDER 30\r
11571 \r
11572 ADD FIELD "PersonCode" OF "EntityContact" AS integer \r
11573   FORMAT ">>>>99999"\r
11574   INITIAL "0"\r
11575   LABEL "Person"\r
11576   POSITION 5\r
11577   SQL-WIDTH 4\r
11578   ORDER 40\r
11579 \r
11580 ADD INDEX "XPKEntityContacts" ON "EntityContact" \r
11581   AREA "Schema Area"\r
11582   PRIMARY\r
11583   INDEX-FIELD "EntityType" ASCENDING \r
11584   INDEX-FIELD "EntityCode" ASCENDING \r
11585   INDEX-FIELD "EntityContactType" ASCENDING \r
11586 \r
11587 ADD INDEX "XAK1PersonCode" ON "EntityContact" \r
11588   AREA "Schema Area"\r
11589   INDEX-FIELD "PersonCode" ASCENDING \r
11590 \r
11591 ADD TABLE "EntityContactType"\r
11592   AREA "Schema Area"\r
11593   DUMP-NAME "ectctype"\r
11594 \r
11595 ADD FIELD "EntityContactType" OF "EntityContactType" AS character \r
11596   FORMAT "X(4)"\r
11597   INITIAL ""\r
11598   POSITION 2\r
11599   SQL-WIDTH 8\r
11600   ORDER 10\r
11601 \r
11602 ADD FIELD "EntityType" OF "EntityContactType" AS character \r
11603   DESCRIPTION "A reference to the entity types table indicating the type of entity against which this EntityContactType applies (Company, Property, Project, Creditor or Tenant)."\r
11604   FORMAT "X"\r
11605   INITIAL ?\r
11606   LABEL "Entity type"\r
11607   POSITION 3\r
11608   SQL-WIDTH 2\r
11609   COLUMN-LABEL "T"\r
11610   COLUMN-LABEL-SA "C"\r
11611   ORDER 20\r
11612 \r
11613 ADD FIELD "Description" OF "EntityContactType" AS character \r
11614   FORMAT "X(50)"\r
11615   INITIAL ""\r
11616   POSITION 4\r
11617   SQL-WIDTH 100\r
11618   ORDER 30\r
11619 \r
11620 ADD INDEX "XPKEntityContactTypes" ON "EntityContactType" \r
11621   AREA "Schema Area"\r
11622   UNIQUE\r
11623   PRIMARY\r
11624   INDEX-FIELD "EntityContactType" ASCENDING \r
11625   INDEX-FIELD "EntityType" ASCENDING \r
11626 \r
11627 ADD TABLE "VarianceClassification"\r
11628   AREA "Schema Area"\r
11629   DUMP-NAME "varclass"\r
11630 \r
11631 ADD FIELD "VarianceClassification" OF "VarianceClassification" AS character \r
11632   FORMAT "X(4)"\r
11633   INITIAL ""\r
11634   LABEL "Variance Class"\r
11635   POSITION 2\r
11636   SQL-WIDTH 8\r
11637   ORDER 10\r
11638 \r
11639 ADD FIELD "Description" OF "VarianceClassification" AS character \r
11640   FORMAT "X(50)"\r
11641   INITIAL ""\r
11642   POSITION 3\r
11643   SQL-WIDTH 100\r
11644   ORDER 20\r
11645 \r
11646 ADD INDEX "XPKVarianceClassifications" ON "VarianceClassification" \r
11647   AREA "Schema Area"\r
11648   UNIQUE\r
11649   PRIMARY\r
11650   INDEX-FIELD "VarianceClassification" ASCENDING \r
11651 \r
11652 ADD TABLE "ActivityStatus"\r
11653   AREA "Schema Area"\r
11654   DUMP-NAME "act-stat"\r
11655 \r
11656 ADD FIELD "ActivityStatus" OF "ActivityStatus" AS character \r
11657   FORMAT "X(4)"\r
11658   INITIAL ""\r
11659   POSITION 2\r
11660   SQL-WIDTH 8\r
11661   HELP "Status code for job, task, step"\r
11662   ORDER 10\r
11663 \r
11664 ADD FIELD "Description" OF "ActivityStatus" AS character \r
11665   FORMAT "X(50)"\r
11666   INITIAL ""\r
11667   POSITION 3\r
11668   SQL-WIDTH 100\r
11669   HELP "Description of the status"\r
11670   ORDER 20\r
11671 \r
11672 ADD INDEX "XPKActivityStatus" ON "ActivityStatus" \r
11673   AREA "Schema Area"\r
11674   UNIQUE\r
11675   PRIMARY\r
11676   INDEX-FIELD "ActivityStatus" ASCENDING \r
11677 \r
11678 ADD TABLE "AssetStatus"\r
11679   AREA "Schema Area"\r
11680   DUMP-NAME "ass-stat"\r
11681 \r
11682 ADD FIELD "AssetStatus" OF "AssetStatus" AS character \r
11683   FORMAT "X(4)"\r
11684   INITIAL ""\r
11685   LABEL "Status"\r
11686   POSITION 2\r
11687   SQL-WIDTH 8\r
11688   ORDER 10\r
11689 \r
11690 ADD FIELD "Description" OF "AssetStatus" AS character \r
11691   FORMAT "X(50)"\r
11692   INITIAL ""\r
11693   POSITION 3\r
11694   SQL-WIDTH 100\r
11695   ORDER 20\r
11696 \r
11697 ADD INDEX "XPKAssetStatus" ON "AssetStatus" \r
11698   AREA "Schema Area"\r
11699   UNIQUE\r
11700   PRIMARY\r
11701   INDEX-FIELD "AssetStatus" ASCENDING \r
11702 \r
11703 ADD TABLE "JobLog"\r
11704   AREA "Schema Area"\r
11705   DUMP-NAME "joblog"\r
11706   TABLE-TRIGGER "DELETE" OVERRIDE PROCEDURE "dejobjog.p" CRC "?" \r
11707 \r
11708 ADD FIELD "Joblogno" OF "JobLog" AS integer \r
11709   FORMAT ">>>>>>9"\r
11710   INITIAL "0"\r
11711   POSITION 2\r
11712   SQL-WIDTH 4\r
11713   HELP "Job / Call Number"\r
11714   ORDER 10\r
11715 \r
11716 ADD FIELD "ActivityStatus" OF "JobLog" AS character \r
11717   FORMAT "X(4)"\r
11718   INITIAL ""\r
11719   POSITION 3\r
11720   SQL-WIDTH 8\r
11721   HELP "Status of Job"\r
11722   ORDER 20\r
11723 \r
11724 ADD FIELD "ServiceRequestedBy" OF "JobLog" AS integer \r
11725   FORMAT ">>>>9"\r
11726   INITIAL "0"\r
11727   POSITION 4\r
11728   SQL-WIDTH 4\r
11729   HELP "Service requested by"\r
11730   ORDER 30\r
11731 \r
11732 ADD FIELD "Calldate" OF "JobLog" AS date \r
11733   FORMAT "99/99/9999"\r
11734   INITIAL ?\r
11735   POSITION 5\r
11736   SQL-WIDTH 4\r
11737   HELP "Date of call"\r
11738   ORDER 40\r
11739 \r
11740 ADD FIELD "CallTime" OF "JobLog" AS integer \r
11741   FORMAT ">>>>>9"\r
11742   INITIAL "0"\r
11743   POSITION 6\r
11744   SQL-WIDTH 4\r
11745   HELP "Time of call"\r
11746   ORDER 50\r
11747 \r
11748 ADD FIELD "ReceivedBy" OF "JobLog" AS integer \r
11749   FORMAT ">>>>9"\r
11750   INITIAL "0"\r
11751   POSITION 7\r
11752   SQL-WIDTH 4\r
11753   HELP "Request received by"\r
11754   ORDER 60\r
11755 \r
11756 ADD FIELD "ServiceDetails" OF "JobLog" AS character \r
11757   FORMAT "x(100)"\r
11758   INITIAL ""\r
11759   POSITION 8\r
11760   SQL-WIDTH 200\r
11761   HELP "Details of service request"\r
11762   ORDER 70\r
11763 \r
11764 ADD FIELD "CompletedOn" OF "JobLog" AS date \r
11765   FORMAT "99/99/9999"\r
11766   INITIAL ?\r
11767   POSITION 9\r
11768   SQL-WIDTH 4\r
11769   HELP "Date completed"\r
11770   ORDER 80\r
11771 \r
11772 ADD FIELD "CompletedBy" OF "JobLog" AS integer \r
11773   FORMAT ">>>>9"\r
11774   INITIAL "0"\r
11775   POSITION 10\r
11776   SQL-WIDTH 4\r
11777   HELP "Job completed by"\r
11778   ORDER 90\r
11779 \r
11780 ADD FIELD "Priority" OF "JobLog" AS integer \r
11781   FORMAT "9"\r
11782   INITIAL "0"\r
11783   POSITION 11\r
11784   SQL-WIDTH 4\r
11785   HELP "Priority of job; '1' is highest"\r
11786   ORDER 100\r
11787 \r
11788 ADD FIELD "ActionTaken" OF "JobLog" AS character \r
11789   FORMAT "x(100)"\r
11790   INITIAL ""\r
11791   POSITION 12\r
11792   SQL-WIDTH 200\r
11793   HELP "Description of service provided"\r
11794   ORDER 110\r
11795 \r
11796 ADD INDEX "XPKJobLog" ON "JobLog" \r
11797   AREA "Schema Area"\r
11798   UNIQUE\r
11799   PRIMARY\r
11800   INDEX-FIELD "Joblogno" ASCENDING \r
11801 \r
11802 ADD TABLE "FlowRule"\r
11803   AREA "Schema Area"\r
11804   DUMP-NAME "flowrule"\r
11805   TABLE-TRIGGER "WRITE" OVERRIDE PROCEDURE "wrflwrul.p" CRC "?" \r
11806 \r
11807 ADD FIELD "FlowTaskType" OF "FlowRule" AS character \r
11808   FORMAT "X(6)"\r
11809   INITIAL ""\r
11810   POSITION 2\r
11811   SQL-WIDTH 12\r
11812   ORDER 10\r
11813 \r
11814 ADD FIELD "FlowStepType" OF "FlowRule" AS character \r
11815   FORMAT "X(10)"\r
11816   INITIAL ""\r
11817   POSITION 3\r
11818   SQL-WIDTH 20\r
11819   ORDER 20\r
11820 \r
11821 ADD FIELD "FlowRuleCode" OF "FlowRule" AS character \r
11822   FORMAT "X(10)"\r
11823   INITIAL ""\r
11824   POSITION 4\r
11825   SQL-WIDTH 20\r
11826   ORDER 30\r
11827 \r
11828 ADD FIELD "FlowRuleType" OF "FlowRule" AS character \r
11829   FORMAT "X(6)"\r
11830   INITIAL ""\r
11831   POSITION 5\r
11832   SQL-WIDTH 12\r
11833   ORDER 40\r
11834 \r
11835 ADD FIELD "Description" OF "FlowRule" AS character \r
11836   FORMAT "X(50)"\r
11837   INITIAL ""\r
11838   POSITION 6\r
11839   SQL-WIDTH 100\r
11840   ORDER 50\r
11841 \r
11842 ADD FIELD "NextTaskType" OF "FlowRule" AS character \r
11843   FORMAT "X(6)"\r
11844   INITIAL ""\r
11845   POSITION 7\r
11846   SQL-WIDTH 12\r
11847   ORDER 60\r
11848 \r
11849 ADD FIELD "NextStepType" OF "FlowRule" AS character \r
11850   FORMAT "X(10)"\r
11851   INITIAL ""\r
11852   POSITION 8\r
11853   SQL-WIDTH 20\r
11854   ORDER 70\r
11855 \r
11856 ADD FIELD "Priority" OF "FlowRule" AS integer \r
11857   FORMAT "->>9"\r
11858   INITIAL "0"\r
11859   POSITION 9\r
11860   SQL-WIDTH 4\r
11861   ORDER 80\r
11862 \r
11863 ADD FIELD "ConditionProgram" OF "FlowRule" AS character \r
11864   FORMAT "X(50)"\r
11865   INITIAL ""\r
11866   POSITION 10\r
11867   SQL-WIDTH 100\r
11868   ORDER 90\r
11869 \r
11870 ADD FIELD "ConditionProgramParam" OF "FlowRule" AS character \r
11871   FORMAT "X(50)"\r
11872   INITIAL ""\r
11873   LABEL "Parameters"\r
11874   POSITION 11\r
11875   SQL-WIDTH 100\r
11876   ORDER 100\r
11877 \r
11878 ADD FIELD "ActionProgram" OF "FlowRule" AS character \r
11879   FORMAT "X(50)"\r
11880   INITIAL ""\r
11881   POSITION 12\r
11882   SQL-WIDTH 100\r
11883   ORDER 110\r
11884 \r
11885 ADD FIELD "ActionProgramParam" OF "FlowRule" AS character \r
11886   FORMAT "X(50)"\r
11887   INITIAL ""\r
11888   LABEL "Parameters"\r
11889   POSITION 13\r
11890   SQL-WIDTH 100\r
11891   ORDER 120\r
11892 \r
11893 ADD INDEX "XPKRule" ON "FlowRule" \r
11894   AREA "Schema Area"\r
11895   UNIQUE\r
11896   PRIMARY\r
11897   INDEX-FIELD "FlowTaskType" ASCENDING \r
11898   INDEX-FIELD "FlowStepType" ASCENDING \r
11899   INDEX-FIELD "FlowRuleCode" ASCENDING \r
11900 \r
11901 ADD INDEX "NextStep" ON "FlowRule" \r
11902   AREA "Schema Area"\r
11903   INDEX-FIELD "NextTaskType" ASCENDING \r
11904   INDEX-FIELD "NextStepType" ASCENDING \r
11905 \r
11906 ADD TABLE "FlowRuleType"\r
11907   AREA "Schema Area"\r
11908   DUMP-NAME "fwrultyp"\r
11909 \r
11910 ADD FIELD "FlowRuleType" OF "FlowRuleType" AS character \r
11911   FORMAT "X(6)"\r
11912   INITIAL ""\r
11913   POSITION 2\r
11914   SQL-WIDTH 12\r
11915   ORDER 10\r
11916 \r
11917 ADD FIELD "Description" OF "FlowRuleType" AS character \r
11918   FORMAT "X(50)"\r
11919   INITIAL ""\r
11920   POSITION 3\r
11921   SQL-WIDTH 100\r
11922   ORDER 20\r
11923 \r
11924 ADD INDEX "XPKRuleType" ON "FlowRuleType" \r
11925   AREA "Schema Area"\r
11926   UNIQUE\r
11927   PRIMARY\r
11928   INDEX-FIELD "FlowRuleType" ASCENDING \r
11929 \r
11930 ADD TABLE "FlowStep"\r
11931   AREA "Schema Area"\r
11932   DUMP-NAME "flowstep"\r
11933   TABLE-TRIGGER "WRITE" OVERRIDE PROCEDURE "wrflwstp.p" CRC "?" \r
11934 \r
11935 ADD FIELD "DueDate" OF "FlowStep" AS date \r
11936   FORMAT "99/99/9999"\r
11937   INITIAL ?\r
11938   POSITION 2\r
11939   SQL-WIDTH 4\r
11940   HELP "Due date of task for this step"\r
11941   ORDER 10\r
11942 \r
11943 ADD FIELD "FlowTaskNo" OF "FlowStep" AS integer \r
11944   FORMAT ">>>>>>9"\r
11945   INITIAL "0"\r
11946   POSITION 3\r
11947   SQL-WIDTH 4\r
11948   HELP "Task number that the step belongs to"\r
11949   ORDER 20\r
11950 \r
11951 ADD FIELD "FlowStepNo" OF "FlowStep" AS integer \r
11952   FORMAT ">>>9"\r
11953   INITIAL "0"\r
11954   POSITION 4\r
11955   SQL-WIDTH 4\r
11956   HELP "Sequence number of step"\r
11957   ORDER 30\r
11958 \r
11959 ADD FIELD "FlowTaskType" OF "FlowStep" AS character \r
11960   FORMAT "X(6)"\r
11961   INITIAL ""\r
11962   POSITION 5\r
11963   SQL-WIDTH 12\r
11964   HELP "Type of task that this step belongs to"\r
11965   ORDER 40\r
11966 \r
11967 ADD FIELD "FlowStepType" OF "FlowStep" AS character \r
11968   FORMAT "X(10)"\r
11969   INITIAL ""\r
11970   POSITION 6\r
11971   SQL-WIDTH 20\r
11972   HELP "Type of process step this is"\r
11973   ORDER 50\r
11974 \r
11975 ADD FIELD "ActivityStatus" OF "FlowStep" AS character \r
11976   FORMAT "X(4)"\r
11977   INITIAL ""\r
11978   POSITION 7\r
11979   SQL-WIDTH 8\r
11980   HELP "Status of step"\r
11981   ORDER 60\r
11982 \r
11983 ADD FIELD "StatusUpdateDate" OF "FlowStep" AS date \r
11984   FORMAT "99/99/9999"\r
11985   INITIAL ?\r
11986   POSITION 8\r
11987   SQL-WIDTH 4\r
11988   HELP "Date of last status update"\r
11989   ORDER 70\r
11990 \r
11991 ADD FIELD "StepDueDate" OF "FlowStep" AS date \r
11992   FORMAT "99/99/9999"\r
11993   INITIAL ?\r
11994   POSITION 9\r
11995   SQL-WIDTH 4\r
11996   HELP "Due date of the step"\r
11997   ORDER 80\r
11998 \r
11999 ADD FIELD "Description" OF "FlowStep" AS character \r
12000   FORMAT "X(50)"\r
12001   INITIAL ""\r
12002   POSITION 10\r
12003   SQL-WIDTH 100\r
12004   HELP "Description of step"\r
12005   ORDER 90\r
12006 \r
12007 ADD FIELD "AllocatedTo" OF "FlowStep" AS integer \r
12008   FORMAT ">>>>>>9"\r
12009   INITIAL "0"\r
12010   POSITION 11\r
12011   SQL-WIDTH 4\r
12012   HELP "Person step is allocated to"\r
12013   ORDER 100\r
12014 \r
12015 ADD FIELD "Contractor" OF "FlowStep" AS integer \r
12016   FORMAT ">>>>>>9"\r
12017   INITIAL "0"\r
12018   POSITION 12\r
12019   SQL-WIDTH 4\r
12020   HELP "Contractor allocated the job / process"\r
12021   ORDER 110\r
12022 \r
12023 ADD FIELD "Priority" OF "FlowStep" AS integer \r
12024   FORMAT "->>9"\r
12025   INITIAL "0"\r
12026   POSITION 13\r
12027   SQL-WIDTH 4\r
12028   HELP "Priority of step. '1' is highest"\r
12029   ORDER 120\r
12030 \r
12031 ADD FIELD "EntityType" OF "FlowStep" AS character \r
12032   FORMAT "X"\r
12033   INITIAL ""\r
12034   POSITION 14\r
12035   SQL-WIDTH 2\r
12036   HELP "Type of entity"\r
12037   ORDER 130\r
12038 \r
12039 ADD FIELD "EntityCode" OF "FlowStep" AS integer \r
12040   FORMAT ">>>>>9"\r
12041   INITIAL "0"\r
12042   POSITION 15\r
12043   SQL-WIDTH 4\r
12044   HELP "Key value of the entity record"\r
12045   ORDER 140\r
12046 \r
12047 ADD FIELD "Reference" OF "FlowStep" AS character \r
12048   FORMAT "X(50)"\r
12049   INITIAL ""\r
12050   POSITION 16\r
12051   SQL-WIDTH 100\r
12052   HELP "Contractor work order number"\r
12053   ORDER 150\r
12054 \r
12055 ADD FIELD "NotifyDate" OF "FlowStep" AS date \r
12056   DESCRIPTION "The date after which this step should show on a bring-up list"\r
12057   FORMAT "99/99/9999"\r
12058   INITIAL ?\r
12059   POSITION 17\r
12060   SQL-WIDTH 4\r
12061   HELP "The date after which this step should show on a bring-up list"\r
12062   ORDER 85\r
12063 \r
12064 ADD INDEX "XPKStep" ON "FlowStep" \r
12065   AREA "Schema Area"\r
12066   UNIQUE\r
12067   PRIMARY\r
12068   INDEX-FIELD "DueDate" ASCENDING \r
12069   INDEX-FIELD "FlowTaskNo" ASCENDING \r
12070   INDEX-FIELD "FlowStepNo" ASCENDING \r
12071 \r
12072 ADD INDEX "Reference" ON "FlowStep" \r
12073   AREA "Schema Area"\r
12074   UNIQUE\r
12075   INDEX-FIELD "Reference" ASCENDING \r
12076 \r
12077 ADD INDEX "XAK1FlowStep" ON "FlowStep" \r
12078   AREA "Schema Area"\r
12079   INDEX-FIELD "ActivityStatus" ASCENDING \r
12080   INDEX-FIELD "DueDate" ASCENDING \r
12081   INDEX-FIELD "FlowTaskNo" ASCENDING \r
12082   INDEX-FIELD "FlowStepNo" ASCENDING \r
12083 \r
12084 ADD INDEX "XAK2FlowStep" ON "FlowStep" \r
12085   AREA "Schema Area"\r
12086   INDEX-FIELD "ActivityStatus" ASCENDING \r
12087   INDEX-FIELD "AllocatedTo" ASCENDING \r
12088   INDEX-FIELD "DueDate" ASCENDING \r
12089   INDEX-FIELD "FlowTaskNo" ASCENDING \r
12090   INDEX-FIELD "StepDueDate" ASCENDING \r
12091 \r
12092 ADD INDEX "XAK3FlowStep" ON "FlowStep" \r
12093   AREA "Schema Area"\r
12094   INDEX-FIELD "ActivityStatus" ASCENDING \r
12095   INDEX-FIELD "Contractor" ASCENDING \r
12096   INDEX-FIELD "DueDate" ASCENDING \r
12097   INDEX-FIELD "FlowTaskNo" ASCENDING \r
12098   INDEX-FIELD "StepDueDate" ASCENDING \r
12099 \r
12100 ADD INDEX "XAK4FlowStep" ON "FlowStep" \r
12101   AREA "Schema Area"\r
12102   INDEX-FIELD "ActivityStatus" ASCENDING \r
12103   INDEX-FIELD "AllocatedTo" ASCENDING \r
12104   INDEX-FIELD "NotifyDate" ASCENDING \r
12105 \r
12106 ADD TABLE "FlowStepType"\r
12107   AREA "Schema Area"\r
12108   DUMP-NAME "fwstptyp"\r
12109   TABLE-TRIGGER "WRITE" OVERRIDE PROCEDURE "wrstptyp.p" CRC "?" \r
12110 \r
12111 ADD FIELD "FlowTaskType" OF "FlowStepType" AS character \r
12112   FORMAT "X(6)"\r
12113   INITIAL ""\r
12114   POSITION 2\r
12115   SQL-WIDTH 12\r
12116   HELP "The type of task that this type of step applies to"\r
12117   ORDER 10\r
12118 \r
12119 ADD FIELD "FlowStepType" OF "FlowStepType" AS character \r
12120   FORMAT "X(10)"\r
12121   INITIAL ""\r
12122   POSITION 3\r
12123   SQL-WIDTH 20\r
12124   HELP "Definitions for a type of step"\r
12125   ORDER 20\r
12126 \r
12127 ADD FIELD "InitialStatus" OF "FlowStepType" AS character \r
12128   FORMAT "X(4)"\r
12129   INITIAL ""\r
12130   POSITION 4\r
12131   SQL-WIDTH 8\r
12132   HELP "Initial status of a new step"\r
12133   ORDER 30\r
12134 \r
12135 ADD FIELD "InitialPriority" OF "FlowStepType" AS integer \r
12136   FORMAT "->>9"\r
12137   INITIAL "0"\r
12138   POSITION 5\r
12139   SQL-WIDTH 4\r
12140   HELP "Initial priority of a new step record"\r
12141   ORDER 40\r
12142 \r
12143 ADD FIELD "Description" OF "FlowStepType" AS character \r
12144   FORMAT "X(50)"\r
12145   INITIAL ""\r
12146   POSITION 6\r
12147   SQL-WIDTH 100\r
12148   HELP "Description of the type of step"\r
12149   ORDER 50\r
12150 \r
12151 ADD FIELD "WarnPeriod" OF "FlowStepType" AS decimal \r
12152   FORMAT "->>,>>9.99"\r
12153   INITIAL "0"\r
12154   POSITION 7\r
12155   SQL-WIDTH 17\r
12156   DECIMALS 2\r
12157   ORDER 60\r
12158 \r
12159 ADD FIELD "WarnUnits" OF "FlowStepType" AS character \r
12160   DESCRIPTION "Whether the warning period is measured in days or months"\r
12161   FORMAT "X"\r
12162   INITIAL ""\r
12163   POSITION 8\r
12164   SQL-WIDTH 2\r
12165   HELP "D = Days, M = Months"\r
12166   ORDER 70\r
12167 \r
12168 ADD INDEX "XPKFlowStepType" ON "FlowStepType" \r
12169   AREA "Schema Area"\r
12170   UNIQUE\r
12171   PRIMARY\r
12172   INDEX-FIELD "FlowTaskType" ASCENDING \r
12173   INDEX-FIELD "FlowStepType" ASCENDING \r
12174 \r
12175 ADD TABLE "FlowTask"\r
12176   AREA "Schema Area"\r
12177   DUMP-NAME "flowtask"\r
12178   TABLE-TRIGGER "DELETE" OVERRIDE PROCEDURE "deflwtsk.p" CRC "?" \r
12179 \r
12180 ADD FIELD "DueDate" OF "FlowTask" AS date \r
12181   FORMAT "99/99/9999"\r
12182   INITIAL ?\r
12183   POSITION 2\r
12184   SQL-WIDTH 4\r
12185   HELP "Date task is due to be completed"\r
12186   ORDER 10\r
12187 \r
12188 ADD FIELD "FlowTaskNo" OF "FlowTask" AS integer \r
12189   FORMAT ">>>>>>>9"\r
12190   INITIAL "0"\r
12191   POSITION 3\r
12192   SQL-WIDTH 4\r
12193   HELP "Task number"\r
12194   ORDER 20\r
12195 \r
12196 ADD FIELD "ActivityStatus" OF "FlowTask" AS character \r
12197   FORMAT "X(4)"\r
12198   INITIAL ""\r
12199   POSITION 4\r
12200   SQL-WIDTH 8\r
12201   HELP "Status of task"\r
12202   ORDER 30\r
12203 \r
12204 ADD FIELD "StatusUpdateDate" OF "FlowTask" AS date \r
12205   FORMAT "99/99/9999"\r
12206   INITIAL ?\r
12207   POSITION 5\r
12208   SQL-WIDTH 4\r
12209   HELP "Date that status was last updated"\r
12210   ORDER 40\r
12211 \r
12212 ADD FIELD "Description" OF "FlowTask" AS character \r
12213   FORMAT "X(50)"\r
12214   INITIAL ""\r
12215   POSITION 6\r
12216   SQL-WIDTH 100\r
12217   HELP "Description of task"\r
12218   ORDER 50\r
12219 \r
12220 ADD FIELD "FlowTaskType" OF "FlowTask" AS character \r
12221   FORMAT "X(6)"\r
12222   INITIAL ""\r
12223   POSITION 7\r
12224   SQL-WIDTH 12\r
12225   HELP "Type of task"\r
12226   ORDER 60\r
12227 \r
12228 ADD FIELD "JobLogNo" OF "FlowTask" AS integer \r
12229   FORMAT ">>>>>>9"\r
12230   INITIAL "0"\r
12231   POSITION 8\r
12232   SQL-WIDTH 4\r
12233   HELP "The job log number that this task is associated to"\r
12234   ORDER 70\r
12235 \r
12236 ADD FIELD "Priority" OF "FlowTask" AS integer \r
12237   FORMAT "->>9"\r
12238   INITIAL "0"\r
12239   POSITION 9\r
12240   SQL-WIDTH 4\r
12241   HELP "Priority of task"\r
12242   ORDER 80\r
12243 \r
12244 ADD FIELD "AllocatedTo" OF "FlowTask" AS integer \r
12245   FORMAT ">>>>9"\r
12246   INITIAL "0"\r
12247   POSITION 10\r
12248   SQL-WIDTH 4\r
12249   HELP "Person responsible for performing task"\r
12250   ORDER 90\r
12251 \r
12252 ADD FIELD "EntityType" OF "FlowTask" AS character \r
12253   FORMAT "X"\r
12254   INITIAL ""\r
12255   POSITION 11\r
12256   SQL-WIDTH 2\r
12257   HELP "Type of entity"\r
12258   ORDER 100\r
12259 \r
12260 ADD FIELD "EntityCode" OF "FlowTask" AS integer \r
12261   FORMAT "99999"\r
12262   INITIAL "0"\r
12263   POSITION 12\r
12264   SQL-WIDTH 4\r
12265   HELP "Key value of entity"\r
12266   ORDER 110\r
12267 \r
12268 ADD INDEX "XPKTask" ON "FlowTask" \r
12269   AREA "Schema Area"\r
12270   UNIQUE\r
12271   PRIMARY\r
12272   INDEX-FIELD "DueDate" ASCENDING \r
12273   INDEX-FIELD "FlowTaskNo" ASCENDING \r
12274 \r
12275 ADD INDEX "XAK1FlowTask" ON "FlowTask" \r
12276   AREA "Schema Area"\r
12277   INDEX-FIELD "ActivityStatus" ASCENDING \r
12278   INDEX-FIELD "DueDate" ASCENDING \r
12279   INDEX-FIELD "FlowTaskNo" ASCENDING \r
12280 \r
12281 ADD INDEX "XAK2FlowTask" ON "FlowTask" \r
12282   AREA "Schema Area"\r
12283   INDEX-FIELD "EntityType" ASCENDING \r
12284   INDEX-FIELD "EntityCode" ASCENDING \r
12285   INDEX-FIELD "DueDate" ASCENDING \r
12286 \r
12287 ADD INDEX "XAK3FlowTask" ON "FlowTask" \r
12288   AREA "Schema Area"\r
12289   INDEX-FIELD "ActivityStatus" ASCENDING \r
12290   INDEX-FIELD "EntityType" ASCENDING \r
12291   INDEX-FIELD "EntityCode" ASCENDING \r
12292   INDEX-FIELD "DueDate" ASCENDING \r
12293 \r
12294 ADD INDEX "XAK4FlowTask" ON "FlowTask" \r
12295   AREA "Schema Area"\r
12296   INDEX-FIELD "ActivityStatus" ASCENDING \r
12297   INDEX-FIELD "AllocatedTo" ASCENDING \r
12298   INDEX-FIELD "DueDate" ASCENDING \r
12299   INDEX-FIELD "FlowTaskNo" ASCENDING \r
12300 \r
12301 ADD TABLE "FlowTaskType"\r
12302   AREA "Schema Area"\r
12303   DUMP-NAME "fwtsktyp"\r
12304   TABLE-TRIGGER "WRITE" OVERRIDE PROCEDURE "wrtsktyp.p" CRC "?" \r
12305 \r
12306 ADD FIELD "FlowTaskType" OF "FlowTaskType" AS character \r
12307   FORMAT "X(4)"\r
12308   INITIAL ""\r
12309   POSITION 2\r
12310   SQL-WIDTH 8\r
12311   HELP "Type of a task"\r
12312   ORDER 10\r
12313 \r
12314 ADD FIELD "Description" OF "FlowTaskType" AS character \r
12315   FORMAT "X(50)"\r
12316   INITIAL ""\r
12317   POSITION 3\r
12318   SQL-WIDTH 100\r
12319   HELP "Description of task type"\r
12320   ORDER 20\r
12321 \r
12322 ADD FIELD "InitialStep" OF "FlowTaskType" AS character \r
12323   FORMAT "X(10)"\r
12324   INITIAL ""\r
12325   POSITION 4\r
12326   SQL-WIDTH 20\r
12327   HELP "If not blank, the step type is used in the initial creation of workflow records (steps) for the task"\r
12328   ORDER 30\r
12329 \r
12330 ADD INDEX "XPKTaskType" ON "FlowTaskType" \r
12331   AREA "Schema Area"\r
12332   UNIQUE\r
12333   PRIMARY\r
12334   INDEX-FIELD "FlowTaskType" ASCENDING \r
12335 \r
12336 ADD TABLE "Inspector"\r
12337   AREA "Schema Area"\r
12338   DUMP-NAME "inspecto"\r
12339 \r
12340 ADD FIELD "InspectorCode" OF "Inspector" AS integer \r
12341   FORMAT "->,>>>,>>9"\r
12342   INITIAL "0"\r
12343   POSITION 2\r
12344   SQL-WIDTH 4\r
12345   ORDER 10\r
12346 \r
12347 ADD FIELD "PersonCode" OF "Inspector" AS integer \r
12348   FORMAT "99999"\r
12349   INITIAL "0"\r
12350   LABEL "Person"\r
12351   POSITION 3\r
12352   SQL-WIDTH 4\r
12353   HELP "The person who is this inspector"\r
12354   ORDER 20\r
12355 \r
12356 ADD FIELD "CreditorCode" OF "Inspector" AS integer \r
12357   DESCRIPTION "The code used to refer to a creditor."\r
12358   FORMAT "99999"\r
12359   INITIAL "0"\r
12360   LABEL "Creditor"\r
12361   POSITION 4\r
12362   SQL-WIDTH 4\r
12363   HELP "The creditor who is billed for this inspectors work"\r
12364   ORDER 30\r
12365 \r
12366 ADD INDEX "XPKInspector" ON "Inspector" \r
12367   AREA "Schema Area"\r
12368   UNIQUE\r
12369   PRIMARY\r
12370   INDEX-FIELD "InspectorCode" ASCENDING \r
12371 \r
12372 ADD TABLE "ScenarioAssumption"\r
12373   AREA "Schema Area"\r
12374   DUMP-NAME "scnass"\r
12375 \r
12376 ADD FIELD "ScenarioCode" OF "ScenarioAssumption" AS integer \r
12377   DESCRIPTION "A code to identify the scenario."\r
12378   FORMAT ">>>>>9"\r
12379   INITIAL "0"\r
12380   POSITION 2\r
12381   SQL-WIDTH 4\r
12382   ORDER 10\r
12383 \r
12384 ADD FIELD "MonthCode" OF "ScenarioAssumption" AS integer \r
12385   DESCRIPTION "The code of the month that this assumption applies from"\r
12386   FORMAT ">>>>>9"\r
12387   INITIAL ?\r
12388   LABEL "Month"\r
12389   POSITION 3\r
12390   SQL-WIDTH 4\r
12391   ORDER 20\r
12392 \r
12393 ADD FIELD "Scope" OF "ScenarioAssumption" AS character \r
12394   DESCRIPTION "The scope of the assumption (G)lobal, (R)egional or (P)roperty."\r
12395   FORMAT "X"\r
12396   INITIAL "G"\r
12397   POSITION 4\r
12398   SQL-WIDTH 2\r
12399   HELP "The scope of the assumption (G)lobal, (R)egional or (P)roperty"\r
12400   ORDER 30\r
12401 \r
12402 ADD FIELD "Region" OF "ScenarioAssumption" AS character \r
12403   FORMAT "X(4)"\r
12404   INITIAL ""\r
12405   POSITION 5\r
12406   SQL-WIDTH 8\r
12407   ORDER 40\r
12408 \r
12409 ADD FIELD "EntityType" OF "ScenarioAssumption" AS character \r
12410   DESCRIPTION "A reference to the entity types table indicating the type of entity against which this transaction applies (Company, Property, Project, Creditor or Tenant)."\r
12411   FORMAT "X"\r
12412   INITIAL ?\r
12413   LABEL "Entity type"\r
12414   POSITION 6\r
12415   SQL-WIDTH 2\r
12416   COLUMN-LABEL "T"\r
12417   COLUMN-LABEL-SA "C"\r
12418   ORDER 50\r
12419 \r
12420 ADD FIELD "EntityCode" OF "ScenarioAssumption" AS integer \r
12421   FORMAT "99999"\r
12422   INITIAL ?\r
12423   LABEL "Code"\r
12424   POSITION 7\r
12425   SQL-WIDTH 4\r
12426   COLUMN-LABEL-SA "C"\r
12427   ORDER 60\r
12428 \r
12429 ADD FIELD "TypeScope" OF "ScenarioAssumption" AS character \r
12430   DESCRIPTION "The area or service contract type which the assuption applies to"\r
12431   FORMAT "X(4)"\r
12432   INITIAL ""\r
12433   LABEL "Type"\r
12434   POSITION 8\r
12435   SQL-WIDTH 8\r
12436   ORDER 70\r
12437 \r
12438 ADD FIELD "AssumptionType" OF "ScenarioAssumption" AS character \r
12439   FORMAT "X(4)"\r
12440   INITIAL ""\r
12441   POSITION 9\r
12442   SQL-WIDTH 8\r
12443   ORDER 80\r
12444 \r
12445 ADD FIELD "AssumptionValue" OF "ScenarioAssumption" AS character \r
12446   FORMAT "X(50)"\r
12447   INITIAL ""\r
12448   LABEL "Assumption"\r
12449   POSITION 10\r
12450   SQL-WIDTH 100\r
12451   ORDER 90\r
12452 \r
12453 ADD INDEX "XPKScenarioAssumptions" ON "ScenarioAssumption" \r
12454   AREA "Schema Area"\r
12455   PRIMARY\r
12456   INDEX-FIELD "ScenarioCode" ASCENDING \r
12457   INDEX-FIELD "MonthCode" ASCENDING \r
12458   INDEX-FIELD "Scope" ASCENDING \r
12459   INDEX-FIELD "Region" ASCENDING \r
12460   INDEX-FIELD "EntityType" ASCENDING \r
12461   INDEX-FIELD "EntityCode" ASCENDING \r
12462   INDEX-FIELD "TypeScope" ASCENDING \r
12463   INDEX-FIELD "AssumptionType" ASCENDING \r
12464 \r
12465 ADD INDEX "XAK1ScenarioAssumptions" ON "ScenarioAssumption" \r
12466   AREA "Schema Area"\r
12467   INDEX-FIELD "ScenarioCode" ASCENDING \r
12468   INDEX-FIELD "Scope" ASCENDING \r
12469   INDEX-FIELD "Region" ASCENDING \r
12470   INDEX-FIELD "EntityType" ASCENDING \r
12471   INDEX-FIELD "EntityCode" ASCENDING \r
12472   INDEX-FIELD "MonthCode" ASCENDING \r
12473   INDEX-FIELD "TypeScope" ASCENDING \r
12474 \r
12475 ADD TABLE "PropForecast"\r
12476   AREA "Schema Area"\r
12477   DESCRIPTION "Forecast information for properties"\r
12478   DUMP-NAME "propfcst"\r
12479 \r
12480 ADD FIELD "PropertyCode" OF "PropForecast" AS integer \r
12481   DESCRIPTION "The code used to refer to a property"\r
12482   FORMAT "99999"\r
12483   INITIAL "0"\r
12484   LABEL "Code"\r
12485   POSITION 2\r
12486   SQL-WIDTH 4\r
12487   ORDER 10\r
12488 \r
12489 ADD FIELD "EntityType" OF "PropForecast" AS character \r
12490   DESCRIPTION "A reference to the entity types table indicating the type of entity against which this transaction applies (Company, Property, Project, Creditor or Tenant)."\r
12491   FORMAT "X"\r
12492   INITIAL ?\r
12493   LABEL "Entity type"\r
12494   POSITION 3\r
12495   SQL-WIDTH 2\r
12496   COLUMN-LABEL "T"\r
12497   COLUMN-LABEL-SA "C"\r
12498   ORDER 20\r
12499 \r
12500 ADD FIELD "EntityCode" OF "PropForecast" AS integer \r
12501   FORMAT "99999"\r
12502   INITIAL ?\r
12503   LABEL "Code"\r
12504   POSITION 4\r
12505   SQL-WIDTH 4\r
12506   COLUMN-LABEL-SA "C"\r
12507   ORDER 30\r
12508 \r
12509 ADD FIELD "AccountCode" OF "PropForecast" AS decimal \r
12510   DESCRIPTION "The code of the account from within the chart of accounts that this ledger account applies to."\r
12511   FORMAT "9999.99"\r
12512   INITIAL ?\r
12513   LABEL "Account"\r
12514   POSITION 5\r
12515   SQL-WIDTH 17\r
12516   DECIMALS 2\r
12517   ORDER 40\r
12518 \r
12519 ADD FIELD "PropForecastType" OF "PropForecast" AS character \r
12520   FORMAT "X(4)"\r
12521   INITIAL ""\r
12522   POSITION 6\r
12523   SQL-WIDTH 8\r
12524   HELP "The type of property forecast record"\r
12525   ORDER 50\r
12526 \r
12527 ADD FIELD "MonthCode" OF "PropForecast" AS integer \r
12528   DESCRIPTION "The code of the month that this forecast applies to."\r
12529   FORMAT ">>>>>9"\r
12530   INITIAL ?\r
12531   LABEL "Month"\r
12532   POSITION 7\r
12533   SQL-WIDTH 4\r
12534   ORDER 60\r
12535 \r
12536 ADD FIELD "Amount" OF "PropForecast" AS decimal \r
12537   DESCRIPTION "The forecast amount for this entity/type/month"\r
12538   FORMAT "->>,>>>,>>>,>>9.99"\r
12539   INITIAL "0"\r
12540   POSITION 8\r
12541   SQL-WIDTH 17\r
12542   HELP "The forecast amount for this entity/type/month"\r
12543   DECIMALS 2\r
12544   ORDER 70\r
12545 \r
12546 ADD INDEX "XPKPropForecast" ON "PropForecast" \r
12547   AREA "Schema Area"\r
12548   UNIQUE\r
12549   PRIMARY\r
12550   INDEX-FIELD "PropertyCode" ASCENDING \r
12551   INDEX-FIELD "EntityType" ASCENDING \r
12552   INDEX-FIELD "EntityCode" ASCENDING \r
12553   INDEX-FIELD "AccountCode" ASCENDING \r
12554   INDEX-FIELD "PropForecastType" ASCENDING \r
12555   INDEX-FIELD "MonthCode" ASCENDING \r
12556 \r
12557 ADD TABLE "PropForecastParam"\r
12558   AREA "Schema Area"\r
12559   DESCRIPTION "Parameters generally controlling the forecast for the property"\r
12560   DUMP-NAME "propfcpr"\r
12561 \r
12562 ADD FIELD "PropertyCode" OF "PropForecastParam" AS integer \r
12563   DESCRIPTION "The code used to refer to a property"\r
12564   FORMAT "99999"\r
12565   INITIAL "0"\r
12566   LABEL "Code"\r
12567   POSITION 2\r
12568   SQL-WIDTH 4\r
12569   ORDER 10\r
12570 \r
12571 ADD FIELD "MonthCode" OF "PropForecastParam" AS integer \r
12572   DESCRIPTION "The code used to refer to a financial period (month)"\r
12573   FORMAT ">>>,>>9"\r
12574   INITIAL "0"\r
12575   LABEL "Month"\r
12576   POSITION 3\r
12577   SQL-WIDTH 4\r
12578   HELP "The code used to refer to a financial period (month)"\r
12579   ORDER 20\r
12580 \r
12581 ADD FIELD "ParameterID" OF "PropForecastParam" AS character \r
12582   DESCRIPTION "Identifies the parameter - for use by the programs which use it."\r
12583   FORMAT "X(20)"\r
12584   INITIAL ""\r
12585   POSITION 4\r
12586   SQL-WIDTH 40\r
12587   ORDER 30\r
12588 \r
12589 ADD FIELD "ParameterValue" OF "PropForecastParam" AS character \r
12590   DESCRIPTION "The value of the parameter"\r
12591   FORMAT "X(80)"\r
12592   INITIAL ""\r
12593   POSITION 5\r
12594   SQL-WIDTH 160\r
12595   ORDER 40\r
12596 \r
12597 ADD INDEX "XPKPropForecastParam" ON "PropForecastParam" \r
12598   AREA "Schema Area"\r
12599   UNIQUE\r
12600   PRIMARY\r
12601   INDEX-FIELD "PropertyCode" ASCENDING \r
12602   INDEX-FIELD "ParameterID" ASCENDING \r
12603   INDEX-FIELD "MonthCode" ASCENDING \r
12604 \r
12605 ADD INDEX "XAK1PropForecastParam" ON "PropForecastParam" \r
12606   AREA "Schema Area"\r
12607   UNIQUE\r
12608   INACTIVE\r
12609   INDEX-FIELD "PropertyCode" ASCENDING \r
12610   INDEX-FIELD "MonthCode" ASCENDING \r
12611   INDEX-FIELD "ParameterID" ASCENDING \r
12612 \r
12613 ADD INDEX "XAK2PropForecastParam" ON "PropForecastParam" \r
12614   AREA "Schema Area"\r
12615   UNIQUE\r
12616   INDEX-FIELD "MonthCode" ASCENDING \r
12617   INDEX-FIELD "ParameterID" ASCENDING \r
12618   INDEX-FIELD "PropertyCode" ASCENDING \r
12619 \r
12620 ADD TABLE "PropForecastType"\r
12621   AREA "Schema Area"\r
12622   DESCRIPTION "Description of types of records used in Property Forecasting"\r
12623   DUMP-NAME "propfcty"\r
12624 \r
12625 ADD FIELD "PropForecastType" OF "PropForecastType" AS character \r
12626   FORMAT "X(4)"\r
12627   INITIAL ""\r
12628   POSITION 2\r
12629   SQL-WIDTH 8\r
12630   HELP "The type of property forecast record"\r
12631   ORDER 10\r
12632 \r
12633 ADD FIELD "Description" OF "PropForecastType" AS character \r
12634   FORMAT "X(50)"\r
12635   INITIAL ""\r
12636   POSITION 3\r
12637   SQL-WIDTH 100\r
12638   HELP "Description of the type of property forecast record"\r
12639   ORDER 20\r
12640 \r
12641 ADD INDEX "XPKPropForecastType" ON "PropForecastType" \r
12642   AREA "Schema Area"\r
12643   UNIQUE\r
12644   PRIMARY\r
12645   INDEX-FIELD "PropForecastType" ASCENDING \r
12646 \r
12647 ADD TABLE "BankImportException"\r
12648   AREA "Schema Area"\r
12649   DESCRIPTION "Exceptions to the normal bank import process"\r
12650   DUMP-NAME "bnkimpex"\r
12651 \r
12652 ADD FIELD "BankAccountCode" OF "BankImportException" AS character \r
12653   FORMAT "X(4)"\r
12654   INITIAL ""\r
12655   LABEL "Bank a/c"\r
12656   POSITION 2\r
12657   SQL-WIDTH 8\r
12658   ORDER 10\r
12659 \r
12660 ADD FIELD "TrnType" OF "BankImportException" AS character \r
12661   FORMAT "X(8)"\r
12662   INITIAL ""\r
12663   POSITION 3\r
12664   SQL-WIDTH 16\r
12665   ORDER 20\r
12666 \r
12667 ADD FIELD "Match1" OF "BankImportException" AS character \r
12668   FORMAT "X(30)"\r
12669   INITIAL ""\r
12670   POSITION 4\r
12671   SQL-WIDTH 60\r
12672   ORDER 30\r
12673 \r
12674 ADD FIELD "Match2" OF "BankImportException" AS character \r
12675   FORMAT "X(30)"\r
12676   INITIAL ""\r
12677   POSITION 5\r
12678   SQL-WIDTH 60\r
12679   ORDER 40\r
12680 \r
12681 ADD FIELD "EntityType" OF "BankImportException" AS character \r
12682   DESCRIPTION "A reference to the entity types table indicating the type of entity against which this transaction applies (Company, Property, Project, Creditor or Tenant)."\r
12683   FORMAT "X"\r
12684   INITIAL ?\r
12685   LABEL "Entity type"\r
12686   POSITION 6\r
12687   SQL-WIDTH 2\r
12688   COLUMN-LABEL "T"\r
12689   COLUMN-LABEL-SA "C"\r
12690   ORDER 50\r
12691 \r
12692 ADD FIELD "EntityCode" OF "BankImportException" AS integer \r
12693   FORMAT "99999"\r
12694   INITIAL ?\r
12695   LABEL "Code"\r
12696   POSITION 7\r
12697   SQL-WIDTH 4\r
12698   COLUMN-LABEL-SA "C"\r
12699   ORDER 60\r
12700 \r
12701 ADD FIELD "AccountCode" OF "BankImportException" AS decimal \r
12702   DESCRIPTION "The account code to direct transactions to"\r
12703   FORMAT "9999.99"\r
12704   INITIAL ?\r
12705   LABEL "Account"\r
12706   POSITION 8\r
12707   SQL-WIDTH 17\r
12708   DECIMALS 2\r
12709   ORDER 70\r
12710 \r
12711 ADD FIELD "Description" OF "BankImportException" AS character \r
12712   FORMAT "X(50)"\r
12713   INITIAL ""\r
12714   POSITION 9\r
12715   SQL-WIDTH 100\r
12716   HELP "The description of the transaction created"\r
12717   ORDER 80\r
12718 \r
12719 ADD INDEX "XPKBankImportExceptions" ON "BankImportException" \r
12720   AREA "Schema Area"\r
12721   PRIMARY\r
12722   INDEX-FIELD "BankAccountCode" ASCENDING \r
12723   INDEX-FIELD "TrnType" ASCENDING \r
12724 \r
12725 ADD TABLE "SupplyMeterReading"\r
12726   AREA "Schema Area"\r
12727   DESCRIPTION "Readings from supply meters"\r
12728   DUMP-NAME "smetread"\r
12729 \r
12730 ADD FIELD "PropertyCode" OF "SupplyMeterReading" AS integer \r
12731   DESCRIPTION "The code used to refer to a property"\r
12732   FORMAT "99999"\r
12733   INITIAL "0"\r
12734   LABEL "Code"\r
12735   POSITION 2\r
12736   SQL-WIDTH 4\r
12737   ORDER 10\r
12738 \r
12739 ADD FIELD "OldMeterCode" OF "SupplyMeterReading" AS integer \r
12740   FORMAT ">>9"\r
12741   INITIAL "0"\r
12742   LABEL "Meter"\r
12743   POSITION 3\r
12744   SQL-WIDTH 4\r
12745   ORDER 21\r
12746 \r
12747 ADD FIELD "SupplyType" OF "SupplyMeterReading" AS character \r
12748   FORMAT "X(4)"\r
12749   INITIAL ""\r
12750   POSITION 4\r
12751   SQL-WIDTH 8\r
12752   HELP "The type of supply metered"\r
12753   ORDER 30\r
12754 \r
12755 ADD FIELD "ReadingDate" OF "SupplyMeterReading" AS date \r
12756   FORMAT "99/99/9999"\r
12757   INITIAL ?\r
12758   POSITION 5\r
12759   SQL-WIDTH 4\r
12760   HELP "The date on which this reading was taken"\r
12761   ORDER 40\r
12762 \r
12763 ADD FIELD "Reading" OF "SupplyMeterReading" AS decimal \r
12764   FORMAT "->>,>>>,>>>,>>9"\r
12765   INITIAL "0"\r
12766   POSITION 6\r
12767   SQL-WIDTH 15\r
12768   HELP "The amount of the reading"\r
12769   DECIMALS 0\r
12770   ORDER 50\r
12771 \r
12772 ADD FIELD "MeterCode" OF "SupplyMeterReading" AS character \r
12773   FORMAT "X(8)"\r
12774   INITIAL ""\r
12775   POSITION 7\r
12776   SQL-WIDTH 16\r
12777   ORDER 20\r
12778 \r
12779 ADD INDEX "XPKSupplyMeterReading" ON "SupplyMeterReading" \r
12780   AREA "Schema Area"\r
12781   UNIQUE\r
12782   PRIMARY\r
12783   INDEX-FIELD "SupplyType" ASCENDING \r
12784   INDEX-FIELD "PropertyCode" ASCENDING \r
12785   INDEX-FIELD "MeterCode" ASCENDING \r
12786   INDEX-FIELD "ReadingDate" ASCENDING \r
12787 \r
12788 ADD INDEX "XAK1SupplyMeterReading" ON "SupplyMeterReading" \r
12789   AREA "Schema Area"\r
12790   INDEX-FIELD "PropertyCode" ASCENDING \r
12791   INDEX-FIELD "ReadingDate" ASCENDING \r
12792 \r
12793 ADD TABLE "LookupCode"\r
12794   AREA "Schema Area"\r
12795   LABEL "Lookup Codes"\r
12796   DESCRIPTION "Arbitrary lookup code values for any field of any table"\r
12797   DUMP-NAME "lookups"\r
12798 \r
12799 ADD FIELD "_File-Name" OF "LookupCode" AS character \r
12800   DESCRIPTION "The name of the file which the lookup code applies to"\r
12801   FORMAT "X(30)"\r
12802   INITIAL ?\r
12803   LABEL "File name"\r
12804   POSITION 2\r
12805   SQL-WIDTH 60\r
12806   ORDER 10\r
12807 \r
12808 ADD FIELD "_Field-Name" OF "LookupCode" AS character \r
12809   DESCRIPTION "The name of the field which the lookup code applies to"\r
12810   FORMAT "X(30)"\r
12811   INITIAL ?\r
12812   LABEL "Field name"\r
12813   POSITION 3\r
12814   SQL-WIDTH 60\r
12815   ORDER 20\r
12816 \r
12817 ADD FIELD "LookupCode" OF "LookupCode" AS character \r
12818   DESCRIPTION "The code for the lookup"\r
12819   FORMAT "X(8)"\r
12820   INITIAL ?\r
12821   LABEL "Lookup"\r
12822   POSITION 4\r
12823   SQL-WIDTH 16\r
12824   ORDER 30\r
12825 \r
12826 ADD FIELD "Description" OF "LookupCode" AS character \r
12827   DESCRIPTION "A brief description of the lookup code"\r
12828   FORMAT "X(50)"\r
12829   INITIAL ?\r
12830   LABEL "Description"\r
12831   POSITION 5\r
12832   SQL-WIDTH 100\r
12833   ORDER 40\r
12834 \r
12835 ADD FIELD "LookupData" OF "LookupCode" AS character \r
12836   DESCRIPTION "Data associated with the lookup code, if needed"\r
12837   FORMAT "X(78)"\r
12838   INITIAL ?\r
12839   LABEL "Lookup data"\r
12840   POSITION 6\r
12841   SQL-WIDTH 156\r
12842   ORDER 50\r
12843 \r
12844 ADD INDEX "XPKLookupCodes" ON "LookupCode" \r
12845   AREA "Schema Area"\r
12846   UNIQUE\r
12847   PRIMARY\r
12848   INDEX-FIELD "_File-Name" ASCENDING \r
12849   INDEX-FIELD "_Field-Name" ASCENDING \r
12850   INDEX-FIELD "LookupCode" ASCENDING \r
12851 \r
12852 ADD TABLE "PersonDetail"\r
12853   AREA "Schema Area"\r
12854   LABEL "Person Details"\r
12855   DESCRIPTION "Arbitrary and extensible information related to a person"\r
12856   DUMP-NAME "persdetl"\r
12857 \r
12858 ADD FIELD "PersonCode" OF "PersonDetail" AS integer \r
12859   DESCRIPTION "A code used to refer to this person."\r
12860   FORMAT "99999"\r
12861   INITIAL ?\r
12862   LABEL "Person code"\r
12863   POSITION 2\r
12864   SQL-WIDTH 4\r
12865   COLUMN-LABEL "Person"\r
12866   ORDER 10\r
12867 \r
12868 ADD FIELD "PersonDetailType" OF "PersonDetail" AS character \r
12869   FORMAT "X(4)"\r
12870   INITIAL ""\r
12871   POSITION 3\r
12872   SQL-WIDTH 8\r
12873   ORDER 20\r
12874 \r
12875 ADD FIELD "SupplementaryType" OF "PersonDetail" AS character \r
12876   DESCRIPTION "Designed to be used where multiple values for one type are allowable.  Should be under program control."\r
12877   FORMAT "X(8)"\r
12878   INITIAL ""\r
12879   POSITION 4\r
12880   SQL-WIDTH 16\r
12881   ORDER 30\r
12882 \r
12883 ADD FIELD "DataValue" OF "PersonDetail" AS character \r
12884   DESCRIPTION "The data associated with this person for this type / supplementary type reason."\r
12885   FORMAT "X(78)"\r
12886   INITIAL ""\r
12887   POSITION 5\r
12888   SQL-WIDTH 156\r
12889   ORDER 40\r
12890 \r
12891 ADD FIELD "ContactType" OF "PersonDetail" AS character \r
12892   DESCRIPTION "The type of contact involved."\r
12893   FORMAT "X(4)"\r
12894   INITIAL ""\r
12895   LABEL "Type"\r
12896   POSITION 6\r
12897   SQL-WIDTH 8\r
12898   ORDER 50\r
12899 \r
12900 ADD INDEX "XPKPersonDetails" ON "PersonDetail" \r
12901   AREA "Schema Area"\r
12902   UNIQUE\r
12903   PRIMARY\r
12904   INDEX-FIELD "PersonCode" ASCENDING \r
12905   INDEX-FIELD "PersonDetailType" ASCENDING \r
12906   INDEX-FIELD "SupplementaryType" ASCENDING \r
12907 \r
12908 ADD INDEX "XAK1PersonDetails" ON "PersonDetail" \r
12909   AREA "Schema Area"\r
12910   INDEX-FIELD "PersonDetailType" ASCENDING \r
12911   INDEX-FIELD "SupplementaryType" ASCENDING \r
12912 \r
12913 ADD TABLE "PersonDetailType"\r
12914   AREA "Schema Area"\r
12915   DUMP-NAME "perdetyp"\r
12916 \r
12917 ADD FIELD "PersonDetailType" OF "PersonDetailType" AS character \r
12918   FORMAT "X(4)"\r
12919   INITIAL ""\r
12920   LABEL "Person Detail Type"\r
12921   POSITION 2\r
12922   SQL-WIDTH 8\r
12923   ORDER 10\r
12924 \r
12925 ADD FIELD "Description" OF "PersonDetailType" AS character \r
12926   FORMAT "X(50)"\r
12927   INITIAL ""\r
12928   POSITION 3\r
12929   SQL-WIDTH 100\r
12930   ORDER 20\r
12931 \r
12932 ADD INDEX "XPKPersonDetailTypes" ON "PersonDetailType" \r
12933   AREA "Schema Area"\r
12934   UNIQUE\r
12935   PRIMARY\r
12936   INDEX-FIELD "PersonDetailType" ASCENDING \r
12937 \r
12938 ADD TABLE "EntityList"\r
12939   AREA "Schema Area"\r
12940   LABEL "Entity List"\r
12941   DESCRIPTION "Contains lists of entities to provide arbitrary groupings"\r
12942   DUMP-NAME "ent-list"\r
12943 \r
12944 ADD FIELD "ListType" OF "EntityList" AS character \r
12945   DESCRIPTION "A reference to the entity types table indicating the type of entity to which this list applies (Company, Property, Project, Creditor or Tenant)."\r
12946   FORMAT "X"\r
12947   INITIAL ?\r
12948   LABEL "List Type"\r
12949   POSITION 2\r
12950   SQL-WIDTH 2\r
12951   COLUMN-LABEL "T"\r
12952   COLUMN-LABEL-SA "C"\r
12953   ORDER 10\r
12954 \r
12955 ADD FIELD "ListCode" OF "EntityList" AS character \r
12956   DESCRIPTION "A unique code identifying this list"\r
12957   FORMAT "X(8)"\r
12958   INITIAL ""\r
12959   LABEL "List code"\r
12960   POSITION 3\r
12961   SQL-WIDTH 16\r
12962   ORDER 20\r
12963 \r
12964 ADD FIELD "Description" OF "EntityList" AS character \r
12965   DESCRIPTION "A description of the list"\r
12966   FORMAT "X(50)"\r
12967   INITIAL ""\r
12968   POSITION 4\r
12969   SQL-WIDTH 100\r
12970   HELP "A description of the list"\r
12971   ORDER 30\r
12972 \r
12973 ADD INDEX "XPKEntityList" ON "EntityList" \r
12974   AREA "Schema Area"\r
12975   UNIQUE\r
12976   PRIMARY\r
12977   INDEX-FIELD "ListType" ASCENDING \r
12978   INDEX-FIELD "ListCode" ASCENDING \r
12979 \r
12980 ADD TABLE "EntityListMember"\r
12981   AREA "Schema Area"\r
12982   LABEL "Entity List Member"\r
12983   DESCRIPTION "Members of entity lists"\r
12984   DUMP-NAME "entlsmem"\r
12985 \r
12986 ADD FIELD "ListType" OF "EntityListMember" AS character \r
12987   DESCRIPTION "A reference to the entity types table indicating the type of entity to which this list applies (Company, Property, Project, Creditor or Tenant)."\r
12988   FORMAT "X"\r
12989   INITIAL ?\r
12990   LABEL "List Type"\r
12991   POSITION 2\r
12992   SQL-WIDTH 2\r
12993   COLUMN-LABEL "T"\r
12994   COLUMN-LABEL-SA "C"\r
12995   ORDER 10\r
12996 \r
12997 ADD FIELD "ListCode" OF "EntityListMember" AS character \r
12998   DESCRIPTION "A unique code identifying this list"\r
12999   FORMAT "X(8)"\r
13000   INITIAL ""\r
13001   LABEL "List code"\r
13002   POSITION 3\r
13003   SQL-WIDTH 16\r
13004   ORDER 20\r
13005 \r
13006 ADD FIELD "EntityType" OF "EntityListMember" AS character \r
13007   DESCRIPTION "A reference to the entity types table indicating the type of entity of this list member (Company, Property, Project, Creditor or Tenant)."\r
13008   FORMAT "X"\r
13009   INITIAL ?\r
13010   LABEL "Entity type"\r
13011   POSITION 4\r
13012   SQL-WIDTH 2\r
13013   COLUMN-LABEL "T"\r
13014   COLUMN-LABEL-SA "C"\r
13015   ORDER 30\r
13016 \r
13017 ADD FIELD "EntityCode" OF "EntityListMember" AS integer \r
13018   FORMAT "99999"\r
13019   INITIAL ?\r
13020   LABEL "Code"\r
13021   POSITION 5\r
13022   SQL-WIDTH 4\r
13023   COLUMN-LABEL-SA "C"\r
13024   ORDER 40\r
13025 \r
13026 ADD FIELD "AccountCode" OF "EntityListMember" AS decimal \r
13027   DESCRIPTION "The code of the account from within the chart of accounts that this ledger account applies to."\r
13028   FORMAT "9999.99"\r
13029   INITIAL ?\r
13030   LABEL "Account"\r
13031   POSITION 6\r
13032   SQL-WIDTH 17\r
13033   DECIMALS 2\r
13034   ORDER 50\r
13035 \r
13036 ADD FIELD "SortSequence" OF "EntityListMember" AS integer \r
13037   DESCRIPTION "An arbitrary integer to provide a sorted list"\r
13038   FORMAT "->>>,>>9"\r
13039   INITIAL "0"\r
13040   LABEL "Sort by"\r
13041   POSITION 7\r
13042   SQL-WIDTH 4\r
13043   HELP "An arbitrary integer to provide an alternative list order"\r
13044   ORDER 60\r
13045 \r
13046 ADD INDEX "XPKEntityListMember" ON "EntityListMember" \r
13047   AREA "Schema Area"\r
13048   UNIQUE\r
13049   PRIMARY\r
13050   INDEX-FIELD "ListType" ASCENDING \r
13051   INDEX-FIELD "ListCode" ASCENDING \r
13052   INDEX-FIELD "SortSequence" ASCENDING \r
13053   INDEX-FIELD "EntityType" ASCENDING \r
13054   INDEX-FIELD "EntityCode" ASCENDING \r
13055   INDEX-FIELD "AccountCode" ASCENDING \r
13056 \r
13057 ADD INDEX "XAKEntityListMember" ON "EntityListMember" \r
13058   AREA "Schema Area"\r
13059   UNIQUE\r
13060   DESCRIPTION "Index to ensure correct uniqueness, and entity sort ordering (if desired)."\r
13061   INDEX-FIELD "ListType" ASCENDING \r
13062   INDEX-FIELD "ListCode" ASCENDING \r
13063   INDEX-FIELD "EntityType" ASCENDING \r
13064   INDEX-FIELD "EntityCode" ASCENDING \r
13065   INDEX-FIELD "AccountCode" ASCENDING \r
13066 \r
13067 ADD TABLE "TenantCall"\r
13068   AREA "Schema Area"\r
13069   DESCRIPTION "Register calls from tenants"\r
13070   DUMP-NAME "tnntcall"\r
13071   TABLE-TRIGGER "WRITE" OVERRIDE PROCEDURE "wrtntcal.p" CRC "?" \r
13072 \r
13073 ADD FIELD "CallNumber" OF "TenantCall" AS integer \r
13074   FORMAT "->,>>>,>>9"\r
13075   INITIAL "0"\r
13076   LABEL "Call No"\r
13077   POSITION 2\r
13078   SQL-WIDTH 4\r
13079   ORDER 10\r
13080 \r
13081 ADD FIELD "PropertyCode" OF "TenantCall" AS integer \r
13082   FORMAT "99999"\r
13083   INITIAL "0"\r
13084   LABEL "Property"\r
13085   POSITION 3\r
13086   SQL-WIDTH 4\r
13087   ORDER 20\r
13088 \r
13089 ADD FIELD "Level" OF "TenantCall" AS integer \r
13090   FORMAT "->,>>>,>>9"\r
13091   INITIAL "0"\r
13092   POSITION 4\r
13093   SQL-WIDTH 4\r
13094   ORDER 30\r
13095 \r
13096 ADD FIELD "TenantCode" OF "TenantCall" AS integer \r
13097   DESCRIPTION "A code used to refer to this tenant."\r
13098   FORMAT "99999"\r
13099   INITIAL "0"\r
13100   POSITION 5\r
13101   SQL-WIDTH 4\r
13102   ORDER 40\r
13103 \r
13104 ADD FIELD "Problem" OF "TenantCall" AS character \r
13105   FORMAT "X(78)"\r
13106   INITIAL ""\r
13107   POSITION 6\r
13108   SQL-WIDTH 156\r
13109   ORDER 50\r
13110 \r
13111 ADD FIELD "Action" OF "TenantCall" AS character \r
13112   FORMAT "X(78)"\r
13113   INITIAL ""\r
13114   POSITION 7\r
13115   SQL-WIDTH 156\r
13116   ORDER 60\r
13117 \r
13118 ADD FIELD "DateOfCall" OF "TenantCall" AS date \r
13119   FORMAT "99/99/9999"\r
13120   INITIAL ?\r
13121   LABEL "Call Date"\r
13122   POSITION 8\r
13123   SQL-WIDTH 4\r
13124   ORDER 70\r
13125 \r
13126 ADD FIELD "CallCategoryCode" OF "TenantCall" AS character \r
13127   FORMAT "X(8)"\r
13128   INITIAL ""\r
13129   LABEL "Category"\r
13130   POSITION 9\r
13131   SQL-WIDTH 16\r
13132   ORDER 80\r
13133 \r
13134 ADD FIELD "CallStatusCode" OF "TenantCall" AS character \r
13135   FORMAT "X(8)"\r
13136   INITIAL ""\r
13137   LABEL "Call Status"\r
13138   POSITION 10\r
13139   SQL-WIDTH 16\r
13140   ORDER 90\r
13141 \r
13142 ADD FIELD "TimeOfCall" OF "TenantCall" AS integer \r
13143   FORMAT ">>,>>9"\r
13144   INITIAL "0"\r
13145   LABEL "Call Time"\r
13146   POSITION 11\r
13147   SQL-WIDTH 4\r
13148   ORDER 100\r
13149 \r
13150 ADD FIELD "DateComplete" OF "TenantCall" AS date \r
13151   FORMAT "99/99/9999"\r
13152   INITIAL ?\r
13153   LABEL "Date Complete"\r
13154   POSITION 12\r
13155   SQL-WIDTH 4\r
13156   ORDER 110\r
13157 \r
13158 ADD FIELD "TimeComplete" OF "TenantCall" AS integer \r
13159   FORMAT ">>,>>9"\r
13160   INITIAL ?\r
13161   POSITION 13\r
13162   SQL-WIDTH 4\r
13163   ORDER 120\r
13164 \r
13165 ADD FIELD "CreditorCode" OF "TenantCall" AS integer \r
13166   DESCRIPTION "The creditor who is contracted to provide this service for this property"\r
13167   FORMAT "99999"\r
13168   INITIAL "0"\r
13169   LABEL "Creditor code"\r
13170   POSITION 14\r
13171   SQL-WIDTH 4\r
13172   COLUMN-LABEL "Code"\r
13173   ORDER 130\r
13174 \r
13175 ADD FIELD "OrderNo" OF "TenantCall" AS integer \r
13176   FORMAT ">>>>>9"\r
13177   INITIAL "0"\r
13178   LABEL "Order No"\r
13179   POSITION 15\r
13180   SQL-WIDTH 4\r
13181   ORDER 140\r
13182 \r
13183 ADD FIELD "OrderAmount" OF "TenantCall" AS decimal \r
13184   FORMAT "->>,>>>,>>9.99"\r
13185   INITIAL "0"\r
13186   LABEL "Order Amt"\r
13187   POSITION 16\r
13188   SQL-WIDTH 17\r
13189   DECIMALS 2\r
13190   ORDER 150\r
13191 \r
13192 ADD FIELD "Priority" OF "TenantCall" AS character \r
13193   FORMAT "X(4)"\r
13194   INITIAL ""\r
13195   LABEL "Job Priority"\r
13196   POSITION 17\r
13197   SQL-WIDTH 8\r
13198   ORDER 160\r
13199 \r
13200 ADD FIELD "ContactName" OF "TenantCall" AS character \r
13201   FORMAT "X(30)"\r
13202   INITIAL ""\r
13203   LABEL "Tnnt Contact"\r
13204   POSITION 18\r
13205   SQL-WIDTH 60\r
13206   ORDER 170\r
13207 \r
13208 ADD FIELD "ContactPhone" OF "TenantCall" AS character \r
13209   FORMAT "X(30)"\r
13210   INITIAL ""\r
13211   LABEL "Contact Phone"\r
13212   POSITION 19\r
13213   SQL-WIDTH 60\r
13214   ORDER 180\r
13215 \r
13216 ADD FIELD "Description" OF "TenantCall" AS character \r
13217   FORMAT "X(60)"\r
13218   INITIAL ""\r
13219   LABEL "Description"\r
13220   POSITION 20\r
13221   SQL-WIDTH 120\r
13222   ORDER 190\r
13223 \r
13224 ADD FIELD "LoggedBy" OF "TenantCall" AS integer \r
13225   DESCRIPTION "A reference to the person who logged this call."\r
13226   FORMAT ">>>>>9"\r
13227   INITIAL "0"\r
13228   LABEL "Logged By"\r
13229   POSITION 21\r
13230   SQL-WIDTH 4\r
13231   COLUMN-LABEL "Logged By"\r
13232   ORDER 200\r
13233 \r
13234 ADD FIELD "LastEmailDate" OF "TenantCall" AS date \r
13235   DESCRIPTION "Date last email notification was sent to Building Manager."\r
13236   FORMAT "99/99/9999"\r
13237   INITIAL ?\r
13238   LABEL "Email Sent"\r
13239   POSITION 22\r
13240   SQL-WIDTH 4\r
13241   COLUMN-LABEL "EmailDate"\r
13242   HELP "The date on which last email was sent to Building Manager."\r
13243   ORDER 220\r
13244 \r
13245 ADD FIELD "SendEmail" OF "TenantCall" AS logical \r
13246   DESCRIPTION "Flag email to Building Manager required."\r
13247   FORMAT "yes/no"\r
13248   INITIAL "no"\r
13249   LABEL "Email Building Manager"\r
13250   POSITION 23\r
13251   SQL-WIDTH 1\r
13252   COLUMN-LABEL "SendEmail"\r
13253   HELP "Send notification email to Building Manager."\r
13254   ORDER 210\r
13255 \r
13256 ADD INDEX "XPKTenantCall" ON "TenantCall" \r
13257   AREA "Schema Area"\r
13258   UNIQUE\r
13259   PRIMARY\r
13260   INDEX-FIELD "CallNumber" ASCENDING \r
13261 \r
13262 ADD INDEX "XAK1TenantCall" ON "TenantCall" \r
13263   AREA "Schema Area"\r
13264   INDEX-FIELD "PropertyCode" ASCENDING \r
13265   INDEX-FIELD "DateOfCall" DESCENDING \r
13266 \r
13267 ADD INDEX "XAK2TenantCall" ON "TenantCall" \r
13268   AREA "Schema Area"\r
13269   INDEX-FIELD "CallStatusCode" ASCENDING \r
13270   INDEX-FIELD "DateOfCall" ASCENDING \r
13271 \r
13272 ADD INDEX "XAK3TenantCall" ON "TenantCall" \r
13273   AREA "Schema Area"\r
13274   INDEX-FIELD "TenantCode" ASCENDING \r
13275   INDEX-FIELD "DateOfCall" DESCENDING \r
13276 \r
13277 ADD INDEX "XAK4TenantCall" ON "TenantCall" \r
13278   AREA "Schema Area"\r
13279   INDEX-FIELD "CallStatusCode" ASCENDING \r
13280   INDEX-FIELD "TenantCode" ASCENDING \r
13281   INDEX-FIELD "DateOfCall" DESCENDING \r
13282 \r
13283 ADD INDEX "XAK5TenantCall" ON "TenantCall" \r
13284   AREA "Schema Area"\r
13285   INDEX-FIELD "CallCategoryCode" ASCENDING \r
13286 \r
13287 ADD INDEX "XAK6TenantCall" ON "TenantCall" \r
13288   AREA "Schema Area"\r
13289   WORD\r
13290   INDEX-FIELD "Problem" ASCENDING \r
13291 \r
13292 ADD TABLE "PropertyView"\r
13293   AREA "Schema Area"\r
13294   DESCRIPTION "Sparse table holding overrides for the Rental Space table which redefine how it should appear on the Property Picture report"\r
13295   DUMP-NAME "propview"\r
13296 \r
13297 ADD FIELD "PropertyCode" OF "PropertyView" AS integer \r
13298   DESCRIPTION "The property that this rental space is a part of"\r
13299   FORMAT "99999"\r
13300   INITIAL "0"\r
13301   LABEL "Property"\r
13302   POSITION 2\r
13303   SQL-WIDTH 4\r
13304   ORDER 10\r
13305 \r
13306 ADD FIELD "RentalSpaceCode" OF "PropertyView" AS integer \r
13307   DESCRIPTION "A sequence number which identifies this rental space within the property."\r
13308   FORMAT ">>>>9"\r
13309   INITIAL "0"\r
13310   LABEL "Rental space code"\r
13311   POSITION 3\r
13312   SQL-WIDTH 4\r
13313   COLUMN-LABEL "Space"\r
13314   ORDER 20\r
13315 \r
13316 ADD FIELD "Sequence" OF "PropertyView" AS integer \r
13317   DESCRIPTION "Arbitrary sequence within rental space"\r
13318   FORMAT "->,>>>,>>9"\r
13319   INITIAL "0"\r
13320   POSITION 4\r
13321   SQL-WIDTH 4\r
13322   ORDER 30\r
13323 \r
13324 ADD FIELD "Level" OF "PropertyView" AS integer \r
13325   DESCRIPTION "Level within building, overriding the RentalSpace level"\r
13326   FORMAT "->,>>>,>>9"\r
13327   INITIAL ?\r
13328   POSITION 5\r
13329   SQL-WIDTH 4\r
13330   ORDER 40\r
13331 \r
13332 ADD FIELD "LevelSequence" OF "PropertyView" AS integer \r
13333   DESCRIPTION "Sequence within level overriding the RentalSpace level sequence"\r
13334   FORMAT "->,>>>,>>9"\r
13335   INITIAL ?\r
13336   POSITION 6\r
13337   SQL-WIDTH 4\r
13338   ORDER 50\r
13339 \r
13340 ADD FIELD "AreaType" OF "PropertyView" AS character \r
13341   DESCRIPTION "The type of rental space eg. Office, Rental, Carpark, Warehouse, etc, overriding the rental space"\r
13342   FORMAT "X(4)"\r
13343   INITIAL ?\r
13344   LABEL "Area type"\r
13345   POSITION 7\r
13346   SQL-WIDTH 8\r
13347   COLUMN-LABEL "Type"\r
13348   ORDER 60\r
13349 \r
13350 ADD FIELD "AreaSize" OF "PropertyView" AS decimal \r
13351   DESCRIPTION "The area of the rental space in square metres., overriding the rental space"\r
13352   FORMAT "->>,>>9.99"\r
13353   INITIAL ?\r
13354   LABEL "Sq M."\r
13355   POSITION 8\r
13356   SQL-WIDTH 21\r
13357   COLUMN-LABEL-SA "C"\r
13358   DECIMALS 6\r
13359   ORDER 70\r
13360 \r
13361 ADD FIELD "TenantName" OF "PropertyView" AS character \r
13362   DESCRIPTION "The name of the tenant for this (sub)area, overriding the name from the lease"\r
13363   FORMAT "X(8)"\r
13364   INITIAL ?\r
13365   POSITION 9\r
13366   SQL-WIDTH 16\r
13367   ORDER 80\r
13368 \r
13369 ADD INDEX "XPKPropertyView" ON "PropertyView" \r
13370   AREA "Schema Area"\r
13371   UNIQUE\r
13372   PRIMARY\r
13373   DESCRIPTION "Index into property view table"\r
13374   INDEX-FIELD "PropertyCode" ASCENDING \r
13375   INDEX-FIELD "RentalSpaceCode" ASCENDING \r
13376   INDEX-FIELD "Sequence" ASCENDING \r
13377 \r
13378 ADD TABLE "COAConversion"\r
13379   AREA "Schema Area"\r
13380   LABEL "Chart of Accounts Conversion"\r
13381   DESCRIPTION "This file servers as a conversion matrix table for converting the old chart of accounts for all companies intop APMS"\r
13382   DUMP-NAME "coaconve"\r
13383 \r
13384 ADD FIELD "CompanyCode" OF "COAConversion" AS integer \r
13385   DESCRIPTION "The code used to refer to a company."\r
13386   FORMAT ">>999"\r
13387   INITIAL "0"\r
13388   LABEL "Company"\r
13389   POSITION 2\r
13390   SQL-WIDTH 4\r
13391   ORDER 10\r
13392   MANDATORY\r
13393 \r
13394 ADD FIELD "AccountCode" OF "COAConversion" AS decimal \r
13395   DESCRIPTION "The code of the account."\r
13396   FORMAT "9999.99"\r
13397   INITIAL ?\r
13398   LABEL "APMS Account"\r
13399   POSITION 3\r
13400   SQL-WIDTH 17\r
13401   DECIMALS 2\r
13402   ORDER 20\r
13403   MANDATORY\r
13404 \r
13405 ADD FIELD "OldAccountCode" OF "COAConversion" AS decimal \r
13406   DESCRIPTION "The code of the account from the old Chart of Account."\r
13407   FORMAT "9999.99"\r
13408   INITIAL ?\r
13409   LABEL "Old Account"\r
13410   POSITION 4\r
13411   SQL-WIDTH 17\r
13412   DECIMALS 2\r
13413   ORDER 30\r
13414   MANDATORY\r
13415 \r
13416 ADD INDEX "XPOldAccountCode" ON "COAConversion" \r
13417   AREA "Schema Area"\r
13418   PRIMARY\r
13419   INDEX-FIELD "CompanyCode" ASCENDING \r
13420   INDEX-FIELD "OldAccountCode" ASCENDING \r
13421 \r
13422 ADD INDEX "XAAccountCode" ON "COAConversion" \r
13423   AREA "Schema Area"\r
13424   INDEX-FIELD "CompanyCode" ASCENDING \r
13425   INDEX-FIELD "AccountCode" ASCENDING \r
13426 \r
13427 ADD TABLE "DirectEntryDetail"\r
13428   AREA "Schema Area"\r
13429   DESCRIPTION "The direct credit details for the Australian system"\r
13430   DUMP-NAME "directen"\r
13431 \r
13432 ADD FIELD "DEUserName" OF "DirectEntryDetail" AS character \r
13433   DESCRIPTION "Direct entry user name"\r
13434   FORMAT "X(26)"\r
13435   INITIAL ""\r
13436   POSITION 2\r
13437   SQL-WIDTH 52\r
13438   ORDER 10\r
13439 \r
13440 ADD FIELD "DEUserId" OF "DirectEntryDetail" AS character \r
13441   DESCRIPTION "The direct entry user ID"\r
13442   FORMAT "X(6)"\r
13443   INITIAL ""\r
13444   POSITION 3\r
13445   SQL-WIDTH 12\r
13446   ORDER 20\r
13447 \r
13448 ADD FIELD "DEInstitution" OF "DirectEntryDetail" AS character \r
13449   DESCRIPTION "Three character institution code"\r
13450   FORMAT "X(3)"\r
13451   INITIAL ""\r
13452   POSITION 4\r
13453   SQL-WIDTH 6\r
13454   ORDER 30\r
13455 \r
13456 .\r
13457 PSC\r
13458 cpstream=ISO8859-1\r
13459 .\r
13460 0000311885\r