df/20040505-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 "FALSE"\r
  41   VALMSG "Cannot delete 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 "NextAnnualReturn" OF "Company" AS date \r
1105   DESCRIPTION "The date when returns should be field next"\r
1106   FORMAT "99/99/9999"\r
1107   INITIAL ?\r
1108   LABEL "Next Annual Return Date"\r
1109   POSITION 10\r
1110   SQL-WIDTH 4\r
1111   ORDER 110\r
1112 \r
1113 ADD FIELD "AuthorisedCapital" OF "Company" AS decimal \r
1114   FORMAT "->,>>>,>>>,>>9.99"\r
1115   INITIAL "0"\r
1116   LABEL "Authorised Capital"\r
1117   POSITION 11\r
1118   SQL-WIDTH 17\r
1119   DECIMALS 2\r
1120   ORDER 120\r
1121 \r
1122 ADD FIELD "IsssuedCapital" OF "Company" AS decimal \r
1123   FORMAT "->,>>>,>>>,>>9.99"\r
1124   INITIAL "0"\r
1125   LABEL "Issued Capital"\r
1126   POSITION 12\r
1127   SQL-WIDTH 17\r
1128   DECIMALS 2\r
1129   ORDER 130\r
1130 \r
1131 ADD FIELD "Paid" OF "Company" AS logical \r
1132   DESCRIPTION "Identifies if the issued capital for this compnay has been paid"\r
1133   FORMAT "Y/N"\r
1134   INITIAL "Y"\r
1135   POSITION 13\r
1136   SQL-WIDTH 1\r
1137   VIEW-AS "VIEW-AS TOGGLE-BOX"\r
1138   ORDER 140\r
1139 \r
1140 ADD FIELD "Secretary" OF "Company" AS integer \r
1141   DESCRIPTION "The person that is a secretary of this company"\r
1142   FORMAT ">>>>>9"\r
1143   INITIAL "0"\r
1144   POSITION 14\r
1145   SQL-WIDTH 4\r
1146   ORDER 150\r
1147   MANDATORY\r
1148 \r
1149 ADD FIELD "PreviousNames" OF "Company" AS character \r
1150   DESCRIPTION "Any previous names of the company"\r
1151   FORMAT "X(256)"\r
1152   INITIAL ""\r
1153   LABEL "Previous Names"\r
1154   POSITION 15\r
1155   SQL-WIDTH 512\r
1156   VIEW-AS "VIEW-AS EDITOR SIZE-CHARS 70 BY 3\r
1157  SCROLLBAR-VERTICAL"\r
1158   LENGTH 0\r
1159   ORDER 160\r
1160 \r
1161 ADD FIELD "OperationalCountry" OF "Company" AS character \r
1162   FORMAT "X(3)"\r
1163   INITIAL "NZL"\r
1164   POSITION 16\r
1165   SQL-WIDTH 6\r
1166   VIEW-AS "VIEW-AS RADIO-SET\r
1167   RADIO-BUTTONS\r
1168   ""New Zealand"", ""NZL"",\r
1169   ""Australian"",  ""AUS"",\r
1170   ""Other"",       ""OTH""\r
1171   VERTICAL\r
1172   SIZE-CHARS 16 by 3\r
1173 "\r
1174   LENGTH 0\r
1175   ORDER 170\r
1176   MANDATORY\r
1177 \r
1178 ADD FIELD "OwnCreditors" OF "Company" AS logical \r
1179   FORMAT "yes/no"\r
1180   INITIAL "no"\r
1181   LABEL "Own creditors"\r
1182   POSITION 17\r
1183   SQL-WIDTH 1\r
1184   ORDER 180\r
1185 \r
1186 ADD FIELD "LastModifiedDate" OF "Company" AS date \r
1187   DESCRIPTION "The date when this record was last modified.  Maintained by a WRITE trigger."\r
1188   FORMAT "99/99/9999"\r
1189   INITIAL "1/1/0001"\r
1190   POSITION 18\r
1191   SQL-WIDTH 4\r
1192   ORDER 190\r
1193   MANDATORY\r
1194 \r
1195 ADD FIELD "LastModifiedTime" OF "Company" AS integer \r
1196   DESCRIPTION "The time that this record was last modified"\r
1197   FORMAT "->,>>>,>>9"\r
1198   INITIAL "0"\r
1199   POSITION 19\r
1200   SQL-WIDTH 4\r
1201   ORDER 200\r
1202 \r
1203 ADD FIELD "LastModifiedUser" OF "Company" AS character \r
1204   DESCRIPTION "The user who last modified this record.  Maintained by a WRITE trigger."\r
1205   FORMAT "X(8)"\r
1206   INITIAL ""\r
1207   POSITION 20\r
1208   SQL-WIDTH 16\r
1209   LENGTH 0\r
1210   ORDER 210\r
1211 \r
1212 ADD FIELD "AuditRecordId" OF "Company" AS integer \r
1213   FORMAT "->,>>>,>>9"\r
1214   INITIAL "0"\r
1215   POSITION 21\r
1216   SQL-WIDTH 4\r
1217   ORDER 220\r
1218 \r
1219 ADD FIELD "Active" OF "Company" AS logical \r
1220   FORMAT "yes/no"\r
1221   INITIAL "Yes"\r
1222   POSITION 22\r
1223   SQL-WIDTH 1\r
1224   ORDER 230\r
1225 \r
1226 ADD FIELD "ParValue" OF "Company" AS decimal \r
1227   FORMAT "->>,>>9.99"\r
1228   INITIAL "0"\r
1229   POSITION 23\r
1230   SQL-WIDTH 17\r
1231   DECIMALS 2\r
1232   ORDER 250\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 INDEX "XPKCompanies" ON "Company" \r
1261   AREA "Schema Area"\r
1262   UNIQUE\r
1263   PRIMARY\r
1264   INDEX-FIELD "CompanyCode" ASCENDING \r
1265 \r
1266 ADD INDEX "XAK1Companies" ON "Company" \r
1267   AREA "Schema Area"\r
1268   INDEX-FIELD "ShortName" ASCENDING ABBREVIATED \r
1269 \r
1270 ADD TABLE "Contact"\r
1271   AREA "Schema Area"\r
1272   DUMP-NAME "contact"\r
1273   TABLE-TRIGGER "DELETE" OVERRIDE PROCEDURE "decontct.p" CRC "?" \r
1274   TABLE-TRIGGER "WRITE" OVERRIDE PROCEDURE "wrcontct.p" CRC "?" \r
1275 \r
1276 ADD FIELD "PersonCode" OF "Contact" AS integer \r
1277   DESCRIPTION "A reference to the contact person."\r
1278   FORMAT ">>>>>9"\r
1279   INITIAL "0"\r
1280   LABEL "Person"\r
1281   POSITION 2\r
1282   SQL-WIDTH 4\r
1283   ORDER 10\r
1284 \r
1285 ADD FIELD "ContactType" OF "Contact" AS character \r
1286   DESCRIPTION "The type of contact involved."\r
1287   FORMAT "X(4)"\r
1288   INITIAL ""\r
1289   LABEL "Type"\r
1290   POSITION 3\r
1291   SQL-WIDTH 8\r
1292   LENGTH 0\r
1293   ORDER 20\r
1294   MANDATORY\r
1295 \r
1296 ADD FIELD "Notes" OF "Contact" AS integer \r
1297   DESCRIPTION "Any notes applying to the contact"\r
1298   FORMAT ">>>>>9"\r
1299   INITIAL "0"\r
1300   LABEL "Notes"\r
1301   POSITION 4\r
1302   SQL-WIDTH 4\r
1303   ORDER 30\r
1304   MANDATORY\r
1305 \r
1306 ADD FIELD "SystemCode" OF "Contact" AS logical \r
1307   FORMAT "yes/no"\r
1308   INITIAL "no"\r
1309   POSITION 5\r
1310   SQL-WIDTH 1\r
1311   HELP "Set to ""yes"" for system-maintained codes, ""no"" for user codes"\r
1312   ORDER 40\r
1313   MANDATORY\r
1314 \r
1315 ADD FIELD "Sort1" OF "Contact" AS character \r
1316   FORMAT "X(8)"\r
1317   INITIAL ""\r
1318   POSITION 6\r
1319   SQL-WIDTH 16\r
1320   ORDER 50\r
1321 \r
1322 ADD FIELD "Sort2" OF "Contact" AS character \r
1323   FORMAT "X(8)"\r
1324   INITIAL ""\r
1325   POSITION 7\r
1326   SQL-WIDTH 16\r
1327   ORDER 60\r
1328 \r
1329 ADD FIELD "Sort3" OF "Contact" AS character \r
1330   FORMAT "X(8)"\r
1331   INITIAL ""\r
1332   POSITION 8\r
1333   SQL-WIDTH 16\r
1334   ORDER 70\r
1335 \r
1336 ADD FIELD "Soundex1" OF "Contact" AS character \r
1337   DESCRIPTION "Soundex coding for the primary sort key"\r
1338   FORMAT "X(4)"\r
1339   INITIAL ""\r
1340   POSITION 9\r
1341   SQL-WIDTH 8\r
1342   ORDER 80\r
1343 \r
1344 ADD INDEX "Contacts" ON "Contact" \r
1345   AREA "Schema Area"\r
1346   UNIQUE\r
1347   PRIMARY\r
1348   INDEX-FIELD "PersonCode" ASCENDING \r
1349   INDEX-FIELD "ContactType" ASCENDING \r
1350 \r
1351 ADD INDEX "XAK1Contacts" ON "Contact" \r
1352   AREA "Schema Area"\r
1353   UNIQUE\r
1354   INDEX-FIELD "ContactType" ASCENDING \r
1355   INDEX-FIELD "PersonCode" ASCENDING \r
1356 \r
1357 ADD TABLE "ContactType"\r
1358   AREA "Schema Area"\r
1359   DUMP-NAME "contactt"\r
1360   TABLE-TRIGGER "WRITE" OVERRIDE PROCEDURE "wrctctyp.p" CRC "?" \r
1361 \r
1362 ADD FIELD "ContactType" OF "ContactType" AS character \r
1363   FORMAT "X(4)"\r
1364   INITIAL ""\r
1365   LABEL "Type"\r
1366   POSITION 2\r
1367   SQL-WIDTH 8\r
1368   LENGTH 0\r
1369   ORDER 10\r
1370   MANDATORY\r
1371 \r
1372 ADD FIELD "Description" OF "ContactType" AS character \r
1373   FORMAT "X(50)"\r
1374   INITIAL ""\r
1375   POSITION 3\r
1376   SQL-WIDTH 100\r
1377   LENGTH 0\r
1378   ORDER 20\r
1379 \r
1380 ADD FIELD "SystemCode" OF "ContactType" AS logical \r
1381   FORMAT "yes/no"\r
1382   INITIAL "no"\r
1383   POSITION 4\r
1384   SQL-WIDTH 1\r
1385   HELP "Set to ""yes"" for system-maintained codes, ""no"" for user codes"\r
1386   ORDER 30\r
1387   MANDATORY\r
1388 \r
1389 ADD INDEX "XPKContactTypes" ON "ContactType" \r
1390   AREA "Schema Area"\r
1391   UNIQUE\r
1392   PRIMARY\r
1393   INDEX-FIELD "ContactType" ASCENDING \r
1394 \r
1395 ADD TABLE "Contract"\r
1396   AREA "Schema Area"\r
1397   DUMP-NAME "contract"\r
1398   TABLE-TRIGGER "WRITE" OVERRIDE PROCEDURE "wrcontrt.p" CRC "?" \r
1399 \r
1400 ADD FIELD "CreditorCode" OF "Contract" AS integer \r
1401   DESCRIPTION "The creditor who is contracted to provide this service for this property"\r
1402   FORMAT "99999"\r
1403   INITIAL "0"\r
1404   LABEL "Creditor code"\r
1405   POSITION 2\r
1406   SQL-WIDTH 4\r
1407   COLUMN-LABEL "Code"\r
1408   ORDER 10\r
1409 \r
1410 ADD FIELD "PropertyCode" OF "Contract" AS integer \r
1411   DESCRIPTION "The property the service is being provided for."\r
1412   FORMAT "99999"\r
1413   INITIAL "0"\r
1414   LABEL "Property"\r
1415   POSITION 3\r
1416   SQL-WIDTH 4\r
1417   ORDER 20\r
1418 \r
1419 ADD FIELD "ServiceType" OF "Contract" AS character \r
1420   FORMAT "X(4)"\r
1421   INITIAL ""\r
1422   LABEL "Service type"\r
1423   POSITION 4\r
1424   SQL-WIDTH 8\r
1425   COLUMN-LABEL "Service"\r
1426   LENGTH 0\r
1427   ORDER 30\r
1428   MANDATORY\r
1429 \r
1430 ADD FIELD "Contact" OF "Contract" AS integer \r
1431   DESCRIPTION "A person to contact for problems relating to this area of service."\r
1432   FORMAT ">>>>>9"\r
1433   INITIAL "0"\r
1434   LABEL "Contact"\r
1435   POSITION 5\r
1436   SQL-WIDTH 4\r
1437   ORDER 40\r
1438   MANDATORY\r
1439 \r
1440 ADD FIELD "NoteCode" OF "Contract" AS integer \r
1441   DESCRIPTION "Any notes relating specifically to this contract."\r
1442   FORMAT ">>>>>9"\r
1443   INITIAL "0"\r
1444   POSITION 6\r
1445   SQL-WIDTH 4\r
1446   ORDER 50\r
1447   MANDATORY\r
1448 \r
1449 ADD FIELD "AnnualEstimate" OF "Contract" AS decimal \r
1450   DESCRIPTION "The estimated annual amount payable to the contractor for this service, where the service is not covered by a fixed price contract."\r
1451   FORMAT "->,>>>,>>9.99"\r
1452   INITIAL "0"\r
1453   LABEL "Estimate p.a."\r
1454   POSITION 7\r
1455   SQL-WIDTH 17\r
1456   DECIMALS 2\r
1457   ORDER 60\r
1458 \r
1459 ADD FIELD "ContractReference" OF "Contract" AS character \r
1460   DESCRIPTION "A reference to the physical contract documentation."\r
1461   FORMAT "X(50)"\r
1462   INITIAL ""\r
1463   LABEL "Description"\r
1464   POSITION 8\r
1465   SQL-WIDTH 100\r
1466   COLUMN-LABEL "Description / Reference"\r
1467   LENGTH 0\r
1468   ORDER 70\r
1469   MANDATORY\r
1470 \r
1471 ADD FIELD "EndDate" OF "Contract" AS date \r
1472   DESCRIPTION "The date on which the contract finishes."\r
1473   FORMAT "99/99/9999"\r
1474   INITIAL ?\r
1475   LABEL "End date"\r
1476   POSITION 9\r
1477   SQL-WIDTH 4\r
1478   ORDER 80\r
1479 \r
1480 ADD FIELD "FixedAmount" OF "Contract" AS decimal \r
1481   DESCRIPTION "The annual amount payable on this contract, if it is for a fixed amount."\r
1482   FORMAT "->,>>>,>>9.99"\r
1483   INITIAL "0"\r
1484   LABEL "Fixed"\r
1485   POSITION 10\r
1486   SQL-WIDTH 17\r
1487   DECIMALS 2\r
1488   ORDER 90\r
1489 \r
1490 ADD FIELD "FrequencyCode" OF "Contract" AS character \r
1491   DESCRIPTION "The frequency with which payments are made for any fixed amount payable under this contract."\r
1492   FORMAT "X(4)"\r
1493   INITIAL ""\r
1494   LABEL "Pmt Frequency"\r
1495   POSITION 11\r
1496   SQL-WIDTH 8\r
1497   LENGTH 0\r
1498   ORDER 130\r
1499   MANDATORY\r
1500 \r
1501 ADD FIELD "ReviewDate" OF "Contract" AS date \r
1502   DESCRIPTION "The date on which the contract should next be reviewed, if desired."\r
1503   FORMAT "99/99/9999"\r
1504   INITIAL ?\r
1505   LABEL "Review"\r
1506   POSITION 12\r
1507   SQL-WIDTH 4\r
1508   ORDER 110\r
1509 \r
1510 ADD FIELD "StartDate" OF "Contract" AS date \r
1511   DESCRIPTION "The date on which the contract commences."\r
1512   FORMAT "99/99/9999"\r
1513   INITIAL ?\r
1514   LABEL "Start"\r
1515   POSITION 13\r
1516   SQL-WIDTH 4\r
1517   ORDER 120\r
1518 \r
1519 ADD FIELD "LastModifiedDate" OF "Contract" AS date \r
1520   DESCRIPTION "The date when this record was last modified.  Maintained by a WRITE trigger."\r
1521   FORMAT "99/99/9999"\r
1522   INITIAL "1/1/0001"\r
1523   POSITION 14\r
1524   SQL-WIDTH 4\r
1525   ORDER 140\r
1526   MANDATORY\r
1527 \r
1528 ADD FIELD "LastModifiedTime" OF "Contract" AS integer \r
1529   DESCRIPTION "The time that this record was last modified"\r
1530   FORMAT "->,>>>,>>9"\r
1531   INITIAL "0"\r
1532   POSITION 15\r
1533   SQL-WIDTH 4\r
1534   ORDER 150\r
1535 \r
1536 ADD FIELD "LastModifiedUser" OF "Contract" AS character \r
1537   DESCRIPTION "The user who last modified this record.  Maintained by a WRITE trigger."\r
1538   FORMAT "X(8)"\r
1539   INITIAL ""\r
1540   POSITION 16\r
1541   SQL-WIDTH 16\r
1542   LENGTH 0\r
1543   ORDER 160\r
1544 \r
1545 ADD FIELD "AuditRecordId" OF "Contract" AS integer \r
1546   FORMAT "->,>>>,>>9"\r
1547   INITIAL "0"\r
1548   POSITION 17\r
1549   SQL-WIDTH 4\r
1550   ORDER 170\r
1551 \r
1552 ADD FIELD "TerminationNotice" OF "Contract" AS integer \r
1553   FORMAT ">>9"\r
1554   INITIAL "0"\r
1555   LABEL "Term. Notice"\r
1556   POSITION 18\r
1557   SQL-WIDTH 4\r
1558   COLUMN-LABEL "Term. Not."\r
1559   HELP "No. of months notice required to terminate the contract"\r
1560   ORDER 180\r
1561 \r
1562 ADD FIELD "Renewing" OF "Contract" AS logical \r
1563   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
1564   FORMAT "yes/no"\r
1565   INITIAL "Yes"\r
1566   POSITION 19\r
1567   SQL-WIDTH 1\r
1568   ORDER 190\r
1569 \r
1570 ADD FIELD "Recoverable" OF "Contract" AS logical \r
1571   DESCRIPTION "Whether the contract costs are recoverable from tenants"\r
1572   FORMAT "yes/no"\r
1573   INITIAL "Yes"\r
1574   POSITION 20\r
1575   SQL-WIDTH 1\r
1576   COLUMN-LABEL "Rec"\r
1577   ORDER 200\r
1578 \r
1579 ADD FIELD "PaymentDate" OF "Contract" AS date \r
1580   DESCRIPTION "A date on which payment has been made to aid calculation of future payment dates"\r
1581   FORMAT "99/99/9999"\r
1582   INITIAL ?\r
1583   LABEL "Payment Cycle"\r
1584   POSITION 21\r
1585   SQL-WIDTH 4\r
1586   ORDER 210\r
1587 \r
1588 ADD FIELD "ContractSeq" OF "Contract" AS integer \r
1589   FORMAT "->,>>>,>>9"\r
1590   INITIAL "10"\r
1591   LABEL "Seq#"\r
1592   POSITION 22\r
1593   SQL-WIDTH 4\r
1594   ORDER 220\r
1595 \r
1596 ADD FIELD "IsContracted" OF "Contract" AS logical \r
1597   FORMAT "yes/no"\r
1598   INITIAL "no"\r
1599   LABEL "Contracted"\r
1600   POSITION 23\r
1601   SQL-WIDTH 1\r
1602   HELP "Is this a contracted expense, or an estimated one"\r
1603   ORDER 230\r
1604 \r
1605 ADD FIELD "OrderCode" OF "Contract" AS integer \r
1606   DESCRIPTION "Associated order for contracted supply."\r
1607   FORMAT ">>>>9"\r
1608   INITIAL "0"\r
1609   POSITION 24\r
1610   SQL-WIDTH 4\r
1611   ORDER 240\r
1612 \r
1613 ADD FIELD "Active" OF "Contract" AS logical \r
1614   DESCRIPTION "Flag to indicate whether the contract is active or inactive"\r
1615   FORMAT "yes/no"\r
1616   INITIAL "yes"\r
1617   POSITION 25\r
1618   SQL-WIDTH 1\r
1619   ORDER 250\r
1620 \r
1621 ADD INDEX "XPKContracts" ON "Contract" \r
1622   AREA "Schema Area"\r
1623   UNIQUE\r
1624   PRIMARY\r
1625   INDEX-FIELD "PropertyCode" ASCENDING \r
1626   INDEX-FIELD "ServiceType" ASCENDING \r
1627   INDEX-FIELD "CreditorCode" ASCENDING \r
1628   INDEX-FIELD "ContractSeq" ASCENDING \r
1629 \r
1630 ADD INDEX "XAK1Contracts" ON "Contract" \r
1631   AREA "Schema Area"\r
1632   UNIQUE\r
1633   INDEX-FIELD "CreditorCode" ASCENDING \r
1634   INDEX-FIELD "ServiceType" ASCENDING \r
1635   INDEX-FIELD "PropertyCode" ASCENDING \r
1636   INDEX-FIELD "ContractSeq" ASCENDING \r
1637 \r
1638 ADD TABLE "CashFlow"\r
1639   AREA "Schema Area"\r
1640   DUMP-NAME "contrac1"\r
1641 \r
1642 ADD FIELD "ScenarioCode" OF "CashFlow" AS integer \r
1643   DESCRIPTION "A code identifying the scenario that this cash flow belongs to."\r
1644   FORMAT ">>>>>9"\r
1645   INITIAL "0"\r
1646   LABEL "Scenario"\r
1647   POSITION 2\r
1648   SQL-WIDTH 4\r
1649   ORDER 10\r
1650 \r
1651 ADD FIELD "EntityType" OF "CashFlow" AS character \r
1652   FORMAT "X(4)"\r
1653   INITIAL ""\r
1654   LABEL "Entity type"\r
1655   POSITION 3\r
1656   SQL-WIDTH 8\r
1657   LENGTH 0\r
1658   ORDER 20\r
1659   MANDATORY\r
1660 \r
1661 ADD FIELD "EntityCode" OF "CashFlow" AS integer \r
1662   FORMAT "99999"\r
1663   INITIAL "0"\r
1664   LABEL "Entity"\r
1665   POSITION 4\r
1666   SQL-WIDTH 4\r
1667   ORDER 30\r
1668   MANDATORY\r
1669 \r
1670 ADD FIELD "AccountCode" OF "CashFlow" AS decimal \r
1671   DESCRIPTION "An account, from the chart of accounts, that this cash flow relates to."\r
1672   FORMAT "9999.99"\r
1673   INITIAL "0"\r
1674   LABEL "Account"\r
1675   POSITION 5\r
1676   SQL-WIDTH 17\r
1677   DECIMALS 2\r
1678   ORDER 40\r
1679 \r
1680 ADD FIELD "FrequencyCode" OF "CashFlow" AS character \r
1681   DESCRIPTION "The code used to refer to this kind of regularity"\r
1682   FORMAT "X(4)"\r
1683   INITIAL ""\r
1684   POSITION 6\r
1685   SQL-WIDTH 8\r
1686   ORDER 140\r
1687 \r
1688 ADD FIELD "Sequence" OF "CashFlow" AS integer \r
1689   DESCRIPTION "An arbitrary sequence number to make the record key for the contracted cash flows file unique."\r
1690   FORMAT ">>>>>9"\r
1691   INITIAL "0"\r
1692   POSITION 7\r
1693   SQL-WIDTH 4\r
1694   ORDER 60\r
1695 \r
1696 ADD FIELD "CashFlowType" OF "CashFlow" AS character \r
1697   FORMAT "X(4)"\r
1698   INITIAL ""\r
1699   LABEL "Type"\r
1700   POSITION 8\r
1701   SQL-WIDTH 8\r
1702   LENGTH 0\r
1703   ORDER 70\r
1704   MANDATORY\r
1705 \r
1706 ADD FIELD "CFChangeType" OF "CashFlow" AS character \r
1707   FORMAT "X(4)"\r
1708   INITIAL ""\r
1709   LABEL "Change type"\r
1710   POSITION 9\r
1711   SQL-WIDTH 8\r
1712   COLUMN-LABEL "Change"\r
1713   ORDER 150\r
1714 \r
1715 ADD FIELD "Amount" OF "CashFlow" AS decimal \r
1716   DESCRIPTION "The amount of each occurrence of the cash flow."\r
1717   FORMAT "->>,>>>,>>>,>>9.99"\r
1718   INITIAL "0"\r
1719   POSITION 10\r
1720   SQL-WIDTH 17\r
1721   DECIMALS 2\r
1722   ORDER 90\r
1723 \r
1724 ADD FIELD "Description" OF "CashFlow" AS character \r
1725   DESCRIPTION "A brief description of the cash flow."\r
1726   FORMAT "X(50)"\r
1727   INITIAL ""\r
1728   POSITION 11\r
1729   SQL-WIDTH 100\r
1730   ORDER 110\r
1731 \r
1732 ADD FIELD "EndDate" OF "CashFlow" AS date \r
1733   DESCRIPTION "The date after which this cash flow no longer occurs."\r
1734   FORMAT "99/99/9999"\r
1735   INITIAL ?\r
1736   LABEL "Finish"\r
1737   POSITION 12\r
1738   SQL-WIDTH 4\r
1739   ORDER 120\r
1740 \r
1741 ADD FIELD "StartDate" OF "CashFlow" AS date \r
1742   DESCRIPTION "The date on which this cash flow first occurs."\r
1743   FORMAT "99/99/9999"\r
1744   INITIAL ?\r
1745   LABEL "Start"\r
1746   POSITION 13\r
1747   SQL-WIDTH 4\r
1748   ORDER 130\r
1749 \r
1750 ADD FIELD "RelatedKey" OF "CashFlow" AS character \r
1751   DESCRIPTION "Key to related record in database"\r
1752   FORMAT "X(50)"\r
1753   INITIAL ""\r
1754   POSITION 14\r
1755   SQL-WIDTH 100\r
1756   ORDER 160\r
1757 \r
1758 ADD INDEX "XPKCashFlow" ON "CashFlow" \r
1759   AREA "Schema Area"\r
1760   UNIQUE\r
1761   PRIMARY\r
1762   INDEX-FIELD "ScenarioCode" ASCENDING \r
1763   INDEX-FIELD "EntityType" ASCENDING \r
1764   INDEX-FIELD "EntityCode" ASCENDING \r
1765   INDEX-FIELD "AccountCode" ASCENDING \r
1766   INDEX-FIELD "Sequence" ASCENDING \r
1767   INDEX-FIELD "CashFlowType" ASCENDING \r
1768 \r
1769 ADD INDEX "XAK1CashFlow" ON "CashFlow" \r
1770   AREA "Schema Area"\r
1771   INDEX-FIELD "ScenarioCode" ASCENDING \r
1772   INDEX-FIELD "CashFlowType" ASCENDING \r
1773 \r
1774 ADD INDEX "XAK2CashFlow" ON "CashFlow" \r
1775   AREA "Schema Area"\r
1776   INDEX-FIELD "ScenarioCode" ASCENDING \r
1777   INDEX-FIELD "RelatedKey" ASCENDING \r
1778   INDEX-FIELD "StartDate" ASCENDING \r
1779 \r
1780 ADD TABLE "Creditor"\r
1781   AREA "Schema Area"\r
1782   DUMP-NAME "creditor"\r
1783   TABLE-TRIGGER "CREATE" OVERRIDE PROCEDURE "crcdtor.p" CRC "?" \r
1784   TABLE-TRIGGER "WRITE" OVERRIDE PROCEDURE "wrcrdtor.p" CRC "?" \r
1785 \r
1786 ADD FIELD "CreditorCode" OF "Creditor" AS integer \r
1787   DESCRIPTION "The code used to refer to a creditor."\r
1788   FORMAT "99999"\r
1789   INITIAL "0"\r
1790   LABEL "Creditor"\r
1791   POSITION 2\r
1792   SQL-WIDTH 4\r
1793   ORDER 10\r
1794 \r
1795 ADD FIELD "PaymentContact" OF "Creditor" AS integer \r
1796   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
1797   FORMAT ">>>>>9"\r
1798   INITIAL "0"\r
1799   LABEL "Payment contact"\r
1800   POSITION 3\r
1801   SQL-WIDTH 4\r
1802   ORDER 20\r
1803 \r
1804 ADD FIELD "Name" OF "Creditor" AS character \r
1805   DESCRIPTION "A name used to refer to this creditor."\r
1806   FORMAT "X(50)"\r
1807   INITIAL ""\r
1808   POSITION 4\r
1809   SQL-WIDTH 100\r
1810   ORDER 30\r
1811   MANDATORY\r
1812 \r
1813 ADD FIELD "PayeeName" OF "Creditor" AS character \r
1814   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
1815   FORMAT "X(100)"\r
1816   INITIAL ""\r
1817   LABEL "Payee name"\r
1818   POSITION 5\r
1819   SQL-WIDTH 200\r
1820   LENGTH 0\r
1821   ORDER 40\r
1822 \r
1823 ADD FIELD "OtherContact" OF "Creditor" AS integer \r
1824   DESCRIPTION "A secondary contact for matters relating to this creditor."\r
1825   FORMAT ">>>>>9"\r
1826   INITIAL "0"\r
1827   LABEL "Other contact"\r
1828   POSITION 6\r
1829   SQL-WIDTH 4\r
1830   ORDER 50\r
1831   MANDATORY\r
1832 \r
1833 ADD FIELD "Active" OF "Creditor" AS logical \r
1834   DESCRIPTION "Flag to indicate whether the creditor is active or inactive"\r
1835   FORMAT "yes/no"\r
1836   INITIAL "no"\r
1837   POSITION 7\r
1838   SQL-WIDTH 1\r
1839   ORDER 60\r
1840 \r
1841 ADD FIELD "PaymentStyle" OF "Creditor" AS character \r
1842   FORMAT "X(4)"\r
1843   INITIAL "CHEQ"\r
1844   LABEL "Pay By"\r
1845   POSITION 8\r
1846   SQL-WIDTH 8\r
1847   ORDER 190\r
1848 \r
1849 ADD FIELD "BankDetails" OF "Creditor" AS character \r
1850   FORMAT "X(70)"\r
1851   INITIAL ""\r
1852   LABEL "A/c details"\r
1853   POSITION 9\r
1854   SQL-WIDTH 140\r
1855   COLUMN-LABEL "Bank Account Details"\r
1856   ORDER 200\r
1857 \r
1858 ADD FIELD "CompanyCode" OF "Creditor" AS integer \r
1859   DESCRIPTION "The code used to refer to a company."\r
1860   FORMAT "99999"\r
1861   INITIAL "0"\r
1862   LABEL "Company"\r
1863   POSITION 10\r
1864   SQL-WIDTH 4\r
1865   ORDER 90\r
1866 \r
1867 ADD FIELD "LastModifiedDate" OF "Creditor" AS date \r
1868   DESCRIPTION "The date when this record was last modified.  Maintained by a WRITE trigger."\r
1869   FORMAT "99/99/9999"\r
1870   INITIAL "1/1/0001"\r
1871   POSITION 11\r
1872   SQL-WIDTH 4\r
1873   ORDER 100\r
1874   MANDATORY\r
1875 \r
1876 ADD FIELD "LastModifiedTime" OF "Creditor" AS integer \r
1877   DESCRIPTION "The time that this record was last modified"\r
1878   FORMAT "->,>>>,>>9"\r
1879   INITIAL "0"\r
1880   POSITION 12\r
1881   SQL-WIDTH 4\r
1882   ORDER 110\r
1883 \r
1884 ADD FIELD "LastModifiedUser" OF "Creditor" AS character \r
1885   DESCRIPTION "The user who last modified this record.  Maintained by a WRITE trigger."\r
1886   FORMAT "X(8)"\r
1887   INITIAL ""\r
1888   POSITION 13\r
1889   SQL-WIDTH 16\r
1890   LENGTH 0\r
1891   ORDER 120\r
1892 \r
1893 ADD FIELD "AuditRecordId" OF "Creditor" AS integer \r
1894   FORMAT "->,>>>,>>9"\r
1895   INITIAL "0"\r
1896   POSITION 14\r
1897   SQL-WIDTH 4\r
1898   ORDER 130\r
1899 \r
1900 ADD FIELD "ChequesPerMonth" OF "Creditor" AS integer \r
1901   FORMAT ">>9"\r
1902   INITIAL "31"\r
1903   LABEL "Cheques/mth"\r
1904   POSITION 15\r
1905   SQL-WIDTH 4\r
1906   ORDER 140\r
1907 \r
1908 ADD FIELD "VchrEntityType" OF "Creditor" AS character \r
1909   FORMAT "X"\r
1910   INITIAL ""\r
1911   POSITION 16\r
1912   SQL-WIDTH 2\r
1913   ORDER 150\r
1914 \r
1915 ADD FIELD "VchrEntityCode" OF "Creditor" AS integer \r
1916   FORMAT "99999"\r
1917   INITIAL "0"\r
1918   POSITION 17\r
1919   SQL-WIDTH 4\r
1920   ORDER 160\r
1921 \r
1922 ADD FIELD "VchrAccountCode" OF "Creditor" AS decimal \r
1923   FORMAT "9999.99"\r
1924   INITIAL "0"\r
1925   POSITION 18\r
1926   SQL-WIDTH 17\r
1927   DECIMALS 2\r
1928   ORDER 170\r
1929 \r
1930 ADD FIELD "VchrApprover" OF "Creditor" AS character \r
1931   FORMAT "X(4)"\r
1932   INITIAL ""\r
1933   POSITION 19\r
1934   SQL-WIDTH 8\r
1935   ORDER 180\r
1936 \r
1937 ADD FIELD "BankDetailsChangedBy" OF "Creditor" AS character \r
1938   FORMAT "X(20)"\r
1939   INITIAL ""\r
1940   LABEL "Changed By User"\r
1941   POSITION 20\r
1942   SQL-WIDTH 40\r
1943   COLUMN-LABEL "Changed"\r
1944   HELP "The user who last changed the Bank A/C details"\r
1945   ORDER 210\r
1946   MANDATORY\r
1947 \r
1948 ADD FIELD "EnableDirectPayment" OF "Creditor" AS logical \r
1949   FORMAT "yes/no"\r
1950   INITIAL "no"\r
1951   POSITION 21\r
1952   SQL-WIDTH 1\r
1953   HELP "Whether or not direct payments are enabled"\r
1954   ORDER 220\r
1955 \r
1956 ADD FIELD "DirectPaymentEnabledBy" OF "Creditor" AS character \r
1957   FORMAT "X(20)"\r
1958   INITIAL ""\r
1959   LABEL "User Name"\r
1960   POSITION 22\r
1961   SQL-WIDTH 40\r
1962   COLUMN-LABEL "User"\r
1963   HELP "The user who enabled direct payments"\r
1964   ORDER 230\r
1965   MANDATORY\r
1966 \r
1967 ADD FIELD "NonAccounting" OF "Creditor" AS logical \r
1968   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
1969   FORMAT "yes/no"\r
1970   INITIAL "No"\r
1971   POSITION 23\r
1972   SQL-WIDTH 1\r
1973   COLUMN-LABEL "Non-A"\r
1974   HELP "If this creditor should not allow transactions"\r
1975   ORDER 240\r
1976 \r
1977 ADD FIELD "AcctCreditorCode" OF "Creditor" AS integer \r
1978   DESCRIPTION "The code of another creditor if this creditor is a non-accounting creditor"\r
1979   FORMAT "99999"\r
1980   INITIAL "0"\r
1981   LABEL "Acct Creditor"\r
1982   POSITION 24\r
1983   SQL-WIDTH 4\r
1984   COLUMN-LABEL "A/C Crd"\r
1985   HELP "Creditor code of the actual accounting creditor"\r
1986   ORDER 250\r
1987 \r
1988 ADD INDEX "Creditors" ON "Creditor" \r
1989   AREA "Schema Area"\r
1990   UNIQUE\r
1991   PRIMARY\r
1992   INDEX-FIELD "CreditorCode" ASCENDING \r
1993 \r
1994 ADD INDEX "XAK1Creditors" ON "Creditor" \r
1995   AREA "Schema Area"\r
1996   INDEX-FIELD "Name" ASCENDING \r
1997 \r
1998 ADD INDEX "XAK3Creditors" ON "Creditor" \r
1999   AREA "Schema Area"\r
2000   UNIQUE\r
2001   INDEX-FIELD "Active" ASCENDING \r
2002   INDEX-FIELD "CreditorCode" ASCENDING \r
2003 \r
2004 ADD INDEX "XAK4Creditors" ON "Creditor" \r
2005   AREA "Schema Area"\r
2006   INDEX-FIELD "Active" ASCENDING \r
2007   INDEX-FIELD "Name" ASCENDING \r
2008 \r
2009 ADD INDEX "XAK6Creditors" ON "Creditor" \r
2010   AREA "Schema Area"\r
2011   UNIQUE\r
2012   INDEX-FIELD "Active" ASCENDING \r
2013   INDEX-FIELD "NonAccounting" ASCENDING \r
2014   INDEX-FIELD "CreditorCode" ASCENDING \r
2015 \r
2016 ADD INDEX "XAK7Creditors" ON "Creditor" \r
2017   AREA "Schema Area"\r
2018   INDEX-FIELD "Active" ASCENDING \r
2019   INDEX-FIELD "NonAccounting" ASCENDING \r
2020   INDEX-FIELD "Name" ASCENDING \r
2021 \r
2022 ADD INDEX "XAK8Creditors" ON "Creditor" \r
2023   AREA "Schema Area"\r
2024   INDEX-FIELD "PaymentContact" ASCENDING \r
2025 \r
2026 ADD TABLE "Directorship"\r
2027   AREA "Schema Area"\r
2028   DUMP-NAME "director"\r
2029   TABLE-TRIGGER "DELETE" OVERRIDE PROCEDURE "dedrctor.p" CRC "?" \r
2030 \r
2031 ADD FIELD "CompanyCode" OF "Directorship" AS integer \r
2032   DESCRIPTION "The code of the company that this person is a director of."\r
2033   FORMAT "99999"\r
2034   INITIAL "0"\r
2035   LABEL "Company"\r
2036   POSITION 2\r
2037   SQL-WIDTH 4\r
2038   ORDER 10\r
2039 \r
2040 ADD FIELD "PersonCode" OF "Directorship" AS integer \r
2041   DESCRIPTION "The person that is a director of this company"\r
2042   FORMAT ">>>>>9"\r
2043   INITIAL "0"\r
2044   LABEL "Person"\r
2045   POSITION 3\r
2046   SQL-WIDTH 4\r
2047   ORDER 20\r
2048   MANDATORY\r
2049 \r
2050 ADD FIELD "NoteCode" OF "Directorship" AS integer \r
2051   DESCRIPTION "Any notes about the directorship."\r
2052   FORMAT ">>>>>9"\r
2053   INITIAL "0"\r
2054   POSITION 4\r
2055   SQL-WIDTH 4\r
2056   ORDER 30\r
2057 \r
2058 ADD INDEX "Directorships" ON "Directorship" \r
2059   AREA "Schema Area"\r
2060   UNIQUE\r
2061   PRIMARY\r
2062   INDEX-FIELD "CompanyCode" ASCENDING \r
2063   INDEX-FIELD "PersonCode" ASCENDING \r
2064 \r
2065 ADD TABLE "Document"\r
2066   AREA "Schema Area"\r
2067   DUMP-NAME "document"\r
2068   TABLE-TRIGGER "DELETE" OVERRIDE PROCEDURE "dedocmnt.p" CRC "?" \r
2069 \r
2070 ADD FIELD "BatchCode" OF "Document" AS integer \r
2071   DESCRIPTION "The batch which this document is a part of."\r
2072   FORMAT ">>>>>9"\r
2073   INITIAL "0"\r
2074   LABEL "Batch No."\r
2075   POSITION 2\r
2076   SQL-WIDTH 4\r
2077   COLUMN-LABEL "Batch"\r
2078   COLUMN-LABEL-SA "C"\r
2079   ORDER 10\r
2080 \r
2081 ADD FIELD "DocumentCode" OF "Document" AS integer \r
2082   DESCRIPTION "The code used to refer to this document within the batch."\r
2083   FORMAT ">>>>>9"\r
2084   INITIAL "0"\r
2085   LABEL "Document No."\r
2086   POSITION 3\r
2087   SQL-WIDTH 4\r
2088   COLUMN-LABEL "Doc #"\r
2089   COLUMN-LABEL-SA "C"\r
2090   ORDER 20\r
2091 \r
2092 ADD FIELD "Description" OF "Document" AS character \r
2093   DESCRIPTION "A description of this document."\r
2094   FORMAT "X(50)"\r
2095   INITIAL ""\r
2096   POSITION 4\r
2097   SQL-WIDTH 100\r
2098   ORDER 30\r
2099 \r
2100 ADD FIELD "Reference" OF "Document" AS character \r
2101   DESCRIPTION "Any reference applying  to this document."\r
2102   FORMAT "X(12)"\r
2103   INITIAL ""\r
2104   POSITION 5\r
2105   SQL-WIDTH 24\r
2106   ORDER 40\r
2107 \r
2108 ADD FIELD "TransactionCount" OF "Document" AS integer \r
2109   DESCRIPTION "The total number of transactions which make up this document."\r
2110   FORMAT ">>>>>9"\r
2111   INITIAL "0"\r
2112   LABEL "Transactions"\r
2113   POSITION 6\r
2114   SQL-WIDTH 4\r
2115   COLUMN-LABEL "# Trn"\r
2116   ORDER 50\r
2117 \r
2118 ADD FIELD "DocumentType" OF "Document" AS character \r
2119   FORMAT "X(4)"\r
2120   INITIAL ?\r
2121   LABEL "Type"\r
2122   POSITION 7\r
2123   SQL-WIDTH 8\r
2124   COLUMN-LABEL "T"\r
2125   HELP "Journal, Cheque, Invoice, Voucher,Bank statement, ..."\r
2126   LENGTH 0\r
2127   ORDER 60\r
2128   MANDATORY\r
2129 \r
2130 ADD INDEX "Documents" ON "Document" \r
2131   AREA "Schema Area"\r
2132   UNIQUE\r
2133   PRIMARY\r
2134   INDEX-FIELD "BatchCode" ASCENDING \r
2135   INDEX-FIELD "DocumentCode" ASCENDING \r
2136 \r
2137 ADD TABLE "EntityType"\r
2138   AREA "Schema Area"\r
2139   DUMP-NAME "entityty"\r
2140 \r
2141 ADD FIELD "EntityType" OF "EntityType" AS character \r
2142   FORMAT "X(4)"\r
2143   INITIAL ""\r
2144   LABEL "Entity type code"\r
2145   POSITION 2\r
2146   SQL-WIDTH 8\r
2147   LENGTH 0\r
2148   ORDER 10\r
2149   MANDATORY\r
2150 \r
2151 ADD FIELD "Description" OF "EntityType" AS character \r
2152   FORMAT "X(50)"\r
2153   INITIAL ""\r
2154   POSITION 3\r
2155   SQL-WIDTH 100\r
2156   LENGTH 0\r
2157   ORDER 20\r
2158 \r
2159 ADD INDEX "XPKEntityTypes" ON "EntityType" \r
2160   AREA "Schema Area"\r
2161   UNIQUE\r
2162   PRIMARY\r
2163   INDEX-FIELD "EntityType" ASCENDING \r
2164 \r
2165 ADD TABLE "FinancialYear"\r
2166   AREA "Schema Area"\r
2167   DUMP-NAME "financia"\r
2168 \r
2169 ADD FIELD "FinancialYearCode" OF "FinancialYear" AS integer \r
2170   DESCRIPTION "The code used to refer to a financial year."\r
2171   FORMAT ">>>9"\r
2172   INITIAL "0"\r
2173   LABEL "Year"\r
2174   POSITION 2\r
2175   SQL-WIDTH 4\r
2176   ORDER 10\r
2177 \r
2178 ADD FIELD "Description" OF "FinancialYear" AS character \r
2179   DESCRIPTION "Text describing the financial year."\r
2180   FORMAT "X(50)"\r
2181   INITIAL ""\r
2182   POSITION 3\r
2183   SQL-WIDTH 100\r
2184   LENGTH 0\r
2185   ORDER 20\r
2186 \r
2187 ADD INDEX "FinancialYears" ON "FinancialYear" \r
2188   AREA "Schema Area"\r
2189   UNIQUE\r
2190   PRIMARY\r
2191   INDEX-FIELD "FinancialYearCode" ASCENDING \r
2192 \r
2193 ADD TABLE "FrequencyType"\r
2194   AREA "Schema Area"\r
2195   DUMP-NAME "frequenc"\r
2196 \r
2197 ADD FIELD "FrequencyCode" OF "FrequencyType" AS character \r
2198   DESCRIPTION "The code used to refer to this kind of regularity"\r
2199   FORMAT "X(4)"\r
2200   INITIAL ""\r
2201   POSITION 2\r
2202   SQL-WIDTH 8\r
2203   LENGTH 0\r
2204   ORDER 10\r
2205 \r
2206 ADD FIELD "DaysOfMonth" OF "FrequencyType" AS character \r
2207   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
2208   FORMAT "X(50)"\r
2209   INITIAL ""\r
2210   LABEL "Days of month"\r
2211   POSITION 3\r
2212   SQL-WIDTH 100\r
2213   HELP "e.g 8-14 would be only during the second week."\r
2214   LENGTH 0\r
2215   ORDER 20\r
2216 \r
2217 ADD FIELD "DaysOfWeek" OF "FrequencyType" AS character \r
2218   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
2219   FORMAT "X(50)"\r
2220   INITIAL ""\r
2221   LABEL "Days of week"\r
2222   POSITION 4\r
2223   SQL-WIDTH 100\r
2224   HELP "e.g. Mon-Fri would be only business days"\r
2225   LENGTH 0\r
2226   ORDER 30\r
2227 \r
2228 ADD FIELD "Description" OF "FrequencyType" AS character \r
2229   DESCRIPTION "A description of this frequency - '5 per year' or 'Monthly' for example."\r
2230   FORMAT "X(50)"\r
2231   INITIAL ""\r
2232   POSITION 5\r
2233   SQL-WIDTH 100\r
2234   ORDER 40\r
2235 \r
2236 ADD FIELD "MonthsOfYear" OF "FrequencyType" AS character \r
2237   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
2238   FORMAT "X(50)"\r
2239   INITIAL ""\r
2240   LABEL "Months of year"\r
2241   POSITION 6\r
2242   SQL-WIDTH 100\r
2243   HELP "e.g. 2,7 would mean only February and July"\r
2244   LENGTH 0\r
2245   ORDER 50\r
2246 \r
2247 ADD FIELD "RepeatUnits" OF "FrequencyType" AS character \r
2248   DESCRIPTION "A code identifying the type of units that this frequency repeats with (e.g. Day, Week, Month, Year, Arbitrary)"\r
2249   FORMAT "X(4)"\r
2250   INITIAL ""\r
2251   LABEL "Repeat units"\r
2252   POSITION 7\r
2253   SQL-WIDTH 8\r
2254   HELP "Units for the repeat frequency (Day, Month, Year...)"\r
2255   LENGTH 0\r
2256   ORDER 60\r
2257   MANDATORY\r
2258 \r
2259 ADD FIELD "UnitCount" OF "FrequencyType" AS integer \r
2260   DESCRIPTION "The number of repeat units involved in a cycle, i.e. '2' months,  '73' days"\r
2261   FORMAT ">>>>>9"\r
2262   INITIAL "0"\r
2263   LABEL "No of Units"\r
2264   POSITION 8\r
2265   SQL-WIDTH 4\r
2266   HELP "No of units between occurrences"\r
2267   ORDER 70\r
2268 \r
2269 ADD INDEX "XPKFrequencyType" ON "FrequencyType" \r
2270   AREA "Schema Area"\r
2271   UNIQUE\r
2272   PRIMARY\r
2273   INDEX-FIELD "FrequencyCode" ASCENDING \r
2274 \r
2275 ADD TABLE "GroundLease"\r
2276   AREA "Schema Area"\r
2277   DUMP-NAME "groundle"\r
2278 \r
2279 ADD FIELD "PropertyCode" OF "GroundLease" AS integer \r
2280   DESCRIPTION "The code of the property which this ground lease applies to."\r
2281   FORMAT "99999"\r
2282   INITIAL "0"\r
2283   LABEL "Property"\r
2284   POSITION 2\r
2285   SQL-WIDTH 4\r
2286   ORDER 10\r
2287 \r
2288 ADD FIELD "TitleCode" OF "GroundLease" AS integer \r
2289   DESCRIPTION "The code of the property which this ground lease is for."\r
2290   FORMAT ">>>>>9"\r
2291   INITIAL "0"\r
2292   LABEL "Title"\r
2293   POSITION 3\r
2294   SQL-WIDTH 4\r
2295   ORDER 20\r
2296 \r
2297 ADD FIELD "GroundLeaseCode" OF "GroundLease" AS integer \r
2298   DESCRIPTION "The sequence of this ground lease within the title. Just reassure me: there won't always be just one, will there?"\r
2299   FORMAT ">>>>>9"\r
2300   INITIAL "0"\r
2301   LABEL "Ground lease code"\r
2302   POSITION 4\r
2303   SQL-WIDTH 4\r
2304   ORDER 30\r
2305 \r
2306 ADD FIELD "LeaseExpiry" OF "GroundLease" AS date \r
2307   DESCRIPTION "The date on which the lease expires."\r
2308   FORMAT "99/99/9999"\r
2309   INITIAL ?\r
2310   LABEL "Expiry"\r
2311   POSITION 5\r
2312   SQL-WIDTH 4\r
2313   ORDER 40\r
2314 \r
2315 ADD FIELD "Lessor" OF "GroundLease" AS integer \r
2316   DESCRIPTION "The creditor who we lease this from."\r
2317   FORMAT ">>>>>9"\r
2318   INITIAL "0"\r
2319   POSITION 6\r
2320   SQL-WIDTH 4\r
2321   ORDER 50\r
2322 \r
2323 ADD FIELD "NextRentReview" OF "GroundLease" AS date \r
2324   DESCRIPTION "The date of the next rent review"\r
2325   FORMAT "99/99/9999"\r
2326   INITIAL ?\r
2327   LABEL "Next Review"\r
2328   POSITION 7\r
2329   SQL-WIDTH 4\r
2330   ORDER 60\r
2331 \r
2332 ADD FIELD "Rental" OF "GroundLease" AS decimal \r
2333   DESCRIPTION "The annual rental paid for this lease."\r
2334   FORMAT "->>,>>9.99"\r
2335   INITIAL "0"\r
2336   POSITION 8\r
2337   SQL-WIDTH 17\r
2338   DECIMALS 2\r
2339   ORDER 70\r
2340 \r
2341 ADD FIELD "RentReviewNotice" OF "GroundLease" AS integer \r
2342   DESCRIPTION "The number of months notice required prior to a rent review being applied."\r
2343   FORMAT ">>>>>9"\r
2344   INITIAL "0"\r
2345   LABEL "Review notice"\r
2346   POSITION 9\r
2347   SQL-WIDTH 4\r
2348   HELP "Notice required prior to rent review (months)"\r
2349   ORDER 80\r
2350 \r
2351 ADD FIELD "RightsOfRenewal" OF "GroundLease" AS character \r
2352   DESCRIPTION "The rights of renewal for the ground lease."\r
2353   FORMAT "X(10)"\r
2354   INITIAL ""\r
2355   LABEL "Rights of renewal"\r
2356   POSITION 10\r
2357   SQL-WIDTH 20\r
2358   LENGTH 0\r
2359   ORDER 90\r
2360 \r
2361 ADD FIELD "NoteCode" OF "GroundLease" AS integer \r
2362   DESCRIPTION "A unique code identifying this note."\r
2363   FORMAT ">>>>>9"\r
2364   INITIAL ?\r
2365   POSITION 11\r
2366   SQL-WIDTH 4\r
2367   ORDER 100\r
2368 \r
2369 ADD INDEX "XPKGroundLeases" ON "GroundLease" \r
2370   AREA "Schema Area"\r
2371   UNIQUE\r
2372   PRIMARY\r
2373   INDEX-FIELD "PropertyCode" ASCENDING \r
2374   INDEX-FIELD "GroundLeaseCode" ASCENDING \r
2375 \r
2376 ADD TABLE "Guarantor"\r
2377   AREA "Schema Area"\r
2378   DUMP-NAME "guaranto"\r
2379 \r
2380 ADD FIELD "TenancyLeaseCode" OF "Guarantor" AS integer \r
2381   DESCRIPTION "The lease this person/organisation is acting as a guarantor for."\r
2382   FORMAT "99999"\r
2383   INITIAL "0"\r
2384   LABEL "Lease code"\r
2385   POSITION 2\r
2386   SQL-WIDTH 4\r
2387   ORDER 10\r
2388 \r
2389 ADD FIELD "PersonCode" OF "Guarantor" AS integer \r
2390   DESCRIPTION "The person/organisation acting as a guarantor for this lease."\r
2391   FORMAT ">>>>>9"\r
2392   INITIAL "0"\r
2393   LABEL "Person code"\r
2394   POSITION 3\r
2395   SQL-WIDTH 4\r
2396   ORDER 20\r
2397   MANDATORY\r
2398 \r
2399 ADD FIELD "AnyData" OF "Guarantor" AS character \r
2400   DESCRIPTION "Any data we want to store against each lease guarantor."\r
2401   FORMAT "X(200)"\r
2402   INITIAL ""\r
2403   POSITION 4\r
2404   SQL-WIDTH 400\r
2405   HELP "Whatever we want."\r
2406   LENGTH 0\r
2407   ORDER 30\r
2408 \r
2409 ADD FIELD "Type" OF "Guarantor" AS character \r
2410   FORMAT "X"\r
2411   INITIAL ""\r
2412   POSITION 5\r
2413   SQL-WIDTH 2\r
2414   LENGTH 0\r
2415   ORDER 40\r
2416 \r
2417 ADD FIELD "Limit" OF "Guarantor" AS decimal \r
2418   FORMAT ">>,>>>,>>9.99"\r
2419   INITIAL "0"\r
2420   POSITION 6\r
2421   SQL-WIDTH 17\r
2422   DECIMALS 2\r
2423   ORDER 50\r
2424 \r
2425 ADD INDEX "Guarantors" ON "Guarantor" \r
2426   AREA "Schema Area"\r
2427   UNIQUE\r
2428   PRIMARY\r
2429   INDEX-FIELD "TenancyLeaseCode" ASCENDING \r
2430   INDEX-FIELD "PersonCode" ASCENDING \r
2431 \r
2432 ADD TABLE "Image"\r
2433   AREA "Schema Area"\r
2434   DUMP-NAME "image"\r
2435 \r
2436 ADD FIELD "PropertyCode" OF "Image" AS integer \r
2437   FORMAT "99999"\r
2438   INITIAL "0"\r
2439   POSITION 2\r
2440   SQL-WIDTH 4\r
2441   ORDER 10\r
2442 \r
2443 ADD FIELD "ImageCode" OF "Image" AS integer \r
2444   DESCRIPTION "A code used to refer to this image"\r
2445   FORMAT ">>>>>9"\r
2446   INITIAL "0"\r
2447   POSITION 3\r
2448   SQL-WIDTH 4\r
2449   ORDER 20\r
2450 \r
2451 ADD FIELD "Description" OF "Image" AS integer \r
2452   DESCRIPTION "A description of the image"\r
2453   FORMAT ">>>>>9"\r
2454   INITIAL "0"\r
2455   POSITION 4\r
2456   SQL-WIDTH 4\r
2457   ORDER 30\r
2458   MANDATORY\r
2459 \r
2460 ADD FIELD "ImageData" OF "Image" AS character \r
2461   DESCRIPTION "The actual image.  Probably implemented as a reference to an external file."\r
2462   FORMAT "X(100)"\r
2463   INITIAL ""\r
2464   POSITION 5\r
2465   SQL-WIDTH 200\r
2466   ORDER 40\r
2467 \r
2468 ADD FIELD "ImageType" OF "Image" AS character \r
2469   DESCRIPTION "The type of image data, e.g. JPEG, GIF, Photo CD, AutoCAD Drawing etc."\r
2470   FORMAT "X(4)"\r
2471   INITIAL ""\r
2472   POSITION 6\r
2473   SQL-WIDTH 8\r
2474   ORDER 50\r
2475   MANDATORY\r
2476 \r
2477 ADD FIELD "RentalSpaceCode" OF "Image" AS integer \r
2478   DESCRIPTION "The rental space that this image applies to, or blank if it applies to the whole property."\r
2479   FORMAT ">>>>>9"\r
2480   INITIAL "0"\r
2481   POSITION 7\r
2482   SQL-WIDTH 4\r
2483   ORDER 60\r
2484 \r
2485 ADD INDEX "Images" ON "Image" \r
2486   AREA "Schema Area"\r
2487   UNIQUE\r
2488   PRIMARY\r
2489   INDEX-FIELD "PropertyCode" ASCENDING \r
2490   INDEX-FIELD "ImageCode" ASCENDING \r
2491 \r
2492 ADD INDEX "XAK1Images" ON "Image" \r
2493   AREA "Schema Area"\r
2494   INDEX-FIELD "PropertyCode" ASCENDING \r
2495 \r
2496 ADD INDEX "XAK2Images" ON "Image" \r
2497   AREA "Schema Area"\r
2498   INDEX-FIELD "RentalSpaceCode" ASCENDING \r
2499 \r
2500 ADD TABLE "ImageType"\r
2501   AREA "Schema Area"\r
2502   DUMP-NAME "imagetyp"\r
2503 \r
2504 ADD FIELD "ImageType" OF "ImageType" AS character \r
2505   FORMAT "X(4)"\r
2506   INITIAL ""\r
2507   POSITION 2\r
2508   SQL-WIDTH 8\r
2509   ORDER 10\r
2510   MANDATORY\r
2511 \r
2512 ADD FIELD "Description" OF "ImageType" AS character \r
2513   FORMAT "X(50)"\r
2514   INITIAL ""\r
2515   POSITION 3\r
2516   SQL-WIDTH 100\r
2517   ORDER 20\r
2518 \r
2519 ADD FIELD "ImageViewer" OF "ImageType" AS character \r
2520   FORMAT "X(70)"\r
2521   INITIAL ""\r
2522   LABEL "Viewer"\r
2523   POSITION 4\r
2524   SQL-WIDTH 140\r
2525   ORDER 30\r
2526 \r
2527 ADD INDEX "XPKImageTypes" ON "ImageType" \r
2528   AREA "Schema Area"\r
2529   UNIQUE\r
2530   PRIMARY\r
2531   INDEX-FIELD "ImageType" ASCENDING \r
2532 \r
2533 ADD TABLE "LeaseImage"\r
2534   AREA "Schema Area"\r
2535   DUMP-NAME "leaseima"\r
2536 \r
2537 ADD FIELD "LeaseImageSeq" OF "LeaseImage" AS integer \r
2538   FORMAT ">>>>>9"\r
2539   INITIAL "0"\r
2540   POSITION 2\r
2541   SQL-WIDTH 4\r
2542   ORDER 10\r
2543   MANDATORY\r
2544 \r
2545 ADD FIELD "TenancyLeaseCode" OF "LeaseImage" AS integer \r
2546   FORMAT ">>>>>9"\r
2547   INITIAL "0"\r
2548   POSITION 3\r
2549   SQL-WIDTH 4\r
2550   ORDER 20\r
2551 \r
2552 ADD FIELD "PropertyCode" OF "LeaseImage" AS integer \r
2553   FORMAT ">>>>>9"\r
2554   INITIAL "0"\r
2555   POSITION 4\r
2556   SQL-WIDTH 4\r
2557   ORDER 30\r
2558 \r
2559 ADD FIELD "TitleCode" OF "LeaseImage" AS integer \r
2560   FORMAT ">>>>>9"\r
2561   INITIAL "0"\r
2562   POSITION 5\r
2563   SQL-WIDTH 4\r
2564   ORDER 40\r
2565 \r
2566 ADD FIELD "GroundLeaseCode" OF "LeaseImage" AS integer \r
2567   FORMAT ">>>>>9"\r
2568   INITIAL "0"\r
2569   POSITION 6\r
2570   SQL-WIDTH 4\r
2571   ORDER 50\r
2572 \r
2573 ADD FIELD "Description" OF "LeaseImage" AS character \r
2574   FORMAT "X(50)"\r
2575   INITIAL ""\r
2576   POSITION 7\r
2577   SQL-WIDTH 100\r
2578   ORDER 60\r
2579 \r
2580 ADD INDEX "XPKLeaseImages" ON "LeaseImage" \r
2581   AREA "Schema Area"\r
2582   UNIQUE\r
2583   PRIMARY\r
2584   INDEX-FIELD "LeaseImageSeq" ASCENDING \r
2585 \r
2586 ADD TABLE "LeaseImagePage"\r
2587   AREA "Schema Area"\r
2588   DUMP-NAME "leaseim1"\r
2589 \r
2590 ADD FIELD "LeaseImageSeq" OF "LeaseImagePage" AS integer \r
2591   FORMAT ">>>>>9"\r
2592   INITIAL "0"\r
2593   POSITION 2\r
2594   SQL-WIDTH 4\r
2595   ORDER 10\r
2596   MANDATORY\r
2597 \r
2598 ADD FIELD "PageNumber" OF "LeaseImagePage" AS integer \r
2599   FORMAT ">>>>>9"\r
2600   INITIAL "0"\r
2601   POSITION 3\r
2602   SQL-WIDTH 4\r
2603   ORDER 20\r
2604   MANDATORY\r
2605 \r
2606 ADD FIELD "ImageReference" OF "LeaseImagePage" AS character \r
2607   FORMAT "X(50)"\r
2608   INITIAL ""\r
2609   POSITION 4\r
2610   SQL-WIDTH 100\r
2611   ORDER 30\r
2612 \r
2613 ADD FIELD "ContentDescription" OF "LeaseImagePage" AS character \r
2614   FORMAT "X(50)"\r
2615   INITIAL ""\r
2616   POSITION 5\r
2617   SQL-WIDTH 100\r
2618   ORDER 40\r
2619 \r
2620 ADD INDEX "XPKLeaseImagePages" ON "LeaseImagePage" \r
2621   AREA "Schema Area"\r
2622   UNIQUE\r
2623   PRIMARY\r
2624   INDEX-FIELD "LeaseImageSeq" ASCENDING \r
2625   INDEX-FIELD "PageNumber" ASCENDING \r
2626 \r
2627 ADD TABLE "LeaseIndex"\r
2628   AREA "Schema Area"\r
2629   DUMP-NAME "leaseind"\r
2630 \r
2631 ADD FIELD "LeaseIndexSeq" OF "LeaseIndex" AS integer \r
2632   FORMAT ">>>>>9"\r
2633   INITIAL "0"\r
2634   POSITION 2\r
2635   SQL-WIDTH 4\r
2636   ORDER 10\r
2637   MANDATORY\r
2638 \r
2639 ADD FIELD "Searchword" OF "LeaseIndex" AS character \r
2640   FORMAT "X(18)"\r
2641   INITIAL ""\r
2642   POSITION 3\r
2643   SQL-WIDTH 36\r
2644   ORDER 20\r
2645 \r
2646 ADD FIELD "LeaseImageSeq" OF "LeaseIndex" AS integer \r
2647   FORMAT ">>>>>9"\r
2648   INITIAL "0"\r
2649   POSITION 4\r
2650   SQL-WIDTH 4\r
2651   ORDER 30\r
2652   MANDATORY\r
2653 \r
2654 ADD FIELD "PageNumber" OF "LeaseIndex" AS integer \r
2655   FORMAT ">>>>>9"\r
2656   INITIAL "0"\r
2657   POSITION 5\r
2658   SQL-WIDTH 4\r
2659   ORDER 40\r
2660   MANDATORY\r
2661 \r
2662 ADD INDEX "XPKLeaseIndex" ON "LeaseIndex" \r
2663   AREA "Schema Area"\r
2664   UNIQUE\r
2665   PRIMARY\r
2666   INDEX-FIELD "LeaseIndexSeq" ASCENDING \r
2667 \r
2668 ADD TABLE "LeaseStatus"\r
2669   AREA "Schema Area"\r
2670   DUMP-NAME "leasesta"\r
2671 \r
2672 ADD FIELD "LeaseStatus" OF "LeaseStatus" AS character \r
2673   FORMAT "X(4)"\r
2674   INITIAL ""\r
2675   POSITION 2\r
2676   SQL-WIDTH 8\r
2677   ORDER 10\r
2678   MANDATORY\r
2679 \r
2680 ADD FIELD "Description" OF "LeaseStatus" AS character \r
2681   FORMAT "X(50)"\r
2682   INITIAL ""\r
2683   POSITION 3\r
2684   SQL-WIDTH 100\r
2685   ORDER 20\r
2686 \r
2687 ADD INDEX "XPKLeaseStatuses" ON "LeaseStatus" \r
2688   AREA "Schema Area"\r
2689   UNIQUE\r
2690   PRIMARY\r
2691   INDEX-FIELD "LeaseStatus" ASCENDING \r
2692 \r
2693 ADD TABLE "LeaseType"\r
2694   AREA "Schema Area"\r
2695   DUMP-NAME "leasetyp"\r
2696 \r
2697 ADD FIELD "LeaseType" OF "LeaseType" AS character \r
2698   FORMAT "X(4)"\r
2699   INITIAL ""\r
2700   POSITION 2\r
2701   SQL-WIDTH 8\r
2702   ORDER 10\r
2703   MANDATORY\r
2704 \r
2705 ADD FIELD "Description" OF "LeaseType" AS character \r
2706   FORMAT "X(50)"\r
2707   INITIAL ""\r
2708   POSITION 3\r
2709   SQL-WIDTH 100\r
2710   ORDER 20\r
2711 \r
2712 ADD INDEX "XPKLeaseTypes" ON "LeaseType" \r
2713   AREA "Schema Area"\r
2714   UNIQUE\r
2715   PRIMARY\r
2716   INDEX-FIELD "LeaseType" ASCENDING \r
2717 \r
2718 ADD TABLE "Month"\r
2719   AREA "Schema Area"\r
2720   DUMP-NAME "month"\r
2721   TABLE-TRIGGER "WRITE" OVERRIDE PROCEDURE "wrmonth.p" CRC "?" \r
2722 \r
2723 ADD FIELD "MonthCode" OF "Month" AS integer \r
2724   DESCRIPTION "The code used to refer to a month."\r
2725   FORMAT ">>>>>9"\r
2726   INITIAL "0"\r
2727   POSITION 2\r
2728   SQL-WIDTH 4\r
2729   ORDER 10\r
2730 \r
2731 ADD FIELD "MonthName" OF "Month" AS character \r
2732   DESCRIPTION "The name of the month, such as 'January', or 'Year End Journals'."\r
2733   FORMAT "X(4)"\r
2734   INITIAL ""\r
2735   LABEL "Month"\r
2736   POSITION 3\r
2737   SQL-WIDTH 8\r
2738   ORDER 20\r
2739   MANDATORY\r
2740 \r
2741 ADD FIELD "FinancialYearCode" OF "Month" AS integer \r
2742   DESCRIPTION "The financial year that this month is part of."\r
2743   FORMAT ">>>9"\r
2744   INITIAL "0"\r
2745   LABEL "Year"\r
2746   POSITION 4\r
2747   SQL-WIDTH 4\r
2748   ORDER 30\r
2749   MANDATORY\r
2750 \r
2751 ADD FIELD "MonthStatus" OF "Month" AS character \r
2752   FORMAT "X(4)"\r
2753   INITIAL ""\r
2754   POSITION 5\r
2755   SQL-WIDTH 8\r
2756   ORDER 40\r
2757   MANDATORY\r
2758 \r
2759 ADD FIELD "StartDate" OF "Month" AS date \r
2760   FORMAT "99/99/9999"\r
2761   INITIAL ?\r
2762   LABEL "Start date"\r
2763   POSITION 6\r
2764   SQL-WIDTH 4\r
2765   HELP "The first day of the month"\r
2766   ORDER 50\r
2767   MANDATORY\r
2768   FIELD-TRIGGER "ASSIGN" OVERRIDE PROCEDURE "a-mthstd.p" CRC "?" \r
2769 \r
2770 ADD FIELD "EndDate" OF "Month" AS date \r
2771   FORMAT "99/99/9999"\r
2772   INITIAL "12/31/2075"\r
2773   LABEL "End date"\r
2774   POSITION 7\r
2775   SQL-WIDTH 4\r
2776   COLUMN-LABEL "Ending"\r
2777   ORDER 60\r
2778 \r
2779 ADD FIELD "LastModifiedDate" OF "Month" AS date \r
2780   DESCRIPTION "The date when this record was last modified.  Maintained by a WRITE trigger."\r
2781   FORMAT "99/99/9999"\r
2782   INITIAL "1/1/0001"\r
2783   POSITION 8\r
2784   SQL-WIDTH 4\r
2785   ORDER 70\r
2786   MANDATORY\r
2787 \r
2788 ADD FIELD "LastModifiedTime" OF "Month" AS integer \r
2789   DESCRIPTION "The time that this record was last modified"\r
2790   FORMAT "->,>>>,>>9"\r
2791   INITIAL "0"\r
2792   POSITION 9\r
2793   SQL-WIDTH 4\r
2794   ORDER 80\r
2795 \r
2796 ADD FIELD "LastModifiedUser" OF "Month" AS character \r
2797   DESCRIPTION "The user who last modified this record.  Maintained by a WRITE trigger."\r
2798   FORMAT "X(8)"\r
2799   INITIAL ""\r
2800   POSITION 10\r
2801   SQL-WIDTH 16\r
2802   LENGTH 0\r
2803   ORDER 90\r
2804 \r
2805 ADD FIELD "AuditRecordId" OF "Month" AS integer \r
2806   FORMAT "->,>>>,>>9"\r
2807   INITIAL "0"\r
2808   POSITION 11\r
2809   SQL-WIDTH 4\r
2810   ORDER 100\r
2811 \r
2812 ADD INDEX "XAK1Months" ON "Month" \r
2813   AREA "Schema Area"\r
2814   UNIQUE\r
2815   PRIMARY\r
2816   INDEX-FIELD "FinancialYearCode" ASCENDING \r
2817   INDEX-FIELD "MonthCode" ASCENDING \r
2818 \r
2819 ADD INDEX "XAK2Months" ON "Month" \r
2820   AREA "Schema Area"\r
2821   UNIQUE\r
2822   INDEX-FIELD "StartDate" ASCENDING \r
2823 \r
2824 ADD INDEX "XAK3Months" ON "Month" \r
2825   AREA "Schema Area"\r
2826   UNIQUE\r
2827   INDEX-FIELD "MonthCode" ASCENDING \r
2828 \r
2829 ADD INDEX "XPKMonths" ON "Month" \r
2830   AREA "Schema Area"\r
2831   INDEX-FIELD "EndDate" ASCENDING \r
2832 \r
2833 ADD TABLE "MonthName"\r
2834   AREA "Schema Area"\r
2835   DUMP-NAME "monthnam"\r
2836 \r
2837 ADD FIELD "MonthName" OF "MonthName" AS character \r
2838   FORMAT "X(4)"\r
2839   INITIAL ""\r
2840   POSITION 2\r
2841   SQL-WIDTH 8\r
2842   ORDER 10\r
2843   MANDATORY\r
2844 \r
2845 ADD FIELD "Description" OF "MonthName" AS character \r
2846   FORMAT "X(50)"\r
2847   INITIAL ""\r
2848   POSITION 3\r
2849   SQL-WIDTH 100\r
2850   ORDER 20\r
2851 \r
2852 ADD INDEX "XPKMonthNames" ON "MonthName" \r
2853   AREA "Schema Area"\r
2854   UNIQUE\r
2855   PRIMARY\r
2856   INDEX-FIELD "MonthName" ASCENDING \r
2857 \r
2858 ADD TABLE "MonthStatus"\r
2859   AREA "Schema Area"\r
2860   DUMP-NAME "monthsta"\r
2861 \r
2862 ADD FIELD "MonthStatus" OF "MonthStatus" AS character \r
2863   FORMAT "X(4)"\r
2864   INITIAL ""\r
2865   POSITION 2\r
2866   SQL-WIDTH 8\r
2867   ORDER 10\r
2868   MANDATORY\r
2869 \r
2870 ADD FIELD "Description" OF "MonthStatus" AS character \r
2871   FORMAT "X(50)"\r
2872   INITIAL ""\r
2873   POSITION 3\r
2874   SQL-WIDTH 100\r
2875   ORDER 20\r
2876 \r
2877 ADD INDEX "XPKMonthStatus" ON "MonthStatus" \r
2878   AREA "Schema Area"\r
2879   UNIQUE\r
2880   PRIMARY\r
2881   INDEX-FIELD "MonthStatus" ASCENDING \r
2882 \r
2883 ADD TABLE "Note"\r
2884   AREA "Schema Area"\r
2885   DUMP-NAME "note"\r
2886   TABLE-TRIGGER "CREATE" OVERRIDE PROCEDURE "crnote.p" CRC "?" \r
2887 \r
2888 ADD FIELD "NoteCode" OF "Note" AS integer \r
2889   DESCRIPTION "A unique code identifying this note."\r
2890   FORMAT ">>>>>9"\r
2891   INITIAL "0"\r
2892   POSITION 2\r
2893   SQL-WIDTH 4\r
2894   ORDER 10\r
2895   MANDATORY\r
2896 \r
2897 ADD FIELD "Details" OF "Note" AS character \r
2898   DESCRIPTION "A note relating to the current record"\r
2899   FORMAT "X(28000)"\r
2900   INITIAL ?\r
2901   POSITION 3\r
2902   SQL-WIDTH 31995\r
2903   VIEW-AS "VIEW-AS EDITOR INNER-CHARS 100 INNER-LINES 7 SCROLLBAR-VERTICAL"\r
2904   LENGTH 0\r
2905   ORDER 20\r
2906   MANDATORY\r
2907 \r
2908 ADD FIELD "NoteTable" OF "Note" AS character \r
2909   FORMAT "X(20)"\r
2910   INITIAL ""\r
2911   POSITION 4\r
2912   SQL-WIDTH 40\r
2913   ORDER 30\r
2914 \r
2915 ADD FIELD "NoteTableKey" OF "Note" AS character \r
2916   FORMAT "X(20)"\r
2917   INITIAL ""\r
2918   POSITION 5\r
2919   SQL-WIDTH 40\r
2920   ORDER 40\r
2921 \r
2922 ADD FIELD "NoteDate" OF "Note" AS date \r
2923   FORMAT "99/99/9999"\r
2924   INITIAL ?\r
2925   POSITION 6\r
2926   SQL-WIDTH 4\r
2927   ORDER 50\r
2928 \r
2929 ADD INDEX "XPKNote" ON "Note" \r
2930   AREA "Schema Area"\r
2931   UNIQUE\r
2932   PRIMARY\r
2933   INDEX-FIELD "NoteCode" ASCENDING \r
2934 \r
2935 ADD TABLE "OutgoingsBasis"\r
2936   AREA "Schema Area"\r
2937   DUMP-NAME "outgoing"\r
2938 \r
2939 ADD FIELD "OutgoingBasis" OF "OutgoingsBasis" AS character \r
2940   FORMAT "X(18)"\r
2941   INITIAL ""\r
2942   POSITION 2\r
2943   SQL-WIDTH 36\r
2944   ORDER 10\r
2945   MANDATORY\r
2946 \r
2947 ADD FIELD "Description" OF "OutgoingsBasis" AS character \r
2948   FORMAT "X(18)"\r
2949   INITIAL ""\r
2950   POSITION 3\r
2951   SQL-WIDTH 36\r
2952   ORDER 20\r
2953 \r
2954 ADD INDEX "XPKOutgoingsBasis" ON "OutgoingsBasis" \r
2955   AREA "Schema Area"\r
2956   UNIQUE\r
2957   PRIMARY\r
2958   INDEX-FIELD "OutgoingBasis" ASCENDING \r
2959 \r
2960 ADD TABLE "Person"\r
2961   AREA "Schema Area"\r
2962   DUMP-NAME "person"\r
2963   TABLE-TRIGGER "CREATE" OVERRIDE PROCEDURE "CRPERSON.P" CRC "?" \r
2964   TABLE-TRIGGER "DELETE" OVERRIDE PROCEDURE "DEPERSON.P" CRC "?" \r
2965   TABLE-TRIGGER "WRITE" OVERRIDE PROCEDURE "wrperson.p" CRC "?" \r
2966 \r
2967 ADD FIELD "PersonCode" OF "Person" AS integer \r
2968   DESCRIPTION "A code used to refer to this person."\r
2969   FORMAT "99999"\r
2970   INITIAL ?\r
2971   LABEL "Person code"\r
2972   POSITION 2\r
2973   SQL-WIDTH 4\r
2974   COLUMN-LABEL "Person"\r
2975   ORDER 10\r
2976   MANDATORY\r
2977 \r
2978 ADD FIELD "PersonTitle" OF "Person" AS character \r
2979   FORMAT "X(6)"\r
2980   INITIAL ""\r
2981   LABEL "Title"\r
2982   POSITION 3\r
2983   SQL-WIDTH 12\r
2984   HELP "Mr, Mrs, Ms, Sir and so forth"\r
2985   ORDER 20\r
2986 \r
2987 ADD FIELD "DateOfBirth" OF "Person" AS date \r
2988   DESCRIPTION "The person's date of birth, if known."\r
2989   FORMAT "99/99/9999"\r
2990   INITIAL ?\r
2991   LABEL "Date of Birth"\r
2992   POSITION 4\r
2993   SQL-WIDTH 4\r
2994   COLUMN-LABEL "Birth date"\r
2995   ORDER 30\r
2996 \r
2997 ADD FIELD "FirstName" OF "Person" AS character \r
2998   DESCRIPTION "The person's first name"\r
2999   FORMAT "X(20)"\r
3000   INITIAL ""\r
3001   LABEL "First name"\r
3002   POSITION 5\r
3003   SQL-WIDTH 40\r
3004   LENGTH 0\r
3005   ORDER 40\r
3006 \r
3007 ADD FIELD "Company" OF "Person" AS character \r
3008   FORMAT "X(50)"\r
3009   INITIAL ""\r
3010   POSITION 6\r
3011   SQL-WIDTH 100\r
3012   LENGTH 0\r
3013   ORDER 100\r
3014 \r
3015 ADD FIELD "GolfHandicap" OF "Person" AS integer \r
3016   DESCRIPTION "The person's last known golf handicap."\r
3017   FORMAT "->9"\r
3018   INITIAL ?\r
3019   LABEL "Golf handicap"\r
3020   POSITION 7\r
3021   SQL-WIDTH 4\r
3022   COLUMN-LABEL "H'cap"\r
3023   ORDER 60\r
3024 \r
3025 ADD FIELD "LastName" OF "Person" AS character \r
3026   DESCRIPTION "The person's last name"\r
3027   FORMAT "X(20)"\r
3028   INITIAL ""\r
3029   LABEL "Last name"\r
3030   POSITION 8\r
3031   SQL-WIDTH 40\r
3032   LENGTH 0\r
3033   ORDER 70\r
3034 \r
3035 ADD FIELD "Preferred" OF "Person" AS character \r
3036   DESCRIPTION "A name that the person prefers to be called by, if this differs from their first name."\r
3037   FORMAT "X(30)"\r
3038   INITIAL ""\r
3039   POSITION 9\r
3040   SQL-WIDTH 60\r
3041   ORDER 80\r
3042 \r
3043 ADD FIELD "Sex" OF "Person" AS logical \r
3044   DESCRIPTION "The person's sex."\r
3045   FORMAT "Male/Female"\r
3046   INITIAL ?\r
3047   POSITION 10\r
3048   SQL-WIDTH 1\r
3049   ORDER 90\r
3050 \r
3051 ADD FIELD "JobTitle" OF "Person" AS character \r
3052   FORMAT "X(30)"\r
3053   INITIAL ""\r
3054   LABEL "Job Title"\r
3055   POSITION 11\r
3056   SQL-WIDTH 60\r
3057   LENGTH 0\r
3058   ORDER 110\r
3059 \r
3060 ADD FIELD "Office" OF "Person" AS character \r
3061   FORMAT "X(30)"\r
3062   INITIAL ""\r
3063   POSITION 12\r
3064   SQL-WIDTH 60\r
3065   LENGTH 0\r
3066   ORDER 120\r
3067 \r
3068 ADD FIELD "CreatorID" OF "Person" AS character \r
3069   FORMAT "X(5)"\r
3070   INITIAL ""\r
3071   POSITION 13\r
3072   SQL-WIDTH 10\r
3073   LENGTH 0\r
3074   ORDER 130\r
3075 \r
3076 ADD FIELD "LastModified" OF "Person" AS date \r
3077   FORMAT "99/99/9999"\r
3078   INITIAL ?\r
3079   LABEL "Last modified"\r
3080   POSITION 14\r
3081   SQL-WIDTH 4\r
3082   ORDER 140\r
3083 \r
3084 ADD FIELD "Department" OF "Person" AS character \r
3085   FORMAT "X(30)"\r
3086   INITIAL ""\r
3087   POSITION 15\r
3088   SQL-WIDTH 60\r
3089   LENGTH 0\r
3090   ORDER 150\r
3091 \r
3092 ADD FIELD "Spouse" OF "Person" AS character \r
3093   FORMAT "X(20)"\r
3094   INITIAL ""\r
3095   POSITION 16\r
3096   SQL-WIDTH 40\r
3097   LENGTH 0\r
3098   ORDER 160\r
3099 \r
3100 ADD FIELD "LastValidated" OF "Person" AS date \r
3101   FORMAT "99/99/9999"\r
3102   INITIAL ?\r
3103   LABEL "Validated"\r
3104   POSITION 17\r
3105   SQL-WIDTH 4\r
3106   ORDER 170\r
3107 \r
3108 ADD FIELD "Notes" OF "Person" AS integer \r
3109   DESCRIPTION "A unique code identifying this note."\r
3110   FORMAT ">>>>>9"\r
3111   INITIAL ?\r
3112   POSITION 18\r
3113   SQL-WIDTH 4\r
3114   ORDER 180\r
3115 \r
3116 ADD FIELD "SystemContact" OF "Person" AS logical \r
3117   DESCRIPTION "System maintained, indicates that this is _solely_ a system initiated contact."\r
3118   FORMAT "yes/no"\r
3119   INITIAL "no"\r
3120   POSITION 19\r
3121   SQL-WIDTH 1\r
3122   ORDER 190\r
3123 \r
3124 ADD FIELD "SchedulePlusID" OF "Person" AS character \r
3125   FORMAT "X(8)"\r
3126   INITIAL ""\r
3127   POSITION 20\r
3128   SQL-WIDTH 16\r
3129   LENGTH 0\r
3130   ORDER 200\r
3131 \r
3132 ADD FIELD "SortOn" OF "Person" AS character \r
3133   FORMAT "X(40)"\r
3134   INITIAL ""\r
3135   POSITION 21\r
3136   SQL-WIDTH 80\r
3137   ORDER 210\r
3138 \r
3139 ADD FIELD "Initials" OF "Person" AS character \r
3140   FORMAT "X(8)"\r
3141   INITIAL ""\r
3142   POSITION 22\r
3143   SQL-WIDTH 16\r
3144   ORDER 220\r
3145 \r
3146 ADD FIELD "MiddleNames" OF "Person" AS character \r
3147   DESCRIPTION "The persons middle name or names"\r
3148   FORMAT "X(24)"\r
3149   INITIAL ""\r
3150   POSITION 23\r
3151   SQL-WIDTH 48\r
3152   HELP "The persons middle name or names"\r
3153   ORDER 230\r
3154 \r
3155 ADD FIELD "NameSuffix" OF "Person" AS character \r
3156   DESCRIPTION "Any suffix such as Snr or Jr following the persons name"\r
3157   FORMAT "X(8)"\r
3158   INITIAL ""\r
3159   POSITION 24\r
3160   SQL-WIDTH 16\r
3161   HELP "Any suffix such as Snr or Jr following the persons name"\r
3162   ORDER 240\r
3163 \r
3164 ADD FIELD "MailOut" OF "Person" AS logical \r
3165   DESCRIPTION "Is person OK to include in mailouts"\r
3166   FORMAT "yes/no"\r
3167   INITIAL "yes"\r
3168   POSITION 25\r
3169   SQL-WIDTH 1\r
3170   COLUMN-LABEL "Mail?"\r
3171   HELP "Is person OK to include in mailouts"\r
3172   ORDER 250\r
3173 \r
3174 ADD FIELD "TempGroup" OF "Person" AS logical \r
3175   DESCRIPTION "Used for temporarily grouping people for bulk actions"\r
3176   FORMAT "yes/no"\r
3177   INITIAL "no"\r
3178   POSITION 26\r
3179   SQL-WIDTH 1\r
3180   ORDER 260\r
3181 \r
3182 ADD INDEX "People" ON "Person" \r
3183   AREA "Schema Area"\r
3184   UNIQUE\r
3185   PRIMARY\r
3186   INDEX-FIELD "PersonCode" ASCENDING \r
3187 \r
3188 ADD INDEX "XAK1People" ON "Person" \r
3189   AREA "Schema Area"\r
3190   INDEX-FIELD "Company" ASCENDING \r
3191   INDEX-FIELD "LastName" ASCENDING \r
3192   INDEX-FIELD "FirstName" ASCENDING \r
3193 \r
3194 ADD INDEX "XAK2People" ON "Person" \r
3195   AREA "Schema Area"\r
3196   INDEX-FIELD "FirstName" ASCENDING \r
3197 \r
3198 ADD INDEX "XAK3People" ON "Person" \r
3199   AREA "Schema Area"\r
3200   INDEX-FIELD "LastName" ASCENDING \r
3201   INDEX-FIELD "FirstName" ASCENDING \r
3202   INDEX-FIELD "Company" ASCENDING \r
3203 \r
3204 ADD INDEX "XAK4People" ON "Person" \r
3205   AREA "Schema Area"\r
3206   INDEX-FIELD "Company" ASCENDING ABBREVIATED \r
3207 \r
3208 ADD INDEX "XAK5People" ON "Person" \r
3209   AREA "Schema Area"\r
3210   INDEX-FIELD "SchedulePlusID" ASCENDING \r
3211 \r
3212 ADD INDEX "XAKPeople-SCLF" ON "Person" \r
3213   AREA "Schema Area"\r
3214   INDEX-FIELD "SystemContact" ASCENDING \r
3215   INDEX-FIELD "Company" ASCENDING \r
3216   INDEX-FIELD "LastName" ASCENDING \r
3217   INDEX-FIELD "FirstName" ASCENDING ABBREVIATED \r
3218 \r
3219 ADD INDEX "XAKPeople-SLFC" ON "Person" \r
3220   AREA "Schema Area"\r
3221   INDEX-FIELD "SystemContact" ASCENDING \r
3222   INDEX-FIELD "LastName" ASCENDING \r
3223   INDEX-FIELD "FirstName" ASCENDING \r
3224   INDEX-FIELD "Company" ASCENDING ABBREVIATED \r
3225 \r
3226 ADD TABLE "PhoneDetail"\r
3227   AREA "Schema Area"\r
3228   DUMP-NAME "phonedet"\r
3229   TABLE-TRIGGER "CREATE" OVERRIDE PROCEDURE "CRPHNDET.P" CRC "?" \r
3230   TABLE-TRIGGER "WRITE" OVERRIDE PROCEDURE "wrphndet.p" CRC "?" \r
3231 \r
3232 ADD FIELD "PersonCode" OF "PhoneDetail" AS integer \r
3233   DESCRIPTION "The person that this phone number relates to"\r
3234   FORMAT ">>>>>9"\r
3235   INITIAL "0"\r
3236   POSITION 2\r
3237   SQL-WIDTH 4\r
3238   ORDER 10\r
3239 \r
3240 ADD FIELD "PhoneType" OF "PhoneDetail" AS character \r
3241   DESCRIPTION "The type of phone number that this is."\r
3242   FORMAT "X(4)"\r
3243   INITIAL ""\r
3244   POSITION 3\r
3245   SQL-WIDTH 8\r
3246   ORDER 20\r
3247   MANDATORY\r
3248 \r
3249 ADD FIELD "Number" OF "PhoneDetail" AS character \r
3250   DESCRIPTION "The phone number"\r
3251   FORMAT "X(30)"\r
3252   INITIAL ""\r
3253   POSITION 4\r
3254   SQL-WIDTH 60\r
3255   ORDER 30\r
3256 \r
3257 ADD FIELD "CountryCode" OF "PhoneDetail" AS integer \r
3258   FORMAT ">>9"\r
3259   INITIAL "0"\r
3260   LABEL "Country"\r
3261   POSITION 5\r
3262   SQL-WIDTH 4\r
3263   ORDER 40\r
3264 \r
3265 ADD FIELD "STDCode" OF "PhoneDetail" AS integer \r
3266   FORMAT ">>>9"\r
3267   INITIAL "0"\r
3268   LABEL "STD"\r
3269   POSITION 6\r
3270   SQL-WIDTH 4\r
3271   ORDER 50\r
3272 \r
3273 ADD FIELD "cCountryCode" OF "PhoneDetail" AS character \r
3274   FORMAT "X(5)"\r
3275   INITIAL ""\r
3276   LABEL "Country Code"\r
3277   POSITION 7\r
3278   SQL-WIDTH 10\r
3279   COLUMN-LABEL "Country"\r
3280   ORDER 60\r
3281 \r
3282 ADD FIELD "cSTDCode" OF "PhoneDetail" AS character \r
3283   FORMAT "X(5)"\r
3284   INITIAL ""\r
3285   LABEL "STD Code"\r
3286   POSITION 8\r
3287   SQL-WIDTH 10\r
3288   COLUMN-LABEL "STD"\r
3289   ORDER 70\r
3290 \r
3291 ADD INDEX "PhoneDetails" ON "PhoneDetail" \r
3292   AREA "Schema Area"\r
3293   UNIQUE\r
3294   PRIMARY\r
3295   INDEX-FIELD "PersonCode" ASCENDING \r
3296   INDEX-FIELD "PhoneType" ASCENDING \r
3297 \r
3298 ADD INDEX "XAK1PhoneDetails" ON "PhoneDetail" \r
3299   AREA "Schema Area"\r
3300   INDEX-FIELD "CountryCode" ASCENDING \r
3301   INDEX-FIELD "STDCode" ASCENDING \r
3302   INDEX-FIELD "Number" ASCENDING \r
3303 \r
3304 ADD INDEX "XAK2PhoneDetails" ON "PhoneDetail" \r
3305   AREA "Schema Area"\r
3306   INDEX-FIELD "cCountryCode" ASCENDING \r
3307   INDEX-FIELD "cSTDCode" ASCENDING \r
3308   INDEX-FIELD "PhoneType" ASCENDING \r
3309 \r
3310 ADD TABLE "PhoneType"\r
3311   AREA "Schema Area"\r
3312   DUMP-NAME "phonetyp"\r
3313 \r
3314 ADD FIELD "PhoneType" OF "PhoneType" AS character \r
3315   FORMAT "X(4)"\r
3316   INITIAL ""\r
3317   POSITION 2\r
3318   SQL-WIDTH 8\r
3319   ORDER 10\r
3320   MANDATORY\r
3321 \r
3322 ADD FIELD "Description" OF "PhoneType" AS character \r
3323   FORMAT "X(50)"\r
3324   INITIAL ""\r
3325   POSITION 3\r
3326   SQL-WIDTH 100\r
3327   ORDER 20\r
3328 \r
3329 ADD INDEX "XPKPhoneTypes" ON "PhoneType" \r
3330   AREA "Schema Area"\r
3331   UNIQUE\r
3332   PRIMARY\r
3333   INDEX-FIELD "PhoneType" ASCENDING \r
3334 \r
3335 ADD TABLE "PostalDetail"\r
3336   AREA "Schema Area"\r
3337   DUMP-NAME "postalde"\r
3338   TABLE-TRIGGER "CREATE" OVERRIDE PROCEDURE "crpstdet.p" CRC "?" \r
3339   TABLE-TRIGGER "WRITE" OVERRIDE PROCEDURE "wrpstdet.p" CRC "?" \r
3340 \r
3341 ADD FIELD "PersonCode" OF "PostalDetail" AS integer \r
3342   DESCRIPTION "The person that this postal address applies to"\r
3343   FORMAT ">>>>>9"\r
3344   INITIAL "0"\r
3345   POSITION 2\r
3346   SQL-WIDTH 4\r
3347   ORDER 10\r
3348 \r
3349 ADD FIELD "PostalType" OF "PostalDetail" AS character \r
3350   DESCRIPTION "The type of postal address that this is"\r
3351   FORMAT "X(4)"\r
3352   INITIAL ""\r
3353   POSITION 3\r
3354   SQL-WIDTH 8\r
3355   ORDER 20\r
3356   MANDATORY\r
3357 \r
3358 ADD FIELD "Address" OF "PostalDetail" AS character \r
3359   DESCRIPTION "The postal address"\r
3360   FORMAT "X(256)"\r
3361   INITIAL ""\r
3362   POSITION 4\r
3363   SQL-WIDTH 512\r
3364   VIEW-AS "VIEW-AS EDITOR INNER-CHARS 40 INNER-LINES 3 SCROLLBAR-VERTICAL"\r
3365   LENGTH 0\r
3366   ORDER 30\r
3367 \r
3368 ADD FIELD "City" OF "PostalDetail" AS character \r
3369   FORMAT "X(30)"\r
3370   INITIAL ""\r
3371   POSITION 5\r
3372   SQL-WIDTH 60\r
3373   LENGTH 0\r
3374   ORDER 40\r
3375 \r
3376 ADD FIELD "State" OF "PostalDetail" AS character \r
3377   FORMAT "X(15)"\r
3378   INITIAL ""\r
3379   POSITION 6\r
3380   SQL-WIDTH 30\r
3381   LENGTH 0\r
3382   ORDER 50\r
3383 \r
3384 ADD FIELD "Country" OF "PostalDetail" AS character \r
3385   FORMAT "X(30)"\r
3386   INITIAL ""\r
3387   POSITION 7\r
3388   SQL-WIDTH 60\r
3389   LENGTH 0\r
3390   ORDER 60\r
3391 \r
3392 ADD FIELD "Zip" OF "PostalDetail" AS character \r
3393   FORMAT "X(20)"\r
3394   INITIAL ""\r
3395   POSITION 8\r
3396   SQL-WIDTH 40\r
3397   LENGTH 0\r
3398   ORDER 70\r
3399 \r
3400 ADD INDEX "PostalDetails" ON "PostalDetail" \r
3401   AREA "Schema Area"\r
3402   UNIQUE\r
3403   PRIMARY\r
3404   INDEX-FIELD "PersonCode" ASCENDING \r
3405   INDEX-FIELD "PostalType" ASCENDING \r
3406 \r
3407 ADD INDEX "XAK1PostalDetails" ON "PostalDetail" \r
3408   AREA "Schema Area"\r
3409   INDEX-FIELD "Country" ASCENDING \r
3410   INDEX-FIELD "State" ASCENDING \r
3411   INDEX-FIELD "City" ASCENDING \r
3412 \r
3413 ADD TABLE "PostalType"\r
3414   AREA "Schema Area"\r
3415   DUMP-NAME "postalty"\r
3416 \r
3417 ADD FIELD "PostalType" OF "PostalType" AS character \r
3418   FORMAT "X(4)"\r
3419   INITIAL ""\r
3420   POSITION 2\r
3421   SQL-WIDTH 8\r
3422   ORDER 10\r
3423   MANDATORY\r
3424 \r
3425 ADD FIELD "Description" OF "PostalType" AS character \r
3426   FORMAT "X(50)"\r
3427   INITIAL ""\r
3428   POSITION 3\r
3429   SQL-WIDTH 100\r
3430   ORDER 20\r
3431 \r
3432 ADD INDEX "XPKPostalType" ON "PostalType" \r
3433   AREA "Schema Area"\r
3434   UNIQUE\r
3435   PRIMARY\r
3436   INDEX-FIELD "PostalType" ASCENDING \r
3437 \r
3438 ADD TABLE "Project"\r
3439   AREA "Schema Area"\r
3440   DUMP-NAME "project"\r
3441   TABLE-TRIGGER "CREATE" OVERRIDE PROCEDURE "crprjct.p" CRC "?" \r
3442   TABLE-TRIGGER "WRITE" OVERRIDE PROCEDURE "wrprojct.p" CRC "?" \r
3443 \r
3444 ADD FIELD "ProjectCode" OF "Project" AS integer \r
3445   FORMAT "99999"\r
3446   INITIAL "0"\r
3447   POSITION 2\r
3448   SQL-WIDTH 4\r
3449   ORDER 5\r
3450 \r
3451 ADD FIELD "EntityType" OF "Project" AS character \r
3452   FORMAT "X(4)"\r
3453   INITIAL ""\r
3454   LABEL "Entity type code"\r
3455   POSITION 3\r
3456   SQL-WIDTH 8\r
3457   LENGTH 0\r
3458   ORDER 10\r
3459   MANDATORY\r
3460 \r
3461 ADD FIELD "Name" OF "Project" AS character \r
3462   FORMAT "X(50)"\r
3463   INITIAL ""\r
3464   POSITION 4\r
3465   SQL-WIDTH 100\r
3466   ORDER 160\r
3467 \r
3468 ADD FIELD "EntityCode" OF "Project" AS integer \r
3469   FORMAT "99999"\r
3470   INITIAL "0"\r
3471   LABEL "Code"\r
3472   POSITION 5\r
3473   SQL-WIDTH 4\r
3474   COLUMN-LABEL-SA "C"\r
3475   ORDER 20\r
3476 \r
3477 ADD FIELD "EntityAccount" OF "Project" AS decimal \r
3478   DESCRIPTION "The code of the account."\r
3479   FORMAT "9999.99"\r
3480   INITIAL "0000.00"\r
3481   LABEL "Account"\r
3482   POSITION 6\r
3483   SQL-WIDTH 17\r
3484   DECIMALS 2\r
3485   ORDER 30\r
3486   MANDATORY\r
3487 \r
3488 ADD FIELD "LastModifiedDate" OF "Project" AS date \r
3489   DESCRIPTION "The date when this record was last modified.  Maintained by a WRITE trigger."\r
3490   FORMAT "99/99/9999"\r
3491   INITIAL "1/1/0001"\r
3492   POSITION 7\r
3493   SQL-WIDTH 4\r
3494   ORDER 110\r
3495   MANDATORY\r
3496 \r
3497 ADD FIELD "LastModifiedTime" OF "Project" AS integer \r
3498   DESCRIPTION "The time that this record was last modified"\r
3499   FORMAT "->,>>>,>>9"\r
3500   INITIAL "0"\r
3501   POSITION 8\r
3502   SQL-WIDTH 4\r
3503   ORDER 120\r
3504 \r
3505 ADD FIELD "LastModifiedUser" OF "Project" AS character \r
3506   DESCRIPTION "The user who last modified this record.  Maintained by a WRITE trigger."\r
3507   FORMAT "X(8)"\r
3508   INITIAL ""\r
3509   POSITION 9\r
3510   SQL-WIDTH 16\r
3511   LENGTH 0\r
3512   ORDER 130\r
3513 \r
3514 ADD FIELD "Proposer" OF "Project" AS integer \r
3515   DESCRIPTION "A code used to refer to this proposer of this Project."\r
3516   FORMAT "99999"\r
3517   INITIAL "0"\r
3518   LABEL "Proposer"\r
3519   POSITION 10\r
3520   SQL-WIDTH 4\r
3521   ORDER 40\r
3522   MANDATORY\r
3523 \r
3524 ADD FIELD "FirstApprover" OF "Project" AS character \r
3525   DESCRIPTION "The short alphanumeric code that identifies this approver."\r
3526   FORMAT "X(4)"\r
3527   INITIAL ""\r
3528   LABEL "Approval"\r
3529   POSITION 11\r
3530   SQL-WIDTH 8\r
3531   ORDER 140\r
3532   MANDATORY\r
3533 \r
3534 ADD FIELD "SecondApprover" OF "Project" AS character \r
3535   DESCRIPTION "The short alphanumeric code that identifies this approver."\r
3536   FORMAT "X(4)"\r
3537   INITIAL ""\r
3538   LABEL "Approval"\r
3539   POSITION 12\r
3540   SQL-WIDTH 8\r
3541   ORDER 150\r
3542   MANDATORY\r
3543 \r
3544 ADD FIELD "StartDate" OF "Project" AS date \r
3545   FORMAT "99/99/9999"\r
3546   INITIAL ?\r
3547   LABEL "Start Date"\r
3548   POSITION 13\r
3549   SQL-WIDTH 4\r
3550   ORDER 70\r
3551 \r
3552 ADD FIELD "CompleteDate" OF "Project" AS date \r
3553   FORMAT "99/99/9999"\r
3554   INITIAL ?\r
3555   LABEL "Completion Date"\r
3556   POSITION 14\r
3557   SQL-WIDTH 4\r
3558   ORDER 80\r
3559 \r
3560 ADD FIELD "ApprovedAmount" OF "Project" AS decimal \r
3561   FORMAT ">>>,>>>,>>9.99"\r
3562   INITIAL "0"\r
3563   LABEL "Approved Amount"\r
3564   POSITION 15\r
3565   SQL-WIDTH 17\r
3566   DECIMALS 2\r
3567   ORDER 90\r
3568 \r
3569 ADD FIELD "ExpenditureType" OF "Project" AS character \r
3570   FORMAT "X(4)"\r
3571   INITIAL ""\r
3572   LABEL "Expenditure Type"\r
3573   POSITION 16\r
3574   SQL-WIDTH 8\r
3575   ORDER 100\r
3576 \r
3577 ADD FIELD "Description" OF "Project" AS character \r
3578   FORMAT "X(256)"\r
3579   INITIAL ""\r
3580   POSITION 17\r
3581   SQL-WIDTH 512\r
3582   ORDER 170\r
3583 \r
3584 ADD FIELD "ProposedDate" OF "Project" AS date \r
3585   FORMAT "99/99/9999"\r
3586   INITIAL ?\r
3587   LABEL "Proposed"\r
3588   POSITION 18\r
3589   SQL-WIDTH 4\r
3590   ORDER 180\r
3591 \r
3592 ADD FIELD "ApproveDate" OF "Project" AS date \r
3593   FORMAT "99/99/9999"\r
3594   INITIAL ?\r
3595   LABEL "CapEx Approved"\r
3596   POSITION 19\r
3597   SQL-WIDTH 4\r
3598   ORDER 190\r
3599 \r
3600 ADD FIELD "SecondApproveDate" OF "Project" AS date \r
3601   FORMAT "99/99/9999"\r
3602   INITIAL ?\r
3603   LABEL "2nd Approved"\r
3604   POSITION 20\r
3605   SQL-WIDTH 4\r
3606   ORDER 200\r
3607 \r
3608 ADD FIELD "ClosedDate" OF "Project" AS date \r
3609   FORMAT "99/99/9999"\r
3610   INITIAL ?\r
3611   LABEL "Closed"\r
3612   POSITION 21\r
3613   SQL-WIDTH 4\r
3614   ORDER 210\r
3615 \r
3616 ADD FIELD "NotApprovedDate" OF "Project" AS date \r
3617   FORMAT "99/99/9999"\r
3618   INITIAL ?\r
3619   LABEL "Not Approved"\r
3620   POSITION 22\r
3621   SQL-WIDTH 4\r
3622   ORDER 220\r
3623 \r
3624 ADD FIELD "NotApprovedReason" OF "Project" AS character \r
3625   FORMAT "X(80)"\r
3626   INITIAL ?\r
3627   LABEL "Why not"\r
3628   POSITION 23\r
3629   SQL-WIDTH 160\r
3630   ORDER 230\r
3631 \r
3632 ADD FIELD "NotApprovedBy" OF "Project" AS integer \r
3633   FORMAT "->,>>>,>>9"\r
3634   INITIAL "0"\r
3635   POSITION 24\r
3636   SQL-WIDTH 4\r
3637   ORDER 240\r
3638 \r
3639 ADD FIELD "BudgetsFrozen" OF "Project" AS logical \r
3640   FORMAT "yes/no"\r
3641   INITIAL "no"\r
3642   LABEL "Freeze Budgets"\r
3643   POSITION 25\r
3644   SQL-WIDTH 1\r
3645   ORDER 250\r
3646 \r
3647 ADD FIELD "Active" OF "Project" AS logical \r
3648   DESCRIPTION "Flag to indicate whether the project is active or inactive"\r
3649   FORMAT "yes/no"\r
3650   INITIAL "Yes"\r
3651   POSITION 26\r
3652   SQL-WIDTH 1\r
3653   ORDER 260\r
3654 \r
3655 ADD FIELD "ProjectType" OF "Project" AS character \r
3656   FORMAT "X(4)"\r
3657   INITIAL ""\r
3658   LABEL "Type"\r
3659   POSITION 27\r
3660   SQL-WIDTH 8\r
3661   ORDER 270\r
3662 \r
3663 ADD FIELD "BudgetAmount" OF "Project" AS decimal \r
3664   DESCRIPTION "Amount proposed or budgetted for the project"\r
3665   FORMAT "->>>,>>>,>>9.99"\r
3666   INITIAL "0"\r
3667   POSITION 28\r
3668   SQL-WIDTH 17\r
3669   HELP "Amount proposed or budgetted for the project"\r
3670   DECIMALS 2\r
3671   ORDER 85\r
3672 \r
3673 ADD FIELD "Approved" OF "Project" AS logical \r
3674   DESCRIPTION "Flag indicating approval status of the project"\r
3675   FORMAT "yes/no"\r
3676   INITIAL "no"\r
3677   POSITION 29\r
3678   SQL-WIDTH 1\r
3679   HELP "Whether or not the capital expenditure is approved"\r
3680   ORDER 280\r
3681 \r
3682 ADD FIELD "AreaSize" OF "Project" AS decimal \r
3683   DESCRIPTION "Size of the area affected/created by the project to allow project costs to be apportioned on a PSM basis"\r
3684   FORMAT "->>,>>9.99"\r
3685   INITIAL "0"\r
3686   POSITION 30\r
3687   SQL-WIDTH 17\r
3688   DECIMALS 2\r
3689   ORDER 290\r
3690 \r
3691 ADD INDEX "XPKProject" ON "Project" \r
3692   AREA "Schema Area"\r
3693   UNIQUE\r
3694   PRIMARY\r
3695   INDEX-FIELD "ProjectCode" ASCENDING \r
3696 \r
3697 ADD INDEX "XAK1Project" ON "Project" \r
3698   AREA "Schema Area"\r
3699   INDEX-FIELD "EntityType" ASCENDING \r
3700   INDEX-FIELD "EntityCode" ASCENDING \r
3701   INDEX-FIELD "ProjectCode" ASCENDING \r
3702 \r
3703 ADD INDEX "XAK2Projects" ON "Project" \r
3704   AREA "Schema Area"\r
3705   INDEX-FIELD "ProjectType" ASCENDING \r
3706   INDEX-FIELD "StartDate" ASCENDING \r
3707   INDEX-FIELD "ProjectCode" ASCENDING \r
3708 \r
3709 ADD TABLE "Property"\r
3710   AREA "Schema Area"\r
3711   DUMP-NAME "property"\r
3712   TABLE-TRIGGER "WRITE" OVERRIDE PROCEDURE "wrproper.p" CRC "?" \r
3713 \r
3714 ADD FIELD "PropertyCode" OF "Property" AS integer \r
3715   DESCRIPTION "The code used to refer to a property"\r
3716   FORMAT "99999"\r
3717   INITIAL "0"\r
3718   LABEL "Code"\r
3719   POSITION 2\r
3720   SQL-WIDTH 4\r
3721   ORDER 10\r
3722   FIELD-TRIGGER "ASSIGN" OVERRIDE PROCEDURE "A-PROCDE.P" CRC "?" \r
3723 \r
3724 ADD FIELD "LocationDescription" OF "Property" AS integer \r
3725   DESCRIPTION "Descriptive paragraphs about the location of the property."\r
3726   FORMAT ">>>>>9"\r
3727   INITIAL "0"\r
3728   LABEL "Location"\r
3729   POSITION 3\r
3730   SQL-WIDTH 4\r
3731   ORDER 20\r
3732   MANDATORY\r
3733 \r
3734 ADD FIELD "Administrator" OF "Property" AS integer \r
3735   DESCRIPTION "The staff member who is involved in administration of the property."\r
3736   FORMAT ">>>>>9"\r
3737   INITIAL "0"\r
3738   POSITION 4\r
3739   SQL-WIDTH 4\r
3740   ORDER 30\r
3741   MANDATORY\r
3742 \r
3743 ADD FIELD "CompanyCode" OF "Property" AS integer \r
3744   DESCRIPTION "The company which owns this property"\r
3745   FORMAT "99999"\r
3746   INITIAL "0"\r
3747   LABEL "Company"\r
3748   POSITION 5\r
3749   SQL-WIDTH 4\r
3750   ORDER 40\r
3751   MANDATORY\r
3752 \r
3753 ADD FIELD "Name" OF "Property" AS character \r
3754   DESCRIPTION "A name used to refer to this property."\r
3755   FORMAT "X(50)"\r
3756   INITIAL ""\r
3757   POSITION 6\r
3758   SQL-WIDTH 100\r
3759   ORDER 50\r
3760 \r
3761 ADD FIELD "ShortName" OF "Property" AS character \r
3762   DESCRIPTION "A short name for this property which will be used as a column header on some reports"\r
3763   FORMAT "X(10)"\r
3764   INITIAL ""\r
3765   LABEL "Short name"\r
3766   POSITION 7\r
3767   SQL-WIDTH 20\r
3768   LENGTH 0\r
3769   ORDER 60\r
3770 \r
3771 ADD FIELD "StreetAddress" OF "Property" AS character \r
3772   DESCRIPTION "The address of the property"\r
3773   FORMAT "X(50)"\r
3774   INITIAL ""\r
3775   LABEL "Street address"\r
3776   POSITION 8\r
3777   SQL-WIDTH 100\r
3778   LENGTH 0\r
3779   ORDER 70\r
3780 \r
3781 ADD FIELD "ChiefWarden" OF "Property" AS integer \r
3782   DESCRIPTION "The person who is the chief building warden."\r
3783   FORMAT ">>>>>9"\r
3784   INITIAL "0"\r
3785   LABEL "Chief warden"\r
3786   POSITION 9\r
3787   SQL-WIDTH 4\r
3788   ORDER 80\r
3789   MANDATORY\r
3790 \r
3791 ADD FIELD "DeputyWarden" OF "Property" AS integer \r
3792   DESCRIPTION "The person who is the deputy building warden."\r
3793   FORMAT ">>>>>9"\r
3794   INITIAL "0"\r
3795   LABEL "Deputy warden"\r
3796   POSITION 10\r
3797   SQL-WIDTH 4\r
3798   ORDER 90\r
3799   MANDATORY\r
3800 \r
3801 ADD FIELD "Manager" OF "Property" AS integer \r
3802   DESCRIPTION "The staff member who manages the property"\r
3803   FORMAT ">>>>>9"\r
3804   INITIAL "0"\r
3805   POSITION 11\r
3806   SQL-WIDTH 4\r
3807   ORDER 100\r
3808   MANDATORY\r
3809 \r
3810 ADD FIELD "Active" OF "Property" AS logical \r
3811   DESCRIPTION "Flag to indicate whether the property is active or inactive"\r
3812   FORMAT "yes/no"\r
3813   INITIAL "no"\r
3814   POSITION 12\r
3815   SQL-WIDTH 1\r
3816   ORDER 110\r
3817 \r
3818 ADD FIELD "NoteCode" OF "Property" AS integer \r
3819   DESCRIPTION "A unique code identifying this note."\r
3820   FORMAT ">>>>>9"\r
3821   INITIAL ?\r
3822   POSITION 13\r
3823   SQL-WIDTH 4\r
3824   ORDER 140\r
3825 \r
3826 ADD FIELD "PurchaseAgreement" OF "Property" AS date \r
3827   FORMAT "99/99/9999"\r
3828   INITIAL ?\r
3829   POSITION 14\r
3830   SQL-WIDTH 4\r
3831   ORDER 250\r
3832 \r
3833 ADD FIELD "PurchasePrice" OF "Property" AS decimal \r
3834   FORMAT ">>>,>>>,>>9.99"\r
3835   INITIAL "0"\r
3836   POSITION 15\r
3837   SQL-WIDTH 17\r
3838   DECIMALS 2\r
3839   ORDER 160\r
3840 \r
3841 ADD FIELD "PurchaseCosts" OF "Property" AS decimal \r
3842   FORMAT ">>,>>>,>>9.99"\r
3843   INITIAL "0"\r
3844   POSITION 16\r
3845   SQL-WIDTH 17\r
3846   HELP "Costs associated with purchasing the property"\r
3847   DECIMALS 2\r
3848   ORDER 170\r
3849 \r
3850 ADD FIELD "City" OF "Property" AS character \r
3851   FORMAT "X(20)"\r
3852   INITIAL ""\r
3853   POSITION 17\r
3854   SQL-WIDTH 40\r
3855   LENGTH 0\r
3856   ORDER 180\r
3857 \r
3858 ADD FIELD "PurchasedFrom" OF "Property" AS character \r
3859   FORMAT "X(50)"\r
3860   INITIAL ""\r
3861   POSITION 18\r
3862   SQL-WIDTH 100\r
3863   LENGTH 0\r
3864   ORDER 190\r
3865 \r
3866 ADD FIELD "PurchaseSettlement" OF "Property" AS date \r
3867   FORMAT "99/99/9999"\r
3868   INITIAL ?\r
3869   POSITION 19\r
3870   SQL-WIDTH 4\r
3871   ORDER 260\r
3872 \r
3873 ADD FIELD "SalePrice" OF "Property" AS decimal \r
3874   FORMAT ">>>,>>>,>>9.99"\r
3875   INITIAL "0"\r
3876   POSITION 20\r
3877   SQL-WIDTH 17\r
3878   DECIMALS 2\r
3879   ORDER 210\r
3880 \r
3881 ADD FIELD "SaleAgreement" OF "Property" AS date \r
3882   FORMAT "99/99/9999"\r
3883   INITIAL ?\r
3884   POSITION 21\r
3885   SQL-WIDTH 4\r
3886   ORDER 270\r
3887 \r
3888 ADD FIELD "SoldTo" OF "Property" AS character \r
3889   FORMAT "X(50)"\r
3890   INITIAL ""\r
3891   POSITION 22\r
3892   SQL-WIDTH 100\r
3893   LENGTH 0\r
3894   ORDER 230\r
3895 \r
3896 ADD FIELD "BuildingType" OF "Property" AS character \r
3897   FORMAT "X(4)"\r
3898   INITIAL ""\r
3899   LABEL "Type"\r
3900   POSITION 23\r
3901   SQL-WIDTH 8\r
3902   LENGTH 0\r
3903   ORDER 240\r
3904 \r
3905 ADD FIELD "SaleSettlement" OF "Property" AS date \r
3906   FORMAT "99/99/9999"\r
3907   INITIAL ?\r
3908   POSITION 24\r
3909   SQL-WIDTH 4\r
3910   ORDER 280\r
3911 \r
3912 ADD FIELD "Region" OF "Property" AS character \r
3913   DESCRIPTION "Code to refer to region the property is in"\r
3914   FORMAT "X(4)"\r
3915   INITIAL ""\r
3916   POSITION 25\r
3917   SQL-WIDTH 8\r
3918   HELP "Enter region code"\r
3919   LENGTH 0\r
3920   ORDER 290\r
3921 \r
3922 ADD FIELD "ExternallyManaged" OF "Property" AS logical \r
3923   DESCRIPTION "True if the building is managed externally through a separated organisation."\r
3924   FORMAT "yes/no"\r
3925   INITIAL "no"\r
3926   LABEL "Ext Mgmt"\r
3927   POSITION 26\r
3928   SQL-WIDTH 1\r
3929   COLUMN-LABEL "Ext"\r
3930   ORDER 300\r
3931 \r
3932 ADD FIELD "LastModifiedDate" OF "Property" AS date \r
3933   DESCRIPTION "The date when this record was last modified.  Maintained by a WRITE trigger."\r
3934   FORMAT "99/99/9999"\r
3935   INITIAL "1/1/0001"\r
3936   POSITION 27\r
3937   SQL-WIDTH 4\r
3938   ORDER 330\r
3939   MANDATORY\r
3940 \r
3941 ADD FIELD "LastModifiedTime" OF "Property" AS integer \r
3942   DESCRIPTION "The time that this record was last modified"\r
3943   FORMAT "->,>>>,>>9"\r
3944   INITIAL "0"\r
3945   POSITION 28\r
3946   SQL-WIDTH 4\r
3947   ORDER 340\r
3948 \r
3949 ADD FIELD "LastModifiedUser" OF "Property" AS character \r
3950   DESCRIPTION "The user who last modified this record.  Maintained by a WRITE trigger."\r
3951   FORMAT "X(8)"\r
3952   INITIAL ""\r
3953   POSITION 29\r
3954   SQL-WIDTH 16\r
3955   LENGTH 0\r
3956   ORDER 350\r
3957 \r
3958 ADD FIELD "AuditRecordId" OF "Property" AS integer \r
3959   FORMAT "->,>>>,>>9"\r
3960   INITIAL "0"\r
3961   POSITION 30\r
3962   SQL-WIDTH 4\r
3963   ORDER 360\r
3964 \r
3965 ADD FIELD "OpexEstimate" OF "Property" AS decimal \r
3966   DESCRIPTION "Estimated OPEX PSM for the building."\r
3967   FORMAT "->>>,>>>,>>9.99"\r
3968   INITIAL "0"\r
3969   POSITION 31\r
3970   SQL-WIDTH 17\r
3971   DECIMALS 2\r
3972   ORDER 370\r
3973 \r
3974 ADD FIELD "MarketRental" OF "Property" AS decimal \r
3975   DESCRIPTION "Estimated Achievable Rental (Net Income) for the whole building"\r
3976   FORMAT "->>>,>>>,>>9.99"\r
3977   INITIAL "0"\r
3978   LABEL "Market Rental"\r
3979   POSITION 32\r
3980   SQL-WIDTH 17\r
3981   DECIMALS 2\r
3982   ORDER 380\r
3983 \r
3984 ADD FIELD "WofExpiryDate" OF "Property" AS date \r
3985   FORMAT "99/99/9999"\r
3986   INITIAL ?\r
3987   LABEL "WOF Expiry"\r
3988   POSITION 33\r
3989   SQL-WIDTH 4\r
3990   ORDER 390\r
3991 \r
3992 ADD FIELD "BusIntIndemnityPeriod" OF "Property" AS integer \r
3993   FORMAT ">,>>9"\r
3994   INITIAL "0"\r
3995   LABEL "Indemnity period"\r
3996   POSITION 34\r
3997   SQL-WIDTH 4\r
3998   ORDER 400\r
3999 \r
4000 ADD FIELD "InsuranceBroker" OF "Property" AS integer \r
4001   FORMAT "->,>>>,>>9"\r
4002   INITIAL "0"\r
4003   POSITION 35\r
4004   SQL-WIDTH 4\r
4005   ORDER 410\r
4006 \r
4007 ADD FIELD "TotalArea" OF "Property" AS decimal \r
4008   FORMAT "->,>>>,>>9.999"\r
4009   INITIAL "0"\r
4010   LABEL "Total Area"\r
4011   POSITION 36\r
4012   SQL-WIDTH 17\r
4013   DECIMALS 2\r
4014   ORDER 420\r
4015 \r
4016 ADD FIELD "TotalParks" OF "Property" AS integer \r
4017   FORMAT "->,>>>,>>9"\r
4018   INITIAL "0"\r
4019   LABEL "Total Parks"\r
4020   POSITION 37\r
4021   SQL-WIDTH 4\r
4022   ORDER 430\r
4023 \r
4024 ADD FIELD "ReconciliationDue" OF "Property" AS date \r
4025   FORMAT "99/99/9999"\r
4026   INITIAL ?\r
4027   LABEL "Annual Rec Due"\r
4028   POSITION 38\r
4029   SQL-WIDTH 4\r
4030   COLUMN-LABEL "Annual Rec"\r
4031   HELP "The date that the annual o/g reconciliation is due."\r
4032   ORDER 440\r
4033 \r
4034 ADD FIELD "ComplianceNo" OF "Property" AS character \r
4035   FORMAT "X(20)"\r
4036   INITIAL ""\r
4037   LABEL "Compliance No"\r
4038   POSITION 39\r
4039   SQL-WIDTH 40\r
4040   HELP "The reference code for building warrant of fitness use"\r
4041   ORDER 450\r
4042 \r
4043 ADD FIELD "Ranking" OF "Property" AS integer \r
4044   DESCRIPTION "A number indicating this buildings ranking within the portfolio"\r
4045   FORMAT "->,>>>,>>9"\r
4046   INITIAL "0"\r
4047   POSITION 40\r
4048   SQL-WIDTH 4\r
4049   HELP "A number indicating this buildings ranking within the portfolio"\r
4050   ORDER 460\r
4051 \r
4052 ADD FIELD "MarketCarpark" OF "Property" AS decimal \r
4053   DESCRIPTION "Market rental for carparks in this building"\r
4054   FORMAT "->>,>>9.99"\r
4055   INITIAL "0"\r
4056   POSITION 41\r
4057   SQL-WIDTH 17\r
4058   HELP "Market rental for carparks in this building"\r
4059   DECIMALS 2\r
4060   ORDER 470\r
4061 \r
4062 ADD INDEX "Properties" ON "Property" \r
4063   AREA "Schema Area"\r
4064   UNIQUE\r
4065   PRIMARY\r
4066   INDEX-FIELD "PropertyCode" ASCENDING \r
4067 \r
4068 ADD INDEX "XAK1Properties" ON "Property" \r
4069   AREA "Schema Area"\r
4070   INDEX-FIELD "ShortName" ASCENDING ABBREVIATED \r
4071 \r
4072 ADD INDEX "XAKRegion" ON "Property" \r
4073   AREA "Schema Area"\r
4074   INDEX-FIELD "Region" ASCENDING ABBREVIATED \r
4075 \r
4076 ADD TABLE "PropertyTitle"\r
4077   AREA "Schema Area"\r
4078   DUMP-NAME "propert2"\r
4079 \r
4080 ADD FIELD "PropertyCode" OF "PropertyTitle" AS integer \r
4081   DESCRIPTION "The code of the property which this title relates to."\r
4082   FORMAT "99999"\r
4083   INITIAL "0"\r
4084   POSITION 2\r
4085   SQL-WIDTH 4\r
4086   ORDER 10\r
4087 \r
4088 ADD FIELD "TitleCode" OF "PropertyTitle" AS integer \r
4089   DESCRIPTION "The sequence of this title within the property"\r
4090   FORMAT ">>>>>9"\r
4091   INITIAL "0"\r
4092   POSITION 3\r
4093   SQL-WIDTH 4\r
4094   ORDER 20\r
4095 \r
4096 ADD FIELD "CTReference" OF "PropertyTitle" AS character \r
4097   DESCRIPTION "The reference to the certificate of title."\r
4098   FORMAT "X(8)"\r
4099   INITIAL ""\r
4100   POSITION 4\r
4101   SQL-WIDTH 16\r
4102   ORDER 30\r
4103 \r
4104 ADD FIELD "Easements" OF "PropertyTitle" AS character \r
4105   DESCRIPTION "Descriptions of any easements"\r
4106   FORMAT "X(8)"\r
4107   INITIAL ""\r
4108   POSITION 5\r
4109   SQL-WIDTH 16\r
4110   ORDER 40\r
4111 \r
4112 ADD FIELD "LegalDescription" OF "PropertyTitle" AS character \r
4113   DESCRIPTION "The legal description of the title."\r
4114   FORMAT "X(8)"\r
4115   INITIAL ""\r
4116   POSITION 6\r
4117   SQL-WIDTH 16\r
4118   ORDER 50\r
4119 \r
4120 ADD FIELD "RightsOfWay" OF "PropertyTitle" AS character \r
4121   DESCRIPTION "Descriptions of any rights of way."\r
4122   FORMAT "X(8)"\r
4123   INITIAL ""\r
4124   POSITION 7\r
4125   SQL-WIDTH 16\r
4126   ORDER 60\r
4127 \r
4128 ADD FIELD "WhereHeld" OF "PropertyTitle" AS character \r
4129   DESCRIPTION "Where the original title documents are held (usually a lawyer?).  Could we use a lookup table? Discuss with AP."\r
4130   FORMAT "X(50)"\r
4131   INITIAL ""\r
4132   POSITION 8\r
4133   SQL-WIDTH 100\r
4134   ORDER 70\r
4135 \r
4136 ADD INDEX "Titles" ON "PropertyTitle" \r
4137   AREA "Schema Area"\r
4138   UNIQUE\r
4139   PRIMARY\r
4140   INDEX-FIELD "PropertyCode" ASCENDING \r
4141   INDEX-FIELD "TitleCode" ASCENDING \r
4142 \r
4143 ADD TABLE "RentReview"\r
4144   AREA "Schema Area"\r
4145   DUMP-NAME "rentrevi"\r
4146   TABLE-TRIGGER "WRITE" OVERRIDE PROCEDURE "wrrntrvw.p" CRC "?" \r
4147 \r
4148 ADD FIELD "TenancyLeaseCode" OF "RentReview" AS integer \r
4149   DESCRIPTION "The lease that this rent review applies to."\r
4150   FORMAT "99999"\r
4151   INITIAL "0"\r
4152   POSITION 2\r
4153   SQL-WIDTH 4\r
4154   ORDER 10\r
4155 \r
4156 ADD FIELD "DateDue" OF "RentReview" AS date \r
4157   DESCRIPTION "The date on which this rent review is due"\r
4158   FORMAT "99/99/9999"\r
4159   INITIAL ?\r
4160   POSITION 3\r
4161   SQL-WIDTH 4\r
4162   ORDER 20\r
4163 \r
4164 ADD FIELD "DateComplete" OF "RentReview" AS date \r
4165   DESCRIPTION "The date on which this rent review was completed"\r
4166   FORMAT "99/99/9999"\r
4167   INITIAL ?\r
4168   POSITION 4\r
4169   SQL-WIDTH 4\r
4170   ORDER 30\r
4171 \r
4172 ADD FIELD "EstimateBasis" OF "RentReview" AS character \r
4173   DESCRIPTION "A brief description of the basis of the market rental estimate."\r
4174   FORMAT "X(100)"\r
4175   INITIAL ""\r
4176   POSITION 5\r
4177   SQL-WIDTH 200\r
4178   ORDER 40\r
4179 \r
4180 ADD FIELD "MarketRental" OF "RentReview" AS decimal \r
4181   DESCRIPTION "The estimated rental for the lease at current market rates."\r
4182   FORMAT "->>,>>>,>>9.99"\r
4183   INITIAL "0"\r
4184   POSITION 6\r
4185   SQL-WIDTH 17\r
4186   DECIMALS 2\r
4187   ORDER 50\r
4188 \r
4189 ADD FIELD "MarketRentalDate" OF "RentReview" AS date \r
4190   DESCRIPTION "The date at which the market rental was last estimated."\r
4191   FORMAT "99/99/9999"\r
4192   INITIAL ?\r
4193   POSITION 7\r
4194   SQL-WIDTH 4\r
4195   ORDER 60\r
4196 \r
4197 ADD FIELD "NewRentAppliesFrom" OF "RentReview" AS date \r
4198   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
4199   FORMAT "99/99/9999"\r
4200   INITIAL ?\r
4201   POSITION 8\r
4202   SQL-WIDTH 4\r
4203   ORDER 70\r
4204 \r
4205 ADD FIELD "NewRentStart" OF "RentReview" AS date \r
4206   DESCRIPTION "The date on which the tenant will first be charged for the new rental"\r
4207   FORMAT "99/99/9999"\r
4208   INITIAL ?\r
4209   POSITION 9\r
4210   SQL-WIDTH 4\r
4211   ORDER 80\r
4212 \r
4213 ADD FIELD "ReviewStatus" OF "RentReview" AS character \r
4214   FORMAT "X(4)"\r
4215   INITIAL ""\r
4216   POSITION 10\r
4217   SQL-WIDTH 8\r
4218   ORDER 90\r
4219   MANDATORY\r
4220 \r
4221 ADD FIELD "ReviewType" OF "RentReview" AS character \r
4222   FORMAT "X(4)"\r
4223   INITIAL ""\r
4224   POSITION 11\r
4225   SQL-WIDTH 8\r
4226   ORDER 100\r
4227   MANDATORY\r
4228 \r
4229 ADD FIELD "OldRental" OF "RentReview" AS decimal \r
4230   FORMAT "->>,>>>,>>9.99"\r
4231   INITIAL "0"\r
4232   LABEL "Old Rental"\r
4233   POSITION 12\r
4234   SQL-WIDTH 17\r
4235   DECIMALS 2\r
4236   ORDER 110\r
4237 \r
4238 ADD FIELD "NewRental" OF "RentReview" AS decimal \r
4239   FORMAT "->>,>>>,>>9.99"\r
4240   INITIAL "0"\r
4241   LABEL "New Rental"\r
4242   POSITION 13\r
4243   SQL-WIDTH 17\r
4244   DECIMALS 2\r
4245   ORDER 120\r
4246 \r
4247 ADD FIELD "LastModifiedDate" OF "RentReview" AS date \r
4248   DESCRIPTION "The date when this record was last modified.  Maintained by a WRITE trigger."\r
4249   FORMAT "99/99/9999"\r
4250   INITIAL "1/1/0001"\r
4251   POSITION 14\r
4252   SQL-WIDTH 4\r
4253   ORDER 130\r
4254   MANDATORY\r
4255 \r
4256 ADD FIELD "LastModifiedTime" OF "RentReview" AS integer \r
4257   DESCRIPTION "The time that this record was last modified"\r
4258   FORMAT "->,>>>,>>9"\r
4259   INITIAL "0"\r
4260   POSITION 15\r
4261   SQL-WIDTH 4\r
4262   ORDER 140\r
4263 \r
4264 ADD FIELD "LastModifiedUser" OF "RentReview" AS character \r
4265   DESCRIPTION "The user who last modified this record.  Maintained by a WRITE trigger."\r
4266   FORMAT "X(8)"\r
4267   INITIAL ""\r
4268   POSITION 16\r
4269   SQL-WIDTH 16\r
4270   LENGTH 0\r
4271   ORDER 150\r
4272 \r
4273 ADD FIELD "AuditRecordId" OF "RentReview" AS integer \r
4274   FORMAT "->,>>>,>>9"\r
4275   INITIAL "0"\r
4276   POSITION 17\r
4277   SQL-WIDTH 4\r
4278   ORDER 160\r
4279 \r
4280 ADD FIELD "Earliest" OF "RentReview" AS date \r
4281   DESCRIPTION "Earliest date at which the rent review can be done"\r
4282   FORMAT "99/99/9999"\r
4283   INITIAL ?\r
4284   POSITION 18\r
4285   SQL-WIDTH 4\r
4286   ORDER 170\r
4287 \r
4288 ADD FIELD "Latest" OF "RentReview" AS date \r
4289   DESCRIPTION "Latest date at which the rent review can be done"\r
4290   FORMAT "99/99/9999"\r
4291   INITIAL ?\r
4292   POSITION 19\r
4293   SQL-WIDTH 4\r
4294   ORDER 180\r
4295 \r
4296 ADD INDEX "RentReviews" ON "RentReview" \r
4297   AREA "Schema Area"\r
4298   UNIQUE\r
4299   PRIMARY\r
4300   INDEX-FIELD "TenancyLeaseCode" ASCENDING \r
4301   INDEX-FIELD "DateDue" ASCENDING \r
4302 \r
4303 ADD INDEX "XAK1RentReviews" ON "RentReview" \r
4304   AREA "Schema Area"\r
4305   INDEX-FIELD "DateDue" ASCENDING \r
4306 \r
4307 ADD TABLE "ReviewStatus"\r
4308   AREA "Schema Area"\r
4309   DUMP-NAME "reviewst"\r
4310 \r
4311 ADD FIELD "ReviewStatus" OF "ReviewStatus" AS character \r
4312   FORMAT "X(4)"\r
4313   INITIAL ""\r
4314   POSITION 2\r
4315   SQL-WIDTH 8\r
4316   ORDER 10\r
4317   MANDATORY\r
4318 \r
4319 ADD FIELD "Description" OF "ReviewStatus" AS character \r
4320   FORMAT "X(50)"\r
4321   INITIAL ""\r
4322   POSITION 3\r
4323   SQL-WIDTH 100\r
4324   ORDER 20\r
4325 \r
4326 ADD INDEX "XPKReviewStatus" ON "ReviewStatus" \r
4327   AREA "Schema Area"\r
4328   UNIQUE\r
4329   PRIMARY\r
4330   INDEX-FIELD "ReviewStatus" ASCENDING \r
4331 \r
4332 ADD TABLE "ReviewType"\r
4333   AREA "Schema Area"\r
4334   DUMP-NAME "reviewty"\r
4335 \r
4336 ADD FIELD "ReviewType" OF "ReviewType" AS character \r
4337   FORMAT "X(4)"\r
4338   INITIAL ""\r
4339   POSITION 2\r
4340   SQL-WIDTH 8\r
4341   ORDER 10\r
4342   MANDATORY\r
4343 \r
4344 ADD FIELD "Description" OF "ReviewType" AS character \r
4345   FORMAT "X(50)"\r
4346   INITIAL ""\r
4347   POSITION 3\r
4348   SQL-WIDTH 100\r
4349   ORDER 20\r
4350 \r
4351 ADD INDEX "XPKReviewTypes" ON "ReviewType" \r
4352   AREA "Schema Area"\r
4353   UNIQUE\r
4354   PRIMARY\r
4355   INDEX-FIELD "ReviewType" ASCENDING \r
4356 \r
4357 ADD TABLE "Scenario"\r
4358   AREA "Schema Area"\r
4359   DUMP-NAME "scenario"\r
4360 \r
4361 ADD FIELD "ScenarioCode" OF "Scenario" AS integer \r
4362   DESCRIPTION "A code to identify the scenario."\r
4363   FORMAT ">>>>>9"\r
4364   INITIAL "0"\r
4365   POSITION 2\r
4366   SQL-WIDTH 4\r
4367   ORDER 10\r
4368 \r
4369 ADD FIELD "Description" OF "Scenario" AS character \r
4370   FORMAT "X(50)"\r
4371   INITIAL ""\r
4372   POSITION 3\r
4373   SQL-WIDTH 100\r
4374   ORDER 60\r
4375 \r
4376 ADD FIELD "Name" OF "Scenario" AS character \r
4377   DESCRIPTION "A brief name to identify the scenario"\r
4378   FORMAT "X(50)"\r
4379   INITIAL ""\r
4380   POSITION 4\r
4381   SQL-WIDTH 100\r
4382   ORDER 30\r
4383 \r
4384 ADD FIELD "PersonCode" OF "Scenario" AS integer \r
4385   DESCRIPTION "A code used to refer to the person who created the scenario."\r
4386   FORMAT "99999"\r
4387   INITIAL "0"\r
4388   LABEL "Person code"\r
4389   POSITION 5\r
4390   SQL-WIDTH 4\r
4391   COLUMN-LABEL "Person"\r
4392   ORDER 70\r
4393   MANDATORY\r
4394 \r
4395 ADD FIELD "ScenarioStatus" OF "Scenario" AS character \r
4396   FORMAT "X(4)"\r
4397   INITIAL ""\r
4398   POSITION 6\r
4399   SQL-WIDTH 8\r
4400   ORDER 50\r
4401   MANDATORY\r
4402 \r
4403 ADD FIELD "ModificationRights" OF "Scenario" AS character \r
4404   FORMAT "X(20)"\r
4405   INITIAL ""\r
4406   POSITION 7\r
4407   SQL-WIDTH 40\r
4408   ORDER 80\r
4409 \r
4410 ADD INDEX "Scenarios" ON "Scenario" \r
4411   AREA "Schema Area"\r
4412   UNIQUE\r
4413   PRIMARY\r
4414   INDEX-FIELD "ScenarioCode" ASCENDING \r
4415 \r
4416 ADD TABLE "ScenarioStatus"\r
4417   AREA "Schema Area"\r
4418   DUMP-NAME "scenari1"\r
4419 \r
4420 ADD FIELD "ScenarioStatus" OF "ScenarioStatus" AS character \r
4421   FORMAT "X(4)"\r
4422   INITIAL ""\r
4423   POSITION 2\r
4424   SQL-WIDTH 8\r
4425   ORDER 10\r
4426   MANDATORY\r
4427 \r
4428 ADD FIELD "Description" OF "ScenarioStatus" AS character \r
4429   FORMAT "X(50)"\r
4430   INITIAL ""\r
4431   POSITION 3\r
4432   SQL-WIDTH 100\r
4433   ORDER 20\r
4434 \r
4435 ADD INDEX "XPKScenarioStatus" ON "ScenarioStatus" \r
4436   AREA "Schema Area"\r
4437   UNIQUE\r
4438   PRIMARY\r
4439   INDEX-FIELD "ScenarioStatus" ASCENDING \r
4440 \r
4441 ADD TABLE "ServiceType"\r
4442   AREA "Schema Area"\r
4443   DUMP-NAME "servicet"\r
4444 \r
4445 ADD FIELD "ServiceType" OF "ServiceType" AS character \r
4446   FORMAT "X(4)"\r
4447   INITIAL ""\r
4448   POSITION 2\r
4449   SQL-WIDTH 8\r
4450   ORDER 10\r
4451   MANDATORY\r
4452 \r
4453 ADD FIELD "Description" OF "ServiceType" AS character \r
4454   FORMAT "X(50)"\r
4455   INITIAL ""\r
4456   POSITION 3\r
4457   SQL-WIDTH 100\r
4458   ORDER 20\r
4459 \r
4460 ADD FIELD "AccountCode" OF "ServiceType" AS decimal \r
4461   DESCRIPTION "The aacount that this service type applies to."\r
4462   FORMAT "9999.99"\r
4463   INITIAL ?\r
4464   LABEL "Account"\r
4465   POSITION 4\r
4466   SQL-WIDTH 17\r
4467   DECIMALS 2\r
4468   ORDER 30\r
4469 \r
4470 ADD FIELD "NRAccountCode" OF "ServiceType" AS decimal \r
4471   DESCRIPTION "The code of the account when the service contract is specified as non-recoverable"\r
4472   FORMAT "9999.99"\r
4473   INITIAL ?\r
4474   LABEL "Account"\r
4475   POSITION 5\r
4476   SQL-WIDTH 17\r
4477   DECIMALS 2\r
4478   ORDER 40\r
4479 \r
4480 ADD INDEX "XPKServiceTypes" ON "ServiceType" \r
4481   AREA "Schema Area"\r
4482   UNIQUE\r
4483   PRIMARY\r
4484   INDEX-FIELD "ServiceType" ASCENDING \r
4485 \r
4486 ADD TABLE "StreetFrontage"\r
4487   AREA "Schema Area"\r
4488   DUMP-NAME "streetfr"\r
4489 \r
4490 ADD FIELD "PropertyCode" OF "StreetFrontage" AS integer \r
4491   DESCRIPTION "The property which this street frontage applies to"\r
4492   FORMAT "99999"\r
4493   INITIAL "0"\r
4494   POSITION 2\r
4495   SQL-WIDTH 4\r
4496   ORDER 10\r
4497 \r
4498 ADD FIELD "FrontageCode" OF "StreetFrontage" AS integer \r
4499   DESCRIPTION "A sequence number for this street frontage."\r
4500   FORMAT ">>>>>9"\r
4501   INITIAL "0"\r
4502   POSITION 3\r
4503   SQL-WIDTH 4\r
4504   ORDER 20\r
4505 \r
4506 ADD FIELD "Description" OF "StreetFrontage" AS character \r
4507   FORMAT "X(50)"\r
4508   INITIAL ""\r
4509   POSITION 4\r
4510   SQL-WIDTH 100\r
4511   LENGTH 0\r
4512   ORDER 30\r
4513 \r
4514 ADD FIELD "Length" OF "StreetFrontage" AS decimal \r
4515   DESCRIPTION "The length of the street frontage, in metres."\r
4516   FORMAT "->>,>>9.99"\r
4517   INITIAL "0"\r
4518   POSITION 5\r
4519   SQL-WIDTH 17\r
4520   DECIMALS 2\r
4521   ORDER 40\r
4522 \r
4523 ADD FIELD "RentalSpaceCode" OF "StreetFrontage" AS integer \r
4524   DESCRIPTION "A rental space that this street frontage applies to, or blank if it applies to a title."\r
4525   FORMAT ">>>>>9"\r
4526   INITIAL "0"\r
4527   POSITION 6\r
4528   SQL-WIDTH 4\r
4529   ORDER 50\r
4530 \r
4531 ADD FIELD "TitleCode" OF "StreetFrontage" AS integer \r
4532   DESCRIPTION "A title that this street frontage applies to, or blank if it applies to a rental space."\r
4533   FORMAT ">>>>>9"\r
4534   INITIAL "0"\r
4535   POSITION 7\r
4536   SQL-WIDTH 4\r
4537   ORDER 60\r
4538 \r
4539 ADD INDEX "StreetFrontages" ON "StreetFrontage" \r
4540   AREA "Schema Area"\r
4541   UNIQUE\r
4542   PRIMARY\r
4543   INDEX-FIELD "PropertyCode" ASCENDING \r
4544   INDEX-FIELD "FrontageCode" ASCENDING \r
4545 \r
4546 ADD TABLE "TenancyLease"\r
4547   AREA "Schema Area"\r
4548   DUMP-NAME "tenancyl"\r
4549   TABLE-TRIGGER "CREATE" OVERRIDE PROCEDURE "CRTLSCDE.P" CRC "?" \r
4550   TABLE-TRIGGER "DELETE" OVERRIDE PROCEDURE "detntlse.p" CRC "?" \r
4551   TABLE-TRIGGER "WRITE" OVERRIDE PROCEDURE "wrtntlse.p" CRC "?" \r
4552 \r
4553 ADD FIELD "TenancyLeaseCode" OF "TenancyLease" AS integer \r
4554   DESCRIPTION "A code used to refer to this tenancy lease"\r
4555   FORMAT "99999"\r
4556   INITIAL "0"\r
4557   LABEL "Code"\r
4558   POSITION 2\r
4559   SQL-WIDTH 4\r
4560   ORDER 10\r
4561 \r
4562 ADD FIELD "AssignedLeaseCode" OF "TenancyLease" AS integer \r
4563   DESCRIPTION "The prior lease in the chain of assigned leases."\r
4564   FORMAT "99999"\r
4565   INITIAL "0"\r
4566   LABEL "Assigned to"\r
4567   POSITION 3\r
4568   SQL-WIDTH 4\r
4569   ORDER 20\r
4570 \r
4571 ADD FIELD "AssignmentDate" OF "TenancyLease" AS date \r
4572   DESCRIPTION "The date on which this lease was assigned from the prior one."\r
4573   FORMAT "99/99/9999"\r
4574   INITIAL ?\r
4575   LABEL "Assign date"\r
4576   POSITION 4\r
4577   SQL-WIDTH 4\r
4578   ORDER 30\r
4579 \r
4580 ADD FIELD "LeaseEndDate" OF "TenancyLease" AS date \r
4581   DESCRIPTION "The date on which the lease ends."\r
4582   FORMAT "99/99/9999"\r
4583   INITIAL ?\r
4584   LABEL "Lease end"\r
4585   POSITION 5\r
4586   SQL-WIDTH 4\r
4587   ORDER 40\r
4588 \r
4589 ADD FIELD "LeaseStartDate" OF "TenancyLease" AS date \r
4590   DESCRIPTION "The date that the lease commenced (which could be in the future)."\r
4591   FORMAT "99/99/9999"\r
4592   INITIAL ?\r
4593   LABEL "Lease start"\r
4594   POSITION 6\r
4595   SQL-WIDTH 4\r
4596   ORDER 50\r
4597 \r
4598 ADD FIELD "LeaseStatus" OF "TenancyLease" AS character \r
4599   FORMAT "X(4)"\r
4600   INITIAL ""\r
4601   LABEL "Status"\r
4602   POSITION 7\r
4603   SQL-WIDTH 8\r
4604   LENGTH 0\r
4605   ORDER 60\r
4606   MANDATORY\r
4607 \r
4608 ADD FIELD "LeaseType" OF "TenancyLease" AS character \r
4609   DESCRIPTION "A code classifying the type of lease."\r
4610   FORMAT "X(4)"\r
4611   INITIAL ""\r
4612   LABEL "Type"\r
4613   POSITION 8\r
4614   SQL-WIDTH 8\r
4615   LENGTH 0\r
4616   ORDER 70\r
4617   MANDATORY\r
4618 \r
4619 ADD FIELD "NoteCode" OF "TenancyLease" AS integer \r
4620   DESCRIPTION "Any notes relating to this lease"\r
4621   FORMAT ">>>>>9"\r
4622   INITIAL "0"\r
4623   LABEL "Notes key"\r
4624   POSITION 9\r
4625   SQL-WIDTH 4\r
4626   ORDER 80\r
4627 \r
4628 ADD FIELD "RatchetClause" OF "TenancyLease" AS character \r
4629   DESCRIPTION "The type of ratchet clause included in the lease, e.g. None, Full, Partial etc."\r
4630   FORMAT "X(4)"\r
4631   INITIAL ?\r
4632   LABEL "Ratchet"\r
4633   POSITION 10\r
4634   SQL-WIDTH 8\r
4635   HELP "Ratchet clause type: None, full, part etc."\r
4636   LENGTH 0\r
4637   ORDER 90\r
4638 \r
4639 ADD FIELD "RentStartDate" OF "TenancyLease" AS date \r
4640   FORMAT "99/99/9999"\r
4641   INITIAL ?\r
4642   LABEL "Rent start"\r
4643   POSITION 11\r
4644   SQL-WIDTH 4\r
4645   HELP "The date on which the tenant starts being liable for rent"\r
4646   ORDER 100\r
4647 \r
4648 ADD FIELD "ReviewNoticePeriod" OF "TenancyLease" AS integer \r
4649   FORMAT ">>>>>9"\r
4650   INITIAL "3"\r
4651   LABEL "Review notice"\r
4652   POSITION 12\r
4653   SQL-WIDTH 4\r
4654   COLUMN-LABEL "RR notice"\r
4655   HELP "The number of months of notice required for a rent review."\r
4656   ORDER 110\r
4657 \r
4658 ADD FIELD "RightsOfRenewal" OF "TenancyLease" AS character \r
4659   FORMAT "X(10)"\r
4660   INITIAL "none"\r
4661   LABEL "Rights of Renewal"\r
4662   POSITION 13\r
4663   SQL-WIDTH 20\r
4664   COLUMN-LABEL "RoR"\r
4665   HELP "The rights of renewal written into the lease."\r
4666   LENGTH 0\r
4667   ORDER 120\r
4668 \r
4669 ADD FIELD "RORNoticePeriod" OF "TenancyLease" AS integer \r
4670   DESCRIPTION "The number of months of notice required for exercise of the rights of renewal."\r
4671   FORMAT ">>>>>9"\r
4672   INITIAL "3"\r
4673   LABEL "RoR notice"\r
4674   POSITION 14\r
4675   SQL-WIDTH 4\r
4676   HELP "Months notice required for exercise of renewal rights"\r
4677   ORDER 130\r
4678 \r
4679 ADD FIELD "TenantCode" OF "TenancyLease" AS integer \r
4680   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
4681   FORMAT ">>>>>9"\r
4682   INITIAL "0"\r
4683   LABEL "Tenant"\r
4684   POSITION 15\r
4685   SQL-WIDTH 4\r
4686   HELP "The tenant code for accounting for this lease."\r
4687   ORDER 140\r
4688 \r
4689 ADD FIELD "DocumentLocation" OF "TenancyLease" AS integer \r
4690   DESCRIPTION "The current location of the lease\r
4691 Foreign key on the 'Note' table."\r
4692   FORMAT ">>>>>9"\r
4693   INITIAL ?\r
4694   LABEL "Document Location Notes"\r
4695   POSITION 16\r
4696   SQL-WIDTH 4\r
4697   COLUMN-LABEL "NotesKey"\r
4698   HELP "A 'note' indicating the current location of the lease docs."\r
4699   ORDER 150\r
4700 \r
4701 ADD FIELD "PropertyCode" OF "TenancyLease" AS integer \r
4702   DESCRIPTION "The property that the rental spaces in this lease are a part of."\r
4703   FORMAT "99999"\r
4704   INITIAL "0"\r
4705   LABEL "Property"\r
4706   POSITION 17\r
4707   SQL-WIDTH 4\r
4708   ORDER 180\r
4709 \r
4710 ADD FIELD "TermYears" OF "TenancyLease" AS integer \r
4711   FORMAT ">>9"\r
4712   INITIAL "0"\r
4713   LABEL "Years"\r
4714   POSITION 18\r
4715   SQL-WIDTH 4\r
4716   ORDER 190\r
4717 \r
4718 ADD FIELD "TermMonths" OF "TenancyLease" AS integer \r
4719   FORMAT ">9"\r
4720   INITIAL "0"\r
4721   POSITION 19\r
4722   SQL-WIDTH 4\r
4723   VALEXP "TermMonths >= 0 AND TermMonths < 12"\r
4724   VALMSG "Must be between 0 and 11"\r
4725   ORDER 200\r
4726 \r
4727 ADD FIELD "TermDays" OF "TenancyLease" AS integer \r
4728   FORMAT ">>9"\r
4729   INITIAL "0"\r
4730   POSITION 20\r
4731   SQL-WIDTH 4\r
4732   VALEXP "TermDays >= 0 AND TermDays < 32"\r
4733   VALMSG "Must be between 0 and 31"\r
4734   ORDER 210\r
4735 \r
4736 ADD FIELD "ElectricityUnitRate" OF "TenancyLease" AS decimal \r
4737   FORMAT ">9.99"\r
4738   INITIAL "0.15"\r
4739   LABEL "Electricity Rate"\r
4740   POSITION 21\r
4741   SQL-WIDTH 19\r
4742   DECIMALS 4\r
4743   ORDER 250\r
4744 \r
4745 ADD FIELD "OutgoingsBudget" OF "TenancyLease" AS decimal \r
4746   DESCRIPTION "Basis for charging outgoings to a tenant."\r
4747   FORMAT ">,>>>,>>9.99"\r
4748   INITIAL "0"\r
4749   POSITION 22\r
4750   SQL-WIDTH 17\r
4751   DECIMALS 2\r
4752   ORDER 260\r
4753 \r
4754 ADD FIELD "TaxApplies" OF "TenancyLease" AS logical \r
4755   FORMAT "yes/no"\r
4756   INITIAL "Yes"\r
4757   LABEL "Tax applies"\r
4758   POSITION 23\r
4759   SQL-WIDTH 1\r
4760   COLUMN-LABEL "Taxable"\r
4761   ORDER 270\r
4762 \r
4763 ADD FIELD "LastModifiedDate" OF "TenancyLease" AS date \r
4764   DESCRIPTION "The date when this record was last modified.  Maintained by a WRITE trigger."\r
4765   FORMAT "99/99/9999"\r
4766   INITIAL "1/1/0001"\r
4767   POSITION 24\r
4768   SQL-WIDTH 4\r
4769   ORDER 280\r
4770   MANDATORY\r
4771 \r
4772 ADD FIELD "LastModifiedTime" OF "TenancyLease" AS integer \r
4773   DESCRIPTION "The time that this record was last modified"\r
4774   FORMAT "->,>>>,>>9"\r
4775   INITIAL "0"\r
4776   POSITION 25\r
4777   SQL-WIDTH 4\r
4778   ORDER 290\r
4779 \r
4780 ADD FIELD "LastModifiedUser" OF "TenancyLease" AS character \r
4781   DESCRIPTION "The user who last modified this record.  Maintained by a WRITE trigger."\r
4782   FORMAT "X(8)"\r
4783   INITIAL ""\r
4784   POSITION 26\r
4785   SQL-WIDTH 16\r
4786   LENGTH 0\r
4787   ORDER 300\r
4788 \r
4789 ADD FIELD "AuditRecordId" OF "TenancyLease" AS integer \r
4790   FORMAT "->,>>>,>>9"\r
4791   INITIAL "0"\r
4792   POSITION 27\r
4793   SQL-WIDTH 4\r
4794   ORDER 310\r
4795 \r
4796 ADD FIELD "RentEndDate" OF "TenancyLease" AS date \r
4797   FORMAT "99/99/9999"\r
4798   INITIAL ?\r
4799   LABEL "Rent end"\r
4800   POSITION 28\r
4801   SQL-WIDTH 4\r
4802   HELP "The date on which the tenant stops being liable for rent"\r
4803   ORDER 105\r
4804 \r
4805 ADD FIELD "IncentiveNotes" OF "TenancyLease" AS character \r
4806   DESCRIPTION "Just some notes that get written in when the lease is settled (i.e when a new lease is setup)."\r
4807   FORMAT "X(256)"\r
4808   INITIAL ""\r
4809   POSITION 29\r
4810   SQL-WIDTH 512\r
4811   LENGTH 0\r
4812   ORDER 320\r
4813 \r
4814 ADD FIELD "PrimarySpace" OF "TenancyLease" AS integer \r
4815   DESCRIPTION "A sequence number which identifies the primary rental space within the property."\r
4816   FORMAT ">>>>9"\r
4817   INITIAL ?\r
4818   LABEL "Primary Space"\r
4819   POSITION 30\r
4820   SQL-WIDTH 4\r
4821   COLUMN-LABEL "Primary"\r
4822   ORDER 330\r
4823 \r
4824 ADD FIELD "OutgoingsRate" OF "TenancyLease" AS decimal \r
4825   FORMAT "->>9.99"\r
4826   INITIAL "0"\r
4827   LABEL "O/G Rate"\r
4828   POSITION 31\r
4829   SQL-WIDTH 17\r
4830   DECIMALS 2\r
4831   ORDER 340\r
4832 \r
4833 ADD FIELD "GrossLease" OF "TenancyLease" AS logical \r
4834   FORMAT "G/N"\r
4835   INITIAL "No"\r
4836   LABEL "Gross Lease"\r
4837   POSITION 32\r
4838   SQL-WIDTH 1\r
4839   COLUMN-LABEL "G/N"\r
4840   ORDER 350\r
4841 \r
4842 ADD FIELD "AreaDescription" OF "TenancyLease" AS character \r
4843   FORMAT "X(50)"\r
4844   INITIAL ""\r
4845   LABEL "Areas Rented"\r
4846   POSITION 33\r
4847   SQL-WIDTH 100\r
4848   ORDER 360\r
4849 \r
4850 ADD FIELD "FirstLeaseStart" OF "TenancyLease" AS date \r
4851   FORMAT "99/99/9999"\r
4852   INITIAL ?\r
4853   LABEL "First lease start"\r
4854   POSITION 34\r
4855   SQL-WIDTH 4\r
4856   COLUMN-LABEL "First Start"\r
4857   HELP "The date the first lease on this space by this tenant commenced"\r
4858   ORDER 370\r
4859 \r
4860 ADD FIELD "PaymentFrequency" OF "TenancyLease" AS character \r
4861   DESCRIPTION "The code used to refer to this kind of regularity"\r
4862   FORMAT "X(4)"\r
4863   INITIAL ""\r
4864   POSITION 35\r
4865   SQL-WIDTH 8\r
4866   ORDER 380\r
4867 \r
4868 ADD FIELD "RecoveryType" OF "TenancyLease" AS character \r
4869   FORMAT "X"\r
4870   INITIAL ""\r
4871   POSITION 36\r
4872   SQL-WIDTH 2\r
4873   HELP "The method of Outgoings Recovery: F=Fixed, B=Budget, N=None"\r
4874   ORDER 390\r
4875 \r
4876 ADD FIELD "HasRatchet" OF "TenancyLease" AS logical \r
4877   DESCRIPTION "Is the rental ratcheted"\r
4878   FORMAT "Yes/No"\r
4879   INITIAL "Yes"\r
4880   LABEL "Ratchet"\r
4881   POSITION 37\r
4882   SQL-WIDTH 1\r
4883   ORDER 400\r
4884 \r
4885 ADD INDEX "TenancyLeases" ON "TenancyLease" \r
4886   AREA "Schema Area"\r
4887   UNIQUE\r
4888   PRIMARY\r
4889   INDEX-FIELD "TenancyLeaseCode" ASCENDING \r
4890 \r
4891 ADD INDEX "XAK1TenancyLeases" ON "TenancyLease" \r
4892   AREA "Schema Area"\r
4893   INDEX-FIELD "TenantCode" ASCENDING \r
4894 \r
4895 ADD INDEX "XAK2TenancyLeases" ON "TenancyLease" \r
4896   AREA "Schema Area"\r
4897   INDEX-FIELD "PropertyCode" ASCENDING \r
4898 \r
4899 ADD TABLE "TenancyOutgoing"\r
4900   AREA "Schema Area"\r
4901   DUMP-NAME "tenancyo"\r
4902 \r
4903 ADD FIELD "TenancyLeaseCode" OF "TenancyOutgoing" AS integer \r
4904   DESCRIPTION "The lease that this outgoings charge relates to."\r
4905   FORMAT "99999"\r
4906   INITIAL "0"\r
4907   POSITION 2\r
4908   SQL-WIDTH 4\r
4909   ORDER 10\r
4910 \r
4911 ADD FIELD "AccountCode" OF "TenancyOutgoing" AS decimal \r
4912   DESCRIPTION "The account, from the chart of accounts, that this outgoings charge accrues to."\r
4913   FORMAT "9999.99"\r
4914   INITIAL "0"\r
4915   POSITION 3\r
4916   SQL-WIDTH 17\r
4917   DECIMALS 2\r
4918   ORDER 20\r
4919 \r
4920 ADD FIELD "AccumulatedAmount" OF "TenancyOutgoing" AS decimal \r
4921   DESCRIPTION "The amount of actual charges accumulated in respect of this tenant since the last reconciliation of the account."\r
4922   FORMAT "->,>>>,>>9.99"\r
4923   INITIAL "0"\r
4924   POSITION 4\r
4925   SQL-WIDTH 17\r
4926   DECIMALS 2\r
4927   ORDER 30\r
4928 \r
4929 ADD FIELD "BaseYear" OF "TenancyOutgoing" AS date \r
4930   DESCRIPTION "The base year end, if applicable."\r
4931   FORMAT "99/99/9999"\r
4932   INITIAL ?\r
4933   POSITION 5\r
4934   SQL-WIDTH 4\r
4935   ORDER 40\r
4936 \r
4937 ADD FIELD "BaseYearAmount" OF "TenancyOutgoing" AS decimal \r
4938   DESCRIPTION "The amount of the outgoings charge applying in the base year, if applicable."\r
4939   FORMAT "->,>>>,>>9.99"\r
4940   INITIAL "0"\r
4941   POSITION 6\r
4942   SQL-WIDTH 17\r
4943   DECIMALS 2\r
4944   ORDER 50\r
4945 \r
4946 ADD FIELD "FixedAmount" OF "TenancyOutgoing" AS decimal \r
4947   DESCRIPTION "If applicable, an annual total of the tenants fixed charges for this account."\r
4948   FORMAT "->,>>>,>>9.99"\r
4949   INITIAL "0"\r
4950   POSITION 7\r
4951   SQL-WIDTH 17\r
4952   DECIMALS 2\r
4953   ORDER 60\r
4954 \r
4955 ADD FIELD "LastReconciliation" OF "TenancyOutgoing" AS integer \r
4956   DESCRIPTION "The month up to which the last reconciliation of outgoings applied for this account."\r
4957   FORMAT ">>>>>9"\r
4958   INITIAL "0"\r
4959   POSITION 8\r
4960   SQL-WIDTH 4\r
4961   ORDER 70\r
4962 \r
4963 ADD FIELD "OutgoingBasis" OF "TenancyOutgoing" AS character \r
4964   FORMAT "X(18)"\r
4965   INITIAL ""\r
4966   POSITION 9\r
4967   SQL-WIDTH 36\r
4968   ORDER 80\r
4969   MANDATORY\r
4970 \r
4971 ADD FIELD "Percentage" OF "TenancyOutgoing" AS decimal \r
4972   DESCRIPTION "The fraction of the total property outgoings for this account which should accumulate against this tenant."\r
4973   FORMAT "->>,>>9.99"\r
4974   INITIAL "0"\r
4975   POSITION 10\r
4976   SQL-WIDTH 17\r
4977   DECIMALS 2\r
4978   ORDER 90\r
4979 \r
4980 ADD FIELD "ReconciliationDue" OF "TenancyOutgoing" AS date \r
4981   DESCRIPTION "The date on which the next reconciliation of outgoings is due for this tenancy lease account."\r
4982   FORMAT "99/99/9999"\r
4983   INITIAL ?\r
4984   POSITION 11\r
4985   SQL-WIDTH 4\r
4986   ORDER 100\r
4987 \r
4988 ADD INDEX "TenancyOutgoings" ON "TenancyOutgoing" \r
4989   AREA "Schema Area"\r
4990   UNIQUE\r
4991   PRIMARY\r
4992   INDEX-FIELD "TenancyLeaseCode" ASCENDING \r
4993   INDEX-FIELD "AccountCode" ASCENDING \r
4994 \r
4995 ADD TABLE "Tenant"\r
4996   AREA "Schema Area"\r
4997   VALEXP "NOT CAN-FIND( FIRST AcctTran WHERE\r
4998   AcctTran.EntityType = 'T' AND \r
4999   AcctTran.EntityCode = Tenant.TenantCode )"\r
5000   VALMSG "You cannot delete a tenant who has transactions !"\r
5001   DUMP-NAME "tenant"\r
5002   TABLE-TRIGGER "CREATE" OVERRIDE PROCEDURE "crtenant.p" CRC "?" \r
5003   TABLE-TRIGGER "DELETE" OVERRIDE PROCEDURE "detenant.p" CRC "?" \r
5004   TABLE-TRIGGER "WRITE" OVERRIDE PROCEDURE "wrtenant.p" CRC "?" \r
5005 \r
5006 ADD FIELD "TenantCode" OF "Tenant" AS integer \r
5007   DESCRIPTION "A code used to refer to this tenant."\r
5008   FORMAT "99999"\r
5009   INITIAL "0"\r
5010   POSITION 2\r
5011   SQL-WIDTH 4\r
5012   ORDER 10\r
5013 \r
5014 ADD FIELD "BillingContact" OF "Tenant" AS integer \r
5015   DESCRIPTION "A person to whom the bills should be addressed."\r
5016   FORMAT ">>>>>9"\r
5017   INITIAL "0"\r
5018   POSITION 3\r
5019   SQL-WIDTH 4\r
5020   ORDER 20\r
5021 \r
5022 ADD FIELD "Name" OF "Tenant" AS character \r
5023   DESCRIPTION "The name used to refer to this tenant."\r
5024   FORMAT "X(50)"\r
5025   INITIAL ""\r
5026   POSITION 4\r
5027   SQL-WIDTH 100\r
5028   ORDER 30\r
5029   MANDATORY\r
5030 \r
5031 ADD FIELD "PropertyContact" OF "Tenant" AS integer \r
5032   DESCRIPTION "Contact personfor Property matters"\r
5033   FORMAT ">>>>>9"\r
5034   INITIAL "0"\r
5035   POSITION 5\r
5036   SQL-WIDTH 4\r
5037   ORDER 40\r
5038 \r
5039 ADD FIELD "Active" OF "Tenant" AS logical \r
5040   DESCRIPTION "Flag to indicate whether the tenant is active or inactive"\r
5041   FORMAT "yes/no"\r
5042   INITIAL "no"\r
5043   POSITION 6\r
5044   SQL-WIDTH 1\r
5045   ORDER 50\r
5046 \r
5047 ADD FIELD "EntityCode" OF "Tenant" AS integer \r
5048   DESCRIPTION "The code used to refer to a company or property."\r
5049   FORMAT "99999"\r
5050   INITIAL "0"\r
5051   LABEL "Co/Prop"\r
5052   POSITION 7\r
5053   SQL-WIDTH 4\r
5054   ORDER 80\r
5055   MANDATORY\r
5056 \r
5057 ADD FIELD "NoteCode" OF "Tenant" AS integer \r
5058   DESCRIPTION "A unique code identifying this note."\r
5059   FORMAT ">>>>>9"\r
5060   INITIAL ?\r
5061   POSITION 8\r
5062   SQL-WIDTH 4\r
5063   ORDER 90\r
5064 \r
5065 ADD FIELD "AH1Contact" OF "Tenant" AS integer \r
5066   FORMAT "->,>>>,>>9"\r
5067   INITIAL "0"\r
5068   LABEL "After Hours #1"\r
5069   POSITION 9\r
5070   SQL-WIDTH 4\r
5071   ORDER 280\r
5072 \r
5073 ADD FIELD "EntityType" OF "Tenant" AS character \r
5074   DESCRIPTION "The type of the related entity specified in EntityCode"\r
5075   FORMAT "X"\r
5076   INITIAL "L"\r
5077   POSITION 10\r
5078   SQL-WIDTH 2\r
5079   VALEXP "EntityType = ""P"" OR EntityType = ""L"""\r
5080   VALMSG "May only equal ""L"" or ""P"""\r
5081   LENGTH 0\r
5082   ORDER 79\r
5083 \r
5084 ADD FIELD "LegalName" OF "Tenant" AS character \r
5085   FORMAT "X(100)"\r
5086   INITIAL ""\r
5087   LABEL "Legal name"\r
5088   POSITION 11\r
5089   SQL-WIDTH 200\r
5090   LENGTH 0\r
5091   ORDER 130\r
5092 \r
5093 ADD FIELD "PaymentStyle" OF "Tenant" AS character \r
5094   FORMAT "X(4)"\r
5095   INITIAL ""\r
5096   LABEL "Pay By"\r
5097   POSITION 12\r
5098   SQL-WIDTH 8\r
5099   LENGTH 0\r
5100   ORDER 140\r
5101 \r
5102 ADD FIELD "LastModifiedDate" OF "Tenant" AS date \r
5103   DESCRIPTION "The date when this record was last modified.  Maintained by a WRITE trigger."\r
5104   FORMAT "99/99/9999"\r
5105   INITIAL "1/1/0001"\r
5106   POSITION 13\r
5107   SQL-WIDTH 4\r
5108   ORDER 150\r
5109   MANDATORY\r
5110 \r
5111 ADD FIELD "LastModifiedTime" OF "Tenant" AS integer \r
5112   DESCRIPTION "The time that this record was last modified"\r
5113   FORMAT "->,>>>,>>9"\r
5114   INITIAL "0"\r
5115   POSITION 14\r
5116   SQL-WIDTH 4\r
5117   ORDER 160\r
5118 \r
5119 ADD FIELD "LastModifiedUser" OF "Tenant" AS character \r
5120   DESCRIPTION "The user who last modified this record.  Maintained by a WRITE trigger."\r
5121   FORMAT "X(8)"\r
5122   INITIAL ""\r
5123   POSITION 15\r
5124   SQL-WIDTH 16\r
5125   LENGTH 0\r
5126   ORDER 170\r
5127 \r
5128 ADD FIELD "AuditRecordId" OF "Tenant" AS integer \r
5129   FORMAT "->,>>>,>>9"\r
5130   INITIAL "0"\r
5131   POSITION 16\r
5132   SQL-WIDTH 4\r
5133   ORDER 180\r
5134 \r
5135 ADD FIELD "AH2Contact" OF "Tenant" AS integer \r
5136   FORMAT "->,>>>,>>9"\r
5137   INITIAL "0"\r
5138   LABEL "After Hours #2"\r
5139   POSITION 17\r
5140   SQL-WIDTH 4\r
5141   ORDER 290\r
5142 \r
5143 ADD FIELD "BusinessType" OF "Tenant" AS character \r
5144   FORMAT "X(30)"\r
5145   INITIAL ""\r
5146   LABEL "Business type"\r
5147   POSITION 18\r
5148   SQL-WIDTH 60\r
5149   ORDER 340\r
5150 \r
5151 ADD FIELD "DebtClassification" OF "Tenant" AS character \r
5152   FORMAT "X(4)"\r
5153   INITIAL ""\r
5154   LABEL "Debt Class"\r
5155   POSITION 19\r
5156   SQL-WIDTH 8\r
5157   COLUMN-LABEL ""\r
5158   ORDER 350\r
5159 \r
5160 ADD FIELD "VarianceClassification" OF "Tenant" AS character \r
5161   FORMAT "X(4)"\r
5162   INITIAL ""\r
5163   LABEL "Variance Class"\r
5164   POSITION 20\r
5165   SQL-WIDTH 8\r
5166   ORDER 360\r
5167 \r
5168 ADD FIELD "Quality" OF "Tenant" AS integer \r
5169   DESCRIPTION "A number indicating the quality of the tenant"\r
5170   FORMAT "->>9"\r
5171   INITIAL "0"\r
5172   POSITION 21\r
5173   SQL-WIDTH 4\r
5174   ORDER 370\r
5175 \r
5176 ADD FIELD "LastRentTotal" OF "Tenant" AS decimal \r
5177   DESCRIPTION "The total amount of rent charged last rent run"\r
5178   FORMAT "->>,>>>,>>9.99"\r
5179   INITIAL "0"\r
5180   POSITION 22\r
5181   SQL-WIDTH 17\r
5182   DECIMALS 2\r
5183   ORDER 380\r
5184 \r
5185 ADD FIELD "CFBalance" OF "Tenant" AS decimal \r
5186   DESCRIPTION "The balance carried forward on the last invoice/statement"\r
5187   FORMAT "->>,>>>,>>9.99"\r
5188   INITIAL "0"\r
5189   POSITION 23\r
5190   SQL-WIDTH 17\r
5191   DECIMALS 2\r
5192   ORDER 390\r
5193 \r
5194 ADD FIELD "BatchLastStatement" OF "Tenant" AS integer \r
5195   DESCRIPTION "The number of the last posted batch when the last invoice / statement was produced"\r
5196   FORMAT "->,>>>,>>9"\r
5197   INITIAL "0"\r
5198   POSITION 24\r
5199   SQL-WIDTH 4\r
5200   ORDER 400\r
5201 \r
5202 ADD INDEX "Tenants" ON "Tenant" \r
5203   AREA "Schema Area"\r
5204   UNIQUE\r
5205   PRIMARY\r
5206   INDEX-FIELD "TenantCode" ASCENDING \r
5207 \r
5208 ADD INDEX "XAK1Tenants" ON "Tenant" \r
5209   AREA "Schema Area"\r
5210   INDEX-FIELD "Name" ASCENDING ABBREVIATED \r
5211 \r
5212 ADD INDEX "XAK2Tenants" ON "Tenant" \r
5213   AREA "Schema Area"\r
5214   INDEX-FIELD "Active" ASCENDING \r
5215   INDEX-FIELD "TenantCode" ASCENDING \r
5216 \r
5217 ADD INDEX "XAK3Tenants" ON "Tenant" \r
5218   AREA "Schema Area"\r
5219   INDEX-FIELD "EntityType" DESCENDING \r
5220   INDEX-FIELD "EntityCode" ASCENDING \r
5221 \r
5222 ADD INDEX "XAK4Tenants" ON "Tenant" \r
5223   AREA "Schema Area"\r
5224   INDEX-FIELD "Active" ASCENDING \r
5225   INDEX-FIELD "EntityType" DESCENDING \r
5226   INDEX-FIELD "EntityCode" ASCENDING \r
5227 \r
5228 ADD INDEX "XAK5Tenants" ON "Tenant" \r
5229   AREA "Schema Area"\r
5230   INDEX-FIELD "Active" ASCENDING \r
5231   INDEX-FIELD "Name" ASCENDING \r
5232 \r
5233 ADD TABLE "Valuation"\r
5234   AREA "Schema Area"\r
5235   DUMP-NAME "valuatio"\r
5236 \r
5237 ADD FIELD "PropertyCode" OF "Valuation" AS integer \r
5238   DESCRIPTION "The property that this valuation applies to"\r
5239   FORMAT "99999"\r
5240   INITIAL "0"\r
5241   POSITION 2\r
5242   SQL-WIDTH 4\r
5243   ORDER 10\r
5244 \r
5245 ADD FIELD "ValuationType" OF "Valuation" AS character \r
5246   FORMAT "X(4)"\r
5247   INITIAL ""\r
5248   POSITION 3\r
5249   SQL-WIDTH 8\r
5250   ORDER 20\r
5251   MANDATORY\r
5252 \r
5253 ADD FIELD "ValuationCode" OF "Valuation" AS integer \r
5254   DESCRIPTION "A sequence separating this valuation from others for the same property."\r
5255   FORMAT ">>>>>9"\r
5256   INITIAL "0"\r
5257   POSITION 4\r
5258   SQL-WIDTH 4\r
5259   ORDER 30\r
5260 \r
5261 ADD FIELD "Amount" OF "Valuation" AS decimal \r
5262   DESCRIPTION "The valuation."\r
5263   FORMAT "->>,>>9.99"\r
5264   INITIAL "0"\r
5265   POSITION 5\r
5266   SQL-WIDTH 17\r
5267   DECIMALS 2\r
5268   ORDER 40\r
5269 \r
5270 ADD FIELD "DateDone" OF "Valuation" AS date \r
5271   DESCRIPTION "The date that the valuation was done."\r
5272   FORMAT "99/99/9999"\r
5273   INITIAL ?\r
5274   POSITION 6\r
5275   SQL-WIDTH 4\r
5276   ORDER 50\r
5277 \r
5278 ADD FIELD "Valuer" OF "Valuation" AS character \r
5279   DESCRIPTION "The person who performed the valuation"\r
5280   FORMAT "X(18)"\r
5281   INITIAL ""\r
5282   POSITION 7\r
5283   SQL-WIDTH 36\r
5284   ORDER 60\r
5285 \r
5286 ADD INDEX "XPKValuations" ON "Valuation" \r
5287   AREA "Schema Area"\r
5288   UNIQUE\r
5289   PRIMARY\r
5290   INDEX-FIELD "PropertyCode" ASCENDING \r
5291   INDEX-FIELD "DateDone" DESCENDING \r
5292   INDEX-FIELD "ValuationType" ASCENDING \r
5293 \r
5294 ADD INDEX "XAK1Valuations" ON "Valuation" \r
5295   AREA "Schema Area"\r
5296   INDEX-FIELD "ValuationType" ASCENDING \r
5297   INDEX-FIELD "DateDone" DESCENDING \r
5298 \r
5299 ADD INDEX "XAK2Valuations" ON "Valuation" \r
5300   AREA "Schema Area"\r
5301   INDEX-FIELD "DateDone" DESCENDING \r
5302 \r
5303 ADD TABLE "ValuationType"\r
5304   AREA "Schema Area"\r
5305   DUMP-NAME "valuati1"\r
5306 \r
5307 ADD FIELD "ValuationType" OF "ValuationType" AS character \r
5308   FORMAT "X(4)"\r
5309   INITIAL ""\r
5310   POSITION 2\r
5311   SQL-WIDTH 8\r
5312   ORDER 10\r
5313   MANDATORY\r
5314 \r
5315 ADD FIELD "Description" OF "ValuationType" AS character \r
5316   FORMAT "X(50)"\r
5317   INITIAL ""\r
5318   POSITION 3\r
5319   SQL-WIDTH 100\r
5320   ORDER 20\r
5321 \r
5322 ADD INDEX "XPKValuationTypes" ON "ValuationType" \r
5323   AREA "Schema Area"\r
5324   UNIQUE\r
5325   PRIMARY\r
5326   INDEX-FIELD "ValuationType" ASCENDING \r
5327 \r
5328 ADD TABLE "Cheque"\r
5329   AREA "Schema Area"\r
5330   DUMP-NAME "cheque"\r
5331   TABLE-TRIGGER "WRITE" OVERRIDE PROCEDURE "wrcheque.p" CRC "?" \r
5332 \r
5333 ADD FIELD "ChequeNo" OF "Cheque" AS integer \r
5334   DESCRIPTION "Number identifying the cheque."\r
5335   FORMAT "999999"\r
5336   INITIAL "0"\r
5337   LABEL "Cheque"\r
5338   POSITION 2\r
5339   SQL-WIDTH 4\r
5340   ORDER 10\r
5341 \r
5342 ADD FIELD "BankAccountCode" OF "Cheque" AS character \r
5343   FORMAT "X(4)"\r
5344   INITIAL ""\r
5345   LABEL "Bank a/c"\r
5346   POSITION 3\r
5347   SQL-WIDTH 8\r
5348   ORDER 150\r
5349   MANDATORY\r
5350 \r
5351 ADD FIELD "CreditorCode" OF "Cheque" AS integer \r
5352   DESCRIPTION "Code of the creditor that this cheque is payable to."\r
5353   FORMAT "99999"\r
5354   INITIAL "0"\r
5355   LABEL "Creditor"\r
5356   POSITION 4\r
5357   SQL-WIDTH 4\r
5358   ORDER 30\r
5359 \r
5360 ADD FIELD "Amount" OF "Cheque" AS decimal \r
5361   DESCRIPTION "Dollar amount for the cheque."\r
5362   FORMAT "->>>,>>>,>>9.99"\r
5363   INITIAL "0"\r
5364   POSITION 5\r
5365   SQL-WIDTH 17\r
5366   DECIMALS 2\r
5367   ORDER 40\r
5368 \r
5369 ADD FIELD "BatchCode" OF "Cheque" AS integer \r
5370   DESCRIPTION "Code of the batch of documents that this cheque belongs to."\r
5371   FORMAT "999999"\r
5372   INITIAL "0"\r
5373   LABEL "Batch No."\r
5374   POSITION 6\r
5375   SQL-WIDTH 4\r
5376   COLUMN-LABEL "Batch"\r
5377   ORDER 50\r
5378 \r
5379 ADD FIELD "DocumentCode" OF "Cheque" AS integer \r
5380   DESCRIPTION "Code of the document that this cheque applies to."\r
5381   FORMAT "99999"\r
5382   INITIAL "0"\r
5383   LABEL "Document No."\r
5384   POSITION 7\r
5385   SQL-WIDTH 4\r
5386   COLUMN-LABEL "Doc No."\r
5387   ORDER 60\r
5388 \r
5389 ADD FIELD "PayeeName" OF "Cheque" AS character \r
5390   DESCRIPTION "Name of the payee as printed for the cheque."\r
5391   FORMAT "X(50)"\r
5392   INITIAL ""\r
5393   POSITION 8\r
5394   SQL-WIDTH 100\r
5395   LENGTH 0\r
5396   ORDER 70\r
5397 \r
5398 ADD FIELD "Date" OF "Cheque" AS date \r
5399   DESCRIPTION "The date as printed for the cheque."\r
5400   FORMAT "99/99/9999"\r
5401   INITIAL ?\r
5402   POSITION 9\r
5403   SQL-WIDTH 4\r
5404   ORDER 80\r
5405 \r
5406 ADD FIELD "Cancelled" OF "Cheque" AS logical \r
5407   DESCRIPTION "A value corresponding to the cancellation status of the cheque."\r
5408   FORMAT "yes/no"\r
5409   INITIAL "no"\r
5410   POSITION 10\r
5411   SQL-WIDTH 1\r
5412   ORDER 90\r
5413 \r
5414 ADD FIELD "DatePresented" OF "Cheque" AS date \r
5415   DESCRIPTION "The date this cheque was presented.\r
5416 "\r
5417   FORMAT "99/99/9999"\r
5418   INITIAL ?\r
5419   LABEL "Presented"\r
5420   POSITION 11\r
5421   SQL-WIDTH 4\r
5422   ORDER 100\r
5423 \r
5424 ADD FIELD "PresentedAmount" OF "Cheque" AS decimal \r
5425   FORMAT ">>>,>>>,>>9.99"\r
5426   INITIAL "0"\r
5427   POSITION 12\r
5428   SQL-WIDTH 17\r
5429   DECIMALS 2\r
5430   ORDER 160\r
5431 \r
5432 ADD FIELD "DateSent" OF "Cheque" AS date \r
5433   DESCRIPTION "The date the cheque was actually sent to the creditor"\r
5434   FORMAT "99/99/9999"\r
5435   INITIAL ?\r
5436   LABEL "Date Sent"\r
5437   POSITION 13\r
5438   SQL-WIDTH 4\r
5439   ORDER 170\r
5440 \r
5441 ADD INDEX "XPKChequeDate" ON "Cheque" \r
5442   AREA "Schema Area"\r
5443   UNIQUE\r
5444   PRIMARY\r
5445   INDEX-FIELD "BankAccountCode" ASCENDING \r
5446   INDEX-FIELD "Date" DESCENDING \r
5447   INDEX-FIELD "ChequeNo" DESCENDING \r
5448 \r
5449 ADD INDEX "XAK1Cheques" ON "Cheque" \r
5450   AREA "Schema Area"\r
5451   INDEX-FIELD "CreditorCode" ASCENDING \r
5452   INDEX-FIELD "Date" DESCENDING \r
5453 \r
5454 ADD INDEX "XPKCheque" ON "Cheque" \r
5455   AREA "Schema Area"\r
5456   UNIQUE\r
5457   INDEX-FIELD "BankAccountCode" ASCENDING \r
5458   INDEX-FIELD "ChequeNo" ASCENDING \r
5459 \r
5460 ADD TABLE "InvoiceLine"\r
5461   AREA "Schema Area"\r
5462   DUMP-NAME "invoicel"\r
5463   TABLE-TRIGGER "DELETE" OVERRIDE PROCEDURE "deinvlne.p" CRC "?" \r
5464   TABLE-TRIGGER "WRITE" OVERRIDE PROCEDURE "WRINVLNE.P" CRC "?" \r
5465 \r
5466 ADD FIELD "InvoiceNo" OF "InvoiceLine" AS integer \r
5467   FORMAT ">>>>>9"\r
5468   INITIAL ?\r
5469   LABEL "Invoice No"\r
5470   POSITION 2\r
5471   SQL-WIDTH 4\r
5472   COLUMN-LABEL "Invoice"\r
5473   ORDER 10\r
5474 \r
5475 ADD FIELD "AccountCode" OF "InvoiceLine" AS decimal \r
5476   DESCRIPTION "The account against which this transaction applies."\r
5477   FORMAT "9999.99"\r
5478   INITIAL "0"\r
5479   LABEL "Account"\r
5480   POSITION 3\r
5481   SQL-WIDTH 17\r
5482   COLUMN-LABEL-SA "C"\r
5483   DECIMALS 2\r
5484   ORDER 20\r
5485   MANDATORY\r
5486 \r
5487 ADD FIELD "AccountText" OF "InvoiceLine" AS character \r
5488   FORMAT "X(50)"\r
5489   INITIAL ""\r
5490   LABEL "Description"\r
5491   POSITION 4\r
5492   SQL-WIDTH 100\r
5493   LENGTH 0\r
5494   ORDER 30\r
5495 \r
5496 ADD FIELD "Amount" OF "InvoiceLine" AS decimal \r
5497   FORMAT "->,>>>,>>9.99"\r
5498   INITIAL "0"\r
5499   POSITION 5\r
5500   SQL-WIDTH 17\r
5501   DECIMALS 2\r
5502   ORDER 40\r
5503   MANDATORY\r
5504 \r
5505 ADD FIELD "Percent" OF "InvoiceLine" AS decimal \r
5506   FORMAT ">>9.99"\r
5507   INITIAL "0"\r
5508   POSITION 6\r
5509   SQL-WIDTH 17\r
5510   DECIMALS 2\r
5511   ORDER 50\r
5512   MANDATORY\r
5513 \r
5514 ADD FIELD "YourShare" OF "InvoiceLine" AS decimal \r
5515   FORMAT "->,>>>,>>9.99"\r
5516   INITIAL "0"\r
5517   LABEL "Share"\r
5518   POSITION 7\r
5519   SQL-WIDTH 17\r
5520   DECIMALS 2\r
5521   ORDER 60\r
5522   FIELD-TRIGGER "ASSIGN" OVERRIDE PROCEDURE "a-ivlysh.p" CRC "?" \r
5523 \r
5524 ADD FIELD "LineSeq" OF "InvoiceLine" AS integer \r
5525   FORMAT "->,>>>,>>9"\r
5526   INITIAL "0"\r
5527   LABEL "Line#"\r
5528   POSITION 8\r
5529   SQL-WIDTH 4\r
5530   ORDER 70\r
5531 \r
5532 ADD FIELD "Quantity" OF "InvoiceLine" AS decimal \r
5533   DESCRIPTION "The quantity of goods invoiced"\r
5534   FORMAT "->>,>>9.99"\r
5535   INITIAL "1"\r
5536   POSITION 9\r
5537   SQL-WIDTH 17\r
5538   DECIMALS 2\r
5539   ORDER 80\r
5540 \r
5541 ADD FIELD "EntityType" OF "InvoiceLine" AS character \r
5542   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
5543   FORMAT "X"\r
5544   INITIAL ?\r
5545   LABEL "Entity type"\r
5546   POSITION 10\r
5547   SQL-WIDTH 2\r
5548   COLUMN-LABEL "T"\r
5549   COLUMN-LABEL-SA "C"\r
5550   ORDER 90\r
5551 \r
5552 ADD FIELD "EntityCode" OF "InvoiceLine" AS integer \r
5553   FORMAT "99999"\r
5554   INITIAL ?\r
5555   LABEL "Code"\r
5556   POSITION 11\r
5557   SQL-WIDTH 4\r
5558   COLUMN-LABEL-SA "C"\r
5559   ORDER 100\r
5560 \r
5561 ADD INDEX "XPKInvoiceLine" ON "InvoiceLine" \r
5562   AREA "Schema Area"\r
5563   UNIQUE\r
5564   PRIMARY\r
5565   INDEX-FIELD "InvoiceNo" ASCENDING \r
5566   INDEX-FIELD "LineSeq" ASCENDING \r
5567 \r
5568 ADD INDEX "XAK1InvoiceLines" ON "InvoiceLine" \r
5569   AREA "Schema Area"\r
5570   INDEX-FIELD "InvoiceNo" ASCENDING \r
5571   INDEX-FIELD "AccountCode" ASCENDING \r
5572 \r
5573 ADD TABLE "VoucherStatus"\r
5574   AREA "Schema Area"\r
5575   DUMP-NAME "vouchers"\r
5576 \r
5577 ADD FIELD "Description" OF "VoucherStatus" AS character \r
5578   FORMAT "X(50)"\r
5579   INITIAL ""\r
5580   POSITION 2\r
5581   SQL-WIDTH 100\r
5582   LENGTH 0\r
5583   ORDER 20\r
5584 \r
5585 ADD FIELD "VoucherStatus" OF "VoucherStatus" AS character \r
5586   FORMAT "X(4)"\r
5587   INITIAL ""\r
5588   POSITION 3\r
5589   SQL-WIDTH 8\r
5590   LENGTH 0\r
5591   ORDER 10\r
5592 \r
5593 ADD FIELD "SequenceCode" OF "VoucherStatus" AS integer \r
5594   FORMAT "9"\r
5595   INITIAL "0"\r
5596   LABEL "Sequence"\r
5597   POSITION 4\r
5598   SQL-WIDTH 4\r
5599   ORDER 30\r
5600   MANDATORY\r
5601 \r
5602 ADD INDEX "XPKVoucherStatus" ON "VoucherStatus" \r
5603   AREA "Schema Area"\r
5604   PRIMARY\r
5605   INDEX-FIELD "VoucherStatus" ASCENDING \r
5606 \r
5607 ADD INDEX "XAK1Sequence" ON "VoucherStatus" \r
5608   AREA "Schema Area"\r
5609   INDEX-FIELD "SequenceCode" ASCENDING \r
5610 \r
5611 ADD TABLE "Approver"\r
5612   AREA "Schema Area"\r
5613   DESCRIPTION "Short Codes for approval persons"\r
5614   DUMP-NAME "approver"\r
5615   TABLE-TRIGGER "WRITE" OVERRIDE PROCEDURE "wrapprvr.p" CRC "?" \r
5616 \r
5617 ADD FIELD "ApproverCode" OF "Approver" AS character \r
5618   DESCRIPTION "The short alphanumeric code that identifies this approver."\r
5619   FORMAT "X(4)"\r
5620   INITIAL ""\r
5621   LABEL "Approval"\r
5622   POSITION 2\r
5623   SQL-WIDTH 8\r
5624   LENGTH 0\r
5625   ORDER 10\r
5626   MANDATORY\r
5627 \r
5628 ADD FIELD "PersonCode" OF "Approver" AS integer \r
5629   FORMAT "99999"\r
5630   INITIAL "0"\r
5631   LABEL "Person"\r
5632   POSITION 3\r
5633   SQL-WIDTH 4\r
5634   ORDER 20\r
5635   MANDATORY\r
5636 \r
5637 ADD FIELD "ApprovalLimit" OF "Approver" AS decimal \r
5638   FORMAT "->>,>>>,>>9.99"\r
5639   INITIAL "0"\r
5640   LABEL "Approval Limit"\r
5641   POSITION 4\r
5642   SQL-WIDTH 17\r
5643   DECIMALS 2\r
5644   ORDER 30\r
5645 \r
5646 ADD FIELD "SignatoryLimit" OF "Approver" AS decimal \r
5647   FORMAT "->>,>>>,>>9.99"\r
5648   INITIAL "0"\r
5649   LABEL "Chq Signing Limit"\r
5650   POSITION 5\r
5651   SQL-WIDTH 17\r
5652   DECIMALS 2\r
5653   ORDER 40\r
5654 \r
5655 ADD FIELD "Active" OF "Approver" AS logical \r
5656   DESCRIPTION "Flag to indicate whether the creditor is active or inactive"\r
5657   FORMAT "yes/no"\r
5658   INITIAL "yes"\r
5659   POSITION 6\r
5660   SQL-WIDTH 1\r
5661   ORDER 50\r
5662 \r
5663 ADD FIELD "LastModifiedDate" OF "Approver" AS date \r
5664   DESCRIPTION "The date when this record was last modified.  Maintained by a WRITE trigger."\r
5665   FORMAT "99/99/9999"\r
5666   INITIAL "1/1/0001"\r
5667   POSITION 7\r
5668   SQL-WIDTH 4\r
5669   ORDER 60\r
5670   MANDATORY\r
5671 \r
5672 ADD FIELD "LastModifiedTime" OF "Approver" AS integer \r
5673   DESCRIPTION "The time that this record was last modified"\r
5674   FORMAT "->,>>>,>>9"\r
5675   INITIAL "0"\r
5676   POSITION 8\r
5677   SQL-WIDTH 4\r
5678   ORDER 70\r
5679 \r
5680 ADD FIELD "LastModifiedUser" OF "Approver" AS character \r
5681   DESCRIPTION "The user who last modified this record.  Maintained by a WRITE trigger."\r
5682   FORMAT "X(8)"\r
5683   INITIAL ""\r
5684   POSITION 9\r
5685   SQL-WIDTH 16\r
5686   LENGTH 0\r
5687   ORDER 80\r
5688 \r
5689 ADD FIELD "AuditRecordId" OF "Approver" AS integer \r
5690   FORMAT "->,>>>,>>9"\r
5691   INITIAL "0"\r
5692   POSITION 10\r
5693   SQL-WIDTH 4\r
5694   ORDER 90\r
5695 \r
5696 ADD FIELD "OverBudgetLimit" OF "Approver" AS decimal \r
5697   FORMAT "->>,>>>,>>9.99"\r
5698   INITIAL "0"\r
5699   LABEL "Over Budget Limit"\r
5700   POSITION 11\r
5701   SQL-WIDTH 17\r
5702   DECIMALS 2\r
5703   ORDER 100\r
5704 \r
5705 ADD INDEX "XPKApprover" ON "Approver" \r
5706   AREA "Schema Area"\r
5707   UNIQUE\r
5708   PRIMARY\r
5709   INDEX-FIELD "ApproverCode" ASCENDING \r
5710   INDEX-FIELD "PersonCode" ASCENDING \r
5711 \r
5712 ADD TABLE "BankAccount"\r
5713   AREA "Schema Area"\r
5714   DUMP-NAME "bankacco"\r
5715   TABLE-TRIGGER "WRITE" OVERRIDE PROCEDURE "wrbnkact.p" CRC "?" \r
5716 \r
5717 ADD FIELD "BankAccountCode" OF "BankAccount" AS character \r
5718   FORMAT "X(4)"\r
5719   INITIAL ""\r
5720   LABEL "Bank a/c"\r
5721   POSITION 2\r
5722   SQL-WIDTH 8\r
5723   ORDER 80\r
5724   MANDATORY\r
5725 \r
5726 ADD FIELD "AccountName" OF "BankAccount" AS character \r
5727   FORMAT "X(100)"\r
5728   INITIAL ""\r
5729   LABEL "Account name"\r
5730   POSITION 3\r
5731   SQL-WIDTH 200\r
5732   LENGTH 0\r
5733   ORDER 20\r
5734 \r
5735 ADD FIELD "BankBranchName" OF "BankAccount" AS character \r
5736   FORMAT "X(50)"\r
5737   INITIAL ""\r
5738   LABEL "BranchName"\r
5739   POSITION 4\r
5740   SQL-WIDTH 100\r
5741   LENGTH 0\r
5742   ORDER 30\r
5743 \r
5744 ADD FIELD "BankName" OF "BankAccount" AS character \r
5745   FORMAT "X(50)"\r
5746   INITIAL ""\r
5747   LABEL "Bank Name"\r
5748   POSITION 5\r
5749   SQL-WIDTH 100\r
5750   LENGTH 0\r
5751   ORDER 40\r
5752 \r
5753 ADD FIELD "BankAccount" OF "BankAccount" AS character \r
5754   FORMAT "99-9999-9999999-999"\r
5755   INITIAL ""\r
5756   LABEL "Bank"\r
5757   POSITION 6\r
5758   SQL-WIDTH 38\r
5759   LENGTH 0\r
5760   ORDER 50\r
5761 \r
5762 ADD FIELD "CompanyCode" OF "BankAccount" AS integer \r
5763   FORMAT "99999"\r
5764   INITIAL "0"\r
5765   LABEL "Company"\r
5766   POSITION 7\r
5767   SQL-WIDTH 4\r
5768   HELP "The ledger that transactions should go to"\r
5769   ORDER 60\r
5770 \r
5771 ADD FIELD "AccountCode" OF "BankAccount" AS decimal \r
5772   FORMAT "9999.99"\r
5773   INITIAL "0"\r
5774   LABEL "GL Account"\r
5775   POSITION 8\r
5776   SQL-WIDTH 17\r
5777   HELP "The GL account for transactions"\r
5778   DECIMALS 2\r
5779   ORDER 70\r
5780 \r
5781 ADD FIELD "LastModifiedDate" OF "BankAccount" AS date \r
5782   DESCRIPTION "The date when this record was last modified.  Maintained by a WRITE trigger."\r
5783   FORMAT "99/99/9999"\r
5784   INITIAL "1/1/0001"\r
5785   POSITION 9\r
5786   SQL-WIDTH 4\r
5787   ORDER 90\r
5788   MANDATORY\r
5789 \r
5790 ADD FIELD "LastModifiedTime" OF "BankAccount" AS integer \r
5791   DESCRIPTION "The time that this record was last modified"\r
5792   FORMAT "->,>>>,>>9"\r
5793   INITIAL "0"\r
5794   POSITION 10\r
5795   SQL-WIDTH 4\r
5796   ORDER 100\r
5797 \r
5798 ADD FIELD "LastModifiedUser" OF "BankAccount" AS character \r
5799   DESCRIPTION "The user who last modified this record.  Maintained by a WRITE trigger."\r
5800   FORMAT "X(8)"\r
5801   INITIAL ""\r
5802   POSITION 11\r
5803   SQL-WIDTH 16\r
5804   LENGTH 0\r
5805   ORDER 110\r
5806 \r
5807 ADD FIELD "AuditRecordId" OF "BankAccount" AS integer \r
5808   FORMAT "->,>>>,>>9"\r
5809   INITIAL "0"\r
5810   POSITION 12\r
5811   SQL-WIDTH 4\r
5812   ORDER 120\r
5813 \r
5814 ADD FIELD "ChequeAccount" OF "BankAccount" AS logical \r
5815   FORMAT "yes/no"\r
5816   INITIAL "no"\r
5817   LABEL "Cheque Account"\r
5818   POSITION 13\r
5819   SQL-WIDTH 1\r
5820   VIEW-AS "VIEW-AS TOGGLE-BOX"\r
5821   ORDER 130\r
5822 \r
5823 ADD FIELD "Active" OF "BankAccount" AS logical \r
5824   FORMAT "yes/no"\r
5825   INITIAL "Yes"\r
5826   POSITION 14\r
5827   SQL-WIDTH 1\r
5828   HELP "Is this bank account active"\r
5829   ORDER 140\r
5830 \r
5831 ADD INDEX "BankAccounts" ON "BankAccount" \r
5832   AREA "Schema Area"\r
5833   PRIMARY\r
5834   INDEX-FIELD "BankAccountCode" ASCENDING \r
5835 \r
5836 ADD TABLE "Office"\r
5837   AREA "Schema Area"\r
5838   DUMP-NAME "office"\r
5839   TABLE-TRIGGER "WRITE" OVERRIDE PROCEDURE "wroffice.p" CRC "?" \r
5840 \r
5841 ADD FIELD "OfficeCode" OF "Office" AS character \r
5842   FORMAT "X(4)"\r
5843   INITIAL ""\r
5844   LABEL "Office"\r
5845   POSITION 2\r
5846   SQL-WIDTH 8\r
5847   LENGTH 0\r
5848   ORDER 10\r
5849 \r
5850 ADD FIELD "Name" OF "Office" AS character \r
5851   FORMAT "X(50)"\r
5852   INITIAL ""\r
5853   POSITION 3\r
5854   SQL-WIDTH 100\r
5855   LENGTH 0\r
5856   ORDER 20\r
5857 \r
5858 ADD FIELD "ThisOffice" OF "Office" AS logical \r
5859   FORMAT "yes/no"\r
5860   INITIAL "no"\r
5861   POSITION 4\r
5862   SQL-WIDTH 1\r
5863   ORDER 30\r
5864   MANDATORY\r
5865   FIELD-TRIGGER "ASSIGN" OVERRIDE PROCEDURE "A-OFCTHS.P" CRC "?" \r
5866 \r
5867 ADD FIELD "GSTNo" OF "Office" AS integer \r
5868   FORMAT "999999999"\r
5869   INITIAL "0"\r
5870   POSITION 5\r
5871   SQL-WIDTH 4\r
5872   ORDER 80\r
5873 \r
5874 ADD FIELD "AccountingContact" OF "Office" AS integer \r
5875   DESCRIPTION "A primary contact for matters relating to accounting within this office."\r
5876   FORMAT ">>>>>9"\r
5877   INITIAL "0"\r
5878   LABEL "Accounting contact"\r
5879   POSITION 6\r
5880   SQL-WIDTH 4\r
5881   ORDER 90\r
5882 \r
5883 ADD FIELD "GST" OF "Office" AS decimal \r
5884   FORMAT ">>9.99"\r
5885   INITIAL "0"\r
5886   POSITION 7\r
5887   SQL-WIDTH 17\r
5888   HELP "The GST rate applicable in this office"\r
5889   DECIMALS 2\r
5890   ORDER 70\r
5891 \r
5892 ADD FIELD "StreetAddress" OF "Office" AS character \r
5893   FORMAT "X(8)"\r
5894   INITIAL ""\r
5895   LABEL "Street Address"\r
5896   POSITION 8\r
5897   SQL-WIDTH 16\r
5898   VIEW-AS "VIEW-AS EDITOR\r
5899   SIZE-CHARS 50 by 5\r
5900   SCROLLBAR-VERTICAL\r
5901 "\r
5902   LENGTH 0\r
5903   ORDER 100\r
5904   MANDATORY\r
5905 \r
5906 ADD INDEX "Offices" ON "Office" \r
5907   AREA "Schema Area"\r
5908   UNIQUE\r
5909   PRIMARY\r
5910   INDEX-FIELD "OfficeCode" ASCENDING \r
5911 \r
5912 ADD INDEX "ThisOffice" ON "Office" \r
5913   AREA "Schema Area"\r
5914   INDEX-FIELD "ThisOffice" ASCENDING \r
5915 \r
5916 ADD TABLE "Invoice"\r
5917   AREA "Schema Area"\r
5918   DUMP-NAME "invoice"\r
5919   TABLE-TRIGGER "CREATE" OVERRIDE PROCEDURE "CRINVOCE.P" CRC "?" \r
5920   TABLE-TRIGGER "DELETE" OVERRIDE PROCEDURE "DEINVOCE.P" CRC "?" \r
5921 \r
5922 ADD FIELD "InvoiceNo" OF "Invoice" AS integer \r
5923   FORMAT ">>>>>9"\r
5924   INITIAL "0"\r
5925   LABEL "Invoice No"\r
5926   POSITION 2\r
5927   SQL-WIDTH 4\r
5928   COLUMN-LABEL "Invoice"\r
5929   ORDER 10\r
5930   MANDATORY\r
5931 \r
5932 ADD FIELD "EntityType" OF "Invoice" AS character \r
5933   FORMAT "X(4)"\r
5934   INITIAL ""\r
5935   LABEL "Entity type"\r
5936   POSITION 3\r
5937   SQL-WIDTH 8\r
5938   COLUMN-LABEL "Type"\r
5939   LENGTH 0\r
5940   ORDER 20\r
5941   MANDATORY\r
5942 \r
5943 ADD FIELD "EntityCode" OF "Invoice" AS integer \r
5944   FORMAT "99999"\r
5945   INITIAL "0"\r
5946   LABEL "Code"\r
5947   POSITION 4\r
5948   SQL-WIDTH 4\r
5949   COLUMN-LABEL-SA "C"\r
5950   ORDER 30\r
5951 \r
5952 ADD FIELD "InvoiceDate" OF "Invoice" AS date \r
5953   FORMAT "99/99/9999"\r
5954   INITIAL ?\r
5955   LABEL "Invoice date"\r
5956   POSITION 5\r
5957   SQL-WIDTH 4\r
5958   COLUMN-LABEL "Date"\r
5959   ORDER 40\r
5960 \r
5961 ADD FIELD "ToPay" OF "Invoice" AS character \r
5962   FORMAT "X(4)"\r
5963   INITIAL ""\r
5964   LABEL "To"\r
5965   POSITION 6\r
5966   SQL-WIDTH 8\r
5967   LENGTH 0\r
5968   ORDER 50\r
5969 \r
5970 ADD FIELD "ToDetail" OF "Invoice" AS character \r
5971   FORMAT "X(50)"\r
5972   INITIAL ""\r
5973   LABEL "To"\r
5974   POSITION 7\r
5975   SQL-WIDTH 100\r
5976   LENGTH 0\r
5977   ORDER 60\r
5978 \r
5979 ADD FIELD "TaxApplies" OF "Invoice" AS logical \r
5980   FORMAT "yes/no"\r
5981   INITIAL "y"\r
5982   LABEL "Taxable"\r
5983   POSITION 8\r
5984   SQL-WIDTH 1\r
5985   ORDER 70\r
5986   MANDATORY\r
5987 \r
5988 ADD FIELD "TermsCode" OF "Invoice" AS character \r
5989   FORMAT "X(8)"\r
5990   INITIAL ""\r
5991   LABEL "Terms"\r
5992   POSITION 9\r
5993   SQL-WIDTH 16\r
5994   LENGTH 0\r
5995   ORDER 80\r
5996   MANDATORY\r
5997 \r
5998 ADD FIELD "TaxAmount" OF "Invoice" AS decimal \r
5999   FORMAT "->,>>>,>>9.99"\r
6000   INITIAL "0"\r
6001   LABEL "Tax"\r
6002   POSITION 10\r
6003   SQL-WIDTH 17\r
6004   DECIMALS 2\r
6005   ORDER 90\r
6006 \r
6007 ADD FIELD "Total" OF "Invoice" AS decimal \r
6008   FORMAT "->>,>>>,>>>,>>9.99"\r
6009   INITIAL "0"\r
6010   POSITION 11\r
6011   SQL-WIDTH 17\r
6012   DECIMALS 2\r
6013   ORDER 100\r
6014 \r
6015 ADD FIELD "Blurb" OF "Invoice" AS character \r
6016   DESCRIPTION "Blurb for this invoice"\r
6017   FORMAT "X(256)"\r
6018   INITIAL ""\r
6019   LABEL "Blurb"\r
6020   POSITION 12\r
6021   SQL-WIDTH 512\r
6022   VIEW-AS "VIEW-AS EDITOR SIZE-PIXELS 600 by 300\r
6023   SCROLLBAR-VERTICAL"\r
6024   LENGTH 0\r
6025   ORDER 110\r
6026 \r
6027 ADD FIELD "InvoiceStatus" OF "Invoice" AS character \r
6028   FORMAT "X"\r
6029   INITIAL ""\r
6030   LABEL "Status"\r
6031   POSITION 13\r
6032   SQL-WIDTH 2\r
6033   LENGTH 0\r
6034   ORDER 120\r
6035 \r
6036 ADD FIELD "InvoiceType" OF "Invoice" AS character \r
6037   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
6038   FORMAT "X(4)"\r
6039   INITIAL "NORM"\r
6040   LABEL "Type"\r
6041   POSITION 14\r
6042   SQL-WIDTH 8\r
6043   ORDER 130\r
6044 \r
6045 ADD FIELD "DueDate" OF "Invoice" AS date \r
6046   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
6047   FORMAT "99/99/9999"\r
6048   INITIAL ?\r
6049   LABEL "Due Date"\r
6050   POSITION 15\r
6051   SQL-WIDTH 4\r
6052   COLUMN-LABEL "Due Date"\r
6053   HELP "Enter a due date otherwise it will be calculated from terms."\r
6054   ORDER 140\r
6055 \r
6056 ADD INDEX "Invoices" ON "Invoice" \r
6057   AREA "Schema Area"\r
6058   UNIQUE\r
6059   PRIMARY\r
6060   INDEX-FIELD "InvoiceNo" ASCENDING \r
6061 \r
6062 ADD INDEX "XAK1Entity" ON "Invoice" \r
6063   AREA "Schema Area"\r
6064   INDEX-FIELD "EntityType" ASCENDING \r
6065   INDEX-FIELD "EntityCode" ASCENDING \r
6066 \r
6067 ADD INDEX "XAK2Date" ON "Invoice" \r
6068   AREA "Schema Area"\r
6069   INDEX-FIELD "InvoiceDate" ASCENDING \r
6070 \r
6071 ADD INDEX "XAK3Invoices" ON "Invoice" \r
6072   AREA "Schema Area"\r
6073   INDEX-FIELD "InvoiceStatus" ASCENDING \r
6074   INDEX-FIELD "InvoiceNo" ASCENDING \r
6075 \r
6076 ADD INDEX "XAK4Invoice" ON "Invoice" \r
6077   AREA "Schema Area"\r
6078   INDEX-FIELD "InvoiceStatus" ASCENDING \r
6079   INDEX-FIELD "InvoiceDate" ASCENDING \r
6080 \r
6081 ADD INDEX "XAK5Invoice" ON "Invoice" \r
6082   AREA "Schema Area"\r
6083   INDEX-FIELD "InvoiceStatus" ASCENDING \r
6084   INDEX-FIELD "EntityType" ASCENDING \r
6085   INDEX-FIELD "EntityCode" ASCENDING \r
6086 \r
6087 ADD TABLE "InvoiceTerms"\r
6088   AREA "Schema Area"\r
6089   DUMP-NAME "invoicet"\r
6090 \r
6091 ADD FIELD "TermsCode" OF "InvoiceTerms" AS character \r
6092   FORMAT "X(4)"\r
6093   INITIAL ""\r
6094   LABEL "Terms"\r
6095   POSITION 2\r
6096   SQL-WIDTH 8\r
6097   LENGTH 0\r
6098   ORDER 10\r
6099   MANDATORY\r
6100 \r
6101 ADD FIELD "Description" OF "InvoiceTerms" AS character \r
6102   FORMAT "X(50)"\r
6103   INITIAL ""\r
6104   POSITION 3\r
6105   SQL-WIDTH 100\r
6106   LENGTH 0\r
6107   ORDER 20\r
6108 \r
6109 ADD INDEX "InvoiceTerms" ON "InvoiceTerms" \r
6110   AREA "Schema Area"\r
6111   UNIQUE\r
6112   PRIMARY\r
6113   INDEX-FIELD "TermsCode" ASCENDING \r
6114 \r
6115 ADD TABLE "NewAcctTrans"\r
6116   AREA "Schema Area"\r
6117   DESCRIPTION "Holds transactions to be updated."\r
6118   DUMP-NAME "newtrans"\r
6119   TABLE-TRIGGER "DELETE" OVERRIDE PROCEDURE "denactrn.p" CRC "?" \r
6120   TABLE-TRIGGER "WRITE" OVERRIDE PROCEDURE "wrnactrn.p" CRC "?" \r
6121 \r
6122 ADD FIELD "BatchCode" OF "NewAcctTrans" AS integer \r
6123   FORMAT ">>>>>9"\r
6124   INITIAL "0"\r
6125   LABEL "Batch"\r
6126   POSITION 2\r
6127   SQL-WIDTH 4\r
6128   ORDER 10\r
6129   MANDATORY\r
6130 \r
6131 ADD FIELD "DocumentCode" OF "NewAcctTrans" AS integer \r
6132   FORMAT ">>>>>9"\r
6133   INITIAL "0"\r
6134   LABEL "Document"\r
6135   POSITION 3\r
6136   SQL-WIDTH 4\r
6137   ORDER 20\r
6138   MANDATORY\r
6139 \r
6140 ADD FIELD "TransactionCode" OF "NewAcctTrans" AS integer \r
6141   FORMAT ">>>>>9"\r
6142   INITIAL "0"\r
6143   LABEL "Tran #"\r
6144   POSITION 4\r
6145   SQL-WIDTH 4\r
6146   ORDER 30\r
6147   MANDATORY\r
6148 \r
6149 ADD FIELD "EntityType" OF "NewAcctTrans" AS character \r
6150   FORMAT "X"\r
6151   INITIAL ?\r
6152   LABEL "Type"\r
6153   POSITION 5\r
6154   SQL-WIDTH 2\r
6155   COLUMN-LABEL "T"\r
6156   LENGTH 0\r
6157   ORDER 40\r
6158 \r
6159 ADD FIELD "EntityCode" OF "NewAcctTrans" AS integer \r
6160   FORMAT "99999"\r
6161   INITIAL "0"\r
6162   LABEL "Entity"\r
6163   POSITION 6\r
6164   SQL-WIDTH 4\r
6165   HELP "Code of Tenant, Company, Creditor or etc."\r
6166   ORDER 50\r
6167   MANDATORY\r
6168 \r
6169 ADD FIELD "AccountCode" OF "NewAcctTrans" AS decimal \r
6170   FORMAT "9999.99"\r
6171   INITIAL "0"\r
6172   LABEL "Account"\r
6173   POSITION 7\r
6174   SQL-WIDTH 17\r
6175   DECIMALS 2\r
6176   ORDER 60\r
6177   MANDATORY\r
6178 \r
6179 ADD FIELD "Date" OF "NewAcctTrans" AS date \r
6180   FORMAT "99/99/9999"\r
6181   INITIAL ?\r
6182   POSITION 8\r
6183   SQL-WIDTH 4\r
6184   ORDER 70\r
6185 \r
6186 ADD FIELD "Description" OF "NewAcctTrans" AS character \r
6187   FORMAT "X(30)"\r
6188   INITIAL ""\r
6189   POSITION 9\r
6190   SQL-WIDTH 60\r
6191   LENGTH 0\r
6192   ORDER 80\r
6193 \r
6194 ADD FIELD "Amount" OF "NewAcctTrans" AS decimal \r
6195   FORMAT "->>,>>>,>>>,>>9.99"\r
6196   INITIAL "0"\r
6197   POSITION 10\r
6198   SQL-WIDTH 17\r
6199   DECIMALS 2\r
6200   ORDER 90\r
6201   FIELD-TRIGGER "ASSIGN" OVERRIDE PROCEDURE "A-TRNAMT.P" CRC "?" \r
6202 \r
6203 ADD FIELD "Reference" OF "NewAcctTrans" AS character \r
6204   DESCRIPTION "Overrides the reference at document level for some display situations."\r
6205   FORMAT "X(20)"\r
6206   INITIAL ""\r
6207   LABEL "Ref"\r
6208   POSITION 11\r
6209   SQL-WIDTH 40\r
6210   HELP "Enter a reference to override the document reference"\r
6211   LENGTH 0\r
6212   ORDER 100\r
6213 \r
6214 ADD FIELD "ConsequenceOf" OF "NewAcctTrans" AS integer \r
6215   DESCRIPTION "Indicates which transactioncode in this document caused this transaction to be created during the transaction update process."\r
6216   FORMAT ">>>>9"\r
6217   INITIAL "0"\r
6218   POSITION 12\r
6219   SQL-WIDTH 4\r
6220   HELP "System maintained."\r
6221   ORDER 110\r
6222 \r
6223 ADD FIELD "MonthCode" OF "NewAcctTrans" AS integer \r
6224   DESCRIPTION "The code of the month that this transaction should update to."\r
6225   FORMAT ">>>>>9"\r
6226   INITIAL ?\r
6227   LABEL "Month"\r
6228   POSITION 13\r
6229   SQL-WIDTH 4\r
6230   HELP "The code of the month that this transaction should update to."\r
6231   ORDER 120\r
6232 \r
6233 ADD INDEX "NewTransactions" ON "NewAcctTrans" \r
6234   AREA "Schema Area"\r
6235   UNIQUE\r
6236   PRIMARY\r
6237   INDEX-FIELD "BatchCode" ASCENDING \r
6238   INDEX-FIELD "DocumentCode" ASCENDING \r
6239   INDEX-FIELD "TransactionCode" ASCENDING \r
6240 \r
6241 ADD TABLE "NewDocument"\r
6242   AREA "Schema Area"\r
6243   DESCRIPTION "Hold documents to be updated."\r
6244   DUMP-NAME "newdocum"\r
6245   TABLE-TRIGGER "DELETE" OVERRIDE PROCEDURE "denewdoc.p" CRC "?" \r
6246   TABLE-TRIGGER "WRITE" OVERRIDE PROCEDURE "wrnewdoc.p" CRC "?" \r
6247 \r
6248 ADD FIELD "BatchCode" OF "NewDocument" AS integer \r
6249   FORMAT ">>>>>9"\r
6250   INITIAL "0"\r
6251   LABEL "Batch"\r
6252   POSITION 2\r
6253   SQL-WIDTH 4\r
6254   ORDER 10\r
6255   MANDATORY\r
6256   FIELD-TRIGGER "ASSIGN" OVERRIDE PROCEDURE "A-NDCBCH.P" CRC "?" \r
6257 \r
6258 ADD FIELD "DocumentCode" OF "NewDocument" AS integer \r
6259   FORMAT ">>>>>9"\r
6260   INITIAL "0"\r
6261   LABEL "Document"\r
6262   POSITION 3\r
6263   SQL-WIDTH 4\r
6264   ORDER 20\r
6265   MANDATORY\r
6266 \r
6267 ADD FIELD "Description" OF "NewDocument" AS character \r
6268   FORMAT "X(50)"\r
6269   INITIAL ""\r
6270   POSITION 4\r
6271   SQL-WIDTH 100\r
6272   LENGTH 0\r
6273   ORDER 30\r
6274   MANDATORY\r
6275 \r
6276 ADD FIELD "Reference" OF "NewDocument" AS character \r
6277   FORMAT "X(12)"\r
6278   INITIAL ""\r
6279   POSITION 5\r
6280   SQL-WIDTH 24\r
6281   LENGTH 0\r
6282   ORDER 40\r
6283   MANDATORY\r
6284 \r
6285 ADD FIELD "DocumentType" OF "NewDocument" AS character \r
6286   FORMAT "X(4)"\r
6287   INITIAL "JRNL"\r
6288   LABEL "Type"\r
6289   POSITION 6\r
6290   SQL-WIDTH 8\r
6291   COLUMN-LABEL "T"\r
6292   HELP "Invoice, Journal, Voucher, etc."\r
6293   LENGTH 0\r
6294   ORDER 50\r
6295   MANDATORY\r
6296 \r
6297 ADD INDEX "NewDocuments" ON "NewDocument" \r
6298   AREA "Schema Area"\r
6299   UNIQUE\r
6300   PRIMARY\r
6301   INDEX-FIELD "BatchCode" ASCENDING \r
6302   INDEX-FIELD "DocumentCode" ASCENDING \r
6303 \r
6304 ADD TABLE "NewBatch"\r
6305   AREA "Schema Area"\r
6306   DESCRIPTION "Holds batch control records for 'new' batches - i.e. those that could be 'posted' to update accounts."\r
6307   DUMP-NAME "newbatch"\r
6308   TABLE-TRIGGER "CREATE" OVERRIDE PROCEDURE "CRNEWBCH.P" CRC "?" \r
6309   TABLE-TRIGGER "DELETE" OVERRIDE PROCEDURE "DENEWBCH.P" CRC "?" \r
6310 \r
6311 ADD FIELD "BatchCode" OF "NewBatch" AS integer \r
6312   FORMAT ">>>>>9"\r
6313   INITIAL ?\r
6314   LABEL "Batch"\r
6315   POSITION 2\r
6316   SQL-WIDTH 4\r
6317   ORDER 10\r
6318   MANDATORY\r
6319 \r
6320 ADD FIELD "PersonCode" OF "NewBatch" AS integer \r
6321   FORMAT ">>>>>>9"\r
6322   INITIAL ?\r
6323   LABEL "Operator"\r
6324   POSITION 3\r
6325   SQL-WIDTH 4\r
6326   ORDER 20\r
6327   MANDATORY\r
6328 \r
6329 ADD FIELD "BatchType" OF "NewBatch" AS character \r
6330   FORMAT "X(4)"\r
6331   INITIAL "NORM"\r
6332   LABEL "Type"\r
6333   POSITION 4\r
6334   SQL-WIDTH 8\r
6335   LENGTH 0\r
6336   ORDER 70\r
6337   MANDATORY\r
6338 \r
6339 ADD FIELD "DocumentCount" OF "NewBatch" AS integer \r
6340   FORMAT ">>>,>>9"\r
6341   INITIAL "0"\r
6342   LABEL "Documents"\r
6343   POSITION 5\r
6344   SQL-WIDTH 4\r
6345   ORDER 40\r
6346   MANDATORY\r
6347 \r
6348 ADD FIELD "Total" OF "NewBatch" AS decimal \r
6349   FORMAT "->>>,>>>,>>9.99"\r
6350   INITIAL "0"\r
6351   POSITION 6\r
6352   SQL-WIDTH 17\r
6353   DECIMALS 2\r
6354   ORDER 50\r
6355   MANDATORY\r
6356 \r
6357 ADD FIELD "Description" OF "NewBatch" AS character \r
6358   FORMAT "X(50)"\r
6359   INITIAL ""\r
6360   POSITION 7\r
6361   SQL-WIDTH 100\r
6362   VALEXP "Description <> """" AND Description <> ?"\r
6363   VALMSG "The batch description may not be null"\r
6364   LENGTH 0\r
6365   ORDER 60\r
6366 \r
6367 ADD INDEX "XPKNewBatch" ON "NewBatch" \r
6368   AREA "Schema Area"\r
6369   UNIQUE\r
6370   PRIMARY\r
6371   INDEX-FIELD "BatchCode" ASCENDING \r
6372 \r
6373 ADD INDEX "XAK1NewBatch" ON "NewBatch" \r
6374   AREA "Schema Area"\r
6375   UNIQUE\r
6376   INDEX-FIELD "BatchType" ASCENDING \r
6377   INDEX-FIELD "BatchCode" DESCENDING \r
6378 \r
6379 ADD INDEX "XAKDescription" ON "NewBatch" \r
6380   AREA "Schema Area"\r
6381   INDEX-FIELD "Description" ASCENDING \r
6382 \r
6383 ADD TABLE "DocumentType"\r
6384   AREA "Schema Area"\r
6385   DESCRIPTION "Types of documents"\r
6386   DUMP-NAME "docutype"\r
6387 \r
6388 ADD FIELD "DocumentType" OF "DocumentType" AS character \r
6389   FORMAT "X(4)"\r
6390   INITIAL ?\r
6391   LABEL "Document Type"\r
6392   POSITION 2\r
6393   SQL-WIDTH 8\r
6394   COLUMN-LABEL "Code"\r
6395   LENGTH 0\r
6396   ORDER 10\r
6397   MANDATORY\r
6398 \r
6399 ADD FIELD "Description" OF "DocumentType" AS character \r
6400   FORMAT "X(20)"\r
6401   INITIAL ?\r
6402   POSITION 3\r
6403   SQL-WIDTH 40\r
6404   LENGTH 0\r
6405   ORDER 20\r
6406   MANDATORY\r
6407 \r
6408 ADD INDEX "DocumentTypes" ON "DocumentType" \r
6409   AREA "Schema Area"\r
6410   UNIQUE\r
6411   PRIMARY\r
6412   INDEX-FIELD "DocumentType" ASCENDING \r
6413 \r
6414 ADD TABLE "AccountBalance"\r
6415   AREA "Schema Area"\r
6416   DUMP-NAME "accountb"\r
6417   TABLE-TRIGGER "DELETE" OVERRIDE PROCEDURE "deactbal.p" CRC "?" \r
6418   TABLE-TRIGGER "WRITE" OVERRIDE PROCEDURE "wractbal.p" CRC "?" \r
6419 \r
6420 ADD FIELD "EntityType" OF "AccountBalance" AS character \r
6421   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
6422   FORMAT "X"\r
6423   INITIAL ?\r
6424   LABEL "Entity type"\r
6425   POSITION 2\r
6426   SQL-WIDTH 2\r
6427   COLUMN-LABEL "T"\r
6428   COLUMN-LABEL-SA "C"\r
6429   LENGTH 0\r
6430   ORDER 70\r
6431   MANDATORY\r
6432 \r
6433 ADD FIELD "EntityCode" OF "AccountBalance" AS integer \r
6434   FORMAT "99999"\r
6435   INITIAL ?\r
6436   LABEL "Code"\r
6437   POSITION 3\r
6438   SQL-WIDTH 4\r
6439   COLUMN-LABEL-SA "C"\r
6440   ORDER 80\r
6441   MANDATORY\r
6442 \r
6443 ADD FIELD "AccountCode" OF "AccountBalance" AS decimal \r
6444   DESCRIPTION "The code of the account from within the chart of accounts that this ledger account applies to."\r
6445   FORMAT "9999.99"\r
6446   INITIAL ?\r
6447   LABEL "Account"\r
6448   POSITION 4\r
6449   SQL-WIDTH 17\r
6450   DECIMALS 2\r
6451   ORDER 90\r
6452   MANDATORY\r
6453 \r
6454 ADD FIELD "MonthCode" OF "AccountBalance" AS integer \r
6455   DESCRIPTION "The code of the month that this account applies to."\r
6456   FORMAT ">>>>>9"\r
6457   INITIAL ?\r
6458   LABEL "Month"\r
6459   POSITION 5\r
6460   SQL-WIDTH 4\r
6461   ORDER 100\r
6462   MANDATORY\r
6463 \r
6464 ADD FIELD "Balance" OF "AccountBalance" AS decimal \r
6465   DESCRIPTION "The sum of the months transactions against this creditor ledger account."\r
6466   FORMAT "->>,>>>,>>>,>>9.99"\r
6467   INITIAL "0"\r
6468   POSITION 6\r
6469   SQL-WIDTH 17\r
6470   DECIMALS 2\r
6471   ORDER 110\r
6472 \r
6473 ADD FIELD "Budget" OF "AccountBalance" AS decimal \r
6474   FORMAT "->>,>>>,>>>,>>9.99"\r
6475   INITIAL "0"\r
6476   POSITION 7\r
6477   SQL-WIDTH 17\r
6478   DECIMALS 2\r
6479   ORDER 120\r
6480 \r
6481 ADD FIELD "RevisedBudget" OF "AccountBalance" AS decimal \r
6482   FORMAT "->>,>>>,>>>,>>9.99"\r
6483   INITIAL "0"\r
6484   LABEL "Revised"\r
6485   POSITION 8\r
6486   SQL-WIDTH 17\r
6487   DECIMALS 2\r
6488   ORDER 130\r
6489 \r
6490 ADD FIELD "NoteCode" OF "AccountBalance" AS integer \r
6491   DESCRIPTION "A unique code identifying this note."\r
6492   FORMAT ">>>>>9"\r
6493   INITIAL ?\r
6494   POSITION 9\r
6495   SQL-WIDTH 4\r
6496   ORDER 140\r
6497 \r
6498 ADD INDEX "XPKAccountBalances" ON "AccountBalance" \r
6499   AREA "Schema Area"\r
6500   UNIQUE\r
6501   PRIMARY\r
6502   INDEX-FIELD "EntityType" ASCENDING \r
6503   INDEX-FIELD "EntityCode" ASCENDING \r
6504   INDEX-FIELD "AccountCode" ASCENDING \r
6505   INDEX-FIELD "MonthCode" ASCENDING \r
6506 \r
6507 ADD INDEX "XAK1AccountBalances" ON "AccountBalance" \r
6508   AREA "Schema Area"\r
6509   INDEX-FIELD "EntityType" ASCENDING \r
6510   INDEX-FIELD "AccountCode" ASCENDING \r
6511   INDEX-FIELD "MonthCode" ASCENDING \r
6512 \r
6513 ADD TABLE "OfficeControlAccount"\r
6514   AREA "Schema Area"\r
6515   DUMP-NAME "officeco"\r
6516 \r
6517 ADD FIELD "OfficeCode" OF "OfficeControlAccount" AS character \r
6518   FORMAT "X(4)"\r
6519   INITIAL ""\r
6520   LABEL "Office"\r
6521   POSITION 2\r
6522   SQL-WIDTH 8\r
6523   HELP "Office that this control account applies to"\r
6524   LENGTH 0\r
6525   ORDER 10\r
6526   MANDATORY\r
6527 \r
6528 ADD FIELD "EntityType" OF "OfficeControlAccount" AS character \r
6529   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
6530   FORMAT "X"\r
6531   INITIAL ""\r
6532   LABEL "Entity type"\r
6533   POSITION 3\r
6534   SQL-WIDTH 2\r
6535   COLUMN-LABEL "Type"\r
6536   COLUMN-LABEL-SA "C"\r
6537   HELP "Entity type of control account"\r
6538   LENGTH 0\r
6539   ORDER 20\r
6540   MANDATORY\r
6541 \r
6542 ADD FIELD "EntityCode" OF "OfficeControlAccount" AS integer \r
6543   FORMAT "99999"\r
6544   INITIAL "0"\r
6545   LABEL "Code"\r
6546   POSITION 4\r
6547   SQL-WIDTH 4\r
6548   COLUMN-LABEL-SA "C"\r
6549   HELP "An optional entity code if applicable"\r
6550   ORDER 30\r
6551 \r
6552 ADD FIELD "AccountCode" OF "OfficeControlAccount" AS decimal \r
6553   DESCRIPTION "The code of this control account."\r
6554   FORMAT "9999.99"\r
6555   INITIAL "0"\r
6556   LABEL "Account"\r
6557   POSITION 5\r
6558   SQL-WIDTH 17\r
6559   COLUMN-LABEL-SA "C"\r
6560   HELP "The code of this control account."\r
6561   DECIMALS 2\r
6562   ORDER 40\r
6563   MANDATORY\r
6564 \r
6565 ADD FIELD "Description" OF "OfficeControlAccount" AS character \r
6566   DESCRIPTION "A description of this control account."\r
6567   FORMAT "X(50)"\r
6568   INITIAL ""\r
6569   POSITION 6\r
6570   SQL-WIDTH 100\r
6571   HELP "A description of this control account."\r
6572   LENGTH 0\r
6573   ORDER 50\r
6574 \r
6575 ADD FIELD "Name" OF "OfficeControlAccount" AS character \r
6576   FORMAT "X(12)"\r
6577   INITIAL ""\r
6578   POSITION 7\r
6579   SQL-WIDTH 24\r
6580   HELP "The name of this sequence"\r
6581   ORDER 5\r
6582   MANDATORY\r
6583 \r
6584 ADD INDEX "XPKOfficeControlAccounts" ON "OfficeControlAccount" \r
6585   AREA "Schema Area"\r
6586   PRIMARY\r
6587   INDEX-FIELD "OfficeCode" ASCENDING \r
6588   INDEX-FIELD "Name" ASCENDING \r
6589 \r
6590 ADD TABLE "AutoText"\r
6591   AREA "Schema Area"\r
6592   DUMP-NAME "autotext"\r
6593 \r
6594 ADD FIELD "AutoTextCode" OF "AutoText" AS character \r
6595   FORMAT "X(8)"\r
6596   INITIAL ?\r
6597   LABEL "Auto Text code"\r
6598   POSITION 2\r
6599   SQL-WIDTH 16\r
6600   COLUMN-LABEL "AutoCode"\r
6601   LENGTH 0\r
6602   ORDER 10\r
6603 \r
6604 ADD FIELD "Description" OF "AutoText" AS character \r
6605   FORMAT "X(256)"\r
6606   INITIAL ""\r
6607   LABEL "Auto Text Description"\r
6608   POSITION 3\r
6609   SQL-WIDTH 512\r
6610   COLUMN-LABEL "Text"\r
6611   LENGTH 0\r
6612   ORDER 20\r
6613 \r
6614 ADD INDEX "XPKAutoTextCode" ON "AutoText" \r
6615   AREA "Schema Area"\r
6616   UNIQUE\r
6617   PRIMARY\r
6618   INDEX-FIELD "AutoTextCode" ASCENDING \r
6619 \r
6620 ADD TABLE "TenantSubLease"\r
6621   AREA "Schema Area"\r
6622   DUMP-NAME "tenantsu"\r
6623 \r
6624 ADD FIELD "TenantSubLeaseCode" OF "TenantSubLease" AS integer \r
6625   FORMAT ">>>>9"\r
6626   INITIAL "0"\r
6627   LABEL "Code"\r
6628   POSITION 2\r
6629   SQL-WIDTH 4\r
6630   ORDER 10\r
6631   MANDATORY\r
6632 \r
6633 ADD FIELD "TenancyLeaseCode" OF "TenantSubLease" AS integer \r
6634   DESCRIPTION "A code used to refer to this tenancy lease"\r
6635   FORMAT "99999"\r
6636   INITIAL "0"\r
6637   LABEL "Code"\r
6638   POSITION 3\r
6639   SQL-WIDTH 4\r
6640   ORDER 20\r
6641 \r
6642 ADD FIELD "Notes" OF "TenantSubLease" AS integer \r
6643   DESCRIPTION "Any notes relating to this lease"\r
6644   FORMAT ">>>>>9"\r
6645   INITIAL "0"\r
6646   LABEL "Notes key"\r
6647   POSITION 4\r
6648   SQL-WIDTH 4\r
6649   ORDER 30\r
6650   MANDATORY\r
6651 \r
6652 ADD FIELD "Name" OF "TenantSubLease" AS character \r
6653   FORMAT "X(50)"\r
6654   INITIAL ""\r
6655   POSITION 5\r
6656   SQL-WIDTH 100\r
6657   LENGTH 0\r
6658   ORDER 40\r
6659   MANDATORY\r
6660 \r
6661 ADD INDEX "XPKTenantSubLeases" ON "TenantSubLease" \r
6662   AREA "Schema Area"\r
6663   UNIQUE\r
6664   PRIMARY\r
6665   INDEX-FIELD "TenantSubLeaseCode" ASCENDING \r
6666 \r
6667 ADD INDEX "XAK1TenantSubLease" ON "TenantSubLease" \r
6668   AREA "Schema Area"\r
6669   INDEX-FIELD "TenancyLeaseCode" ASCENDING \r
6670 \r
6671 ADD INDEX "XAK2TenantSubLeases" ON "TenantSubLease" \r
6672   AREA "Schema Area"\r
6673   INDEX-FIELD "Name" ASCENDING \r
6674 \r
6675 ADD TABLE "Usr"\r
6676   AREA "Schema Area"\r
6677   DUMP-NAME "usr"\r
6678   TABLE-TRIGGER "CREATE" OVERRIDE PROCEDURE "CRUSR.P" CRC "?" \r
6679   TABLE-TRIGGER "DELETE" OVERRIDE PROCEDURE "DEUSR.P" CRC "?" \r
6680   TABLE-TRIGGER "WRITE" OVERRIDE PROCEDURE "WRUSR.P" CRC "?" \r
6681 \r
6682 ADD FIELD "UserName" OF "Usr" AS character \r
6683   FORMAT "X(20)"\r
6684   INITIAL ""\r
6685   LABEL "User Name"\r
6686   POSITION 2\r
6687   SQL-WIDTH 40\r
6688   COLUMN-LABEL "User"\r
6689   LENGTH 0\r
6690   ORDER 10\r
6691   MANDATORY\r
6692 \r
6693 ADD FIELD "Abbreviation" OF "Usr" AS character \r
6694   FORMAT "X(4)"\r
6695   INITIAL ""\r
6696   LABEL "Abbreviation"\r
6697   POSITION 3\r
6698   SQL-WIDTH 8\r
6699   LENGTH 0\r
6700   ORDER 20\r
6701 \r
6702 ADD FIELD "PersonCode" OF "Usr" AS integer \r
6703   DESCRIPTION "The person code used to refer to this System User."\r
6704   FORMAT "99999"\r
6705   INITIAL "0"\r
6706   LABEL "Person code"\r
6707   POSITION 4\r
6708   SQL-WIDTH 4\r
6709   COLUMN-LABEL "Person"\r
6710   ORDER 30\r
6711   MANDATORY\r
6712 \r
6713 ADD INDEX "XPKUserName" ON "Usr" \r
6714   AREA "Schema Area"\r
6715   UNIQUE\r
6716   PRIMARY\r
6717   INDEX-FIELD "UserName" ASCENDING \r
6718 \r
6719 ADD INDEX "XAK1PersonCode" ON "Usr" \r
6720   AREA "Schema Area"\r
6721   INDEX-FIELD "PersonCode" ASCENDING \r
6722 \r
6723 ADD INDEX "XAK2Abbreviation" ON "Usr" \r
6724   AREA "Schema Area"\r
6725   INDEX-FIELD "Abbreviation" ASCENDING \r
6726 \r
6727 ADD TABLE "UsrGroup"\r
6728   AREA "Schema Area"\r
6729   DUMP-NAME "usrgroup"\r
6730   TABLE-TRIGGER "DELETE" OVERRIDE PROCEDURE "DEUSRGRP.P" CRC "?" \r
6731   TABLE-TRIGGER "WRITE" OVERRIDE PROCEDURE "WRUSRGRP.P" CRC "?" \r
6732 \r
6733 ADD FIELD "GroupName" OF "UsrGroup" AS character \r
6734   FORMAT "X(20)"\r
6735   INITIAL ""\r
6736   LABEL "Group Name"\r
6737   POSITION 2\r
6738   SQL-WIDTH 40\r
6739   COLUMN-LABEL "Group"\r
6740   LENGTH 0\r
6741   ORDER 10\r
6742   MANDATORY\r
6743 \r
6744 ADD FIELD "Description" OF "UsrGroup" AS character \r
6745   FORMAT "X(50)"\r
6746   INITIAL ""\r
6747   POSITION 3\r
6748   SQL-WIDTH 100\r
6749   LENGTH 0\r
6750   ORDER 20\r
6751 \r
6752 ADD FIELD "Sequence" OF "UsrGroup" AS integer \r
6753   FORMAT "->,>>>,>>9"\r
6754   INITIAL "0"\r
6755   POSITION 4\r
6756   SQL-WIDTH 4\r
6757   ORDER 30\r
6758 \r
6759 ADD INDEX "XPKUsrGroup" ON "UsrGroup" \r
6760   AREA "Schema Area"\r
6761   UNIQUE\r
6762   PRIMARY\r
6763   INDEX-FIELD "GroupName" ASCENDING \r
6764 \r
6765 ADD INDEX "XAK1UsrGroup" ON "UsrGroup" \r
6766   AREA "Schema Area"\r
6767   INDEX-FIELD "Sequence" ASCENDING \r
6768 \r
6769 ADD TABLE "ProgramLink"\r
6770   AREA "Schema Area"\r
6771   DUMP-NAME "programl"\r
6772   TABLE-TRIGGER "CREATE" OVERRIDE PROCEDURE "CRPRGLNK.P" CRC "?" \r
6773   TABLE-TRIGGER "DELETE" OVERRIDE PROCEDURE "DEPRGLNK.P" CRC "?" \r
6774   TABLE-TRIGGER "WRITE" OVERRIDE PROCEDURE "WRPRGLNK.P" CRC "?" \r
6775 \r
6776 ADD FIELD "LinkType" OF "ProgramLink" AS character \r
6777   FORMAT "X(3)"\r
6778   INITIAL ""\r
6779   LABEL "Link Type"\r
6780   POSITION 2\r
6781   SQL-WIDTH 6\r
6782   LENGTH 0\r
6783   ORDER 10\r
6784   MANDATORY\r
6785 \r
6786 ADD FIELD "Description" OF "ProgramLink" AS character \r
6787   FORMAT "X(70)"\r
6788   INITIAL ""\r
6789   POSITION 3\r
6790   SQL-WIDTH 140\r
6791   LENGTH 0\r
6792   ORDER 20\r
6793   MANDATORY\r
6794 \r
6795 ADD FIELD "Source" OF "ProgramLink" AS integer \r
6796   FORMAT ">>9"\r
6797   INITIAL "0"\r
6798   POSITION 4\r
6799   SQL-WIDTH 4\r
6800   ORDER 30\r
6801   MANDATORY\r
6802 \r
6803 ADD FIELD "Target" OF "ProgramLink" AS integer \r
6804   FORMAT ">>9"\r
6805   INITIAL "0"\r
6806   POSITION 5\r
6807   SQL-WIDTH 4\r
6808   ORDER 40\r
6809   MANDATORY\r
6810 \r
6811 ADD FIELD "Viewer" OF "ProgramLink" AS character \r
6812   FORMAT "X(8)"\r
6813   INITIAL ""\r
6814   POSITION 6\r
6815   SQL-WIDTH 16\r
6816   LENGTH 0\r
6817   ORDER 50\r
6818 \r
6819 ADD FIELD "Function" OF "ProgramLink" AS character \r
6820   FORMAT "X(20)"\r
6821   INITIAL ""\r
6822   POSITION 7\r
6823   SQL-WIDTH 40\r
6824   LENGTH 0\r
6825   ORDER 80\r
6826 \r
6827 ADD FIELD "CreateViewer" OF "ProgramLink" AS logical \r
6828   FORMAT "Y/N"\r
6829   INITIAL "Y"\r
6830   POSITION 8\r
6831   SQL-WIDTH 1\r
6832   ORDER 75\r
6833 \r
6834 ADD FIELD "ButtonLabel" OF "ProgramLink" AS character \r
6835   FORMAT "X(20)"\r
6836   INITIAL ""\r
6837   POSITION 9\r
6838   SQL-WIDTH 40\r
6839   LENGTH 0\r
6840   ORDER 47\r
6841 \r
6842 ADD FIELD "FillName" OF "ProgramLink" AS character \r
6843   FORMAT "X(20)"\r
6844   INITIAL ""\r
6845   POSITION 10\r
6846   SQL-WIDTH 40\r
6847   LENGTH 0\r
6848   ORDER 100\r
6849 \r
6850 ADD FIELD "CodeName" OF "ProgramLink" AS character \r
6851   FORMAT "X(20)"\r
6852   INITIAL ""\r
6853   POSITION 11\r
6854   SQL-WIDTH 40\r
6855   LENGTH 0\r
6856   ORDER 110\r
6857 \r
6858 ADD FIELD "LinkCode" OF "ProgramLink" AS integer \r
6859   FORMAT ">>>9"\r
6860   INITIAL "0"\r
6861   POSITION 12\r
6862   SQL-WIDTH 4\r
6863   ORDER 5\r
6864 \r
6865 ADD FIELD "SortPanel" OF "ProgramLink" AS logical \r
6866   FORMAT "Y/N"\r
6867   INITIAL "N"\r
6868   POSITION 13\r
6869   SQL-WIDTH 1\r
6870   VIEW-AS "VIEW-AS TOGGLE-BOX"\r
6871   ORDER 120\r
6872 \r
6873 ADD FIELD "FilterPanel" OF "ProgramLink" AS logical \r
6874   FORMAT "Y/N"\r
6875   INITIAL "N"\r
6876   POSITION 14\r
6877   SQL-WIDTH 1\r
6878   VIEW-AS "VIEW-AS TOGGLE-BOX"\r
6879   ORDER 130\r
6880 \r
6881 ADD INDEX "XPKLinkCode" ON "ProgramLink" \r
6882   AREA "Schema Area"\r
6883   UNIQUE\r
6884   PRIMARY\r
6885   INDEX-FIELD "LinkCode" ASCENDING \r
6886 \r
6887 ADD INDEX "XAK1ProgramLinkSrc" ON "ProgramLink" \r
6888   AREA "Schema Area"\r
6889   INDEX-FIELD "Source" ASCENDING \r
6890   INDEX-FIELD "Description" ASCENDING \r
6891 \r
6892 ADD INDEX "XAK2ProgramLinkTgt" ON "ProgramLink" \r
6893   AREA "Schema Area"\r
6894   INDEX-FIELD "Target" ASCENDING \r
6895   INDEX-FIELD "Description" ASCENDING \r
6896 \r
6897 ADD TABLE "UsrGroupMember"\r
6898   AREA "Schema Area"\r
6899   DUMP-NAME "usrgrpmm"\r
6900   TABLE-TRIGGER "CREATE" OVERRIDE PROCEDURE "CRUSGMEM.P" CRC "?" \r
6901   TABLE-TRIGGER "DELETE" OVERRIDE PROCEDURE "DEUSGMEM.P" CRC "?" \r
6902   TABLE-TRIGGER "WRITE" OVERRIDE PROCEDURE "WRUSGMEM.P" CRC "?" \r
6903 \r
6904 ADD FIELD "UserName" OF "UsrGroupMember" AS character \r
6905   FORMAT "X(20)"\r
6906   INITIAL ?\r
6907   LABEL "User Name"\r
6908   POSITION 2\r
6909   SQL-WIDTH 40\r
6910   COLUMN-LABEL "User"\r
6911   LENGTH 0\r
6912   ORDER 10\r
6913   MANDATORY\r
6914 \r
6915 ADD FIELD "GroupName" OF "UsrGroupMember" AS character \r
6916   FORMAT "X(20)"\r
6917   INITIAL ""\r
6918   LABEL "Group Name"\r
6919   POSITION 3\r
6920   SQL-WIDTH 40\r
6921   COLUMN-LABEL "Group"\r
6922   LENGTH 0\r
6923   ORDER 20\r
6924   MANDATORY\r
6925 \r
6926 ADD INDEX "XPKUserGroup" ON "UsrGroupMember" \r
6927   AREA "Schema Area"\r
6928   UNIQUE\r
6929   PRIMARY\r
6930   INDEX-FIELD "UserName" ASCENDING \r
6931   INDEX-FIELD "GroupName" ASCENDING \r
6932 \r
6933 ADD INDEX "XAK1GroupUser" ON "UsrGroupMember" \r
6934   AREA "Schema Area"\r
6935   UNIQUE\r
6936   INDEX-FIELD "GroupName" ASCENDING \r
6937   INDEX-FIELD "UserName" ASCENDING \r
6938 \r
6939 ADD TABLE "UsrGroupMenuItem"\r
6940   AREA "Schema Area"\r
6941   DUMP-NAME "usrgrpmi"\r
6942   TABLE-TRIGGER "CREATE" OVERRIDE PROCEDURE "CRUSGMNI.P" CRC "?" \r
6943   TABLE-TRIGGER "DELETE" OVERRIDE PROCEDURE "DEUSGMNI.P" CRC "?" \r
6944   TABLE-TRIGGER "WRITE" OVERRIDE PROCEDURE "WRUSGMNI.P" CRC "?" \r
6945 \r
6946 ADD FIELD "LinkCode" OF "UsrGroupMenuItem" AS integer \r
6947   FORMAT ">>>9"\r
6948   INITIAL "0"\r
6949   POSITION 2\r
6950   SQL-WIDTH 4\r
6951   ORDER 30\r
6952 \r
6953 ADD FIELD "GroupName" OF "UsrGroupMenuItem" AS character \r
6954   FORMAT "X(20)"\r
6955   INITIAL ""\r
6956   LABEL "Group Name"\r
6957   POSITION 3\r
6958   SQL-WIDTH 40\r
6959   COLUMN-LABEL "Group"\r
6960   LENGTH 0\r
6961   ORDER 10\r
6962   MANDATORY\r
6963 \r
6964 ADD FIELD "SequenceCode" OF "UsrGroupMenuItem" AS integer \r
6965   FORMAT ">9"\r
6966   INITIAL "0"\r
6967   POSITION 4\r
6968   SQL-WIDTH 4\r
6969   ORDER 40\r
6970 \r
6971 ADD FIELD "ButtonLabel" OF "UsrGroupMenuItem" AS character \r
6972   DESCRIPTION "If this button is non null then it will be used in place of the default label"\r
6973   FORMAT "X(20)"\r
6974   INITIAL ""\r
6975   POSITION 5\r
6976   SQL-WIDTH 40\r
6977   LENGTH 0\r
6978   ORDER 50\r
6979 \r
6980 ADD FIELD "MenuName" OF "UsrGroupMenuItem" AS character \r
6981   FORMAT "X(30)"\r
6982   INITIAL ""\r
6983   POSITION 6\r
6984   SQL-WIDTH 60\r
6985   LENGTH 0\r
6986   ORDER 20\r
6987   MANDATORY\r
6988 \r
6989 ADD INDEX "XPKGroupMenu" ON "UsrGroupMenuItem" \r
6990   AREA "Schema Area"\r
6991   PRIMARY\r
6992   INDEX-FIELD "GroupName" ASCENDING \r
6993   INDEX-FIELD "MenuName" ASCENDING \r
6994   INDEX-FIELD "SequenceCode" ASCENDING \r
6995 \r
6996 ADD INDEX "XAK1LinkCode" ON "UsrGroupMenuItem" \r
6997   AREA "Schema Area"\r
6998   INDEX-FIELD "LinkCode" ASCENDING \r
6999 \r
7000 ADD TABLE "LinkNode"\r
7001   AREA "Schema Area"\r
7002   DUMP-NAME "linknode"\r
7003   TABLE-TRIGGER "CREATE" OVERRIDE PROCEDURE "CRLNKNDE.P" CRC "?" \r
7004   TABLE-TRIGGER "DELETE" OVERRIDE PROCEDURE "DELNKNDE.P" CRC "?" \r
7005   TABLE-TRIGGER "WRITE" OVERRIDE PROCEDURE "WRLNKNDE.P" CRC "?" \r
7006 \r
7007 ADD FIELD "NodeCode" OF "LinkNode" AS integer \r
7008   FORMAT ">>9"\r
7009   INITIAL "0"\r
7010   POSITION 2\r
7011   SQL-WIDTH 4\r
7012   ORDER 10\r
7013   MANDATORY\r
7014 \r
7015 ADD FIELD "NodeType" OF "LinkNode" AS character \r
7016   DESCRIPTION "The type of the system window i.e Menu, Drill, Maintain etc\r
7017 "\r
7018   FORMAT "XX"\r
7019   INITIAL ""\r
7020   POSITION 3\r
7021   SQL-WIDTH 4\r
7022   LENGTH 0\r
7023   ORDER 20\r
7024   MANDATORY\r
7025 \r
7026 ADD FIELD "Description" OF "LinkNode" AS character \r
7027   FORMAT "X(70)"\r
7028   INITIAL ""\r
7029   POSITION 4\r
7030   SQL-WIDTH 140\r
7031   LENGTH 0\r
7032   ORDER 30\r
7033 \r
7034 ADD FIELD "Path" OF "LinkNode" AS character \r
7035   FORMAT "X(30)"\r
7036   INITIAL ""\r
7037   POSITION 5\r
7038   SQL-WIDTH 60\r
7039   LENGTH 0\r
7040   ORDER 40\r
7041   MANDATORY\r
7042 \r
7043 ADD FIELD "File" OF "LinkNode" AS character \r
7044   FORMAT "X(8)"\r
7045   INITIAL ""\r
7046   POSITION 6\r
7047   SQL-WIDTH 16\r
7048   LENGTH 0\r
7049   ORDER 50\r
7050   MANDATORY\r
7051 \r
7052 ADD FIELD "RunFile" OF "LinkNode" AS character \r
7053   FORMAT "X(8)"\r
7054   INITIAL ""\r
7055   POSITION 7\r
7056   SQL-WIDTH 16\r
7057   LENGTH 0\r
7058   ORDER 60\r
7059 \r
7060 ADD INDEX "XPKNodeCode" ON "LinkNode" \r
7061   AREA "Schema Area"\r
7062   UNIQUE\r
7063   PRIMARY\r
7064   INDEX-FIELD "NodeCode" ASCENDING \r
7065 \r
7066 ADD INDEX "XAK1NodeType" ON "LinkNode" \r
7067   AREA "Schema Area"\r
7068   UNIQUE\r
7069   INDEX-FIELD "NodeType" ASCENDING \r
7070   INDEX-FIELD "Description" ASCENDING \r
7071 \r
7072 ADD INDEX "XAK2File" ON "LinkNode" \r
7073   AREA "Schema Area"\r
7074   UNIQUE\r
7075   INDEX-FIELD "File" ASCENDING \r
7076 \r
7077 ADD INDEX "XAK2NodeType" ON "LinkNode" \r
7078   AREA "Schema Area"\r
7079   INDEX-FIELD "NodeType" ASCENDING \r
7080 \r
7081 ADD TABLE "OutgoingDescription"\r
7082   AREA "Schema Area"\r
7083   DUMP-NAME "outgodes"\r
7084 \r
7085 ADD FIELD "Percentage" OF "OutgoingDescription" AS decimal \r
7086   FORMAT "->>9.99"\r
7087   INITIAL "0"\r
7088   LABEL "%age"\r
7089   POSITION 2\r
7090   SQL-WIDTH 17\r
7091   HELP "Percentage of this outgoing"\r
7092   DECIMALS 2\r
7093   ORDER 20\r
7094   MANDATORY\r
7095 \r
7096 ADD FIELD "TenancyLeaseCode" OF "OutgoingDescription" AS integer \r
7097   DESCRIPTION "A code used to refer to this tenancy lease"\r
7098   FORMAT "99999"\r
7099   INITIAL "0"\r
7100   LABEL "Code"\r
7101   POSITION 3\r
7102   SQL-WIDTH 4\r
7103   ORDER 10\r
7104   MANDATORY\r
7105 \r
7106 ADD FIELD "Description" OF "OutgoingDescription" AS character \r
7107   FORMAT "X(50)"\r
7108   INITIAL ""\r
7109   LABEL "Description"\r
7110   POSITION 4\r
7111   SQL-WIDTH 100\r
7112   LENGTH 0\r
7113   ORDER 30\r
7114   MANDATORY\r
7115 \r
7116 ADD INDEX "XPKOutgoingDescriptions" ON "OutgoingDescription" \r
7117   AREA "Schema Area"\r
7118   PRIMARY\r
7119   INDEX-FIELD "TenancyLeaseCode" ASCENDING \r
7120 \r
7121 ADD TABLE "AccountSummary"\r
7122   AREA "Schema Area"\r
7123   DUMP-NAME "accounts"\r
7124 \r
7125 ADD FIELD "EntityType" OF "AccountSummary" AS character \r
7126   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
7127   FORMAT "X"\r
7128   INITIAL ?\r
7129   LABEL "Entity type"\r
7130   POSITION 2\r
7131   SQL-WIDTH 2\r
7132   COLUMN-LABEL "T"\r
7133   COLUMN-LABEL-SA "C"\r
7134   LENGTH 0\r
7135   ORDER 10\r
7136   MANDATORY\r
7137 \r
7138 ADD FIELD "EntityCode" OF "AccountSummary" AS integer \r
7139   FORMAT "99999"\r
7140   INITIAL ?\r
7141   LABEL "Code"\r
7142   POSITION 3\r
7143   SQL-WIDTH 4\r
7144   COLUMN-LABEL-SA "C"\r
7145   ORDER 20\r
7146   MANDATORY\r
7147 \r
7148 ADD FIELD "AccountCode" OF "AccountSummary" AS decimal \r
7149   DESCRIPTION "The code of the account from within the chart of accounts that this ledger account applies to."\r
7150   FORMAT "9999.99"\r
7151   INITIAL ?\r
7152   LABEL "Account"\r
7153   POSITION 4\r
7154   SQL-WIDTH 17\r
7155   DECIMALS 2\r
7156   ORDER 30\r
7157   MANDATORY\r
7158 \r
7159 ADD FIELD "Balance" OF "AccountSummary" AS decimal \r
7160   DESCRIPTION "The sum of the months transactions against this creditor ledger account."\r
7161   FORMAT "->>,>>>,>>>,>>9.99"\r
7162   INITIAL "0"\r
7163   POSITION 5\r
7164   SQL-WIDTH 17\r
7165   DECIMALS 2\r
7166   ORDER 40\r
7167 \r
7168 ADD FIELD "Budget" OF "AccountSummary" AS decimal \r
7169   FORMAT "->>,>>>,>>>,>>9.99"\r
7170   INITIAL "0"\r
7171   POSITION 6\r
7172   SQL-WIDTH 17\r
7173   DECIMALS 2\r
7174   ORDER 50\r
7175 \r
7176 ADD FIELD "RevisedBudget" OF "AccountSummary" AS decimal \r
7177   FORMAT "->>,>>>,>>>,>>9.99"\r
7178   INITIAL "0"\r
7179   LABEL "Revised"\r
7180   POSITION 7\r
7181   SQL-WIDTH 17\r
7182   DECIMALS 2\r
7183   ORDER 60\r
7184 \r
7185 ADD FIELD "NoteCode" OF "AccountSummary" AS integer \r
7186   DESCRIPTION "A unique code identifying this note."\r
7187   FORMAT ">>>>>9"\r
7188   INITIAL ?\r
7189   POSITION 8\r
7190   SQL-WIDTH 4\r
7191   ORDER 70\r
7192 \r
7193 ADD INDEX "XPKAccountSummary" ON "AccountSummary" \r
7194   AREA "Schema Area"\r
7195   UNIQUE\r
7196   PRIMARY\r
7197   INDEX-FIELD "EntityType" ASCENDING \r
7198   INDEX-FIELD "EntityCode" ASCENDING \r
7199   INDEX-FIELD "AccountCode" ASCENDING \r
7200 \r
7201 ADD INDEX "XAK1AccountCode" ON "AccountSummary" \r
7202   AREA "Schema Area"\r
7203   INDEX-FIELD "AccountCode" ASCENDING \r
7204 \r
7205 ADD TABLE "Voucher"\r
7206   AREA "Schema Area"\r
7207   LABEL "Voucher"\r
7208   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
7209   DUMP-NAME "voucher"\r
7210   TABLE-TRIGGER "CREATE" OVERRIDE PROCEDURE "crvouchr.p" CRC "?" \r
7211   TABLE-TRIGGER "WRITE" OVERRIDE PROCEDURE "wrvouchr.p" CRC "?" \r
7212 \r
7213 ADD FIELD "CreditorCode" OF "Voucher" AS integer \r
7214   DESCRIPTION "The code of the Creditor that this Voucher applies to."\r
7215   FORMAT "99999"\r
7216   INITIAL "0"\r
7217   POSITION 2\r
7218   SQL-WIDTH 4\r
7219   ORDER 10\r
7220 \r
7221 ADD FIELD "Date" OF "Voucher" AS date \r
7222   DESCRIPTION "The date applying to the voucher."\r
7223   FORMAT "99/99/9999"\r
7224   INITIAL ?\r
7225   POSITION 3\r
7226   SQL-WIDTH 4\r
7227   ORDER 20\r
7228 \r
7229 ADD FIELD "InvoiceReference" OF "Voucher" AS character \r
7230   DESCRIPTION "Reference to the invoice that the voucher applies to.\r
7231 "\r
7232   FORMAT "X(20)"\r
7233   INITIAL ""\r
7234   POSITION 4\r
7235   SQL-WIDTH 40\r
7236   LENGTH 0\r
7237   ORDER 30\r
7238 \r
7239 ADD FIELD "OurOrderNo" OF "Voucher" AS character \r
7240   DESCRIPTION "Internal order number for this voucher.\r
7241 "\r
7242   FORMAT "X(20)"\r
7243   INITIAL ""\r
7244   POSITION 5\r
7245   SQL-WIDTH 40\r
7246   LENGTH 0\r
7247   ORDER 40\r
7248 \r
7249 ADD FIELD "CapExCode" OF "Voucher" AS integer \r
7250   DESCRIPTION "Code for the Capital Expenditure that this voucher applies to."\r
7251   FORMAT "99999"\r
7252   INITIAL "0"\r
7253   POSITION 6\r
7254   SQL-WIDTH 4\r
7255   ORDER 50\r
7256 \r
7257 ADD FIELD "ApproverCode" OF "Voucher" AS character \r
7258   DESCRIPTION "The short alpha code for the person who approved the voucher."\r
7259   FORMAT "X(4)"\r
7260   INITIAL ""\r
7261   LABEL "Approval"\r
7262   POSITION 7\r
7263   SQL-WIDTH 8\r
7264   LENGTH 0\r
7265   ORDER 60\r
7266 \r
7267 ADD FIELD "GoodsValue" OF "Voucher" AS decimal \r
7268   DESCRIPTION "Value of the goods for this voucher."\r
7269   FORMAT "->,>>>,>>9.99"\r
7270   INITIAL "0"\r
7271   POSITION 8\r
7272   SQL-WIDTH 17\r
7273   DECIMALS 2\r
7274   ORDER 70\r
7275 \r
7276 ADD FIELD "TaxValue" OF "Voucher" AS decimal \r
7277   DESCRIPTION "Tax value for the goods of this voucher."\r
7278   FORMAT "->>>,>>9.99"\r
7279   INITIAL "0"\r
7280   POSITION 9\r
7281   SQL-WIDTH 17\r
7282   DECIMALS 2\r
7283   ORDER 80\r
7284 \r
7285 ADD FIELD "Description" OF "Voucher" AS character \r
7286   DESCRIPTION "Description of the voucher."\r
7287   FORMAT "X(50)"\r
7288   INITIAL ""\r
7289   POSITION 10\r
7290   SQL-WIDTH 100\r
7291   LENGTH 0\r
7292   ORDER 90\r
7293 \r
7294 ADD FIELD "BatchCode" OF "Voucher" AS integer \r
7295   FORMAT "9999999"\r
7296   INITIAL "0"\r
7297   POSITION 11\r
7298   SQL-WIDTH 4\r
7299   ORDER 100\r
7300 \r
7301 ADD FIELD "DocumentCode" OF "Voucher" AS integer \r
7302   DESCRIPTION "The code of the document that this voucher applies to."\r
7303   FORMAT "9999999"\r
7304   INITIAL "0"\r
7305   POSITION 12\r
7306   SQL-WIDTH 4\r
7307   ORDER 110\r
7308 \r
7309 ADD FIELD "BankAccountCode" OF "Voucher" AS character \r
7310   FORMAT "X(4)"\r
7311   INITIAL ""\r
7312   LABEL "Bank a/c"\r
7313   POSITION 13\r
7314   SQL-WIDTH 8\r
7315   LENGTH 0\r
7316   ORDER 240\r
7317   MANDATORY\r
7318 \r
7319 ADD FIELD "DateDue" OF "Voucher" AS date \r
7320   DESCRIPTION "Due Date for voucher resolution."\r
7321   FORMAT "99/99/9999"\r
7322   INITIAL ?\r
7323   POSITION 14\r
7324   SQL-WIDTH 4\r
7325   ORDER 130\r
7326 \r
7327 ADD FIELD "VoucherSeq" OF "Voucher" AS integer \r
7328   DESCRIPTION "Unique sequence number for this voucher."\r
7329   FORMAT "99999999"\r
7330   INITIAL "0"\r
7331   POSITION 15\r
7332   SQL-WIDTH 4\r
7333   ORDER 140\r
7334 \r
7335 ADD FIELD "AccountCode" OF "Voucher" AS decimal \r
7336   DESCRIPTION "The code of the account that this voucher applies to.\r
7337 "\r
7338   FORMAT "9999.99"\r
7339   INITIAL "0"\r
7340   POSITION 16\r
7341   SQL-WIDTH 17\r
7342   DECIMALS 2\r
7343   ORDER 170\r
7344 \r
7345 ADD FIELD "VoucherStatus" OF "Voucher" AS character \r
7346   DESCRIPTION "The code for the voucher status that this voucher applies to.\r
7347 "\r
7348   FORMAT "X(4)"\r
7349   INITIAL ""\r
7350   POSITION 17\r
7351   SQL-WIDTH 8\r
7352   LENGTH 0\r
7353   ORDER 180\r
7354 \r
7355 ADD FIELD "EntityType" OF "Voucher" AS character \r
7356   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
7357   FORMAT "X"\r
7358   INITIAL "P"\r
7359   LABEL "Entity type"\r
7360   POSITION 18\r
7361   SQL-WIDTH 2\r
7362   COLUMN-LABEL "T"\r
7363   COLUMN-LABEL-SA "C"\r
7364   LENGTH 0\r
7365   ORDER 190\r
7366 \r
7367 ADD FIELD "EntityCode" OF "Voucher" AS integer \r
7368   FORMAT "99999"\r
7369   INITIAL "0"\r
7370   LABEL "Code"\r
7371   POSITION 19\r
7372   SQL-WIDTH 4\r
7373   COLUMN-LABEL-SA "C"\r
7374   ORDER 200\r
7375 \r
7376 ADD FIELD "LastModifiedDate" OF "Voucher" AS date \r
7377   DESCRIPTION "The date when this record was last modified.  Maintained by a WRITE trigger."\r
7378   FORMAT "99/99/9999"\r
7379   INITIAL "1/1/0001"\r
7380   POSITION 20\r
7381   SQL-WIDTH 4\r
7382   ORDER 210\r
7383   MANDATORY\r
7384 \r
7385 ADD FIELD "LastModifiedTime" OF "Voucher" AS integer \r
7386   DESCRIPTION "The time that this record was last modified"\r
7387   FORMAT "->,>>>,>>9"\r
7388   INITIAL "0"\r
7389   POSITION 21\r
7390   SQL-WIDTH 4\r
7391   ORDER 220\r
7392 \r
7393 ADD FIELD "LastModifiedUser" OF "Voucher" AS character \r
7394   DESCRIPTION "The user who last modified this record.  Maintained by a WRITE trigger."\r
7395   FORMAT "X(8)"\r
7396   INITIAL ""\r
7397   POSITION 22\r
7398   SQL-WIDTH 16\r
7399   LENGTH 0\r
7400   ORDER 230\r
7401 \r
7402 ADD FIELD "ChequeNo" OF "Voucher" AS integer \r
7403   DESCRIPTION "Number identifying the cheque."\r
7404   FORMAT "999999"\r
7405   INITIAL "0"\r
7406   LABEL "Cheque"\r
7407   POSITION 23\r
7408   SQL-WIDTH 4\r
7409   ORDER 250\r
7410 \r
7411 ADD FIELD "SecondApprover" OF "Voucher" AS character \r
7412   DESCRIPTION "The short alpha code for the person who approved the voucher."\r
7413   FORMAT "X(4)"\r
7414   INITIAL ""\r
7415   LABEL "Second Approval"\r
7416   POSITION 24\r
7417   SQL-WIDTH 8\r
7418   LENGTH 0\r
7419   ORDER 260\r
7420 \r
7421 ADD FIELD "OrderCode" OF "Voucher" AS integer \r
7422   FORMAT ">>>>9"\r
7423   INITIAL "0"\r
7424   POSITION 25\r
7425   SQL-WIDTH 4\r
7426   ORDER 270\r
7427 \r
7428 ADD FIELD "ProjectCode" OF "Voucher" AS integer \r
7429   FORMAT "99999"\r
7430   INITIAL "0"\r
7431   POSITION 26\r
7432   SQL-WIDTH 4\r
7433   ORDER 280\r
7434 \r
7435 ADD FIELD "CreatedDate" OF "Voucher" AS date \r
7436   FORMAT "99/99/9999"\r
7437   INITIAL ?\r
7438   LABEL "Created"\r
7439   POSITION 27\r
7440   SQL-WIDTH 4\r
7441   ORDER 290\r
7442 \r
7443 ADD FIELD "PaymentStyle" OF "Voucher" AS character \r
7444   FORMAT "X(4)"\r
7445   INITIAL "CHEQ"\r
7446   LABEL "Pay By"\r
7447   POSITION 28\r
7448   SQL-WIDTH 8\r
7449   ORDER 300\r
7450 \r
7451 ADD FIELD "InvoicePeriod" OF "Voucher" AS character \r
7452   FORMAT "X(15)"\r
7453   INITIAL ""\r
7454   LABEL "Period"\r
7455   POSITION 29\r
7456   SQL-WIDTH 30\r
7457   COLUMN-LABEL "Invoice Period"\r
7458   ORDER 310\r
7459 \r
7460 ADD INDEX "VoucherSeq" ON "Voucher" \r
7461   AREA "Schema Area"\r
7462   UNIQUE\r
7463   PRIMARY\r
7464   INDEX-FIELD "VoucherSeq" ASCENDING \r
7465 \r
7466 ADD INDEX "XAK10Vouchers" ON "Voucher" \r
7467   AREA "Schema Area"\r
7468   INDEX-FIELD "CreditorCode" ASCENDING \r
7469   INDEX-FIELD "VoucherStatus" ASCENDING \r
7470   INDEX-FIELD "DateDue" ASCENDING \r
7471 \r
7472 ADD INDEX "XAK11Vouchers" ON "Voucher" \r
7473   AREA "Schema Area"\r
7474   INDEX-FIELD "BankAccountCode" ASCENDING \r
7475   INDEX-FIELD "ChequeNo" ASCENDING \r
7476 \r
7477 ADD INDEX "XAK12Vouchers" ON "Voucher" \r
7478   AREA "Schema Area"\r
7479   INDEX-FIELD "ProjectCode" ASCENDING \r
7480   INDEX-FIELD "OrderCode" ASCENDING \r
7481 \r
7482 ADD INDEX "XAK13Vouchers" ON "Voucher" \r
7483   AREA "Schema Area"\r
7484   INDEX-FIELD "ApproverCode" ASCENDING \r
7485   INDEX-FIELD "VoucherStatus" ASCENDING \r
7486   INDEX-FIELD "Date" ASCENDING \r
7487 \r
7488 ADD INDEX "XAK2Vouchers" ON "Voucher" \r
7489   AREA "Schema Area"\r
7490   INDEX-FIELD "EntityType" ASCENDING \r
7491   INDEX-FIELD "EntityCode" ASCENDING \r
7492   INDEX-FIELD "VoucherSeq" ASCENDING \r
7493 \r
7494 ADD INDEX "XAK3Vouchers" ON "Voucher" \r
7495   AREA "Schema Area"\r
7496   INDEX-FIELD "CreditorCode" ASCENDING \r
7497   INDEX-FIELD "VoucherSeq" ASCENDING \r
7498 \r
7499 ADD INDEX "XAK4Vouchers" ON "Voucher" \r
7500   AREA "Schema Area"\r
7501   INDEX-FIELD "ApproverCode" ASCENDING \r
7502   INDEX-FIELD "VoucherSeq" DESCENDING \r
7503 \r
7504 ADD INDEX "XAK5Vouchers" ON "Voucher" \r
7505   AREA "Schema Area"\r
7506   INDEX-FIELD "VoucherStatus" ASCENDING \r
7507   INDEX-FIELD "VoucherSeq" ASCENDING \r
7508 \r
7509 ADD INDEX "XAK6Vouchers" ON "Voucher" \r
7510   AREA "Schema Area"\r
7511   INDEX-FIELD "EntityType" ASCENDING \r
7512   INDEX-FIELD "EntityCode" ASCENDING \r
7513   INDEX-FIELD "AccountCode" ASCENDING \r
7514 \r
7515 ADD INDEX "XAK7Vouchers" ON "Voucher" \r
7516   AREA "Schema Area"\r
7517   INDEX-FIELD "VoucherStatus" ASCENDING \r
7518   INDEX-FIELD "EntityType" ASCENDING \r
7519   INDEX-FIELD "EntityCode" ASCENDING \r
7520   INDEX-FIELD "AccountCode" ASCENDING \r
7521 \r
7522 ADD INDEX "XAK8Vouchers" ON "Voucher" \r
7523   AREA "Schema Area"\r
7524   INDEX-FIELD "Date" DESCENDING \r
7525 \r
7526 ADD INDEX "XAK9Vouchers" ON "Voucher" \r
7527   AREA "Schema Area"\r
7528   INDEX-FIELD "VoucherStatus" DESCENDING \r
7529   INDEX-FIELD "Date" DESCENDING \r
7530 \r
7531 ADD TABLE "ShareHolder"\r
7532   AREA "Schema Area"\r
7533   DUMP-NAME "sharehol"\r
7534   TABLE-TRIGGER "DELETE" OVERRIDE PROCEDURE "deshrhld.p" CRC "?" \r
7535 \r
7536 ADD FIELD "CompanyCode" OF "ShareHolder" AS integer \r
7537   DESCRIPTION "The code of the company that this person is a shareholder of."\r
7538   FORMAT "99999"\r
7539   INITIAL "0"\r
7540   LABEL "Company"\r
7541   POSITION 2\r
7542   SQL-WIDTH 4\r
7543   ORDER 10\r
7544 \r
7545 ADD FIELD "PersonCode" OF "ShareHolder" AS integer \r
7546   DESCRIPTION "The person that is a shareholder of this company"\r
7547   FORMAT ">>>>>9"\r
7548   INITIAL "0"\r
7549   LABEL "Person"\r
7550   POSITION 3\r
7551   SQL-WIDTH 4\r
7552   ORDER 20\r
7553   MANDATORY\r
7554 \r
7555 ADD FIELD "NoteCode" OF "ShareHolder" AS integer \r
7556   DESCRIPTION "Any notes about the shareholder."\r
7557   FORMAT ">>>>>9"\r
7558   INITIAL "0"\r
7559   POSITION 4\r
7560   SQL-WIDTH 4\r
7561   ORDER 30\r
7562 \r
7563 ADD FIELD "HolderCompany" OF "ShareHolder" AS integer \r
7564   FORMAT ">>999"\r
7565   INITIAL ?\r
7566   LABEL "Holder"\r
7567   POSITION 5\r
7568   SQL-WIDTH 4\r
7569   ORDER 40\r
7570 \r
7571 ADD FIELD "SharesHeld" OF "ShareHolder" AS integer \r
7572   FORMAT ">,>>>,>>>,>>9"\r
7573   INITIAL "0"\r
7574   POSITION 6\r
7575   SQL-WIDTH 4\r
7576   ORDER 50\r
7577 \r
7578 ADD INDEX "XPKShareHolders" ON "ShareHolder" \r
7579   AREA "Schema Area"\r
7580   UNIQUE\r
7581   PRIMARY\r
7582   INDEX-FIELD "CompanyCode" ASCENDING \r
7583   INDEX-FIELD "PersonCode" ASCENDING \r
7584   INDEX-FIELD "HolderCompany" ASCENDING \r
7585 \r
7586 ADD TABLE "InvoiceStatus"\r
7587   AREA "Schema Area"\r
7588   DUMP-NAME "invoices"\r
7589 \r
7590 ADD FIELD "InvoiceStatus" OF "InvoiceStatus" AS character \r
7591   FORMAT "X"\r
7592   INITIAL ""\r
7593   LABEL "Status"\r
7594   POSITION 2\r
7595   SQL-WIDTH 2\r
7596   LENGTH 0\r
7597   ORDER 10\r
7598   MANDATORY\r
7599 \r
7600 ADD FIELD "Description" OF "InvoiceStatus" AS character \r
7601   FORMAT "X(50)"\r
7602   INITIAL ""\r
7603   POSITION 3\r
7604   SQL-WIDTH 100\r
7605   LENGTH 0\r
7606   ORDER 20\r
7607   MANDATORY\r
7608 \r
7609 ADD INDEX "XPKInvoiceStatus" ON "InvoiceStatus" \r
7610   AREA "Schema Area"\r
7611   UNIQUE\r
7612   PRIMARY\r
7613   INDEX-FIELD "InvoiceStatus" ASCENDING \r
7614 \r
7615 ADD TABLE "BuildingType"\r
7616   AREA "Schema Area"\r
7617   DUMP-NAME "bldtype"\r
7618 \r
7619 ADD FIELD "BuildingType" OF "BuildingType" AS character \r
7620   FORMAT "X"\r
7621   INITIAL ""\r
7622   POSITION 2\r
7623   SQL-WIDTH 2\r
7624   LENGTH 0\r
7625   ORDER 10\r
7626   MANDATORY\r
7627 \r
7628 ADD FIELD "Description" OF "BuildingType" AS character \r
7629   FORMAT "X(50)"\r
7630   INITIAL ""\r
7631   POSITION 3\r
7632   SQL-WIDTH 100\r
7633   LENGTH 0\r
7634   ORDER 20\r
7635   MANDATORY\r
7636 \r
7637 ADD INDEX "XPKBuildingType" ON "BuildingType" \r
7638   AREA "Schema Area"\r
7639   UNIQUE\r
7640   PRIMARY\r
7641   INDEX-FIELD "BuildingType" ASCENDING \r
7642 \r
7643 ADD TABLE "RP"\r
7644   AREA "Schema Area"\r
7645   DUMP-NAME "reptparm"\r
7646 \r
7647 ADD FIELD "ReportID" OF "RP" AS character \r
7648   FORMAT "X(8)"\r
7649   INITIAL ""\r
7650   POSITION 2\r
7651   SQL-WIDTH 16\r
7652   LENGTH 0\r
7653   ORDER 10\r
7654   MANDATORY\r
7655 \r
7656 ADD FIELD "UserName" OF "RP" AS character \r
7657   FORMAT "X(20)"\r
7658   INITIAL ""\r
7659   LABEL "User Name"\r
7660   POSITION 3\r
7661   SQL-WIDTH 40\r
7662   COLUMN-LABEL "User"\r
7663   LENGTH 0\r
7664   ORDER 20\r
7665   MANDATORY\r
7666 \r
7667 ADD FIELD "Char1" OF "RP" AS character \r
7668   FORMAT "X(8)"\r
7669   INITIAL ""\r
7670   POSITION 4\r
7671   SQL-WIDTH 16\r
7672   LENGTH 0\r
7673   ORDER 90\r
7674 \r
7675 ADD FIELD "Char2" OF "RP" AS character \r
7676   FORMAT "X(8)"\r
7677   INITIAL ""\r
7678   POSITION 5\r
7679   SQL-WIDTH 16\r
7680   LENGTH 0\r
7681   ORDER 100\r
7682 \r
7683 ADD FIELD "Char3" OF "RP" AS character \r
7684   FORMAT "X(8)"\r
7685   INITIAL ""\r
7686   POSITION 6\r
7687   SQL-WIDTH 16\r
7688   LENGTH 0\r
7689   ORDER 110\r
7690 \r
7691 ADD FIELD "Char4" OF "RP" AS character \r
7692   FORMAT "X(8)"\r
7693   INITIAL ""\r
7694   POSITION 7\r
7695   SQL-WIDTH 16\r
7696   LENGTH 0\r
7697   ORDER 120\r
7698 \r
7699 ADD FIELD "Char5" OF "RP" AS character \r
7700   FORMAT "X(8)"\r
7701   INITIAL ""\r
7702   POSITION 8\r
7703   SQL-WIDTH 16\r
7704   LENGTH 0\r
7705   ORDER 130\r
7706 \r
7707 ADD FIELD "Char6" OF "RP" AS character \r
7708   FORMAT "X(8)"\r
7709   INITIAL ""\r
7710   POSITION 9\r
7711   SQL-WIDTH 16\r
7712   LENGTH 0\r
7713   ORDER 140\r
7714 \r
7715 ADD FIELD "Int1" OF "RP" AS integer \r
7716   FORMAT "->,>>>,>>9"\r
7717   INITIAL "0"\r
7718   POSITION 10\r
7719   SQL-WIDTH 4\r
7720   ORDER 150\r
7721 \r
7722 ADD FIELD "Int2" OF "RP" AS integer \r
7723   FORMAT "->,>>>,>>9"\r
7724   INITIAL "0"\r
7725   POSITION 11\r
7726   SQL-WIDTH 4\r
7727   ORDER 160\r
7728 \r
7729 ADD FIELD "Int3" OF "RP" AS integer \r
7730   FORMAT "->,>>>,>>9"\r
7731   INITIAL "0"\r
7732   POSITION 12\r
7733   SQL-WIDTH 4\r
7734   ORDER 170\r
7735 \r
7736 ADD FIELD "Int4" OF "RP" AS integer \r
7737   FORMAT "->,>>>,>>9"\r
7738   INITIAL "0"\r
7739   POSITION 13\r
7740   SQL-WIDTH 4\r
7741   ORDER 180\r
7742 \r
7743 ADD FIELD "Int5" OF "RP" AS integer \r
7744   FORMAT "->,>>>,>>9"\r
7745   INITIAL "0"\r
7746   POSITION 14\r
7747   SQL-WIDTH 4\r
7748   ORDER 190\r
7749 \r
7750 ADD FIELD "Int6" OF "RP" AS integer \r
7751   FORMAT "->,>>>,>>9"\r
7752   INITIAL "0"\r
7753   POSITION 15\r
7754   SQL-WIDTH 4\r
7755   ORDER 200\r
7756 \r
7757 ADD FIELD "Int7" OF "RP" AS integer \r
7758   FORMAT "->,>>>,>>9"\r
7759   INITIAL "0"\r
7760   POSITION 16\r
7761   SQL-WIDTH 4\r
7762   ORDER 210\r
7763 \r
7764 ADD FIELD "Int8" OF "RP" AS integer \r
7765   FORMAT "->,>>>,>>9"\r
7766   INITIAL "0"\r
7767   POSITION 17\r
7768   SQL-WIDTH 4\r
7769   ORDER 220\r
7770 \r
7771 ADD FIELD "Date1" OF "RP" AS date \r
7772   FORMAT "99/99/9999"\r
7773   INITIAL ?\r
7774   POSITION 18\r
7775   SQL-WIDTH 4\r
7776   ORDER 230\r
7777 \r
7778 ADD FIELD "Date2" OF "RP" AS date \r
7779   FORMAT "99/99/9999"\r
7780   INITIAL ?\r
7781   POSITION 19\r
7782   SQL-WIDTH 4\r
7783   ORDER 240\r
7784 \r
7785 ADD FIELD "Date3" OF "RP" AS date \r
7786   FORMAT "99/99/9999"\r
7787   INITIAL ?\r
7788   POSITION 20\r
7789   SQL-WIDTH 4\r
7790   ORDER 250\r
7791 \r
7792 ADD FIELD "Date4" OF "RP" AS date \r
7793   FORMAT "99/99/9999"\r
7794   INITIAL ?\r
7795   POSITION 21\r
7796   SQL-WIDTH 4\r
7797   ORDER 260\r
7798 \r
7799 ADD FIELD "Dec1" OF "RP" AS decimal \r
7800   FORMAT "->>,>>9.99"\r
7801   INITIAL "0"\r
7802   POSITION 22\r
7803   SQL-WIDTH 17\r
7804   DECIMALS 2\r
7805   ORDER 280\r
7806 \r
7807 ADD FIELD "Dec2" OF "RP" AS decimal \r
7808   FORMAT "->>,>>9.99"\r
7809   INITIAL "0"\r
7810   POSITION 23\r
7811   SQL-WIDTH 17\r
7812   DECIMALS 2\r
7813   ORDER 290\r
7814 \r
7815 ADD FIELD "Dec3" OF "RP" AS decimal \r
7816   FORMAT "->>,>>9.99"\r
7817   INITIAL "0"\r
7818   POSITION 24\r
7819   SQL-WIDTH 17\r
7820   DECIMALS 2\r
7821   ORDER 300\r
7822 \r
7823 ADD FIELD "Dec4" OF "RP" AS decimal \r
7824   FORMAT "->>,>>9.99"\r
7825   INITIAL "0"\r
7826   POSITION 25\r
7827   SQL-WIDTH 17\r
7828   DECIMALS 2\r
7829   ORDER 310\r
7830 \r
7831 ADD FIELD "Dec5" OF "RP" AS decimal \r
7832   FORMAT "->>,>>9.99"\r
7833   INITIAL "0"\r
7834   POSITION 26\r
7835   SQL-WIDTH 17\r
7836   DECIMALS 2\r
7837   ORDER 320\r
7838 \r
7839 ADD FIELD "Dec6" OF "RP" AS decimal \r
7840   FORMAT "->>,>>9.99"\r
7841   INITIAL "0"\r
7842   POSITION 27\r
7843   SQL-WIDTH 17\r
7844   DECIMALS 2\r
7845   ORDER 330\r
7846 \r
7847 ADD FIELD "Log1" OF "RP" AS logical \r
7848   FORMAT "yes/no"\r
7849   INITIAL "no"\r
7850   POSITION 28\r
7851   SQL-WIDTH 1\r
7852   VIEW-AS "VIEW-AS TOGGLE-BOX"\r
7853   ORDER 340\r
7854 \r
7855 ADD FIELD "Log2" OF "RP" AS logical \r
7856   FORMAT "yes/no"\r
7857   INITIAL "no"\r
7858   POSITION 29\r
7859   SQL-WIDTH 1\r
7860   VIEW-AS "VIEW-AS TOGGLE-BOX"\r
7861   ORDER 350\r
7862 \r
7863 ADD FIELD "Log3" OF "RP" AS logical \r
7864   FORMAT "yes/no"\r
7865   INITIAL "no"\r
7866   POSITION 30\r
7867   SQL-WIDTH 1\r
7868   VIEW-AS "VIEW-AS TOGGLE-BOX"\r
7869   ORDER 360\r
7870 \r
7871 ADD FIELD "Log4" OF "RP" AS logical \r
7872   FORMAT "yes/no"\r
7873   INITIAL "no"\r
7874   POSITION 31\r
7875   SQL-WIDTH 1\r
7876   VIEW-AS "VIEW-AS TOGGLE-BOX"\r
7877   ORDER 370\r
7878 \r
7879 ADD FIELD "Log5" OF "RP" AS logical \r
7880   FORMAT "yes/no"\r
7881   INITIAL "no"\r
7882   POSITION 32\r
7883   SQL-WIDTH 1\r
7884   VIEW-AS "VIEW-AS TOGGLE-BOX"\r
7885   ORDER 380\r
7886 \r
7887 ADD FIELD "Log6" OF "RP" AS logical \r
7888   FORMAT "yes/no"\r
7889   INITIAL "no"\r
7890   POSITION 33\r
7891   SQL-WIDTH 1\r
7892   VIEW-AS "VIEW-AS TOGGLE-BOX"\r
7893   ORDER 390\r
7894 \r
7895 ADD FIELD "Log7" OF "RP" AS logical \r
7896   FORMAT "yes/no"\r
7897   INITIAL "no"\r
7898   POSITION 34\r
7899   SQL-WIDTH 1\r
7900   VIEW-AS "VIEW-AS TOGGLE-BOX"\r
7901   ORDER 400\r
7902 \r
7903 ADD FIELD "Log8" OF "RP" AS logical \r
7904   FORMAT "yes/no"\r
7905   INITIAL "no"\r
7906   POSITION 35\r
7907   SQL-WIDTH 1\r
7908   VIEW-AS "VIEW-AS TOGGLE-BOX"\r
7909   ORDER 410\r
7910 \r
7911 ADD FIELD "Log9" OF "RP" AS logical \r
7912   FORMAT "yes/no"\r
7913   INITIAL "no"\r
7914   POSITION 36\r
7915   SQL-WIDTH 1\r
7916   VIEW-AS "VIEW-AS TOGGLE-BOX"\r
7917   ORDER 420\r
7918 \r
7919 ADD INDEX "XAKReportParameters" ON "RP" \r
7920   AREA "Schema Area"\r
7921   UNIQUE\r
7922   PRIMARY\r
7923   INDEX-FIELD "ReportID" ASCENDING \r
7924   INDEX-FIELD "UserName" ASCENDING \r
7925 \r
7926 ADD TABLE "PropertyOutgoing"\r
7927   AREA "Schema Area"\r
7928   DUMP-NAME "propoutg"\r
7929 \r
7930 ADD FIELD "PropertyCode" OF "PropertyOutgoing" AS integer \r
7931   DESCRIPTION "The code used to refer to a property outgoing"\r
7932   FORMAT "99999"\r
7933   INITIAL "0"\r
7934   LABEL "Code"\r
7935   POSITION 2\r
7936   SQL-WIDTH 4\r
7937   ORDER 10\r
7938   MANDATORY\r
7939 \r
7940 ADD FIELD "AccountCode" OF "PropertyOutgoing" AS decimal \r
7941   DESCRIPTION "The account, from the chart of accounts, that this outgoings charge accrues to."\r
7942   FORMAT "9999.99"\r
7943   INITIAL "0"\r
7944   POSITION 3\r
7945   SQL-WIDTH 17\r
7946   DECIMALS 2\r
7947   ORDER 20\r
7948   MANDATORY\r
7949 \r
7950 ADD FIELD "BudgetAmount" OF "PropertyOutgoing" AS decimal \r
7951   DESCRIPTION "If applicable, an annual total of the property's fixed charges for this account."\r
7952   FORMAT "->>,>>>,>>9.99"\r
7953   INITIAL "0"\r
7954   POSITION 4\r
7955   SQL-WIDTH 17\r
7956   DECIMALS 2\r
7957   ORDER 30\r
7958 \r
7959 ADD INDEX "XPKPropertyOutgoing" ON "PropertyOutgoing" \r
7960   AREA "Schema Area"\r
7961   UNIQUE\r
7962   PRIMARY\r
7963   INDEX-FIELD "PropertyCode" ASCENDING \r
7964   INDEX-FIELD "AccountCode" ASCENDING \r
7965 \r
7966 ADD TABLE "UsrGroupMenu"\r
7967   AREA "Schema Area"\r
7968   DUMP-NAME "usrgrpmn"\r
7969   TABLE-TRIGGER "CREATE" OVERRIDE PROCEDURE "CRUSGMNU.P" CRC "?" \r
7970   TABLE-TRIGGER "DELETE" OVERRIDE PROCEDURE "DEUSGMNU.P" CRC "?" \r
7971   TABLE-TRIGGER "WRITE" OVERRIDE PROCEDURE "WRUSGMNU.P" CRC "?" \r
7972 \r
7973 ADD FIELD "GroupName" OF "UsrGroupMenu" AS character \r
7974   FORMAT "X(20)"\r
7975   INITIAL ""\r
7976   LABEL "Group Name"\r
7977   POSITION 2\r
7978   SQL-WIDTH 40\r
7979   COLUMN-LABEL "Group"\r
7980   LENGTH 0\r
7981   ORDER 10\r
7982   MANDATORY\r
7983 \r
7984 ADD FIELD "Autostart" OF "UsrGroupMenu" AS logical \r
7985   DESCRIPTION "\r
7986 "\r
7987   FORMAT "Y/N"\r
7988   INITIAL "N"\r
7989   POSITION 3\r
7990   SQL-WIDTH 1\r
7991   ORDER 40\r
7992 \r
7993 ADD FIELD "MenuName" OF "UsrGroupMenu" AS character \r
7994   FORMAT "X(30)"\r
7995   INITIAL "User Menu"\r
7996   POSITION 4\r
7997   SQL-WIDTH 60\r
7998   LENGTH 0\r
7999   ORDER 20\r
8000   MANDATORY\r
8001 \r
8002 ADD FIELD "NodeCode" OF "UsrGroupMenu" AS integer \r
8003   FORMAT ">>9"\r
8004   INITIAL "0"\r
8005   POSITION 5\r
8006   SQL-WIDTH 4\r
8007   ORDER 30\r
8008   MANDATORY\r
8009 \r
8010 ADD INDEX "XPKUsrGroupMenu" ON "UsrGroupMenu" \r
8011   AREA "Schema Area"\r
8012   UNIQUE\r
8013   PRIMARY\r
8014   INDEX-FIELD "GroupName" ASCENDING \r
8015   INDEX-FIELD "NodeCode" ASCENDING \r
8016 \r
8017 ADD INDEX "XAK1UsrGroup" ON "UsrGroupMenu" \r
8018   AREA "Schema Area"\r
8019   UNIQUE\r
8020   INDEX-FIELD "GroupName" ASCENDING \r
8021   INDEX-FIELD "MenuName" ASCENDING \r
8022 \r
8023 ADD TABLE "SupplyMeter"\r
8024   AREA "Schema Area"\r
8025   LABEL "Supply Meter"\r
8026   DUMP-NAME "supplyme"\r
8027 \r
8028 ADD FIELD "OldMeterCode" OF "SupplyMeter" AS integer \r
8029   FORMAT ">>9"\r
8030   INITIAL "0"\r
8031   LABEL "Meter"\r
8032   POSITION 2\r
8033   SQL-WIDTH 4\r
8034   ORDER 11\r
8035   MANDATORY\r
8036 \r
8037 ADD FIELD "Description" OF "SupplyMeter" AS character \r
8038   FORMAT "X(50)"\r
8039   INITIAL ""\r
8040   POSITION 3\r
8041   SQL-WIDTH 100\r
8042   LENGTH 0\r
8043   ORDER 20\r
8044   MANDATORY\r
8045 \r
8046 ADD FIELD "PropertyCode" OF "SupplyMeter" AS integer \r
8047   FORMAT "99999"\r
8048   INITIAL ?\r
8049   LABEL "Code"\r
8050   POSITION 4\r
8051   SQL-WIDTH 4\r
8052   COLUMN-LABEL-SA "C"\r
8053   ORDER 30\r
8054 \r
8055 ADD FIELD "EntityType" OF "SupplyMeter" AS character \r
8056   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
8057   FORMAT "X"\r
8058   INITIAL ?\r
8059   LABEL "Entity type"\r
8060   POSITION 5\r
8061   SQL-WIDTH 2\r
8062   COLUMN-LABEL "T"\r
8063   COLUMN-LABEL-SA "C"\r
8064   ORDER 40\r
8065 \r
8066 ADD FIELD "EntityCode" OF "SupplyMeter" AS integer \r
8067   FORMAT "99999"\r
8068   INITIAL ?\r
8069   LABEL "Code"\r
8070   POSITION 6\r
8071   SQL-WIDTH 4\r
8072   COLUMN-LABEL-SA "C"\r
8073   ORDER 50\r
8074 \r
8075 ADD FIELD "AccountCode" OF "SupplyMeter" AS decimal \r
8076   DESCRIPTION "The code of the account from within the chart of accounts that this ledger account applies to."\r
8077   FORMAT "9999.99"\r
8078   INITIAL ?\r
8079   LABEL "Account"\r
8080   POSITION 7\r
8081   SQL-WIDTH 17\r
8082   DECIMALS 2\r
8083   ORDER 60\r
8084 \r
8085 ADD FIELD "ElectricityUnitRate" OF "SupplyMeter" AS decimal \r
8086   FORMAT ">>>,>>>9.9999"\r
8087   INITIAL "0.0"\r
8088   LABEL "Electricity Rate"\r
8089   POSITION 8\r
8090   SQL-WIDTH 19\r
8091   DECIMALS 4\r
8092   ORDER 70\r
8093 \r
8094 ADD FIELD "Multiplier" OF "SupplyMeter" AS decimal \r
8095   FORMAT "->>>,>>9.9999"\r
8096   INITIAL "0"\r
8097   POSITION 9\r
8098   SQL-WIDTH 17\r
8099   HELP "The amount to multiply readings by to get units"\r
8100   DECIMALS 2\r
8101   ORDER 80\r
8102 \r
8103 ADD FIELD "Level" OF "SupplyMeter" AS integer \r
8104   FORMAT "->>9"\r
8105   INITIAL "0"\r
8106   POSITION 10\r
8107   SQL-WIDTH 4\r
8108   HELP "The level within the building which the meter is located on"\r
8109   ORDER 90\r
8110 \r
8111 ADD FIELD "SupplyType" OF "SupplyMeter" AS character \r
8112   FORMAT "X(4)"\r
8113   INITIAL ""\r
8114   POSITION 11\r
8115   SQL-WIDTH 8\r
8116   HELP "The type of supply metered"\r
8117   ORDER 100\r
8118 \r
8119 ADD FIELD "MeterCode" OF "SupplyMeter" AS character \r
8120   FORMAT "X(8)"\r
8121   INITIAL ""\r
8122   POSITION 12\r
8123   SQL-WIDTH 16\r
8124   ORDER 10\r
8125 \r
8126 ADD INDEX "XPKSupplyMeter" ON "SupplyMeter" \r
8127   AREA "Schema Area"\r
8128   UNIQUE\r
8129   PRIMARY\r
8130   INDEX-FIELD "PropertyCode" ASCENDING \r
8131   INDEX-FIELD "MeterCode" ASCENDING \r
8132 \r
8133 ADD TABLE "ConsolidationList"\r
8134   AREA "Schema Area"\r
8135   DUMP-NAME "con-list"\r
8136 \r
8137 ADD FIELD "Name" OF "ConsolidationList" AS character \r
8138   FORMAT "X(4)"\r
8139   INITIAL ""\r
8140   LABEL "List name"\r
8141   POSITION 2\r
8142   SQL-WIDTH 8\r
8143   LENGTH 0\r
8144   ORDER 10\r
8145 \r
8146 ADD FIELD "Description" OF "ConsolidationList" AS character \r
8147   FORMAT "X(50)"\r
8148   INITIAL ""\r
8149   LABEL "Description"\r
8150   POSITION 3\r
8151   SQL-WIDTH 100\r
8152   LENGTH 0\r
8153   ORDER 20\r
8154 \r
8155 ADD FIELD "CompanyList" OF "ConsolidationList" AS character \r
8156   FORMAT "X(256)"\r
8157   INITIAL ""\r
8158   LABEL "List"\r
8159   POSITION 4\r
8160   SQL-WIDTH 512\r
8161   HELP "Comma separated list of company codes"\r
8162   LENGTH 0\r
8163   ORDER 30\r
8164 \r
8165 ADD INDEX "XPKConsolidationList" ON "ConsolidationList" \r
8166   AREA "Schema Area"\r
8167   UNIQUE\r
8168   PRIMARY\r
8169   INDEX-FIELD "Name" ASCENDING \r
8170 \r
8171 ADD TABLE "ClosingGroup"\r
8172   AREA "Schema Area"\r
8173   DUMP-NAME "closingg"\r
8174 \r
8175 ADD FIELD "EntityType" OF "ClosingGroup" AS character \r
8176   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
8177   FORMAT "X"\r
8178   INITIAL ?\r
8179   LABEL "Entity type"\r
8180   POSITION 2\r
8181   SQL-WIDTH 2\r
8182   COLUMN-LABEL "T"\r
8183   COLUMN-LABEL-SA "C"\r
8184   LENGTH 0\r
8185   ORDER 10\r
8186   MANDATORY\r
8187 \r
8188 ADD FIELD "EntityCode" OF "ClosingGroup" AS integer \r
8189   FORMAT "99999"\r
8190   INITIAL ?\r
8191   LABEL "Code"\r
8192   POSITION 3\r
8193   SQL-WIDTH 4\r
8194   COLUMN-LABEL-SA "C"\r
8195   ORDER 20\r
8196   MANDATORY\r
8197 \r
8198 ADD FIELD "AccountCode" OF "ClosingGroup" AS decimal \r
8199   DESCRIPTION "The code of the account."\r
8200   FORMAT "9999.99"\r
8201   INITIAL ?\r
8202   LABEL "Account"\r
8203   POSITION 4\r
8204   SQL-WIDTH 17\r
8205   DECIMALS 2\r
8206   ORDER 30\r
8207   MANDATORY\r
8208 \r
8209 ADD FIELD "ClosingGroup" OF "ClosingGroup" AS integer \r
8210   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
8211   FORMAT ">>>,>>>,>>9"\r
8212   INITIAL ?\r
8213   POSITION 5\r
8214   SQL-WIDTH 4\r
8215   HELP "System maintained."\r
8216   ORDER 40\r
8217 \r
8218 ADD FIELD "DateClosed" OF "ClosingGroup" AS date \r
8219   DESCRIPTION "The date on which the group of transactions to which this record applies were closed."\r
8220   FORMAT "99/99/9999"\r
8221   INITIAL ?\r
8222   POSITION 6\r
8223   SQL-WIDTH 4\r
8224   ORDER 50\r
8225 \r
8226 ADD FIELD "ClosedStatus" OF "ClosingGroup" AS character \r
8227   FORMAT "X"\r
8228   INITIAL "F"\r
8229   LABEL "Status"\r
8230   POSITION 7\r
8231   SQL-WIDTH 2\r
8232   COLUMN-LABEL "S"\r
8233   HELP "F=Full, P=Partial"\r
8234   ORDER 60\r
8235 \r
8236 ADD FIELD "Description" OF "ClosingGroup" AS character \r
8237   DESCRIPTION "The description of the outstanding amount for partially closed groups"\r
8238   FORMAT "X(50)"\r
8239   INITIAL ""\r
8240   LABEL "Description"\r
8241   POSITION 8\r
8242   SQL-WIDTH 100\r
8243   ORDER 70\r
8244 \r
8245 ADD INDEX "XPKClosingGroup" ON "ClosingGroup" \r
8246   AREA "Schema Area"\r
8247   UNIQUE\r
8248   PRIMARY\r
8249   INDEX-FIELD "EntityType" ASCENDING \r
8250   INDEX-FIELD "EntityCode" ASCENDING \r
8251   INDEX-FIELD "AccountCode" ASCENDING \r
8252   INDEX-FIELD "ClosingGroup" ASCENDING \r
8253 \r
8254 ADD INDEX "XAK1ClosingGroup" ON "ClosingGroup" \r
8255   AREA "Schema Area"\r
8256   INDEX-FIELD "EntityType" ASCENDING \r
8257   INDEX-FIELD "EntityCode" ASCENDING \r
8258   INDEX-FIELD "AccountCode" ASCENDING \r
8259   INDEX-FIELD "ClosedStatus" ASCENDING \r
8260 \r
8261 ADD TABLE "SubLease"\r
8262   AREA "Schema Area"\r
8263   DUMP-NAME "sublease"\r
8264 \r
8265 ADD FIELD "TenancyLeaseCode" OF "SubLease" AS integer \r
8266   DESCRIPTION "A code used to refer to this tenancy lease"\r
8267   FORMAT "99999"\r
8268   INITIAL "0"\r
8269   LABEL "Code"\r
8270   POSITION 2\r
8271   SQL-WIDTH 4\r
8272   ORDER 10\r
8273 \r
8274 ADD FIELD "SubLeaseCode" OF "SubLease" AS integer \r
8275   FORMAT ">>>>9"\r
8276   INITIAL "0"\r
8277   POSITION 3\r
8278   SQL-WIDTH 4\r
8279   ORDER 20\r
8280 \r
8281 ADD FIELD "LeaseStartDate" OF "SubLease" AS date \r
8282   DESCRIPTION "The date that the lease commenced (which could be in the future)."\r
8283   FORMAT "99/99/9999"\r
8284   INITIAL ?\r
8285   LABEL "Lease start"\r
8286   POSITION 4\r
8287   SQL-WIDTH 4\r
8288   ORDER 50\r
8289 \r
8290 ADD FIELD "LeaseEndDate" OF "SubLease" AS date \r
8291   DESCRIPTION "The date on which the lease ends."\r
8292   FORMAT "99/99/9999"\r
8293   INITIAL ?\r
8294   LABEL "Lease end"\r
8295   POSITION 5\r
8296   SQL-WIDTH 4\r
8297   ORDER 60\r
8298 \r
8299 ADD FIELD "PersonCode" OF "SubLease" AS integer \r
8300   DESCRIPTION "A code used to refer to this person."\r
8301   FORMAT "99999"\r
8302   INITIAL ?\r
8303   LABEL "Person code"\r
8304   POSITION 6\r
8305   SQL-WIDTH 4\r
8306   COLUMN-LABEL "Person"\r
8307   ORDER 70\r
8308   MANDATORY\r
8309 \r
8310 ADD FIELD "Details" OF "SubLease" AS character \r
8311   FORMAT "X(1024)"\r
8312   INITIAL ""\r
8313   POSITION 7\r
8314   SQL-WIDTH 2048\r
8315   VIEW-AS "VIEW-AS EDITOR INNER-CHARS 51 INNER-LINES 4 SCROLLBAR-VERTICAL"\r
8316   LENGTH 0\r
8317   ORDER 80\r
8318 \r
8319 ADD FIELD "Name" OF "SubLease" AS character \r
8320   FORMAT "X(50)"\r
8321   INITIAL ""\r
8322   POSITION 8\r
8323   SQL-WIDTH 100\r
8324   LENGTH 0\r
8325   ORDER 30\r
8326 \r
8327 ADD FIELD "AnnualRental" OF "SubLease" AS decimal \r
8328   FORMAT "->>,>>>,>>9.99"\r
8329   INITIAL "0"\r
8330   LABEL "Annual rental"\r
8331   POSITION 9\r
8332   SQL-WIDTH 17\r
8333   DECIMALS 2\r
8334   ORDER 40\r
8335 \r
8336 ADD FIELD "Location" OF "SubLease" AS character \r
8337   FORMAT "X(50)"\r
8338   INITIAL ""\r
8339   POSITION 10\r
8340   SQL-WIDTH 100\r
8341   HELP "Location description"\r
8342   ORDER 90\r
8343 \r
8344 ADD FIELD "AreaSize" OF "SubLease" AS decimal \r
8345   FORMAT "->,>>>,>>9.99"\r
8346   INITIAL "0"\r
8347   LABEL "Area"\r
8348   POSITION 11\r
8349   SQL-WIDTH 17\r
8350   HELP "The area (Sq.M) of the space subleased"\r
8351   DECIMALS 2\r
8352   ORDER 100\r
8353 \r
8354 ADD FIELD "NoteCode" OF "SubLease" AS integer \r
8355   DESCRIPTION "A unique code identifying this note."\r
8356   FORMAT ">>>>>9"\r
8357   INITIAL ?\r
8358   POSITION 12\r
8359   SQL-WIDTH 4\r
8360   ORDER 110\r
8361 \r
8362 ADD INDEX "XPKSubLeases" ON "SubLease" \r
8363   AREA "Schema Area"\r
8364   UNIQUE\r
8365   PRIMARY\r
8366   INDEX-FIELD "TenancyLeaseCode" ASCENDING \r
8367   INDEX-FIELD "SubLeaseCode" ASCENDING \r
8368 \r
8369 ADD TABLE "Region"\r
8370   AREA "Schema Area"\r
8371   DUMP-NAME "region"\r
8372 \r
8373 ADD FIELD "Region" OF "Region" AS character \r
8374   FORMAT "X(4)"\r
8375   INITIAL ""\r
8376   POSITION 2\r
8377   SQL-WIDTH 8\r
8378   LENGTH 0\r
8379   ORDER 10\r
8380 \r
8381 ADD FIELD "Name" OF "Region" AS character \r
8382   FORMAT "X(50)"\r
8383   INITIAL ""\r
8384   POSITION 3\r
8385   SQL-WIDTH 100\r
8386   LENGTH 0\r
8387   ORDER 20\r
8388 \r
8389 ADD INDEX "XPKRegion" ON "Region" \r
8390   AREA "Schema Area"\r
8391   UNIQUE\r
8392   PRIMARY\r
8393   INDEX-FIELD "Region" ASCENDING ABBREVIATED \r
8394 \r
8395 ADD TABLE "VoucherLine"\r
8396   AREA "Schema Area"\r
8397   DUMP-NAME "vchrline"\r
8398   TABLE-TRIGGER "DELETE" OVERRIDE PROCEDURE "devchlne.p" CRC "?" \r
8399   TABLE-TRIGGER "WRITE" OVERRIDE PROCEDURE "wrvchlne.p" CRC "?" \r
8400 \r
8401 ADD FIELD "EntityType" OF "VoucherLine" AS character \r
8402   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
8403   FORMAT "X"\r
8404   INITIAL ?\r
8405   LABEL "Entity type"\r
8406   POSITION 2\r
8407   SQL-WIDTH 2\r
8408   COLUMN-LABEL "T"\r
8409   COLUMN-LABEL-SA "C"\r
8410   LENGTH 0\r
8411   ORDER 20\r
8412   MANDATORY\r
8413 \r
8414 ADD FIELD "EntityCode" OF "VoucherLine" AS integer \r
8415   FORMAT "99999"\r
8416   INITIAL ?\r
8417   LABEL "Code"\r
8418   POSITION 3\r
8419   SQL-WIDTH 4\r
8420   COLUMN-LABEL-SA "C"\r
8421   ORDER 30\r
8422   MANDATORY\r
8423 \r
8424 ADD FIELD "AccountCode" OF "VoucherLine" AS decimal \r
8425   DESCRIPTION "The code of the account from within the chart of accounts that this ledger account applies to."\r
8426   FORMAT "9999.99"\r
8427   INITIAL ?\r
8428   LABEL "Account"\r
8429   POSITION 4\r
8430   SQL-WIDTH 17\r
8431   DECIMALS 2\r
8432   ORDER 40\r
8433   MANDATORY\r
8434 \r
8435 ADD FIELD "Description" OF "VoucherLine" AS character \r
8436   DESCRIPTION "A description of this transaction, overriding the description of the document."\r
8437   FORMAT "X(50)"\r
8438   INITIAL ""\r
8439   POSITION 5\r
8440   SQL-WIDTH 100\r
8441   HELP "A narrative which overrides the document narrative."\r
8442   LENGTH 0\r
8443   ORDER 50\r
8444 \r
8445 ADD FIELD "Amount" OF "VoucherLine" AS decimal \r
8446   FORMAT "->>>,>>>,>>9.99"\r
8447   INITIAL "0"\r
8448   POSITION 6\r
8449   SQL-WIDTH 17\r
8450   COLUMN-LABEL-SA "C"\r
8451   DECIMALS 2\r
8452   ORDER 60\r
8453 \r
8454 ADD FIELD "VoucherSeq" OF "VoucherLine" AS integer \r
8455   DESCRIPTION "Unique sequence number for this voucher."\r
8456   FORMAT "99999999"\r
8457   INITIAL "0"\r
8458   POSITION 7\r
8459   SQL-WIDTH 4\r
8460   ORDER 10\r
8461 \r
8462 ADD FIELD "LineSeq" OF "VoucherLine" AS integer \r
8463   FORMAT "->,>>>,>>9"\r
8464   INITIAL "0"\r
8465   LABEL "Line#"\r
8466   POSITION 8\r
8467   SQL-WIDTH 4\r
8468   ORDER 70\r
8469 \r
8470 ADD FIELD "TaxAmount" OF "VoucherLine" AS decimal \r
8471   DESCRIPTION "Tax value for this line of allocation for the voucher"\r
8472   FORMAT "->>,>>>,>>9.99"\r
8473   INITIAL "0"\r
8474   POSITION 9\r
8475   SQL-WIDTH 17\r
8476   DECIMALS 2\r
8477   ORDER 80\r
8478 \r
8479 ADD INDEX "XPKVoucherLine" ON "VoucherLine" \r
8480   AREA "Schema Area"\r
8481   UNIQUE\r
8482   PRIMARY\r
8483   INDEX-FIELD "VoucherSeq" ASCENDING \r
8484   INDEX-FIELD "LineSeq" ASCENDING \r
8485 \r
8486 ADD INDEX "XAK1VoucherLines" ON "VoucherLine" \r
8487   AREA "Schema Area"\r
8488   INDEX-FIELD "VoucherSeq" ASCENDING \r
8489   INDEX-FIELD "EntityCode" ASCENDING \r
8490   INDEX-FIELD "AccountCode" ASCENDING \r
8491 \r
8492 ADD TABLE "JournalDescription"\r
8493   AREA "Schema Area"\r
8494   DUMP-NAME "journald"\r
8495   TABLE-TRIGGER "CREATE" OVERRIDE PROCEDURE "crjnldsc.p" CRC "?" \r
8496 \r
8497 ADD FIELD "JournalCode" OF "JournalDescription" AS integer \r
8498   FORMAT ">>>>9"\r
8499   INITIAL "0"\r
8500   LABEL "Code"\r
8501   POSITION 2\r
8502   SQL-WIDTH 4\r
8503   ORDER 10\r
8504 \r
8505 ADD FIELD "BatchCode" OF "JournalDescription" AS integer \r
8506   DESCRIPTION "The batch which this journal applies to."\r
8507   FORMAT ">>>>>9"\r
8508   INITIAL "0"\r
8509   LABEL "Batch No."\r
8510   POSITION 3\r
8511   SQL-WIDTH 4\r
8512   COLUMN-LABEL "Batch"\r
8513   ORDER 20\r
8514 \r
8515 ADD FIELD "DocumentCode" OF "JournalDescription" AS integer \r
8516   DESCRIPTION "The document within the batch which this journal is a part of."\r
8517   FORMAT ">>>>>9"\r
8518   INITIAL "0"\r
8519   LABEL "Document No."\r
8520   POSITION 4\r
8521   SQL-WIDTH 4\r
8522   COLUMN-LABEL "Doc #"\r
8523   ORDER 30\r
8524 \r
8525 ADD FIELD "Description" OF "JournalDescription" AS character \r
8526   FORMAT "X(256)"\r
8527   INITIAL ""\r
8528   POSITION 5\r
8529   SQL-WIDTH 512\r
8530   VIEW-AS "VIEW-AS EDITOR\r
8531   SIZE-CHARS 80 by 5\r
8532   SCROLLBAR-HORIZONTAL SCROLLBAR-VERTICAL\r
8533 "\r
8534   LENGTH 0\r
8535   ORDER 40\r
8536 \r
8537 ADD INDEX "XPKJournalDescription" ON "JournalDescription" \r
8538   AREA "Schema Area"\r
8539   UNIQUE\r
8540   PRIMARY\r
8541   INDEX-FIELD "JournalCode" ASCENDING \r
8542 \r
8543 ADD INDEX "XAK1JournalDescription" ON "JournalDescription" \r
8544   AREA "Schema Area"\r
8545   UNIQUE\r
8546   INDEX-FIELD "BatchCode" ASCENDING \r
8547   INDEX-FIELD "DocumentCode" ASCENDING \r
8548 \r
8549 ADD TABLE "PeriodicDetail"\r
8550   AREA "Schema Area"\r
8551   DUMP-NAME "periodic"\r
8552 \r
8553 ADD FIELD "ReportID" OF "PeriodicDetail" AS character \r
8554   DESCRIPTION "Identifies the report from which this piece of detail belongs."\r
8555   FORMAT "X(4)"\r
8556   INITIAL ""\r
8557   POSITION 2\r
8558   SQL-WIDTH 8\r
8559   LENGTH 0\r
8560   ORDER 10\r
8561 \r
8562 ADD FIELD "EntityID" OF "PeriodicDetail" AS character \r
8563   DESCRIPTION "Along with the ReportID, this field identifies the entity that this detail refers to."\r
8564   FORMAT "X(8)"\r
8565   INITIAL ""\r
8566   POSITION 3\r
8567   SQL-WIDTH 16\r
8568   LENGTH 0\r
8569   ORDER 20\r
8570 \r
8571 ADD FIELD "DetailType" OF "PeriodicDetail" AS character \r
8572   DESCRIPTION "Identifies the type of detail - ""D"" for data, ""C"" for Comment"\r
8573   FORMAT "X"\r
8574   INITIAL ""\r
8575   POSITION 4\r
8576   SQL-WIDTH 2\r
8577   LENGTH 0\r
8578   ORDER 30\r
8579 \r
8580 ADD FIELD "Date" OF "PeriodicDetail" AS date \r
8581   DESCRIPTION "The date that the detail was generated/modified."\r
8582   FORMAT "99/99/9999"\r
8583   INITIAL ?\r
8584   POSITION 5\r
8585   SQL-WIDTH 4\r
8586   ORDER 40\r
8587 \r
8588 ADD FIELD "Data" OF "PeriodicDetail" AS character \r
8589   DESCRIPTION "The actual detail"\r
8590   FORMAT "X(256)"\r
8591   INITIAL ""\r
8592   POSITION 6\r
8593   SQL-WIDTH 512\r
8594   LENGTH 0\r
8595   ORDER 50\r
8596 \r
8597 ADD FIELD "BreakValue1" OF "PeriodicDetail" AS character \r
8598   DESCRIPTION "This is used in the report output process to break items."\r
8599   FORMAT "X(50)"\r
8600   INITIAL ""\r
8601   POSITION 7\r
8602   SQL-WIDTH 100\r
8603   LENGTH 0\r
8604   ORDER 60\r
8605 \r
8606 ADD FIELD "BreakValue2" OF "PeriodicDetail" AS character \r
8607   DESCRIPTION "This is used in the report output process to break items."\r
8608   FORMAT "X(50)"\r
8609   INITIAL ""\r
8610   POSITION 8\r
8611   SQL-WIDTH 100\r
8612   LENGTH 0\r
8613   ORDER 70\r
8614 \r
8615 ADD FIELD "BreakValue3" OF "PeriodicDetail" AS character \r
8616   DESCRIPTION "This is used in the report output process to break items."\r
8617   FORMAT "X(50)"\r
8618   INITIAL ""\r
8619   POSITION 9\r
8620   SQL-WIDTH 100\r
8621   LENGTH 0\r
8622   ORDER 80\r
8623 \r
8624 ADD INDEX "XPKPeriodicDetail" ON "PeriodicDetail" \r
8625   AREA "Schema Area"\r
8626   PRIMARY\r
8627   INDEX-FIELD "ReportID" ASCENDING \r
8628   INDEX-FIELD "Date" ASCENDING \r
8629   INDEX-FIELD "EntityID" ASCENDING \r
8630   INDEX-FIELD "DetailType" ASCENDING \r
8631 \r
8632 ADD INDEX "XAK1PeriodicDetail" ON "PeriodicDetail" \r
8633   AREA "Schema Area"\r
8634   INDEX-FIELD "ReportID" ASCENDING \r
8635   INDEX-FIELD "Date" ASCENDING \r
8636   INDEX-FIELD "DetailType" ASCENDING \r
8637   INDEX-FIELD "BreakValue1" ASCENDING \r
8638 \r
8639 ADD INDEX "XAK2PeriodicDetail" ON "PeriodicDetail" \r
8640   AREA "Schema Area"\r
8641   INDEX-FIELD "ReportID" ASCENDING \r
8642   INDEX-FIELD "Date" ASCENDING \r
8643   INDEX-FIELD "DetailType" ASCENDING \r
8644   INDEX-FIELD "BreakValue2" ASCENDING \r
8645 \r
8646 ADD INDEX "XAK3PeriodicDetail" ON "PeriodicDetail" \r
8647   AREA "Schema Area"\r
8648   INDEX-FIELD "ReportID" ASCENDING \r
8649   INDEX-FIELD "Date" ASCENDING \r
8650   INDEX-FIELD "DetailType" ASCENDING \r
8651   INDEX-FIELD "BreakValue3" ASCENDING \r
8652 \r
8653 ADD INDEX "XAK4PeriodicDetail" ON "PeriodicDetail" \r
8654   AREA "Schema Area"\r
8655   INDEX-FIELD "ReportID" ASCENDING \r
8656   INDEX-FIELD "EntityID" ASCENDING \r
8657   INDEX-FIELD "DetailType" ASCENDING \r
8658   INDEX-FIELD "Date" ASCENDING \r
8659 \r
8660 ADD TABLE "AuditTrail"\r
8661   AREA "Schema Area"\r
8662   DUMP-NAME "audit"\r
8663   TABLE-TRIGGER "CREATE" OVERRIDE PROCEDURE "craudit.p" CRC "?" \r
8664 \r
8665 ADD FIELD "AuditRecordId" OF "AuditTrail" AS integer \r
8666   FORMAT "->,>>>,>>9"\r
8667   INITIAL "0"\r
8668   POSITION 2\r
8669   SQL-WIDTH 4\r
8670   ORDER 90\r
8671 \r
8672 ADD FIELD "AuditOf" OF "AuditTrail" AS character \r
8673   FORMAT "X(20)"\r
8674   INITIAL ""\r
8675   POSITION 3\r
8676   SQL-WIDTH 40\r
8677   LENGTH 0\r
8678   ORDER 100\r
8679 \r
8680 ADD FIELD "AuditEvent" OF "AuditTrail" AS character \r
8681   FORMAT "X(8)"\r
8682   INITIAL ""\r
8683   POSITION 4\r
8684   SQL-WIDTH 16\r
8685   LENGTH 0\r
8686   ORDER 110\r
8687 \r
8688 ADD FIELD "OldValue" OF "AuditTrail" AS character \r
8689   FORMAT "X(255)"\r
8690   INITIAL ""\r
8691   POSITION 5\r
8692   SQL-WIDTH 510\r
8693   LENGTH 0\r
8694   ORDER 120\r
8695 \r
8696 ADD FIELD "NewValue" OF "AuditTrail" AS character \r
8697   FORMAT "X(255)"\r
8698   INITIAL ""\r
8699   POSITION 6\r
8700   SQL-WIDTH 510\r
8701   LENGTH 0\r
8702   ORDER 130\r
8703 \r
8704 ADD INDEX "XPKAudittrail" ON "AuditTrail" \r
8705   AREA "Schema Area"\r
8706   UNIQUE\r
8707   PRIMARY\r
8708   INDEX-FIELD "AuditRecordId" ASCENDING \r
8709 \r
8710 ADD TABLE "OfficeSettings"\r
8711   AREA "Schema Area"\r
8712   DUMP-NAME "officset"\r
8713 \r
8714 ADD FIELD "OfficeCode" OF "OfficeSettings" AS character \r
8715   FORMAT "X(4)"\r
8716   INITIAL ""\r
8717   LABEL "Office"\r
8718   POSITION 2\r
8719   SQL-WIDTH 8\r
8720   LENGTH 0\r
8721   ORDER 10\r
8722 \r
8723 ADD FIELD "SetName" OF "OfficeSettings" AS character \r
8724   FORMAT "X(20)"\r
8725   INITIAL ""\r
8726   POSITION 3\r
8727   SQL-WIDTH 40\r
8728   LENGTH 0\r
8729   ORDER 20\r
8730 \r
8731 ADD FIELD "SetValue" OF "OfficeSettings" AS character \r
8732   FORMAT "X(100)"\r
8733   INITIAL ""\r
8734   POSITION 4\r
8735   SQL-WIDTH 200\r
8736   LENGTH 0\r
8737   ORDER 30\r
8738 \r
8739 ADD INDEX "XPKOfficeSettings" ON "OfficeSettings" \r
8740   AREA "Schema Area"\r
8741   UNIQUE\r
8742   PRIMARY\r
8743   INDEX-FIELD "OfficeCode" ASCENDING \r
8744   INDEX-FIELD "SetName" ASCENDING \r
8745 \r
8746 ADD TABLE "RentSpaceHistory"\r
8747   AREA "Schema Area"\r
8748   DUMP-NAME "rspchist"\r
8749 \r
8750 ADD FIELD "PropertyCode" OF "RentSpaceHistory" AS integer \r
8751   DESCRIPTION "The code used to refer to a property"\r
8752   FORMAT "99999"\r
8753   INITIAL "0"\r
8754   LABEL "Code"\r
8755   POSITION 2\r
8756   SQL-WIDTH 4\r
8757   ORDER 10\r
8758 \r
8759 ADD FIELD "RentalSpaceCode" OF "RentSpaceHistory" AS integer \r
8760   DESCRIPTION "A sequence number which identifies this rental space within the property."\r
8761   FORMAT ">>>>9"\r
8762   INITIAL "0"\r
8763   LABEL "Rental space code"\r
8764   POSITION 3\r
8765   SQL-WIDTH 4\r
8766   COLUMN-LABEL "Space"\r
8767   ORDER 20\r
8768   MANDATORY\r
8769 \r
8770 ADD FIELD "Description" OF "RentSpaceHistory" AS character \r
8771   DESCRIPTION "A brief description of the space"\r
8772   FORMAT "X(100)"\r
8773   INITIAL ""\r
8774   POSITION 4\r
8775   SQL-WIDTH 200\r
8776   LENGTH 0\r
8777   ORDER 40\r
8778 \r
8779 ADD FIELD "AreaStatus" OF "RentSpaceHistory" AS character \r
8780   DESCRIPTION "The Status of the rental space, eg. Leased, Vacant"\r
8781   FORMAT "X(4)"\r
8782   INITIAL ""\r
8783   LABEL "Status"\r
8784   POSITION 5\r
8785   SQL-WIDTH 8\r
8786   LENGTH 0\r
8787   ORDER 50\r
8788   MANDATORY\r
8789 \r
8790 ADD FIELD "AreaSize" OF "RentSpaceHistory" AS decimal \r
8791   DESCRIPTION "The area of the rental space in square metres."\r
8792   FORMAT "->>,>>9.99"\r
8793   INITIAL "0"\r
8794   LABEL "Sq M."\r
8795   POSITION 6\r
8796   SQL-WIDTH 21\r
8797   COLUMN-LABEL-SA "C"\r
8798   DECIMALS 6\r
8799   ORDER 60\r
8800 \r
8801 ADD FIELD "ContractedRental" OF "RentSpaceHistory" AS decimal \r
8802   DESCRIPTION "The annual rental which tenants have contracted to pay for this space."\r
8803   FORMAT "->,>>>,>>9.99"\r
8804   INITIAL "0"\r
8805   LABEL "Contract Rental"\r
8806   POSITION 7\r
8807   SQL-WIDTH 17\r
8808   DECIMALS 2\r
8809   ORDER 70\r
8810 \r
8811 ADD FIELD "ChargedRental" OF "RentSpaceHistory" AS decimal \r
8812   FORMAT "->,>>>,>>9.99"\r
8813   INITIAL "0"\r
8814   LABEL "Charged Rent"\r
8815   POSITION 8\r
8816   SQL-WIDTH 17\r
8817   DECIMALS 2\r
8818   ORDER 80\r
8819 \r
8820 ADD FIELD "MarketRental" OF "RentSpaceHistory" AS decimal \r
8821   DESCRIPTION "The estimated market rental which the space is worth at current market rates."\r
8822   FORMAT "->,>>>,>>9.99"\r
8823   INITIAL "0"\r
8824   LABEL "Market"\r
8825   POSITION 9\r
8826   SQL-WIDTH 17\r
8827   DECIMALS 2\r
8828   ORDER 90\r
8829 \r
8830 ADD FIELD "MarketRentalDate" OF "RentSpaceHistory" AS date \r
8831   DESCRIPTION "The date at which the market rental was last estimated."\r
8832   FORMAT "99/99/9999"\r
8833   INITIAL ?\r
8834   LABEL "Market rental date"\r
8835   POSITION 10\r
8836   SQL-WIDTH 4\r
8837   COLUMN-LABEL "Mkt date"\r
8838   ORDER 100\r
8839 \r
8840 ADD FIELD "TenancyLeaseCode" OF "RentSpaceHistory" AS integer \r
8841   DESCRIPTION "The code referring to the tenancy lease record applying to this rental space."\r
8842   FORMAT ">>>>>9"\r
8843   INITIAL "0"\r
8844   LABEL "Lease"\r
8845   POSITION 11\r
8846   SQL-WIDTH 4\r
8847   ORDER 110\r
8848 \r
8849 ADD FIELD "DateChanged" OF "RentSpaceHistory" AS date \r
8850   FORMAT "99/99/9999"\r
8851   INITIAL ?\r
8852   POSITION 12\r
8853   SQL-WIDTH 4\r
8854   ORDER 30\r
8855 \r
8856 ADD FIELD "VacationDate" OF "RentSpaceHistory" AS date \r
8857   DESCRIPTION "The date that this rental space was vacated. This only applies \r
8858 if AreaStatus = ""V""."\r
8859   FORMAT "99/99/9999"\r
8860   INITIAL ?\r
8861   LABEL "Date Vacated"\r
8862   POSITION 13\r
8863   SQL-WIDTH 4\r
8864   COLUMN-LABEL "Vacated"\r
8865   ORDER 120\r
8866 \r
8867 ADD FIELD "VacantCosts" OF "RentSpaceHistory" AS decimal \r
8868   FORMAT "->,>>>,>>9.99"\r
8869   INITIAL "0"\r
8870   POSITION 14\r
8871   SQL-WIDTH 17\r
8872   DECIMALS 2\r
8873   ORDER 130\r
8874 \r
8875 ADD FIELD "OutgoingsPercentage" OF "RentSpaceHistory" AS decimal \r
8876   FORMAT "->>9.99"\r
8877   INITIAL "0"\r
8878   LABEL "O/G Percent"\r
8879   POSITION 15\r
8880   SQL-WIDTH 17\r
8881   DECIMALS 2\r
8882   ORDER 140\r
8883 \r
8884 ADD INDEX "XPKRentalSpaceHistory" ON "RentSpaceHistory" \r
8885   AREA "Schema Area"\r
8886   UNIQUE\r
8887   PRIMARY\r
8888   INDEX-FIELD "PropertyCode" ASCENDING \r
8889   INDEX-FIELD "RentalSpaceCode" ASCENDING \r
8890   INDEX-FIELD "DateChanged" DESCENDING \r
8891 \r
8892 ADD TABLE "UsrGroupRights"\r
8893   AREA "Schema Area"\r
8894   DUMP-NAME "ugrights"\r
8895 \r
8896 ADD FIELD "GroupName" OF "UsrGroupRights" AS character \r
8897   FORMAT "X(20)"\r
8898   INITIAL ""\r
8899   LABEL "Group Name"\r
8900   POSITION 2\r
8901   SQL-WIDTH 40\r
8902   COLUMN-LABEL "Group"\r
8903   LENGTH 0\r
8904   ORDER 10\r
8905   MANDATORY\r
8906 \r
8907 ADD FIELD "ApplicationCode" OF "UsrGroupRights" AS character \r
8908   FORMAT "X(20)"\r
8909   INITIAL ""\r
8910   POSITION 3\r
8911   SQL-WIDTH 40\r
8912   LENGTH 0\r
8913   ORDER 20\r
8914 \r
8915 ADD FIELD "Action" OF "UsrGroupRights" AS character \r
8916   FORMAT "X(20)"\r
8917   INITIAL ""\r
8918   POSITION 4\r
8919   SQL-WIDTH 40\r
8920   LENGTH 0\r
8921   ORDER 30\r
8922 \r
8923 ADD FIELD "Rights" OF "UsrGroupRights" AS logical \r
8924   FORMAT "yes/no"\r
8925   INITIAL ?\r
8926   POSITION 5\r
8927   SQL-WIDTH 1\r
8928   ORDER 40\r
8929 \r
8930 ADD INDEX "XPKUsrGroupRights" ON "UsrGroupRights" \r
8931   AREA "Schema Area"\r
8932   UNIQUE\r
8933   PRIMARY\r
8934   INDEX-FIELD "GroupName" ASCENDING \r
8935   INDEX-FIELD "ApplicationCode" ASCENDING \r
8936   INDEX-FIELD "Action" ASCENDING \r
8937 \r
8938 ADD TABLE "Order"\r
8939   AREA "Schema Area"\r
8940   DUMP-NAME "order"\r
8941   TABLE-TRIGGER "DELETE" OVERRIDE PROCEDURE "deorder.p" CRC "?" \r
8942   TABLE-TRIGGER "WRITE" OVERRIDE PROCEDURE "wrorder.p" CRC "?" \r
8943 \r
8944 ADD FIELD "ProjectCode" OF "Order" AS integer \r
8945   FORMAT "99999"\r
8946   INITIAL "0"\r
8947   POSITION 2\r
8948   SQL-WIDTH 4\r
8949   ORDER 5\r
8950 \r
8951 ADD FIELD "OrderCode" OF "Order" AS integer \r
8952   FORMAT ">>>>9"\r
8953   INITIAL "0"\r
8954   POSITION 3\r
8955   SQL-WIDTH 4\r
8956   ORDER 145\r
8957 \r
8958 ADD FIELD "AccountCode" OF "Order" AS decimal \r
8959   DESCRIPTION "The code of the account."\r
8960   FORMAT "9999.99"\r
8961   INITIAL ?\r
8962   LABEL "Account"\r
8963   POSITION 4\r
8964   SQL-WIDTH 17\r
8965   DECIMALS 2\r
8966   ORDER 25\r
8967   MANDATORY\r
8968 \r
8969 ADD FIELD "CreditorCode" OF "Order" AS integer \r
8970   DESCRIPTION "The code used to refer to a creditor."\r
8971   FORMAT "99999"\r
8972   INITIAL "0"\r
8973   LABEL "Creditor"\r
8974   POSITION 5\r
8975   SQL-WIDTH 4\r
8976   ORDER 35\r
8977 \r
8978 ADD FIELD "ApprovedAmount" OF "Order" AS decimal \r
8979   FORMAT "->>>,>>>,>>9.99"\r
8980   INITIAL "0"\r
8981   POSITION 6\r
8982   SQL-WIDTH 17\r
8983   DECIMALS 2\r
8984   ORDER 45\r
8985 \r
8986 ADD FIELD "OrderAmount" OF "Order" AS decimal \r
8987   FORMAT "->>>,>>>,>>9.99"\r
8988   INITIAL "0"\r
8989   POSITION 7\r
8990   SQL-WIDTH 17\r
8991   DECIMALS 2\r
8992   ORDER 55\r
8993 \r
8994 ADD FIELD "TaxAmount" OF "Order" AS decimal \r
8995   FORMAT "->>>,>>>,>>9.99"\r
8996   INITIAL "0"\r
8997   POSITION 8\r
8998   SQL-WIDTH 17\r
8999   DECIMALS 2\r
9000   ORDER 65\r
9001 \r
9002 ADD FIELD "FirstApprover" OF "Order" AS character \r
9003   DESCRIPTION "The short alphanumeric code that identifies this approver."\r
9004   FORMAT "X(4)"\r
9005   INITIAL ""\r
9006   LABEL "Approval"\r
9007   POSITION 9\r
9008   SQL-WIDTH 8\r
9009   ORDER 115\r
9010   MANDATORY\r
9011 \r
9012 ADD FIELD "SecondApprover" OF "Order" AS character \r
9013   DESCRIPTION "The short alphanumeric code that identifies this approver."\r
9014   FORMAT "X(4)"\r
9015   INITIAL ""\r
9016   LABEL "Approval"\r
9017   POSITION 10\r
9018   SQL-WIDTH 8\r
9019   ORDER 125\r
9020   MANDATORY\r
9021 \r
9022 ADD FIELD "QuotedAmount" OF "Order" AS decimal \r
9023   FORMAT "->>>,>>>,>>9.99"\r
9024   INITIAL "0"\r
9025   POSITION 11\r
9026   SQL-WIDTH 17\r
9027   DECIMALS 2\r
9028   ORDER 95\r
9029 \r
9030 ADD FIELD "OrderDate" OF "Order" AS date \r
9031   FORMAT "99/99/9999"\r
9032   INITIAL ?\r
9033   LABEL "Order Date"\r
9034   POSITION 12\r
9035   SQL-WIDTH 4\r
9036   ORDER 105\r
9037 \r
9038 ADD FIELD "Description" OF "Order" AS character \r
9039   FORMAT "X(256)"\r
9040   INITIAL ""\r
9041   POSITION 13\r
9042   SQL-WIDTH 512\r
9043   VIEW-AS "VIEW-AS EDITOR\r
9044   SIZE-CHARS 80 by 60\r
9045    SCROLLBAR-VERTICAL\r
9046 "\r
9047   ORDER 135\r
9048 \r
9049 ADD FIELD "EntityType" OF "Order" AS character \r
9050   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
9051   FORMAT "X"\r
9052   INITIAL ?\r
9053   LABEL "Entity type"\r
9054   POSITION 14\r
9055   SQL-WIDTH 2\r
9056   COLUMN-LABEL "T"\r
9057   COLUMN-LABEL-SA "C"\r
9058   ORDER 155\r
9059 \r
9060 ADD FIELD "EntityCode" OF "Order" AS integer \r
9061   FORMAT "99999"\r
9062   INITIAL ?\r
9063   LABEL "Code"\r
9064   POSITION 15\r
9065   SQL-WIDTH 4\r
9066   COLUMN-LABEL-SA "C"\r
9067   ORDER 165\r
9068 \r
9069 ADD FIELD "OrderStatus" OF "Order" AS character \r
9070   FORMAT "X(4)"\r
9071   INITIAL "NEW"\r
9072   POSITION 16\r
9073   SQL-WIDTH 8\r
9074   ORDER 175\r
9075 \r
9076 ADD FIELD "OverridePaid" OF "Order" AS decimal \r
9077   FORMAT "->>,>>>,>>9.99"\r
9078   INITIAL ?\r
9079   LABEL "Paid"\r
9080   POSITION 17\r
9081   SQL-WIDTH 17\r
9082   DECIMALS 2\r
9083   ORDER 185\r
9084 \r
9085 ADD INDEX "XPKOrder" ON "Order" \r
9086   AREA "Schema Area"\r
9087   UNIQUE\r
9088   PRIMARY\r
9089   INDEX-FIELD "ProjectCode" ASCENDING \r
9090   INDEX-FIELD "OrderCode" ASCENDING \r
9091 \r
9092 ADD INDEX "XAK1Orders" ON "Order" \r
9093   AREA "Schema Area"\r
9094   INDEX-FIELD "ProjectCode" ASCENDING \r
9095   INDEX-FIELD "AccountCode" ASCENDING \r
9096   INDEX-FIELD "OrderCode" ASCENDING \r
9097 \r
9098 ADD INDEX "XAK2Orders" ON "Order" \r
9099   AREA "Schema Area"\r
9100   INDEX-FIELD "EntityType" ASCENDING \r
9101   INDEX-FIELD "EntityCode" ASCENDING \r
9102   INDEX-FIELD "OrderCode" ASCENDING \r
9103 \r
9104 ADD INDEX "XAK3Orders" ON "Order" \r
9105   AREA "Schema Area"\r
9106   INDEX-FIELD "EntityType" ASCENDING \r
9107   INDEX-FIELD "EntityCode" ASCENDING \r
9108   INDEX-FIELD "AccountCode" ASCENDING \r
9109   INDEX-FIELD "OrderCode" ASCENDING \r
9110 \r
9111 ADD INDEX "XAK4Orders" ON "Order" \r
9112   AREA "Schema Area"\r
9113   INDEX-FIELD "OrderStatus" ASCENDING \r
9114   INDEX-FIELD "EntityType" ASCENDING \r
9115   INDEX-FIELD "EntityCode" ASCENDING \r
9116   INDEX-FIELD "OrderCode" ASCENDING \r
9117 \r
9118 ADD TABLE "ProjectBudget"\r
9119   AREA "Schema Area"\r
9120   DUMP-NAME "projectb"\r
9121   TABLE-TRIGGER "WRITE" OVERRIDE PROCEDURE "wrprjbdg.p" CRC "?" \r
9122 \r
9123 ADD FIELD "ProjectCode" OF "ProjectBudget" AS integer \r
9124   FORMAT "99999"\r
9125   INITIAL "0"\r
9126   POSITION 2\r
9127   SQL-WIDTH 4\r
9128   ORDER 10\r
9129 \r
9130 ADD FIELD "AccountCode" OF "ProjectBudget" AS decimal \r
9131   DESCRIPTION "The code of the account."\r
9132   FORMAT "9999.99"\r
9133   INITIAL "0000.00"\r
9134   LABEL "Account"\r
9135   POSITION 3\r
9136   SQL-WIDTH 17\r
9137   DECIMALS 2\r
9138   ORDER 20\r
9139   MANDATORY\r
9140 \r
9141 ADD FIELD "OriginalBudget" OF "ProjectBudget" AS decimal \r
9142   FORMAT ">>>,>>>,>>9.99"\r
9143   INITIAL "0"\r
9144   POSITION 4\r
9145   SQL-WIDTH 17\r
9146   DECIMALS 2\r
9147   ORDER 30\r
9148 \r
9149 ADD FIELD "CommittedBudget" OF "ProjectBudget" AS decimal \r
9150   FORMAT ">>>,>>>,>>9.99"\r
9151   INITIAL "0"\r
9152   POSITION 5\r
9153   SQL-WIDTH 17\r
9154   DECIMALS 2\r
9155   ORDER 40\r
9156 \r
9157 ADD FIELD "Adjustment" OF "ProjectBudget" AS decimal \r
9158   FORMAT "->>>,>>>,>>9.99"\r
9159   INITIAL "0"\r
9160   POSITION 6\r
9161   SQL-WIDTH 17\r
9162   DECIMALS 2\r
9163   ORDER 100\r
9164 \r
9165 ADD FIELD "AgreedVariation" OF "ProjectBudget" AS decimal \r
9166   FORMAT ">>>,>>>,>>9.99"\r
9167   INITIAL "0"\r
9168   POSITION 7\r
9169   SQL-WIDTH 17\r
9170   DECIMALS 2\r
9171   ORDER 60\r
9172 \r
9173 ADD FIELD "EntityType" OF "ProjectBudget" AS character \r
9174   FORMAT "X(4)"\r
9175   INITIAL ""\r
9176   LABEL "Entity type code"\r
9177   POSITION 8\r
9178   SQL-WIDTH 8\r
9179   LENGTH 0\r
9180   ORDER 22\r
9181   MANDATORY\r
9182 \r
9183 ADD FIELD "EntityCode" OF "ProjectBudget" AS integer \r
9184   FORMAT "99999"\r
9185   INITIAL "0"\r
9186   LABEL "Code"\r
9187   POSITION 9\r
9188   SQL-WIDTH 4\r
9189   COLUMN-LABEL-SA "C"\r
9190   ORDER 24\r
9191 \r
9192 ADD FIELD "EntityAccount" OF "ProjectBudget" AS decimal \r
9193   DESCRIPTION "The code of the account."\r
9194   FORMAT "9999.99"\r
9195   INITIAL "0000.00"\r
9196   LABEL "Account"\r
9197   POSITION 10\r
9198   SQL-WIDTH 17\r
9199   DECIMALS 2\r
9200   ORDER 26\r
9201   MANDATORY\r
9202 \r
9203 ADD FIELD "AdjustmentReviewed" OF "ProjectBudget" AS logical \r
9204   FORMAT "Y/N"\r
9205   INITIAL "Y"\r
9206   LABEL "Adjustment Reviewed?"\r
9207   POSITION 11\r
9208   SQL-WIDTH 1\r
9209   VIEW-AS "VIEW-AS TOGGLE-BOX"\r
9210   ORDER 70\r
9211 \r
9212 ADD FIELD "AdjustmentReviewDate" OF "ProjectBudget" AS date \r
9213   FORMAT "99/99/9999"\r
9214   INITIAL ?\r
9215   POSITION 12\r
9216   SQL-WIDTH 4\r
9217   ORDER 80\r
9218 \r
9219 ADD FIELD "Description" OF "ProjectBudget" AS character \r
9220   FORMAT "X(50)"\r
9221   INITIAL ""\r
9222   POSITION 13\r
9223   SQL-WIDTH 100\r
9224   ORDER 90\r
9225 \r
9226 ADD FIELD "UncommittedBudget" OF "ProjectBudget" AS decimal \r
9227   FORMAT "->>>,>>>,>>9.99"\r
9228   INITIAL "0"\r
9229   POSITION 14\r
9230   SQL-WIDTH 17\r
9231   DECIMALS 2\r
9232   ORDER 50\r
9233 \r
9234 ADD FIELD "HighVolume" OF "ProjectBudget" AS logical \r
9235   DESCRIPTION "Whether or not the account should show totals only by default on a transaction report."\r
9236   FORMAT "yes/no"\r
9237   INITIAL "no"\r
9238   LABEL "High volume"\r
9239   POSITION 15\r
9240   SQL-WIDTH 1\r
9241   COLUMN-LABEL "HiVol"\r
9242   ORDER 110\r
9243 \r
9244 ADD FIELD "AllowPosting" OF "ProjectBudget" AS logical \r
9245   DESCRIPTION "Whether or not users can post to this in transaction entry, or if posting must be done automatically through children."\r
9246   FORMAT "yes/no"\r
9247   INITIAL "yes"\r
9248   LABEL "Post"\r
9249   POSITION 16\r
9250   SQL-WIDTH 1\r
9251   ORDER 120\r
9252 \r
9253 ADD FIELD "ProjectExpenseCategory" OF "ProjectBudget" AS character \r
9254   FORMAT "X(4)"\r
9255   INITIAL ""\r
9256   LABEL "Type"\r
9257   POSITION 17\r
9258   SQL-WIDTH 8\r
9259   ORDER 130\r
9260 \r
9261 ADD INDEX "XPKProjectBudget" ON "ProjectBudget" \r
9262   AREA "Schema Area"\r
9263   UNIQUE\r
9264   PRIMARY\r
9265   INDEX-FIELD "ProjectCode" ASCENDING \r
9266   INDEX-FIELD "AccountCode" ASCENDING \r
9267 \r
9268 ADD TABLE "ConstructionDetails"\r
9269   AREA "Schema Area"\r
9270   DUMP-NAME "construc"\r
9271 \r
9272 ADD FIELD "PropertyCode" OF "ConstructionDetails" AS integer \r
9273   DESCRIPTION "The code used to refer to a property"\r
9274   FORMAT "99999"\r
9275   INITIAL "0"\r
9276   LABEL "Code"\r
9277   POSITION 2\r
9278   SQL-WIDTH 4\r
9279   ORDER 10\r
9280 \r
9281 ADD FIELD "ConstructionDate" OF "ConstructionDetails" AS date \r
9282   FORMAT "99/99/9999"\r
9283   INITIAL ?\r
9284   LABEL "Constructed"\r
9285   POSITION 3\r
9286   SQL-WIDTH 4\r
9287   ORDER 20\r
9288 \r
9289 ADD FIELD "Classification" OF "ConstructionDetails" AS character \r
9290   FORMAT "X(4)"\r
9291   INITIAL ""\r
9292   POSITION 4\r
9293   SQL-WIDTH 8\r
9294   ORDER 30\r
9295 \r
9296 ADD FIELD "IntendedLife" OF "ConstructionDetails" AS integer \r
9297   FORMAT "->,>>>,>>9"\r
9298   INITIAL "0"\r
9299   POSITION 5\r
9300   SQL-WIDTH 4\r
9301   ORDER 40\r
9302 \r
9303 ADD FIELD "LocationText" OF "ConstructionDetails" AS character \r
9304   FORMAT "X(256)"\r
9305   INITIAL ""\r
9306   POSITION 6\r
9307   SQL-WIDTH 512\r
9308   ORDER 50\r
9309 \r
9310 ADD FIELD "DescriptionText" OF "ConstructionDetails" AS character \r
9311   FORMAT "X(256)"\r
9312   INITIAL ""\r
9313   POSITION 7\r
9314   SQL-WIDTH 512\r
9315   ORDER 60\r
9316 \r
9317 ADD FIELD "LegalText" OF "ConstructionDetails" AS character \r
9318   FORMAT "X(256)"\r
9319   INITIAL ""\r
9320   POSITION 8\r
9321   SQL-WIDTH 512\r
9322   ORDER 70\r
9323 \r
9324 ADD FIELD "ZoningText" OF "ConstructionDetails" AS character \r
9325   FORMAT "X(256)"\r
9326   INITIAL ""\r
9327   POSITION 9\r
9328   SQL-WIDTH 512\r
9329   ORDER 80\r
9330 \r
9331 ADD FIELD "TerritorialAuthority" OF "ConstructionDetails" AS character \r
9332   FORMAT "X(8)"\r
9333   INITIAL ""\r
9334   POSITION 10\r
9335   SQL-WIDTH 16\r
9336   ORDER 90\r
9337 \r
9338 ADD FIELD "UsageText" OF "ConstructionDetails" AS character \r
9339   DESCRIPTION "The designed or actual usage of the building"\r
9340   FORMAT "X(50)"\r
9341   INITIAL ""\r
9342   LABEL "Building Usage"\r
9343   POSITION 11\r
9344   SQL-WIDTH 100\r
9345   HELP "The designed or actual usage of the building"\r
9346   ORDER 100\r
9347 \r
9348 ADD INDEX "XPKConstructionDetails" ON "ConstructionDetails" \r
9349   AREA "Schema Area"\r
9350   UNIQUE\r
9351   PRIMARY\r
9352   INDEX-FIELD "PropertyCode" ASCENDING \r
9353 \r
9354 ADD TABLE "ScenarioParameter"\r
9355   AREA "Schema Area"\r
9356   DUMP-NAME "scenarip"\r
9357 \r
9358 ADD FIELD "ScenarioCode" OF "ScenarioParameter" AS integer \r
9359   DESCRIPTION "A code to identify the scenario."\r
9360   FORMAT ">>>>>9"\r
9361   INITIAL "0"\r
9362   POSITION 2\r
9363   SQL-WIDTH 4\r
9364   ORDER 10\r
9365 \r
9366 ADD FIELD "ParameterID" OF "ScenarioParameter" AS character \r
9367   DESCRIPTION "Identifies the parameter - for use by the programs which use it."\r
9368   FORMAT "X(20)"\r
9369   INITIAL ""\r
9370   POSITION 3\r
9371   SQL-WIDTH 40\r
9372   ORDER 20\r
9373 \r
9374 ADD FIELD "Data" OF "ScenarioParameter" AS character \r
9375   DESCRIPTION "Parameter data values."\r
9376   FORMAT "X(50)"\r
9377   INITIAL ""\r
9378   POSITION 4\r
9379   SQL-WIDTH 100\r
9380   ORDER 30\r
9381 \r
9382 ADD INDEX "XPKScenarioParameter" ON "ScenarioParameter" \r
9383   AREA "Schema Area"\r
9384   UNIQUE\r
9385   PRIMARY\r
9386   INDEX-FIELD "ScenarioCode" ASCENDING \r
9387   INDEX-FIELD "ParameterID" ASCENDING \r
9388 \r
9389 ADD TABLE "LeaseHistory"\r
9390   AREA "Schema Area"\r
9391   DUMP-NAME "leasehis"\r
9392 \r
9393 ADD FIELD "DateChanged" OF "LeaseHistory" AS date \r
9394   FORMAT "99/99/9999"\r
9395   INITIAL ?\r
9396   POSITION 2\r
9397   SQL-WIDTH 4\r
9398   ORDER 30\r
9399 \r
9400 ADD FIELD "TenancyLeaseCode" OF "LeaseHistory" AS integer \r
9401   DESCRIPTION "A code used to refer to this tenancy lease"\r
9402   FORMAT "99999"\r
9403   INITIAL "0"\r
9404   LABEL "Code"\r
9405   POSITION 3\r
9406   SQL-WIDTH 4\r
9407   ORDER 40\r
9408 \r
9409 ADD FIELD "AssignedLeaseCode" OF "LeaseHistory" AS integer \r
9410   DESCRIPTION "The prior lease in the chain of assigned leases."\r
9411   FORMAT "99999"\r
9412   INITIAL "0"\r
9413   LABEL "Assigned to"\r
9414   POSITION 4\r
9415   SQL-WIDTH 4\r
9416   ORDER 50\r
9417 \r
9418 ADD FIELD "AssignmentDate" OF "LeaseHistory" AS date \r
9419   DESCRIPTION "The date on which this lease was assigned from the prior one."\r
9420   FORMAT "99/99/9999"\r
9421   INITIAL ?\r
9422   LABEL "Assign date"\r
9423   POSITION 5\r
9424   SQL-WIDTH 4\r
9425   ORDER 60\r
9426 \r
9427 ADD FIELD "LeaseEndDate" OF "LeaseHistory" AS date \r
9428   DESCRIPTION "The date on which the lease ends."\r
9429   FORMAT "99/99/9999"\r
9430   INITIAL ?\r
9431   LABEL "Lease end"\r
9432   POSITION 6\r
9433   SQL-WIDTH 4\r
9434   ORDER 70\r
9435 \r
9436 ADD FIELD "LeaseStartDate" OF "LeaseHistory" AS date \r
9437   DESCRIPTION "The date that the lease commenced (which could be in the future)."\r
9438   FORMAT "99/99/9999"\r
9439   INITIAL ?\r
9440   LABEL "Lease start"\r
9441   POSITION 7\r
9442   SQL-WIDTH 4\r
9443   ORDER 80\r
9444 \r
9445 ADD FIELD "LeaseStatus" OF "LeaseHistory" AS character \r
9446   FORMAT "X(4)"\r
9447   INITIAL ""\r
9448   LABEL "Status"\r
9449   POSITION 8\r
9450   SQL-WIDTH 8\r
9451   LENGTH 0\r
9452   ORDER 90\r
9453   MANDATORY\r
9454 \r
9455 ADD FIELD "LeaseType" OF "LeaseHistory" AS character \r
9456   DESCRIPTION "A code classifying the type of lease."\r
9457   FORMAT "X(4)"\r
9458   INITIAL ""\r
9459   LABEL "Type"\r
9460   POSITION 9\r
9461   SQL-WIDTH 8\r
9462   LENGTH 0\r
9463   ORDER 100\r
9464   MANDATORY\r
9465 \r
9466 ADD FIELD "NoteCode" OF "LeaseHistory" AS integer \r
9467   DESCRIPTION "Any notes relating to this lease"\r
9468   FORMAT ">>>>>9"\r
9469   INITIAL "0"\r
9470   LABEL "Notes key"\r
9471   POSITION 10\r
9472   SQL-WIDTH 4\r
9473   ORDER 110\r
9474 \r
9475 ADD FIELD "RatchetClause" OF "LeaseHistory" AS character \r
9476   DESCRIPTION "The type of ratchet clause included in the lease, e.g. None, Full, Partial etc."\r
9477   FORMAT "X(4)"\r
9478   INITIAL ?\r
9479   LABEL "Ratchet"\r
9480   POSITION 11\r
9481   SQL-WIDTH 8\r
9482   HELP "Ratchet clause type: None, full, part etc."\r
9483   LENGTH 0\r
9484   ORDER 120\r
9485 \r
9486 ADD FIELD "RentStartDate" OF "LeaseHistory" AS date \r
9487   FORMAT "99/99/9999"\r
9488   INITIAL ?\r
9489   LABEL "Rent start"\r
9490   POSITION 12\r
9491   SQL-WIDTH 4\r
9492   HELP "The date on which the tenant starts being liable for rent"\r
9493   ORDER 130\r
9494 \r
9495 ADD FIELD "RentEndDate" OF "LeaseHistory" AS date \r
9496   FORMAT "99/99/9999"\r
9497   INITIAL ?\r
9498   LABEL "Rent end"\r
9499   POSITION 13\r
9500   SQL-WIDTH 4\r
9501   HELP "The date on which the tenant stops being liable for rent"\r
9502   ORDER 140\r
9503 \r
9504 ADD FIELD "ReviewNoticePeriod" OF "LeaseHistory" AS integer \r
9505   FORMAT ">>>>>9"\r
9506   INITIAL "3"\r
9507   LABEL "Review notice"\r
9508   POSITION 14\r
9509   SQL-WIDTH 4\r
9510   COLUMN-LABEL "RR notice"\r
9511   HELP "The number of months of notice required for a rent review."\r
9512   ORDER 150\r
9513 \r
9514 ADD FIELD "RightsOfRenewal" OF "LeaseHistory" AS character \r
9515   FORMAT "X(10)"\r
9516   INITIAL "none"\r
9517   LABEL "Rights of Renewal"\r
9518   POSITION 15\r
9519   SQL-WIDTH 20\r
9520   COLUMN-LABEL "RoR"\r
9521   HELP "The rights of renewal written into the lease."\r
9522   LENGTH 0\r
9523   ORDER 160\r
9524 \r
9525 ADD FIELD "RORNoticePeriod" OF "LeaseHistory" AS integer \r
9526   DESCRIPTION "The number of months of notice required for exercise of the rights of renewal."\r
9527   FORMAT ">>>>>9"\r
9528   INITIAL "3"\r
9529   LABEL "RoR notice"\r
9530   POSITION 16\r
9531   SQL-WIDTH 4\r
9532   HELP "Months notice required for exercise of renewal rights"\r
9533   ORDER 170\r
9534 \r
9535 ADD FIELD "TenantCode" OF "LeaseHistory" AS integer \r
9536   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
9537   FORMAT ">>>>>9"\r
9538   INITIAL "0"\r
9539   LABEL "Tenant"\r
9540   POSITION 17\r
9541   SQL-WIDTH 4\r
9542   HELP "The tenant code for accounting for this lease."\r
9543   ORDER 180\r
9544 \r
9545 ADD FIELD "DocumentLocation" OF "LeaseHistory" AS integer \r
9546   DESCRIPTION "The current location of the lease\r
9547 Foreign key on the 'Note' table."\r
9548   FORMAT ">>>>>9"\r
9549   INITIAL ?\r
9550   LABEL "Document Location Notes"\r
9551   POSITION 18\r
9552   SQL-WIDTH 4\r
9553   COLUMN-LABEL "NotesKey"\r
9554   HELP "A 'note' indicating the current location of the lease docs."\r
9555   ORDER 190\r
9556 \r
9557 ADD FIELD "PrimarySpace" OF "LeaseHistory" AS integer \r
9558   DESCRIPTION "A sequence number which identifies the primary rental space within the property."\r
9559   FORMAT ">>>>9"\r
9560   INITIAL ?\r
9561   LABEL "Primary Space"\r
9562   POSITION 19\r
9563   SQL-WIDTH 4\r
9564   COLUMN-LABEL "Primary"\r
9565   ORDER 370\r
9566 \r
9567 ADD FIELD "OutgoingsRate" OF "LeaseHistory" AS decimal \r
9568   FORMAT "->>9.99"\r
9569   INITIAL "0"\r
9570   LABEL "O/G Rate"\r
9571   POSITION 20\r
9572   SQL-WIDTH 17\r
9573   DECIMALS 2\r
9574   ORDER 380\r
9575 \r
9576 ADD FIELD "PropertyCode" OF "LeaseHistory" AS integer \r
9577   DESCRIPTION "The property that the rental spaces in this lease are a part of."\r
9578   FORMAT "99999"\r
9579   INITIAL "0"\r
9580   LABEL "Property"\r
9581   POSITION 21\r
9582   SQL-WIDTH 4\r
9583   ORDER 220\r
9584 \r
9585 ADD FIELD "TermYears" OF "LeaseHistory" AS integer \r
9586   FORMAT ">>9"\r
9587   INITIAL "0"\r
9588   LABEL "Years"\r
9589   POSITION 22\r
9590   SQL-WIDTH 4\r
9591   ORDER 230\r
9592 \r
9593 ADD FIELD "TermMonths" OF "LeaseHistory" AS integer \r
9594   FORMAT ">9"\r
9595   INITIAL "0"\r
9596   POSITION 23\r
9597   SQL-WIDTH 4\r
9598   VALEXP "TermMonths >= 0 AND TermMonths < 12"\r
9599   VALMSG "Must be between 0 and 11"\r
9600   ORDER 240\r
9601 \r
9602 ADD FIELD "TermDays" OF "LeaseHistory" AS integer \r
9603   FORMAT ">>9"\r
9604   INITIAL "0"\r
9605   POSITION 24\r
9606   SQL-WIDTH 4\r
9607   VALEXP "TermDays >= 0 AND TermDays < 32"\r
9608   VALMSG "Must be between 0 and 31"\r
9609   ORDER 250\r
9610 \r
9611 ADD FIELD "GrossLease" OF "LeaseHistory" AS logical \r
9612   FORMAT "G/N"\r
9613   INITIAL "No"\r
9614   LABEL "Gross Lease"\r
9615   POSITION 25\r
9616   SQL-WIDTH 1\r
9617   COLUMN-LABEL "G/N"\r
9618   ORDER 390\r
9619 \r
9620 ADD FIELD "RevSequence" OF "LeaseHistory" AS integer \r
9621   DESCRIPTION "Sequence from Rev property system"\r
9622   FORMAT "->,>>>,>>9"\r
9623   INITIAL "0"\r
9624   POSITION 26\r
9625   SQL-WIDTH 4\r
9626   ORDER 270\r
9627 \r
9628 ADD FIELD "RevTenant" OF "LeaseHistory" AS character \r
9629   DESCRIPTION "Tenant code from Revelation system"\r
9630   FORMAT "X(8)"\r
9631   INITIAL ""\r
9632   POSITION 27\r
9633   SQL-WIDTH 16\r
9634   LENGTH 0\r
9635   ORDER 280\r
9636 \r
9637 ADD FIELD "ElectricityUnitRate" OF "LeaseHistory" AS decimal \r
9638   FORMAT ">9.99"\r
9639   INITIAL "0.15"\r
9640   LABEL "Electricity Rate"\r
9641   POSITION 28\r
9642   SQL-WIDTH 19\r
9643   DECIMALS 4\r
9644   ORDER 290\r
9645 \r
9646 ADD FIELD "OutgoingsBudget" OF "LeaseHistory" AS decimal \r
9647   DESCRIPTION "Basis for charging outgoings to a tenant."\r
9648   FORMAT ">,>>>,>>9.99"\r
9649   INITIAL "0"\r
9650   POSITION 29\r
9651   SQL-WIDTH 17\r
9652   DECIMALS 2\r
9653   ORDER 300\r
9654 \r
9655 ADD FIELD "TaxApplies" OF "LeaseHistory" AS logical \r
9656   FORMAT "yes/no"\r
9657   INITIAL "Yes"\r
9658   LABEL "Tax applies"\r
9659   POSITION 30\r
9660   SQL-WIDTH 1\r
9661   COLUMN-LABEL "Taxable"\r
9662   ORDER 310\r
9663 \r
9664 ADD FIELD "AreaDescription" OF "LeaseHistory" AS character \r
9665   FORMAT "G/N"\r
9666   INITIAL ""\r
9667   LABEL "Areas Rented"\r
9668   POSITION 31\r
9669   SQL-WIDTH 6\r
9670   ORDER 400\r
9671 \r
9672 ADD FIELD "FirstLeaseStart" OF "LeaseHistory" AS date \r
9673   FORMAT "99/99/9999"\r
9674   INITIAL ?\r
9675   LABEL "First lease start"\r
9676   POSITION 32\r
9677   SQL-WIDTH 4\r
9678   COLUMN-LABEL "First Start"\r
9679   HELP "The date the first lease on this space by this tenant commenced"\r
9680   ORDER 410\r
9681 \r
9682 ADD FIELD "IncentiveNotes" OF "LeaseHistory" AS character \r
9683   DESCRIPTION "Just some notes that get written in when the lease is settled (i.e when a new lease is setup)."\r
9684   FORMAT "X(256)"\r
9685   INITIAL ""\r
9686   POSITION 33\r
9687   SQL-WIDTH 512\r
9688   LENGTH 0\r
9689   ORDER 360\r
9690 \r
9691 ADD FIELD "ChangedBy" OF "LeaseHistory" AS character \r
9692   DESCRIPTION "A system controlled record of what process caused the lease information to change"\r
9693   FORMAT "X(20)"\r
9694   INITIAL ""\r
9695   POSITION 34\r
9696   SQL-WIDTH 40\r
9697   ORDER 420\r
9698 \r
9699 ADD INDEX "XPKLeaseHistory" ON "LeaseHistory" \r
9700   AREA "Schema Area"\r
9701   UNIQUE\r
9702   PRIMARY\r
9703   INDEX-FIELD "TenancyLeaseCode" ASCENDING \r
9704   INDEX-FIELD "DateChanged" DESCENDING \r
9705 \r
9706 ADD TABLE "RentalSpace"\r
9707   AREA "Schema Area"\r
9708   DUMP-NAME "rentalsp"\r
9709   TABLE-TRIGGER "WRITE" OVERRIDE PROCEDURE "WRRNTSPC.P" CRC "?" \r
9710 \r
9711 ADD FIELD "PropertyCode" OF "RentalSpace" AS integer \r
9712   DESCRIPTION "The property that this rental space is a part of"\r
9713   FORMAT "99999"\r
9714   INITIAL "0"\r
9715   LABEL "Property"\r
9716   POSITION 2\r
9717   SQL-WIDTH 4\r
9718   ORDER 10\r
9719   MANDATORY\r
9720   FIELD-TRIGGER "ASSIGN" OVERRIDE PROCEDURE "A-RSPPCD.P" CRC "?" \r
9721 \r
9722 ADD FIELD "RentalSpaceCode" OF "RentalSpace" AS integer \r
9723   DESCRIPTION "A sequence number which identifies this rental space within the property."\r
9724   FORMAT ">>>>9"\r
9725   INITIAL "0"\r
9726   LABEL "Rental space code"\r
9727   POSITION 3\r
9728   SQL-WIDTH 4\r
9729   COLUMN-LABEL "Space"\r
9730   ORDER 50\r
9731   MANDATORY\r
9732 \r
9733 ADD FIELD "Contact" OF "RentalSpace" AS integer \r
9734   DESCRIPTION "A person to contact about things to do with this space."\r
9735   FORMAT ">>>>>9"\r
9736   INITIAL "0"\r
9737   POSITION 4\r
9738   SQL-WIDTH 4\r
9739   ORDER 140\r
9740   MANDATORY\r
9741 \r
9742 ADD FIELD "AreaType" OF "RentalSpace" AS character \r
9743   DESCRIPTION "The type of rental space eg. Office, Rental, Carpark, Warehouse, etc"\r
9744   FORMAT "X(4)"\r
9745   INITIAL ""\r
9746   LABEL "Area type"\r
9747   POSITION 5\r
9748   SQL-WIDTH 8\r
9749   COLUMN-LABEL "Type"\r
9750   LENGTH 0\r
9751   ORDER 70\r
9752   MANDATORY\r
9753 \r
9754 ADD FIELD "AreaStatus" OF "RentalSpace" AS character \r
9755   DESCRIPTION "The Status of the rental space, eg. Leased, Vacant"\r
9756   FORMAT "X(4)"\r
9757   INITIAL ""\r
9758   LABEL "Status"\r
9759   POSITION 6\r
9760   SQL-WIDTH 8\r
9761   LENGTH 0\r
9762   ORDER 80\r
9763   MANDATORY\r
9764 \r
9765 ADD FIELD "AreaSize" OF "RentalSpace" AS decimal \r
9766   DESCRIPTION "The area of the rental space in square metres."\r
9767   FORMAT "->>,>>9.99"\r
9768   INITIAL "0"\r
9769   LABEL "Sq M."\r
9770   POSITION 7\r
9771   SQL-WIDTH 21\r
9772   COLUMN-LABEL-SA "C"\r
9773   DECIMALS 6\r
9774   ORDER 90\r
9775 \r
9776 ADD FIELD "ContractedRental" OF "RentalSpace" AS decimal \r
9777   DESCRIPTION "The annual rental which tenants have contracted to pay for this space."\r
9778   FORMAT "->,>>>,>>9.99"\r
9779   INITIAL "0"\r
9780   LABEL "Contract Rental"\r
9781   POSITION 8\r
9782   SQL-WIDTH 17\r
9783   DECIMALS 2\r
9784   ORDER 100\r
9785 \r
9786 ADD FIELD "Description" OF "RentalSpace" AS character \r
9787   DESCRIPTION "A brief description of the space"\r
9788   FORMAT "X(50)"\r
9789   INITIAL ""\r
9790   POSITION 9\r
9791   SQL-WIDTH 100\r
9792   LENGTH 0\r
9793   ORDER 60\r
9794 \r
9795 ADD FIELD "MarketRental" OF "RentalSpace" AS decimal \r
9796   DESCRIPTION "The estimated market rental which the space is worth at current market rates."\r
9797   FORMAT "->,>>>,>>9.99"\r
9798   INITIAL "0"\r
9799   LABEL "Market"\r
9800   POSITION 10\r
9801   SQL-WIDTH 17\r
9802   DECIMALS 2\r
9803   ORDER 120\r
9804 \r
9805 ADD FIELD "MarketRentalDate" OF "RentalSpace" AS date \r
9806   DESCRIPTION "The date at which the market rental was last estimated."\r
9807   FORMAT "99/99/9999"\r
9808   INITIAL ?\r
9809   LABEL "Market rental date"\r
9810   POSITION 11\r
9811   SQL-WIDTH 4\r
9812   COLUMN-LABEL "Mkt date"\r
9813   ORDER 130\r
9814 \r
9815 ADD FIELD "TenancyLeaseCode" OF "RentalSpace" AS integer \r
9816   DESCRIPTION "The code referring to the tenancy lease record applying to this rental space."\r
9817   FORMAT ">>>>>9"\r
9818   INITIAL "0"\r
9819   LABEL "Lease"\r
9820   POSITION 12\r
9821   SQL-WIDTH 4\r
9822   ORDER 20\r
9823 \r
9824 ADD FIELD "Warden1" OF "RentalSpace" AS integer \r
9825   DESCRIPTION "The person who is the primary warden for the rental space."\r
9826   FORMAT ">>>>>9"\r
9827   INITIAL "0"\r
9828   POSITION 13\r
9829   SQL-WIDTH 4\r
9830   ORDER 150\r
9831 \r
9832 ADD FIELD "Warden2" OF "RentalSpace" AS integer \r
9833   DESCRIPTION "The person who is the secondary warden for the rental space."\r
9834   FORMAT ">>>>>9"\r
9835   INITIAL "0"\r
9836   POSITION 14\r
9837   SQL-WIDTH 4\r
9838   ORDER 160\r
9839   MANDATORY\r
9840 \r
9841 ADD FIELD "Level" OF "RentalSpace" AS integer \r
9842   FORMAT "->>9"\r
9843   INITIAL "0"\r
9844   POSITION 15\r
9845   SQL-WIDTH 4\r
9846   ORDER 30\r
9847 \r
9848 ADD FIELD "LevelSequence" OF "RentalSpace" AS integer \r
9849   FORMAT ">,>>9"\r
9850   INITIAL "0"\r
9851   LABEL "Sequence"\r
9852   POSITION 16\r
9853   SQL-WIDTH 4\r
9854   COLUMN-LABEL "Seq"\r
9855   ORDER 40\r
9856 \r
9857 ADD FIELD "NoteCode" OF "RentalSpace" AS integer \r
9858   FORMAT ">>>,>>9"\r
9859   INITIAL "0"\r
9860   POSITION 17\r
9861   SQL-WIDTH 4\r
9862   ORDER 170\r
9863 \r
9864 ADD FIELD "ChargedRental" OF "RentalSpace" AS decimal \r
9865   FORMAT "->,>>>,>>9.99"\r
9866   INITIAL "0"\r
9867   LABEL "Charged Rent"\r
9868   POSITION 18\r
9869   SQL-WIDTH 17\r
9870   DECIMALS 2\r
9871   ORDER 110\r
9872 \r
9873 ADD FIELD "AuditRecordId" OF "RentalSpace" AS integer \r
9874   FORMAT "->,>>>,>>9"\r
9875   INITIAL "0"\r
9876   POSITION 19\r
9877   SQL-WIDTH 4\r
9878   ORDER 180\r
9879 \r
9880 ADD FIELD "LastModifiedDate" OF "RentalSpace" AS date \r
9881   DESCRIPTION "The date when this record was last modified.  Maintained by a WRITE trigger."\r
9882   FORMAT "99/99/9999"\r
9883   INITIAL "1/1/0001"\r
9884   POSITION 20\r
9885   SQL-WIDTH 4\r
9886   ORDER 190\r
9887   MANDATORY\r
9888 \r
9889 ADD FIELD "LastModifiedTime" OF "RentalSpace" AS integer \r
9890   DESCRIPTION "The time that this record was last modified"\r
9891   FORMAT "->,>>>,>>9"\r
9892   INITIAL "0"\r
9893   POSITION 21\r
9894   SQL-WIDTH 4\r
9895   ORDER 200\r
9896 \r
9897 ADD FIELD "LastModifiedUser" OF "RentalSpace" AS character \r
9898   DESCRIPTION "The user who last modified this record.  Maintained by a WRITE trigger."\r
9899   FORMAT "X(8)"\r
9900   INITIAL ""\r
9901   POSITION 22\r
9902   SQL-WIDTH 16\r
9903   LENGTH 0\r
9904   ORDER 210\r
9905 \r
9906 ADD FIELD "VacantCosts" OF "RentalSpace" AS decimal \r
9907   FORMAT "->,>>>,>>9.99"\r
9908   INITIAL "0"\r
9909   POSITION 23\r
9910   SQL-WIDTH 17\r
9911   DECIMALS 2\r
9912   ORDER 240\r
9913 \r
9914 ADD FIELD "OutgoingsPercentage" OF "RentalSpace" AS decimal \r
9915   FORMAT "->>9.99"\r
9916   INITIAL "0"\r
9917   LABEL "O/G Percent"\r
9918   POSITION 24\r
9919   SQL-WIDTH 17\r
9920   DECIMALS 2\r
9921   ORDER 250\r
9922 \r
9923 ADD FIELD "TaxApplies" OF "RentalSpace" AS logical \r
9924   FORMAT "yes/no"\r
9925   INITIAL "Yes"\r
9926   LABEL "Tax applies"\r
9927   POSITION 25\r
9928   SQL-WIDTH 1\r
9929   COLUMN-LABEL "Taxable"\r
9930   ORDER 220\r
9931 \r
9932 ADD FIELD "VacationDate" OF "RentalSpace" AS date \r
9933   DESCRIPTION "The date that this rental space was vacated. This only applies \r
9934 if AreaStatus = ""V""."\r
9935   FORMAT "99/99/9999"\r
9936   INITIAL ?\r
9937   LABEL "Date Vacated"\r
9938   POSITION 26\r
9939   SQL-WIDTH 4\r
9940   COLUMN-LABEL "Vacated"\r
9941   ORDER 230\r
9942 \r
9943 ADD INDEX "RentalSpaces" ON "RentalSpace" \r
9944   AREA "Schema Area"\r
9945   UNIQUE\r
9946   PRIMARY\r
9947   INDEX-FIELD "PropertyCode" ASCENDING \r
9948   INDEX-FIELD "RentalSpaceCode" ASCENDING \r
9949 \r
9950 ADD INDEX "XAK1RentalSpaces" ON "RentalSpace" \r
9951   AREA "Schema Area"\r
9952   INDEX-FIELD "TenancyLeaseCode" ASCENDING \r
9953   INDEX-FIELD "RentalSpaceCode" ASCENDING \r
9954 \r
9955 ADD INDEX "XAK2RentalSpaces" ON "RentalSpace" \r
9956   AREA "Schema Area"\r
9957   INDEX-FIELD "PropertyCode" ASCENDING \r
9958   INDEX-FIELD "Level" ASCENDING \r
9959   INDEX-FIELD "LevelSequence" ASCENDING \r
9960 \r
9961 ADD TABLE "AssetType"\r
9962   AREA "Schema Area"\r
9963   DUMP-NAME "assettyp"\r
9964 \r
9965 ADD FIELD "AssetType" OF "AssetType" AS character \r
9966   FORMAT "X(4)"\r
9967   INITIAL ""\r
9968   POSITION 2\r
9969   SQL-WIDTH 8\r
9970   ORDER 10\r
9971 \r
9972 ADD FIELD "Description" OF "AssetType" AS character \r
9973   FORMAT "X(50)"\r
9974   INITIAL ""\r
9975   POSITION 3\r
9976   SQL-WIDTH 100\r
9977   ORDER 20\r
9978 \r
9979 ADD FIELD "DepreciationStyle" OF "AssetType" AS character \r
9980   FORMAT "X"\r
9981   INITIAL ""\r
9982   POSITION 4\r
9983   SQL-WIDTH 2\r
9984   ORDER 30\r
9985 \r
9986 ADD FIELD "DepreciationRate" OF "AssetType" AS decimal \r
9987   FORMAT ">99.99"\r
9988   INITIAL "0"\r
9989   POSITION 5\r
9990   SQL-WIDTH 17\r
9991   DECIMALS 2\r
9992   ORDER 40\r
9993 \r
9994 ADD FIELD "AccountCode" OF "AssetType" AS decimal \r
9995   FORMAT "9999.99"\r
9996   INITIAL "0"\r
9997   POSITION 6\r
9998   SQL-WIDTH 17\r
9999   DECIMALS 2\r
10000   ORDER 50\r
10001 \r
10002 ADD INDEX "XPKAssetType" ON "AssetType" \r
10003   AREA "Schema Area"\r
10004   UNIQUE\r
10005   PRIMARY\r
10006   INDEX-FIELD "AssetType" ASCENDING \r
10007 \r
10008 ADD TABLE "BatchQueue"\r
10009   AREA "Schema Area"\r
10010   DUMP-NAME "batchque"\r
10011 \r
10012 ADD FIELD "RunDate" OF "BatchQueue" AS date \r
10013   FORMAT "99/99/9999"\r
10014   INITIAL ?\r
10015   POSITION 2\r
10016   SQL-WIDTH 4\r
10017   ORDER 10\r
10018 \r
10019 ADD FIELD "RunTime" OF "BatchQueue" AS integer \r
10020   FORMAT "->,>>>,>>9"\r
10021   INITIAL "0"\r
10022   POSITION 3\r
10023   SQL-WIDTH 4\r
10024   ORDER 20\r
10025 \r
10026 ADD FIELD "RunStatus" OF "BatchQueue" AS character \r
10027   FORMAT "X(4)"\r
10028   INITIAL ""\r
10029   POSITION 4\r
10030   SQL-WIDTH 8\r
10031   ORDER 30\r
10032 \r
10033 ADD FIELD "RunProgram" OF "BatchQueue" AS character \r
10034   FORMAT "X(256)"\r
10035   INITIAL ""\r
10036   POSITION 5\r
10037   SQL-WIDTH 512\r
10038   ORDER 40\r
10039 \r
10040 ADD FIELD "RunParameters" OF "BatchQueue" AS character \r
10041   FORMAT "X(256)"\r
10042   INITIAL ""\r
10043   POSITION 6\r
10044   SQL-WIDTH 512\r
10045   ORDER 50\r
10046 \r
10047 ADD FIELD "RunOutput" OF "BatchQueue" AS character \r
10048   FORMAT "X(50)"\r
10049   INITIAL ""\r
10050   POSITION 7\r
10051   SQL-WIDTH 100\r
10052   ORDER 60\r
10053 \r
10054 ADD FIELD "RunErrors" OF "BatchQueue" AS character \r
10055   FORMAT "X(78)"\r
10056   INITIAL ""\r
10057   POSITION 8\r
10058   SQL-WIDTH 156\r
10059   HELP "Errors produced by the processing of this job"\r
10060   ORDER 70\r
10061 \r
10062 ADD FIELD "UserName" OF "BatchQueue" AS character \r
10063   FORMAT "X(16)"\r
10064   INITIAL ""\r
10065   POSITION 9\r
10066   SQL-WIDTH 32\r
10067   HELP "Name of user requesting batch job"\r
10068   ORDER 80\r
10069 \r
10070 ADD FIELD "StartedOn" OF "BatchQueue" AS date \r
10071   FORMAT "99/99/9999"\r
10072   INITIAL ?\r
10073   POSITION 10\r
10074   SQL-WIDTH 4\r
10075   HELP "Date job was started"\r
10076   ORDER 90\r
10077 \r
10078 ADD FIELD "StartedAt" OF "BatchQueue" AS integer \r
10079   FORMAT ">>,>>9"\r
10080   INITIAL "0"\r
10081   POSITION 11\r
10082   SQL-WIDTH 4\r
10083   HELP "Time job was started"\r
10084   ORDER 100\r
10085 \r
10086 ADD FIELD "Elapsed" OF "BatchQueue" AS integer \r
10087   FORMAT ">>,>>9"\r
10088   INITIAL "0"\r
10089   POSITION 12\r
10090   SQL-WIDTH 4\r
10091   HELP "Time job took to run"\r
10092   ORDER 110\r
10093 \r
10094 ADD INDEX "XPKBatchQueue" ON "BatchQueue" \r
10095   AREA "Schema Area"\r
10096   PRIMARY\r
10097   INDEX-FIELD "RunStatus" ASCENDING \r
10098   INDEX-FIELD "RunDate" ASCENDING \r
10099   INDEX-FIELD "RunTime" ASCENDING \r
10100 \r
10101 ADD TABLE "CFChangeType"\r
10102   AREA "Schema Area"\r
10103   DUMP-NAME "cfchgtyp"\r
10104 \r
10105 ADD FIELD "CFChangeType" OF "CFChangeType" AS character \r
10106   FORMAT "X(4)"\r
10107   INITIAL ""\r
10108   LABEL "Change type"\r
10109   POSITION 2\r
10110   SQL-WIDTH 8\r
10111   COLUMN-LABEL "Change"\r
10112   ORDER 10\r
10113 \r
10114 ADD FIELD "Description" OF "CFChangeType" AS character \r
10115   FORMAT "X(50)"\r
10116   INITIAL ""\r
10117   POSITION 3\r
10118   SQL-WIDTH 100\r
10119   ORDER 20\r
10120 \r
10121 ADD INDEX "XKPCFChangetype" ON "CFChangeType" \r
10122   AREA "Schema Area"\r
10123   UNIQUE\r
10124   PRIMARY\r
10125   INDEX-FIELD "CFChangeType" ASCENDING \r
10126 \r
10127 ADD TABLE "FixedAsset"\r
10128   AREA "Schema Area"\r
10129   DUMP-NAME "fixedass"\r
10130 \r
10131 ADD FIELD "AssetCode" OF "FixedAsset" AS integer \r
10132   FORMAT "99999"\r
10133   INITIAL "0"\r
10134   POSITION 2\r
10135   SQL-WIDTH 4\r
10136   ORDER 10\r
10137 \r
10138 ADD FIELD "Description" OF "FixedAsset" AS character \r
10139   FORMAT "X(256)"\r
10140   INITIAL ""\r
10141   POSITION 3\r
10142   SQL-WIDTH 512\r
10143   ORDER 20\r
10144 \r
10145 ADD FIELD "Active" OF "FixedAsset" AS logical \r
10146   FORMAT "Y/N"\r
10147   INITIAL "Y"\r
10148   POSITION 4\r
10149   SQL-WIDTH 1\r
10150   ORDER 30\r
10151 \r
10152 ADD FIELD "PurchaseDate" OF "FixedAsset" AS date \r
10153   FORMAT "99/99/9999"\r
10154   INITIAL ?\r
10155   POSITION 5\r
10156   SQL-WIDTH 4\r
10157   ORDER 40\r
10158 \r
10159 ADD FIELD "SaleDate" OF "FixedAsset" AS date \r
10160   FORMAT "99/99/9999"\r
10161   INITIAL ?\r
10162   POSITION 6\r
10163   SQL-WIDTH 4\r
10164   ORDER 50\r
10165 \r
10166 ADD FIELD "BookDepreciationType" OF "FixedAsset" AS character \r
10167   FORMAT "X(4)"\r
10168   INITIAL ""\r
10169   POSITION 7\r
10170   SQL-WIDTH 8\r
10171   ORDER 60\r
10172 \r
10173 ADD FIELD "TaxDepreciationType" OF "FixedAsset" AS character \r
10174   FORMAT "X(4)"\r
10175   INITIAL ""\r
10176   POSITION 8\r
10177   SQL-WIDTH 8\r
10178   ORDER 70\r
10179 \r
10180 ADD FIELD "LastModifiedDate" OF "FixedAsset" AS date \r
10181   DESCRIPTION "The date when this record was last modified.  Maintained by a WRITE trigger."\r
10182   FORMAT "99/99/9999"\r
10183   INITIAL "1/1/0001"\r
10184   POSITION 9\r
10185   SQL-WIDTH 4\r
10186   ORDER 80\r
10187   MANDATORY\r
10188 \r
10189 ADD FIELD "LastModifiedTime" OF "FixedAsset" AS integer \r
10190   DESCRIPTION "The time that this record was last modified"\r
10191   FORMAT "->,>>>,>>9"\r
10192   INITIAL "0"\r
10193   POSITION 10\r
10194   SQL-WIDTH 4\r
10195   ORDER 90\r
10196 \r
10197 ADD FIELD "LastModifiedUser" OF "FixedAsset" AS character \r
10198   DESCRIPTION "The user who last modified this record.  Maintained by a WRITE trigger."\r
10199   FORMAT "X(8)"\r
10200   INITIAL ""\r
10201   POSITION 11\r
10202   SQL-WIDTH 16\r
10203   LENGTH 0\r
10204   ORDER 100\r
10205 \r
10206 ADD FIELD "AuditRecordId" OF "FixedAsset" AS integer \r
10207   FORMAT "->,>>>,>>9"\r
10208   INITIAL "0"\r
10209   POSITION 12\r
10210   SQL-WIDTH 4\r
10211   ORDER 110\r
10212 \r
10213 ADD FIELD "NoteCode" OF "FixedAsset" AS integer \r
10214   DESCRIPTION "A unique code identifying this note."\r
10215   FORMAT ">>>>>9"\r
10216   INITIAL ?\r
10217   POSITION 13\r
10218   SQL-WIDTH 4\r
10219   ORDER 120\r
10220 \r
10221 ADD FIELD "AssetStatus" OF "FixedAsset" AS character \r
10222   FORMAT "X(4)"\r
10223   INITIAL ""\r
10224   LABEL "Status"\r
10225   POSITION 14\r
10226   SQL-WIDTH 8\r
10227   ORDER 130\r
10228 \r
10229 ADD FIELD "AssetType" OF "FixedAsset" AS character \r
10230   FORMAT "X(4)"\r
10231   INITIAL ""\r
10232   LABEL "Type"\r
10233   POSITION 15\r
10234   SQL-WIDTH 8\r
10235   ORDER 140\r
10236 \r
10237 ADD FIELD "ParentAssetCode" OF "FixedAsset" AS integer \r
10238   FORMAT ">>>>>9"\r
10239   INITIAL "0"\r
10240   POSITION 16\r
10241   SQL-WIDTH 4\r
10242   HELP "Asset code of parent asset that this asset belongs to (if applicable)"\r
10243   ORDER 150\r
10244 \r
10245 ADD FIELD "AssetReference" OF "FixedAsset" AS character \r
10246   FORMAT "X(50)"\r
10247   INITIAL ""\r
10248   LABEL "Reference"\r
10249   POSITION 17\r
10250   SQL-WIDTH 100\r
10251   HELP "Serial Number or external reference id"\r
10252   ORDER 160\r
10253 \r
10254 ADD FIELD "EntityType" OF "FixedAsset" AS character \r
10255   FORMAT "X"\r
10256   INITIAL ""\r
10257   POSITION 18\r
10258   SQL-WIDTH 2\r
10259   HELP "The type of accounting entity (company, property etc) owning this asset"\r
10260   ORDER 170\r
10261 \r
10262 ADD FIELD "EntityCode" OF "FixedAsset" AS integer \r
10263   FORMAT ">>999"\r
10264   INITIAL "0"\r
10265   POSITION 19\r
10266   SQL-WIDTH 4\r
10267   HELP "The accounting entity (company, property etc) with financial ownership of this asset"\r
10268   ORDER 180\r
10269 \r
10270 ADD FIELD "PurchaseFrom" OF "FixedAsset" AS character \r
10271   FORMAT "X(50)"\r
10272   INITIAL ""\r
10273   LABEL "Purchased from"\r
10274   POSITION 20\r
10275   SQL-WIDTH 100\r
10276   HELP "Person/company purchased from"\r
10277   ORDER 190\r
10278 \r
10279 ADD FIELD "WarrantyMonths" OF "FixedAsset" AS integer \r
10280   FORMAT "->>,>>9"\r
10281   INITIAL "0"\r
10282   POSITION 21\r
10283   SQL-WIDTH 4\r
10284   HELP "Length of warranty from purchase date, in months"\r
10285   ORDER 200\r
10286 \r
10287 ADD FIELD "NextDepreciationDate" OF "FixedAsset" AS date \r
10288   FORMAT "99/99/9999"\r
10289   INITIAL ?\r
10290   POSITION 22\r
10291   SQL-WIDTH 4\r
10292   HELP "Next date to depreciating asset on"\r
10293   ORDER 210\r
10294 \r
10295 ADD FIELD "DepreciationFreq" OF "FixedAsset" AS character \r
10296   FORMAT "X(4)"\r
10297   INITIAL ""\r
10298   POSITION 23\r
10299   SQL-WIDTH 8\r
10300   HELP "Frequency of depreciation"\r
10301   ORDER 220\r
10302 \r
10303 ADD FIELD "SoldTo" OF "FixedAsset" AS character \r
10304   FORMAT "X(50)"\r
10305   INITIAL ""\r
10306   LABEL "Sold to"\r
10307   POSITION 24\r
10308   SQL-WIDTH 100\r
10309   HELP "Person / company sold to"\r
10310   ORDER 230\r
10311 \r
10312 ADD INDEX "XPKFixedAsset" ON "FixedAsset" \r
10313   AREA "Schema Area"\r
10314   UNIQUE\r
10315   PRIMARY\r
10316   INDEX-FIELD "AssetCode" ASCENDING \r
10317 \r
10318 ADD INDEX "XAK1FixedAsset" ON "FixedAsset" \r
10319   AREA "Schema Area"\r
10320   INDEX-FIELD "Active" ASCENDING \r
10321   INDEX-FIELD "AssetCode" ASCENDING \r
10322 \r
10323 ADD INDEX "XAK1ParentAsset" ON "FixedAsset" \r
10324   AREA "Schema Area"\r
10325   INDEX-FIELD "ParentAssetCode" ASCENDING \r
10326 \r
10327 ADD INDEX "XAK2Description" ON "FixedAsset" \r
10328   AREA "Schema Area"\r
10329   INDEX-FIELD "Description" ASCENDING \r
10330 \r
10331 ADD INDEX "XAK3FixedAsset" ON "FixedAsset" \r
10332   AREA "Schema Area"\r
10333   INDEX-FIELD "Active" ASCENDING \r
10334   INDEX-FIELD "Description" ASCENDING \r
10335 \r
10336 ADD TABLE "ReplCollisionLog"\r
10337   AREA "Schema Area"\r
10338   DESCRIPTION "Collision Log"\r
10339   DUMP-NAME "replcoll"\r
10340 \r
10341 ADD FIELD "CollisionID" OF "ReplCollisionLog" AS integer \r
10342   DESCRIPTION "Unique Key Field"\r
10343   FORMAT ">>>,>>>,>>9"\r
10344   INITIAL "0"\r
10345   LABEL "Collision ID"\r
10346   POSITION 2\r
10347   SQL-WIDTH 4\r
10348   COLUMN-LABEL "Coll Id"\r
10349   ORDER 10\r
10350 \r
10351 ADD FIELD "ReplId" OF "ReplCollisionLog" AS integer \r
10352   DESCRIPTION "Relates back to the original replication record involved."\r
10353   FORMAT ">>>,>>>,>>9"\r
10354   INITIAL "0"\r
10355   LABEL "Replication Id"\r
10356   POSITION 3\r
10357   SQL-WIDTH 4\r
10358   COLUMN-LABEL "Rep Id"\r
10359   ORDER 20\r
10360 \r
10361 ADD FIELD "TransActID" OF "ReplCollisionLog" AS integer \r
10362   DESCRIPTION "Progress DBTASKID. Groups all records in the same transaction. None of them will be replicated."\r
10363   FORMAT ">,>>>,>>>,>>9"\r
10364   INITIAL "0"\r
10365   LABEL "Transaction ID"\r
10366   POSITION 4\r
10367   SQL-WIDTH 4\r
10368   COLUMN-LABEL "Trans. ID"\r
10369   ORDER 30\r
10370 \r
10371 ADD FIELD "ReplDate" OF "ReplCollisionLog" AS date \r
10372   DESCRIPTION "The date applying to the data change"\r
10373   FORMAT "99/99/9999"\r
10374   INITIAL ?\r
10375   POSITION 5\r
10376   SQL-WIDTH 4\r
10377   COLUMN-LABEL-SA "C"\r
10378   ORDER 40\r
10379 \r
10380 ADD FIELD "ReplTime" OF "ReplCollisionLog" AS integer \r
10381   DESCRIPTION "The time that this record was last modified"\r
10382   FORMAT "->,>>>,>>9"\r
10383   INITIAL "0"\r
10384   POSITION 6\r
10385   SQL-WIDTH 4\r
10386   ORDER 50\r
10387 \r
10388 ADD FIELD "ReplEvent" OF "ReplCollisionLog" AS character \r
10389   DESCRIPTION "Create, Modify, Delete"\r
10390   FORMAT "X(8)"\r
10391   INITIAL ""\r
10392   LABEL "Event"\r
10393   POSITION 7\r
10394   SQL-WIDTH 16\r
10395   COLUMN-LABEL "Event"\r
10396   ORDER 60\r
10397 \r
10398 ADD FIELD "ReplBI" OF "ReplCollisionLog" AS raw \r
10399   DESCRIPTION "RAW image of record before it changed"\r
10400   FORMAT "X(8)"\r
10401   INITIAL ""\r
10402   POSITION 8\r
10403   SQL-WIDTH 16\r
10404   ORDER 70\r
10405 \r
10406 ADD FIELD "ReplAI" OF "ReplCollisionLog" AS raw \r
10407   DESCRIPTION "Raw image of record after it changed"\r
10408   FORMAT "X(8)"\r
10409   INITIAL ""\r
10410   POSITION 9\r
10411   SQL-WIDTH 16\r
10412   ORDER 80\r
10413 \r
10414 ADD FIELD "LoadFile" OF "ReplCollisionLog" AS character \r
10415   DESCRIPTION "Taken from the dump file name"\r
10416   FORMAT "X(12)"\r
10417   INITIAL ""\r
10418   POSITION 10\r
10419   SQL-WIDTH 24\r
10420   ORDER 90\r
10421 \r
10422 ADD FIELD "Collided" OF "ReplCollisionLog" AS logical \r
10423   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
10424   FORMAT "yes/no"\r
10425   INITIAL "no"\r
10426   LABEL "Collision Record"\r
10427   POSITION 11\r
10428   SQL-WIDTH 1\r
10429   COLUMN-LABEL "Coll Rec"\r
10430   ORDER 100\r
10431 \r
10432 ADD FIELD "TableToRepl" OF "ReplCollisionLog" AS character \r
10433   DESCRIPTION "Name of the table replicated"\r
10434   FORMAT "X(32)"\r
10435   INITIAL ""\r
10436   LABEL "Table Name"\r
10437   POSITION 12\r
10438   SQL-WIDTH 64\r
10439   COLUMN-LABEL "Table"\r
10440   ORDER 110\r
10441 \r
10442 ADD INDEX "ReplColl" ON "ReplCollisionLog" \r
10443   AREA "Schema Area"\r
10444   UNIQUE\r
10445   PRIMARY\r
10446   INDEX-FIELD "CollisionID" ASCENDING \r
10447 \r
10448 ADD INDEX "ReplCollTrans" ON "ReplCollisionLog" \r
10449   AREA "Schema Area"\r
10450   INDEX-FIELD "TransActID" ASCENDING \r
10451   INDEX-FIELD "CollisionID" ASCENDING \r
10452 \r
10453 ADD INDEX "ReplDateTime" ON "ReplCollisionLog" \r
10454   AREA "Schema Area"\r
10455   INDEX-FIELD "ReplDate" ASCENDING \r
10456   INDEX-FIELD "ReplTime" ASCENDING \r
10457   INDEX-FIELD "CollisionID" ASCENDING \r
10458 \r
10459 ADD TABLE "ReplLoadRule"\r
10460   AREA "Schema Area"\r
10461   LABEL "Replication Load Rules"\r
10462   DESCRIPTION "List of tables to load at a particular site. This table is site specific."\r
10463   DUMP-NAME "replload"\r
10464 \r
10465 ADD FIELD "TableToLoad" OF "ReplLoadRule" AS character \r
10466   FORMAT "X(32)"\r
10467   INITIAL ""\r
10468   LABEL "Table Name"\r
10469   POSITION 2\r
10470   SQL-WIDTH 64\r
10471   COLUMN-LABEL "Table"\r
10472   HELP "Enter the name of the replicated table to load"\r
10473   ORDER 10\r
10474 \r
10475 ADD FIELD "Activity" OF "ReplLoadRule" AS character \r
10476   DESCRIPTION "The activity on which replication will take place.\r
10477 Create, Modify, Delete. CMD"\r
10478   FORMAT "X(3)"\r
10479   INITIAL "CMD"\r
10480   LABEL "Activity"\r
10481   POSITION 3\r
10482   SQL-WIDTH 6\r
10483   COLUMN-LABEL "Activity"\r
10484   HELP "Enter 'C'reate, 'M'odify and/or 'D'elete"\r
10485   ORDER 20\r
10486 \r
10487 ADD FIELD "SourceSystem" OF "ReplLoadRule" AS character \r
10488   DESCRIPTION "System from which data to replicated. "\r
10489   FORMAT "X(8)"\r
10490   INITIAL ""\r
10491   LABEL "Source System"\r
10492   POSITION 4\r
10493   SQL-WIDTH 16\r
10494   COLUMN-LABEL "Source"\r
10495   HELP "Source system for replication."\r
10496   ORDER 30\r
10497 \r
10498 ADD FIELD "CollisionDetect" OF "ReplLoadRule" AS logical \r
10499   DESCRIPTION "Detect for collisions"\r
10500   FORMAT "yes/no"\r
10501   INITIAL "yes"\r
10502   LABEL "Collision Detect"\r
10503   POSITION 5\r
10504   SQL-WIDTH 1\r
10505   COLUMN-LABEL "C.D."\r
10506   ORDER 50\r
10507 \r
10508 ADD FIELD "UniqueIndex" OF "ReplLoadRule" AS character \r
10509   FORMAT "X(32)"\r
10510   INITIAL ""\r
10511   LABEL "Unique Index"\r
10512   POSITION 6\r
10513   SQL-WIDTH 64\r
10514   COLUMN-LABEL "Index"\r
10515   ORDER 60\r
10516 \r
10517 ADD INDEX "ReplLoad" ON "ReplLoadRule" \r
10518   AREA "Schema Area"\r
10519   UNIQUE\r
10520   PRIMARY\r
10521   INDEX-FIELD "TableToLoad" ASCENDING \r
10522   INDEX-FIELD "SourceSystem" ASCENDING \r
10523 \r
10524 ADD TABLE "ReplLog"\r
10525   AREA "Schema Area"\r
10526   LABEL "Replication Log"\r
10527   DESCRIPTION "Replication log"\r
10528   DUMP-NAME "repllog"\r
10529 \r
10530 ADD FIELD "OfficeCode" OF "ReplLog" AS character \r
10531   FORMAT "X(4)"\r
10532   INITIAL ""\r
10533   LABEL "Office"\r
10534   POSITION 2\r
10535   SQL-WIDTH 8\r
10536   ORDER 10\r
10537 \r
10538 ADD FIELD "ReplId" OF "ReplLog" AS integer \r
10539   FORMAT ">>>,>>>,>>9"\r
10540   INITIAL "0"\r
10541   LABEL "Replication Id"\r
10542   POSITION 3\r
10543   SQL-WIDTH 4\r
10544   COLUMN-LABEL "Rep Id"\r
10545   ORDER 20\r
10546 \r
10547 ADD FIELD "TransActID" OF "ReplLog" AS integer \r
10548   DESCRIPTION "Progress DBTASKID"\r
10549   FORMAT ">,>>>,>>>,>>9"\r
10550   INITIAL "0"\r
10551   LABEL "Transaction ID"\r
10552   POSITION 4\r
10553   SQL-WIDTH 4\r
10554   COLUMN-LABEL "Trans. ID"\r
10555   ORDER 30\r
10556 \r
10557 ADD FIELD "TableToRepl" OF "ReplLog" AS character \r
10558   DESCRIPTION "Name of the table replicated"\r
10559   FORMAT "X(32)"\r
10560   INITIAL ""\r
10561   LABEL "Table Name"\r
10562   POSITION 5\r
10563   SQL-WIDTH 64\r
10564   COLUMN-LABEL "Table"\r
10565   ORDER 40\r
10566 \r
10567 ADD FIELD "ReplDate" OF "ReplLog" AS date \r
10568   DESCRIPTION "The date applying to the data change"\r
10569   FORMAT "99/99/9999"\r
10570   INITIAL ?\r
10571   POSITION 6\r
10572   SQL-WIDTH 4\r
10573   COLUMN-LABEL-SA "C"\r
10574   ORDER 50\r
10575 \r
10576 ADD FIELD "ReplTime" OF "ReplLog" AS integer \r
10577   DESCRIPTION "The time that this record was last modified"\r
10578   FORMAT "->,>>>,>>9"\r
10579   INITIAL "0"\r
10580   POSITION 7\r
10581   SQL-WIDTH 4\r
10582   ORDER 60\r
10583 \r
10584 ADD FIELD "ReplEvent" OF "ReplLog" AS character \r
10585   DESCRIPTION "Create, Modify, Delete"\r
10586   FORMAT "X(8)"\r
10587   INITIAL ""\r
10588   LABEL "Event"\r
10589   POSITION 8\r
10590   SQL-WIDTH 16\r
10591   COLUMN-LABEL "Event"\r
10592   ORDER 70\r
10593 \r
10594 ADD FIELD "ReplBI" OF "ReplLog" AS raw \r
10595   DESCRIPTION "RAW image of record before it changed"\r
10596   FORMAT "X(8)"\r
10597   INITIAL ""\r
10598   POSITION 9\r
10599   SQL-WIDTH 16\r
10600   ORDER 80\r
10601 \r
10602 ADD FIELD "ReplAI" OF "ReplLog" AS raw \r
10603   DESCRIPTION "Raw image of record after it changed"\r
10604   FORMAT "X(8)"\r
10605   INITIAL ""\r
10606   POSITION 10\r
10607   SQL-WIDTH 16\r
10608   ORDER 90\r
10609 \r
10610 ADD FIELD "DumpFile" OF "ReplLog" AS character \r
10611   FORMAT "X(12)"\r
10612   INITIAL ""\r
10613   POSITION 11\r
10614   SQL-WIDTH 24\r
10615   ORDER 100\r
10616 \r
10617 ADD FIELD "TableRowID" OF "ReplLog" AS recid \r
10618   FORMAT ">>>>>>9"\r
10619   INITIAL ?\r
10620   POSITION 12\r
10621   SQL-WIDTH 4\r
10622   ORDER 110\r
10623 \r
10624 ADD INDEX "ReplOffice" ON "ReplLog" \r
10625   AREA "Schema Area"\r
10626   PRIMARY\r
10627   INDEX-FIELD "OfficeCode" ASCENDING \r
10628   INDEX-FIELD "ReplId" ASCENDING \r
10629 \r
10630 ADD INDEX "ReplRowid" ON "ReplLog" \r
10631   AREA "Schema Area"\r
10632   INDEX-FIELD "TableToRepl" ASCENDING \r
10633   INDEX-FIELD "TransActID" ASCENDING \r
10634   INDEX-FIELD "TableRowID" ASCENDING \r
10635 \r
10636 ADD INDEX "ReplTransAct" ON "ReplLog" \r
10637   AREA "Schema Area"\r
10638   INDEX-FIELD "TransActID" ASCENDING \r
10639   INDEX-FIELD "ReplId" ASCENDING \r
10640 \r
10641 ADD TABLE "ReplTrigger"\r
10642   AREA "Schema Area"\r
10643   DESCRIPTION "Replication triggers to be created"\r
10644   DUMP-NAME "repltrig"\r
10645 \r
10646 ADD FIELD "TableToRepl" OF "ReplTrigger" AS character \r
10647   DESCRIPTION "Name of the table to replicate"\r
10648   FORMAT "X(32)"\r
10649   INITIAL ""\r
10650   LABEL "Table Name"\r
10651   POSITION 2\r
10652   SQL-WIDTH 64\r
10653   COLUMN-LABEL "Table"\r
10654   ORDER 10\r
10655 \r
10656 ADD FIELD "Activity" OF "ReplTrigger" AS character \r
10657   DESCRIPTION "The activity on which replication will take place.\r
10658 Create, Modify, Delete. CMD"\r
10659   FORMAT "X(3)"\r
10660   INITIAL "CMD"\r
10661   LABEL "Activity"\r
10662   POSITION 3\r
10663   SQL-WIDTH 6\r
10664   COLUMN-LABEL "Activity"\r
10665   HELP "Enter 'C'reate, 'M'odify and/or 'D'elete"\r
10666   ORDER 20\r
10667 \r
10668 ADD INDEX "ReplTrigger" ON "ReplTrigger" \r
10669   AREA "Schema Area"\r
10670   PRIMARY\r
10671   INDEX-FIELD "TableToRepl" ASCENDING \r
10672 \r
10673 ADD TABLE "ToPost"\r
10674   AREA "Schema Area"\r
10675   DESCRIPTION "A list of batches that have been posted on a peer replication site"\r
10676   DUMP-NAME "topost"\r
10677 \r
10678 ADD FIELD "BatchCode" OF "ToPost" AS integer \r
10679   DESCRIPTION "The code of a batch of documents."\r
10680   FORMAT ">>>>>9"\r
10681   INITIAL "0"\r
10682   LABEL "Batch No."\r
10683   POSITION 2\r
10684   SQL-WIDTH 4\r
10685   COLUMN-LABEL "Batch"\r
10686   ORDER 10\r
10687 \r
10688 ADD FIELD "OperatorCode" OF "ToPost" AS integer \r
10689   DESCRIPTION "The staff contact code for the operator who updated this batch of documents."\r
10690   FORMAT ">>>>>>9"\r
10691   INITIAL "0"\r
10692   LABEL "Operator"\r
10693   POSITION 3\r
10694   SQL-WIDTH 4\r
10695   ORDER 20\r
10696   MANDATORY\r
10697 \r
10698 ADD FIELD "UpdatedAt" OF "ToPost" AS integer \r
10699   DESCRIPTION "The time that the batch update was completed."\r
10700   FORMAT "->,>>>,>>9"\r
10701   INITIAL "0"\r
10702   LABEL "Updated At"\r
10703   POSITION 4\r
10704   SQL-WIDTH 4\r
10705   COLUMN-LABEL-SA "C"\r
10706   ORDER 60\r
10707 \r
10708 ADD FIELD "UpdatedOn" OF "ToPost" AS date \r
10709   DESCRIPTION "The date on which the batch update was completed."\r
10710   FORMAT "99/99/9999"\r
10711   INITIAL ?\r
10712   LABEL "Updated On"\r
10713   POSITION 5\r
10714   SQL-WIDTH 4\r
10715   COLUMN-LABEL-SA "C"\r
10716   ORDER 70\r
10717 \r
10718 ADD FIELD "Description" OF "ToPost" AS character \r
10719   FORMAT "X(50)"\r
10720   INITIAL ""\r
10721   POSITION 6\r
10722   SQL-WIDTH 100\r
10723   HELP "A description of the documents in this batch"\r
10724   LENGTH 0\r
10725   ORDER 80\r
10726 \r
10727 ADD FIELD "UpdatedBy" OF "ToPost" AS character \r
10728   FORMAT "X(12)"\r
10729   INITIAL ""\r
10730   LABEL "Updated By"\r
10731   POSITION 7\r
10732   SQL-WIDTH 24\r
10733   ORDER 90\r
10734 \r
10735 ADD FIELD "OfficeCode" OF "ToPost" AS character \r
10736   DESCRIPTION "The office at which this batch was originally posted"\r
10737   FORMAT "X(4)"\r
10738   INITIAL ""\r
10739   LABEL "Office"\r
10740   POSITION 8\r
10741   SQL-WIDTH 8\r
10742   ORDER 100\r
10743 \r
10744 ADD FIELD "PostStatus" OF "ToPost" AS character \r
10745   FORMAT "X(4)"\r
10746   INITIAL ""\r
10747   POSITION 9\r
10748   SQL-WIDTH 8\r
10749   ORDER 110\r
10750 \r
10751 ADD INDEX "XPKToPost" ON "ToPost" \r
10752   AREA "Schema Area"\r
10753   UNIQUE\r
10754   PRIMARY\r
10755   INDEX-FIELD "BatchCode" ASCENDING \r
10756 \r
10757 ADD INDEX "XAK1ToPost" ON "ToPost" \r
10758   AREA "Schema Area"\r
10759   INDEX-FIELD "OfficeCode" ASCENDING \r
10760   INDEX-FIELD "PostStatus" ASCENDING \r
10761   INDEX-FIELD "BatchCode" ASCENDING \r
10762 \r
10763 ADD TABLE "ProjectExpenseCategory"\r
10764   AREA "Schema Area"\r
10765   DUMP-NAME "prjxpcat"\r
10766 \r
10767 ADD FIELD "ProjectExpenseCategory" OF "ProjectExpenseCategory" AS character \r
10768   FORMAT "X(4)"\r
10769   INITIAL ""\r
10770   LABEL "Type"\r
10771   POSITION 2\r
10772   SQL-WIDTH 8\r
10773   ORDER 10\r
10774   MANDATORY\r
10775 \r
10776 ADD FIELD "Description" OF "ProjectExpenseCategory" AS character \r
10777   FORMAT "X(50)"\r
10778   INITIAL ""\r
10779   POSITION 3\r
10780   SQL-WIDTH 100\r
10781   ORDER 20\r
10782 \r
10783 ADD INDEX "XPKProjectExpenseCategory" ON "ProjectExpenseCategory" \r
10784   AREA "Schema Area"\r
10785   UNIQUE\r
10786   PRIMARY\r
10787   INDEX-FIELD "ProjectExpenseCategory" ASCENDING \r
10788 \r
10789 ADD TABLE "ProjectType"\r
10790   AREA "Schema Area"\r
10791   DUMP-NAME "prjtype"\r
10792 \r
10793 ADD FIELD "ProjectType" OF "ProjectType" AS character \r
10794   FORMAT "X(4)"\r
10795   INITIAL ""\r
10796   LABEL "Type"\r
10797   POSITION 2\r
10798   SQL-WIDTH 8\r
10799   ORDER 10\r
10800   MANDATORY\r
10801 \r
10802 ADD FIELD "Description" OF "ProjectType" AS character \r
10803   FORMAT "X(50)"\r
10804   INITIAL ""\r
10805   POSITION 3\r
10806   SQL-WIDTH 100\r
10807   ORDER 20\r
10808 \r
10809 ADD INDEX "XPKProjectType" ON "ProjectType" \r
10810   AREA "Schema Area"\r
10811   UNIQUE\r
10812   PRIMARY\r
10813   INDEX-FIELD "ProjectType" ASCENDING \r
10814 \r
10815 ADD TABLE "Variation"\r
10816   AREA "Schema Area"\r
10817   DUMP-NAME "variatio"\r
10818   TABLE-TRIGGER "DELETE" OVERRIDE PROCEDURE "devaritn.p" CRC "?" \r
10819   TABLE-TRIGGER "WRITE" OVERRIDE PROCEDURE "wrvaritn.p" CRC "?" \r
10820 \r
10821 ADD FIELD "ProjectCode" OF "Variation" AS integer \r
10822   FORMAT "99999"\r
10823   INITIAL "0"\r
10824   POSITION 2\r
10825   SQL-WIDTH 4\r
10826   ORDER 10\r
10827 \r
10828 ADD FIELD "VariationCode" OF "Variation" AS integer \r
10829   FORMAT ">>>>9"\r
10830   INITIAL "0"\r
10831   POSITION 3\r
10832   SQL-WIDTH 4\r
10833   ORDER 20\r
10834 \r
10835 ADD FIELD "VariationType" OF "Variation" AS character \r
10836   FORMAT "X(4)"\r
10837   INITIAL ""\r
10838   LABEL "Type"\r
10839   POSITION 4\r
10840   SQL-WIDTH 8\r
10841   ORDER 30\r
10842 \r
10843 ADD FIELD "VariationDate" OF "Variation" AS date \r
10844   FORMAT "99/99/9999"\r
10845   INITIAL ?\r
10846   POSITION 5\r
10847   SQL-WIDTH 4\r
10848   ORDER 40\r
10849 \r
10850 ADD FIELD "Reason" OF "Variation" AS character \r
10851   FORMAT "X(50)"\r
10852   INITIAL ""\r
10853   POSITION 6\r
10854   SQL-WIDTH 100\r
10855   ORDER 50\r
10856 \r
10857 ADD FIELD "Approvers" OF "Variation" AS character \r
10858   FORMAT "X(4)"\r
10859   INITIAL ""\r
10860   POSITION 7\r
10861   SQL-WIDTH 30\r
10862   EXTENT 3\r
10863   ORDER 60\r
10864 \r
10865 ADD FIELD "VariationCategory" OF "Variation" AS character \r
10866   FORMAT "X(4)"\r
10867   INITIAL ""\r
10868   LABEL "Category"\r
10869   POSITION 8\r
10870   SQL-WIDTH 8\r
10871   ORDER 70\r
10872 \r
10873 ADD INDEX "XPKVariations" ON "Variation" \r
10874   AREA "Schema Area"\r
10875   UNIQUE\r
10876   PRIMARY\r
10877   INDEX-FIELD "ProjectCode" ASCENDING \r
10878   INDEX-FIELD "VariationCode" ASCENDING \r
10879 \r
10880 ADD INDEX "XAK1Variations" ON "Variation" \r
10881   AREA "Schema Area"\r
10882   INDEX-FIELD "ProjectCode" ASCENDING \r
10883   INDEX-FIELD "VariationDate" ASCENDING \r
10884 \r
10885 ADD INDEX "XAK2Variations" ON "Variation" \r
10886   AREA "Schema Area"\r
10887   UNIQUE\r
10888   INDEX-FIELD "ProjectCode" ASCENDING \r
10889   INDEX-FIELD "VariationType" ASCENDING \r
10890   INDEX-FIELD "VariationDate" ASCENDING \r
10891   INDEX-FIELD "VariationCode" ASCENDING \r
10892 \r
10893 ADD TABLE "VariationFlow"\r
10894   AREA "Schema Area"\r
10895   DUMP-NAME "var-flow"\r
10896   TABLE-TRIGGER "DELETE" OVERRIDE PROCEDURE "devarflw.p" CRC "?" \r
10897   TABLE-TRIGGER "WRITE" OVERRIDE PROCEDURE "wrvarflw.p" CRC "?" \r
10898 \r
10899 ADD FIELD "ProjectCode" OF "VariationFlow" AS integer \r
10900   FORMAT "99999"\r
10901   INITIAL "0"\r
10902   POSITION 2\r
10903   SQL-WIDTH 4\r
10904   ORDER 10\r
10905 \r
10906 ADD FIELD "VariationCode" OF "VariationFlow" AS integer \r
10907   FORMAT ">>>>9"\r
10908   INITIAL "0"\r
10909   POSITION 3\r
10910   SQL-WIDTH 4\r
10911   ORDER 20\r
10912 \r
10913 ADD FIELD "AccountCode" OF "VariationFlow" AS decimal \r
10914   DESCRIPTION "The code of the account."\r
10915   FORMAT "9999.99"\r
10916   INITIAL "0000.00"\r
10917   LABEL "Account"\r
10918   POSITION 4\r
10919   SQL-WIDTH 17\r
10920   DECIMALS 2\r
10921   ORDER 30\r
10922 \r
10923 ADD FIELD "MonthCode" OF "VariationFlow" AS integer \r
10924   DESCRIPTION "The code of the month that this account applies to."\r
10925   FORMAT ">>>>>9"\r
10926   INITIAL ?\r
10927   LABEL "Month"\r
10928   POSITION 5\r
10929   SQL-WIDTH 4\r
10930   ORDER 40\r
10931 \r
10932 ADD FIELD "Amount" OF "VariationFlow" AS decimal \r
10933   FORMAT "->>>,>>>,>>9.99"\r
10934   INITIAL "0"\r
10935   POSITION 6\r
10936   SQL-WIDTH 17\r
10937   COLUMN-LABEL-SA "C"\r
10938   DECIMALS 2\r
10939   ORDER 50\r
10940 \r
10941 ADD INDEX "XPKVariationFlows" ON "VariationFlow" \r
10942   AREA "Schema Area"\r
10943   UNIQUE\r
10944   PRIMARY\r
10945   INDEX-FIELD "ProjectCode" ASCENDING \r
10946   INDEX-FIELD "VariationCode" ASCENDING \r
10947   INDEX-FIELD "AccountCode" ASCENDING \r
10948   INDEX-FIELD "MonthCode" ASCENDING \r
10949 \r
10950 ADD INDEX "XAK1VariationFlows" ON "VariationFlow" \r
10951   AREA "Schema Area"\r
10952   INDEX-FIELD "ProjectCode" ASCENDING \r
10953   INDEX-FIELD "AccountCode" ASCENDING \r
10954   INDEX-FIELD "MonthCode" ASCENDING \r
10955 \r
10956 ADD TABLE "VariationType"\r
10957   AREA "Schema Area"\r
10958   DUMP-NAME "vartype"\r
10959 \r
10960 ADD FIELD "VariationType" OF "VariationType" AS character \r
10961   FORMAT "X(4)"\r
10962   INITIAL ""\r
10963   LABEL "Type"\r
10964   POSITION 2\r
10965   SQL-WIDTH 8\r
10966   ORDER 10\r
10967   MANDATORY\r
10968 \r
10969 ADD FIELD "Description" OF "VariationType" AS character \r
10970   FORMAT "X(50)"\r
10971   INITIAL ""\r
10972   POSITION 3\r
10973   SQL-WIDTH 100\r
10974   ORDER 20\r
10975 \r
10976 ADD INDEX "XPKVariationType" ON "VariationType" \r
10977   AREA "Schema Area"\r
10978   UNIQUE\r
10979   PRIMARY\r
10980   INDEX-FIELD "VariationType" ASCENDING \r
10981 \r
10982 ADD TABLE "RentCharge"\r
10983   AREA "Schema Area"\r
10984   DUMP-NAME "rentchag"\r
10985   TABLE-TRIGGER "DELETE" OVERRIDE PROCEDURE "derntchg.p" CRC "?" \r
10986   TABLE-TRIGGER "WRITE" OVERRIDE PROCEDURE "wrrntchg.p" CRC "?" \r
10987 \r
10988 ADD FIELD "TenancyLeaseCode" OF "RentCharge" AS integer \r
10989   DESCRIPTION "The tenancy lease  that this charge relates to"\r
10990   FORMAT "99999"\r
10991   INITIAL "0"\r
10992   LABEL "Code"\r
10993   POSITION 2\r
10994   SQL-WIDTH 4\r
10995   ORDER 10\r
10996 \r
10997 ADD FIELD "SequenceCode" OF "RentCharge" AS integer \r
10998   DESCRIPTION "This code groups sets of related charges for a particular lease."\r
10999   FORMAT "99"\r
11000   INITIAL "0"\r
11001   POSITION 3\r
11002   SQL-WIDTH 4\r
11003   ORDER 15\r
11004 \r
11005 ADD FIELD "RentChargeType" OF "RentCharge" AS character \r
11006   DESCRIPTION "The primary type of charge"\r
11007   FORMAT "X(4)"\r
11008   INITIAL ""\r
11009   POSITION 4\r
11010   SQL-WIDTH 8\r
11011   ORDER 20\r
11012 \r
11013 ADD FIELD "Description" OF "RentCharge" AS character \r
11014   DESCRIPTION "A brief description of this charge"\r
11015   FORMAT "X(50)"\r
11016   INITIAL ""\r
11017   POSITION 5\r
11018   SQL-WIDTH 100\r
11019   ORDER 90\r
11020 \r
11021 ADD FIELD "AccountCode" OF "RentCharge" AS decimal \r
11022   DESCRIPTION "The account against which this charge applies. If this is not set, then the account on the charge type will be used."\r
11023   FORMAT "9999.99"\r
11024   INITIAL "0"\r
11025   LABEL "Account"\r
11026   POSITION 6\r
11027   SQL-WIDTH 17\r
11028   COLUMN-LABEL-SA "C"\r
11029   DECIMALS 2\r
11030   ORDER 100\r
11031   MANDATORY\r
11032 \r
11033 ADD FIELD "EntityType" OF "RentCharge" AS character \r
11034   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
11035   FORMAT "X"\r
11036   INITIAL ""\r
11037   LABEL "Entity type"\r
11038   POSITION 7\r
11039   SQL-WIDTH 2\r
11040   COLUMN-LABEL "Type"\r
11041   COLUMN-LABEL-SA "C"\r
11042   LENGTH 0\r
11043   ORDER 110\r
11044   MANDATORY\r
11045 \r
11046 ADD FIELD "EntityCode" OF "RentCharge" AS integer \r
11047   FORMAT "99999"\r
11048   INITIAL "0"\r
11049   LABEL "Code"\r
11050   POSITION 8\r
11051   SQL-WIDTH 4\r
11052   COLUMN-LABEL-SA "C"\r
11053   ORDER 120\r
11054 \r
11055 ADD FIELD "CurrentAnnualRental" OF "RentCharge" AS decimal \r
11056   DESCRIPTION "The last rent charged pro-rated to an annualised rental"\r
11057   FORMAT "->>,>>>,>>9.99"\r
11058   INITIAL "0"\r
11059   POSITION 9\r
11060   SQL-WIDTH 17\r
11061   HELP "The last rent charged pro-rated to an annualised rental"\r
11062   DECIMALS 2\r
11063   ORDER 40\r
11064 \r
11065 ADD FIELD "CurrentPeriodRental" OF "RentCharge" AS decimal \r
11066   DESCRIPTION "The actual last rent charged for a period, usually monthly"\r
11067   FORMAT "->>,>>>,>>9.99"\r
11068   INITIAL "0"\r
11069   POSITION 10\r
11070   SQL-WIDTH 17\r
11071   HELP "The actual last rent charged for a period, usually monthly"\r
11072   DECIMALS 2\r
11073   ORDER 50\r
11074 \r
11075 ADD FIELD "CurrentTotal" OF "RentCharge" AS decimal \r
11076   DESCRIPTION "The annualised total of the RentChargeLines currently in effect"\r
11077   FORMAT "->>,>>>,>>9.99"\r
11078   INITIAL "0"\r
11079   POSITION 11\r
11080   SQL-WIDTH 17\r
11081   HELP "The annualised total of the RentChargeLines currently in effect"\r
11082   DECIMALS 2\r
11083   ORDER 60\r
11084 \r
11085 ADD INDEX "XPKRentCharge" ON "RentCharge" \r
11086   AREA "Schema Area"\r
11087   UNIQUE\r
11088   PRIMARY\r
11089   INDEX-FIELD "TenancyLeaseCode" ASCENDING \r
11090   INDEX-FIELD "SequenceCode" ASCENDING \r
11091 \r
11092 ADD INDEX "XAK1RentCharge" ON "RentCharge" \r
11093   AREA "Schema Area"\r
11094   UNIQUE\r
11095   INDEX-FIELD "TenancyLeaseCode" ASCENDING \r
11096   INDEX-FIELD "RentChargeType" ASCENDING \r
11097   INDEX-FIELD "SequenceCode" ASCENDING \r
11098 \r
11099 ADD TABLE "RentChargeLine"\r
11100   AREA "Schema Area"\r
11101   DESCRIPTION "Stores a schedule of rent charges against a lease over time including rent review type\r
11102 information"\r
11103   DUMP-NAME "rentchar"\r
11104   TABLE-TRIGGER "WRITE" OVERRIDE PROCEDURE "wrrchgln.p" CRC "?" \r
11105 \r
11106 ADD FIELD "TenancyLeaseCode" OF "RentChargeLine" AS integer \r
11107   DESCRIPTION "The tenancy lease  that this charge relates to"\r
11108   FORMAT "99999"\r
11109   INITIAL "0"\r
11110   LABEL "Code"\r
11111   POSITION 2\r
11112   SQL-WIDTH 4\r
11113   ORDER 10\r
11114 \r
11115 ADD FIELD "Amount" OF "RentChargeLine" AS decimal \r
11116   FORMAT "->>>,>>>,>>9.99"\r
11117   INITIAL "0"\r
11118   POSITION 3\r
11119   SQL-WIDTH 17\r
11120   COLUMN-LABEL-SA "C"\r
11121   DECIMALS 2\r
11122   ORDER 60\r
11123 \r
11124 ADD FIELD "StartDate" OF "RentChargeLine" AS date \r
11125   DESCRIPTION "The date from which charging starts"\r
11126   FORMAT "99/99/9999"\r
11127   INITIAL ?\r
11128   POSITION 4\r
11129   SQL-WIDTH 4\r
11130   ORDER 30\r
11131 \r
11132 ADD FIELD "EndDate" OF "RentChargeLine" AS date \r
11133   DESCRIPTION "The date when charging ceases"\r
11134   FORMAT "99/99/9999"\r
11135   INITIAL ?\r
11136   POSITION 5\r
11137   SQL-WIDTH 4\r
11138   ORDER 50\r
11139 \r
11140 ADD FIELD "LastChargedDate" OF "RentChargeLine" AS date \r
11141   DESCRIPTION "The date when this charge was last charged."\r
11142   FORMAT "99/99/9999"\r
11143   INITIAL ?\r
11144   POSITION 6\r
11145   SQL-WIDTH 4\r
11146   ORDER 70\r
11147 \r
11148 ADD FIELD "FrequencyCode" OF "RentChargeLine" AS character \r
11149   DESCRIPTION "The frequency with which charges are issued."\r
11150   FORMAT "X(4)"\r
11151   INITIAL ""\r
11152   POSITION 7\r
11153   SQL-WIDTH 8\r
11154   ORDER 80\r
11155 \r
11156 ADD FIELD "RentChargeLineStatus" OF "RentChargeLine" AS character \r
11157   DESCRIPTION "The status of this rent charge line\r
11158 "\r
11159   FORMAT "X(4)"\r
11160   INITIAL ""\r
11161   POSITION 8\r
11162   SQL-WIDTH 8\r
11163   ORDER 40\r
11164 \r
11165 ADD FIELD "SequenceCode" OF "RentChargeLine" AS integer \r
11166   DESCRIPTION "This code groups sets of related charges for a particular lease."\r
11167   FORMAT "99"\r
11168   INITIAL "0"\r
11169   POSITION 9\r
11170   SQL-WIDTH 4\r
11171   ORDER 20\r
11172 \r
11173 ADD FIELD "LastModifiedDate" OF "RentChargeLine" AS date \r
11174   DESCRIPTION "The date when this record was last modified.  Maintained by a WRITE trigger."\r
11175   FORMAT "99/99/9999"\r
11176   INITIAL "1/1/0001"\r
11177   POSITION 10\r
11178   SQL-WIDTH 4\r
11179   ORDER 160\r
11180   MANDATORY\r
11181 \r
11182 ADD FIELD "LastModifiedTime" OF "RentChargeLine" AS integer \r
11183   DESCRIPTION "The time that this record was last modified"\r
11184   FORMAT "->,>>>,>>9"\r
11185   INITIAL "0"\r
11186   POSITION 11\r
11187   SQL-WIDTH 4\r
11188   ORDER 170\r
11189 \r
11190 ADD FIELD "LastModifiedUser" OF "RentChargeLine" AS character \r
11191   DESCRIPTION "The user who last modified this record.  Maintained by a WRITE trigger."\r
11192   FORMAT "X(8)"\r
11193   INITIAL ""\r
11194   POSITION 12\r
11195   SQL-WIDTH 16\r
11196   LENGTH 0\r
11197   ORDER 180\r
11198 \r
11199 ADD FIELD "AuditRecordId" OF "RentChargeLine" AS integer \r
11200   FORMAT "->,>>>,>>9"\r
11201   INITIAL "0"\r
11202   POSITION 13\r
11203   SQL-WIDTH 4\r
11204   ORDER 190\r
11205 \r
11206 ADD FIELD "DateCommitted" OF "RentChargeLine" AS date \r
11207   DESCRIPTION "The date that this scheuled charge was committed for charging"\r
11208   FORMAT "99/99/9999"\r
11209   INITIAL ?\r
11210   POSITION 14\r
11211   SQL-WIDTH 4\r
11212   ORDER 200\r
11213 \r
11214 ADD FIELD "EstimatedNetRentAmount" OF "RentChargeLine" AS decimal \r
11215   FORMAT "->>>,>>>,>>9.99"\r
11216   INITIAL "0"\r
11217   POSITION 15\r
11218   SQL-WIDTH 17\r
11219   COLUMN-LABEL-SA "C"\r
11220   DECIMALS 2\r
11221   ORDER 210\r
11222 \r
11223 ADD INDEX "XPKRentChargeLine" ON "RentChargeLine" \r
11224   AREA "Schema Area"\r
11225   PRIMARY\r
11226   INDEX-FIELD "TenancyLeaseCode" ASCENDING \r
11227   INDEX-FIELD "SequenceCode" ASCENDING \r
11228   INDEX-FIELD "StartDate" ASCENDING \r
11229 \r
11230 ADD TABLE "RentChargeLineStatus"\r
11231   AREA "Schema Area"\r
11232   DUMP-NAME "rentchas"\r
11233 \r
11234 ADD FIELD "RentChargeLineStatus" OF "RentChargeLineStatus" AS character \r
11235   DESCRIPTION "The status of this rent charge line i.e\r
11236 REVW - Under review ( for a rent review )\r
11237 INCO - Incomplete\r
11238 COMP - Complete"\r
11239   FORMAT "X(4)"\r
11240   INITIAL ""\r
11241   POSITION 2\r
11242   SQL-WIDTH 8\r
11243   ORDER 10\r
11244 \r
11245 ADD FIELD "Description" OF "RentChargeLineStatus" AS character \r
11246   DESCRIPTION "A brief description of this status"\r
11247   FORMAT "X(50)"\r
11248   INITIAL ""\r
11249   POSITION 3\r
11250   SQL-WIDTH 100\r
11251   ORDER 20\r
11252 \r
11253 ADD INDEX "XPKRentChargeLineStatus" ON "RentChargeLineStatus" \r
11254   AREA "Schema Area"\r
11255   UNIQUE\r
11256   PRIMARY\r
11257   INDEX-FIELD "RentChargeLineStatus" ASCENDING \r
11258 \r
11259 ADD TABLE "RentChargeType"\r
11260   AREA "Schema Area"\r
11261   DESCRIPTION "The primary type of rental charge\r
11262 e.g RENT, CLEAN etc."\r
11263   DUMP-NAME "rentchat"\r
11264 \r
11265 ADD FIELD "RentChargeType" OF "RentChargeType" AS character \r
11266   FORMAT "X(4)"\r
11267   INITIAL ""\r
11268   POSITION 2\r
11269   SQL-WIDTH 8\r
11270   ORDER 10\r
11271 \r
11272 ADD FIELD "Description" OF "RentChargeType" AS character \r
11273   FORMAT "X(50)"\r
11274   INITIAL ""\r
11275   POSITION 3\r
11276   SQL-WIDTH 100\r
11277   ORDER 20\r
11278 \r
11279 ADD FIELD "AccountCode" OF "RentChargeType" AS decimal \r
11280   DESCRIPTION "The account of the property against which this charge applies."\r
11281   FORMAT "9999.99"\r
11282   INITIAL "0"\r
11283   LABEL "Account"\r
11284   POSITION 4\r
11285   SQL-WIDTH 17\r
11286   COLUMN-LABEL-SA "C"\r
11287   DECIMALS 2\r
11288   ORDER 30\r
11289   MANDATORY\r
11290 \r
11291 ADD INDEX "XPKRentChargeType" ON "RentChargeType" \r
11292   AREA "Schema Area"\r
11293   UNIQUE\r
11294   PRIMARY\r
11295   INDEX-FIELD "RentChargeType" ASCENDING \r
11296 \r
11297 ADD TABLE "UnitType"\r
11298   AREA "Schema Area"\r
11299   DUMP-NAME "unittype"\r
11300 \r
11301 ADD FIELD "UnitType" OF "UnitType" AS character \r
11302   FORMAT "X(4)"\r
11303   INITIAL ""\r
11304   LABEL "Type"\r
11305   POSITION 2\r
11306   SQL-WIDTH 8\r
11307   ORDER 10\r
11308 \r
11309 ADD FIELD "Description" OF "UnitType" AS character \r
11310   FORMAT "X(50)"\r
11311   INITIAL ""\r
11312   POSITION 3\r
11313   SQL-WIDTH 100\r
11314   ORDER 20\r
11315 \r
11316 ADD FIELD "AllowInteger" OF "UnitType" AS logical \r
11317   FORMAT "yes/no"\r
11318   INITIAL "no"\r
11319   POSITION 4\r
11320   SQL-WIDTH 1\r
11321   ORDER 30\r
11322 \r
11323 ADD FIELD "AllowReal" OF "UnitType" AS logical \r
11324   FORMAT "yes/no"\r
11325   INITIAL "no"\r
11326   POSITION 5\r
11327   SQL-WIDTH 1\r
11328   ORDER 40\r
11329 \r
11330 ADD FIELD "AllowNegative" OF "UnitType" AS logical \r
11331   FORMAT "yes/no"\r
11332   INITIAL "no"\r
11333   POSITION 6\r
11334   SQL-WIDTH 1\r
11335   ORDER 50\r
11336 \r
11337 ADD INDEX "XPKUnitTypes" ON "UnitType" \r
11338   AREA "Schema Area"\r
11339   UNIQUE\r
11340   PRIMARY\r
11341   INDEX-FIELD "UnitType" ASCENDING \r
11342 \r
11343 ADD TABLE "Client"\r
11344   AREA "Schema Area"\r
11345   DUMP-NAME "client"\r
11346 \r
11347 ADD FIELD "ClientCode" OF "Client" AS character \r
11348   FORMAT "X(8)"\r
11349   INITIAL ""\r
11350   POSITION 2\r
11351   SQL-WIDTH 16\r
11352   ORDER 10\r
11353 \r
11354 ADD FIELD "Name" OF "Client" AS character \r
11355   FORMAT "X(50)"\r
11356   INITIAL ""\r
11357   POSITION 3\r
11358   SQL-WIDTH 100\r
11359   ORDER 20\r
11360 \r
11361 ADD FIELD "LegalName" OF "Client" AS character \r
11362   FORMAT "X(100)"\r
11363   INITIAL ""\r
11364   POSITION 4\r
11365   SQL-WIDTH 200\r
11366   ORDER 30\r
11367 \r
11368 ADD FIELD "AccountsContact" OF "Client" AS integer \r
11369   DESCRIPTION "A person with whom the accounts should be discussed.  Billing and payment address"\r
11370   FORMAT ">>>>>9"\r
11371   INITIAL "0"\r
11372   POSITION 5\r
11373   SQL-WIDTH 4\r
11374   ORDER 40\r
11375 \r
11376 ADD FIELD "PropertyContact" OF "Client" AS integer \r
11377   DESCRIPTION "A person with whom the property management issues should be discussed."\r
11378   FORMAT ">>>>>9"\r
11379   INITIAL "0"\r
11380   POSITION 6\r
11381   SQL-WIDTH 4\r
11382   ORDER 50\r
11383 \r
11384 ADD FIELD "TaxNo" OF "Client" AS character \r
11385   FORMAT "X(20)"\r
11386   INITIAL ""\r
11387   POSITION 7\r
11388   SQL-WIDTH 40\r
11389   ORDER 60\r
11390 \r
11391 ADD FIELD "LogoRoutine" OF "Client" AS character \r
11392   FORMAT "X(50)"\r
11393   INITIAL ""\r
11394   POSITION 8\r
11395   SQL-WIDTH 100\r
11396   ORDER 70\r
11397 \r
11398 ADD FIELD "RemittanceAddress" OF "Client" AS character \r
11399   FORMAT "X(256)"\r
11400   INITIAL ""\r
11401   LABEL "Remit to"\r
11402   POSITION 9\r
11403   SQL-WIDTH 512\r
11404   VIEW-AS "VIEW-AS EDITOR SIZE 78 BY 5 SCROLLBAR-HORIZONTAL SCROLLBAR-VERTICAL NO-WORD-WRAP"\r
11405   ORDER 80\r
11406 \r
11407 ADD FIELD "DefaultChequeAccount" OF "Client" AS character \r
11408   FORMAT "X(4)"\r
11409   INITIAL ""\r
11410   LABEL "Cheque a/c"\r
11411   POSITION 10\r
11412   SQL-WIDTH 8\r
11413   ORDER 90\r
11414 \r
11415 ADD FIELD "DefaultReceiptAccount" OF "Client" AS character \r
11416   FORMAT "X(4)"\r
11417   INITIAL ""\r
11418   LABEL "Receipt a/c"\r
11419   POSITION 11\r
11420   SQL-WIDTH 8\r
11421   ORDER 100\r
11422 \r
11423 ADD INDEX "XPKClients" ON "Client" \r
11424   AREA "Schema Area"\r
11425   UNIQUE\r
11426   PRIMARY\r
11427   INDEX-FIELD "ClientCode" ASCENDING \r
11428 \r
11429 ADD TABLE "PaymentStyle"\r
11430   AREA "Schema Area"\r
11431   DUMP-NAME "paystyle"\r
11432 \r
11433 ADD FIELD "PaymentStyle" OF "PaymentStyle" AS character \r
11434   FORMAT "X(4)"\r
11435   INITIAL ""\r
11436   LABEL "Pay By"\r
11437   POSITION 2\r
11438   SQL-WIDTH 8\r
11439   ORDER 10\r
11440 \r
11441 ADD FIELD "Description" OF "PaymentStyle" AS character \r
11442   FORMAT "X(50)"\r
11443   INITIAL ""\r
11444   POSITION 3\r
11445   SQL-WIDTH 100\r
11446   ORDER 20\r
11447 \r
11448 ADD FIELD "Payments" OF "PaymentStyle" AS logical \r
11449   FORMAT "yes/no"\r
11450   INITIAL "no"\r
11451   POSITION 4\r
11452   SQL-WIDTH 1\r
11453   VIEW-AS "VIEW-AS TOGGLE-BOX"\r
11454   ORDER 30\r
11455 \r
11456 ADD FIELD "Receipts" OF "PaymentStyle" AS logical \r
11457   FORMAT "yes/no"\r
11458   INITIAL "no"\r
11459   POSITION 5\r
11460   SQL-WIDTH 1\r
11461   VIEW-AS "VIEW-AS TOGGLE-BOX"\r
11462   ORDER 40\r
11463 \r
11464 ADD INDEX "XPKPaymentStyles" ON "PaymentStyle" \r
11465   AREA "Schema Area"\r
11466   UNIQUE\r
11467   PRIMARY\r
11468   INDEX-FIELD "PaymentStyle" ASCENDING \r
11469 \r
11470 ADD TABLE "DebtClassification"\r
11471   AREA "Schema Area"\r
11472   DUMP-NAME "debtclas"\r
11473 \r
11474 ADD FIELD "DebtClassification" OF "DebtClassification" AS character \r
11475   FORMAT "X(4)"\r
11476   INITIAL ""\r
11477   LABEL "Debt Class"\r
11478   POSITION 2\r
11479   SQL-WIDTH 8\r
11480   COLUMN-LABEL ""\r
11481   ORDER 10\r
11482 \r
11483 ADD FIELD "Description" OF "DebtClassification" AS character \r
11484   FORMAT "X(50)"\r
11485   INITIAL ""\r
11486   POSITION 3\r
11487   SQL-WIDTH 100\r
11488   ORDER 20\r
11489 \r
11490 ADD INDEX "XPKDebtClassifications" ON "DebtClassification" \r
11491   AREA "Schema Area"\r
11492   UNIQUE\r
11493   PRIMARY\r
11494   INDEX-FIELD "DebtClassification" ASCENDING \r
11495 \r
11496 ADD TABLE "EntityContact"\r
11497   AREA "Schema Area"\r
11498   DUMP-NAME "econtact"\r
11499 \r
11500 ADD FIELD "EntityType" OF "EntityContact" AS character \r
11501   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
11502   FORMAT "X"\r
11503   INITIAL ?\r
11504   LABEL "Entity type"\r
11505   POSITION 2\r
11506   SQL-WIDTH 2\r
11507   COLUMN-LABEL "T"\r
11508   COLUMN-LABEL-SA "C"\r
11509   ORDER 10\r
11510 \r
11511 ADD FIELD "EntityCode" OF "EntityContact" AS integer \r
11512   FORMAT "99999"\r
11513   INITIAL ?\r
11514   LABEL "Code"\r
11515   POSITION 3\r
11516   SQL-WIDTH 4\r
11517   COLUMN-LABEL-SA "C"\r
11518   ORDER 20\r
11519 \r
11520 ADD FIELD "EntityContactType" OF "EntityContact" AS character \r
11521   FORMAT "X(4)"\r
11522   INITIAL ""\r
11523   LABEL "Contact Type"\r
11524   POSITION 4\r
11525   SQL-WIDTH 8\r
11526   ORDER 30\r
11527 \r
11528 ADD FIELD "PersonCode" OF "EntityContact" AS integer \r
11529   FORMAT ">>>>99999"\r
11530   INITIAL "0"\r
11531   LABEL "Person"\r
11532   POSITION 5\r
11533   SQL-WIDTH 4\r
11534   ORDER 40\r
11535 \r
11536 ADD INDEX "XPKEntityContacts" ON "EntityContact" \r
11537   AREA "Schema Area"\r
11538   PRIMARY\r
11539   INDEX-FIELD "EntityType" ASCENDING \r
11540   INDEX-FIELD "EntityCode" ASCENDING \r
11541   INDEX-FIELD "EntityContactType" ASCENDING \r
11542 \r
11543 ADD INDEX "XAK1PersonCode" ON "EntityContact" \r
11544   AREA "Schema Area"\r
11545   INDEX-FIELD "PersonCode" ASCENDING \r
11546 \r
11547 ADD TABLE "EntityContactType"\r
11548   AREA "Schema Area"\r
11549   DUMP-NAME "ectctype"\r
11550 \r
11551 ADD FIELD "EntityContactType" OF "EntityContactType" AS character \r
11552   FORMAT "X(4)"\r
11553   INITIAL ""\r
11554   POSITION 2\r
11555   SQL-WIDTH 8\r
11556   ORDER 10\r
11557 \r
11558 ADD FIELD "EntityType" OF "EntityContactType" AS character \r
11559   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
11560   FORMAT "X"\r
11561   INITIAL ?\r
11562   LABEL "Entity type"\r
11563   POSITION 3\r
11564   SQL-WIDTH 2\r
11565   COLUMN-LABEL "T"\r
11566   COLUMN-LABEL-SA "C"\r
11567   ORDER 20\r
11568 \r
11569 ADD FIELD "Description" OF "EntityContactType" AS character \r
11570   FORMAT "X(50)"\r
11571   INITIAL ""\r
11572   POSITION 4\r
11573   SQL-WIDTH 100\r
11574   ORDER 30\r
11575 \r
11576 ADD INDEX "XPKEntityContactTypes" ON "EntityContactType" \r
11577   AREA "Schema Area"\r
11578   UNIQUE\r
11579   PRIMARY\r
11580   INDEX-FIELD "EntityContactType" ASCENDING \r
11581   INDEX-FIELD "EntityType" ASCENDING \r
11582 \r
11583 ADD TABLE "VarianceClassification"\r
11584   AREA "Schema Area"\r
11585   DUMP-NAME "varclass"\r
11586 \r
11587 ADD FIELD "VarianceClassification" OF "VarianceClassification" AS character \r
11588   FORMAT "X(4)"\r
11589   INITIAL ""\r
11590   LABEL "Variance Class"\r
11591   POSITION 2\r
11592   SQL-WIDTH 8\r
11593   ORDER 10\r
11594 \r
11595 ADD FIELD "Description" OF "VarianceClassification" AS character \r
11596   FORMAT "X(50)"\r
11597   INITIAL ""\r
11598   POSITION 3\r
11599   SQL-WIDTH 100\r
11600   ORDER 20\r
11601 \r
11602 ADD INDEX "XPKVarianceClassifications" ON "VarianceClassification" \r
11603   AREA "Schema Area"\r
11604   UNIQUE\r
11605   PRIMARY\r
11606   INDEX-FIELD "VarianceClassification" ASCENDING \r
11607 \r
11608 ADD TABLE "ActivityStatus"\r
11609   AREA "Schema Area"\r
11610   DUMP-NAME "act-stat"\r
11611 \r
11612 ADD FIELD "ActivityStatus" OF "ActivityStatus" AS character \r
11613   FORMAT "X(4)"\r
11614   INITIAL ""\r
11615   POSITION 2\r
11616   SQL-WIDTH 8\r
11617   HELP "Status code for job, task, step"\r
11618   ORDER 10\r
11619 \r
11620 ADD FIELD "Description" OF "ActivityStatus" AS character \r
11621   FORMAT "X(50)"\r
11622   INITIAL ""\r
11623   POSITION 3\r
11624   SQL-WIDTH 100\r
11625   HELP "Description of the status"\r
11626   ORDER 20\r
11627 \r
11628 ADD INDEX "XPKActivityStatus" ON "ActivityStatus" \r
11629   AREA "Schema Area"\r
11630   UNIQUE\r
11631   PRIMARY\r
11632   INDEX-FIELD "ActivityStatus" ASCENDING \r
11633 \r
11634 ADD TABLE "AssetStatus"\r
11635   AREA "Schema Area"\r
11636   DUMP-NAME "ass-stat"\r
11637 \r
11638 ADD FIELD "AssetStatus" OF "AssetStatus" AS character \r
11639   FORMAT "X(4)"\r
11640   INITIAL ""\r
11641   LABEL "Status"\r
11642   POSITION 2\r
11643   SQL-WIDTH 8\r
11644   ORDER 10\r
11645 \r
11646 ADD FIELD "Description" OF "AssetStatus" AS character \r
11647   FORMAT "X(50)"\r
11648   INITIAL ""\r
11649   POSITION 3\r
11650   SQL-WIDTH 100\r
11651   ORDER 20\r
11652 \r
11653 ADD INDEX "XPKAssetStatus" ON "AssetStatus" \r
11654   AREA "Schema Area"\r
11655   UNIQUE\r
11656   PRIMARY\r
11657   INDEX-FIELD "AssetStatus" ASCENDING \r
11658 \r
11659 ADD TABLE "JobLog"\r
11660   AREA "Schema Area"\r
11661   DUMP-NAME "joblog"\r
11662   TABLE-TRIGGER "DELETE" OVERRIDE PROCEDURE "tigger/deJobLog.p" CRC "?" \r
11663 \r
11664 ADD FIELD "Joblogno" OF "JobLog" AS integer \r
11665   FORMAT ">>>>>>9"\r
11666   INITIAL "0"\r
11667   POSITION 2\r
11668   SQL-WIDTH 4\r
11669   HELP "Job / Call Number"\r
11670   ORDER 10\r
11671 \r
11672 ADD FIELD "ActivityStatus" OF "JobLog" AS character \r
11673   FORMAT "X(4)"\r
11674   INITIAL ""\r
11675   POSITION 3\r
11676   SQL-WIDTH 8\r
11677   HELP "Status of Job"\r
11678   ORDER 20\r
11679 \r
11680 ADD FIELD "ServiceRequestedBy" OF "JobLog" AS integer \r
11681   FORMAT ">>>>9"\r
11682   INITIAL "0"\r
11683   POSITION 4\r
11684   SQL-WIDTH 4\r
11685   HELP "Service requested by"\r
11686   ORDER 30\r
11687 \r
11688 ADD FIELD "Calldate" OF "JobLog" AS date \r
11689   FORMAT "99/99/9999"\r
11690   INITIAL ?\r
11691   POSITION 5\r
11692   SQL-WIDTH 4\r
11693   HELP "Date of call"\r
11694   ORDER 40\r
11695 \r
11696 ADD FIELD "CallTime" OF "JobLog" AS integer \r
11697   FORMAT ">>>>>9"\r
11698   INITIAL "0"\r
11699   POSITION 6\r
11700   SQL-WIDTH 4\r
11701   HELP "Time of call"\r
11702   ORDER 50\r
11703 \r
11704 ADD FIELD "ReceivedBy" OF "JobLog" AS integer \r
11705   FORMAT ">>>>9"\r
11706   INITIAL "0"\r
11707   POSITION 7\r
11708   SQL-WIDTH 4\r
11709   HELP "Request received by"\r
11710   ORDER 60\r
11711 \r
11712 ADD FIELD "ServiceDetails" OF "JobLog" AS character \r
11713   FORMAT "x(100)"\r
11714   INITIAL ""\r
11715   POSITION 8\r
11716   SQL-WIDTH 200\r
11717   HELP "Details of service request"\r
11718   ORDER 70\r
11719 \r
11720 ADD FIELD "CompletedOn" OF "JobLog" AS date \r
11721   FORMAT "99/99/9999"\r
11722   INITIAL ?\r
11723   POSITION 9\r
11724   SQL-WIDTH 4\r
11725   HELP "Date completed"\r
11726   ORDER 80\r
11727 \r
11728 ADD FIELD "CompletedBy" OF "JobLog" AS integer \r
11729   FORMAT ">>>>9"\r
11730   INITIAL "0"\r
11731   POSITION 10\r
11732   SQL-WIDTH 4\r
11733   HELP "Job completed by"\r
11734   ORDER 90\r
11735 \r
11736 ADD FIELD "Priority" OF "JobLog" AS integer \r
11737   FORMAT "9"\r
11738   INITIAL "0"\r
11739   POSITION 11\r
11740   SQL-WIDTH 4\r
11741   HELP "Priority of job; '1' is highest"\r
11742   ORDER 100\r
11743 \r
11744 ADD FIELD "ActionTaken" OF "JobLog" AS character \r
11745   FORMAT "x(100)"\r
11746   INITIAL ""\r
11747   POSITION 12\r
11748   SQL-WIDTH 200\r
11749   HELP "Description of service provided"\r
11750   ORDER 110\r
11751 \r
11752 ADD INDEX "XPKJobLog" ON "JobLog" \r
11753   AREA "Schema Area"\r
11754   UNIQUE\r
11755   PRIMARY\r
11756   INDEX-FIELD "Joblogno" ASCENDING \r
11757 \r
11758 ADD TABLE "FlowRule"\r
11759   AREA "Schema Area"\r
11760   DUMP-NAME "flowrule"\r
11761   TABLE-TRIGGER "WRITE" OVERRIDE PROCEDURE "wrflwrul.p" CRC "?" \r
11762 \r
11763 ADD FIELD "FlowTaskType" OF "FlowRule" AS character \r
11764   FORMAT "X(6)"\r
11765   INITIAL ""\r
11766   POSITION 2\r
11767   SQL-WIDTH 12\r
11768   ORDER 10\r
11769 \r
11770 ADD FIELD "FlowStepType" OF "FlowRule" AS character \r
11771   FORMAT "X(10)"\r
11772   INITIAL ""\r
11773   POSITION 3\r
11774   SQL-WIDTH 20\r
11775   ORDER 20\r
11776 \r
11777 ADD FIELD "FlowRuleCode" OF "FlowRule" AS character \r
11778   FORMAT "X(10)"\r
11779   INITIAL ""\r
11780   POSITION 4\r
11781   SQL-WIDTH 20\r
11782   ORDER 30\r
11783 \r
11784 ADD FIELD "FlowRuleType" OF "FlowRule" AS character \r
11785   FORMAT "X(6)"\r
11786   INITIAL ""\r
11787   POSITION 5\r
11788   SQL-WIDTH 12\r
11789   ORDER 40\r
11790 \r
11791 ADD FIELD "Description" OF "FlowRule" AS character \r
11792   FORMAT "X(50)"\r
11793   INITIAL ""\r
11794   POSITION 6\r
11795   SQL-WIDTH 100\r
11796   ORDER 50\r
11797 \r
11798 ADD FIELD "NextTaskType" OF "FlowRule" AS character \r
11799   FORMAT "X(6)"\r
11800   INITIAL ""\r
11801   POSITION 7\r
11802   SQL-WIDTH 12\r
11803   ORDER 60\r
11804 \r
11805 ADD FIELD "NextStepType" OF "FlowRule" AS character \r
11806   FORMAT "X(10)"\r
11807   INITIAL ""\r
11808   POSITION 8\r
11809   SQL-WIDTH 20\r
11810   ORDER 70\r
11811 \r
11812 ADD FIELD "Priority" OF "FlowRule" AS integer \r
11813   FORMAT "->>9"\r
11814   INITIAL "0"\r
11815   POSITION 9\r
11816   SQL-WIDTH 4\r
11817   ORDER 80\r
11818 \r
11819 ADD FIELD "ConditionProgram" OF "FlowRule" AS character \r
11820   FORMAT "X(50)"\r
11821   INITIAL ""\r
11822   POSITION 10\r
11823   SQL-WIDTH 100\r
11824   ORDER 90\r
11825 \r
11826 ADD FIELD "ConditionProgramParam" OF "FlowRule" AS character \r
11827   FORMAT "X(50)"\r
11828   INITIAL ""\r
11829   LABEL "Parameters"\r
11830   POSITION 11\r
11831   SQL-WIDTH 100\r
11832   ORDER 100\r
11833 \r
11834 ADD FIELD "ActionProgram" OF "FlowRule" AS character \r
11835   FORMAT "X(50)"\r
11836   INITIAL ""\r
11837   POSITION 12\r
11838   SQL-WIDTH 100\r
11839   ORDER 110\r
11840 \r
11841 ADD FIELD "ActionProgramParam" OF "FlowRule" AS character \r
11842   FORMAT "X(50)"\r
11843   INITIAL ""\r
11844   LABEL "Parameters"\r
11845   POSITION 13\r
11846   SQL-WIDTH 100\r
11847   ORDER 120\r
11848 \r
11849 ADD INDEX "XPKRule" ON "FlowRule" \r
11850   AREA "Schema Area"\r
11851   UNIQUE\r
11852   PRIMARY\r
11853   INDEX-FIELD "FlowTaskType" ASCENDING \r
11854   INDEX-FIELD "FlowStepType" ASCENDING \r
11855   INDEX-FIELD "FlowRuleCode" ASCENDING \r
11856 \r
11857 ADD INDEX "NextStep" ON "FlowRule" \r
11858   AREA "Schema Area"\r
11859   INDEX-FIELD "NextTaskType" ASCENDING \r
11860   INDEX-FIELD "NextStepType" ASCENDING \r
11861 \r
11862 ADD TABLE "FlowRuleType"\r
11863   AREA "Schema Area"\r
11864   DUMP-NAME "fwrultyp"\r
11865 \r
11866 ADD FIELD "FlowRuleType" OF "FlowRuleType" AS character \r
11867   FORMAT "X(6)"\r
11868   INITIAL ""\r
11869   POSITION 2\r
11870   SQL-WIDTH 12\r
11871   ORDER 10\r
11872 \r
11873 ADD FIELD "Description" OF "FlowRuleType" AS character \r
11874   FORMAT "X(50)"\r
11875   INITIAL ""\r
11876   POSITION 3\r
11877   SQL-WIDTH 100\r
11878   ORDER 20\r
11879 \r
11880 ADD INDEX "XPKRuleType" ON "FlowRuleType" \r
11881   AREA "Schema Area"\r
11882   UNIQUE\r
11883   PRIMARY\r
11884   INDEX-FIELD "FlowRuleType" ASCENDING \r
11885 \r
11886 ADD TABLE "FlowStep"\r
11887   AREA "Schema Area"\r
11888   DUMP-NAME "flowstep"\r
11889   TABLE-TRIGGER "WRITE" OVERRIDE PROCEDURE "wrflwstp.p" CRC "?" \r
11890 \r
11891 ADD FIELD "DueDate" OF "FlowStep" AS date \r
11892   FORMAT "99/99/9999"\r
11893   INITIAL ?\r
11894   POSITION 2\r
11895   SQL-WIDTH 4\r
11896   HELP "Due date of task for this step"\r
11897   ORDER 10\r
11898 \r
11899 ADD FIELD "FlowTaskNo" OF "FlowStep" AS integer \r
11900   FORMAT ">>>>>>9"\r
11901   INITIAL "0"\r
11902   POSITION 3\r
11903   SQL-WIDTH 4\r
11904   HELP "Task number that the step belongs to"\r
11905   ORDER 20\r
11906 \r
11907 ADD FIELD "FlowStepNo" OF "FlowStep" AS integer \r
11908   FORMAT ">>>9"\r
11909   INITIAL "0"\r
11910   POSITION 4\r
11911   SQL-WIDTH 4\r
11912   HELP "Sequence number of step"\r
11913   ORDER 30\r
11914 \r
11915 ADD FIELD "FlowTaskType" OF "FlowStep" AS character \r
11916   FORMAT "X(6)"\r
11917   INITIAL ""\r
11918   POSITION 5\r
11919   SQL-WIDTH 12\r
11920   HELP "Type of task that this step belongs to"\r
11921   ORDER 40\r
11922 \r
11923 ADD FIELD "FlowStepType" OF "FlowStep" AS character \r
11924   FORMAT "X(10)"\r
11925   INITIAL ""\r
11926   POSITION 6\r
11927   SQL-WIDTH 20\r
11928   HELP "Type of process step this is"\r
11929   ORDER 50\r
11930 \r
11931 ADD FIELD "ActivityStatus" OF "FlowStep" AS character \r
11932   FORMAT "X(4)"\r
11933   INITIAL ""\r
11934   POSITION 7\r
11935   SQL-WIDTH 8\r
11936   HELP "Status of step"\r
11937   ORDER 60\r
11938 \r
11939 ADD FIELD "StatusUpdateDate" OF "FlowStep" AS date \r
11940   FORMAT "99/99/9999"\r
11941   INITIAL ?\r
11942   POSITION 8\r
11943   SQL-WIDTH 4\r
11944   HELP "Date of last status update"\r
11945   ORDER 70\r
11946 \r
11947 ADD FIELD "StepDueDate" OF "FlowStep" AS date \r
11948   FORMAT "99/99/9999"\r
11949   INITIAL ?\r
11950   POSITION 9\r
11951   SQL-WIDTH 4\r
11952   HELP "Due date of the step"\r
11953   ORDER 80\r
11954 \r
11955 ADD FIELD "Description" OF "FlowStep" AS character \r
11956   FORMAT "X(50)"\r
11957   INITIAL ""\r
11958   POSITION 10\r
11959   SQL-WIDTH 100\r
11960   HELP "Description of step"\r
11961   ORDER 90\r
11962 \r
11963 ADD FIELD "AllocatedTo" OF "FlowStep" AS integer \r
11964   FORMAT ">>>>>>9"\r
11965   INITIAL "0"\r
11966   POSITION 11\r
11967   SQL-WIDTH 4\r
11968   HELP "Person step is allocated to"\r
11969   ORDER 100\r
11970 \r
11971 ADD FIELD "Contractor" OF "FlowStep" AS integer \r
11972   FORMAT ">>>>>>9"\r
11973   INITIAL "0"\r
11974   POSITION 12\r
11975   SQL-WIDTH 4\r
11976   HELP "Contractor allocated the job / process"\r
11977   ORDER 110\r
11978 \r
11979 ADD FIELD "Priority" OF "FlowStep" AS integer \r
11980   FORMAT "->>9"\r
11981   INITIAL "0"\r
11982   POSITION 13\r
11983   SQL-WIDTH 4\r
11984   HELP "Priority of step. '1' is highest"\r
11985   ORDER 120\r
11986 \r
11987 ADD FIELD "EntityType" OF "FlowStep" AS character \r
11988   FORMAT "X"\r
11989   INITIAL ""\r
11990   POSITION 14\r
11991   SQL-WIDTH 2\r
11992   HELP "Type of entity"\r
11993   ORDER 130\r
11994 \r
11995 ADD FIELD "EntityCode" OF "FlowStep" AS integer \r
11996   FORMAT ">>>>>9"\r
11997   INITIAL "0"\r
11998   POSITION 15\r
11999   SQL-WIDTH 4\r
12000   HELP "Key value of the entity record"\r
12001   ORDER 140\r
12002 \r
12003 ADD FIELD "Reference" OF "FlowStep" AS character \r
12004   FORMAT "X(50)"\r
12005   INITIAL ""\r
12006   POSITION 16\r
12007   SQL-WIDTH 100\r
12008   HELP "Contractor work order number"\r
12009   ORDER 150\r
12010 \r
12011 ADD FIELD "NotifyDate" OF "FlowStep" AS date \r
12012   DESCRIPTION "The date after which this step should show on a bring-up list"\r
12013   FORMAT "99/99/9999"\r
12014   INITIAL ?\r
12015   POSITION 17\r
12016   SQL-WIDTH 4\r
12017   HELP "The date after which this step should show on a bring-up list"\r
12018   ORDER 85\r
12019 \r
12020 ADD INDEX "XPKStep" ON "FlowStep" \r
12021   AREA "Schema Area"\r
12022   UNIQUE\r
12023   PRIMARY\r
12024   INDEX-FIELD "DueDate" ASCENDING \r
12025   INDEX-FIELD "FlowTaskNo" ASCENDING \r
12026   INDEX-FIELD "FlowStepNo" ASCENDING \r
12027 \r
12028 ADD INDEX "Reference" ON "FlowStep" \r
12029   AREA "Schema Area"\r
12030   UNIQUE\r
12031   INDEX-FIELD "Reference" ASCENDING \r
12032 \r
12033 ADD INDEX "XAK1FlowStep" ON "FlowStep" \r
12034   AREA "Schema Area"\r
12035   INDEX-FIELD "ActivityStatus" ASCENDING \r
12036   INDEX-FIELD "DueDate" ASCENDING \r
12037   INDEX-FIELD "FlowTaskNo" ASCENDING \r
12038   INDEX-FIELD "FlowStepNo" ASCENDING \r
12039 \r
12040 ADD INDEX "XAK2FlowStep" ON "FlowStep" \r
12041   AREA "Schema Area"\r
12042   INDEX-FIELD "ActivityStatus" ASCENDING \r
12043   INDEX-FIELD "AllocatedTo" ASCENDING \r
12044   INDEX-FIELD "DueDate" ASCENDING \r
12045   INDEX-FIELD "FlowTaskNo" ASCENDING \r
12046   INDEX-FIELD "StepDueDate" ASCENDING \r
12047 \r
12048 ADD INDEX "XAK3FlowStep" ON "FlowStep" \r
12049   AREA "Schema Area"\r
12050   INDEX-FIELD "ActivityStatus" ASCENDING \r
12051   INDEX-FIELD "Contractor" ASCENDING \r
12052   INDEX-FIELD "DueDate" ASCENDING \r
12053   INDEX-FIELD "FlowTaskNo" ASCENDING \r
12054   INDEX-FIELD "StepDueDate" ASCENDING \r
12055 \r
12056 ADD INDEX "XAK4FlowStep" ON "FlowStep" \r
12057   AREA "Schema Area"\r
12058   INDEX-FIELD "ActivityStatus" ASCENDING \r
12059   INDEX-FIELD "AllocatedTo" ASCENDING \r
12060   INDEX-FIELD "NotifyDate" ASCENDING \r
12061 \r
12062 ADD TABLE "FlowStepType"\r
12063   AREA "Schema Area"\r
12064   DUMP-NAME "fwstptyp"\r
12065   TABLE-TRIGGER "WRITE" OVERRIDE PROCEDURE "wrstptyp.p" CRC "?" \r
12066 \r
12067 ADD FIELD "FlowTaskType" OF "FlowStepType" AS character \r
12068   FORMAT "X(6)"\r
12069   INITIAL ""\r
12070   POSITION 2\r
12071   SQL-WIDTH 12\r
12072   HELP "The type of task that this type of step applies to"\r
12073   ORDER 10\r
12074 \r
12075 ADD FIELD "FlowStepType" OF "FlowStepType" AS character \r
12076   FORMAT "X(10)"\r
12077   INITIAL ""\r
12078   POSITION 3\r
12079   SQL-WIDTH 20\r
12080   HELP "Definitions for a type of step"\r
12081   ORDER 20\r
12082 \r
12083 ADD FIELD "InitialStatus" OF "FlowStepType" AS character \r
12084   FORMAT "X(4)"\r
12085   INITIAL ""\r
12086   POSITION 4\r
12087   SQL-WIDTH 8\r
12088   HELP "Initial status of a new step"\r
12089   ORDER 30\r
12090 \r
12091 ADD FIELD "InitialPriority" OF "FlowStepType" AS integer \r
12092   FORMAT "->>9"\r
12093   INITIAL "0"\r
12094   POSITION 5\r
12095   SQL-WIDTH 4\r
12096   HELP "Initial priority of a new step record"\r
12097   ORDER 40\r
12098 \r
12099 ADD FIELD "Description" OF "FlowStepType" AS character \r
12100   FORMAT "X(50)"\r
12101   INITIAL ""\r
12102   POSITION 6\r
12103   SQL-WIDTH 100\r
12104   HELP "Description of the type of step"\r
12105   ORDER 50\r
12106 \r
12107 ADD FIELD "WarnPeriod" OF "FlowStepType" AS decimal \r
12108   FORMAT "->>,>>9.99"\r
12109   INITIAL "0"\r
12110   POSITION 7\r
12111   SQL-WIDTH 17\r
12112   DECIMALS 2\r
12113   ORDER 60\r
12114 \r
12115 ADD FIELD "WarnUnits" OF "FlowStepType" AS character \r
12116   DESCRIPTION "Whether the warning period is measured in days or months"\r
12117   FORMAT "X"\r
12118   INITIAL ""\r
12119   POSITION 8\r
12120   SQL-WIDTH 2\r
12121   HELP "D = Days, M = Months"\r
12122   ORDER 70\r
12123 \r
12124 ADD INDEX "XPKFlowStepType" ON "FlowStepType" \r
12125   AREA "Schema Area"\r
12126   UNIQUE\r
12127   PRIMARY\r
12128   INDEX-FIELD "FlowTaskType" ASCENDING \r
12129   INDEX-FIELD "FlowStepType" ASCENDING \r
12130 \r
12131 ADD TABLE "FlowTask"\r
12132   AREA "Schema Area"\r
12133   DUMP-NAME "flowtask"\r
12134   TABLE-TRIGGER "DELETE" OVERRIDE PROCEDURE "deflwtsk.p" CRC "?" \r
12135 \r
12136 ADD FIELD "DueDate" OF "FlowTask" AS date \r
12137   FORMAT "99/99/9999"\r
12138   INITIAL ?\r
12139   POSITION 2\r
12140   SQL-WIDTH 4\r
12141   HELP "Date task is due to be completed"\r
12142   ORDER 10\r
12143 \r
12144 ADD FIELD "FlowTaskNo" OF "FlowTask" AS integer \r
12145   FORMAT ">>>>>>>9"\r
12146   INITIAL "0"\r
12147   POSITION 3\r
12148   SQL-WIDTH 4\r
12149   HELP "Task number"\r
12150   ORDER 20\r
12151 \r
12152 ADD FIELD "ActivityStatus" OF "FlowTask" AS character \r
12153   FORMAT "X(4)"\r
12154   INITIAL ""\r
12155   POSITION 4\r
12156   SQL-WIDTH 8\r
12157   HELP "Status of task"\r
12158   ORDER 30\r
12159 \r
12160 ADD FIELD "StatusUpdateDate" OF "FlowTask" AS date \r
12161   FORMAT "99/99/9999"\r
12162   INITIAL ?\r
12163   POSITION 5\r
12164   SQL-WIDTH 4\r
12165   HELP "Date that status was last updated"\r
12166   ORDER 40\r
12167 \r
12168 ADD FIELD "Description" OF "FlowTask" AS character \r
12169   FORMAT "X(50)"\r
12170   INITIAL ""\r
12171   POSITION 6\r
12172   SQL-WIDTH 100\r
12173   HELP "Description of task"\r
12174   ORDER 50\r
12175 \r
12176 ADD FIELD "FlowTaskType" OF "FlowTask" AS character \r
12177   FORMAT "X(6)"\r
12178   INITIAL ""\r
12179   POSITION 7\r
12180   SQL-WIDTH 12\r
12181   HELP "Type of task"\r
12182   ORDER 60\r
12183 \r
12184 ADD FIELD "JobLogNo" OF "FlowTask" AS integer \r
12185   FORMAT ">>>>>>9"\r
12186   INITIAL "0"\r
12187   POSITION 8\r
12188   SQL-WIDTH 4\r
12189   HELP "The job log number that this task is associated to"\r
12190   ORDER 70\r
12191 \r
12192 ADD FIELD "Priority" OF "FlowTask" AS integer \r
12193   FORMAT "->>9"\r
12194   INITIAL "0"\r
12195   POSITION 9\r
12196   SQL-WIDTH 4\r
12197   HELP "Priority of task"\r
12198   ORDER 80\r
12199 \r
12200 ADD FIELD "AllocatedTo" OF "FlowTask" AS integer \r
12201   FORMAT ">>>>9"\r
12202   INITIAL "0"\r
12203   POSITION 10\r
12204   SQL-WIDTH 4\r
12205   HELP "Person responsible for performing task"\r
12206   ORDER 90\r
12207 \r
12208 ADD FIELD "EntityType" OF "FlowTask" AS character \r
12209   FORMAT "X"\r
12210   INITIAL ""\r
12211   POSITION 11\r
12212   SQL-WIDTH 2\r
12213   HELP "Type of entity"\r
12214   ORDER 100\r
12215 \r
12216 ADD FIELD "EntityCode" OF "FlowTask" AS integer \r
12217   FORMAT "99999"\r
12218   INITIAL "0"\r
12219   POSITION 12\r
12220   SQL-WIDTH 4\r
12221   HELP "Key value of entity"\r
12222   ORDER 110\r
12223 \r
12224 ADD INDEX "XPKTask" ON "FlowTask" \r
12225   AREA "Schema Area"\r
12226   UNIQUE\r
12227   PRIMARY\r
12228   INDEX-FIELD "DueDate" ASCENDING \r
12229   INDEX-FIELD "FlowTaskNo" ASCENDING \r
12230 \r
12231 ADD INDEX "XAK1FlowTask" ON "FlowTask" \r
12232   AREA "Schema Area"\r
12233   INDEX-FIELD "ActivityStatus" ASCENDING \r
12234   INDEX-FIELD "DueDate" ASCENDING \r
12235   INDEX-FIELD "FlowTaskNo" ASCENDING \r
12236 \r
12237 ADD INDEX "XAK2FlowTask" ON "FlowTask" \r
12238   AREA "Schema Area"\r
12239   INDEX-FIELD "EntityType" ASCENDING \r
12240   INDEX-FIELD "EntityCode" ASCENDING \r
12241   INDEX-FIELD "DueDate" ASCENDING \r
12242 \r
12243 ADD INDEX "XAK3FlowTask" ON "FlowTask" \r
12244   AREA "Schema Area"\r
12245   INDEX-FIELD "ActivityStatus" ASCENDING \r
12246   INDEX-FIELD "EntityType" ASCENDING \r
12247   INDEX-FIELD "EntityCode" ASCENDING \r
12248   INDEX-FIELD "DueDate" ASCENDING \r
12249 \r
12250 ADD INDEX "XAK4FlowTask" ON "FlowTask" \r
12251   AREA "Schema Area"\r
12252   INDEX-FIELD "ActivityStatus" ASCENDING \r
12253   INDEX-FIELD "AllocatedTo" ASCENDING \r
12254   INDEX-FIELD "DueDate" ASCENDING \r
12255   INDEX-FIELD "FlowTaskNo" ASCENDING \r
12256 \r
12257 ADD TABLE "FlowTaskType"\r
12258   AREA "Schema Area"\r
12259   DUMP-NAME "fwtsktyp"\r
12260   TABLE-TRIGGER "WRITE" OVERRIDE PROCEDURE "wrtsktyp.p" CRC "?" \r
12261 \r
12262 ADD FIELD "FlowTaskType" OF "FlowTaskType" AS character \r
12263   FORMAT "X(4)"\r
12264   INITIAL ""\r
12265   POSITION 2\r
12266   SQL-WIDTH 8\r
12267   HELP "Type of a task"\r
12268   ORDER 10\r
12269 \r
12270 ADD FIELD "Description" OF "FlowTaskType" AS character \r
12271   FORMAT "X(50)"\r
12272   INITIAL ""\r
12273   POSITION 3\r
12274   SQL-WIDTH 100\r
12275   HELP "Description of task type"\r
12276   ORDER 20\r
12277 \r
12278 ADD FIELD "InitialStep" OF "FlowTaskType" AS character \r
12279   FORMAT "X(10)"\r
12280   INITIAL ""\r
12281   POSITION 4\r
12282   SQL-WIDTH 20\r
12283   HELP "If not blank, the step type is used in the initial creation of workflow records (steps) for the task"\r
12284   ORDER 30\r
12285 \r
12286 ADD INDEX "XPKTaskType" ON "FlowTaskType" \r
12287   AREA "Schema Area"\r
12288   UNIQUE\r
12289   PRIMARY\r
12290   INDEX-FIELD "FlowTaskType" ASCENDING \r
12291 \r
12292 ADD TABLE "Inspector"\r
12293   AREA "Schema Area"\r
12294   DUMP-NAME "inspecto"\r
12295 \r
12296 ADD FIELD "InspectorCode" OF "Inspector" AS integer \r
12297   FORMAT "->,>>>,>>9"\r
12298   INITIAL "0"\r
12299   POSITION 2\r
12300   SQL-WIDTH 4\r
12301   ORDER 10\r
12302 \r
12303 ADD FIELD "PersonCode" OF "Inspector" AS integer \r
12304   FORMAT "99999"\r
12305   INITIAL "0"\r
12306   LABEL "Person"\r
12307   POSITION 3\r
12308   SQL-WIDTH 4\r
12309   HELP "The person who is this inspector"\r
12310   ORDER 20\r
12311 \r
12312 ADD FIELD "CreditorCode" OF "Inspector" AS integer \r
12313   DESCRIPTION "The code used to refer to a creditor."\r
12314   FORMAT "99999"\r
12315   INITIAL "0"\r
12316   LABEL "Creditor"\r
12317   POSITION 4\r
12318   SQL-WIDTH 4\r
12319   HELP "The creditor who is billed for this inspectors work"\r
12320   ORDER 30\r
12321 \r
12322 ADD INDEX "XPKInspector" ON "Inspector" \r
12323   AREA "Schema Area"\r
12324   UNIQUE\r
12325   PRIMARY\r
12326   INDEX-FIELD "InspectorCode" ASCENDING \r
12327 \r
12328 ADD TABLE "ScenarioAssumption"\r
12329   AREA "Schema Area"\r
12330   DUMP-NAME "scnass"\r
12331 \r
12332 ADD FIELD "ScenarioCode" OF "ScenarioAssumption" AS integer \r
12333   DESCRIPTION "A code to identify the scenario."\r
12334   FORMAT ">>>>>9"\r
12335   INITIAL "0"\r
12336   POSITION 2\r
12337   SQL-WIDTH 4\r
12338   ORDER 10\r
12339 \r
12340 ADD FIELD "MonthCode" OF "ScenarioAssumption" AS integer \r
12341   DESCRIPTION "The code of the month that this assumption applies from"\r
12342   FORMAT ">>>>>9"\r
12343   INITIAL ?\r
12344   LABEL "Month"\r
12345   POSITION 3\r
12346   SQL-WIDTH 4\r
12347   ORDER 20\r
12348 \r
12349 ADD FIELD "Scope" OF "ScenarioAssumption" AS character \r
12350   DESCRIPTION "The scope of the assumption (G)lobal, (R)egional or (P)roperty."\r
12351   FORMAT "X"\r
12352   INITIAL "G"\r
12353   POSITION 4\r
12354   SQL-WIDTH 2\r
12355   HELP "The scope of the assumption (G)lobal, (R)egional or (P)roperty"\r
12356   ORDER 30\r
12357 \r
12358 ADD FIELD "Region" OF "ScenarioAssumption" AS character \r
12359   FORMAT "X(4)"\r
12360   INITIAL ""\r
12361   POSITION 5\r
12362   SQL-WIDTH 8\r
12363   ORDER 40\r
12364 \r
12365 ADD FIELD "EntityType" OF "ScenarioAssumption" AS character \r
12366   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
12367   FORMAT "X"\r
12368   INITIAL ?\r
12369   LABEL "Entity type"\r
12370   POSITION 6\r
12371   SQL-WIDTH 2\r
12372   COLUMN-LABEL "T"\r
12373   COLUMN-LABEL-SA "C"\r
12374   ORDER 50\r
12375 \r
12376 ADD FIELD "EntityCode" OF "ScenarioAssumption" AS integer \r
12377   FORMAT "99999"\r
12378   INITIAL ?\r
12379   LABEL "Code"\r
12380   POSITION 7\r
12381   SQL-WIDTH 4\r
12382   COLUMN-LABEL-SA "C"\r
12383   ORDER 60\r
12384 \r
12385 ADD FIELD "TypeScope" OF "ScenarioAssumption" AS character \r
12386   DESCRIPTION "The area or service contract type which the assuption applies to"\r
12387   FORMAT "X(4)"\r
12388   INITIAL ""\r
12389   LABEL "Type"\r
12390   POSITION 8\r
12391   SQL-WIDTH 8\r
12392   ORDER 70\r
12393 \r
12394 ADD FIELD "AssumptionType" OF "ScenarioAssumption" AS character \r
12395   FORMAT "X(4)"\r
12396   INITIAL ""\r
12397   POSITION 9\r
12398   SQL-WIDTH 8\r
12399   ORDER 80\r
12400 \r
12401 ADD FIELD "AssumptionValue" OF "ScenarioAssumption" AS character \r
12402   FORMAT "X(50)"\r
12403   INITIAL ""\r
12404   LABEL "Assumption"\r
12405   POSITION 10\r
12406   SQL-WIDTH 100\r
12407   ORDER 90\r
12408 \r
12409 ADD INDEX "XPKScenarioAssumptions" ON "ScenarioAssumption" \r
12410   AREA "Schema Area"\r
12411   PRIMARY\r
12412   INDEX-FIELD "ScenarioCode" ASCENDING \r
12413   INDEX-FIELD "MonthCode" ASCENDING \r
12414   INDEX-FIELD "Scope" ASCENDING \r
12415   INDEX-FIELD "Region" ASCENDING \r
12416   INDEX-FIELD "EntityType" ASCENDING \r
12417   INDEX-FIELD "EntityCode" ASCENDING \r
12418   INDEX-FIELD "TypeScope" ASCENDING \r
12419   INDEX-FIELD "AssumptionType" ASCENDING \r
12420 \r
12421 ADD INDEX "XAK1ScenarioAssumptions" ON "ScenarioAssumption" \r
12422   AREA "Schema Area"\r
12423   INDEX-FIELD "ScenarioCode" ASCENDING \r
12424   INDEX-FIELD "Scope" ASCENDING \r
12425   INDEX-FIELD "Region" ASCENDING \r
12426   INDEX-FIELD "EntityType" ASCENDING \r
12427   INDEX-FIELD "EntityCode" ASCENDING \r
12428   INDEX-FIELD "MonthCode" ASCENDING \r
12429   INDEX-FIELD "TypeScope" ASCENDING \r
12430 \r
12431 ADD TABLE "PropForecast"\r
12432   AREA "Schema Area"\r
12433   DESCRIPTION "Forecast information for properties"\r
12434   DUMP-NAME "propfcst"\r
12435 \r
12436 ADD FIELD "PropertyCode" OF "PropForecast" AS integer \r
12437   DESCRIPTION "The code used to refer to a property"\r
12438   FORMAT "99999"\r
12439   INITIAL "0"\r
12440   LABEL "Code"\r
12441   POSITION 2\r
12442   SQL-WIDTH 4\r
12443   ORDER 10\r
12444 \r
12445 ADD FIELD "EntityType" OF "PropForecast" AS character \r
12446   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
12447   FORMAT "X"\r
12448   INITIAL ?\r
12449   LABEL "Entity type"\r
12450   POSITION 3\r
12451   SQL-WIDTH 2\r
12452   COLUMN-LABEL "T"\r
12453   COLUMN-LABEL-SA "C"\r
12454   ORDER 20\r
12455 \r
12456 ADD FIELD "EntityCode" OF "PropForecast" AS integer \r
12457   FORMAT "99999"\r
12458   INITIAL ?\r
12459   LABEL "Code"\r
12460   POSITION 4\r
12461   SQL-WIDTH 4\r
12462   COLUMN-LABEL-SA "C"\r
12463   ORDER 30\r
12464 \r
12465 ADD FIELD "AccountCode" OF "PropForecast" AS decimal \r
12466   DESCRIPTION "The code of the account from within the chart of accounts that this ledger account applies to."\r
12467   FORMAT "9999.99"\r
12468   INITIAL ?\r
12469   LABEL "Account"\r
12470   POSITION 5\r
12471   SQL-WIDTH 17\r
12472   DECIMALS 2\r
12473   ORDER 40\r
12474 \r
12475 ADD FIELD "PropForecastType" OF "PropForecast" AS character \r
12476   FORMAT "X(4)"\r
12477   INITIAL ""\r
12478   POSITION 6\r
12479   SQL-WIDTH 8\r
12480   HELP "The type of property forecast record"\r
12481   ORDER 50\r
12482 \r
12483 ADD FIELD "MonthCode" OF "PropForecast" AS integer \r
12484   DESCRIPTION "The code of the month that this forecast applies to."\r
12485   FORMAT ">>>>>9"\r
12486   INITIAL ?\r
12487   LABEL "Month"\r
12488   POSITION 7\r
12489   SQL-WIDTH 4\r
12490   ORDER 60\r
12491 \r
12492 ADD FIELD "Amount" OF "PropForecast" AS decimal \r
12493   DESCRIPTION "The forecast amount for this entity/type/month"\r
12494   FORMAT "->>,>>>,>>>,>>9.99"\r
12495   INITIAL "0"\r
12496   POSITION 8\r
12497   SQL-WIDTH 17\r
12498   HELP "The forecast amount for this entity/type/month"\r
12499   DECIMALS 2\r
12500   ORDER 70\r
12501 \r
12502 ADD INDEX "XPKPropForecast" ON "PropForecast" \r
12503   AREA "Schema Area"\r
12504   UNIQUE\r
12505   PRIMARY\r
12506   INDEX-FIELD "PropertyCode" ASCENDING \r
12507   INDEX-FIELD "EntityType" ASCENDING \r
12508   INDEX-FIELD "EntityCode" ASCENDING \r
12509   INDEX-FIELD "AccountCode" ASCENDING \r
12510   INDEX-FIELD "PropForecastType" ASCENDING \r
12511   INDEX-FIELD "MonthCode" ASCENDING \r
12512 \r
12513 ADD TABLE "PropForecastParam"\r
12514   AREA "Schema Area"\r
12515   DESCRIPTION "Parameters generally controlling the forecast for the property"\r
12516   DUMP-NAME "propfcpr"\r
12517 \r
12518 ADD FIELD "PropertyCode" OF "PropForecastParam" AS integer \r
12519   DESCRIPTION "The code used to refer to a property"\r
12520   FORMAT "99999"\r
12521   INITIAL "0"\r
12522   LABEL "Code"\r
12523   POSITION 2\r
12524   SQL-WIDTH 4\r
12525   ORDER 10\r
12526 \r
12527 ADD FIELD "MonthCode" OF "PropForecastParam" AS integer \r
12528   DESCRIPTION "The code used to refer to a financial period (month)"\r
12529   FORMAT ">>>,>>9"\r
12530   INITIAL "0"\r
12531   LABEL "Month"\r
12532   POSITION 3\r
12533   SQL-WIDTH 4\r
12534   HELP "The code used to refer to a financial period (month)"\r
12535   ORDER 20\r
12536 \r
12537 ADD FIELD "ParameterID" OF "PropForecastParam" AS character \r
12538   DESCRIPTION "Identifies the parameter - for use by the programs which use it."\r
12539   FORMAT "X(20)"\r
12540   INITIAL ""\r
12541   POSITION 4\r
12542   SQL-WIDTH 40\r
12543   ORDER 30\r
12544 \r
12545 ADD FIELD "ParameterValue" OF "PropForecastParam" AS character \r
12546   DESCRIPTION "The value of the parameter"\r
12547   FORMAT "X(80)"\r
12548   INITIAL ""\r
12549   POSITION 5\r
12550   SQL-WIDTH 160\r
12551   ORDER 40\r
12552 \r
12553 ADD INDEX "XPKPropForecastParam" ON "PropForecastParam" \r
12554   AREA "Schema Area"\r
12555   UNIQUE\r
12556   PRIMARY\r
12557   INDEX-FIELD "PropertyCode" ASCENDING \r
12558   INDEX-FIELD "ParameterID" ASCENDING \r
12559   INDEX-FIELD "MonthCode" ASCENDING \r
12560 \r
12561 ADD INDEX "XAK1PropForecastParam" ON "PropForecastParam" \r
12562   AREA "Schema Area"\r
12563   UNIQUE\r
12564   INDEX-FIELD "PropertyCode" ASCENDING \r
12565   INDEX-FIELD "MonthCode" ASCENDING \r
12566   INDEX-FIELD "ParameterID" ASCENDING \r
12567 \r
12568 ADD INDEX "XAK2PropForecastParam" ON "PropForecastParam" \r
12569   AREA "Schema Area"\r
12570   UNIQUE\r
12571   INDEX-FIELD "MonthCode" ASCENDING \r
12572   INDEX-FIELD "ParameterID" ASCENDING \r
12573   INDEX-FIELD "PropertyCode" ASCENDING \r
12574 \r
12575 ADD TABLE "PropForecastType"\r
12576   AREA "Schema Area"\r
12577   DESCRIPTION "Description of types of records used in Property Forecasting"\r
12578   DUMP-NAME "propfcty"\r
12579 \r
12580 ADD FIELD "PropForecastType" OF "PropForecastType" AS character \r
12581   FORMAT "X(4)"\r
12582   INITIAL ""\r
12583   POSITION 2\r
12584   SQL-WIDTH 8\r
12585   HELP "The type of property forecast record"\r
12586   ORDER 10\r
12587 \r
12588 ADD FIELD "Description" OF "PropForecastType" AS character \r
12589   FORMAT "X(50)"\r
12590   INITIAL ""\r
12591   POSITION 3\r
12592   SQL-WIDTH 100\r
12593   HELP "Description of the type of property forecast record"\r
12594   ORDER 20\r
12595 \r
12596 ADD INDEX "XPKPropForecastType" ON "PropForecastType" \r
12597   AREA "Schema Area"\r
12598   UNIQUE\r
12599   PRIMARY\r
12600   INDEX-FIELD "PropForecastType" ASCENDING \r
12601 \r
12602 ADD TABLE "BankImportException"\r
12603   AREA "Schema Area"\r
12604   DESCRIPTION "Exceptions to the normal bank import process"\r
12605   DUMP-NAME "bnkimpex"\r
12606 \r
12607 ADD FIELD "BankAccountCode" OF "BankImportException" AS character \r
12608   FORMAT "X(4)"\r
12609   INITIAL ""\r
12610   LABEL "Bank a/c"\r
12611   POSITION 2\r
12612   SQL-WIDTH 8\r
12613   ORDER 10\r
12614 \r
12615 ADD FIELD "TrnType" OF "BankImportException" AS character \r
12616   FORMAT "X(8)"\r
12617   INITIAL ""\r
12618   POSITION 3\r
12619   SQL-WIDTH 16\r
12620   ORDER 20\r
12621 \r
12622 ADD FIELD "Match1" OF "BankImportException" AS character \r
12623   FORMAT "X(30)"\r
12624   INITIAL ""\r
12625   POSITION 4\r
12626   SQL-WIDTH 60\r
12627   ORDER 30\r
12628 \r
12629 ADD FIELD "Match2" OF "BankImportException" AS character \r
12630   FORMAT "X(30)"\r
12631   INITIAL ""\r
12632   POSITION 5\r
12633   SQL-WIDTH 60\r
12634   ORDER 40\r
12635 \r
12636 ADD FIELD "EntityType" OF "BankImportException" AS character \r
12637   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
12638   FORMAT "X"\r
12639   INITIAL ?\r
12640   LABEL "Entity type"\r
12641   POSITION 6\r
12642   SQL-WIDTH 2\r
12643   COLUMN-LABEL "T"\r
12644   COLUMN-LABEL-SA "C"\r
12645   ORDER 50\r
12646 \r
12647 ADD FIELD "EntityCode" OF "BankImportException" AS integer \r
12648   FORMAT "99999"\r
12649   INITIAL ?\r
12650   LABEL "Code"\r
12651   POSITION 7\r
12652   SQL-WIDTH 4\r
12653   COLUMN-LABEL-SA "C"\r
12654   ORDER 60\r
12655 \r
12656 ADD FIELD "AccountCode" OF "BankImportException" AS decimal \r
12657   DESCRIPTION "The account code to direct transactions to"\r
12658   FORMAT "9999.99"\r
12659   INITIAL ?\r
12660   LABEL "Account"\r
12661   POSITION 8\r
12662   SQL-WIDTH 17\r
12663   DECIMALS 2\r
12664   ORDER 70\r
12665 \r
12666 ADD FIELD "Description" OF "BankImportException" AS character \r
12667   FORMAT "X(50)"\r
12668   INITIAL ""\r
12669   POSITION 9\r
12670   SQL-WIDTH 100\r
12671   HELP "The description of the transaction created"\r
12672   ORDER 80\r
12673 \r
12674 ADD INDEX "XPKBankImportExceptions" ON "BankImportException" \r
12675   AREA "Schema Area"\r
12676   PRIMARY\r
12677   INDEX-FIELD "BankAccountCode" ASCENDING \r
12678   INDEX-FIELD "TrnType" ASCENDING \r
12679 \r
12680 ADD TABLE "SupplyMeterReading"\r
12681   AREA "Schema Area"\r
12682   DESCRIPTION "Readings from supply meters"\r
12683   DUMP-NAME "smetread"\r
12684 \r
12685 ADD FIELD "PropertyCode" OF "SupplyMeterReading" AS integer \r
12686   DESCRIPTION "The code used to refer to a property"\r
12687   FORMAT "99999"\r
12688   INITIAL "0"\r
12689   LABEL "Code"\r
12690   POSITION 2\r
12691   SQL-WIDTH 4\r
12692   ORDER 10\r
12693 \r
12694 ADD FIELD "OldMeterCode" OF "SupplyMeterReading" AS integer \r
12695   FORMAT ">>9"\r
12696   INITIAL "0"\r
12697   LABEL "Meter"\r
12698   POSITION 3\r
12699   SQL-WIDTH 4\r
12700   ORDER 21\r
12701 \r
12702 ADD FIELD "SupplyType" OF "SupplyMeterReading" AS character \r
12703   FORMAT "X(4)"\r
12704   INITIAL ""\r
12705   POSITION 4\r
12706   SQL-WIDTH 8\r
12707   HELP "The type of supply metered"\r
12708   ORDER 30\r
12709 \r
12710 ADD FIELD "ReadingDate" OF "SupplyMeterReading" AS date \r
12711   FORMAT "99/99/9999"\r
12712   INITIAL ?\r
12713   POSITION 5\r
12714   SQL-WIDTH 4\r
12715   HELP "The date on which this reading was taken"\r
12716   ORDER 40\r
12717 \r
12718 ADD FIELD "Reading" OF "SupplyMeterReading" AS decimal \r
12719   FORMAT "->>,>>>,>>>,>>9"\r
12720   INITIAL "0"\r
12721   POSITION 6\r
12722   SQL-WIDTH 15\r
12723   HELP "The amount of the reading"\r
12724   DECIMALS 0\r
12725   ORDER 50\r
12726 \r
12727 ADD FIELD "MeterCode" OF "SupplyMeterReading" AS character \r
12728   FORMAT "X(8)"\r
12729   INITIAL ""\r
12730   POSITION 7\r
12731   SQL-WIDTH 16\r
12732   ORDER 20\r
12733 \r
12734 ADD INDEX "XPKSupplyMeterReading" ON "SupplyMeterReading" \r
12735   AREA "Schema Area"\r
12736   UNIQUE\r
12737   PRIMARY\r
12738   INDEX-FIELD "SupplyType" ASCENDING \r
12739   INDEX-FIELD "PropertyCode" ASCENDING \r
12740   INDEX-FIELD "MeterCode" ASCENDING \r
12741   INDEX-FIELD "ReadingDate" ASCENDING \r
12742 \r
12743 ADD INDEX "XAK1SupplyMeterReading" ON "SupplyMeterReading" \r
12744   AREA "Schema Area"\r
12745   INDEX-FIELD "PropertyCode" ASCENDING \r
12746   INDEX-FIELD "ReadingDate" ASCENDING \r
12747 \r
12748 ADD TABLE "LookupCode"\r
12749   AREA "Schema Area"\r
12750   LABEL "Lookup Codes"\r
12751   DESCRIPTION "Arbitrary lookup code values for any field of any table"\r
12752   DUMP-NAME "lookups"\r
12753 \r
12754 ADD FIELD "_File-Name" OF "LookupCode" AS character \r
12755   DESCRIPTION "The name of the file which the lookup code applies to"\r
12756   FORMAT "X(30)"\r
12757   INITIAL ?\r
12758   LABEL "File name"\r
12759   POSITION 2\r
12760   SQL-WIDTH 60\r
12761   ORDER 10\r
12762 \r
12763 ADD FIELD "_Field-Name" OF "LookupCode" AS character \r
12764   DESCRIPTION "The name of the field which the lookup code applies to"\r
12765   FORMAT "X(30)"\r
12766   INITIAL ?\r
12767   LABEL "Field name"\r
12768   POSITION 3\r
12769   SQL-WIDTH 60\r
12770   ORDER 20\r
12771 \r
12772 ADD FIELD "LookupCode" OF "LookupCode" AS character \r
12773   DESCRIPTION "The code for the lookup"\r
12774   FORMAT "X(8)"\r
12775   INITIAL ?\r
12776   LABEL "Lookup"\r
12777   POSITION 4\r
12778   SQL-WIDTH 16\r
12779   ORDER 30\r
12780 \r
12781 ADD FIELD "Description" OF "LookupCode" AS character \r
12782   DESCRIPTION "A brief description of the lookup code"\r
12783   FORMAT "X(50)"\r
12784   INITIAL ?\r
12785   LABEL "Description"\r
12786   POSITION 5\r
12787   SQL-WIDTH 100\r
12788   ORDER 40\r
12789 \r
12790 ADD FIELD "LookupData" OF "LookupCode" AS character \r
12791   DESCRIPTION "Data associated with the lookup code, if needed"\r
12792   FORMAT "X(78)"\r
12793   INITIAL ?\r
12794   LABEL "Lookup data"\r
12795   POSITION 6\r
12796   SQL-WIDTH 156\r
12797   ORDER 50\r
12798 \r
12799 ADD INDEX "XPKLookupCodes" ON "LookupCode" \r
12800   AREA "Schema Area"\r
12801   UNIQUE\r
12802   PRIMARY\r
12803   INDEX-FIELD "_File-Name" ASCENDING \r
12804   INDEX-FIELD "_Field-Name" ASCENDING \r
12805   INDEX-FIELD "LookupCode" ASCENDING \r
12806 \r
12807 ADD TABLE "PersonDetail"\r
12808   AREA "Schema Area"\r
12809   LABEL "Person Details"\r
12810   DESCRIPTION "Arbitrary and extensible information related to a person"\r
12811   DUMP-NAME "persdetl"\r
12812 \r
12813 ADD FIELD "PersonCode" OF "PersonDetail" AS integer \r
12814   DESCRIPTION "A code used to refer to this person."\r
12815   FORMAT "99999"\r
12816   INITIAL ?\r
12817   LABEL "Person code"\r
12818   POSITION 2\r
12819   SQL-WIDTH 4\r
12820   COLUMN-LABEL "Person"\r
12821   ORDER 10\r
12822 \r
12823 ADD FIELD "PersonDetailType" OF "PersonDetail" AS character \r
12824   FORMAT "X(4)"\r
12825   INITIAL ""\r
12826   POSITION 3\r
12827   SQL-WIDTH 8\r
12828   ORDER 20\r
12829 \r
12830 ADD FIELD "SupplementaryType" OF "PersonDetail" AS character \r
12831   DESCRIPTION "Designed to be used where multiple values for one type are allowable.  Should be under program control."\r
12832   FORMAT "X(8)"\r
12833   INITIAL ""\r
12834   POSITION 4\r
12835   SQL-WIDTH 16\r
12836   ORDER 30\r
12837 \r
12838 ADD FIELD "DataValue" OF "PersonDetail" AS character \r
12839   DESCRIPTION "The data associated with this person for this type / supplementary type reason."\r
12840   FORMAT "X(78)"\r
12841   INITIAL ""\r
12842   POSITION 5\r
12843   SQL-WIDTH 156\r
12844   ORDER 40\r
12845 \r
12846 ADD FIELD "ContactType" OF "PersonDetail" AS character \r
12847   DESCRIPTION "The type of contact involved."\r
12848   FORMAT "X(4)"\r
12849   INITIAL ""\r
12850   LABEL "Type"\r
12851   POSITION 6\r
12852   SQL-WIDTH 8\r
12853   ORDER 50\r
12854 \r
12855 ADD INDEX "XPKPersonDetails" ON "PersonDetail" \r
12856   AREA "Schema Area"\r
12857   UNIQUE\r
12858   PRIMARY\r
12859   INDEX-FIELD "PersonCode" ASCENDING \r
12860   INDEX-FIELD "PersonDetailType" ASCENDING \r
12861   INDEX-FIELD "SupplementaryType" ASCENDING \r
12862 \r
12863 ADD INDEX "XAK1PersonDetails" ON "PersonDetail" \r
12864   AREA "Schema Area"\r
12865   INDEX-FIELD "PersonDetailType" ASCENDING \r
12866   INDEX-FIELD "SupplementaryType" ASCENDING \r
12867 \r
12868 ADD TABLE "PersonDetailType"\r
12869   AREA "Schema Area"\r
12870   DUMP-NAME "perdetyp"\r
12871 \r
12872 ADD FIELD "PersonDetailType" OF "PersonDetailType" AS character \r
12873   FORMAT "X(4)"\r
12874   INITIAL ""\r
12875   LABEL "Person Detail Type"\r
12876   POSITION 2\r
12877   SQL-WIDTH 8\r
12878   ORDER 10\r
12879 \r
12880 ADD FIELD "Description" OF "PersonDetailType" AS character \r
12881   FORMAT "X(50)"\r
12882   INITIAL ""\r
12883   POSITION 3\r
12884   SQL-WIDTH 100\r
12885   ORDER 20\r
12886 \r
12887 ADD INDEX "XPKPersonDetailTypes" ON "PersonDetailType" \r
12888   AREA "Schema Area"\r
12889   UNIQUE\r
12890   PRIMARY\r
12891   INDEX-FIELD "PersonDetailType" ASCENDING \r
12892 \r
12893 ADD TABLE "EntityList"\r
12894   AREA "Schema Area"\r
12895   LABEL "Entity List"\r
12896   DESCRIPTION "Contains lists of entities to provide arbitrary groupings"\r
12897   DUMP-NAME "ent-list"\r
12898 \r
12899 ADD FIELD "ListType" OF "EntityList" AS character \r
12900   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
12901   FORMAT "X"\r
12902   INITIAL ?\r
12903   LABEL "List Type"\r
12904   POSITION 2\r
12905   SQL-WIDTH 2\r
12906   COLUMN-LABEL "T"\r
12907   COLUMN-LABEL-SA "C"\r
12908   ORDER 10\r
12909 \r
12910 ADD FIELD "ListCode" OF "EntityList" AS character \r
12911   DESCRIPTION "A unique code identifying this list"\r
12912   FORMAT "X(8)"\r
12913   INITIAL ""\r
12914   LABEL "List code"\r
12915   POSITION 3\r
12916   SQL-WIDTH 16\r
12917   ORDER 20\r
12918 \r
12919 ADD FIELD "Description" OF "EntityList" AS character \r
12920   DESCRIPTION "A description of the list"\r
12921   FORMAT "X(50)"\r
12922   INITIAL ""\r
12923   POSITION 4\r
12924   SQL-WIDTH 100\r
12925   HELP "A description of the list"\r
12926   ORDER 30\r
12927 \r
12928 ADD INDEX "XPKEntityList" ON "EntityList" \r
12929   AREA "Schema Area"\r
12930   UNIQUE\r
12931   PRIMARY\r
12932   INDEX-FIELD "ListType" ASCENDING \r
12933   INDEX-FIELD "ListCode" ASCENDING \r
12934 \r
12935 ADD TABLE "EntityListMember"\r
12936   AREA "Schema Area"\r
12937   LABEL "Entity List Member"\r
12938   DESCRIPTION "Members of entity lists"\r
12939   DUMP-NAME "entlsmem"\r
12940 \r
12941 ADD FIELD "ListType" OF "EntityListMember" AS character \r
12942   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
12943   FORMAT "X"\r
12944   INITIAL ?\r
12945   LABEL "List Type"\r
12946   POSITION 2\r
12947   SQL-WIDTH 2\r
12948   COLUMN-LABEL "T"\r
12949   COLUMN-LABEL-SA "C"\r
12950   ORDER 10\r
12951 \r
12952 ADD FIELD "ListCode" OF "EntityListMember" AS character \r
12953   DESCRIPTION "A unique code identifying this list"\r
12954   FORMAT "X(8)"\r
12955   INITIAL ""\r
12956   LABEL "List code"\r
12957   POSITION 3\r
12958   SQL-WIDTH 16\r
12959   ORDER 20\r
12960 \r
12961 ADD FIELD "EntityType" OF "EntityListMember" AS character \r
12962   DESCRIPTION "A reference to the entity types table indicating the type of entity of this list member (Company, Property, Project, Creditor or Tenant)."\r
12963   FORMAT "X"\r
12964   INITIAL ?\r
12965   LABEL "Entity type"\r
12966   POSITION 4\r
12967   SQL-WIDTH 2\r
12968   COLUMN-LABEL "T"\r
12969   COLUMN-LABEL-SA "C"\r
12970   ORDER 30\r
12971 \r
12972 ADD FIELD "EntityCode" OF "EntityListMember" AS integer \r
12973   FORMAT "99999"\r
12974   INITIAL ?\r
12975   LABEL "Code"\r
12976   POSITION 5\r
12977   SQL-WIDTH 4\r
12978   COLUMN-LABEL-SA "C"\r
12979   ORDER 40\r
12980 \r
12981 ADD FIELD "AccountCode" OF "EntityListMember" AS decimal \r
12982   DESCRIPTION "The code of the account from within the chart of accounts that this ledger account applies to."\r
12983   FORMAT "9999.99"\r
12984   INITIAL ?\r
12985   LABEL "Account"\r
12986   POSITION 6\r
12987   SQL-WIDTH 17\r
12988   DECIMALS 2\r
12989   ORDER 50\r
12990 \r
12991 ADD FIELD "SortSequence" OF "EntityListMember" AS integer \r
12992   DESCRIPTION "An arbitrary integer to provide a sorted list"\r
12993   FORMAT "->>>,>>9"\r
12994   INITIAL "0"\r
12995   LABEL "Sort by"\r
12996   POSITION 7\r
12997   SQL-WIDTH 4\r
12998   HELP "An arbitrary integer to provide an alternative list order"\r
12999   ORDER 60\r
13000 \r
13001 ADD INDEX "XPKEntityListMember" ON "EntityListMember" \r
13002   AREA "Schema Area"\r
13003   UNIQUE\r
13004   PRIMARY\r
13005   INDEX-FIELD "ListType" ASCENDING \r
13006   INDEX-FIELD "ListCode" ASCENDING \r
13007   INDEX-FIELD "SortSequence" ASCENDING \r
13008   INDEX-FIELD "EntityType" ASCENDING \r
13009   INDEX-FIELD "EntityCode" ASCENDING \r
13010   INDEX-FIELD "AccountCode" ASCENDING \r
13011 \r
13012 ADD INDEX "XAKEntityListMember" ON "EntityListMember" \r
13013   AREA "Schema Area"\r
13014   UNIQUE\r
13015   DESCRIPTION "Index to ensure correct uniqueness, and entity sort ordering (if desired)."\r
13016   INDEX-FIELD "ListType" ASCENDING \r
13017   INDEX-FIELD "ListCode" ASCENDING \r
13018   INDEX-FIELD "EntityType" ASCENDING \r
13019   INDEX-FIELD "EntityCode" ASCENDING \r
13020   INDEX-FIELD "AccountCode" ASCENDING \r
13021 \r
13022 ADD TABLE "TenantCall"\r
13023   AREA "Schema Area"\r
13024   DESCRIPTION "Register calls from tenants"\r
13025   DUMP-NAME "tnntcall"\r
13026   TABLE-TRIGGER "WRITE" OVERRIDE PROCEDURE "wrtntcal.p" CRC "?" \r
13027 \r
13028 ADD FIELD "CallNumber" OF "TenantCall" AS integer \r
13029   FORMAT "->,>>>,>>9"\r
13030   INITIAL "0"\r
13031   LABEL "Call No"\r
13032   POSITION 2\r
13033   SQL-WIDTH 4\r
13034   ORDER 10\r
13035 \r
13036 ADD FIELD "PropertyCode" OF "TenantCall" AS integer \r
13037   FORMAT "99999"\r
13038   INITIAL "0"\r
13039   LABEL "Property"\r
13040   POSITION 3\r
13041   SQL-WIDTH 4\r
13042   ORDER 20\r
13043 \r
13044 ADD FIELD "Level" OF "TenantCall" AS integer \r
13045   FORMAT "->,>>>,>>9"\r
13046   INITIAL "0"\r
13047   POSITION 4\r
13048   SQL-WIDTH 4\r
13049   ORDER 30\r
13050 \r
13051 ADD FIELD "TenantCode" OF "TenantCall" AS integer \r
13052   DESCRIPTION "A code used to refer to this tenant."\r
13053   FORMAT "99999"\r
13054   INITIAL "0"\r
13055   POSITION 5\r
13056   SQL-WIDTH 4\r
13057   ORDER 40\r
13058 \r
13059 ADD FIELD "Problem" OF "TenantCall" AS character \r
13060   FORMAT "X(78)"\r
13061   INITIAL ""\r
13062   POSITION 6\r
13063   SQL-WIDTH 156\r
13064   ORDER 50\r
13065 \r
13066 ADD FIELD "Action" OF "TenantCall" AS character \r
13067   FORMAT "X(78)"\r
13068   INITIAL ""\r
13069   POSITION 7\r
13070   SQL-WIDTH 156\r
13071   ORDER 60\r
13072 \r
13073 ADD FIELD "DateOfCall" OF "TenantCall" AS date \r
13074   FORMAT "99/99/9999"\r
13075   INITIAL ?\r
13076   LABEL "Call Date"\r
13077   POSITION 8\r
13078   SQL-WIDTH 4\r
13079   ORDER 70\r
13080 \r
13081 ADD FIELD "CallCategoryCode" OF "TenantCall" AS character \r
13082   FORMAT "X(8)"\r
13083   INITIAL ""\r
13084   LABEL "Category"\r
13085   POSITION 9\r
13086   SQL-WIDTH 16\r
13087   ORDER 80\r
13088 \r
13089 ADD FIELD "CallStatusCode" OF "TenantCall" AS character \r
13090   FORMAT "X(8)"\r
13091   INITIAL ""\r
13092   LABEL "Call Status"\r
13093   POSITION 10\r
13094   SQL-WIDTH 16\r
13095   ORDER 90\r
13096 \r
13097 ADD FIELD "TimeOfCall" OF "TenantCall" AS integer \r
13098   FORMAT ">>,>>9"\r
13099   INITIAL "0"\r
13100   LABEL "Call Time"\r
13101   POSITION 11\r
13102   SQL-WIDTH 4\r
13103   ORDER 100\r
13104 \r
13105 ADD FIELD "DateComplete" OF "TenantCall" AS date \r
13106   FORMAT "99/99/9999"\r
13107   INITIAL ?\r
13108   LABEL "Date Complete"\r
13109   POSITION 12\r
13110   SQL-WIDTH 4\r
13111   ORDER 110\r
13112 \r
13113 ADD FIELD "TimeComplete" OF "TenantCall" AS integer \r
13114   FORMAT ">>,>>9"\r
13115   INITIAL ?\r
13116   POSITION 13\r
13117   SQL-WIDTH 4\r
13118   ORDER 120\r
13119 \r
13120 ADD FIELD "CreditorCode" OF "TenantCall" AS integer \r
13121   DESCRIPTION "The creditor who is contracted to provide this service for this property"\r
13122   FORMAT "99999"\r
13123   INITIAL "0"\r
13124   LABEL "Creditor code"\r
13125   POSITION 14\r
13126   SQL-WIDTH 4\r
13127   COLUMN-LABEL "Code"\r
13128   ORDER 130\r
13129 \r
13130 ADD FIELD "OrderNo" OF "TenantCall" AS integer \r
13131   FORMAT ">>>>>9"\r
13132   INITIAL "0"\r
13133   LABEL "Order No"\r
13134   POSITION 15\r
13135   SQL-WIDTH 4\r
13136   ORDER 140\r
13137 \r
13138 ADD FIELD "OrderAmount" OF "TenantCall" AS decimal \r
13139   FORMAT "->>,>>>,>>9.99"\r
13140   INITIAL "0"\r
13141   LABEL "Order Amt"\r
13142   POSITION 16\r
13143   SQL-WIDTH 17\r
13144   DECIMALS 2\r
13145   ORDER 150\r
13146 \r
13147 ADD FIELD "Priority" OF "TenantCall" AS character \r
13148   FORMAT "X(4)"\r
13149   INITIAL ""\r
13150   LABEL "Job Priority"\r
13151   POSITION 17\r
13152   SQL-WIDTH 8\r
13153   ORDER 160\r
13154 \r
13155 ADD FIELD "ContactName" OF "TenantCall" AS character \r
13156   FORMAT "X(30)"\r
13157   INITIAL ""\r
13158   LABEL "Tnnt Contact"\r
13159   POSITION 18\r
13160   SQL-WIDTH 60\r
13161   ORDER 170\r
13162 \r
13163 ADD FIELD "ContactPhone" OF "TenantCall" AS character \r
13164   FORMAT "X(30)"\r
13165   INITIAL ""\r
13166   LABEL "Contact Phone"\r
13167   POSITION 19\r
13168   SQL-WIDTH 60\r
13169   ORDER 180\r
13170 \r
13171 ADD FIELD "Description" OF "TenantCall" AS character \r
13172   FORMAT "X(60)"\r
13173   INITIAL ""\r
13174   LABEL "Description"\r
13175   POSITION 20\r
13176   SQL-WIDTH 120\r
13177   ORDER 190\r
13178 \r
13179 ADD FIELD "LoggedBy" OF "TenantCall" AS integer \r
13180   DESCRIPTION "A reference to the person who logged this call."\r
13181   FORMAT ">>>>>9"\r
13182   INITIAL "0"\r
13183   LABEL "Logged By"\r
13184   POSITION 21\r
13185   SQL-WIDTH 4\r
13186   COLUMN-LABEL "Logged By"\r
13187   ORDER 200\r
13188 \r
13189 ADD FIELD "LastEmailDate" OF "TenantCall" AS date \r
13190   DESCRIPTION "Date last email notification was sent to Building Manager."\r
13191   FORMAT "99/99/9999"\r
13192   INITIAL ?\r
13193   LABEL "Email Sent"\r
13194   POSITION 22\r
13195   SQL-WIDTH 4\r
13196   COLUMN-LABEL "EmailDate"\r
13197   HELP "The date on which last email was sent to Building Manager."\r
13198   ORDER 220\r
13199 \r
13200 ADD FIELD "SendEmail" OF "TenantCall" AS logical \r
13201   DESCRIPTION "Flag email to Building Manager required."\r
13202   FORMAT "yes/no"\r
13203   INITIAL "no"\r
13204   LABEL "Email Building Manager"\r
13205   POSITION 23\r
13206   SQL-WIDTH 1\r
13207   COLUMN-LABEL "SendEmail"\r
13208   HELP "Send notification email to Building Manager."\r
13209   ORDER 210\r
13210 \r
13211 ADD INDEX "XPKTenantCall" ON "TenantCall" \r
13212   AREA "Schema Area"\r
13213   UNIQUE\r
13214   PRIMARY\r
13215   INDEX-FIELD "CallNumber" ASCENDING \r
13216 \r
13217 ADD INDEX "XAK1TenantCall" ON "TenantCall" \r
13218   AREA "Schema Area"\r
13219   INDEX-FIELD "PropertyCode" ASCENDING \r
13220   INDEX-FIELD "DateOfCall" DESCENDING \r
13221 \r
13222 ADD INDEX "XAK2TenantCall" ON "TenantCall" \r
13223   AREA "Schema Area"\r
13224   INDEX-FIELD "CallStatusCode" ASCENDING \r
13225   INDEX-FIELD "DateOfCall" ASCENDING \r
13226 \r
13227 ADD INDEX "XAK3TenantCall" ON "TenantCall" \r
13228   AREA "Schema Area"\r
13229   INDEX-FIELD "TenantCode" ASCENDING \r
13230   INDEX-FIELD "DateOfCall" DESCENDING \r
13231 \r
13232 ADD INDEX "XAK4TenantCall" ON "TenantCall" \r
13233   AREA "Schema Area"\r
13234   INDEX-FIELD "CallStatusCode" ASCENDING \r
13235   INDEX-FIELD "TenantCode" ASCENDING \r
13236   INDEX-FIELD "DateOfCall" DESCENDING \r
13237 \r
13238 ADD INDEX "XAK5TenantCall" ON "TenantCall" \r
13239   AREA "Schema Area"\r
13240   INDEX-FIELD "CallCategoryCode" ASCENDING \r
13241 \r
13242 ADD INDEX "XAK6TenantCall" ON "TenantCall" \r
13243   AREA "Schema Area"\r
13244   WORD\r
13245   INDEX-FIELD "Problem" ASCENDING \r
13246 \r
13247 ADD TABLE "PropertyView"\r
13248   AREA "Schema Area"\r
13249   DESCRIPTION "Sparse table holding overrides for the Rental Space table which redefine how it should appear on the Property Picture report"\r
13250   DUMP-NAME "propview"\r
13251 \r
13252 ADD FIELD "PropertyCode" OF "PropertyView" AS integer \r
13253   DESCRIPTION "The property that this rental space is a part of"\r
13254   FORMAT "99999"\r
13255   INITIAL "0"\r
13256   LABEL "Property"\r
13257   POSITION 2\r
13258   SQL-WIDTH 4\r
13259   ORDER 10\r
13260 \r
13261 ADD FIELD "RentalSpaceCode" OF "PropertyView" AS integer \r
13262   DESCRIPTION "A sequence number which identifies this rental space within the property."\r
13263   FORMAT ">>>>9"\r
13264   INITIAL "0"\r
13265   LABEL "Rental space code"\r
13266   POSITION 3\r
13267   SQL-WIDTH 4\r
13268   COLUMN-LABEL "Space"\r
13269   ORDER 20\r
13270 \r
13271 ADD FIELD "Sequence" OF "PropertyView" AS integer \r
13272   DESCRIPTION "Arbitrary sequence within rental space"\r
13273   FORMAT "->,>>>,>>9"\r
13274   INITIAL "0"\r
13275   POSITION 4\r
13276   SQL-WIDTH 4\r
13277   ORDER 30\r
13278 \r
13279 ADD FIELD "Level" OF "PropertyView" AS integer \r
13280   DESCRIPTION "Level within building, overriding the RentalSpace level"\r
13281   FORMAT "->,>>>,>>9"\r
13282   INITIAL ?\r
13283   POSITION 5\r
13284   SQL-WIDTH 4\r
13285   ORDER 40\r
13286 \r
13287 ADD FIELD "LevelSequence" OF "PropertyView" AS integer \r
13288   DESCRIPTION "Sequence within level overriding the RentalSpace level sequence"\r
13289   FORMAT "->,>>>,>>9"\r
13290   INITIAL ?\r
13291   POSITION 6\r
13292   SQL-WIDTH 4\r
13293   ORDER 50\r
13294 \r
13295 ADD FIELD "AreaType" OF "PropertyView" AS character \r
13296   DESCRIPTION "The type of rental space eg. Office, Rental, Carpark, Warehouse, etc, overriding the rental space"\r
13297   FORMAT "X(4)"\r
13298   INITIAL ?\r
13299   LABEL "Area type"\r
13300   POSITION 7\r
13301   SQL-WIDTH 8\r
13302   COLUMN-LABEL "Type"\r
13303   ORDER 60\r
13304 \r
13305 ADD FIELD "AreaSize" OF "PropertyView" AS decimal \r
13306   DESCRIPTION "The area of the rental space in square metres., overriding the rental space"\r
13307   FORMAT "->>,>>9.99"\r
13308   INITIAL ?\r
13309   LABEL "Sq M."\r
13310   POSITION 8\r
13311   SQL-WIDTH 21\r
13312   COLUMN-LABEL-SA "C"\r
13313   DECIMALS 6\r
13314   ORDER 70\r
13315 \r
13316 ADD FIELD "TenantName" OF "PropertyView" AS character \r
13317   DESCRIPTION "The name of the tenant for this (sub)area, overriding the name from the lease"\r
13318   FORMAT "X(8)"\r
13319   INITIAL ?\r
13320   POSITION 9\r
13321   SQL-WIDTH 16\r
13322   ORDER 80\r
13323 \r
13324 ADD INDEX "XPKPropertyView" ON "PropertyView" \r
13325   AREA "Schema Area"\r
13326   UNIQUE\r
13327   PRIMARY\r
13328   DESCRIPTION "Index into property view table"\r
13329   INDEX-FIELD "PropertyCode" ASCENDING \r
13330   INDEX-FIELD "RentalSpaceCode" ASCENDING \r
13331   INDEX-FIELD "Sequence" ASCENDING \r
13332 \r
13333 .\r
13334 PSC\r
13335 cpstream=ISO8859-1\r
13336 .\r
13337 0000308612\r