Fórum campos desconhecidos #259382

unit DataModule; interface uses Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs, DBTables, Db, DbiProcs, ImgList, ActnList, FileCtrl, MapiControl, ExportPack; type TDados = class(TDataModule) ImageList1: TImageList; ActionList1: TActionList; ActBusca: TAction; sClientes: TDataSource; sSenha: TDataSource; sVendedores: TDataSource; Query1: TQuery; Senhas: TTable; SenhasSenha: TStringField; [color=red:4abf0ef375]cCompleto: TStringField; crestam: TIntegerField; choje: TStringField;[/color:4abf0ef375] SenhasExclui: TBooleanField; [color=red:4abf0ef375]cFim: TDateField; cInicio: TDateField;[/color:4abf0ef375] SenhasCliente: TStringField; SenhasMaquina: TStringField; Vendedores: TTable; Clientes: TTable; ClientesCodigo: TStringField; ClientesCliente: TStringField; ClientesDOC: TStringField; ClientesIE: TStringField; ClientesIContato: TStringField; ClientesIDepartamento: TStringField; ClientesIEndereo: TStringField; ClientesICidade: TStringField; ClientesIEstado: TStringField; ClientesIBairro: TStringField; ClientesICep: TStringField; ClientesITelefone: TStringField; ClientesICelular: TStringField; ClientesIFax: TStringField; ClientesIEMail: TStringField; ClientesFContato: TStringField; ClientesFDepartamento: TStringField; ClientesFEndereo: TStringField; ClientesFBairro: TStringField; ClientesFCidade: TStringField; ClientesFEstado: TStringField; ClientesFCEP: TStringField; ClientesFTelefone: TStringField; ClientesFFax: TStringField; ClientesFEmail: TStringField; ClientesTipo: TFloatField; ClientesVendedor: TStringField; ClientesData: TDateField; ClientesOBS: TMemoField; ClientesHomePage: TStringField; SenhasEmail: TStringField; ClientesMes: TIntegerField; ClientesAno: TIntegerField; CadCli: TSession; tbConfig: TTable; tbConfigDiretorio: TStringField; incrementos: TTable; incrementosIdCadastro: TIntegerField; incrementosIdPreCadastro: TIntegerField; incrementosIdEtiqueta: TIntegerField; Atendimento: TTable; Cidades: TTable; Estados: TTable; EstadosUF: TStringField; EstadosEstado: TStringField; dsCidades: TDataSource; dsEstados: TDataSource; SenhasC: TAutoIncField; SenhasCSenha: TStringField; SenhasTelefone: TStringField; SenhasRamal: TStringField; SenhasDepartamento: TStringField; Usuarios: TTable; dsUsuarios: TDataSource; UsuariosUsuario: TStringField; UsuariosSenha: TStringField; CidadesCidade: TStringField; CidadesUf: TStringField; UsuariosAtivo: TBooleanField; UsuariosAutenticacao: TStringField; Usuarios_Usu: TStringField; Cidades_estado: TStringField; ClientesMaquinas: TIntegerField; tbControle: TTable; dsControle: TDataSource; tbControleId: TAutoIncField; tbControleData: TDateField; tbControleHora: TTimeField;