Data files types in Visual Basic format.

Type RecordClient
  ClientName    As String * 30
  ClientPhone   As String * 30
  ClientFax     As String * 30
  ClientLanguage    As Integer
  ClientStreet  As String * 25
  ClientCity    As String * 25
  ClientState   As String * 25
  ClientZip     As String * 15
  ClientTPS     As String * 18
  ClientTVQ     As String * 18
  ClientDeposit As Currency
  ClientAchats  As Currency
  ClientNotes   As String * 500
End Type

Type RecordCie
  CieName       As String * 30
  CieOwner      As String * 30
  CiePhone      As String * 30
  CieFax        As String * 30
  CieStreet     As String * 25
  CieCity       As String * 25
  CieState      As String * 25
  CieZip        As String * 15
  CieTPS        As String * 18
  CieTVQ        As String * 18
  CieInvoice    As Long
End Type

Type RecordHNotes
  Notes         As String * 2000
End Type

Type RecordHeader
  HeaderType    As Integer
  HeaderVisible As Integer
  HeaderNumber  As Integer
  HeaderText    As String * 60
  HeaderXPos    As Integer
  HeaderYPos    As Integer
End Type

Type RecordCard
  CardName      As String * 16
End Type

Type RecordProduct
  ProductName   As String * 60
  ProductOrigin As Integer
  ProductBuy    As Integer
  ProductSell   As Integer
  ProductText   As String * 500
  ProductInclude As Integer
End Type

Type RecordSupplier
  SupplierCieName   As String * 50
  SupplierName      As String * 35
  SupplierPhone     As String * 30
  SupplierFax       As String * 30
  SupplierStreet    As String * 35
  SupplierCity      As String * 25
  SupplierState     As String * 35
  SupplierZip       As String * 15
  SupplierNotes     As String * 500
End Type
