Chip 2003 December/CMCD1203.ISO/Software/Demo/salarii/Upgrade/salarii.exe/0/RCDATA/TDVR/TDVR.txt

Text File | 2003-10-10 | 75.4 KB | 3,234 lines

object DVR: TDVR
  OldCreateOrder = False
  Left = 285
  Top = 161
  Height = 479
  Width = 740
  object tImpo: TTable
    DatabaseName = '_DBFirma'
    IndexFieldNames = 'Luna;P_Venit'
    TableName = 'Impo.db'
    Left = 24
    Top = 40
    object tImpoNr: TAutoIncField
      FieldName = 'Nr'
      ReadOnly = True
    end
    object tImpoLuna: TDateField
      FieldName = 'Luna'
    end
    object tImpoP_Venit: TFloatField
      FieldName = 'P_Venit'
      DisplayFormat = '#,##0.##'
    end
    object tImpoV_Const: TFloatField
      FieldName = 'V_Const'
      DisplayFormat = '#,##0.##'
    end
    object tImpoV_Proc: TFloatField
      FieldName = 'V_Proc'
      DisplayFormat = '#,##0.##'
    end
  end
  object tPers: TTable
    Tag = 1
    OnCalcFields = tPersCalcFields
    IndexFieldNames = 'LUNA;Depart;TIP;CATEGORIE;MARCA'
    TableName = 'pers.db'
    Left = 28
    Top = 100
    object tPersNr: TAutoIncField
      FieldName = 'Nr'
      ReadOnly = True
    end
    object tPersLUNA: TDateField
      FieldName = 'LUNA'
    end
    object tPersIID: TIntegerField
      FieldName = 'IID'
    end
    object tPersTIP: TStringField
      FieldName = 'TIP'
      Size = 1
    end
    object tPersNUME: TStringField
      FieldName = 'NUME'
    end
    object tPersPRENUME: TStringField
      FieldName = 'PRENUME'
      Size = 30
    end
    object tPersCODNUMPERS: TStringField
      FieldName = 'CODNUMPERS'
      Size = 15
    end
    object tPersFUNCTIE: TStringField
      FieldName = 'FUNCTIE'
      Size = 50
    end
    object tPersSALINC: TFloatField
      FieldName = 'SALINC'
    end
    object tPersTIMP: TFloatField
      FieldName = 'TIMP'
    end
    object tPersTIMP_SPL: TFloatField
      FieldName = 'TIMP_SPL'
    end
    object tPersVAL_TIMP_S: TFloatField
      FieldName = 'VAL_TIMP_S'
    end
    object tPersPRIME: TFloatField
      FieldName = 'PRIME'
    end
    object tPersCM1L: TFloatField
      FieldName = 'CM1L'
    end
    object tPersCM2L: TFloatField
      FieldName = 'CM2L'
    end
    object tPersBRUT: TFloatField
      FieldName = 'BRUT'
    end
    object tPersPENSIE: TFloatField
      FieldName = 'PENSIE'
    end
    object tPersSOMAJ: TFloatField
      FieldName = 'SOMAJ'
    end
    object tPersTOTDREPT: TFloatField
      FieldName = 'TOTDREPT'
    end
    object tPersIMPOZIT: TFloatField
      FieldName = 'IMPOZIT'
    end
    object tPersAVANS: TFloatField
      FieldName = 'AVANS'
    end
    object tPersRETINERI: TFloatField
      FieldName = 'RETINERI'
    end
    object tPersRESTPL: TFloatField
      FieldName = 'RESTPL'
    end
    object tPersSTUDII: TStringField
      FieldName = 'STUDII'
      Size = 50
    end
    object tPersDATA_ANG: TDateField
      FieldName = 'DATA_ANG'
    end
    object tPersDATA_NAS: TDateField
      FieldName = 'DATA_NAS'
    end
    object tPersDATA_LICH: TDateField
      FieldName = 'DATA_LICH'
    end
    object tPersLOCALITATE: TStringField
      FieldName = 'LOCALITATE'
    end
    object tPersSTRADA: TStringField
      FieldName = 'STRADA'
    end
    object tPersNUMAR: TStringField
      FieldName = 'NUMAR'
      Size = 5
    end
    object tPersCODPOSTAL: TStringField
      FieldName = 'CODPOSTAL'
      Size = 5
    end
    object tPersBLOC: TStringField
      FieldName = 'BLOC'
      Size = 5
    end
    object tPersSCARA: TStringField
      FieldName = 'SCARA'
      Size = 5
    end
    object tPersETAJ: TStringField
      FieldName = 'ETAJ'
      Size = 5
    end
    object tPersAP: TStringField
      FieldName = 'AP'
      Size = 5
    end
    object tPersSECTOR: TStringField
      FieldName = 'SECTOR'
      Size = 5
    end
    object tPersTELEFON: TStringField
      FieldName = 'TELEFON'
      Size = 50
    end
    object tPersALTE_DATE: TStringField
      FieldName = 'ALTE_DATE'
      Size = 50
    end
    object tPersSANATATE: TFloatField
      FieldName = 'SANATATE'
    end
    object tPersTIMP_NOAPTE: TFloatField
      FieldName = 'TIMP_NOAPTE'
    end
    object tPersSUMA_T_NOAPTE: TFloatField
      FieldName = 'SUMA_T_NOAPTE'
    end
    object tPersZILE_CO: TFloatField
      FieldName = 'ZILE_CO'
    end
    object tPersSUMA_ZILE_CO: TFloatField
      FieldName = 'SUMA_ZILE_CO'
    end
    object tPersALTE_SUME: TFloatField
      FieldName = 'ALTE_SUME'
    end
    object tPersCIC: TFloatField
      FieldName = 'CIC'
    end
    object tPersPOPRIRI: TFloatField
      FieldName = 'POPRIRI'
    end
    object tPersGARANTII: TFloatField
      FieldName = 'GARANTII'
    end
    object tPersALTE_RET: TFloatField
      FieldName = 'ALTE_RET'
    end
    object tPersPRIME_INCASATE: TFloatField
      FieldName = 'PRIME_INCASATE'
    end
    object tPersAVANS_CO: TFloatField
      FieldName = 'AVANS_CO'
    end
    object tPersZILE_FP: TSmallintField
      FieldName = 'ZILE_FP'
    end
    object tPersZILE_CM: TSmallintField
      FieldName = 'ZILE_CM'
    end
    object tPersCATEGORIE: TSmallintField
      FieldName = 'CATEGORIE'
    end
    object tPersMARCA: TIntegerField
      FieldName = 'MARCA'
    end
    object tPersACORD: TStringField
      FieldName = 'ACORD'
      Size = 1
    end
    object tPersREALIZAT: TFloatField
      FieldName = 'REALIZAT'
    end
    object tPersZILE_CIC: TSmallintField
      FieldName = 'ZILE_CIC'
    end
    object tPersSPORURI: TFloatField
      FieldName = 'SPORURI'
    end
    object tPersCoefInd: TFloatField
      FieldName = 'CoefInd'
    end
    object tPersCoefInd1: TFloatField
      FieldName = 'CoefInd1'
    end
    object tPersINVALIDITATE: TIntegerField
      FieldName = 'INVALIDITATE'
    end
    object tPersJudet: TStringField
      FieldName = 'Judet'
      Size = 16
    end
    object tPersVENIT_NET: TFloatField
      FieldName = 'VENIT_NET'
    end
    object tPersDED_PERS_SUPLI: TFloatField
      FieldName = 'DED_PERS_SUPLI'
    end
    object tPersDED_PERS: TFloatField
      FieldName = 'DED_PERS'
    end
    object tPersALT_VENIT: TIntegerField
      FieldName = 'ALT_VENIT'
    end
    object tPersTarifar: TFloatField
      FieldKind = fkCalculated
      FieldName = 'Tarifar'
      Calculated = True
    end
    object tPersFondSalariu: TFloatField
      FieldKind = fkCalculated
      FieldName = 'FondSalariu'
      Calculated = True
    end
    object tPersDepart: TStringField
      FieldName = 'Depart'
      Size = 8
    end
    object tPersDif_brut: TFloatField
      FieldName = 'Dif_brut'
    end
    object tPersPr_va: TFloatField
      FieldName = 'Pr_va'
    end
    object tPersSpor1: TFloatField
      FieldName = 'Spor1'
    end
    object tPersSpor2: TFloatField
      FieldName = 'Spor2'
    end
    object tPersSpor3: TFloatField
      FieldName = 'Spor3'
    end
    object tPersSpor4: TFloatField
      FieldName = 'Spor4'
    end
    object tPersvals1: TFloatField
      FieldName = 'vals1'
    end
    object tPersvals2: TFloatField
      FieldName = 'vals2'
    end
    object tPersvals3: TFloatField
      FieldName = 'vals3'
    end
    object tPersvals4: TFloatField
      FieldName = 'vals4'
    end
    object tPersSumeExcept: TFloatField
      FieldName = 'SumeExcept'
    end
    object tPersDomiciliu_ext: TStringField
      FieldName = 'Domiciliu_ext'
      Size = 1
    end
    object tPersBrut1: TFloatField
      FieldName = 'Brut1'
    end
    object tPersAlteSumeSiAlteSporuri: TFloatField
      FieldKind = fkCalculated
      FieldName = 'AlteSumeSiAlteSporuri'
      Calculated = True
    end
    object tPersFondSomajFirma: TFloatField
      FieldKind = fkCalculated
      FieldName = 'FondSomajFirma'
      Calculated = True
    end
    object tPersBifaSom: TIntegerField
      FieldName = 'BifaSom'
    end
    object tPersch_prof: TFloatField
      FieldName = 'ch_prof'
    end
    object tPersPlatitOra: TIntegerField
      FieldName = 'PlatitOra'
    end
    object tPersOre_Zi: TFloatField
      FieldName = 'Ore_Zi'
    end
    object tPersProcImpo: TFloatField
      FieldName = 'ProcImpo'
    end
    object tPersPensionar: TIntegerField
      FieldName = 'Pensionar'
    end
  end
  object tFirme: TTable
    DatabaseName = '_DBFirma'
    TableName = 'Firme.DB'
    Left = 132
    Top = 44
    object tFirmeCodF: TAutoIncField
      FieldName = 'CodF'
      ReadOnly = True
    end
    object tFirmeCod: TStringField
      FieldName = 'Cod'
      Size = 8
    end
    object tFirmeTipAngaj: TIntegerField
      FieldName = 'TipAngaj'
    end
    object tFirmeDenumire: TStringField
      FieldName = 'Denumire'
      Size = 40
    end
    object tFirmeNume: TStringField
      FieldName = 'Nume'
    end
    object tFirmePrenume: TStringField
      FieldName = 'Prenume'
      Size = 30
    end
    object tFirmeJudet: TStringField
      FieldName = 'Judet'
      Size = 16
    end
    object tFirmeCodFiscal: TStringField
      FieldName = 'CodFiscal'
      Size = 13
    end
    object tFirmeRegCom: TStringField
      FieldName = 'RegCom'
      Size = 16
    end
    object tFirmeBanca1: TStringField
      FieldName = 'Banca1'
      Size = 30
    end
    object tFirmeBanca2: TStringField
      FieldName = 'Banca2'
      Size = 30
    end
    object tFirmeBanca3: TStringField
      FieldName = 'Banca3'
      Size = 30
    end
    object tFirmeFiliala1: TStringField
      FieldName = 'Filiala1'
      Size = 30
    end
    object tFirmeFiliala2: TStringField
      FieldName = 'Filiala2'
      Size = 30
    end
    object tFirmeFiliala3: TStringField
      FieldName = 'Filiala3'
      Size = 30
    end
    object tFirmeCont1: TStringField
      FieldName = 'Cont1'
      Size = 30
    end
    object tFirmeCont2: TStringField
      FieldName = 'Cont2'
      Size = 30
    end
    object tFirmeCont3: TStringField
      FieldName = 'Cont3'
      Size = 30
    end
    object tFirmeTelefon: TStringField
      FieldName = 'Telefon'
      Size = 40
    end
    object tFirmeFax: TStringField
      FieldName = 'Fax'
    end
    object tFirmeEMail: TStringField
      FieldName = 'EMail'
      Size = 30
    end
    object tFirmeLocalitate: TStringField
      FieldName = 'Localitate'
    end
    object tFirmeStrada: TStringField
      FieldName = 'Strada'
    end
    object tFirmeNumar: TStringField
      FieldName = 'Numar'
      Size = 5
    end
    object tFirmeCodPostal: TStringField
      FieldName = 'CodPostal'
      Size = 5
    end
    object tFirmeBloc: TStringField
      FieldName = 'Bloc'
      Size = 5
    end
    object tFirmeScara: TStringField
      FieldName = 'Scara'
      Size = 5
    end
    object tFirmeEtaj: TStringField
      FieldName = 'Etaj'
      Size = 5
    end
    object tFirmeAp: TStringField
      FieldName = 'Ap'
      Size = 5
    end
    object tFirmeSector: TStringField
      FieldName = 'Sector'
      Size = 5
    end
    object tFirmePers1: TStringField
      FieldName = 'Pers1'
      Size = 40
    end
    object tFirmePers2: TStringField
      FieldName = 'Pers2'
      Size = 40
    end
    object tFirmeNrI: TIntegerField
      FieldName = 'NrI'
    end
  end
  object dFPers: TDataSource
    DataSet = tFPers
    Left = 24
    Top = 176
  end
  object tFPers: TTable
    Tag = 1
    FieldDefs = <
      item
        Name = 'Nr'
        Attributes = [faReadonly]
        DataType = ftAutoInc
      end
      item
        Name = 'LUNA'
        DataType = ftDate
      end
      item
        Name = 'IID'
        DataType = ftInteger
      end
      item
        Name = 'TIP'
        DataType = ftString
        Size = 1
      end
      item
        Name = 'NUME'
        DataType = ftString
        Size = 20
      end
      item
        Name = 'PRENUME'
        DataType = ftString
        Size = 30
      end
      item
        Name = 'CODNUMPERS'
        DataType = ftString
        Size = 15
      end
      item
        Name = 'FUNCTIE'
        DataType = ftString
        Size = 50
      end
      item
        Name = 'SALINC'
        DataType = ftFloat
      end
      item
        Name = 'TIMP'
        DataType = ftFloat
      end
      item
        Name = 'TIMP_SPL'
        DataType = ftFloat
      end
      item
        Name = 'VAL_TIMP_S'
        DataType = ftFloat
      end
      item
        Name = 'ALTESPORP'
        DataType = ftFloat
      end
      item
        Name = 'VAL_SPORP'
        DataType = ftFloat
      end
      item
        Name = 'PRIME'
        DataType = ftFloat
      end
      item
        Name = 'CM1L'
        DataType = ftFloat
      end
      item
        Name = 'CM2L'
        DataType = ftFloat
      end
      item
        Name = 'BRUT'
        DataType = ftFloat
      end
      item
        Name = 'PENSIE'
        DataType = ftFloat
      end
      item
        Name = 'SOMAJ'
        DataType = ftFloat
      end
      item
        Name = 'TOTDREPT'
        DataType = ftFloat
      end
      item
        Name = 'IMPOZIT'
        DataType = ftFloat
      end
      item
        Name = 'AVANS'
        DataType = ftFloat
      end
      item
        Name = 'RETINERI'
        DataType = ftFloat
      end
      item
        Name = 'RESTPL'
        DataType = ftFloat
      end
      item
        Name = 'STUDII'
        DataType = ftString
        Size = 50
      end
      item
        Name = 'DATA_ANG'
        DataType = ftDate
      end
      item
        Name = 'DATA_NAS'
        DataType = ftDate
      end
      item
        Name = 'DATA_LICH'
        DataType = ftDate
      end
      item
        Name = 'LOCALITATE'
        DataType = ftString
        Size = 20
      end
      item
        Name = 'STRADA'
        DataType = ftString
        Size = 20
      end
      item
        Name = 'NUMAR'
        DataType = ftString
        Size = 5
      end
      item
        Name = 'CODPOSTAL'
        DataType = ftString
        Size = 5
      end
      item
        Name = 'BLOC'
        DataType = ftString
        Size = 5
      end
      item
        Name = 'SCARA'
        DataType = ftString
        Size = 5
      end
      item
        Name = 'ETAJ'
        DataType = ftString
        Size = 5
      end
      item
        Name = 'AP'
        DataType = ftString
        Size = 5
      end
      item
        Name = 'SECTOR'
        DataType = ftString
        Size = 5
      end
      item
        Name = 'TELEFON'
        DataType = ftString
        Size = 50
      end
      item
        Name = 'ALTE_DATE'
        DataType = ftString
        Size = 50
      end
      item
        Name = 'SANATATE'
        DataType = ftFloat
      end
      item
        Name = 'TIMP_NOAPTE'
        DataType = ftFloat
      end
      item
        Name = 'SUMA_T_NOAPTE'
        DataType = ftFloat
      end
      item
        Name = 'ZILE_CO'
        DataType = ftFloat
      end
      item
        Name = 'SUMA_ZILE_CO'
        DataType = ftFloat
      end
      item
        Name = 'ALTE_SUME'
        DataType = ftFloat
      end
      item
        Name = 'CIC'
        DataType = ftFloat
      end
      item
        Name = 'POPRIRI'
        DataType = ftFloat
      end
      item
        Name = 'GARANTII'
        DataType = ftFloat
      end
      item
        Name = 'ALTE_RET'
        DataType = ftFloat
      end
      item
        Name = 'PRIME_INCASATE'
        DataType = ftFloat
      end
      item
        Name = 'AVANS_CO'
        DataType = ftFloat
      end
      item
        Name = 'ZILE_FP'
        DataType = ftSmallint
      end
      item
        Name = 'ZILE_CM'
        DataType = ftSmallint
      end
      item
        Name = 'CATEGORIE'
        DataType = ftSmallint
      end
      item
        Name = 'MARCA'
        DataType = ftInteger
      end
      item
        Name = 'ACORD'
        DataType = ftString
        Size = 1
      end
      item
        Name = 'REALIZAT'
        DataType = ftFloat
      end
      item
        Name = 'ZILE_CIC'
        DataType = ftSmallint
      end
      item
        Name = 'SPORURI'
        DataType = ftFloat
      end
      item
        Name = 'CoefInd'
        DataType = ftFloat
      end
      item
        Name = 'CoefInd1'
        DataType = ftFloat
      end
      item
        Name = 'INVALIDITATE'
        DataType = ftInteger
      end
      item
        Name = 'Judet'
        DataType = ftString
        Size = 16
      end
      item
        Name = 'VENIT_NET'
        DataType = ftFloat
      end
      item
        Name = 'DED_PERS_SUPLI'
        DataType = ftFloat
      end
      item
        Name = 'DED_PERS'
        DataType = ftFloat
      end
      item
        Name = 'ALT_VENIT'
        DataType = ftInteger
      end
      item
        Name = 'Depart'
        DataType = ftString
        Size = 8
      end
      item
        Name = 'Fisa_rectif'
        DataType = ftString
        Size = 1
      end
      item
        Name = 'Fisa_regul'
        DataType = ftString
        Size = 1
      end
      item
        Name = 'Domiciliu_ro'
        DataType = ftString
        Size = 1
      end
      item
        Name = 'Email'
        DataType = ftString
        Size = 50
      end
      item
        Name = 'spor1'
        DataType = ftFloat
      end
      item
        Name = 'spor3'
        DataType = ftFloat
      end
      item
        Name = 'spor4'
        DataType = ftFloat
      end
      item
        Name = 'spor2'
        DataType = ftFloat
      end
      item
        Name = 'pr_va'
        DataType = ftFloat
      end
      item
        Name = 'Dif_brut'
        DataType = ftFloat
      end>
    IndexDefs = <
      item
        Name = 'tFPersIndex1'
        Fields = 'Nr'
        Options = [ixPrimary, ixUnique]
      end
      item
        Name = 'iIL'
        Fields = 'LUNA;IID'
        Options = [ixCaseInsensitive]
      end
      item
        Name = 'iLTCM'
        Fields = 'LUNA;TIP;CATEGORIE;MARCA'
        Options = [ixCaseInsensitive]
      end>
    IndexFieldNames = 'LUNA;IID'
    StoreDefs = True
    TableName = 'pers.db'
    Left = 20
    Top = 232
    object AutoIncField1: TAutoIncField
      FieldName = 'Nr'
      ReadOnly = True
    end
    object DateField1: TDateField
      FieldName = 'LUNA'
    end
    object IntegerField1: TIntegerField
      FieldName = 'IID'
    end
    object StringField1: TStringField
      FieldName = 'TIP'
      Size = 1
    end
    object StringField2: TStringField
      FieldName = 'NUME'
    end
    object StringField3: TStringField
      FieldName = 'PRENUME'
      Size = 30
    end
    object StringField4: TStringField
      FieldName = 'CODNUMPERS'
      Size = 15
    end
    object StringField5: TStringField
      FieldName = 'FUNCTIE'
      Size = 50
    end
    object FloatField1: TFloatField
      FieldName = 'SALINC'
    end
    object FloatField2: TFloatField
      FieldName = 'TIMP'
    end
    object FloatField3: TFloatField
      FieldName = 'TIMP_SPL'
    end
    object FloatField4: TFloatField
      FieldName = 'VAL_TIMP_S'
    end
    object FloatField5: TFloatField
      FieldName = 'ALTESPORP'
    end
    object FloatField6: TFloatField
      FieldName = 'PRIME'
    end
    object FloatField7: TFloatField
      FieldName = 'CM1L'
    end
    object FloatField8: TFloatField
      FieldName = 'CM2L'
    end
    object FloatField9: TFloatField
      FieldName = 'BRUT'
    end
    object FloatField10: TFloatField
      FieldName = 'PENSIE'
    end
    object FloatField11: TFloatField
      FieldName = 'SOMAJ'
    end
    object FloatField12: TFloatField
      FieldName = 'TOTDREPT'
    end
    object FloatField13: TFloatField
      FieldName = 'IMPOZIT'
    end
    object FloatField14: TFloatField
      FieldName = 'AVANS'
    end
    object FloatField15: TFloatField
      FieldName = 'RETINERI'
    end
    object FloatField16: TFloatField
      FieldName = 'RESTPL'
    end
    object StringField6: TStringField
      FieldName = 'STUDII'
      Size = 50
    end
    object DateField2: TDateField
      FieldName = 'DATA_ANG'
    end
    object DateField3: TDateField
      FieldName = 'DATA_NAS'
    end
    object DateField4: TDateField
      FieldName = 'DATA_LICH'
    end
    object StringField7: TStringField
      FieldName = 'LOCALITATE'
    end
    object StringField8: TStringField
      FieldName = 'STRADA'
    end
    object StringField9: TStringField
      FieldName = 'NUMAR'
      Size = 5
    end
    object StringField10: TStringField
      FieldName = 'CODPOSTAL'
      Size = 5
    end
    object StringField11: TStringField
      FieldName = 'BLOC'
      Size = 5
    end
    object StringField12: TStringField
      FieldName = 'SCARA'
      Size = 5
    end
    object StringField13: TStringField
      FieldName = 'ETAJ'
      Size = 5
    end
    object StringField14: TStringField
      FieldName = 'AP'
      Size = 5
    end
    object StringField15: TStringField
      FieldName = 'SECTOR'
      Size = 5
    end
    object StringField16: TStringField
      FieldName = 'TELEFON'
      Size = 50
    end
    object StringField17: TStringField
      FieldName = 'ALTE_DATE'
      Size = 50
    end
    object FloatField17: TFloatField
      FieldName = 'SANATATE'
    end
    object FloatField18: TFloatField
      FieldName = 'TIMP_NOAPTE'
    end
    object FloatField19: TFloatField
      FieldName = 'SUMA_T_NOAPTE'
    end
    object FloatField20: TFloatField
      FieldName = 'ZILE_CO'
    end
    object FloatField21: TFloatField
      FieldName = 'SUMA_ZILE_CO'
    end
    object FloatField22: TFloatField
      FieldName = 'ALTE_SUME'
    end
    object FloatField23: TFloatField
      FieldName = 'CIC'
    end
    object FloatField24: TFloatField
      FieldName = 'POPRIRI'
    end
    object FloatField25: TFloatField
      FieldName = 'GARANTII'
    end
    object FloatField26: TFloatField
      FieldName = 'ALTE_RET'
    end
    object FloatField27: TFloatField
      FieldName = 'PRIME_INCASATE'
    end
    object FloatField28: TFloatField
      FieldName = 'AVANS_CO'
    end
    object SmallintField1: TSmallintField
      FieldName = 'ZILE_FP'
    end
    object SmallintField2: TSmallintField
      FieldName = 'ZILE_CM'
    end
    object SmallintField3: TSmallintField
      FieldName = 'CATEGORIE'
    end
    object IntegerField2: TIntegerField
      FieldName = 'MARCA'
    end
    object StringField18: TStringField
      FieldName = 'ACORD'
      Size = 1
    end
    object FloatField29: TFloatField
      FieldName = 'REALIZAT'
    end
    object SmallintField4: TSmallintField
      FieldName = 'ZILE_CIC'
    end
    object FloatField31: TFloatField
      FieldName = 'SPORURI'
    end
    object FloatField32: TFloatField
      FieldName = 'CoefInd'
    end
    object IntegerField3: TIntegerField
      FieldName = 'INVALIDITATE'
    end
    object StringField19: TStringField
      FieldName = 'Judet'
      Size = 16
    end
    object FloatField33: TFloatField
      FieldName = 'VAL_SPORP'
    end
    object FloatField34: TFloatField
      FieldName = 'VENIT_NET'
    end
    object FloatField35: TFloatField
      FieldName = 'DED_PERS_SUPLI'
    end
    object FloatField36: TFloatField
      FieldName = 'DED_PERS'
    end
    object IntegerField4: TIntegerField
      FieldName = 'ALT_VENIT'
    end
    object FloatField37: TFloatField
      FieldKind = fkCalculated
      FieldName = 'Tarifar'
      Calculated = True
    end
    object FloatField38: TFloatField
      FieldKind = fkCalculated
      FieldName = 'FondSalariu'
      Calculated = True
    end
    object tFPersDepart: TStringField
      FieldName = 'Depart'
      Size = 8
    end
    object tFPersFisa_rectif: TStringField
      FieldName = 'Fisa_rectif'
      Size = 1
    end
    object tFPersFisa_regul: TStringField
      FieldName = 'Fisa_regul'
      Size = 1
    end
    object tFPersDomiciliu_ext: TStringField
      FieldName = 'Domiciliu_ext'
      Size = 1
    end
    object tFPersemail: TStringField
      FieldName = 'email'
      Size = 50
    end
    object tFPersspor1: TFloatField
      FieldName = 'spor1'
      DisplayFormat = '#,'
    end
    object tFPersspor2: TFloatField
      FieldName = 'spor2'
      DisplayFormat = '#,'
    end
    object tFPersspor3: TFloatField
      FieldName = 'spor3'
      DisplayFormat = '#,'
    end
    object tFPersspor4: TFloatField
      FieldName = 'spor4'
      DisplayFormat = '#,'
    end
    object tFPerspr_va: TFloatField
      FieldName = 'pr_va'
    end
    object tFPersdif_brut: TFloatField
      FieldName = 'dif_brut'
    end
    object tFPersCoefInd1: TFloatField
      FieldName = 'CoefInd1'
    end
    object tFPersCH_Prof: TFloatField
      FieldName = 'CH_Prof'
    end
    object tFPersPlatitOra: TIntegerField
      FieldName = 'PlatitOra'
    end
  end
  object tPint: TTable
    Tag = 1
    OnCalcFields = tPintCalcFields
    FieldDefs = <
      item
        Name = 'Nr'
        Attributes = [faReadonly]
        DataType = ftAutoInc
      end
      item
        Name = 'Luna'
        DataType = ftDate
      end
      item
        Name = 'IID'
        DataType = ftInteger
      end
      item
        Name = 'AiPers'
        DataType = ftInteger
      end
      item
        Name = 'Nume'
        DataType = ftString
        Size = 20
      end
      item
        Name = 'Prenume'
        DataType = ftString
        Size = 30
      end
      item
        Name = 'CODNUMPERS'
        DataType = ftString
        Size = 15
      end
      item
        Name = 'Calitate'
        DataType = ftInteger
      end
      item
        Name = 'Invaliditate'
        DataType = ftInteger
      end
      item
        Name = 'Coef'
        DataType = ftFloat
      end>
    IndexDefs = <
      item
        Name = 'tPintIndex1'
        Fields = 'Nr'
        Options = [ixPrimary, ixUnique]
      end
      item
        Name = 'iLI'
        Fields = 'Luna;IID'
        Options = [ixCaseInsensitive]
      end>
    IndexName = 'iLI'
    StoreDefs = True
    TableName = 'Pint.db'
    Left = 84
    Top = 92
    object tPintNr: TAutoIncField
      FieldName = 'Nr'
      ReadOnly = True
    end
    object tPintLuna: TDateField
      FieldName = 'Luna'
    end
    object tPintIID: TIntegerField
      FieldName = 'IID'
    end
    object tPintAiPers: TIntegerField
      FieldName = 'AiPers'
    end
    object tPintNume: TStringField
      FieldName = 'Nume'
    end
    object tPintPrenume: TStringField
      FieldName = 'Prenume'
      Size = 30
    end
    object tPintCODNUMPERS: TStringField
      FieldName = 'CODNUMPERS'
      Size = 15
    end
    object tPintCalitate: TIntegerField
      FieldName = 'Calitate'
    end
    object tPintInvaliditate: TIntegerField
      FieldName = 'Invaliditate'
    end
    object tPintCoef: TFloatField
      FieldName = 'Coef'
    end
    object tPintKalitate: TStringField
      FieldKind = fkCalculated
      FieldName = 'Kalitate'
      Calculated = True
    end
    object tPintYnvaliditate: TStringField
      FieldKind = fkCalculated
      FieldName = 'Ynvaliditate'
      Calculated = True
    end
  end
  object dPint: TDataSource
    DataSet = tPint
    Left = 132
    Top = 88
  end
  object CDSPers: TClientDataSet
    Aggregates = <>
    FieldDefs = <>
    IndexDefs = <>
    Params = <>
    StoreDefs = True
    Left = 84
    Top = 240
    object CDSPersIID: TIntegerField
      FieldName = 'IID'
    end
    object CDSPersLuna: TDateTimeField
      FieldName = 'Luna'
    end
    object CDSPersCODNUMPERS: TStringField
      FieldName = 'CODNUMPERS'
      Size = 15
    end
    object CDSPersNUME: TStringField
      FieldName = 'NUME'
    end
    object CDSPersPRENUME: TStringField
      FieldName = 'PRENUME'
      Size = 30
    end
    object CDSPersLOCALITATE: TStringField
      FieldName = 'LOCALITATE'
    end
    object CDSPersJudet: TStringField
      FieldName = 'Judet'
      Size = 16
    end
    object CDSPersSTRADA: TStringField
      FieldName = 'STRADA'
    end
    object CDSPersNUMAR: TStringField
      FieldName = 'NUMAR'
      Size = 5
    end
    object CDSPersCODPOSTAL: TStringField
      FieldName = 'CODPOSTAL'
      Size = 5
    end
    object CDSPersBLOC: TStringField
      FieldName = 'BLOC'
      Size = 5
    end
    object CDSPersSCARA: TStringField
      FieldName = 'SCARA'
      Size = 5
    end
    object CDSPersETAJ: TStringField
      FieldName = 'ETAJ'
      Size = 5
    end
    object CDSPersAP: TStringField
      FieldName = 'AP'
      Size = 5
    end
    object CDSPersSECTOR: TStringField
      FieldName = 'SECTOR'
      Size = 5
    end
    object CDSPersALT_VENIT: TIntegerField
      FieldName = 'ALT_VENIT'
    end
    object CDSPersDATA_ANG: TDateField
      FieldName = 'DATA_ANG'
    end
    object CDSPersDATA_LICH: TDateField
      FieldName = 'DATA_LICH'
    end
    object CDSPersINVALIDITATE: TIntegerField
      FieldName = 'INVALIDITATE'
    end
    object CDSPersCoefInd: TFloatField
      FieldName = 'CoefInd1'
    end
    object CDSPersCoefPers: TFloatField
      FieldName = 'CoefPers1'
    end
    object CDSPersVENIT_NET: TFloatField
      FieldName = 'VENIT_NET1'
    end
    object CDSPersDED_PERS: TFloatField
      FieldName = 'DED_PERS1'
    end
    object CDSPersDED_PERS_SUPLI: TFloatField
      FieldName = 'DED_PERS_SUPLI1'
    end
    object CDSPersTOTDREPT: TFloatField
      FieldName = 'TOTDREPT1'
    end
    object CDSPersIMPOZIT: TFloatField
      FieldName = 'IMPOZIT1'
    end
    object CDSPersCoefInd2: TFloatField
      FieldName = 'CoefInd2'
    end
    object CDSPersCoefPers2: TFloatField
      FieldName = 'CoefPers2'
    end
    object CDSPersVENIT_NET2: TFloatField
      FieldName = 'VENIT_NET2'
    end
    object CDSPersDED_PERS2: TFloatField
      FieldName = 'DED_PERS2'
    end
    object CDSPersDED_PERS_SUPLI2: TFloatField
      FieldName = 'DED_PERS_SUPLI2'
    end
    object CDSPersTOTDREPT2: TFloatField
      FieldName = 'TOTDREPT2'
    end
    object CDSPersIMPOZIT2: TFloatField
      FieldName = 'IMPOZIT2'
    end
    object CDSPersCoefInd3: TFloatField
      FieldName = 'CoefInd3'
    end
    object CDSPersCoefPers3: TFloatField
      FieldName = 'CoefPers3'
    end
    object CDSPersVENIT_NET3: TFloatField
      FieldName = 'VENIT_NET3'
    end
    object CDSPersDED_PERS3: TFloatField
      FieldName = 'DED_PERS3'
    end
    object CDSPersDED_PERS_SUPLI3: TFloatField
      FieldName = 'DED_PERS_SUPLI3'
    end
    object CDSPersTOTDREPT3: TFloatField
      FieldName = 'TOTDREPT3'
    end
    object CDSPersIMPOZIT3: TFloatField
      FieldName = 'IMPOZIT3'
    end
    object CDSPersCoefInd4: TFloatField
      FieldName = 'CoefInd4'
    end
    object CDSPersCoefPers4: TFloatField
      FieldName = 'CoefPers4'
    end
    object CDSPersVENIT_NET4: TFloatField
      FieldName = 'VENIT_NET4'
    end
    object CDSPersDED_PERS4: TFloatField
      FieldName = 'DED_PERS4'
    end
    object CDSPersDED_PERS_SUPLI4: TFloatField
      FieldName = 'DED_PERS_SUPLI4'
    end
    object CDSPersTOTDREPT4: TFloatField
      FieldName = 'TOTDREPT4'
    end
    object CDSPersIMPOZIT4: TFloatField
      FieldName = 'IMPOZIT4'
    end
    object CDSPersCoefInd5: TFloatField
      FieldName = 'CoefInd5'
    end
    object CDSPersCoefPers5: TFloatField
      FieldName = 'CoefPers5'
    end
    object CDSPersVENIT_NET5: TFloatField
      FieldName = 'VENIT_NET5'
    end
    object CDSPersDED_PERS5: TFloatField
      FieldName = 'DED_PERS5'
    end
    object CDSPersDED_PERS_SUPLI5: TFloatField
      FieldName = 'DED_PERS_SUPLI5'
    end
    object CDSPersTOTDREPT5: TFloatField
      FieldName = 'TOTDREPT5'
    end
    object CDSPersIMPOZIT5: TFloatField
      FieldName = 'IMPOZIT5'
    end
    object CDSPersCoefInd6: TFloatField
      FieldName = 'CoefInd6'
    end
    object CDSPersCoefPers6: TFloatField
      FieldName = 'CoefPers6'
    end
    object CDSPersVENIT_NET6: TFloatField
      FieldName = 'VENIT_NET6'
    end
    object CDSPersDED_PERS6: TFloatField
      FieldName = 'DED_PERS6'
    end
    object CDSPersDED_PERS_SUPLI6: TFloatField
      FieldName = 'DED_PERS_SUPLI6'
    end
    object CDSPersTOTDREPT6: TFloatField
      FieldName = 'TOTDREPT6'
    end
    object CDSPersIMPOZIT6: TFloatField
      FieldName = 'IMPOZIT6'
    end
    object CDSPersCoefInd7: TFloatField
      FieldName = 'CoefInd7'
    end
    object CDSPersCoefPers7: TFloatField
      FieldName = 'CoefPers7'
    end
    object CDSPersVENIT_NET7: TFloatField
      FieldName = 'VENIT_NET7'
    end
    object CDSPersDED_PERS7: TFloatField
      FieldName = 'DED_PERS7'
    end
    object CDSPersDED_PERS_SUPLI7: TFloatField
      FieldName = 'DED_PERS_SUPLI7'
    end
    object CDSPersTOTDREPT7: TFloatField
      FieldName = 'TOTDREPT7'
    end
    object CDSPersIMPOZIT7: TFloatField
      FieldName = 'IMPOZIT7'
    end
    object CDSPersCoefInd8: TFloatField
      FieldName = 'CoefInd8'
    end
    object CDSPersCoefPers8: TFloatField
      FieldName = 'CoefPers8'
    end
    object CDSPersVENIT_NET8: TFloatField
      FieldName = 'VENIT_NET8'
    end
    object CDSPersDED_PERS8: TFloatField
      FieldName = 'DED_PERS8'
    end
    object CDSPersDED_PERS_SUPLI8: TFloatField
      FieldName = 'DED_PERS_SUPLI8'
    end
    object CDSPersTOTDREPT8: TFloatField
      FieldName = 'TOTDREPT8'
    end
    object CDSPersIMPOZIT8: TFloatField
      FieldName = 'IMPOZIT8'
    end
    object CDSPersCoefInd9: TFloatField
      FieldName = 'CoefInd9'
    end
    object CDSPersCoefPers9: TFloatField
      FieldName = 'CoefPers9'
    end
    object CDSPersVENIT_NET9: TFloatField
      FieldName = 'VENIT_NET9'
    end
    object CDSPersDED_PERS9: TFloatField
      FieldName = 'DED_PERS9'
    end
    object CDSPersDED_PERS_SUPLI9: TFloatField
      FieldName = 'DED_PERS_SUPLI9'
    end
    object CDSPersTOTDREPT9: TFloatField
      FieldName = 'TOTDREPT9'
    end
    object CDSPersIMPOZIT9: TFloatField
      FieldName = 'IMPOZIT9'
    end
    object CDSPersCoefInd10: TFloatField
      FieldName = 'CoefInd10'
    end
    object CDSPersCoefPers10: TFloatField
      FieldName = 'CoefPers10'
    end
    object CDSPersVENIT_NET10: TFloatField
      FieldName = 'VENIT_NET10'
    end
    object CDSPersDED_PERS10: TFloatField
      FieldName = 'DED_PERS10'
    end
    object CDSPersDED_PERS_SUPLI10: TFloatField
      FieldName = 'DED_PERS_SUPLI10'
    end
    object CDSPersTOTDREPT10: TFloatField
      FieldName = 'TOTDREPT10'
    end
    object CDSPersIMPOZIT10: TFloatField
      FieldName = 'IMPOZIT10'
    end
    object CDSPersCoefInd11: TFloatField
      FieldName = 'CoefInd11'
    end
    object CDSPersCoefPers11: TFloatField
      FieldName = 'CoefPers11'
    end
    object CDSPersVENIT_NET11: TFloatField
      FieldName = 'VENIT_NET11'
    end
    object CDSPersDED_PERS11: TFloatField
      FieldName = 'DED_PERS11'
    end
    object CDSPersDED_PERS_SUPLI11: TFloatField
      FieldName = 'DED_PERS_SUPLI11'
    end
    object CDSPersTOTDREPT11: TFloatField
      FieldName = 'TOTDREPT11'
    end
    object CDSPersIMPOZIT11: TFloatField
      FieldName = 'IMPOZIT11'
    end
    object CDSPersCoefInd12: TFloatField
      FieldName = 'CoefInd12'
    end
    object CDSPersCoefPers12: TFloatField
      FieldName = 'CoefPers12'
    end
    object CDSPersVENIT_NET12: TFloatField
      FieldName = 'VENIT_NET12'
    end
    object CDSPersDED_PERS12: TFloatField
      FieldName = 'DED_PERS12'
    end
    object CDSPersDED_PERS_SUPLI12: TFloatField
      FieldName = 'DED_PERS_SUPLI12'
    end
    object CDSPersTOTDREPT12: TFloatField
      FieldName = 'TOTDREPT12'
    end
    object CDSPersIMPOZIT12: TFloatField
      FieldName = 'IMPOZIT12'
    end
    object CDSPersNrLuni: TIntegerField
      FieldName = 'NrLuni'
    end
    object CDSPersSUMA_CORECTIE: TFloatField
      FieldName = 'SUMA_CORECTIE'
    end
  end
  object DCDS: TDataSource
    DataSet = CDSPers
    Left = 72
    Top = 168
  end
  object tFPint: TTable
    Tag = 1
    FieldDefs = <
      item
        Name = 'Nr'
        Attributes = [faReadonly]
        DataType = ftAutoInc
      end
      item
        Name = 'Luna'
        DataType = ftDate
      end
      item
        Name = 'IID'
        DataType = ftInteger
      end
      item
        Name = 'AiPers'
        DataType = ftInteger
      end
      item
        Name = 'Nume'
        DataType = ftString
        Size = 20
      end
      item
        Name = 'Prenume'
        DataType = ftString
        Size = 30
      end
      item
        Name = 'CODNUMPERS'
        DataType = ftString
        Size = 15
      end
      item
        Name = 'Calitate'
        DataType = ftInteger
      end
      item
        Name = 'Invaliditate'
        DataType = ftInteger
      end
      item
        Name = 'Coef'
        DataType = ftFloat
      end>
    IndexDefs = <
      item
        Name = 'tPintIndex1'
        Fields = 'Nr'
        Options = [ixPrimary, ixUnique]
      end
      item
        Name = 'iLI'
        Fields = 'Luna;IID'
        Options = [ixCaseInsensitive]
      end>
    IndexFieldNames = 'LUNA;IID'
    StoreDefs = True
    TableName = 'Pint.db'
    Left = 32
    Top = 312
    object AutoIncField2: TAutoIncField
      FieldName = 'Nr'
      ReadOnly = True
    end
    object DateField5: TDateField
      FieldName = 'Luna'
    end
    object IntegerField5: TIntegerField
      FieldName = 'IID'
    end
    object IntegerField6: TIntegerField
      FieldName = 'AiPers'
    end
    object StringField20: TStringField
      FieldName = 'Nume'
    end
    object StringField21: TStringField
      FieldName = 'Prenume'
      Size = 30
    end
    object StringField22: TStringField
      FieldName = 'CODNUMPERS'
      Size = 15
    end
    object IntegerField7: TIntegerField
      FieldName = 'Calitate'
    end
    object IntegerField8: TIntegerField
      FieldName = 'Invaliditate'
    end
    object FloatField39: TFloatField
      FieldName = 'Coef'
    end
  end
  object CDSPint: TClientDataSet
    Aggregates = <>
    FieldDefs = <>
    IndexDefs = <>
    Params = <>
    StoreDefs = True
    Left = 100
    Top = 312
    object CDSPintLuna: TDateField
      FieldName = 'Luna'
    end
    object CDSPintIID: TIntegerField
      FieldName = 'IID'
    end
    object CDSPintCodAng: TStringField
      FieldName = 'CodAngaj'
      Size = 13
    end
    object CDSPintNume: TStringField
      FieldName = 'Nume'
    end
    object CDSPintPrenume: TStringField
      FieldName = 'Prenume'
      Size = 30
    end
    object CDSPintCODNUMPERS: TStringField
      FieldName = 'CODNUMPERS'
      Size = 15
    end
    object CDSPintCalitate: TIntegerField
      FieldName = 'Calitate'
    end
    object CDSPintInvaliditate: TIntegerField
      FieldName = 'Invaliditate'
    end
    object CDSPintCoef12: TFloatField
      FieldName = 'Coef1'
    end
    object CDSPintCoef11: TFloatField
      FieldName = 'Coef2'
    end
    object CDSPintCoef10: TFloatField
      FieldName = 'Coef3'
    end
    object CDSPintCoef9: TFloatField
      FieldName = 'Coef4'
    end
    object CDSPintCoef8: TFloatField
      FieldName = 'Coef5'
    end
    object CDSPintCoef7: TFloatField
      FieldName = 'Coef6'
    end
    object CDSPintCoef6: TFloatField
      FieldName = 'Coef7'
    end
    object CDSPintCoef5: TFloatField
      FieldName = 'Coef8'
    end
    object CDSPintCoef4: TFloatField
      FieldName = 'Coef9'
    end
    object CDSPintCoef3: TFloatField
      FieldName = 'Coef10'
    end
    object CDSPintCoef2: TFloatField
      FieldName = 'Coef11'
    end
    object CDSPintCoef: TFloatField
      FieldName = 'Coef12'
    end
  end
  object tPersNom: TTable
    Tag = 1
    OnCalcFields = tPersNomCalcFields
    IndexFieldNames = 'LUNA;Depart;TIP;CATEGORIE;MARCA'
    StoreDefs = True
    TableName = 'pers.db'
    Left = 248
    Top = 148
    object AutoIncField3: TAutoIncField
      FieldName = 'Nr'
      ReadOnly = True
    end
    object DateField6: TDateField
      FieldName = 'LUNA'
    end
    object IntegerField9: TIntegerField
      FieldName = 'IID'
    end
    object StringField23: TStringField
      FieldName = 'TIP'
      Size = 1
    end
    object StringField24: TStringField
      FieldName = 'NUME'
    end
    object StringField25: TStringField
      FieldName = 'PRENUME'
      Size = 30
    end
    object StringField26: TStringField
      FieldName = 'CODNUMPERS'
      Size = 15
    end
    object StringField27: TStringField
      FieldName = 'FUNCTIE'
      Size = 50
    end
    object FloatField40: TFloatField
      FieldName = 'SALINC'
    end
    object FloatField41: TFloatField
      FieldName = 'TIMP'
    end
    object FloatField42: TFloatField
      FieldName = 'TIMP_SPL'
    end
    object FloatField43: TFloatField
      FieldName = 'VAL_TIMP_S'
    end
    object FloatField44: TFloatField
      FieldName = 'ALTESPORP'
    end
    object FloatField45: TFloatField
      FieldName = 'PRIME'
    end
    object FloatField46: TFloatField
      FieldName = 'CM1L'
    end
    object FloatField47: TFloatField
      FieldName = 'CM2L'
    end
    object FloatField48: TFloatField
      FieldName = 'BRUT'
    end
    object FloatField49: TFloatField
      FieldName = 'PENSIE'
      DisplayFormat = '#,'
    end
    object FloatField50: TFloatField
      FieldName = 'SOMAJ'
    end
    object FloatField51: TFloatField
      FieldName = 'TOTDREPT'
    end
    object FloatField52: TFloatField
      FieldName = 'IMPOZIT'
    end
    object FloatField53: TFloatField
      FieldName = 'AVANS'
    end
    object FloatField54: TFloatField
      FieldName = 'RETINERI'
    end
    object FloatField55: TFloatField
      FieldName = 'RESTPL'
    end
    object StringField28: TStringField
      FieldName = 'STUDII'
      Size = 50
    end
    object DateField7: TDateField
      FieldName = 'DATA_ANG'
    end
    object DateField8: TDateField
      FieldName = 'DATA_NAS'
    end
    object DateField9: TDateField
      FieldName = 'DATA_LICH'
    end
    object StringField29: TStringField
      FieldName = 'LOCALITATE'
    end
    object StringField30: TStringField
      FieldName = 'STRADA'
    end
    object StringField31: TStringField
      FieldName = 'NUMAR'
      Size = 5
    end
    object StringField32: TStringField
      FieldName = 'CODPOSTAL'
      Size = 5
    end
    object StringField33: TStringField
      FieldName = 'BLOC'
      Size = 5
    end
    object StringField34: TStringField
      FieldName = 'SCARA'
      Size = 5
    end
    object StringField35: TStringField
      FieldName = 'ETAJ'
      Size = 5
    end
    object StringField36: TStringField
      FieldName = 'AP'
      Size = 5
    end
    object StringField37: TStringField
      FieldName = 'SECTOR'
      Size = 5
    end
    object StringField38: TStringField
      FieldName = 'TELEFON'
      Size = 50
    end
    object StringField39: TStringField
      FieldName = 'ALTE_DATE'
      Size = 50
    end
    object FloatField56: TFloatField
      FieldName = 'SANATATE'
    end
    object FloatField57: TFloatField
      FieldName = 'TIMP_NOAPTE'
    end
    object FloatField58: TFloatField
      FieldName = 'SUMA_T_NOAPTE'
    end
    object FloatField59: TFloatField
      FieldName = 'ZILE_CO'
    end
    object FloatField60: TFloatField
      FieldName = 'SUMA_ZILE_CO'
    end
    object FloatField61: TFloatField
      FieldName = 'ALTE_SUME'
    end
    object FloatField62: TFloatField
      FieldName = 'CIC'
    end
    object FloatField63: TFloatField
      FieldName = 'POPRIRI'
    end
    object FloatField64: TFloatField
      FieldName = 'GARANTII'
    end
    object FloatField65: TFloatField
      FieldName = 'ALTE_RET'
    end
    object FloatField66: TFloatField
      FieldName = 'PRIME_INCASATE'
    end
    object FloatField67: TFloatField
      FieldName = 'AVANS_CO'
    end
    object SmallintField5: TSmallintField
      FieldName = 'ZILE_FP'
    end
    object SmallintField6: TSmallintField
      FieldName = 'ZILE_CM'
    end
    object SmallintField7: TSmallintField
      FieldName = 'CATEGORIE'
    end
    object IntegerField10: TIntegerField
      FieldName = 'MARCA'
    end
    object StringField40: TStringField
      FieldName = 'ACORD'
      Size = 1
    end
    object FloatField68: TFloatField
      FieldName = 'REALIZAT'
    end
    object SmallintField8: TSmallintField
      FieldName = 'ZILE_CIC'
    end
    object FloatField70: TFloatField
      FieldName = 'SPORURI'
    end
    object FloatField71: TFloatField
      FieldName = 'CoefInd'
    end
    object tPersNomCoefInd1: TFloatField
      FieldName = 'CoefInd1'
    end
    object IntegerField11: TIntegerField
      FieldName = 'INVALIDITATE'
    end
    object StringField41: TStringField
      FieldName = 'Judet'
      Size = 16
    end
    object FloatField72: TFloatField
      FieldName = 'VAL_SPORP'
    end
    object FloatField73: TFloatField
      FieldName = 'VENIT_NET'
    end
    object FloatField74: TFloatField
      FieldName = 'DED_PERS_SUPLI'
    end
    object FloatField75: TFloatField
      FieldName = 'DED_PERS'
    end
    object IntegerField12: TIntegerField
      FieldName = 'ALT_VENIT'
    end
    object tPersNomZileNorm: TFloatField
      FieldKind = fkCalculated
      FieldName = 'ZileNorm'
      Calculated = True
    end
    object tPersNomZilePrest: TFloatField
      FieldKind = fkCalculated
      FieldName = 'ZilePrest'
      DisplayFormat = '#,'
      Calculated = True
    end
    object tPersNomTotalZile: TFloatField
      FieldKind = fkCalculated
      FieldName = 'TotalZile'
      Calculated = True
    end
    object tPersNomBaza2: TFloatField
      FieldKind = fkCalculated
      FieldName = 'Baza2'
      DisplayFormat = '#,'
      Calculated = True
    end
    object tPersNomTotalPrest: TFloatField
      FieldKind = fkCalculated
      FieldName = 'TotalPrest'
      DisplayFormat = '#,'
      Calculated = True
    end
    object tPersNomBASS: TFloatField
      FieldKind = fkCalculated
      FieldName = 'BASS'
      DisplayFormat = '#,'
      Calculated = True
    end
    object tPersNomDepart: TStringField
      FieldName = 'Depart'
      Size = 8
    end
    object tPersNomDif_brut: TFloatField
      FieldName = 'Dif_brut'
    end
    object tPersNomDomiciliu_ext: TStringField
      FieldName = 'Domiciliu_ext'
    end
    object tPersNomSumeExcept: TFloatField
      FieldName = 'SumeExcept'
    end
    object tPersNomBazaSomaj: TFloatField
      FieldKind = fkCalculated
      FieldName = 'BazaSomaj'
      DisplayFormat = '#,'
      Calculated = True
    end
    object tPersNomBrut1: TFloatField
      FieldName = 'Brut1'
    end
    object tPersNomBazaCAS: TFloatField
      FieldKind = fkCalculated
      FieldName = 'BazaCAS'
      DisplayFormat = '#,'
      Calculated = True
    end
    object tPersNomBifaSom: TIntegerField
      FieldName = 'BifaSom'
    end
    object tPersNomPlatitOra: TIntegerField
      FieldName = 'PlatitOra'
    end
    object tPersNomOre_Zi: TFloatField
      FieldName = 'Ore_Zi'
    end
    object tPersNomPensionar: TIntegerField
      FieldName = 'Pensionar'
    end
    object tPersNomNORMA: TIntegerField
      FieldName = 'NORMA'
    end
  end
  object tADBF: TTable
    Left = 256
    Top = 72
  end
  object tTDBF: TTable
    Left = 312
    Top = 73
  end
  object tImpoAn: TTable
    DatabaseName = '_DBFirma'
    IndexDefs = <
      item
        Name = 'tImpoIndex4'
        Fields = 'Nr'
        Options = [ixPrimary]
      end
      item
        Name = 'iLV'
        Fields = 'Luna;P_Venit'
      end>
    IndexFieldNames = 'Luna;P_Venit'
    StoreDefs = True
    TableName = 'Impo_an.db'
    Left = 80
    Top = 42
    object AutoIncField4: TAutoIncField
      FieldName = 'Nr'
      ReadOnly = True
    end
    object DateField10: TDateField
      FieldName = 'Luna'
    end
    object FloatField76: TFloatField
      FieldName = 'P_Venit'
      DisplayFormat = '#,##0.##'
    end
    object FloatField77: TFloatField
      FieldName = 'V_Const'
      DisplayFormat = '#,##0.##'
    end
    object FloatField78: TFloatField
      FieldName = 'V_Proc'
      DisplayFormat = '#,##0.##'
    end
  end
  object CDSPers2002: TClientDataSet
    Aggregates = <>
    FieldDefs = <>
    IndexDefs = <>
    Params = <>
    StoreDefs = True
    Left = 204
    Top = 252
    object IntegerField13: TIntegerField
      FieldName = 'IID'
    end
    object DateTimeField1: TDateTimeField
      FieldName = 'Luna'
    end
    object StringField42: TStringField
      FieldName = 'CODNUMPERS'
      Size = 15
    end
    object StringField43: TStringField
      FieldName = 'NUME'
    end
    object StringField44: TStringField
      FieldName = 'PRENUME'
      Size = 30
    end
    object StringField45: TStringField
      FieldName = 'LOCALITATE'
    end
    object StringField46: TStringField
      FieldName = 'Judet'
      Size = 16
    end
    object StringField47: TStringField
      FieldName = 'STRADA'
    end
    object StringField48: TStringField
      FieldName = 'NUMAR'
      Size = 5
    end
    object StringField49: TStringField
      FieldName = 'CODPOSTAL'
      Size = 5
    end
    object StringField50: TStringField
      FieldName = 'BLOC'
      Size = 5
    end
    object StringField51: TStringField
      FieldName = 'SCARA'
      Size = 5
    end
    object StringField52: TStringField
      FieldName = 'ETAJ'
      Size = 5
    end
    object StringField53: TStringField
      FieldName = 'AP'
      Size = 5
    end
    object StringField54: TStringField
      FieldName = 'SECTOR'
      Size = 5
    end
    object CDSPers2002Domiciliu_ext: TStringField
      FieldName = 'Domiciliu_ext'
      Size = 1
    end
    object IntegerField14: TIntegerField
      FieldName = 'ALT_VENIT'
    end
    object DateField11: TDateField
      FieldName = 'DATA_ANG'
    end
    object DateField12: TDateField
      FieldName = 'DATA_LICH'
    end
    object FloatField79: TFloatField
      FieldName = 'CoefInd1'
    end
    object FloatField80: TFloatField
      FieldName = 'CoefPers1'
    end
    object FloatField81: TFloatField
      FieldName = 'VENIT_NET1'
    end
    object FloatField82: TFloatField
      FieldName = 'DED_PERS1'
    end
    object FloatField83: TFloatField
      FieldName = 'DED_PERS_SUPLI1'
    end
    object FloatField84: TFloatField
      FieldName = 'TOTDREPT1'
    end
    object FloatField85: TFloatField
      FieldName = 'IMPOZIT1'
    end
    object FloatField86: TFloatField
      FieldName = 'CoefInd2'
    end
    object FloatField87: TFloatField
      FieldName = 'CoefPers2'
    end
    object FloatField88: TFloatField
      FieldName = 'VENIT_NET2'
    end
    object FloatField89: TFloatField
      FieldName = 'DED_PERS2'
    end
    object FloatField90: TFloatField
      FieldName = 'DED_PERS_SUPLI2'
    end
    object FloatField91: TFloatField
      FieldName = 'TOTDREPT2'
    end
    object FloatField92: TFloatField
      FieldName = 'IMPOZIT2'
    end
    object FloatField93: TFloatField
      FieldName = 'CoefInd3'
    end
    object FloatField94: TFloatField
      FieldName = 'CoefPers3'
    end
    object FloatField95: TFloatField
      FieldName = 'VENIT_NET3'
    end
    object FloatField96: TFloatField
      FieldName = 'DED_PERS3'
    end
    object FloatField97: TFloatField
      FieldName = 'DED_PERS_SUPLI3'
    end
    object FloatField98: TFloatField
      FieldName = 'TOTDREPT3'
    end
    object FloatField99: TFloatField
      FieldName = 'IMPOZIT3'
    end
    object FloatField100: TFloatField
      FieldName = 'CoefInd4'
    end
    object FloatField101: TFloatField
      FieldName = 'CoefPers4'
    end
    object FloatField102: TFloatField
      FieldName = 'VENIT_NET4'
    end
    object FloatField103: TFloatField
      FieldName = 'DED_PERS4'
    end
    object FloatField104: TFloatField
      FieldName = 'DED_PERS_SUPLI4'
    end
    object FloatField105: TFloatField
      FieldName = 'TOTDREPT4'
    end
    object FloatField106: TFloatField
      FieldName = 'IMPOZIT4'
    end
    object FloatField107: TFloatField
      FieldName = 'CoefInd5'
    end
    object FloatField108: TFloatField
      FieldName = 'CoefPers5'
    end
    object FloatField109: TFloatField
      FieldName = 'VENIT_NET5'
    end
    object FloatField110: TFloatField
      FieldName = 'DED_PERS5'
    end
    object FloatField111: TFloatField
      FieldName = 'DED_PERS_SUPLI5'
    end
    object FloatField112: TFloatField
      FieldName = 'TOTDREPT5'
    end
    object FloatField113: TFloatField
      FieldName = 'IMPOZIT5'
    end
    object FloatField114: TFloatField
      FieldName = 'CoefInd6'
    end
    object FloatField115: TFloatField
      FieldName = 'CoefPers6'
    end
    object FloatField116: TFloatField
      FieldName = 'VENIT_NET6'
    end
    object FloatField117: TFloatField
      FieldName = 'DED_PERS6'
    end
    object FloatField118: TFloatField
      FieldName = 'DED_PERS_SUPLI6'
    end
    object FloatField119: TFloatField
      FieldName = 'TOTDREPT6'
    end
    object FloatField120: TFloatField
      FieldName = 'IMPOZIT6'
    end
    object FloatField121: TFloatField
      FieldName = 'CoefInd7'
    end
    object FloatField122: TFloatField
      FieldName = 'CoefPers7'
    end
    object FloatField123: TFloatField
      FieldName = 'VENIT_NET7'
    end
    object FloatField124: TFloatField
      FieldName = 'DED_PERS7'
    end
    object FloatField125: TFloatField
      FieldName = 'DED_PERS_SUPLI7'
    end
    object FloatField126: TFloatField
      FieldName = 'TOTDREPT7'
    end
    object FloatField127: TFloatField
      FieldName = 'IMPOZIT7'
    end
    object FloatField128: TFloatField
      FieldName = 'CoefInd8'
    end
    object FloatField129: TFloatField
      FieldName = 'CoefPers8'
    end
    object FloatField130: TFloatField
      FieldName = 'VENIT_NET8'
    end
    object FloatField131: TFloatField
      FieldName = 'DED_PERS8'
    end
    object FloatField132: TFloatField
      FieldName = 'DED_PERS_SUPLI8'
    end
    object FloatField133: TFloatField
      FieldName = 'TOTDREPT8'
    end
    object FloatField134: TFloatField
      FieldName = 'IMPOZIT8'
    end
    object FloatField135: TFloatField
      FieldName = 'CoefInd9'
    end
    object FloatField136: TFloatField
      FieldName = 'CoefPers9'
    end
    object FloatField137: TFloatField
      FieldName = 'VENIT_NET9'
    end
    object FloatField138: TFloatField
      FieldName = 'DED_PERS9'
    end
    object FloatField139: TFloatField
      FieldName = 'DED_PERS_SUPLI9'
    end
    object FloatField140: TFloatField
      FieldName = 'TOTDREPT9'
    end
    object FloatField141: TFloatField
      FieldName = 'IMPOZIT9'
    end
    object FloatField142: TFloatField
      FieldName = 'CoefInd10'
    end
    object FloatField143: TFloatField
      FieldName = 'CoefPers10'
    end
    object FloatField144: TFloatField
      FieldName = 'VENIT_NET10'
    end
    object FloatField145: TFloatField
      FieldName = 'DED_PERS10'
    end
    object FloatField146: TFloatField
      FieldName = 'DED_PERS_SUPLI10'
    end
    object FloatField147: TFloatField
      FieldName = 'TOTDREPT10'
    end
    object FloatField148: TFloatField
      FieldName = 'IMPOZIT10'
    end
    object FloatField149: TFloatField
      FieldName = 'CoefInd11'
    end
    object FloatField150: TFloatField
      FieldName = 'CoefPers11'
    end
    object FloatField151: TFloatField
      FieldName = 'VENIT_NET11'
    end
    object FloatField152: TFloatField
      FieldName = 'DED_PERS11'
    end
    object FloatField153: TFloatField
      FieldName = 'DED_PERS_SUPLI11'
    end
    object FloatField154: TFloatField
      FieldName = 'TOTDREPT11'
    end
    object FloatField155: TFloatField
      FieldName = 'IMPOZIT11'
    end
    object FloatField156: TFloatField
      FieldName = 'CoefInd12'
    end
    object FloatField157: TFloatField
      FieldName = 'CoefPers12'
    end
    object FloatField158: TFloatField
      FieldName = 'VENIT_NET12'
    end
    object FloatField159: TFloatField
      FieldName = 'DED_PERS12'
    end
    object FloatField160: TFloatField
      FieldName = 'DED_PERS_SUPLI12'
    end
    object FloatField161: TFloatField
      FieldName = 'TOTDREPT12'
    end
    object FloatField162: TFloatField
      FieldName = 'IMPOZIT12'
    end
    object CDSPers2002VENIT_NET14: TFloatField
      FieldName = 'VENIT_NET14'
    end
    object CDSPers2002IMPOZIT14: TFloatField
      FieldName = 'IMPOZIT14'
    end
    object CDSPers2002IMPO_PR_VA1: TFloatField
      FieldName = 'IMPO_PR_VA1'
    end
    object CDSPers2002Fisa_rectif: TStringField
      FieldName = 'Fisa_rectif'
    end
    object CDSPers2002fisa_regul: TStringField
      FieldName = 'fisa_regul'
    end
    object CDSPers2002Invalid_I: TIntegerField
      FieldName = 'Invalid_I'
    end
    object CDSPers2002Invalid_II: TIntegerField
      FieldName = 'Invalid_II'
    end
    object CDSPers2002PR_VA1: TFloatField
      FieldName = 'PR_VA1'
    end
    object CDSPers2002PR_VA2: TFloatField
      FieldName = 'PR_VA2'
    end
    object CDSPers2002PR_VA3: TFloatField
      FieldName = 'PR_VA3'
    end
    object CDSPers2002PR_VA4: TFloatField
      FieldName = 'PR_VA4'
    end
    object CDSPers2002PR_VA5: TFloatField
      FieldName = 'PR_VA5'
    end
    object CDSPers2002PR_VA6: TFloatField
      FieldName = 'PR_VA6'
    end
    object CDSPers2002PR_VA7: TFloatField
      FieldName = 'PR_VA7'
    end
    object CDSPers2002PR_VA8: TFloatField
      FieldName = 'PR_VA8'
    end
    object CDSPers2002PR_VA9: TFloatField
      FieldName = 'PR_VA9'
    end
    object CDSPers2002PR_VA10: TFloatField
      FieldName = 'PR_VA10'
    end
    object CDSPers2002PR_VA11: TFloatField
      FieldName = 'PR_VA11'
    end
    object CDSPers2002PR_VA12: TFloatField
      FieldName = 'PR_VA12'
    end
    object CDSPers2002IMPO_PR_VA2: TFloatField
      FieldName = 'IMPO_PR_VA2'
    end
    object CDSPers2002IMPO_PR_VA3: TFloatField
      FieldName = 'IMPO_PR_VA3'
    end
    object CDSPers2002IMPO_PR_VA4: TFloatField
      FieldName = 'IMPO_PR_VA4'
    end
    object CDSPers2002IMPO_PR_VA5: TFloatField
      FieldName = 'IMPO_PR_VA5'
    end
    object CDSPers2002IMPO_PR_VA6: TFloatField
      FieldName = 'IMPO_PR_VA6'
    end
    object CDSPers2002IMPO_PR_VA7: TFloatField
      FieldName = 'IMPO_PR_VA7'
    end
    object CDSPers2002IMPO_PR_VA8: TFloatField
      FieldName = 'IMPO_PR_VA8'
    end
    object CDSPers2002IMPO_PR_VA9: TFloatField
      FieldName = 'IMPO_PR_VA9'
    end
    object CDSPers2002IMPO_PR_VA10: TFloatField
      FieldName = 'IMPO_PR_VA10'
    end
    object CDSPers2002IMPO_PR_VA11: TFloatField
      FieldName = 'IMPO_PR_VA11'
    end
    object CDSPers2002IMPO_PR_VA12: TFloatField
      FieldName = 'IMPO_PR_VA12'
    end
    object CDSPers2002CH_PROF1: TFloatField
      FieldName = 'CH_PROF1'
    end
    object CDSPers2002CH_PROF2: TFloatField
      FieldName = 'CH_PROF2'
    end
    object CDSPers2002CH_PROF3: TFloatField
      FieldName = 'CH_PROF3'
    end
    object CDSPers2002CH_PROF4: TFloatField
      FieldName = 'CH_PROF4'
    end
    object CDSPers2002CH_PROF5: TFloatField
      FieldName = 'CH_PROF5'
    end
    object CDSPers2002CH_PROF6: TFloatField
      FieldName = 'CH_PROF6'
    end
    object CDSPers2002CH_PROF7: TFloatField
      FieldName = 'CH_PROF7'
    end
    object CDSPers2002CH_PROF8: TFloatField
      FieldName = 'CH_PROF8'
    end
    object CDSPers2002CH_PROF9: TFloatField
      FieldName = 'CH_PROF9'
    end
    object CDSPers2002CH_PROF10: TFloatField
      FieldName = 'CH_PROF10'
    end
    object CDSPers2002CH_PROF11: TFloatField
      FieldName = 'CH_PROF11'
    end
    object CDSPers2002CH_PROF12: TFloatField
      FieldName = 'CH_PROF12'
    end
  end
  object CDSPint2002: TClientDataSet
    Aggregates = <>
    FieldDefs = <>
    IndexDefs = <>
    Params = <>
    StoreDefs = True
    Left = 200
    Top = 320
    object DateField13: TDateField
      FieldName = 'Luna'
    end
    object IntegerField16: TIntegerField
      FieldName = 'IID'
    end
    object StringField55: TStringField
      FieldName = 'CodAngaj'
      Size = 13
    end
    object StringField56: TStringField
      FieldName = 'Nume'
    end
    object StringField57: TStringField
      FieldName = 'Prenume'
      Size = 30
    end
    object StringField58: TStringField
      FieldName = 'CODNUMPERS'
      Size = 15
    end
    object IntegerField17: TIntegerField
      FieldName = 'Calitate'
    end
    object FloatField30: TFloatField
      FieldName = 'Coef1'
    end
    object FloatField163: TFloatField
      FieldName = 'Coef2'
    end
    object FloatField164: TFloatField
      FieldName = 'Coef3'
    end
    object FloatField165: TFloatField
      FieldName = 'Coef4'
    end
    object FloatField166: TFloatField
      FieldName = 'Coef5'
    end
    object FloatField167: TFloatField
      FieldName = 'Coef6'
    end
    object FloatField168: TFloatField
      FieldName = 'Coef7'
    end
    object FloatField169: TFloatField
      FieldName = 'Coef8'
    end
    object FloatField170: TFloatField
      FieldName = 'Coef9'
    end
    object FloatField171: TFloatField
      FieldName = 'Coef10'
    end
    object FloatField172: TFloatField
      FieldName = 'Coef11'
    end
    object FloatField173: TFloatField
      FieldName = 'Coef12'
    end
    object CDSPint2002Invalid2: TIntegerField
      FieldName = 'Invalid2'
    end
    object CDSPint2002Invalid1: TIntegerField
      FieldName = 'Invalid1'
    end
  end
  object qPerInt: TQuery
    SQL.Strings = (
      'select sum(Coef) as Coef from PInt '
      'where Luna =:Luna'
      '          and IId=:IId')
    Left = 324
    Top = 316
    ParamData = <
      item
        DataType = ftUnknown
        Name = 'Luna'
        ParamType = ptUnknown
      end
      item
        DataType = ftInteger
        Name = 'IId'
        ParamType = ptInput
      end>
  end
  object qAsigurati: TQuery
    OnCalcFields = qAsiguratiCalcFields
    SQL.Strings = (
      'select'
      '  P .IID, '
      '  P .Nume as NumeA,'
      '  P .Prenume as PrenumeA,'
      '   P .CodNumPers as CodNumPersA,'
      '   A .Nume ,'
      '   A .Prenume,'
      '   A .CodNumPers,'
      '   A .Calitate     '
      ''
      'from PInt  A'
      'left outer join Pers  P  on a.IID   = p.IID and p.luna =a.luna'
      'where A.luna =:Luna'
      'order by '
      '  A.Nume,A.Prenume'
      ' ')
    Left = 320
    Top = 184
    ParamData = <
      item
        DataType = ftDateTime
        Name = 'Luna'
        ParamType = ptInput
      end>
    object qAsiguratiiid: TIntegerField
      FieldName = 'iid'
      Visible = False
    end
    object qAsiguratiNume: TStringField
      FieldName = 'Nume'
    end
    object qAsiguratiPrenume: TStringField
      FieldName = 'Prenume'
    end
    object qAsiguratiCodNumPers: TStringField
      FieldName = 'CodNumPers'
    end
    object qAsiguratiNumeA: TStringField
      FieldName = 'NumeA'
    end
    object qAsiguratiPrenumeA: TStringField
      FieldName = 'PrenumeA'
    end
    object qAsiguratiCodNumPersA: TStringField
      FieldName = 'CodNumPersA'
    end
    object qAsiguratiCalitate: TIntegerField
      FieldName = 'Calitate'
    end
    object qAsiguratiKalitate: TStringField
      FieldKind = fkCalculated
      FieldName = 'Kalitate'
      Calculated = True
    end
  end
  object qPersAngajat: TQuery
    DatabaseName = '_DBFirma'
    SQL.Strings = (

        '  select distinct Marca, Nume, Prenume, CodNumPers, Functie , Da' +
        'ta_Ang '
      '    from Pers '
      ' where Data_Ang <= :DataFin  and Data_Ang >= :DataInit'
      'order by Marca')
    Left = 404
    Top = 100
    ParamData = <
      item
        DataType = ftDate
        Name = 'DataFin'
        ParamType = ptInput
      end
      item
        DataType = ftDate
        Name = 'DataInit'
        ParamType = ptInput
      end>
    object qPersAngajatMarca: TIntegerField
      FieldName = 'Marca'
    end
    object qPersAngajatNume: TStringField
      FieldName = 'Nume'
    end
    object qPersAngajatPrenume: TStringField
      FieldName = 'Prenume'
      Size = 30
    end
    object qPersAngajatCodNumPers: TStringField
      FieldName = 'CodNumPers'
    end
    object qPersAngajatFunctie: TStringField
      FieldName = 'Functie'
    end
    object qPersAngajatData_Ang: TDateField
      FieldName = 'Data_Ang'
    end
  end
  object qPersLichidat: TQuery
    DatabaseName = '_DBFirma'
    SQL.Strings = (

        '  select distinct Marca, Nume, Prenume, CodNumPers, Functie , Da' +
        'ta_Lich '
      '    from Pers '
      'where Data_Lich <= :DataFin  and Data_Lich >= :DataInit'
      'order by Marca')
    Left = 412
    Top = 180
    ParamData = <
      item
        DataType = ftDate
        Name = 'DataFin'
        ParamType = ptInput
      end
      item
        DataType = ftDate
        Name = 'DataInit'
        ParamType = ptInput
      end>
    object qPersLichidatMarca: TIntegerField
      FieldName = 'Marca'
    end
    object qPersLichidatNume: TStringField
      FieldName = 'Nume'
    end
    object qPersLichidatPrenume: TStringField
      FieldName = 'Prenume'
      Size = 30
    end
    object qPersLichidatCodNumPers: TStringField
      FieldName = 'CodNumPers'
    end
    object qPersLichidatFunctie: TStringField
      FieldName = 'Functie'
    end
    object qPersLichidatData_Ang: TDateField
      FieldName = 'Data_Lich'
    end
  end
  object qLegitimatii: TQuery
    DatabaseName = '_DBFirma'
    SQL.Strings = (
      '  select distinct  IID, Marca, Nume, Prenume, CodNumPers'
      '     from Pers'
      'where Luna = :Luna'
      'order by IID')
    Left = 404
    Top = 248
    ParamData = <
      item
        DataType = ftDate
        Name = 'Luna'
        ParamType = ptInput
      end>
    object qLegitimatiiIID: TIntegerField
      FieldName = 'IID'
      Visible = False
    end
    object qLegitimatiiMatrca: TIntegerField
      FieldName = 'Marca'
    end
    object qLegitimatiiNume: TStringField
      FieldName = 'Nume'
    end
    object qLegitimatiiPrenume: TStringField
      FieldName = 'Prenume'
      Size = 30
    end
    object qLegitimatiiCodNumPers: TStringField
      FieldName = 'CodNumPers'
    end
  end
  object qSitCMLuna: TQuery
    SQL.Strings = (
      'select'
      #9'Nr,'
      #9'Nume,'
      #9'Prenume,'
      #9'Functie,'
      #9'Zile_CM,'
      #9'CM1L,'
      #9'CM2L'
      'from Pers'
      'where (Luna = :Luna)'
      #9'and ((Zile_CM<>0) or'
      #9#9#9' (CM1L<>0)    or'
      #9#9#9' (CM2L<>0)'
      #9#9#9')'
      ''
      'order by Nume, Prenume'
      ' '
      ' '
      ' ')
    Left = 136
    Top = 168
    ParamData = <
      item
        DataType = ftDateTime
        Name = 'Luna'
        ParamType = ptInput
      end>
  end
  object qSitCOLuna: TQuery
    SQL.Strings = (
      'select'
      #9'Nr,'
      #9'Nume,'
      #9'Prenume,'
      #9'Functie,'
      #9'Zile_CO,'
      #9'Suma_Zile_CO'
      'from Pers'
      'where (Luna = :Luna)'
      #9'and ((Zile_CO<>0) or'
      #9#9#9' (Suma_Zile_CO<>0)'
      #9#9#9')'
      'order by Nume, Prenume'
      ' '
      ' '
      ' ')
    Left = 184
    Top = 188
    ParamData = <
      item
        DataType = ftDateTime
        Name = 'Luna'
        ParamType = ptInput
      end>
  end
  object qPersSanat: TQuery
    OnCalcFields = qPersSanatCalcFields
    SQL.Strings = (

        '  select distinct  Nume, Prenume, CodNumPers, Data_Ang , Zile_CI' +
        'C, Timp'
      '    from Pers '
      ' where Data_Ang <= :DataFin  and Data_Ang >= :DataInit'
      'order by Nume, Prenume')
    Left = 464
    Top = 32
    ParamData = <
      item
        DataType = ftDate
        Name = 'DataFin'
        ParamType = ptInput
      end
      item
        DataType = ftDate
        Name = 'DataInit'
        ParamType = ptInput
      end>
    object qPersSanatNume: TStringField
      FieldName = 'Nume'
      Origin = 'SAL5."Pers.DB".NUME'
    end
    object qPersSanatPrenume: TStringField
      FieldName = 'Prenume'
      Origin = 'SAL5."Pers.DB".PRENUME'
      Size = 30
    end
    object qPersSanatCodNumPers: TStringField
      FieldName = 'CodNumPers'
      Origin = 'SAL5."Pers.DB".CODNUMPERS'
      Size = 15
    end
    object qPersSanatData_Ang: TDateField
      FieldName = 'Data_Ang'
      Origin = 'SAL5."Pers.DB".DATA_ANG'
    end
    object qPersSanatZile_CIC: TSmallintField
      FieldName = 'Zile_CIC'
      Origin = 'SAL5."Pers.DB".ZILE_CIC'
    end
    object qPersSanatTimp: TFloatField
      FieldName = 'Timp'
      Origin = 'SAL5."Pers.DB".TIMP'
    end
    object qPersSanatCategoria: TStringField
      FieldKind = fkCalculated
      FieldName = 'Categoria'
      Calculated = True
    end
    object qPersSanatTipAng: TStringField
      FieldName = 'Tip'
      Size = 1
    end
  end
  object cdsVerifTimp: TClientDataSet
    Aggregates = <>
    Params = <>
    Left = 476
    Top = 332
    object cdsVerifTimpNrCrt: TIntegerField
      DisplayWidth = 4
      FieldName = 'NrCrt'
    end
    object cdsVerifTimpNume: TStringField
      FieldName = 'Nume'
    end
    object cdsVerifTimpPrenume: TStringField
      FieldName = 'Prenume'
    end
    object cdsVerifTimpTimp: TFloatField
      FieldName = 'Timp'
    end
    object cdsVerifTimpZile_CO: TFloatField
      DisplayWidth = 6
      FieldName = 'Zile_CO'
    end
    object cdsVerifTimpZile_CM: TFloatField
      DisplayWidth = 6
      FieldName = 'Zile_CM'
    end
    object cdsVerifTimpZile_CIC: TFloatField
      DisplayWidth = 6
      FieldName = 'Zile_CIC'
    end
    object cdsVerifTimpZile_FP: TFloatField
      DisplayWidth = 6
      FieldName = 'Zile_FP'
    end
    object cdsVerifTimpTimpCalculat: TFloatField
      DisplayWidth = 8
      FieldName = 'TimpCalculat'
    end
  end
  object cdsVerifCNP: TClientDataSet
    Aggregates = <>
    Params = <>
    Left = 424
    Top = 296
    object IntegerField15: TIntegerField
      DisplayWidth = 4
      FieldName = 'NrCrt'
    end
    object StringField59: TStringField
      FieldName = 'Nume'
    end
    object StringField60: TStringField
      FieldName = 'Prenume'
    end
    object cdsVerifCNPCNP: TStringField
      FieldName = 'CNP'
      Size = 13
    end
    object cdsVerifCNPEroare: TStringField
      DisplayWidth = 100
      FieldName = 'Eroare'
      Size = 200
    end
  end
  object cdsVerifCoef: TClientDataSet
    Aggregates = <>
    Params = <>
    Left = 476
    Top = 284
    object IntegerField18: TIntegerField
      DisplayWidth = 4
      FieldName = 'NrCrt'
    end
    object StringField61: TStringField
      FieldName = 'Nume'
    end
    object StringField62: TStringField
      FieldName = 'Prenume'
    end
    object cdsVerifCoefCoef_Ind_C: TFloatField
      FieldName = 'Coef_Ind_C'
    end
    object cdsVerifCoefCoefCalculat: TFloatField
      FieldName = 'CoefCalculat'
    end
  end
  object qPersInt: TQuery
    SQL.Strings = (

        'select sum(coef) as SumCoef from Pint where Luna=:Luna and IID=:' +
        'IID')
    Left = 424
    Top = 344
    ParamData = <
      item
        DataType = ftDateTime
        Name = 'Luna'
        ParamType = ptInput
      end
      item
        DataType = ftInteger
        Name = 'IID'
        ParamType = ptInput
      end>
  end
  object qCentrSal: TQuery
    OnCalcFields = qCentrSalCalcFields
    DatabaseName = '_DBSal4'
    SQL.Strings = (
      'select Count(Nume)       as Nr      ,'
      #9#9#9'Sum(SalInc)        as SalInc  ,'
      #9#9#9'Sum(Val_timp_S)    as ValOreS ,'
      #9#9#9'Sum(Suma_t_noapte) as ValOreN ,'
      #9#9#9'Sum(Vals1)         as Vals1   ,'
      #9#9#9'Sum(Vals2)         as Vals2   ,'
      #9#9#9'Sum(Vals3)         as Vals3   ,'
      #9#9#9'Sum(Vals4)         as Vals4   ,'
      #9#9#9'Sum(CM1L)          as CM1L    ,'
      #9#9#9'Sum(CM2L)          as CM2L    ,'
      #9#9#9'Sum(CIC)           as CIC     ,'
      #9#9#9'Sum(Prime)         as Prime   ,'
      #9#9#9'Sum(Alte_Sume)     as Alte_Sume,'
      #9#9#9'Sum(SPORURI)       as SPORURI ,'
      #9#9#9'Sum(Pr_va)         as Pr_va    ,'
      #9#9#9'Sum(Suma_Zile_CO)  as Suma_Zile_CO,'
      #9#9#9'Sum(Dif_Brut)      as Dif_Brut    ,'
      #9#9#9'Sum(BRUT)          as BRUT        ,'
      #9#9#9'Sum(SumeExcept)    as SumeExcept  ,'
      #9#9#9'Sum(Pensie)        as Pensie      ,'
      #9#9#9'Sum(Sanatate)      as Sanatate    ,'
      #9#9#9'Sum(Somaj)         as Somaj       ,'
      #9#9#9'Sum(Impozit)       as Impozit     ,'
      #9#9#9'Sum(Avans)         as Avans       ,'
      #9#9#9'Sum(Avans_Co)      as AvansCO     ,'
      #9#9#9'Sum(Alte_Ret)      as  Alte_Ret   ,'
      #9#9#9'Sum(Popriri)       as Popriri     ,'
      #9#9#9'Sum(Garantii)      as Garantii    ,'
      #9#9#9'Sum(Retineri)      as Retineri    ,'
      #9#9#9'Sum(Prime_Incasate) as  Prime_Incasate,'
      '      SUM(RestPL)         as TotalPL'
      ''
      ''
      'from Pers'
      'where Luna= :Luna'
      ' '
      ' '
      ' '
      ' '
      ' '
      ' '
      ' '
      ' '
      ' '
      ' '
      ' '
      ' '
      ' ')
    Left = 328
    Top = 244
    ParamData = <
      item
        DataType = ftDateTime
        Name = 'Luna'
        ParamType = ptInput
      end>
    object qCentrSalNr: TIntegerField
      FieldName = 'Nr'
      Origin = '_DBSAL4."Pers.DB".NUME'
    end
    object qCentrSalSalInc: TFloatField
      FieldName = 'SalInc'
      Origin = '_DBSAL4."Pers.DB".SALINC'
    end
    object qCentrSalValOreS: TFloatField
      FieldName = 'ValOreS'
      Origin = '_DBSAL4."Pers.DB".VAL_TIMP_S'
    end
    object qCentrSalValOreN: TFloatField
      FieldName = 'ValOreN'
      Origin = '_DBSAL4."Pers.DB".SUMA_T_NOAPTE'
    end
    object qCentrSalVals1: TFloatField
      FieldName = 'Vals1'
      Origin = '_DBSAL4."Pers.DB".vals1'
    end
    object qCentrSalVals2: TFloatField
      FieldName = 'Vals2'
      Origin = '_DBSAL4."Pers.DB".vals2'
    end
    object qCentrSalVals3: TFloatField
      FieldName = 'Vals3'
      Origin = '_DBSAL4."Pers.DB".vals3'
    end
    object qCentrSalVals4: TFloatField
      FieldName = 'Vals4'
      Origin = '_DBSAL4."Pers.DB".vals4'
    end
    object qCentrSalCM1L: TFloatField
      FieldName = 'CM1L'
      Origin = '_DBSAL4."Pers.DB".CM1L'
    end
    object qCentrSalCM2L: TFloatField
      FieldName = 'CM2L'
      Origin = '_DBSAL4."Pers.DB".CM2L'
    end
    object qCentrSalCIC: TFloatField
      FieldName = 'CIC'
      Origin = '_DBSAL4."Pers.DB".CIC'
    end
    object qCentrSalPrime: TFloatField
      FieldName = 'Prime'
      Origin = '_DBSAL4."Pers.DB".PRIME'
    end
    object qCentrSalAlte_Sume: TFloatField
      FieldName = 'Alte_Sume'
      Origin = '_DBSAL4."Pers.DB".ALTE_SUME'
    end
    object qCentrSalSPORURI: TFloatField
      FieldName = 'SPORURI'
      Origin = '_DBSAL4."Pers.DB".SPORURI'
    end
    object qCentrSalPr_va: TFloatField
      FieldName = 'Pr_va'
      Origin = '_DBSAL4."Pers.DB".pr_va'
    end
    object qCentrSalSuma_Zile_CO: TFloatField
      FieldName = 'Suma_Zile_CO'
      Origin = '_DBSAL4."Pers.DB".SUMA_ZILE_CO'
    end
    object qCentrSalDif_Brut: TFloatField
      FieldName = 'Dif_Brut'
      Origin = '_DBSAL4."Pers.DB".Dif_Brut'
    end
    object qCentrSalBRUT: TFloatField
      FieldName = 'BRUT'
      Origin = '_DBSAL4."Pers.DB".BRUT'
    end
    object qCentrSalSumeExcept: TFloatField
      FieldName = 'SumeExcept'
      Origin = '_DBSAL4."Pers.DB".SumeExcept'
    end
    object qCentrSalPensie: TFloatField
      FieldName = 'Pensie'
      Origin = '_DBSAL4."Pers.DB".PENSIE'
    end
    object qCentrSalSanatate: TFloatField
      FieldName = 'Sanatate'
      Origin = '_DBSAL4."Pers.DB".SANATATE'
    end
    object qCentrSalSomaj: TFloatField
      FieldName = 'Somaj'
      Origin = '_DBSAL4."Pers.DB".SOMAJ'
    end
    object qCentrSalImpozit: TFloatField
      FieldName = 'Impozit'
      Origin = '_DBSAL4."Pers.DB".IMPOZIT'
    end
    object qCentrSalAvans: TFloatField
      FieldName = 'Avans'
      Origin = '_DBSAL4."Pers.DB".AVANS'
    end
    object qCentrSalAvansCO: TFloatField
      FieldName = 'AvansCO'
      Origin = '_DBSAL4."Pers.DB".AVANS_CO'
    end
    object qCentrSalAlte_Ret: TFloatField
      FieldName = 'Alte_Ret'
      Origin = '_DBSAL4."Pers.DB".ALTE_RET'
    end
    object qCentrSalPopriri: TFloatField
      FieldName = 'Popriri'
      Origin = '_DBSAL4."Pers.DB".POPRIRI'
    end
    object qCentrSalGarantii: TFloatField
      FieldName = 'Garantii'
      Origin = '_DBSAL4."Pers.DB".GARANTII'
    end
    object qCentrSalRetineri: TFloatField
      FieldName = 'Retineri'
      Origin = '_DBSAL4."Pers.DB".RETINERI'
    end
    object qCentrSalPrime_Incasate: TFloatField
      FieldName = 'Prime_Incasate'
      Origin = '_DBSAL4."Pers.DB".PRIME_INCASATE'
    end
    object qCentrSalTotalPL: TFloatField
      FieldName = 'TotalPL'
      Origin = '_DBSAL4."Pers.DB".RESTPL'
    end
    object qCentrSalBrutCalc: TFloatField
      FieldKind = fkCalculated
      FieldName = 'BrutCalc'
      Calculated = True
    end
    object qCentrSalRestPL: TFloatField
      FieldKind = fkCalculated
      FieldName = 'RestPL'
      Calculated = True
    end
  end
end