commit 024b3774f3b9e323ffc40e5e7e420eaa8cae3905 Author: jdg Date: Sun Sep 12 20:57:41 2021 +0200 First commit ~0,10 diff --git a/README.md b/README.md new file mode 100644 index 0000000..c311916 --- /dev/null +++ b/README.md @@ -0,0 +1,9 @@ +#erecibos + + +*~0,10* + +ToDo: wwtcf? + + +![screenshot](/erecibos.png "Screenshot") diff --git a/bin/datos/datos.rar b/bin/datos/datos.rar new file mode 100644 index 0000000..3b756de Binary files /dev/null and b/bin/datos/datos.rar differ diff --git a/bin/datos/recibos.DB b/bin/datos/recibos.DB new file mode 100644 index 0000000..3f69dbf Binary files /dev/null and b/bin/datos/recibos.DB differ diff --git a/bin/datos/recibos.PX b/bin/datos/recibos.PX new file mode 100644 index 0000000..4c32922 Binary files /dev/null and b/bin/datos/recibos.PX differ diff --git a/bin/datos/recibos.VAL b/bin/datos/recibos.VAL new file mode 100644 index 0000000..01c4a27 Binary files /dev/null and b/bin/datos/recibos.VAL differ diff --git a/bin/datos/recibos.XG0 b/bin/datos/recibos.XG0 new file mode 100644 index 0000000..861cc77 Binary files /dev/null and b/bin/datos/recibos.XG0 differ diff --git a/bin/datos/recibos.YG0 b/bin/datos/recibos.YG0 new file mode 100644 index 0000000..66a7f8c Binary files /dev/null and b/bin/datos/recibos.YG0 differ diff --git a/bin/erecibos.exe b/bin/erecibos.exe new file mode 100644 index 0000000..7a40798 Binary files /dev/null and b/bin/erecibos.exe differ diff --git a/erecibos.rar b/erecibos.rar new file mode 100644 index 0000000..cdbe773 Binary files /dev/null and b/erecibos.rar differ diff --git a/historial.txt b/historial.txt new file mode 100644 index 0000000..4ab22b3 --- /dev/null +++ b/historial.txt @@ -0,0 +1,20 @@ +eRecibos (Emisor de Recibos) + +07-jul-2002 + 21:08 Listado de recibos + Recibo Simple + 22:01 Solo queda imprimir los recibos auto-generados + y ver si encajan bien en la factura... + + +06-jul-2002 + 17:29 Comienzo el esqueleto básico del programa + 19:40 Diseño de la interfaz + Creacion de la tabla "recibos" + Traduccion de números a texto + + 19:51 Cont... + 20:30 fin + + 23:00 + 23:40 diff --git a/src/QrRecibos.cpp b/src/QrRecibos.cpp new file mode 100644 index 0000000..2156750 --- /dev/null +++ b/src/QrRecibos.cpp @@ -0,0 +1,17 @@ +//--------------------------------------------------------------------- +#include +#pragma hdrstop + +#include "QrRecibos.h" +//--------------------------------------------------------------------- +#pragma resource "*.dfm" +TQRListRecibos *QRListRecibos; +//--------------------------------------------------------------------- +__fastcall TQRListRecibos::TQRListRecibos(TComponent* AOwner) + : TForm(AOwner) +{ +} +//--------------------------------------------------------------------- + + + diff --git a/src/QrRecibos.dfm b/src/QrRecibos.dfm new file mode 100644 index 0000000..30e04c9 Binary files /dev/null and b/src/QrRecibos.dfm differ diff --git a/src/QrRecibos.h b/src/QrRecibos.h new file mode 100644 index 0000000..ea233dc --- /dev/null +++ b/src/QrRecibos.h @@ -0,0 +1,51 @@ +//---------------------------------------------------------------------------- +#ifndef QrRecibosH +#define QrRecibosH +//---------------------------------------------------------------------------- +#include +#include +#include +#include +#include +#include +#include +#include +#include +#include +#include +#include +#include +#include +#include +#include +//---------------------------------------------------------------------------- +class TQRListRecibos : public TForm +{ +__published: + TQuickRep *QuickRep1; + TTable *MasterTable; + TQRBand *DetailBand1; + TQRBand *PageFooterBand1; + TQRBand *TitleBand1; + TQRBand *ColumnHeaderBand1; + TQRSysData *QRSysData1; + TQRLabel *QRLabel1; + TQRLabel *QRLabel3; + TQRLabel *QRLabel4; + TQRLabel *QRLabel5; + TQRLabel *QRLabel6; + TQRDBText *QRDBText1; + TQRDBText *QRDBText3; + TQRDBText *QRDBText4; + TQRDBText *QRDBText5; + TQRExpr *QRExpr1; + TQRLabel *QRLabel2; + TQRExpr *QRExpr2; +private: +public: + virtual __fastcall TQRListRecibos(TComponent* AOwner); +}; +//---------------------------------------------------------------------------- +extern PACKAGE TQRListRecibos *QRListRecibos; +//---------------------------------------------------------------------------- +#endif diff --git a/src/QrUnRecibo.cpp b/src/QrUnRecibo.cpp new file mode 100644 index 0000000..50a96e4 --- /dev/null +++ b/src/QrUnRecibo.cpp @@ -0,0 +1,18 @@ +//--------------------------------------------------------------------------- + +#include +#pragma hdrstop + +#include "QrUnRecibo.h" +#include "main.h" +//--------------------------------------------------------------------------- +#pragma package(smart_init) +#pragma resource "*.dfm" +TQrRecibo *QrRecibo; +//--------------------------------------------------------------------------- +__fastcall TQrRecibo::TQrRecibo(TComponent* Owner) + : TForm(Owner) +{ +} +//--------------------------------------------------------------------------- + diff --git a/src/QrUnRecibo.dfm b/src/QrUnRecibo.dfm new file mode 100644 index 0000000..4607992 --- /dev/null +++ b/src/QrUnRecibo.dfm @@ -0,0 +1,482 @@ +object QrRecibo: TQrRecibo + Left = 220 + Top = 263 + Width = 870 + Height = 540 + Caption = 'QrRecibo' + Color = clBtnFace + Font.Charset = DEFAULT_CHARSET + Font.Color = clWindowText + Font.Height = -16 + Font.Name = 'MS Sans Serif' + Font.Style = [] + OldCreateOrder = False + Scaled = False + PixelsPerInch = 96 + TextHeight = 20 + object QuickRep1: TQuickRep + Left = 0 + Top = 0 + Width = 794 + Height = 1123 + Frame.Color = clBlack + Frame.DrawTop = False + Frame.DrawBottom = False + Frame.DrawLeft = False + Frame.DrawRight = False + Font.Charset = DEFAULT_CHARSET + Font.Color = clWindowText + Font.Height = -16 + Font.Name = 'Courier New' + Font.Style = [fsBold] + Functions.Strings = ( + 'PAGENUMBER' + 'COLUMNNUMBER' + 'REPORTTITLE') + Functions.DATA = ( + '0' + '0' + #39#39) + Options = [FirstPageHeader, LastPageFooter] + Page.Columns = 1 + Page.Orientation = poPortrait + Page.PaperSize = A4 + Page.Values = ( + 100 + 2970 + 100 + 2100 + 100 + 100 + 0) + PrinterSettings.Copies = 1 + PrinterSettings.Duplex = False + PrinterSettings.FirstPage = 0 + PrinterSettings.LastPage = 0 + PrinterSettings.OutputBin = Auto + PrintIfEmpty = True + ReportTitle = 'ReciboIndividual' + SnapToGrid = True + Units = MM + Zoom = 100 + object QRBand1: TQRBand + Left = 38 + Top = 38 + Width = 718 + Height = 378 + Frame.Color = clBlack + Frame.DrawTop = False + Frame.DrawBottom = False + Frame.DrawLeft = False + Frame.DrawRight = False + AlignToBottom = False + Color = clWhite + Font.Charset = DEFAULT_CHARSET + Font.Color = clWindowText + Font.Height = -13 + Font.Name = 'Courier New' + Font.Style = [] + ForceNewColumn = False + ForceNewPage = False + ParentFont = False + Size.Values = ( + 1000.125 + 1899.70833333333) + BandType = rbTitle + object QRDBText1: TQRDBText + Left = 198 + Top = 0 + Width = 21 + Height = 19 + Frame.Color = clBlack + Frame.DrawTop = False + Frame.DrawBottom = False + Frame.DrawLeft = False + Frame.DrawRight = False + Size.Values = ( + 50.2708333333333 + 523.875 + 0 + 55.5625) + Alignment = taRightJustify + AlignToBand = False + AutoSize = True + AutoStretch = False + Color = clWhite + DataSet = eRecibos.TbRecibos + DataField = 'Id' + Font.Charset = DEFAULT_CHARSET + Font.Color = clWindowText + Font.Height = -16 + Font.Name = 'Courier New' + Font.Style = [fsBold] + ParentFont = False + Transparent = False + WordWrap = True + FontSize = 12 + end + object QRDBText2: TQRDBText + Left = 227 + Top = 0 + Width = 129 + Height = 19 + Frame.Color = clBlack + Frame.DrawTop = False + Frame.DrawBottom = False + Frame.DrawLeft = False + Frame.DrawRight = False + Size.Values = ( + 50.2708333333333 + 600.604166666667 + 0 + 341.3125) + Alignment = taLeftJustify + AlignToBand = False + AutoSize = True + AutoStretch = False + Color = clWhite + DataSet = eRecibos.TbRecibos + DataField = 'LugarLibramiento' + Transparent = False + WordWrap = True + FontSize = 10 + end + object QRDBText3: TQRDBText + Left = 583 + Top = 0 + Width = 71 + Height = 19 + Frame.Color = clBlack + Frame.DrawTop = False + Frame.DrawBottom = False + Frame.DrawLeft = False + Frame.DrawRight = False + Size.Values = ( + 50.2708333333333 + 1542.52083333333 + 0 + 187.854166666667) + Alignment = taRightJustify + AlignToBand = False + AutoSize = True + AutoStretch = False + Color = clWhite + DataSet = eRecibos.TbRecibos + DataField = 'Importe' + Font.Charset = DEFAULT_CHARSET + Font.Color = clWindowText + Font.Height = -16 + Font.Name = 'Courier New' + Font.Style = [fsBold] + ParentFont = False + Transparent = False + WordWrap = True + FontSize = 12 + end + object QRDBText4: TQRDBText + Left = 113 + Top = 38 + Width = 129 + Height = 19 + Frame.Color = clBlack + Frame.DrawTop = False + Frame.DrawBottom = False + Frame.DrawLeft = False + Frame.DrawRight = False + Size.Values = ( + 50.2708333333333 + 298.979166666667 + 100.541666666667 + 341.3125) + Alignment = taLeftJustify + AlignToBand = False + AutoSize = True + AutoStretch = False + Color = clWhite + DataSet = eRecibos.TbRecibos + DataField = 'FechaLibramiento' + Transparent = False + WordWrap = True + FontSize = 10 + end + object QRDBText5: TQRDBText + Left = 378 + Top = 38 + Width = 111 + Height = 19 + Frame.Color = clBlack + Frame.DrawTop = False + Frame.DrawBottom = False + Frame.DrawLeft = False + Frame.DrawRight = False + Size.Values = ( + 50.2708333333333 + 1000.125 + 100.541666666667 + 293.6875) + Alignment = taLeftJustify + AlignToBand = False + AutoSize = True + AutoStretch = False + Color = clWhite + DataSet = eRecibos.TbRecibos + DataField = 'Vencimiento' + Font.Charset = DEFAULT_CHARSET + Font.Color = clWindowText + Font.Height = -16 + Font.Name = 'Courier New' + Font.Style = [fsBold] + ParentFont = False + Transparent = False + WordWrap = True + FontSize = 12 + end + object QRDBText6: TQRDBText + Left = 113 + Top = 76 + Width = 49 + Height = 19 + Frame.Color = clBlack + Frame.DrawTop = False + Frame.DrawBottom = False + Frame.DrawLeft = False + Frame.DrawRight = False + Size.Values = ( + 50.2708333333333 + 298.979166666667 + 201.083333333333 + 129.645833333333) + Alignment = taLeftJustify + AlignToBand = False + AutoSize = True + AutoStretch = False + Color = clWhite + DataSet = eRecibos.TbRecibos + DataField = 'PagarA' + Transparent = False + WordWrap = True + FontSize = 10 + end + object QRDBText7: TQRDBText + Left = 246 + Top = 102 + Width = 101 + Height = 19 + Frame.Color = clBlack + Frame.DrawTop = False + Frame.DrawBottom = False + Frame.DrawLeft = False + Frame.DrawRight = False + Size.Values = ( + 50.2708333333333 + 650.875 + 269.875 + 267.229166666667) + Alignment = taLeftJustify + AlignToBand = False + AutoSize = True + AutoStretch = False + Color = clWhite + DataSet = eRecibos.TbRecibos + DataField = 'ImporteTXT' + Font.Charset = DEFAULT_CHARSET + Font.Color = clWindowText + Font.Height = -16 + Font.Name = 'Courier New' + Font.Style = [fsBold] + ParentFont = False + Transparent = False + WordWrap = True + FontSize = 12 + end + object QRDBText8: TQRDBText + Left = 246 + Top = 129 + Width = 141 + Height = 19 + Frame.Color = clBlack + Frame.DrawTop = False + Frame.DrawBottom = False + Frame.DrawLeft = False + Frame.DrawRight = False + Size.Values = ( + 50.2708333333333 + 650.875 + 341.3125 + 373.0625) + Alignment = taLeftJustify + AlignToBand = False + AutoSize = True + AutoStretch = False + Color = clWhite + DataSet = eRecibos.TbRecibos + DataField = 'ImporteTXTcent' + Font.Charset = DEFAULT_CHARSET + Font.Color = clWindowText + Font.Height = -16 + Font.Name = 'Courier New' + Font.Style = [fsBold] + ParentFont = False + Transparent = False + WordWrap = True + FontSize = 12 + end + object QRDBText9: TQRDBText + Left = 246 + Top = 159 + Width = 113 + Height = 19 + Frame.Color = clBlack + Frame.DrawTop = False + Frame.DrawBottom = False + Frame.DrawLeft = False + Frame.DrawRight = False + Size.Values = ( + 50.2708333333333 + 650.875 + 420.6875 + 298.979166666667) + Alignment = taLeftJustify + AlignToBand = False + AutoSize = True + AutoStretch = False + Color = clWhite + DataSet = eRecibos.TbRecibos + DataField = 'PersonaEntidad' + Transparent = False + WordWrap = True + FontSize = 10 + end + object QRDBText10: TQRDBText + Left = 246 + Top = 174 + Width = 73 + Height = 19 + Frame.Color = clBlack + Frame.DrawTop = False + Frame.DrawBottom = False + Frame.DrawLeft = False + Frame.DrawRight = False + Size.Values = ( + 50.2708333333333 + 650.875 + 460.375 + 193.145833333333) + Alignment = taLeftJustify + AlignToBand = False + AutoSize = True + AutoStretch = False + Color = clWhite + DataSet = eRecibos.TbRecibos + DataField = 'Domicilio' + Transparent = False + WordWrap = True + FontSize = 10 + end + object QRDBText11: TQRDBText + Left = 510 + Top = 174 + Width = 33 + Height = 19 + Frame.Color = clBlack + Frame.DrawTop = False + Frame.DrawBottom = False + Frame.DrawLeft = False + Frame.DrawRight = False + Size.Values = ( + 50.2708333333333 + 1349.375 + 460.375 + 87.3125) + Alignment = taLeftJustify + AlignToBand = False + AutoSize = True + AutoStretch = False + Color = clWhite + DataSet = eRecibos.TbRecibos + DataField = 'Csuc' + Transparent = False + WordWrap = True + FontSize = 10 + end + object QRDBText12: TQRDBText + Left = 510 + Top = 159 + Width = 33 + Height = 19 + Frame.Color = clBlack + Frame.DrawTop = False + Frame.DrawBottom = False + Frame.DrawLeft = False + Frame.DrawRight = False + Size.Values = ( + 50.2708333333333 + 1349.375 + 420.6875 + 87.3125) + Alignment = taLeftJustify + AlignToBand = False + AutoSize = True + AutoStretch = False + Color = clWhite + DataSet = eRecibos.TbRecibos + DataField = 'Cent' + Transparent = False + WordWrap = True + FontSize = 10 + end + object QRDBText13: TQRDBText + Left = 643 + Top = 174 + Width = 25 + Height = 19 + Frame.Color = clBlack + Frame.DrawTop = False + Frame.DrawBottom = False + Frame.DrawLeft = False + Frame.DrawRight = False + Size.Values = ( + 50.2708333333333 + 1701.27083333333 + 460.375 + 66.1458333333333) + Alignment = taLeftJustify + AlignToBand = False + AutoSize = True + AutoStretch = False + Color = clWhite + DataSet = eRecibos.TbRecibos + DataField = 'Cdc' + Transparent = False + WordWrap = True + FontSize = 10 + end + object QRDBText14: TQRDBText + Left = 510 + Top = 189 + Width = 33 + Height = 19 + Frame.Color = clBlack + Frame.DrawTop = False + Frame.DrawBottom = False + Frame.DrawLeft = False + Frame.DrawRight = False + Size.Values = ( + 50.2708333333333 + 1349.375 + 500.0625 + 87.3125) + Alignment = taLeftJustify + AlignToBand = False + AutoSize = True + AutoStretch = False + Color = clWhite + DataSet = eRecibos.TbRecibos + DataField = 'Cnum' + Transparent = False + WordWrap = True + FontSize = 10 + end + end + end +end diff --git a/src/QrUnRecibo.h b/src/QrUnRecibo.h new file mode 100644 index 0000000..0b50ced --- /dev/null +++ b/src/QrUnRecibo.h @@ -0,0 +1,42 @@ +//--------------------------------------------------------------------------- + +#ifndef QrUnReciboH +#define QrUnReciboH +//--------------------------------------------------------------------------- +#include +#include +#include +#include +#include +#include +#include +#include +#include +//--------------------------------------------------------------------------- +class TQrRecibo : public TForm +{ +__published: // IDE-managed Components + TQuickRep *QuickRep1; + TQRBand *QRBand1; + TQRDBText *QRDBText1; + TQRDBText *QRDBText2; + TQRDBText *QRDBText3; + TQRDBText *QRDBText4; + TQRDBText *QRDBText5; + TQRDBText *QRDBText6; + TQRDBText *QRDBText7; + TQRDBText *QRDBText8; + TQRDBText *QRDBText9; + TQRDBText *QRDBText10; + TQRDBText *QRDBText11; + TQRDBText *QRDBText12; + TQRDBText *QRDBText13; + TQRDBText *QRDBText14; +private: // User declarations +public: // User declarations + __fastcall TQrRecibo(TComponent* Owner); +}; +//--------------------------------------------------------------------------- +extern PACKAGE TQrRecibo *QrRecibo; +//--------------------------------------------------------------------------- +#endif diff --git a/src/eFijarVencimientos.cpp b/src/eFijarVencimientos.cpp new file mode 100644 index 0000000..d952e8c --- /dev/null +++ b/src/eFijarVencimientos.cpp @@ -0,0 +1,76 @@ +//--------------------------------------------------------------------------- + +#include +#pragma hdrstop + +#include "eFijarVencimientos.h" +#include "main.h" +//--------------------------------------------------------------------------- +#pragma package(smart_init) +#pragma resource "*.dfm" +TfijarVencimientos *fijarVencimientos; +//--------------------------------------------------------------------------- +__fastcall TfijarVencimientos::TfijarVencimientos(TComponent* Owner) + : TForm(Owner) +{ + DateTimePicker1->Date = eRecibos->TbRecibos->FieldByName("Vencimiento")->AsDateTime; +} +//--------------------------------------------------------------------------- +void __fastcall TfijarVencimientos::BitBtn2Click(TObject *Sender) +{ + eRecibos->TbRecibos->Cancel(); + Close(); +} +//--------------------------------------------------------------------------- +void __fastcall TfijarVencimientos::DateTimePicker1Change(TObject *Sender) +{ + ReCalcularVencimientos(); +} +//--------------------------------------------------------------------------- +void __fastcall TfijarVencimientos::Edit1Change(TObject *Sender) +{ + // Fijamos el nuevo número de filas + try { + StringGrid1->RowCount = Edit1->Text.ToInt(); + ReCalcularVencimientos(); + } catch(...) { + //nothing + } +} +//--------------------------------------------------------------------------- +void __fastcall TfijarVencimientos::Edit2Change(TObject *Sender) +{ + ReCalcularVencimientos(); +} +//--------------------------------------------------------------------------- +void __fastcall TfijarVencimientos::ReCalcularVencimientos(void) +{ + try { + // + for( int i=0; iRowCount; i++ ) + { + StringGrid1->Cells[0][i] = DateToStr( DateTimePicker1->Date + Edit2->Text.ToInt() * i ); + StringGrid1->Cells[1][i] = eRecibos->TbRecibos->FieldByName("Importe")->AsString; + } + } catch(...) { + //nothing + } +} +//--------------------------------------------------------------------------- + +void __fastcall TfijarVencimientos::BitBtn1Click(TObject *Sender) +{ + // Afianzamos el actual + eRecibos->TbRecibos->FieldByName("Vencimiento")->AsString = StringGrid1->Cells[0][0]; + eRecibos->TbRecibos->FieldByName("Importe")->AsString = StringGrid1->Cells[1][0]; + eRecibos->TbRecibos->Post(); + for( int i=1; iRowCount; i++ ) + { + eRecibos->TbRecibos->Insert(); + eRecibos->TbRecibos->FieldByName("Vencimiento")->AsString = StringGrid1->Cells[0][i]; + eRecibos->TbRecibos->FieldByName("Importe")->AsString = StringGrid1->Cells[1][i]; + eRecibos->TbRecibos->Post(); + } + Close(); +} +//--------------------------------------------------------------------------- diff --git a/src/eFijarVencimientos.dfm b/src/eFijarVencimientos.dfm new file mode 100644 index 0000000..98f3a5b --- /dev/null +++ b/src/eFijarVencimientos.dfm @@ -0,0 +1,130 @@ +object fijarVencimientos: TfijarVencimientos + Left = 438 + Top = 144 + AutoScroll = False + BorderIcons = [] + Caption = 'Fijar Vencimientos' + ClientHeight = 272 + ClientWidth = 240 + Color = clBtnFace + Font.Charset = DEFAULT_CHARSET + Font.Color = clWindowText + Font.Height = -13 + Font.Name = 'MS Sans Serif' + Font.Style = [] + OldCreateOrder = False + Position = poScreenCenter + PixelsPerInch = 96 + TextHeight = 16 + object Label1: TLabel + Left = 8 + Top = 16 + Width = 117 + Height = 16 + Caption = 'Primer vencimiento:' + end + object Label2: TLabel + Left = 8 + Top = 40 + Width = 152 + Height = 16 + Caption = 'Número de vencimientos:' + end + object Label3: TLabel + Left = 8 + Top = 64 + Width = 146 + Height = 16 + Caption = 'Cada X dias, donde X ==' + end + object DateTimePicker1: TDateTimePicker + Left = 168 + Top = 8 + Width = 72 + Height = 24 + CalAlignment = dtaLeft + Date = 37443.8382170139 + Time = 37443.8382170139 + DateFormat = dfShort + DateMode = dmComboBox + Kind = dtkDate + ParseInput = False + TabOrder = 0 + OnChange = DateTimePicker1Change + end + object UpDown1: TUpDown + Left = 225 + Top = 32 + Width = 12 + Height = 24 + Associate = Edit1 + Min = 1 + Position = 1 + TabOrder = 1 + Wrap = False + end + object Edit1: TEdit + Left = 168 + Top = 32 + Width = 57 + Height = 24 + TabOrder = 2 + Text = '1' + OnChange = Edit1Change + end + object StringGrid1: TStringGrid + Left = 0 + Top = 122 + Width = 240 + Height = 150 + Align = alBottom + ColCount = 2 + FixedCols = 0 + RowCount = 1 + FixedRows = 0 + Options = [goFixedVertLine, goFixedHorzLine, goVertLine, goHorzLine, goRangeSelect, goEditing] + TabOrder = 3 + ColWidths = ( + 140 + 80) + end + object BitBtn1: TBitBtn + Left = 0 + Top = 96 + Width = 113 + Height = 25 + Caption = '&Generar' + TabOrder = 4 + OnClick = BitBtn1Click + end + object BitBtn2: TBitBtn + Left = 128 + Top = 96 + Width = 113 + Height = 25 + Caption = '&Cancelar' + TabOrder = 5 + OnClick = BitBtn2Click + end + object Edit2: TEdit + Left = 168 + Top = 56 + Width = 57 + Height = 24 + TabOrder = 6 + Text = '1' + OnChange = Edit2Change + end + object UpDown2: TUpDown + Left = 225 + Top = 56 + Width = 12 + Height = 24 + Associate = Edit2 + Min = 1 + Max = 1200 + Position = 1 + TabOrder = 7 + Wrap = False + end +end diff --git a/src/eFijarVencimientos.h b/src/eFijarVencimientos.h new file mode 100644 index 0000000..6f28885 --- /dev/null +++ b/src/eFijarVencimientos.h @@ -0,0 +1,41 @@ +//--------------------------------------------------------------------------- + +#ifndef eFijarVencimientosH +#define eFijarVencimientosH +//--------------------------------------------------------------------------- +#include +#include +#include +#include +#include +#include +#include +//--------------------------------------------------------------------------- +class TfijarVencimientos : public TForm +{ +__published: // IDE-managed Components + TLabel *Label1; + TDateTimePicker *DateTimePicker1; + TLabel *Label2; + TUpDown *UpDown1; + TEdit *Edit1; + TStringGrid *StringGrid1; + TBitBtn *BitBtn1; + TBitBtn *BitBtn2; + TLabel *Label3; + TEdit *Edit2; + TUpDown *UpDown2; + void __fastcall BitBtn2Click(TObject *Sender); + void __fastcall DateTimePicker1Change(TObject *Sender); + void __fastcall Edit1Change(TObject *Sender); + void __fastcall Edit2Change(TObject *Sender); + void __fastcall BitBtn1Click(TObject *Sender); +private: // User declarations +public: // User declarations + __fastcall TfijarVencimientos(TComponent* Owner); + void __fastcall ReCalcularVencimientos(void); +}; +//--------------------------------------------------------------------------- +extern PACKAGE TfijarVencimientos *fijarVencimientos; +//--------------------------------------------------------------------------- +#endif diff --git a/src/erecibos.bpr b/src/erecibos.bpr new file mode 100644 index 0000000..12a86c1 --- /dev/null +++ b/src/erecibos.bpr @@ -0,0 +1,139 @@ + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + +[Version Info] +IncludeVerInfo=0 +AutoIncBuild=0 +MajorVer=1 +MinorVer=0 +Release=0 +Build=0 +Debug=0 +PreRelease=0 +Special=0 +Private=0 +DLL=0 +Locale=3082 +CodePage=1252 + +[Version Info Keys] +CompanyName= +FileDescription= +FileVersion=1.0.0.0 +InternalName= +LegalCopyright= +LegalTrademarks= +OriginalFilename= +ProductName= +ProductVersion=1.0.0.0 +Comments= + +[Excluded Packages] +C:\Mis documentos\Fuentes de Programacion\C++ Builder\CAP\LM2000_vcl\LM2000_vcl.bpl=Funciones para el Manejo del LM2000 + +[HistoryLists\hlIncludePath] +Count=3 +Item0=C:\program\CBuilder\CBuilder5\Projects\;$(BCB)\include;$(BCB)\include\vcl +Item1=C:\program\CBuilder\CBuilder5\Projects;$(BCB)\include;$(BCB)\include\vcl +Item2=$(BCB)\include;$(BCB)\include\vcl + +[HistoryLists\hlLibraryPath] +Count=3 +Item0=C:\program\CBuilder\CBuilder5\Projects\;$(BCB)\Projects\Lib;..\..\VCLs\lib;$(BCB)\lib\obj;$(BCB)\lib +Item1=C:\program\CBuilder\CBuilder5\Projects;$(BCB)\Projects\Lib;..\..\VCLs\lib;$(BCB)\lib\obj;$(BCB)\lib +Item2=$(BCB)\Projects\Lib;..\..\VCLs\lib;$(BCB)\lib\obj;$(BCB)\lib + +[HistoryLists\hlDebugSourcePath] +Count=1 +Item0=$(BCB)\source\vcl + +[HistoryLists\hlConditionals] +Count=1 +Item0=_DEBUG + +[HistoryLists\hlIntOutputDir] +Count=1 +Item0=..\obj + +[HistoryLists\hlFinalOutputDir] +Count=2 +Item0=..\bin\ +Item1=..\bin + +[Debugging] +DebugSourceDirs=$(BCB)\source\vcl + +[Parameters] +RunParams= +HostApplication= +RemoteHost= +RemotePath= +RemoteDebug=0 + +[Compiler] +ShowInfoMsgs=0 +LinkDebugVcl=1 +LinkCGLIB=0 + +[CORBA] +AddServerUnit=1 +AddClientUnit=1 +PrecompiledHeaders=1 + +[Language] +ActiveLang= +ProjectLang= +RootDir= + + \ No newline at end of file diff --git a/src/erecibos.cpp b/src/erecibos.cpp new file mode 100644 index 0000000..0156513 --- /dev/null +++ b/src/erecibos.cpp @@ -0,0 +1,25 @@ +//--------------------------------------------------------------------------- + +#include +#pragma hdrstop +USERES("erecibos.res"); +USEFORM("main.cpp", eRecibos); +USEFORM("eFijarVencimientos.cpp", fijarVencimientos); +USEFORM("QrRecibos.cpp", QRListRecibos); +USEFORM("QrUnRecibo.cpp", QrRecibo); +//--------------------------------------------------------------------------- +WINAPI WinMain(HINSTANCE, HINSTANCE, LPSTR, int) +{ + try + { + Application->Initialize(); + Application->CreateForm(__classid(TeRecibos), &eRecibos); + Application->Run(); + } + catch (Exception &exception) + { + Application->ShowException(&exception); + } + return 0; +} +//--------------------------------------------------------------------------- diff --git a/src/erecibos.res b/src/erecibos.res new file mode 100644 index 0000000..1392cb0 Binary files /dev/null and b/src/erecibos.res differ diff --git a/src/main.cpp b/src/main.cpp new file mode 100644 index 0000000..b7eb2d0 --- /dev/null +++ b/src/main.cpp @@ -0,0 +1,175 @@ +//--------------------------------------------------------------------------- + +#include +#pragma hdrstop + +#include "main.h" +#include "eFijarVencimientos.h" +#include "QrRecibos.h" +#include "QrUnRecibo.h" +//--------------------------------------------------------------------------- +#pragma package(smart_init) +#pragma resource "*.dfm" +TeRecibos *eRecibos; +//--------------------------------------------------------------------------- +__fastcall TeRecibos::TeRecibos(TComponent* Owner) + : TForm(Owner) +{ + TbRecibos->TableName ="datos\\recibos.db"; + TbRecibos->Active = true; +} +//--------------------------------------------------------------------------- + +void __fastcall TeRecibos::ToolButton1Click(TObject *Sender) +{ + Close(); +} +//--------------------------------------------------------------------------- +void __fastcall TeRecibos::TbRecibosCalcFields(TDataSet *DataSet) +{ + AnsiString cadena; + Currency importe = TbRecibos->FieldByName("Importe")->AsCurrency; + int aux; + + // Si el importe es mayor de mil (obtenemos solo los millares) + cadena = ""; + aux = importe; + if ( aux >= 1000 ) + { + if ( ( aux/1000 ) == 1 ) + cadena += "mil "; + else + cadena += entero2txt( (aux/1000) ) + " mil "; + } + if ( aux >= 1 ) + { + cadena += entero2txt( (aux%1000) ) + " €uros"; + aux = importe*100; + if ( (aux%100) ) + cadena += " con "; + + } + aux = (importe*100); + aux %= 100; + if ( aux ) + { + TbRecibos->FieldByName("ImporteTXTcent")->AsString = entero2txt( aux ) + " centimos"; + } + + TbRecibos->FieldByName("ImporteTXT")->AsString = cadena; +} +//--------------------------------------------------------------------------- +AnsiString __fastcall TeRecibos::entero2txt(int num) +{ + + AnsiString dev; + + switch( (num/100)%10 ) + { + case 1: + if ( (num % 100)==(num%10) && (num%10)==0 ) + dev = "cien"; + else + dev = "ciento "; + + break; + case 2: dev += "doscientos "; break; + case 3: dev += "trescientos "; break; + case 4: dev += "cuatrocientos "; break; + case 5: dev += "quinientos "; break; + case 6: dev += "seiscientos "; break; + case 7: dev += "setecientos "; break; + case 8: dev += "ochocientos "; break; + case 9: dev += "novecientos "; break; + } + + switch( (num/10)%10 ) + { + case 1: + switch( num%10 ) + { + case 0: dev += "diez "; break; + case 1: dev += "once "; break; + case 2: dev += "doce "; break; + case 3: dev += "trece "; break; + case 4: dev += "catorce "; break; + case 5: dev += "quince "; break; + case 6: dev += "diesiceis "; break; + case 7: dev += "diecisiete "; break; + case 8: dev += "dieciocho "; break; + case 9: dev += "diecinueve "; break; + } + break; + case 2: dev += "veinte "; break; + case 3: dev += "treinta "; break; + case 4: dev += "cuarenta "; break; + case 5: dev += "cincuenta "; break; + case 6: dev += "sesenta "; break; + case 7: dev += "setenta "; break; + case 8: dev += "ochenta "; break; + case 9: dev += "noventa "; break; + if ( num%10 ) dev += "y "; + } + + if ( ((num/10)%10) != 1 ) + switch( (num%10) ) + { + case 1: dev += "uno"; break; + case 2: dev += "dos"; break; + case 3: dev += "tres"; break; + case 4: dev += "cuatro"; break; + case 5: dev += "cinco"; break; + case 6: dev += "seis"; break; + case 7: dev += "siete"; break; + case 8: dev += "ocho"; break; + case 9: dev += "nueve"; break; + } + + return dev; +} +//--------------------------------------------------------------------------- +void __fastcall TeRecibos::BitBtn2Click(TObject *Sender) +{ + TbRecibos->Filter = "[FechaVencimiento]>="+FechaMin->Date+" AND [FechaVencimiento]<="+FechaMax->Date; + TbRecibos->Filtered = true; +} +//--------------------------------------------------------------------------- +void __fastcall TeRecibos::DBGrid1DblClick(TObject *Sender) +{ + PageControl1->ActivePage = EmisionRecibos; +} +//--------------------------------------------------------------------------- +void __fastcall TeRecibos::BitBtn1Click(TObject *Sender) +{ + if ( TbRecibos->State == dsInsert ) + { + TfijarVencimientos *Venc; + Venc = new TfijarVencimientos(this); + Venc->ShowModal(); + delete Venc; + } +} +//--------------------------------------------------------------------------- +void __fastcall TeRecibos::BitBtn3Click(TObject *Sender) +{ + TQRListRecibos *LR; + LR = new TQRListRecibos(this); + LR->MasterTable->TableName = TbRecibos->TableName; + LR->MasterTable->Filter = TbRecibos->Filter; + LR->MasterTable->Filtered = TbRecibos->Filtered; + LR->MasterTable->Active = true; + LR->QuickRep1->ReportTitle = "Listados de Recibos entre: " + FechaMin->Date.DateString() + " y " + FechaMax->Date.DateString(); + LR->QuickRep1->Preview(); + delete LR; +} +//--------------------------------------------------------------------------- +void __fastcall TeRecibos::BitBtn4Click(TObject *Sender) +{ + TQrRecibo *R; + R = new TQrRecibo(this); + R->QuickRep1->Print(); + delete R; +} +//--------------------------------------------------------------------------- + + diff --git a/src/main.dfm b/src/main.dfm new file mode 100644 index 0000000..a18d7fa --- /dev/null +++ b/src/main.dfm @@ -0,0 +1,1509 @@ +object eRecibos: TeRecibos + Left = 195 + Top = 115 + Width = 640 + Height = 440 + Caption = 'eRecibos' + Color = clBtnFace + Font.Charset = DEFAULT_CHARSET + Font.Color = clWindowText + Font.Height = -11 + Font.Name = 'MS Sans Serif' + Font.Style = [] + OldCreateOrder = False + Position = poScreenCenter + PixelsPerInch = 96 + TextHeight = 13 + object StatusBar1: TStatusBar + Left = 0 + Top = 394 + Width = 632 + Height = 19 + Panels = <> + SimplePanel = False + end + object PageControl1: TPageControl + Left = 0 + Top = 0 + Width = 632 + Height = 394 + ActivePage = EmisionRecibos + Align = alClient + Style = tsFlatButtons + TabOrder = 1 + object AcercaDe: TTabSheet + Caption = 'Acerca de...' + object Image1: TImage + Left = 8 + Top = 16 + Width = 159 + Height = 60 + AutoSize = True + Picture.Data = { + 07544269746D6170B6290000424DB62900000000000036040000280000009F00 + 00003C0000000100080000000000802500000000000000000000000100000000 + 00003924240052242400392D2D00632D2D00742D2D0039363600523636006336 + 36007436360041403600524036006B4036004A493600413640008D3640004140 + 40005B404000634040007440400085404000414940009E4940004A5240006352 + 40004A404900634049004A494900524949006349490074494900854949009649 + 49004A5249006B5249008D5249004A495200524952004A5252005B5252006352 + 52007C5252005B5C52008D5C52005B5C5C00635C5C007C5C5C008D5C5C00A65C + 5C00B75C5C005B655C0063655C0074655C007C6E5C005B5C6500745C65008D5C + 65005B656500636565006B6565007C6565008D656500AF656500C0656500FB5C + 6E00F2656E00636E6E006B6E6E00746E6E007C6E6E008D6E6E00B76E6E00C86E + 6E00FB657800F26E78005B787800747878007C7878008D7878009E787800C078 + 7800C8787800D97878007C81780085817800E1817800858A7800AF8A7800FB65 + 81005B788100857881008D788100A6788100F2788100858181009E818100A681 + 8100C0818100E1818100FB818100858A8100968A8100D98A8100FB658A00FB78 + 8A007C818A008D818A00A6818A00E1818A00FB818A008D8A8A00968A8A00AF8A + 8A00B78A8A00C88A8A00E18A8A00FB8A8A00AF948A00C0948A00FB948A00FB6E + 940096819400FB819400968A9400C08A9400C88A9400FB8A94008D9494009694 + 9400B7949400C0949400C8949400FB9494009E9D9400FB9D9400A66E9D00C894 + 9D00969D9D009E9D9D00A69D9D00D09D9D00FB9D9D00B7B09D00FB78A600FB81 + A600FB8AA600FB94A600AF9DA600C89DA600D09DA600FB9DA600AFA6A600FBA6 + A600B7B0A600C8B0A600D0B0A600D9B0A600E1B0A600FBB0A600F26EB000FB78 + B000FB8AB000FB94B000C0A6B000E1A6B000F2A6B000AFB0B000B7B0B000C0B0 + B000C8B0B000D0B0B000D9B0B000F2B0B000FBB0B000EAB9B000F278B900E1A6 + B900F2A6B900B7B0B900C0B0B900C8B0B900D0B0B900D9B0B900E1B0B900F2B9 + B900FBB9B900F2C2B900FBC2B900D0B9C200D9B9C200EAB9C200E1C2C200F2C2 + C200FBC2C200C8CCC200FBCCC200F2A6CC00D9C2CC00FBC2CC00D0CCCC00EACC + CC00F2CCCC00FBCCCC00D0D5CC00D9D5CC00F281D500F28AD500F294D500D9A6 + D500F2D5D500FBD5D500E1DED500EADED500FBDED500F278DE00FB81DE00E18A + DE00EA8ADE00EA94DE00EA9DDE00F2A6DE00FBC2DE00FBD5DE00E1DEDE00F2DE + DE00FBDEDE00EAE8DE00EA94E800F29DE800EAB9E800F2C2E800E1CCE800FBE8 + E800EAF1E800F2F1E800E18AF100D09DF100F2F1F100FBF1F100D994FA00D09D + FA00C8A6FA00D0B0FA00C0B9FA00C8B9FA00C8C2FA00D0C2FA00C8CCFA00D0CC + FA00D9D5FA00E1D5FA00D9DEFA00E1DEFA00EAE8FA00FBE8FA00F2F1FA00FBFA + FA00FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF + FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF + FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF + FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF + FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF + FF00FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF + FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF + FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF + FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF + FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF + FF00FFFFFFFFFFFFFFFEFEFEFEFCFCFCFCFCFCFEFEFEFEFEFEFFFFFFFFFFFFFF + FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFEFEFEFEFEFEFE + FEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFEFE + FEFEFEFEFEFEFEFEFEFEFEFEFEFEFFFEFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF + FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF + FF00FFFFFFFFFFFFFEFCFAF7F6F6F4F7F7F7F7F7F7F7F8FBFCFEFEFFFFFFFFFF + FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFEFCFBFAFAF8F8F8F8F8 + F8F8F8F8F8F8F8F8F8F8F8F8F8F8F8F8F8F8F8F8F8F8F8F8F8F8FAFAF8F8F8F8 + F8F8F8F8F8F8F8F8F8FAFAF8F8FAFAFBFCFEFEFFEDE7E0E0E0E0E7EDEDFFFFFF + FFFFEDE7E0E0E0E0EDFFFFFFFFFFEDEDEDEDFFFFFFFFEDE7E0E7EDFFFFFFFFFF + FF00FFFFFFFFFFFFFCF7F4F1F0F0EBF1F1F1F1F1F1F1F3F4F8FBFEFFFFFFFFFF + FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFEFBF9F8F5F3F3F3F3F3F3 + F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3 + F3F3F3F3F3F3F3F3F3F3F3F3F3F3F3F4F8FBFCE0C9C0B8ACACB8C0C9E0E7EDFF + FFFFE0C0B8ACACB8C9E0EDFFFFEDE0C9C9D1E7EDFFEDD4C0B8C0C9E0EDFFFFFF + FF00FFFFFFFFFFFFFAF4EBEAD7CCCDCECECECECDD8D8EAEFF2F7FCFFFFFFFFED + EDEDEDEDFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFDE5DBDBDADADADADADADADA + DADADADADAD9DADADADADADADAE3D9DADADADADADADADADAD9DADADADADADADA + DADADADAD9DAD9DADADAD9D9E2E2EEEBF2F5E6C5978373736273838C97C0D1E7 + E7E7C08C7D736C768CACC5E0EDE7D1978C97B8D1E7E7C09773838CACC9E7FFFF + FF00FFFFFFFFFFFFF8F1EAD59E7979919191908F8E9FD5EAF0F5FBFFEDE7D1D1 + D1D1D1D1E0E7EDEDFFFFFFFFFFFFFFFFFFFFFFE7DCC3A0A0A0A1A1A1A1A1A1A1 + A1A1A1A1A1A1A1A1A1A1A1A1A1A1A1A1A1A1A1A1A1A1A1A1A1A1A1A1A1A1A1A1 + A1A1A1A1A1A1A1A1A1A1A090AEAECCEAEFF178000100020001306273768CACC0 + C92D00000100046C738397BAD11C1283737385B88200000047627385B8E0FFFF + FF00FFFFFFFFFFFFF9EBD677485C7295959583836C4877CCE2F5FAE7C9B8978C + 8C8C8C9797ACC0D1E0E7EDFFFFFFFFFFFFFFEDC9B07D797D8395959595959595 + 9595959595959595959595959595959595959595959595959595959595959595 + 959595959595959595958C83735777CCEACF19C0ABA4A4B8AB9302007262738C + 2E10ACB0A4B893020E73768C8CA3870601506297127BACB83C000E83ACD1FFFF + FF00FFFFFFFFFFFFDFE4CC663F498BA4A4A4A4A36B4057AEE2E6FBDF8D848484 + 6A80817273738397ACC0D1E7EDFFFFFFFFFFE7B88C5C6BA39597A4A4A4A4A4A4 + A4A4A4A4A4A4A4A4A4A4A4A4A4A4A4A4A4A4A4A4A4A4A4A4A4A4A4A4A4A4A4A4 + A4A4A4A4A4A4A4A4A4A4A4A472493F77D837AAA4A4A4ABB8B6A3B8A33B017662 + 0094A4A4A4A4ACAB2E0083737D27A4ABB8063E830E93A4ABACAB0A72B8E0FFFF + FF00FFFFFFFFFFFFE7E4CE77485C7297A49595836B4066AEE3E6C605052B2B2B + 2B250F142C5F7273838C97C0D1E7EDFFFFFFE7C08C62728C9597A4A4A4A4A4A4 + A4A4A4A4A4A4A4A4A4A4A4A4A4A4A4A4A4A4A4A4A4A4A4A4A4A4A4A4A4A4A4A4 + A4A4A4A4A4A4A4A4A4A4979572493F77CD8611B6A4A4AB3B00000093B83B0061 + 03ABA4A4B8A30206BD9400617300B8A4A49304734645ACABAB060385B8E0FFFF + FF00FFFFFFFFFFFFFFE7C5A17967738C8C8383736C678FC3E5DF0F43A2B6A4A4 + ABAABC96522605204E6B738397B8D1FFFFFFEDC9AC7D73838395959595959595 + 9595959595959595959595959595959595959595959595959595959595959595 + 95959595959195959595837D6C6767A0DBDFC400279B9B03C9C9C9006AA4A31C + 00A3ABA49400838B1CB0C5101301A9A4A4B600739700B7A4AB11617397D1EDFF + FF00FFFFFFFFFFFFFFFFDDC5B0959595959583837D91BDDCFD6D0FB3A4A4A4A4 + A4A4ABABB6B37E2B05053C73738CACC9E7FFFFE7C5AC83838383958C95959595 + 8C958C95958C9595958C8C958C958C95958C958C8C8C8C8C8C958C8C958C9583 + 8C958C958C8C8C8C9595837D7D7D91C3E5FFFFFF3B0006BFC0AC97711CA495B8 + 006FA4A49304738C02B8ACB600462DABA4C5026C8300AAA4A46F03738CC0E7ED + FF00FFFFFFFFFFFFFFFFFFEDE7E0E0C9DDD1DDC9C9E0E7FFFF424BABA4A4A4B0 + B6B5895D5D8ABBBBB25D18185F737D97C0E0FFFFEDE0C9C0C5C5C5C5C0C5C5C5 + C5C5C5C5C5C5C5C5C5C5C5C5C5C5C5C5C5C5C5C5C5C5C5C5C5C5C5C5C5C5C5C0 + C5C5C5C5C5C0C5C5C5C5C5C5C0C9DDE7FFFFFFFFFFFFE0958C130007AAA4A4AB + 7B00C5A4940073730087A4AB875000B0A4AC805173472DABA4A3006C738CC0DD + ED00FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF3A5DB0A4A4A4A4 + 962500072806094CB2BCB3430F144F7397C0E7FFFFFFFFFFFFFFFFFFFFFFFFFF + FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF + FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFBE0101288BBDACA4A4A4A4 + 94000093AB281E8306B8A4A4A3130494A4A4AC01677300A4A4B0281F627385AC + C900FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF435DA4A4A4A4B6 + 3A0082E0EDFF4D052B96B6B47A1C054F73ACC9EDFFFFFFFFFFFFFFFFFFFFFFED + EDEDEDEDEDEDFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF + FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFD20094B7ABA4A4A4A4A4A4A4 + A901D10006B61C0087ABA4A49400001CACA4AB000102024EA4A4940000727683 + AC00FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF435DA4A4A4A4B3 + 0046ACD1EDFFFFD20A2096ABA49635006183B8E0EDFFFFFFFFFFFFFFEDE7DDC9 + C9C0C0C0C5C9E0E7EDFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFEDEDEDEDE7E7 + E7E7EDEDEDEDFFFFFFFFFFFFFFFFFFFFFFFFFFFF277BACA4ACACACA4AC7B4500 + 01D4E0ED92926FABA4A4A4A48BC0B8ACACA4A4B8C05BC5A4ACA4A4ACAB001F7D + B800FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF435DA4A4A4A496 + 017397C2E7FFFFFFD2092CB5B0A3A725127397C9E7FFFFFFFFFFFFEDE0C0B897 + 8C8C8C8C9797ACC9E0EDFFFFFFFFFFFFFFFFFFFFFFFFFFEDE7E0DDD1C9C9C5C0 + C0C0C5C9C9D1E0E7EDFFFFFFFFFFFFFFFFFFFFFF3A87A4A4A4ACA33C02002EC9 + B8ACC0D1A9001CA3A4A4A4B7101CB6A4ACA4A4A4ACB64587A4A4A4A4ABBD0A72 + C200FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF435DA4A4A4ABA8 + 005183A4D1EDFFFFFFCA187EB6A4B089004783ACE0EDFFFFFFFFE7D0C27F4444 + 4343435E7B727697B8E0EDFFFFFFFFFFFFFFFFEDE7E0C9C0B8AC979785858383 + 8385858C8C97ACC0C9E0E7EDFFFFFFFFFFFFFFFFFE00ABACACBD00618397AC97 + 83768397C0E08000021C19012706100010ABACB81C002D0236ABA4B81C002E8B + E000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF4C39A3A4A4A4B5 + 0908738CC0E7FFFFFFFF7E26B3ABACB51A03738CC9E7FFFFFFFFE743050F2B4B + 5D52391A0F2650859DC9EDFFFFFFFFFFFFEDE7D1C0B89D8CA4A371706D6D6D6E + 5E5F758C7D73738597B8C9E0EDFFFFFFFFFFFFFFFF0F36ABA4B70083738C0100 + 016C738397D1FFECFFFFFFFFFFEDFFFF028BA4A42713738300B6B8A437039DC9 + E700FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFC10996A3A4A4A4 + 6D051C83C0E7FFFFFFFFEC185DB5A4A47E003083B8DDFFFFFFFF1B0F6DB4B6B6 + B6BCBEC4964B050271D1EDFFFFFFEDE7E0C0B89D9C4E260F0F252B4B5D5D5D5D + 5D522B1A0F1B3B7173768CACC0E0EDFFFFFFFFFFFFFF420DB7A45E00010082B8 + AF3C017697C9EDFFFFFFFFFFFFFFFFFFED00BFA4AA007D7360010027B600C9E7 + FF00FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF430963BBAAAB + B4841B82E0EDFFFFFFFFFF6D14B2A4A4BB3901738CC0E7EDFF2B0F8AA3B5B252 + 25051A397EA7924328E7EDFFEDE7D1C0AC811B0F0F2B5DA2B5AAA4A4A4A4A4A4 + A4A4A3B5B37F3A18095B6C7385B8D1E7FFFFFFFFFFFFFFDE00007BC095A4A4AB + A4AC1BACC8E0FFFFFFFFFFFFFFFFFFFFFFEC009BAC2D0100B500033D1E71D1ED + FF00FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFEC2105204C5D + 96842794EDFFFFFFFFFFFFE8187EA3A4A37A00477397C0D1A70552B6B57F2600 + 1DB6801C02146D4C2DFFEDE7D1C9B89214052552A2B4A3B0A4A4A4A4A4A4A4A4 + A4A4A4A4A4A4B38A26052765738CB8D1E7FFFFFFFFFFFFFFFF96000693BDB8B7 + B8AB10E0E7EDFFFFFFFFFFFFFFFFFFFFFFFFFF00A9B8448BACB8210073ACE0FF + FF00FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFE9B2A72E + 37372DBEFFFFFFFFFFFFFFFF432BBCB0A4B5250B5C7383A4202BB5BB4C001DD0 + FFFFFFFFEC812E2E5FE7D1B7BE3B0F0F4BA7AAA4A4A4A4A4A4A4ACA4A4A4A3B5 + BB929692A2B4AAB0B58A2505287385A4C9E7FFFFFFFFFFFFFFFFFFFFDF260700 + 0010EDFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF1A0287ABABACA301BFE0EDFF + FF00FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF + FFFFFFFFFFFFFFFFFFFFFFFFC10FA7A4A4AA5A092971729C186DB57F051CC9ED + FFFFFFFFFFFFEDE7D1C0B774180F4196B6A4A4A4A4A4A4A4A4A4A4B5A67F4229 + 050507060A204396B4B5A743054E7383ACD1EDFFFFFFFFFFFFFFFFFFFFFFFEFF + FFECFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFB1002D81702700E7EDFFFF + FF00FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF + FFFFFFFFFFFFFFFFFFFFFFFFFF204CA3A4A4B5894223090214B3BC1A07C0E7FF + FFFFFFFFEDE7C2ADBF2C090F52A7ABA4A4A4A4A4A4B0ABAAB4894B1B00114EB6 + E7FFFFFFEDBE34023A96B5B66D051D7285B8E0EDFFFFFFFFFFFFFFFFFFFFFFFF + FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFEDEDFFFFFFFFFF + FF00FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF + FFFFFFFFFFFFFFFFFFFFFFE7D44C25B4A4A4A4A4B5A8430026B6A50071C9EDFF + FFFFEDE7D1C0B9340F0F43A2A3A4A4A4A4A4A4A4A4B6B36E29020145C8EDFFFF + FFFFFFFFFFFFFF96051A96B6B54B002A7397C9EDFFFFFFFFFFFFFFFFFFFFFFFF + FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF + FF00FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF + FFFFFFFFFFFFFFFFFFEDE0C0BE180596A4A4A4A4AA962B004CBC5D038CC0E0E7 + E7E0C9ADB93A051A52B3A3A4A4A4A4A4A4A4B0B5964B0F012EB7C9C9D1D1D1D1 + E0E7EDFFFFFFFFFFE932026EB4B54B002F73BAE0FFFFFFFFFFFFFFFFFFFFFFFF + FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF + FF00FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF + FFFFFFFFFFFFFFEDE0C0BF2005256EB4A4A4A4B33100111A5DBC4D1F7395B8C0 + B89C8D1A0F2589B4A4A4A4A4A4A4A4A4A4B47F26000146978C8C8C8C8C8C9797 + 9DB8C9E0EDFFFFFFFFFF530A89A4B43900729DD1EDFFFFFFFFFFFFFFFFFFFFFF + FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF + FF00FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF + FFFFFFFFFFFFE7D1B95D14185DA7B4B6A4A4A4B31A138C4D52BC5D0373738C8C + 9B1A051A68A7A4A4A4A4A4A4A4A4A4AA963809023D72978B7075707581A48373 + 738397B8C9E7EDFFFFFFFF2039A3A48A022F97C9EDFFFFFFFFFFFFFFFFFFFFFF + FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF + FF00FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF + FFFFFFFFEDE0D16D0F0D4BBBB6B58A5DB4A4A4B63901835359B696020B6A290F + 05428AB5ABA4A4A4A4A4A4A4A4B5893902000F1A141414253A5D5D4B25140F1B + 397C738397C0E0EDFFFFFFC60FBBA4B539038CC2E7FFFFFFFFFFFFFFFFFFFFFF + FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF + FF00FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF + FFFFFFFFE7D020052B89BCBB96430905A6B0A4AB7E0083452CB6AA4C090F254B + 96B5A3A4A4A4A4A4A4A4A4A396440500000214426EA2BBB5AAAAA3A3B6B4964B + 1B05456C7395C0E7FFFFFFFF26A6A4AA6D018CC0E7FFFFFFFFFFFFFFFFFFFFFF + FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF + FF00FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF + FFFFEDE7960F2388B5B6962C0007992C52AFA4A4A706547518A7A4AAB4B4AAA4 + A4A4A4A4A4A4A4A4A4B6A64B0500001A4BA7B5A3A4A4A4A4A4ABA4A3A4A4A4A4 + B37F18054F7397C9E7FFFFFF2B96ABA496038CC0E7FFFFFFFFFFFFFFFFFFFFFF + FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF + FF00FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF + FFFFFF2C0D39B3B6BC6D0607C8FFFFCB14B4ABA4B42C158B185DB5ACA4B0B0A4 + A4ABA4A4A4A4ABA998390502053989B4A4A4B0A4B0B0AAB3925D4B2B2B4B89B3 + B6B6A736003D7DACE0EDFFFF1B96ACA492038CC2EDFFFFFFFFFFFFFFFFFFFFFF + FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF + FF00FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF + FFFF42054BBBB6B66D0503E0FFFFFFED0989A4ABA36903832C20A2A4ABA4A4A4 + A4A4A4A4A4A3A7430F00021A8AB4AAA4A4A4B0B6B48A431000062D3C331B051A + 6DBCB6A726005C97D1EDFFE10FB3A4A4920397C9EDFFFFFFFFFFFFFFFFFFFFFF + FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF + FF00FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF + FFB2054BB4B0AB8A0507B8E7FFFFFFFF294BAAABABA700619C0A31A8A4A4A4A4 + A4A4A4B496420200001A5DBBABA4A4A4A4B5A24318001CC7FFFFFFFFFFFFED64 + 0232BCB69605128CC2E7ED4C14B5A4AB9603ACD1FFFFFFFFFFFFFFFFFFFFFFFF + FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF + FF00FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF + FF5225B3A4A4B6390172ACE0FFFFFFFF6416B4A4A4B3023E8C5F024BB4B6A3A3 + AAB37F39060F00002C92AAA4A4A4A4A3BB4C09003CE0FFFFFFFFFFFFFFFFFFFF + A8065DB6B543018CC0E0FF0F42ABABA36303B8E0FFFFFFFFFFFFFFFFFFFFFFFF + FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF + FF00FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF + FF5352AAA4A4B62C03738CC0E0EDFFFFE90992B6A4AA260883B8BE0206262727 + 260201289A2B0F52A8A4A4A4A4A4BB6D1B0080EDFFFFFFFFFFFFFFFFFFFFFFFF + FFC60FA2A4960083B8D12B1896A4A4B42012D1EDFFFFFFFFFFFFFFFFFFFFFFFF + FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF + FF00FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF + FF535DA4A4A4A36D003E7397C9E7EDFFFF1753AAA4A44C0173A4D1DFA8A9A9A9 + A9C7EDED430D6DB5B0A4A4A4A4A74B0207DFFFFFFFFFFFFFFFFFFFFFFFFFFFFF + FFFF1A6DA3A70776978D054BAAA4AB8A0271E0FFFFFFFFFFFFFFFFFFFFFFFFFF + FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF + FF00FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF + FF5D5DA4A4A4A4B33100477397C0E0EDFF5520B4A4A48A00518CC0EDFFFFFFFF + FFFFFF430552B6A4ABA4A4A37F1B0081EDFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF + FFFF5239AABB077381092BA7A4A4A72B01C9EDFFFFFFFFFFFFFFFFFFFFFFFFFF + FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF + FF00FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF + FF5D39B6A4A4A4A4A7260054738CACC9E7D30996A4A4B3181F83B8E7FFFFFFFF + FFFF6E0552B4B0A4A4A4AA6D0211D3FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF + FFFF4B39AAA710560F35A8A4A4B23A00AAEDFFFFFFFFFFFFFFFFFFFFFFFFFFFF + FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF + FF00FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF + FF8A14B4A4A4A4A4AA922001477383A4C9D40C6DA4A4B53A0373ACE0FFFFFFFF + FFFF0F38B3A4A4A4A4A4920F28E7FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF + FFFF1A52B68800021A96AAABB052004EE0FFFFFFFFFFFFFFFFFFFFFFFFFFFFFF + FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF + FF00FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF + FFFF0D52B5A4A4A4ABAAA22C00225C7395B8332BB5A4A37A006197D1EDFFFFFF + FF4C0FA2A3A4A4A4A4961A01E0EDFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF + FFED0596BC420239B1B6ACB67E022EE7FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF + FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF + FF00FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF + FFFF431A8AAAA4A4A4A4A4A53A02075173855609B3A4B0B306308CC9EDFFFFFF + FF1A42B5A4A4A4A4B539009BEDFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF + ED4326BBA7392BA2A3ABAA891B1DDFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF + FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF + FF00FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF + FFFFED26096DB5A4A4ABA4B0B58929001F61650689ABB0B52C0783BAE7FFFFFF + FF1496A4A4A4A4A37F004FD1FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFEE7 + A60D8ABC896DBBABB0B34B0606E7FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF + FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF + FF00FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF + FFFFFFE9260553B4AFA4A4A4B0A4A84B05012A004CAAB0A35D0173B8E0EDFFFF + FF0FBBA4A4A4A4B6390197D1FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFE7E7 + 1825BBB3B2B4A4A4B3430028E7FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF + FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF + FF00FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF + FFFFFFFFFFC102146DB4A4A4A4A4A4AA9642020026B3A4A496024797C9EDFFFF + FF25B5A4A4A4A4BC182F97C9EDFFFFFFFFFFFFFFFFFFFFFFFFFFFFEDE0D1C814 + 1A8AA4BDA4B0A389250080EDFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF + FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF + FF00FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF + FFFFFFFFFFFFED64021A7EB6A4A4A4A4A4AAA75D4296A4ABB5200E8CC0E9FFFF + FF2BB6A4A4A4A4BC055083B7E7FFFFFFFFFFFFFFFFFFFFFFEDEDE0C9B88D0F24 + 89ABA4A4ABB44B001DE7EDFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF + FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF + FF00FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF + FFFFFFFFFFFFFFFFCB17054BB3B6ABA4A4A4B0B5A7A6A4A4B6430183B8E0FFFF + FF25B4A4ABA4A4B50F1F7397C9E7EDFFFFFFFFFFFFFFEDE7E0C9BAAD2C0F2589 + AAA4A4B59639005FEDFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF + FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF + FF00FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF + FFFFFFFFFFFFFFFFFFFFCB090C5DB3A3A4A4A4B0ABA4A4A4A4890073ACD1FFFF + E10FA7A4A4A4A4B54300617397C0D1E7EDEDEDE7E0D4D1B89C9326052B7EB4A4 + A4B696310210C7FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF + FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF + FF00FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF + FFFFFFFFFFFFFFFFFFFFFFE133023192AAABA4A4A4A4A4A4A4A6056197C9EDFF + FF147FAAA4A4A4A392052161738CACC0C9C9C9C0B9AC97931A051A68B3A4ABA3 + B47E180080EDFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF + FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF + FF00FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF + FFFFFFFFFFFFFFFFFFFFFFFFFFDE330543A6A9A4ACB0A4A4A4A926308CC0E7FF + FF4325B2ABA4A4A4B66E0F1A616C7383838C8C8C933B0F0F3989B4A4A4ABB35D + 1B006FEDFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF + FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF + FF00FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF + FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFDF0A0543B2AAABA4A4A4B65D0883B8E0FF + FFE10932B2ABA4A4A4AAA2390914434D442B140F14397AB3B6B0A4A4A3A72B00 + 5EE7FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF + FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF + FF00FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF + FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFED64021A6DB3A4B0A4B08A0183ACE0FF + FFFF8D052CA7A3A4A4A4AAB48A4C2B2B2B4B528ABBB5B5B6BCAAA4A3922B0081 + EDFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF + FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF + FF00FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF + FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFEC64021489B5A4ABA80065B8E0FF + FFFFFFCB0C0552A7B5B0A4A4A4A4A4A4B6B6B5B3B28A59251A6DB36D0207C7EC + FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF + FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF + FF00FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF + FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFD3290943A7B6B50A60C9E7FF + FFFFFFFFEC5302183A7F96A7BBBBBBA2966D42260600064E170206023CEDFFFF + FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF + FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF + FF00FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF + FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFC10C094BA7278BEDFFFF + FFFFFFFFFFFFFFD34D3B101111111107122E6FBEDFFFFFFFFFFFFFFFFFFFFFFF + FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF + FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF + FF00FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF + FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFE94D021906A9FFFFFF + FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF + FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF + FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF + FF00FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF + FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF + FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF + FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF + FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF + 5800FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF + FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF + FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF + FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF + FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF + 5800FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF + FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF + FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF + FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF + FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF + 4A00} + end + object Bevel1: TBevel + Left = 8 + Top = 16 + Width = 161 + Height = 62 + end + object Label1: TLabel + Left = 8 + Top = 80 + Width = 159 + Height = 13 + Caption = 'José David Guillén || jd@infdj.com' + end + object Label2: TLabel + Left = 8 + Top = 96 + Width = 84 + Height = 13 + Caption = 'http://jd.infdj.com' + end + object Image2: TImage + Left = 488 + Top = 328 + Width = 134 + Height = 30 + AutoSize = True + Picture.Data = { + 07544269746D61708E2F0000424D8E2F00000000000036000000280000008600 + 00001E0000000100180000000000582F0000C30E0000C30E0000000000000000 + 0000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF + FFFFFFFFFFFFFFFFFFFFFFFFD3D6F57079D23E4AC43140C04451C9838CDFE1E4 + F8FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFEFEFEFBFBFBF8F8F8F4 + F4F4F1F1F1F0F0F0F0F0F0F1F1F1F1F1F1F0F0F0F0F0F0F1F1F1F3F3F3F5F5F5 + F7F7F7F6F6F6F4F4F4F1F1F1F0F0F0F1F1F1F3F3F3F4F4F4F4F4F4F2F2F2F1F1 + F1F0F0F0F2F2F2F5F5F5F6F6F6F7F7F7F5F5F5F0F0F0EAEAEAE6E6E6E3E3E3E2 + E2E2E3E3E3E3E3E3E2E2E2DDDDDDD3D3D3C3C3C3B1B1B1A3A3A39C9C9CA2A2A2 + B3B3B3C8C8C8DADADAE8E8E8EFEFEFF0F0F0F1F1F1F4F4F4F6F6F6F8F8F8F8F8 + F8F5F5F5F0F0F0EBEBEBE6E6E6E3E3E3E3E3E3E5E5E5E9E9E9EEEEEEF3F3F3F6 + F6F6F8F8F8F5F5F5F2F2F2ECECECE7E7E7E4E4E4E3E3E3E4E4E4E8E8E8ECECEC + F2F2F2F5F5F5F6F6F6F5F5F5F3F3F3F1F1F1F0F0F0F2F2F2F5F5F5F6F6F6F6F6 + F6F5F5F5F2F2F2F0F0F0F1F1F1F4F4F4F5F5F5F6F6F6F5F5F5F4F4F4F1F1F1F0 + F0F0F2F2F2F5F5F5F9F9F9FCFCFCFEFEFEFFFFFF0000FFFFFFFFFFFFFFFFFFFF + FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFC2C6E9 + 3342C42433BC2433BA2433BC2433BB2433BB3443C49099E2FFFFFFFFFFFFFFFF + FFFFFFFFFFFFFFFEFEFEFCFCFCF7F7F7F0F0F0EAEAEAE5E5E5E3E3E3E3E3E3E4 + E4E4E4E4E4E3E3E3E3E3E3E5E5E5E9E9E9EDEDEDEFEFEFEEEEEEEBEBEBE5E5E5 + E3E3E3E5E5E5E9E9E9EAEAEAEAEAEAE8E8E8E5E5E5E3E3E3E6E6E6EBEBEBEEEE + EEEDEDEDE9E9E9E2E2E2D9D9D9D3D3D3CFCFCFCECECECECECECFCFCFD0D0D0D0 + D0D0CBCBCBBFBFBFB0B0B0A1A1A19898989C9C9CABABABC0C0C0D2D2D2DFDFDF + E5E5E5E6E6E6E7E7E7ECECECEFEFEFF2F2F2F0F0F0EAEAEAE2E2E2DADADAD4D4 + D4D0D0D0CFCFCFD1D1D1D7D7D7DFDFDFE6E6E6ECECECECECECE9E9E9E3E3E3DC + DCDCD4D4D4D0D0D0CECECED1D1D1D5D5D5DDDDDDE4E4E4EAEAEAECECECECECEC + E8E8E8E4E4E4E3E3E3E7E7E7ECECECEFEFEFEFEFEFECECECE7E7E7E3E3E3E5E5 + E5E9E9E9EDEDEDEFEFEFEDEDEDE9E9E9E5E5E5E3E3E3E7E7E7EDEDEDF4F4F4FA + FAFAFEFEFEFFFFFF0000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF + FFFFFFFFFFFFFFFFFFFFFFFFFFFFD2D5F3323FBC2233BE2135C6223BD1223BD2 + 223AD02337C92334BC2434BD808ADEFDFDFFFFFFFFFFFFFFFFFFFFFEFEFEFAFA + FAF2F2F2E8E8E8DDDDDDD4D4D4D1D1D1D2D2D2D4D4D4D4D4D4D3D3D3D2D2D2D5 + D5D5DCDCDCE3E3E3E6E6E6E3E3E3DEDEDED6D6D6D2D2D2D4D4D4DADADADDDDDD + DDDDDDDADADAD4D4D4D3D3D3D7D7D7DDDDDDE0E0E0E0E0E0DADADACFCFCFC5C5 + C5BDBDBDB9B9B9B6B6B6B6B6B6B7B7B7BABABABEBEBEBFBFBFB9B9B9AEAEAEA2 + A2A29898989B9B9BA7A7A7BBBBBBCBCBCBD7D7D7DCDCDCDDDDDDDEDEDEE3E3E3 + E7E7E7E8E8E8E4E4E4DCDCDCD0D0D0C5C5C5BEBEBEB9B9B9B9B9B9BCBCBCC2C2 + C2CBCBCBD4D4D4DADADADCDCDCD8D8D8D0D0D0C7C7C7BFBFBFBABABAB9B9B9BA + BABABFBFBFC8C8C8D3D3D3DADADADFDFDFDDDDDDD9D9D9D4D4D4D3D3D3D8D8D8 + E0E0E0E5E5E5E5E5E5E0E0E0D8D8D8D3D3D3D4D4D4DDDDDDE3E3E3E5E5E5E3E3 + E3DDDDDDD4D4D4D3D3D3D8D8D8E3E3E3EDEDEDF7F7F7FDFDFDFFFFFF0000FFFF + FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFC + FCFE636ED11F35C81D3CDA2344E4193DE51F42E61F42E61F41E3203FDE223ACF + 2434BFBBC1EDFFFFFFFFFFFFFFFFFFFEFEFEF8F8F8ECECECDEDEDECFCFCFC3C3 + C3BFBFBFBFBFBFC2C2C2C2C2C2C1C1C1BFBFBFC3C3C3CDCDCDD7D7D7DBDBDBD8 + D8D8D1D1D1C4C4C4BFBFBFC3C3C3CBCBCBCFCFCFCFCFCFCACACAC3C3C3C0C0C0 + C5C5C5CDCDCDD1D1D1CFCFCFC7C7C7BBBBBBB0B0B0A9A9A9A5A5A5A2A2A29F9F + 9FA0A0A0A3A3A3AAAAAAB0B0B0B3B3B3ADADADA4A4A49B9B9B9C9C9CA7A7A7B9 + B9B9C7C7C7D1D1D1D4D4D4D5D5D5D6D6D6DBDBDBDEDEDEDDDDDDD6D6D6CACACA + BCBCBCB0B0B0AAAAAAA7A7A7A7A7A7AAAAAAAFAFAFB7B7B7C0C0C0C7C7C7C8C8 + C8C3C3C3BABABAB1B1B1AAAAAAA7A7A7A6A6A6A7A7A7ABABABB3B3B3BEBEBEC8 + C8C8CDCDCDCCCCCCC7C7C7C0C0C0C0C0C0C8C8C8D4D4D4DADADADADADAD4D4D4 + C8C8C8C1C1C1C3C3C3CECECED7D7D7DADADAD7D7D7CECECEC3C3C3C1C1C1C8C8 + C8D7D7D7E6E6E6F3F3F3FBFBFBFFFFFF0000FFFFFFFFFFFFFFFFFFFFFFFFFFFF + FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFD9DCF6213AD33150E5B0BEF7C4 + CDF85972EA173AE21F41E31E40E31E41E41F42E5203FDC6B78DBFFFFFFFFFFFF + FFFFFFFEFEFEF6F6F6E8E8E8D6D6D6C4C4C4B5B5B5B0B0B0B0B0B0B3B3B3B3B3 + B3B3B3B3B0B0B0B5B5B5C2C2C2CDCDCDD2D2D2CFCFCFC6C6C6B6B6B6B0B0B0B5 + B5B5BFBFBFC4C4C4C4C4C4BEBEBEB5B5B5B1B1B1B6B6B6BEBEBEC1C1C1BFBFBF + B6B6B6AAAAAAA2A2A29E9E9E9E9E9E9B9B9B96969693939395959589898C7A7A + 8A8181979797A3A4A4A49C9C9C9E9E9EA7A7A7B9B9B9C6C6C6D1D1D1D4D4D4D5 + D5D5D5D5D5D9D9D9D8D8D8D3D3D3C8C8C8B9B9B9ABABABA3A3A3A1A1A1A1A1A1 + A1A1A1A4A4A4A7A7A7ABABABB0B0B0B5B5B5B4B4B4AEAEAEA7A7A7A2A2A2A0A0 + A09F9F9FA0A0A0A0A0A0A1A1A1A4A4A4ADADADB5B5B5BCBCBCBBBBBBB7B7B7B0 + B0B0B2B2B2BCBCBCC9C9C9D1D1D1D1D1D1C9C9C9BCBCBCB2B2B2B5B5B5C2C2C2 + CDCDCDD1D1D1CDCDCDC2C2C2B5B5B5B2B2B2BCBCBCCECECEE0E0E0F0F0F0FBFB + FBFFFFFF0000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF + FFFFFFFFFFFFFFB3B6EB1539E26980EDA3B1F38295EFBFCAF71C3FE2193CE218 + 3BE2183BE21C3FE31F42E5334EDEFFFFFFFFFFFFFFFFFFFEFEFEF5F5F5E5E5E5 + D1D1D1BCBCBCAAAAAAA4A4A4A5A5A5A9A9A9A9A9A9A8A8A8A6A6A6ABABABB9B9 + B9C6C6C6CCCCCCC8C8C8BEBEBEADADADA6A6A6AAAAAAB6B6B6BCBCBCBCBCBCB5 + B5B5AAAAAAA6A6A6AAAAAAB1B1B1B3B3B3B0B0B0A7A7A7A0A0A09D9D9DA0A0A0 + A2A2A2A0A0A09898989191918E8E8E29293003032806064A08086432327C9C9C + 9C9E9E9EA7A7A7BABABAC9C9C9D6D6D6DBDBDBDDDDDDDCDCDCDBDBDBD6D6D6CB + CBCBBCBCBCACACACA1A1A19E9E9EA2A2A2A7A7A7AAAAAAABABABABABABAAAAAA + A9A9A9A8A8A8A5A5A59E9E9E9B9B9B9B9B9BA0A0A0A5A5A5A7A7A7A5A5A5A1A1 + A19E9E9EA1A1A1A6A6A6ACACACADADADA9A9A9A4A4A4A7A7A7B2B2B2C2C2C2CB + CBCBCBCBCBC2C2C2B2B2B2A7A7A7AAAAAABABABAC5C5C5CBCBCBC5C5C5BABABA + AAAAAAA7A7A7B2B2B2C7C7C7DBDBDBEEEEEEFAFAFAFFFFFF0000FFFFFFFFFFFF + FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFE1E3F78891DC626DD24352C91E40 + E22546E5183BE2627AEBC3CCF71C3FE33252E5A6B3F4A9B5F52E4DE51C3FE32C + 4AE1FFFFFFFFFFFFFFFFFFFDFDFDF4F4F4E3E3E3CDCDCDB6B6B6A4A4A49E9E9E + 9E9E9EA2A2A2A2A2A2A1A1A19F9F9FA4A4A4B3B3B3C2C2C2C8C8C8C5C5C5B9B9 + B9A6A6A69E9E9EA4A4A4B1B1B1B6B6B6B6B6B6AFAFAFA4A4A49E9E9EA1A1A1A7 + A7A7A8A8A8A4A4A49E9E9E9B9B9B9E9E9EA7A7A7ADADADACACACA2A2A2959595 + 8E8E8E43434300000103032305054607075A6161819E9E9EA8A8A8BCBCBCCECE + CEDDDDDDE4E4E4E6E6E6E4E4E4E0E0E0D6D6D6C6C6C6B3B3B3A3A3A39B9B9B9F + 9F9FAAAAAAB3B3B3B9B9B9BBBBBBB7B7B7B0B0B0AAAAAAA4A4A49D9D9D959595 + 9595959B9B9BA7A7A7B0B0B0B4B4B4B0B0B0A7A7A79D9D9D9A9A9A9B9B9BA0A0 + A0A1A1A19F9F9F9B9B9B9F9F9FACACACBDBDBDC6C6C6C6C6C6BDBDBDACACACA1 + A1A1A4A4A4B4B4B4C2C2C2C7C7C7C2C2C2B4B4B4A4A4A4A1A1A1ACACACC2C2C2 + D9D9D9EDEDEDFAFAFAFFFFFF0000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF + FCFDFEA1A6E33746C42434BC2434BC2335BF1F40E11E40E41337E26B81ECC5CD + F81A3CE3B1BCF6FFFFFFFFFFFF5D74EB1539E22E4AE1FFFFFFFFFFFFFFFFFFFD + FDFDF3F3F3E2E2E2CBCBCBB4B4B4A1A1A19B9B9B9B9B9B9F9F9FA0A0A09E9E9E + 9C9C9CA1A1A1B0B0B0BFBFBFC6C6C6C2C2C2B6B6B6A4A4A49B9B9BA1A1A1AFAF + AFB4B4B4B4B4B4ADADADA1A1A19A9A9A9B9B9BA0A0A0A1A1A19E9E9E9999999B + 9B9BA4A4A4B1B1B1BABABAB9B9B9AEAEAE9E9E9E929292808080858585404040 + 0303240505413838659E9E9EA9A9A9BEBEBED1D1D1E3E3E3ECECECF0F0F0EDED + EDE5E5E5D7D7D7C3C3C3ADADAD9E9E9E9A9A9AA4A4A4B3B3B3C2C2C2CBCBCBCE + CECEC8C8C8BDBDBDB1B1B1A6A6A69B9B9B9292929393939E9E9EB0B0B0BEBEBE + C4C4C4BEBEBEB0B0B0A0A0A09898989595959898989999999898989595959B9B + 9BA9A9A9BABABAC4C4C4C5C5C5BBBBBBAAAAAA9E9E9EA1A1A1B2B2B2BFBFBFC5 + C5C5BFBFBFB2B2B2A1A1A19E9E9EAAAAAAC1C1C1D7D7D7ECECECFAFAFAFFFFFF + 0000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFCED2F32030BA1A2DBE1A2BBD + 1F31BD2434BF213CD11F42E6173BE35A73EBA9B6F41639E17C8DF3F4F5FFC8D1 + F82B4BE51B3FE4455CE2FFFFFFFFFFFFFFFFFFFDFDFDF3F3F3E2E2E2CBCBCBB4 + B4B4A1A1A19B9B9B9B9B9B9F9F9F9F9F9F9E9E9E9B9B9BA0A0A0AFAFAFBEBEBE + C5C5C5C1C1C1B6B6B6A3A3A39B9B9BA1A1A1AEAEAEB4B4B4B4B4B4ADADADA1A1 + A19A9A9A9A9A9A9E9E9E9E9E9E9B9B9B9898989C9C9CAAAAAABBBBBBC6C6C6C5 + C5C5B9B9B9A7A7A79898989595959A9A9A76767601010803032A2D2D529E9E9E + AAAAAABFBFBFD5D5D5E9E9E9F5F5F5F9F9F9F5F5F5EBEBEBD9D9D9C2C2C2ACAC + AC9D9D9D9B9B9BAAAAAABDBDBDCECECEDADADADDDDDDD6D6D6C8C8C8B9B9B9AA + AAAA9C9C9C929292959595A4A4A4B9B9B9C9C9C9D1D1D1C9C9C9B9B9B9A5A5A5 + 989898949494959595969696959595949494999999A7A7A7B9B9B9C2C2C2C3C3 + C3B9B9B9A8A8A89C9C9CA0A0A0B0B0B0BEBEBEC4C4C4BFBFBFB1B1B1A1A1A19E + 9E9EAAAAAAC0C0C0D7D7D7ECECECFAFAFAFFFFFF0000FFFFFFFFFFFFFFFFFFFF + FFFFFFFFFFFFFFFF7C89E23850D86679E27082E73954E11737DC213EDA213FDD + 1F41E22043E52546E41E3BD51A367E364FBA2A49E71B3EE41F43E88A93DDFFFF + FFFFFFFFFFFFFFFDFDFDF3F3F3D4D4D79696A886869C8484959B9B9B9B9B9B8C + 8C9776768E74748D8787919D9D9DAAAAAAB8B8B8BFBFBF8B8B9D84849A77778F + 9A9A9AA0A0A0ADADADA8A8AC8585997F7F968383949898989797979B9B9B9B9B + 9B98989884848D6060825F5F896969959595B0BBBBC28B8BA77D7D957C7C8895 + 95959A9A9A7676760000000101122C2C459E9E9EAAAAAAC0C0C0AFAFB9AEAEBC + B7B7C6EEEEF2FAFAFAEEEEEEDBDBDBC4C4C4ACACAC9494986161825F5F896A6A + 977474A3B4B4C8DFDFDFD9D9D9CBCBCBBCBCBCACACAC9E9E9E9393936666825C + 5C866868947272A09C9CB9CBCBCBBABABAA6A6A69999999494948C8C916F6F84 + 6E6E86787888969696A2A2A2B3B3B3BCBCBC9A9AA686869B7A7A928F8F949B9B + 9BAAAAAAB8B8B8B2B2B689899C8181988282929C9C9CA9A9A9C0C0C0D7D7D7EC + ECECFAFAFAFFFFFF0000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF2642DD95 + A7F6CFD7FB8A9DF1CFD7FA526DEB173BE31F40DE203FDB1F3DD91E3DDE283FD4 + 2645541A3D8D2241EF2344E25468D3EEEEF7FFFFFFFFFFFFFFFFFFFDFDFDF3F3 + F3A6A6AE05053E0606553131709B9B9B9B9B9B59597E07075C07076154547B97 + 9797A1A1A1ADADADB4B4B405053C0707570707619797979E9E9EACACAC838393 + 06064907075C30307392929292929297979798989854547005054606064A0606 + 4906064A0606532A2A710808670707622C2C6092929298989876767600000000 + 00062C2C3B9E9E9EAAAAAAC1C1C13C3C4F02021B030323BCBCC6FBFBFBF0F0F0 + DDDDDDC7C7C761617A0F0F4C06064905054806064A06065007075A4C4C89C3C3 + CAC5C5C5B9B9B9ADADAD76768A19195706064B06064906064B06065307075F20 + 20769393A6A2A2A29898989595957171850606540707612C2C6C9191919B9B9B + A8A8A8B2B2B233335906065007075F6C6C83939393A1A1A1AEAEAE8585910505 + 4307075C2F2F6F9B9B9BA9A9A9C1C1C1D9D9D9EDEDEDFAFAFAFFFFFF0000FFFF + FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF1C3BDDA1B0F49AA9F2001DDE8C9DF1B8 + C2F6173BE21E40E41F41E31F40E01F42E64D5ED469758B61727FD1D5F5D2D6F3 + F5F6FBFFFFFFFFFFFFFFFFFFFFFFFFFDFDFDF4F4F4A6A6A80303280505443131 + 659C9C9C9D9D9D59597706064B060653525273929292989898A1A1A1A7A7A703 + 03240505460606539696969F9F9FACACAC82828D04043506064B2D2D698C8C8C + 8E8E8E94949454546B04043003032A02021C15151E16161801010F0303290505 + 4306064D2A2A598E8E8E9797977676760000000101072B2B38A0A0A0ABABABC2 + C2C23A3A3A000000000000BBBBBCFCFCFCF2F2F2E2E2E270707F03032D03032B + 02021B16161B21212100000302021A04043538386ABABABAB3B3B38D8D9A0505 + 4604043903032401010D2E2E3001010C03032905054807075D8282939A9A9A9B + 9B9B75758706064A0606542B2B648E8E8E9393939E9E9EA5A5A52F2F4405053E + 06065267677A8D8D8D989898A3A3A37C7C8203032E06064D2D2D659B9B9BABAB + ABC4C4C4DBDBDBEFEFEFFBFBFBFFFFFF0000FFFFFFFFFFFFFFFFFFFFFFFFFFFF + FFFFFFFF203DDBA1B0F599A8F2001EDE8597F0BDC7F71135E11034E11437E21B + 3DE31F42E62C49E17F869D626F5FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF + FFFFFFFEFEFEF5F5F5A7A7A701011004042F313159A3A3A3A3A3A35C5C710404 + 3905054153536E9292929393939898989D9D9D01010C040432050541999999A3 + A3A3AEAEAE82828702021F0404372B2B5C86868689898989898C0D0D3202021F + 01010C3D3D3D9B9B9BA1A1A159595900000002021504042F27274B8A8A8A9595 + 9578787800000001010B2D2D39A6A6A6B0B0B0C5C5C5B1B1B1AFAFAFB7B7B7EF + EFEFFDFDFDF5F5F5CACACB01011102021A01010F5656569E9E9EA2A2A27C7C7C + 0C0C0C0000000202146B6B7CB0B0B01A1A4504043202021C1E1E1E929292A2A2 + A29D9D9D21212102021505053C1A1A5A9F9F9FA4A4A47E7E8D05053C0505462C + 2C598F8F8F9090909696969C9C9C2B2B3003032A0505416666758B8B8B939393 + 9B9B9B75757602021705053C2D2D589E9E9EB1B1B1C9C9C9DFDFDFF1F1F1FBFB + FBFFFFFF0000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF7281DF98A9F5D4DA + FA91A2F1D1D9F95871EA4A65E98495F06B81ED3250E61E40E42C4BE6868CA55D + 6A5FFEFEFEFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFEFEFEF5F5F5A9A9A9 + 00000002021732324BACACACACACAC60606C03032404042F57576B9797979494 + 9495959598989800000002021C03032EA1A1A1ABABABB4B4B483838301010702 + 022027274B8080808484844F4F6102021C0101102C2C2C9E9E9E9D9D9D9E9E9E + 9B9B9B28282800000001010F24243988888895959579797900000001010C2F2F + 3CAFAFAFB8B8B8CBCBCBDEDEDEEFEFEFFBFBFBFFFFFFFEFEFEF8F8F880808000 + 000101010C313131A7A7A7A1A1A19F9F9FA0A0A04B4B4B000000000000464646 + 9191930202150202190000039C9C9CA1A1A1A0A0A0A1A1A19797970000000202 + 170404358A8A95B1B1B188889303032D0404352E2E5097979793939395959598 + 989829292902021404042F6868738F8F8F949494999999727272000001030326 + 2D2D4DA7A7A7BBBBBBD1D1D1E5E5E5F3F3F3FCFCFCFFFFFF0000FFFFFFFFFFFF + FFFFFFFFFFFFFFFFFFFFFFFFCFD2EC415DE3758BEF7F92EF405DE7667CECFFFF + FFFFFFFFFFFFFFF2F4FD405DEB213FDF888EA65B675DFEFEFEFFFFFFFFFFFFFF + FFFFFFFFFFFFFFFFFFFFFFFEFEFEF7F7F7ACACAC00000000000233333EB5B5B5 + B6B6B66565680101110202205E5E6DA4A4A49E9E9E9C9C9C9D9D9D0000000101 + 0802021BAFAFAFB9B9B9BEBEBE8888880000000101072525387C7C7C8282823B + 3B4601010D0000055E5E5EABABABA7A7A7A4A4A49E9E9E5A5A5A000000000000 + 24242B8989899898987B7B7B00000001010C31313EB7B7B7C0C0C0D1D1D1E2E2 + E2F1F1F1FBFBFBFFFFFFFEFEFEFBFBFB5151510000000000016B6B6BB6B6B6AC + ACACA6A6A6A3A3A38F8F8F5A5A5A5E5E5E949494676767000000000005404040 + B7B7B7AEAEAEA8A8A8A4A4A4A4A4A4373737000000020217656575C3C3C39494 + 9A02021B03032532324DA5A5A59F9F9F9E9E9E9E9E9E2B2B2B00000303032172 + 727B9D9D9D9F9F9FA1A1A17676760000000202142F2F45B6B6B6C8C8C8DBDBDB + ECECECF7F7F7FDFDFDFFFFFF0000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF + FFFFFF727FD61338E51337E20F34E25A72EBD0D6FEE7E7FFE5E8FFA3B0F52949 + E77985D6B6B8C2525B53FEFEFEFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFE + FEFEF8F8F8ADADAD000000000000343439BFBFBFC0C0C06B6B6C01010D030321 + 69697BB9B9B9B3B3B3B0B0B0AFAFAF000000000006020217C3C3C3CBCBCBCDCD + CD9090900000000000012626337D7D7D83838329292E01010801010B8A8A8BBD + BDBDB9B9B9B6B6B6ADADAD76767600000000000025252A8D8D8D9B9B9B7E7E7E + 00000001010D353542C0C0C0C8C8C8D7D7D7E6E6E6F3F3F3FBFBFBFFFFFFFFFF + FFFDFDFD4343430000000000059E9EA0CBCBCBBFBFBFB8B8B8B3B3B3B3B3B3B6 + B6B6BCBCBCC6C6C6717171000000000005737375CCCCCCC2C2C2BABABAB5B5B5 + B3B3B3626262000000000002707075D6D6D6A0A0A3010112030323373755BCBC + BCB5B5B5B2B2B2B0B0B030303001010803032684848FB5B5B5B5B5B5B5B5B583 + 8383000000010110353547C9C9C9D8D8D8E6E6E6F2F2F2FAFAFAFEFEFEFFFFFF + 0000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFEBEDFA556AE21F41E3 + 1F42E42040E73250B03D5C88949EE28D99E7A2AAE4FCFCFDB9BABD525C58FEFE + FEFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFEFEFEF8F8F8AFAFAF00000000 + 000037373BC7C7C7CACACA71717202021403032E76768FD1D1D1CCCCCCC8C8C8 + C8C8C800000001011102021ED8D8D8DDDDDDDCDCDC99999900000001010F2828 + 3B8484848888882A2A2F01010F02021E95959ECECECECECECECBCBCBC2C2C285 + 858500000001010D282835959595A1A1A181818100000001010D373746C8C8C8 + CECECEDBDBDBE9E9E9F5F5F5FCFCFCFFFFFFFFFFFFFEFEFE4444440000000101 + 11AAAAB3DEDEDED5D5D5CECECECACACAC9C9C9CCCCCCD1D1D1DADADA7A7A7A00 + 000001010F7E7E8CE0E0E0D7D7D7D0D0D0CBCBCBCACACA6E6E6E000000000000 + 797979E6E6E6ABABAB01011003032B3F3F67D3D3D3CECECECBCBCBC9C9C93636 + 3602021C0404399797A7CECECECECECECCCCCC9595950000010202173B3B4DDC + DCDCE6E6E6F0F0F0F8F8F8FCFCFCFEFEFEFFFFFF0000FFFFFFFFFFFFFFFFFFFF + FFFFFFFFFFFFFFFFFFFFFFFFFFFFF6F6FDB3BAED98A3EAC8CDF3B9BEC7305735 + FFFFFFFFFFFFFFFFFFFFFFFFAFB0AF818B87FEFEFEFFFFFFFFFFFFFFFFFFFFFF + FFFFFFFFFFFFFFFEFEFEF9F9F9B0B0B0000000000000383838CBCBCBCFCFCF75 + 75750101100404307F7F9DE4E4E4E1E1E1DEDEDEDDDDDD01010A02021502021A + E9E9E9ECECECE8E8E8A1A1A100000602021A2C2C448E8E8E8F8F8F3434360101 + 0B030323828297DDDDDDDFDFDFDEDEDED6D6D679797C02021502021F2C2C3FA0 + A0A0A9A9A9858585000000010107383845CBCBCBD1D1D1DEDEDEEAEAEAF5F5F5 + FCFCFCFFFFFFFFFFFFFFFFFF55555500000001010F9494A8EDEDEDE7E7E7E2E2 + E2DFDFDFDEDEDEE0E0E0E5E5E5EAEAEA82828200000001010F64647DEFEFEFE9 + E9E9E3E3E3E0E0E0DEDEDE5A5A5A000000000000818181F3F3F3B4B4B4000001 + 030326313161E6E6E6E3E3E3E0E0E0DEDEDE3D3D4603032505053EA7A7B9E3E3 + E3E3E3E3E1E1E1A5A5A801010C02021740404EECECECF2F2F2F8F8F8FBFBFBFE + FEFEFFFFFFFFFFFF0000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF + FFFFFFFFFFFFFFFFFFFFFFFFFFFFFDFDFD5F75687C877EFFFFFFFFFFFFFFFFFF + B0B1B0ADB1AFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFEFEFEF9F9 + F9B0B0B0000000000000383838CDCDCDD2D2D278787800000002021A44446AF3 + F3F3F2F2F2F0F0F0E0E0E101010801010801010AF5F5F5F7F7F7F2F2F2A9A9A9 + 01010802021E30304A9D9D9D9B9B9B5959590000000101115A5A74E6E6E6ECEC + ECEEEEEEE8E8E8595968030324030326313144AEAEAEB4B4B48C8C8C00000000 + 0000373739CECECED4D4D4DFDFDFEBEBEBF5F5F5FCFCFCFFFFFFFFFFFFFFFFFF + 8A8A8A00000000000066667DF8F8F8F5F5F5F2F2F2F0F0F08585A34343636262 + 68B4B4B4B7B7B700000000000023233DF9F9F9F6F6F6F3F3F3F1F1F1F0F0F01F + 1F1F000000000000B6B6B6FBFBFBB8B8B800000001010B04042FE5E5E9F2F2F2 + F1F1F1F0F0F042424902021904042F85859EF3F3F3F3F3F3F2F2F2B1B1B50101 + 0A010108424246F7F7F7FAFAFAFCFCFCFEFEFEFFFFFFFFFFFFFFFFFF0000FFFF + FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF + FFFFFFFFFFDCDCDC32513FDEDFDEFFFFFFFFFFFF8D8F8EB7B9B8FFFFFFFFFFFF + FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFEFEFEFAFAFAB1B1B10000000000003939 + 39D3D3D3D8D8D87A7A7A000000000000020215BABAC5FCFCFCFBFBFB88888C00 + 0000000000111111FDFDFDFDFDFDF9F9F9B0B0B0000006020220363651B0B0B0 + ABABAB8F8F8F000000000000010110C0C0C8F4F4F4F8F8F89595A002021E0303 + 24030323363647BFBFBFC3C3C3949494000000000000393939D3D3D3D8D8D8E3 + E3E3EDEDEDF7F7F7FDFDFDFFFFFFFFFFFFFFFFFFCFCFCF000000000000000003 + ABABB9FDFDFDFCFCFCCDCDDB15154C030324000000A9A9A9FEFEFE1111110000 + 0000000067677CFDFDFDFCFCFCFBFBFB65656C000000000000111111FEFEFEFE + FEFEBABABA00000000000001010867677BFCFCFCFCFCFCDCDCDD000000000000 + 01010C13132DDDDDE2FCFCFCFCFCFC646467000000000000444444FDFDFDFEFE + FEFEFEFEFFFFFFFFFFFFFFFFFFFFFFFF0000FFFFFFFFFFFFFFFFFFFFFFFFFFFF + FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFB1B5B360 + 7268FDFDFDFFFFFF7E8281D1D3D3FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF + FFFFFFFEFEFEFBFBFBB4B4B40000000000003C3C3CDDDDDDE1E1E17E7E7E0000 + 00000000000000000000666666666666000000000000000000555555FFFFFFFF + FFFF4444442F2F2F00000002021B111130373745343434C2C2C2434343000000 + 0000000000006363656565680000030101070101120202163A3A45D2D2D2D4D4 + D49F9F9F0000000000003B3B3BDDDDDDE1E1E1E9E9E9F1F1F1F8F8F8FDFDFDFF + FFFFFFFFFFFFFFFFFFFFFF555555000000000000000000565661787889141430 + 010112000000212121FFFFFFFFFFFF9A9A9A0000000000000000003232378A8A + 912121240000000000000000009A9A9AFFFFFFFFFFFFBBBBBB00000000000000 + 00000000003131318A8A8A212121000000000000000000000000111111767676 + 4545450000000000000000008A8A8AFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF + FFFFFFFF0000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF + FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF5E716A8F9995FFFFFF84898AF5 + F5F5FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFEFEFEFCFCFCB6B6B6 + 0000000000003F3F3FE6E6E6E9E9E98181810000000000001111110000000000 + 00000000000000000000111111CFCFCFFFFFFFFFFFFF00000000000000000000 + 000202021401010B000000D6D6D6CCCCCC2B2B2B000000000000000000000000 + 0000001010100000000000023E3E42E3E3E3E4E4E4A9A9A90000000000003E3E + 3EE6E6E6E9E9E9EFEFEFF5F5F5FBFBFBFEFEFEFFFFFFFFFFFFFFFFFFFFFFFFEF + EFEF454545000000000000000000000000000000000000111111CFCFCFFFFFFF + FFFFFFFFFFFF8A8A8A0000000000000000000000000000000000000000009A9A + 9AFFFFFFFFFFFFFFFFFFBBBBBB00000000000011111111111100000000000000 + 00000000000000009A9A9A313131000000000000000000000000000000313131 + EFEFEFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF0000FFFFFFFFFFFF + FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF + FFFFFFFFFFFFFFECEDED56635C909896BDC1C1FFFFFFFFFFFFFFFFFFFFFFFFFF + FFFFFFFFFFFFFFFFFFFFFFFFFFFFFEFEFEDCDCDC868686848484929292F0F0F0 + F2F2F2B4B4B4878787888888BABABA9A9A9A555555454545454545767676DFDF + DFFFFFFFFFFFFFFFFFFF8989896565650000000000001F1F1F7F7F7F7D7D7DE6 + E6E6E9E9E9EDEDED939393535353444444454545898989A7A7A7000000000000 + 414141F0F0F0F0F0F0D4D4D4838383828282919191F0F0F0F2F2F2F5F5F5F9F9 + F9FCFCFCFEFEFEFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFBBBBBB76767645 + 45454545454545458A8A8AEFEFEFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFDFDFDF + 8A8A8A454545454545454545767676DFDFDFFFFFFFFFFFFFFFFFFFFFFFFFDFDF + DF8A8A8A8A8A8A9A9A9ADFDFDF767676454545454545666666BBBBBBFFFFFFEF + EFEF8A8A8A4545454545454545458A8A8AEFEFEFFFFFFFFFFFFFFFFFFFFFFFFF + FFFFFFFFFFFFFFFFFFFFFFFF0000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF + FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFEBEB + EB464E4BCACCCCFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF + FFFFFEFEFEFEFEFEFCFCFCFBFBFBF9F9F9F9F9F9FAFAFAFBFBFBFDFDFDFEFEFE + FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF + FFBABABA000000000000434343F7F7F7F5F5F5F5F5F5F5F5F5F7F7F7F9F9F9FB + FBFBFEFEFEFEFEFEFEFEFEBABABA000000000000434343F9F9F9F9F9F9FAFAFA + FAFAFAF9F9F9F9F9F9F9F9F9FAFAFAFBFBFBFDFDFDFEFEFEFFFFFFFFFFFFFFFF + FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF + FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF + FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF + FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF + FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF + 0000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF + FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFBDBEBD68726FF7F8F8FFFF + FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFEFEFEFBABABABA + BABACECECEFEFEFEFEFEFEFEFEFEFEFEFEFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF + FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFBBBBBB0000000000001111 + 11EEEEEEFDFDFDFDFDFDFDFDFDFDFDFDFEFEFEFEFEFEFFFFFFFFFFFFFFFFFFBB + BBBB000000000000454545FEFEFEFEFEFEEEEEEEBABABABABABACECECFFEFEFE + FEFEFEFEFEFEFEFEFEFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF + FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF + FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF + FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF + FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF + FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF0000FFFFFFFFFFFFFFFFFFFF + FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF + FFFFFFFFFFFFFFFFFFFFFFFFB0B0AF8B9291FCFDFDFFFFFFFFFFFFFFFFFFFFFF + FFFFFFFFFFFFFFFFFFFFFFFFFFBBBBBB000000000000454545FFFFFFFFFFFFFF + FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF + FFFFFFFFFFFFFFFFFFEFEFEF000000000000000000212121454545767676FFFF + FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFBBBBBB000000000000454545FF + FFFFFFFFFFBBBBBB000000000000454545FFFFFFFFFFFFFFFFFFFFFFFFFFFFFF + FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF + FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF + FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF + FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF + FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF + FFFFFFFFFFFFFFFF009AFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF + FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF + FFFFFF969999BEC2C2FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF + FFBBBBBB000000000000454545FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF + FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF + 9A9A9A000000000000000000000000000000FFFFFFFFFFFFFFFFFFFFFFFFFFFF + FFFFFFFFFFFFFFBBBBBB000000000000454545FFFFFFFFFFFFBBBBBB00000000 + 0000454545FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF + FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF + FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF + FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF + FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF + FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF007DFFFF + FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF + FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF6F6F6949595F6F6F6 + FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFEFEFEFBBBBBBBBBBBBCFCF + CFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF + FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFDFDFDF8A8A8A8A8A8A + 8A8A8A9A9A9AFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFEFEFEFBBBB + BBBBBBBBCFCFCFFFFFFFFFFFFFEFEFEFBBBBBBBBBBBBCFCFCFFFFFFFFFFFFFFF + FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF + FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF + FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF + FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF + FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF + FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF005CFFFFFFFFFFFFFFFFFFFFFFFFFFFF + FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF + FFFFFFFFFFFFFFFFFFFFFFFFFFFF999F9EA6A9A7FFFFFFFFFFFFFFFFFFFFFFFF + FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF + FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF + FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF + FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF + FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF + FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF + FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF + FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF + FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF + FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF + FFFFFFFF0042FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF + FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF + FFFF929A977F8782FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF + FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF + FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF + FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF + FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF + FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF + FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF + FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF + FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF + FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF + FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF002A} + end + object Bevel2: TBevel + Left = 488 + Top = 326 + Width = 136 + Height = 34 + end + object Label3: TLabel + Left = 272 + Top = 16 + Width = 221 + Height = 29 + Caption = 'emisor de Recibos' + Font.Charset = DEFAULT_CHARSET + Font.Color = clWindowText + Font.Height = -24 + Font.Name = 'MS Sans Serif' + Font.Style = [fsBold, fsUnderline] + ParentFont = False + end + object Label4: TLabel + Left = 216 + Top = 64 + Width = 353 + Height = 89 + AutoSize = False + Caption = 'Aplicación para la emisión de recibos.' + Font.Charset = DEFAULT_CHARSET + Font.Color = clWindowText + Font.Height = -19 + Font.Name = 'MS Sans Serif' + Font.Style = [] + ParentFont = False + WordWrap = True + end + end + object EmisionRecibos: TTabSheet + Caption = 'Emision de Recibos' + ImageIndex = 1 + object Panel1: TPanel + Left = 0 + Top = 0 + Width = 624 + Height = 363 + Align = alClient + BevelOuter = bvLowered + BevelWidth = 2 + BorderWidth = 1 + BorderStyle = bsSingle + Color = clWhite + TabOrder = 0 + object Shape5: TShape + Left = 8 + Top = 184 + Width = 601 + Height = 65 + Shape = stRoundRect + end + object Shape6: TShape + Left = 464 + Top = 168 + Width = 145 + Height = 81 + end + object Shape7: TShape + Left = 565 + Top = 192 + Width = 40 + Height = 36 + end + object Shape1: TShape + Left = 8 + Top = 8 + Width = 601 + Height = 70 + Shape = stRoundRect + end + object Shape3: TShape + Left = 472 + Top = 8 + Width = 137 + Height = 35 + Brush.Color = 16762111 + end + object spLineaSup: TShape + Left = 8 + Top = 42 + Width = 601 + Height = 1 + end + object Label5: TLabel + Left = 16 + Top = 10 + Width = 48 + Height = 13 + Caption = 'NUMERO' + end + object Label6: TLabel + Left = 96 + Top = 10 + Width = 131 + Height = 13 + Caption = 'LUGAR DE LIBRAMIENTO' + end + object Label7: TLabel + Left = 480 + Top = 10 + Width = 49 + Height = 13 + Caption = 'IMPORTE' + Transparent = True + end + object Label8: TLabel + Left = 16 + Top = 44 + Width = 129 + Height = 13 + Caption = 'FECHA DE LIBRAMIENTO' + end + object Label9: TLabel + Left = 336 + Top = 44 + Width = 74 + Height = 13 + Caption = 'VENCIMIENTO' + end + object Shape2: TShape + Left = 88 + Top = 8 + Width = 1 + Height = 34 + end + object Label10: TLabel + Left = 320 + Top = 84 + Width = 283 + Height = 13 + Caption = 'Por este documento pagará usted al vencimiento expresado' + end + object Label11: TLabel + Left = 8 + Top = 100 + Width = 13 + Height = 20 + Caption = 'a:' + Font.Charset = DEFAULT_CHARSET + Font.Color = clWindowText + Font.Height = -16 + Font.Name = 'MS Sans Serif' + Font.Style = [] + ParentFont = False + end + object Shape4: TShape + Left = 8 + Top = 120 + Width = 601 + Height = 1 + Pen.Style = psDot + end + object Label12: TLabel + Left = 8 + Top = 124 + Width = 99 + Height = 20 + Caption = 'la cantidad de' + Font.Charset = DEFAULT_CHARSET + Font.Color = clWindowText + Font.Height = -16 + Font.Name = 'MS Sans Serif' + Font.Style = [] + ParentFont = False + end + object Label13: TLabel + Left = 8 + Top = 164 + Width = 156 + Height = 13 + Caption = 'en el domicilio de pago siguiente:' + end + object Label14: TLabel + Left = 16 + Top = 188 + Width = 115 + Height = 13 + Caption = 'PERSONA o ENTIDAD:' + end + object Label15: TLabel + Left = 16 + Top = 204 + Width = 58 + Height = 13 + Caption = 'DOMICILIO:' + end + object Label16: TLabel + Left = 520 + Top = 170 + Width = 36 + Height = 13 + Caption = 'C. C. C.' + end + object Label17: TLabel + Left = 365 + Top = 235 + Width = 102 + Height = 13 + Caption = 'NUM. DE CUENTA: .' + end + object Label18: TLabel + Left = 576 + Top = 194 + Width = 21 + Height = 13 + Caption = 'D.C.' + end + object Label19: TLabel + Left = 8 + Top = 252 + Width = 63 + Height = 13 + Caption = 'CLAUSULAS' + end + object Label20: TLabel + Left = 435 + Top = 252 + Width = 171 + Height = 13 + Caption = 'Firma, nombre y domicilio del librador' + end + object Shape8: TShape + Left = 8 + Top = 272 + Width = 377 + Height = 81 + Shape = stRoundRect + end + object Label21: TLabel + Left = 16 + Top = 276 + Width = 171 + Height = 13 + Caption = 'Nombre, domicilio y N.I.F. del librado' + end + object DBText1: TDBText + Left = 16 + Top = 24 + Width = 72 + Height = 18 + DataField = 'Id' + DataSource = DsRecibos + Font.Charset = DEFAULT_CHARSET + Font.Color = clWindowText + Font.Height = -16 + Font.Name = 'Courier New' + Font.Style = [fsBold] + ParentFont = False + end + object DBEdit1: TDBEdit + Left = 96 + Top = 24 + Width = 353 + Height = 18 + BorderStyle = bsNone + DataField = 'LugarLibramiento' + DataSource = DsRecibos + Font.Charset = DEFAULT_CHARSET + Font.Color = clWindowText + Font.Height = -16 + Font.Name = 'Courier New' + Font.Style = [fsBold] + ParentFont = False + TabOrder = 0 + end + object DBEdit2: TDBEdit + Left = 480 + Top = 24 + Width = 121 + Height = 18 + BorderStyle = bsNone + Color = 16762111 + DataField = 'Importe' + DataSource = DsRecibos + Font.Charset = DEFAULT_CHARSET + Font.Color = clWindowText + Font.Height = -16 + Font.Name = 'Courier New' + Font.Style = [fsBold] + ParentFont = False + TabOrder = 1 + end + object DBEdit3: TDBEdit + Left = 16 + Top = 58 + Width = 225 + Height = 18 + BorderStyle = bsNone + DataField = 'FechaLibramiento' + DataSource = DsRecibos + Font.Charset = DEFAULT_CHARSET + Font.Color = clWindowText + Font.Height = -16 + Font.Name = 'Courier New' + Font.Style = [fsBold] + ParentFont = False + TabOrder = 2 + end + object DBEdit4: TDBEdit + Left = 336 + Top = 58 + Width = 225 + Height = 18 + BorderStyle = bsNone + DataField = 'Vencimiento' + DataSource = DsRecibos + Font.Charset = DEFAULT_CHARSET + Font.Color = clWindowText + Font.Height = -16 + Font.Name = 'Courier New' + Font.Style = [fsBold] + ParentFont = False + TabOrder = 3 + end + object DBEdit5: TDBEdit + Left = 32 + Top = 102 + Width = 577 + Height = 18 + BorderStyle = bsNone + DataField = 'PagarA' + DataSource = DsRecibos + Font.Charset = DEFAULT_CHARSET + Font.Color = clWindowText + Font.Height = -16 + Font.Name = 'Courier New' + Font.Style = [fsBold] + ParentFont = False + TabOrder = 4 + end + object DBEdit6: TDBEdit + Left = 112 + Top = 126 + Width = 497 + Height = 18 + BorderStyle = bsNone + Color = 16762111 + DataField = 'ImporteTXT' + DataSource = DsRecibos + Font.Charset = DEFAULT_CHARSET + Font.Color = clWindowText + Font.Height = -13 + Font.Name = 'Courier New' + Font.Style = [fsBold] + ParentFont = False + ReadOnly = True + TabOrder = 5 + end + object DBEdit7: TDBEdit + Left = 112 + Top = 146 + Width = 497 + Height = 18 + BorderStyle = bsNone + Color = 16762111 + DataField = 'ImporteTXTcent' + DataSource = DsRecibos + Font.Charset = DEFAULT_CHARSET + Font.Color = clWindowText + Font.Height = -13 + Font.Name = 'Courier New' + Font.Style = [fsBold] + ParentFont = False + ReadOnly = True + TabOrder = 6 + end + object DBEdit8: TDBEdit + Left = 136 + Top = 185 + Width = 321 + Height = 18 + BorderStyle = bsNone + DataField = 'PersonaEntidad' + DataSource = DsRecibos + Font.Charset = DEFAULT_CHARSET + Font.Color = clWindowText + Font.Height = -16 + Font.Name = 'Courier New' + Font.Style = [fsBold] + ParentFont = False + TabOrder = 7 + end + object DBEdit9: TDBEdit + Left = 80 + Top = 201 + Width = 377 + Height = 18 + BorderStyle = bsNone + DataField = 'Domicilio' + DataSource = DsRecibos + Font.Charset = DEFAULT_CHARSET + Font.Color = clWindowText + Font.Height = -16 + Font.Name = 'Courier New' + Font.Style = [fsBold] + ParentFont = False + TabOrder = 8 + end + object DBEdit10: TDBEdit + Left = 466 + Top = 193 + Width = 95 + Height = 18 + BorderStyle = bsNone + DataField = 'Cent' + DataSource = DsRecibos + Font.Charset = DEFAULT_CHARSET + Font.Color = clWindowText + Font.Height = -16 + Font.Name = 'Courier New' + Font.Style = [fsBold] + ParentFont = False + TabOrder = 9 + end + object DBEdit11: TDBEdit + Left = 466 + Top = 209 + Width = 95 + Height = 18 + BorderStyle = bsNone + DataField = 'Csuc' + DataSource = DsRecibos + Font.Charset = DEFAULT_CHARSET + Font.Color = clWindowText + Font.Height = -16 + Font.Name = 'Courier New' + Font.Style = [fsBold] + ParentFont = False + TabOrder = 10 + end + object DBEdit12: TDBEdit + Left = 568 + Top = 209 + Width = 33 + Height = 18 + BorderStyle = bsNone + DataField = 'Cdc' + DataSource = DsRecibos + Font.Charset = DEFAULT_CHARSET + Font.Color = clWindowText + Font.Height = -16 + Font.Name = 'Courier New' + Font.Style = [fsBold] + ParentFont = False + TabOrder = 11 + end + object DBEdit13: TDBEdit + Left = 466 + Top = 230 + Width = 135 + Height = 18 + BorderStyle = bsNone + DataField = 'Cnum' + DataSource = DsRecibos + Font.Charset = DEFAULT_CHARSET + Font.Color = clWindowText + Font.Height = -16 + Font.Name = 'Courier New' + Font.Style = [fsBold] + ParentFont = False + TabOrder = 12 + end + object BitBtn1: TBitBtn + Left = 455 + Top = 328 + Width = 160 + Height = 25 + Caption = '&Generar Vencimientos' + TabOrder = 13 + OnClick = BitBtn1Click + end + object DBNavigator1: TDBNavigator + Left = 455 + Top = 296 + Width = 160 + Height = 25 + DataSource = DsRecibos + VisibleButtons = [nbFirst, nbPrior, nbNext, nbLast, nbInsert, nbDelete, nbPost, nbCancel] + TabOrder = 14 + end + object DBCheckBox1: TDBCheckBox + Left = 456 + Top = 272 + Width = 97 + Height = 17 + Caption = 'Pagado' + DataField = 'Pagado' + DataSource = DsRecibos + Font.Charset = DEFAULT_CHARSET + Font.Color = clRed + Font.Height = -16 + Font.Name = 'MS Sans Serif' + Font.Style = [fsBold] + ParentFont = False + TabOrder = 15 + ValueChecked = 'True' + ValueUnchecked = 'False' + end + end + end + object ListadoRecibos: TTabSheet + Caption = 'Listado de Recibos' + ImageIndex = 2 + object Label22: TLabel + Left = 192 + Top = 6 + Width = 207 + Height = 20 + Caption = 'Recibos comprendidos entre:' + Font.Charset = DEFAULT_CHARSET + Font.Color = clWindowText + Font.Height = -16 + Font.Name = 'MS Sans Serif' + Font.Style = [] + ParentFont = False + end + object DBGrid1: TDBGrid + Left = 0 + Top = 25 + Width = 624 + Height = 338 + Align = alBottom + DataSource = DsRecibos + Font.Charset = DEFAULT_CHARSET + Font.Color = clWindowText + Font.Height = -16 + Font.Name = 'MS Sans Serif' + Font.Style = [] + Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgRowSelect, dgConfirmDelete, dgCancelOnExit] + ParentFont = False + ReadOnly = True + TabOrder = 0 + TitleFont.Charset = DEFAULT_CHARSET + TitleFont.Color = clWindowText + TitleFont.Height = -16 + TitleFont.Name = 'MS Sans Serif' + TitleFont.Style = [] + OnDblClick = DBGrid1DblClick + Columns = < + item + Expanded = False + FieldName = 'Id' + Width = 67 + Visible = True + end + item + Expanded = False + FieldName = 'Pagado' + Title.Caption = 'Paga.' + Width = 44 + Visible = True + end + item + Expanded = False + FieldName = 'Vencimiento' + Title.Caption = 'Venc.' + Width = 69 + Visible = True + end + item + Expanded = False + FieldName = 'Importe' + Width = 92 + Visible = True + end + item + Expanded = False + FieldName = 'PersonaEntidad' + Width = 317 + Visible = True + end> + end + object FechaMin: TDateTimePicker + Left = 400 + Top = 0 + Width = 89 + Height = 28 + CalAlignment = dtaLeft + Date = 37443.8297543981 + Time = 37443.8297543981 + DateFormat = dfShort + DateMode = dmComboBox + Font.Charset = DEFAULT_CHARSET + Font.Color = clWindowText + Font.Height = -16 + Font.Name = 'MS Sans Serif' + Font.Style = [] + Kind = dtkDate + ParseInput = False + ParentFont = False + TabOrder = 1 + end + object FechaMax: TDateTimePicker + Left = 496 + Top = 0 + Width = 89 + Height = 28 + CalAlignment = dtaLeft + Date = 37443.8297543981 + Time = 37443.8297543981 + DateFormat = dfShort + DateMode = dmComboBox + Font.Charset = DEFAULT_CHARSET + Font.Color = clWindowText + Font.Height = -16 + Font.Name = 'MS Sans Serif' + Font.Style = [] + Kind = dtkDate + ParseInput = False + ParentFont = False + TabOrder = 2 + end + object BitBtn2: TBitBtn + Left = 590 + Top = 0 + Width = 33 + Height = 24 + Caption = '>>' + TabOrder = 3 + OnClick = BitBtn2Click + end + object BitBtn3: TBitBtn + Left = 0 + Top = 0 + Width = 89 + Height = 25 + Caption = 'Imprimir &Listado' + TabOrder = 4 + OnClick = BitBtn3Click + end + object BitBtn4: TBitBtn + Left = 96 + Top = 0 + Width = 89 + Height = 25 + Caption = 'Imprimir &Recibo' + TabOrder = 5 + OnClick = BitBtn4Click + end + end + end + object DsRecibos: TDataSource + DataSet = TbRecibos + Left = 342 + Top = 237 + end + object TbRecibos: TTable + OnCalcFields = TbRecibosCalcFields + TableName = + 'C:\Mis documentos\Fuentes de Programacion\C++ Builder\erecibos\b' + + 'in\datos\recibos.db' + Left = 374 + Top = 237 + object TbRecibosId: TAutoIncField + FieldName = 'Id' + ReadOnly = True + end + object TbRecibosLugarLibramiento: TStringField + FieldName = 'LugarLibramiento' + Size = 40 + end + object TbRecibosFechaLibramiento: TDateField + FieldName = 'FechaLibramiento' + end + object TbRecibosVencimiento: TDateField + FieldName = 'Vencimiento' + end + object TbRecibosPagarA: TStringField + FieldName = 'PagarA' + Size = 50 + end + object TbRecibosImporte: TCurrencyField + FieldName = 'Importe' + end + object TbRecibosPersonaEntidad: TStringField + FieldName = 'PersonaEntidad' + Size = 50 + end + object TbRecibosDomicilio: TStringField + FieldName = 'Domicilio' + Size = 50 + end + object TbRecibosCent: TStringField + FieldName = 'Cent' + Size = 4 + end + object TbRecibosCsuc: TStringField + FieldName = 'Csuc' + Size = 4 + end + object TbRecibosCdc: TStringField + FieldName = 'Cdc' + Size = 2 + end + object TbRecibosCnum: TStringField + FieldName = 'Cnum' + Size = 10 + end + object TbRecibosImporteTXT: TStringField + DisplayWidth = 80 + FieldKind = fkCalculated + FieldName = 'ImporteTXT' + Size = 80 + Calculated = True + end + object TbRecibosImporteTXTcent: TStringField + FieldKind = fkCalculated + FieldName = 'ImporteTXTcent' + Size = 80 + Calculated = True + end + object TbRecibosPagado: TBooleanField + FieldName = 'Pagado' + end + end +end diff --git a/src/main.h b/src/main.h new file mode 100644 index 0000000..8cb8a5e --- /dev/null +++ b/src/main.h @@ -0,0 +1,121 @@ +//--------------------------------------------------------------------------- + +#ifndef mainH +#define mainH +//--------------------------------------------------------------------------- +#include +#include +#include +#include +#include +#include +#include +#include +#include +#include +#include +#include +#include +#include +#include +//--------------------------------------------------------------------------- +class TeRecibos : public TForm +{ +__published: // IDE-managed Components + TStatusBar *StatusBar1; + TPageControl *PageControl1; + TTabSheet *AcercaDe; + TTabSheet *EmisionRecibos; + TTabSheet *ListadoRecibos; + TPanel *Panel1; + TImage *Image1; + TBevel *Bevel1; + TLabel *Label1; + TLabel *Label2; + TImage *Image2; + TBevel *Bevel2; + TLabel *Label3; + TLabel *Label4; + TShape *Shape1; + TShape *spLineaSup; + TLabel *Label5; + TLabel *Label6; + TLabel *Label7; + TLabel *Label8; + TDBEdit *DBEdit1; + TDBEdit *DBEdit2; + TDBEdit *DBEdit3; + TDBEdit *DBEdit4; + TLabel *Label9; + TShape *Shape2; + TShape *Shape3; + TLabel *Label10; + TLabel *Label11; + TShape *Shape4; + TDBEdit *DBEdit5; + TLabel *Label12; + TDBEdit *DBEdit6; + TDBEdit *DBEdit7; + TLabel *Label13; + TShape *Shape5; + TLabel *Label14; + TLabel *Label15; + TLabel *Label16; + TShape *Shape6; + TDBEdit *DBEdit8; + TDBEdit *DBEdit9; + TLabel *Label17; + TDBEdit *DBEdit10; + TDBEdit *DBEdit11; + TDBEdit *DBEdit12; + TDBEdit *DBEdit13; + TLabel *Label18; + TShape *Shape7; + TLabel *Label19; + TLabel *Label20; + TShape *Shape8; + TLabel *Label21; + TBitBtn *BitBtn1; + TDataSource *DsRecibos; + TTable *TbRecibos; + TAutoIncField *TbRecibosId; + TStringField *TbRecibosLugarLibramiento; + TDateField *TbRecibosFechaLibramiento; + TDateField *TbRecibosVencimiento; + TStringField *TbRecibosPagarA; + TCurrencyField *TbRecibosImporte; + TStringField *TbRecibosPersonaEntidad; + TStringField *TbRecibosDomicilio; + TStringField *TbRecibosCent; + TStringField *TbRecibosCsuc; + TStringField *TbRecibosCdc; + TStringField *TbRecibosCnum; + TStringField *TbRecibosImporteTXT; + TStringField *TbRecibosImporteTXTcent; + TDBText *DBText1; + TDBNavigator *DBNavigator1; + TDBGrid *DBGrid1; + TLabel *Label22; + TDateTimePicker *FechaMin; + TDateTimePicker *FechaMax; + TBitBtn *BitBtn2; + TDBCheckBox *DBCheckBox1; + TBooleanField *TbRecibosPagado; + TBitBtn *BitBtn3; + TBitBtn *BitBtn4; + void __fastcall ToolButton1Click(TObject *Sender); + void __fastcall TbRecibosCalcFields(TDataSet *DataSet); + void __fastcall BitBtn2Click(TObject *Sender); + void __fastcall DBGrid1DblClick(TObject *Sender); + void __fastcall BitBtn1Click(TObject *Sender); + void __fastcall BitBtn3Click(TObject *Sender); + void __fastcall BitBtn4Click(TObject *Sender); +private: // User declarations +public: // User declarations + __fastcall TeRecibos(TComponent* Owner); + AnsiString __fastcall entero2txt(int num); +}; +//--------------------------------------------------------------------------- +extern PACKAGE TeRecibos *eRecibos; +//--------------------------------------------------------------------------- +#endif