Segunda fase de preparacion de informes de proveedor, solo falta un repaso general.
git-svn-id: https://192.168.0.254/svn/Proyectos.Tecsitel_FactuGES2/trunk@714 0c75b7a4-871f-7646-8a2f-f78d34cc349f
This commit is contained in:
parent
366a1946b2
commit
e94004caf8
45
Source/Informes/InformeIVAProveedores.fr3
Normal file
45
Source/Informes/InformeIVAProveedores.fr3
Normal file
File diff suppressed because one or more lines are too long
49
Source/Informes/InformeIVAProveedoresDesglosado.fr3
Normal file
49
Source/Informes/InformeIVAProveedoresDesglosado.fr3
Normal file
File diff suppressed because one or more lines are too long
45
Source/Informes/InformeListadoFacturasProveedor.fr3
Normal file
45
Source/Informes/InformeListadoFacturasProveedor.fr3
Normal file
File diff suppressed because one or more lines are too long
File diff suppressed because one or more lines are too long
File diff suppressed because one or more lines are too long
File diff suppressed because one or more lines are too long
43
Source/Informes/InformeListadoPedidos.fr3
Normal file
43
Source/Informes/InformeListadoPedidos.fr3
Normal file
File diff suppressed because one or more lines are too long
47
Source/Informes/InformeListadoPedidosDesglosado.fr3
Normal file
47
Source/Informes/InformeListadoPedidosDesglosado.fr3
Normal file
File diff suppressed because one or more lines are too long
43
Source/Informes/InformeListadoPresupuestos.fr3
Normal file
43
Source/Informes/InformeListadoPresupuestos.fr3
Normal file
File diff suppressed because one or more lines are too long
47
Source/Informes/InformeListadoPresupuestosDesglosado.fr3
Normal file
47
Source/Informes/InformeListadoPresupuestosDesglosado.fr3
Normal file
File diff suppressed because one or more lines are too long
41
Source/Informes/InformeListadoRecibosProvPendientes.fr3
Normal file
41
Source/Informes/InformeListadoRecibosProvPendientes.fr3
Normal file
File diff suppressed because one or more lines are too long
File diff suppressed because one or more lines are too long
41
Source/Informes/InformeListadoRecibosProveedor.fr3
Normal file
41
Source/Informes/InformeListadoRecibosProveedor.fr3
Normal file
File diff suppressed because one or more lines are too long
45
Source/Informes/InformeListadoRecibosProveedorDesglosado.fr3
Normal file
45
Source/Informes/InformeListadoRecibosProveedorDesglosado.fr3
Normal file
File diff suppressed because one or more lines are too long
@ -3756,7 +3756,7 @@ inherited fEditorFacturasCliente: TfEditorFacturasCliente
|
||||
Value = 200
|
||||
end
|
||||
item
|
||||
Caption = 'Listado de facturas de cliente'
|
||||
Caption = 'Listado de facturas'
|
||||
Value = 300
|
||||
end>
|
||||
ButtonBar.Buttons = [cbCancel]
|
||||
|
||||
Binary file not shown.
@ -41,6 +41,7 @@
|
||||
<Borland.ProjectType>Package</Borland.ProjectType>
|
||||
<BorlandProject>
|
||||
<BorlandProject><Delphi.Personality><Parameters><Parameters Name="UseLauncher">False</Parameters><Parameters Name="LoadAllSymbols">True</Parameters><Parameters Name="LoadUnspecifiedSymbols">False</Parameters></Parameters><Package_Options><Package_Options Name="ImplicitBuild">False</Package_Options><Package_Options Name="DesigntimeOnly">False</Package_Options><Package_Options Name="RuntimeOnly">False</Package_Options></Package_Options><VersionInfo><VersionInfo Name="IncludeVerInfo">True</VersionInfo><VersionInfo Name="AutoIncBuild">False</VersionInfo><VersionInfo Name="MajorVer">1</VersionInfo><VersionInfo Name="MinorVer">0</VersionInfo><VersionInfo Name="Release">0</VersionInfo><VersionInfo Name="Build">0</VersionInfo><VersionInfo Name="Debug">False</VersionInfo><VersionInfo Name="PreRelease">False</VersionInfo><VersionInfo Name="Special">False</VersionInfo><VersionInfo Name="Private">False</VersionInfo><VersionInfo Name="DLL">False</VersionInfo><VersionInfo Name="Locale">3082</VersionInfo><VersionInfo Name="CodePage">1252</VersionInfo></VersionInfo><VersionInfoKeys><VersionInfoKeys Name="CompanyName"></VersionInfoKeys><VersionInfoKeys Name="FileDescription"></VersionInfoKeys><VersionInfoKeys Name="FileVersion">1.0.0.0</VersionInfoKeys><VersionInfoKeys Name="InternalName"></VersionInfoKeys><VersionInfoKeys Name="LegalCopyright"></VersionInfoKeys><VersionInfoKeys Name="LegalTrademarks"></VersionInfoKeys><VersionInfoKeys Name="OriginalFilename"></VersionInfoKeys><VersionInfoKeys Name="ProductName"></VersionInfoKeys><VersionInfoKeys Name="ProductVersion">1.0.0.0</VersionInfoKeys><VersionInfoKeys Name="Comments"></VersionInfoKeys></VersionInfoKeys><Excluded_Packages>
|
||||
|
||||
<Excluded_Packages Name="C:\Archivos de programa\RemObjects Software\Pascal Script\Dcu\D10\PascalScript_RO_D10.bpl">RemObjects Pascal Script - RemObjects SDK 3.0 Integration</Excluded_Packages>
|
||||
</Excluded_Packages><Source><Source Name="MainSource">FacturasProveedor_view.dpk</Source></Source></Delphi.Personality></BorlandProject></BorlandProject>
|
||||
</ProjectExtensions>
|
||||
@ -66,6 +67,7 @@
|
||||
<DCCReference Include="..\..\Lib\dxThemeD11.dcp" />
|
||||
<DCCReference Include="..\..\Lib\FacturasProveedor_controller.dcp" />
|
||||
<DCCReference Include="..\..\Lib\FacturasProveedor_model.dcp" />
|
||||
<DCCReference Include="..\..\Lib\GestorInformes_controller.dcp" />
|
||||
<DCCReference Include="..\..\Lib\GUIBase.dcp" />
|
||||
<DCCReference Include="..\..\Lib\PedProv_FacProv_relation.dcp" />
|
||||
<DCCReference Include="..\..\Lib\PngComponentsD10.dcp" />
|
||||
|
||||
Binary file not shown.
@ -61,6 +61,13 @@ inherited fEditorFacturasProveedor: TfEditorFacturasProveedor
|
||||
inherited tbxMenu: TTBXToolbar
|
||||
ExplicitWidth = 849
|
||||
end
|
||||
inherited TBXTMain2: TTBXToolbar
|
||||
Visible = True
|
||||
ExplicitWidth = 66
|
||||
object TBXItem40: TTBXItem
|
||||
Action = actInformes
|
||||
end
|
||||
end
|
||||
end
|
||||
inherited StatusBar: TJvStatusBar
|
||||
Top = 647
|
||||
@ -239,6 +246,11 @@ inherited fEditorFacturasProveedor: TfEditorFacturasProveedor
|
||||
ImageIndex = 24
|
||||
OnExecute = actNuevoAbonoExecute
|
||||
end
|
||||
object actInformes: TAction
|
||||
Category = 'Acciones'
|
||||
Caption = 'Informes'
|
||||
OnExecute = actInformesExecute
|
||||
end
|
||||
end
|
||||
inherited SmallImages: TPngImageList [5]
|
||||
PngImages = <
|
||||
@ -3661,4 +3673,319 @@ inherited fEditorFacturasProveedor: TfEditorFacturasProveedor
|
||||
Left = 184
|
||||
Top = 112
|
||||
end
|
||||
object JSInformesDialog: TJSDialog
|
||||
Content.Strings = (
|
||||
'Seleccione el informe que desea realizar')
|
||||
DialogOptions = [doCommandLinks, doModal]
|
||||
Glyph.Data = {
|
||||
0A54504E474F626A65637489504E470D0A1A0A0000000D494844520000001C00
|
||||
00001C0806000000720DDF940000000970485973000017120000171201679FD2
|
||||
520000000467414D410000B18E7CFB5193000003104944415478DAAD96FB4B14
|
||||
5114C7CFE463DC1E606444BFF54424D3DC55CA52B1CCD7165A219905054182FD
|
||||
1452FD5810FD100406610A669A998FC4F5BDB6266265DAB60F5DD15E58FE03B2
|
||||
3F99D29ABBA7B9779C71C61D9D6177CFCE70CFDCB97B3EF7DCF3BD33C38082FD
|
||||
B502B2B300CC656020048688A24F036233A0671F40D43160BA87BF62AEEE1010
|
||||
60D7AE293AD8B835815E9B625C80DC8F1E88D4A7C1E8C1FB8F9FD6C3C44035B3
|
||||
21500A65F6D700FE2EA580A5EC551F4A50359316B31D76EFDC0EE5F72A645045
|
||||
A067AE0623074B8140891108F1057064CC0D556053DF173812B707E6DCF332A8
|
||||
225080D201DB4AF99BF335B4D502F371415BCC364833C4C29F458F0C2A031281
|
||||
081734AB0B3C88403C1E6E3E2E7960F6A8FFD27A7D3EF07A11DA2C76C84A8D87
|
||||
A57FCB32E8B8A54A4C8C21B59365C9015996EF2240B6634DF435B51460A46D1F
|
||||
70C093AA46BF09C980C12CA914E6F371ADD707EF1DB3B0B0B8006EB79B8EA96B
|
||||
EA5106121851245129118FD8BFA2DC5C53C6BAF5EBBBBA97C2D64EC064195B1F
|
||||
286C76E956A0EA5C51AEB4764A9929F5750D5A9581D2274B9B651C0BA2F514A8
|
||||
6F28E36B70AD9A4253EF97A9AA55B0CEBA87D03B645B3F43C1DE589C58186D10
|
||||
81150FCAC57B11E161B04517099BB953C78643141B01BA28EEE4DAB0B04DE2B8
|
||||
CA460B9C399902E661BB3AB0F5AD038BF30CD4D7E7DD14815A61023027DD00EF
|
||||
469C1A80FD1C307F1578FD4A81E665945AD68924181A9D5007B6F4DBF1527E32
|
||||
F5C9D3632351F8F549AEE916B14EAA039BCD362C31A6040D23E7887D4A03B0CF
|
||||
86C5C6641A24BB7646D3F2D51A77F8C1BCDCFFC79CD3EAC0D7BD56AE86294165
|
||||
4660CB5C6B737DD3062CCA31D00069E76E05241862CF1EDD05E7D40F756063CF
|
||||
673C7F5A4F679A59541EF03E4C8C3B0893DF67D481AFBAC7B0F05412CD30EBE2
|
||||
ED80F7617CEC0198FEF94B1BF06C6622AD4B4EC99D80F7A1666043D7281A3312
|
||||
FD84C20B8417C3AA789405239826E0CBCE4F98979E10344C33B0BE630473D312
|
||||
82866906D6993E62F6F1C3F45D160A5305BE68FF8095CF5B4302134CFE1185EA
|
||||
1FB8A1B4FF4FE32FF6FADB8B5E0000000049454E44AE426082}
|
||||
Instruction.Text = 'Nuevo informe'
|
||||
Instruction.Glyph.Data = {
|
||||
0A54504E474F626A65637489504E470D0A1A0A0000000D494844520000001C00
|
||||
00001C0806000000720DDF940000000970485973000017120000171201679FD2
|
||||
520000000467414D410000B18E7CFB5193000003104944415478DAAD96FB4B14
|
||||
5114C7CFE463DC1E606444BFF54424D3DC55CA52B1CCD7165A219905054182FD
|
||||
1452FD5810FD100406610A669A998FC4F5BDB6266265DAB60F5DD15E58FE03B2
|
||||
3F99D29ABBA7B9779C71C61D9D6177CFCE70CFDCB97B3EF7DCF3BD33C38082FD
|
||||
B502B2B300CC656020048688A24F036233A0671F40D43160BA87BF62AEEE1010
|
||||
60D7AE293AD8B835815E9B625C80DC8F1E88D4A7C1E8C1FB8F9FD6C3C44035B3
|
||||
21500A65F6D700FE2EA580A5EC551F4A50359316B31D76EFDC0EE5F72A645045
|
||||
A067AE0623074B8140891108F1057064CC0D556053DF173812B707E6DCF332A8
|
||||
225080D201DB4AF99BF335B4D502F371415BCC364833C4C29F458F0C2A031281
|
||||
081734AB0B3C88403C1E6E3E2E7960F6A8FFD27A7D3EF07A11DA2C76C84A8D87
|
||||
A57FCB32E8B8A54A4C8C21B59365C9015996EF2240B6634DF435B51460A46D1F
|
||||
70C093AA46BF09C980C12CA914E6F371ADD707EF1DB3B0B0B8006EB79B8EA96B
|
||||
EA5106121851245129118FD8BFA2DC5C53C6BAF5EBBBBA97C2D64EC064195B1F
|
||||
286C76E956A0EA5C51AEB4764A9929F5750D5A9581D2274B9B651C0BA2F514A8
|
||||
6F28E36B70AD9A4253EF97A9AA55B0CEBA87D03B645B3F43C1DE589C58186D10
|
||||
81150FCAC57B11E161B04517099BB953C78643141B01BA28EEE4DAB0B04DE2B8
|
||||
CA460B9C399902E661BB3AB0F5AD038BF30CD4D7E7DD14815A61023027DD00EF
|
||||
469C1A80FD1C307F1578FD4A81E665945AD68924181A9D5007B6F4DBF1527E32
|
||||
F5C9D3632351F8F549AEE916B14EAA039BCD362C31A6040D23E7887D4A03B0CF
|
||||
86C5C6641A24BB7646D3F2D51A77F8C1BCDCFFC79CD3EAC0D7BD56AE86294165
|
||||
4660CB5C6B737DD3062CCA31D00069E76E05241862CF1EDD05E7D40F756063CF
|
||||
673C7F5A4F679A59541EF03E4C8C3B0893DF67D481AFBAC7B0F05412CD30EBE2
|
||||
ED80F7617CEC0198FEF94B1BF06C6622AD4B4EC99D80F7A1666043D7281A3312
|
||||
FD84C20B8417C3AA789405239826E0CBCE4F98979E10344C33B0BE630473D312
|
||||
82866906D6993E62F6F1C3F45D160A5305BE68FF8095CF5B4302134CFE1185EA
|
||||
1FB8A1B4FF4FE32FF6FADB8B5E0000000049454E44AE426082}
|
||||
Instruction.Icon = tdiCustom
|
||||
CustomButtons = <
|
||||
item
|
||||
Caption = 'Listado de facturas pendientes.'
|
||||
Value = 100
|
||||
Default = True
|
||||
end
|
||||
item
|
||||
Caption = 'Listado de IVA.'
|
||||
Value = 200
|
||||
end
|
||||
item
|
||||
Caption = 'Listado de facturas'
|
||||
Value = 300
|
||||
end>
|
||||
ButtonBar.Buttons = [cbCancel]
|
||||
MainIcon = tdiCustom
|
||||
Title = 'FactuGES'
|
||||
Position = dpMainFormCenter
|
||||
Icon.Data = {
|
||||
0000010003002020100001000400E8020000360000002020000001000800A808
|
||||
00001E0300002020000001002000A8100000C60B000028000000200000004000
|
||||
0000010004000000000000020000000000000000000000000000000000000000
|
||||
000000008000008000000080800080000000800080008080000080808000C0C0
|
||||
C0000000FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF000000
|
||||
0000000000000000000000000000000008777777777777777777777700000000
|
||||
0877767777677776777767760000000008F88888888888888888888700000000
|
||||
08F8FF8F8F888888888888860000000008FF8F8F88F8F8888888888C00000000
|
||||
08F88888F8888888888888860000000008F8688878E8888E88E8788700000000
|
||||
08F8688888F8F8FFFFFF88760000000008FF4888888F8FFFFFFF788700000000
|
||||
08F8676767677677677658E50000000008FF8888888887878787888700000000
|
||||
08FF8887887E8888888888860000000008FFE8E8E788C8E8FF8F8F8600000000
|
||||
08FFF8F8F8F8FF8F88F8F8870000000008FFFFFF8FF8F8F8F88F888600000000
|
||||
0FF8477878787878788788860000000008FF68888888F8FF8F8F788700000000
|
||||
08B7588888FF8FFFFFFF78860000083008BB47887776777777776F86000000B7
|
||||
8B9B73BB88788787E87878870000008BB8B9BB78888888EFF8F8FF8600000087
|
||||
B8BB8B888E8E8E88FFF8F886000000088BBB888FFFFFFFFFF8F877770000B9BB
|
||||
B8FFBB9B9BFFFFFFF87466460000BBB9BB8FBBBBB8FFFFFFF88F888700000008
|
||||
B8BB88888FFFFFFFF88F8F7700000008BBBBBB8FFFFFFFFFFF8887700000007B
|
||||
B7B98BB8FFFFFFFFF8887700000000B78B9B87B888F88F88F8877000000007B0
|
||||
08BB883B78888788787700000000000000B9000000000000000000000000FFFF
|
||||
FFFFF800000FF800000FF800000FF800000FF800000FF800000FF800000FF800
|
||||
000FF800000FF800000FF800000FF800000FF800000FF800000FF800000FF800
|
||||
000FF800000FF800000F9800000FC000000FC000000FC000000FE000000F0000
|
||||
000F0000000FE000000FE000001FC000003FC000007F980000FFFCFFFFFF2800
|
||||
0000200000004000000001000800000000000004000000000000000000000001
|
||||
00000001000000000000694731007C5D49007E604C0081635000826451008567
|
||||
540085685500886B5900896D5B008A6E5D008B705F008E715F008B7260008C72
|
||||
61008E74640084766C00957A6900977D6D00887B72009A8171009D8272009C84
|
||||
76009D8778009F897B00A28A7900A08B7D00A18C7E00E1B06E00E1B67D003E7A
|
||||
970073A0A5007AA2B70074AFBD007BB2BB003CAACE0028A5DB0020ADDF000D9A
|
||||
E500209EE3000DA6E2001AA4EF0000A6FF000CABFE0009ACFE0010A4F10015AC
|
||||
FA0000B5FB0000B0FD000CB6FC0000BFF90000BAFD0004BAFD0009BBFB0013B6
|
||||
F40015BFFA001CBDFB0026B7FD00589EC50040A4CD0040ABCC0050A2C7005DAE
|
||||
C00060A3C20062A4C60060B7CB006AB0CD007BB6C80077BAC80061BADD0044AD
|
||||
E50000C3F80007C6FB0000CAF80000CFFB0000D4F90026C8FA0026CDF8002BCC
|
||||
F90039C4FB0039C2FC0039CAFA003FCFFB0024D6F80030D2F80039D5F80000F8
|
||||
F8001FF8F8002CF6F8003EF4F8005AC6DC0070CDDF0052C0E40054C9E3004DCE
|
||||
FA005FC7FF004FD2FB004DD9F8005FD9FB006ED3E70063CDFE0060D1FB0060D8
|
||||
F90060DDF80046F8F90056F0F8005FFAFA0073E3F80073E4F90073EEF80060F1
|
||||
F800958A84009A918C0081999500A68F8200AD968500A3968C00AE988900AD9A
|
||||
8D00B19A8B00AF9C9000B09E9200B59F9200B7A29300B2A19600B5A19400B7A4
|
||||
9700BDA79700B4A39800B1A59D00B4A79F00BAA69800BCA79900B4A89F00BCA8
|
||||
9900BAA89C00BDAA9D00BEAC9E0083ADBD00B5A9A100BDABA000BEADA100BFAF
|
||||
A500A0BABE00C0AB9E00C1AC9E00C6AE9F00E2B98100E4BA8300E4BB8400E5BC
|
||||
8500E1BD8E00E3BF9000C0ADA000C2B0A300C2B1A500C4B2A600C1B2A800C3B5
|
||||
AB00C8B4A800CCB9AD00CEBCB100D0BEB200D1BFB400E4C19300E5C29400E6C4
|
||||
9600E8C69900D0C9A300CFC1B800D2C1B600D3C3B800D5C4B900D6C6BC00D8C6
|
||||
BC00D6C8BE00DAC9BF00ECD3B000EDD4B200EFD6B500E7D1B800E7D3BD00F0D8
|
||||
B6008CB7C40080BEC70097C3C70099C3C900ABD7CF00AFD9DD0086E3F90086E7
|
||||
F90086ECF8009EE5FB0090E8F900ACEDFC00BCEAFD00BCF1FB00BFF1FD00D7C9
|
||||
C000D9CAC100DCCBC200DACCC200DDCCC300DACCC400DDCEC400DED0C600DED1
|
||||
C900DED3CC00DFD4CD00E1D1C900E2D5CD00F0DCC200E3D8D200E5D9D200E2DA
|
||||
D500E6DBD400E5DCD500E8DDD600E6DDD800E9DFD900E6E0DB00EAE0DA00EAE2
|
||||
DD00ECE3DE00EBE4DE00ECE4DE00F3E7D900C6E1EF00C9EFFD00D7F6FD00DFF3
|
||||
FF00DFFEFE00EBE7E300EDE6E100EFE7E400EEE8E400F0EAE600F2EDE900F2EE
|
||||
EC00F4EFEC00F5F0EE00F9F4ED00E7FAFD00EBF8FF00F6F2F000F7F4F100F8F4
|
||||
F200F9F7F500FAF8F600FBF9F900FCFBFA00FCFCFB00FEFEFE00000000000000
|
||||
0000000000000000000000000000000000000000000000000000000000000000
|
||||
00000000000000000000007D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
|
||||
0D0D0000000000000000009C9C19191919191919191919191919191919191919
|
||||
1903000000000000000000ABDECBCBC7C7AFABABABABAAA3A2A2A0A0A0A0A0A0
|
||||
8607000000000000000000ABECEAE9DEDEDEDED7D5D2D2D2CBCBCBCBB0CBB0CB
|
||||
9007000000000000000000ABEDECEAE9DEDEDBD7D7D5D2D2D2CDCDCBB0B0B0B0
|
||||
9007000000000000000000AFEDE9A9CFD2CFD2CDCBCBCBB0B0ABACA3A3A3A3B0
|
||||
9007000000000000000000AFF0D5017783838386868686869099909999907BB0
|
||||
9007000000000000000000B0F4D501A0B0CBD2D5DEECEDF7FAFAFAFAFAF77BAA
|
||||
9007000000000000000000CBF4DC01A0B0B0B0D2D5DBEAEDF7FAFAFAFAF47BB0
|
||||
9007000000000000000000CBF8DC010404070604090909090D0D110D110D02A3
|
||||
9007000000000000000000CBFAED9E9E9E9C999E8C8C8C868683837E7D7D7ACB
|
||||
9007000000000000000000CBFAF1A7A7A6A6A6A69898989898B5DBDBD5D5D2D2
|
||||
9907000000000000000000CDFAF796969696961D961D931D1DB4DEDBD7D5D5D2
|
||||
9C07000000000000000000CFFAFAFAFAF8F7F0F0EDEDEDECE9E9DEDEDED7D5D5
|
||||
9907000000000000000000CDFAFAEAF0EDEDECEAEAE9DEDEDBDCD5D5D5D5D2D5
|
||||
9C07000000000000000000D2FAEC01737D7D7B7D7D7B7D7B7D7B7B7B7D7B7DD2
|
||||
9907000000000000000000CFFAEC019EABB0CBD2D5DCDEECEDF4F4F4F4EA7BD2
|
||||
9C07000000000000000000B9524601A0B0B0CBB5D5DEEAEDF7FAFAFAFAF47DD5
|
||||
9C070000000000213F0000B83226010C3F5C1F111214141616191B1B1B1807D2
|
||||
9C07000000000000253D8A5B322D711E2860BA7E7E7A7E797A797979767676D5
|
||||
9E0700000000000041375E662F2B65314EBBB6B6B6B6B4B4B1E2F4EDEDEDECEA
|
||||
9C070000000000008F5D66663232394EC1A81C1C1C1C1C1C1CD3F7F4EDDED7D5
|
||||
9C0700000000000000B7BE6E5758BEBDE4E6E6F3FAFAFAFAFAFAF7F4D5928675
|
||||
7304000000002A2A2A2A4A6AFAE7562F2A2A2A5FFAFAFAFAFAFAF8D577010101
|
||||
0101000000004747472F4A59C5E7564A32474766FAFAFAFAFAFAFADCA0D2CFB0
|
||||
A20C00000000000000436C6958686D6BC2C5C5E7FAFAFAFAFAFAFADEAADEDBCB
|
||||
1470000000000000004551534A4A5250C0E7FAFAFAFAFAFAFAFAFADEAAD7B514
|
||||
700000000000000042384C54472B613550C3FAFAFAFAFAFAFAFAFADEA1B0196F
|
||||
000000000000000024234463322EBC5A3664E3ECE9E9E9E9E9E9E9CF90731300
|
||||
000000000000003A3C00002232298B8B3E3B207E8B7E8B7E827E817E74100000
|
||||
0000000000000000000000003227000000000000000000000000000000000000
|
||||
000000000000FFFFFFFFF800000FF800000FF800000FF800000FF800000FF800
|
||||
000FF800000FF800000FF800000FF800000FF800000FF800000FF800000FF800
|
||||
000FF800000FF800000FF800000FF800000F9800000FC000000FC000000FC000
|
||||
000FE000000F0000000F0000000FE000000FE000001FC000003FC000007F9800
|
||||
00FFFCFFFFFF2800000020000000400000000100200000000000801000000000
|
||||
0000000000000000000000000000000000000000000000000000000000000000
|
||||
0000000000000000000000000000000000000000000000000000000000000000
|
||||
0000000000000000000000000000000000000000000000000000000000000000
|
||||
0000000000000000000000000000000000000000000000000000000000000000
|
||||
0000000000000000000000000000000000000000000000000000000000007067
|
||||
5F70AA9382E570513CE3735540E3735540E3735540E3735540E3735540E37355
|
||||
40E3735540E3735540E3735540E3735540E3735540E3735540E3735540E37355
|
||||
40E3735540E3735540E3735540E3735540E3735540E3735540E372533EE5BAAB
|
||||
A070000000000000000000000000000000000000000000000000000000005E54
|
||||
4C7FCAB7ABFFC5B5AAFFA18877FFA28A78FFA28A79FFA28A79FFA28A79FFA28A
|
||||
79FFA28A79FFA28A79FFA28A79FFA28A79FFA28A79FFA28A79FFA28A79FFA28A
|
||||
79FFA28A79FFA28A79FFA28A79FFA28A79FFA28A79FFA58D7CFF7A5B46FFB2A1
|
||||
967F000000000000000000000000000000000000000000000000000000006055
|
||||
4D7ED7C6BBFFEDE4E0FFD9CCC4FFD9CCC4FFD9CBC3FFD8CAC1FFD7C9BFFFD6C7
|
||||
BDFFD5C6BBFFD4C4BAFFD3C3B8FFD2C1B7FFD1C0B5FFD0BEB3FFCFBDB2FFCEBC
|
||||
B0FFCEBBAFFFCEBBAFFFCEBBAFFFCEBBAFFFCEBCB0FFBEAA9CFF82644FFFB2A1
|
||||
967E000000000000000000000000000000000000000000000000000000006056
|
||||
4D7ED7C8BCFFF2EBE8FFEFE9E5FFEEE7E2FFECE5E0FFEBE2DEFFEAE0DBFFE9DE
|
||||
D8FFE7DBD4FFE5D9D1FFE3D7CFFFE2D4CCFFE1D2C9FFDFD0C7FFDDCDC4FFDCCB
|
||||
C2FFDBC9BFFFDBC9BFFFDBC9BFFFDBC9BFFFDCCAC1FFC1AC9FFF81634FFFB2A1
|
||||
967E000000000000000000000000000000000000000000000000000000006155
|
||||
4E7ED8C9BDFFF3EDE9FFF1EAE6FFF0E9E6FFEEE6E1FFECE4DFFFEBE2DDFFEAE0
|
||||
DAFFE9DED7FFE7DBD4FFE5D9D1FFE3D7CFFFE2D4CCFFE1D2C9FFDFD0C7FFDDCD
|
||||
C4FFDCCBC2FFDBC9BFFFDBC9BFFFDBC9BFFFDCCAC0FFC1AC9FFF81634FFFB2A1
|
||||
967E000000000000000000000000000000000000000000000000000000006157
|
||||
4E7ED9C9BFFFF4EFEDFFEFE8E3FFD0C2B9FFDFD5CEFFE0D5CEFFE0D4CCFFDED3
|
||||
CBFFDDD1C8FFDCCFC6FFDACCC4FFD9CBC1FFD8C9BFFFD7C7BDFFD6C5BBFFD5C4
|
||||
B9FFD3C2B7FFD2C0B5FFD2BFB4FFD2BFB4FFDAC8BEFFC1AC9FFF81634FFFB2A1
|
||||
967E000000000000000000000000000000000000000000000000000000006256
|
||||
4F7EDACCC0FFF5F2EFFFE5DDD9FF5C3821FFB0998AFFB8A394FFB8A394FFB9A3
|
||||
94FFB8A495FFB9A597FFB9A698FFBAA698FFBBA799FFBBA89AFFBBA89BFFBCA8
|
||||
9BFFBCA89BFFBCA89BFFBBA89AFFB49E8FFFD8C6BBFFC1AC9FFF81634FFFB2A1
|
||||
967E000000000000000000000000000000000000000000000000000000006256
|
||||
4F7EDBCBC1FFF8F4F3FFE7E0DBFF5F3C24FFD0BDB2FFDCCBC1FFDDCCC3FFE2D2
|
||||
CBFFE7DBD4FFEDE2DEFFF0E8E6FFF5F0EDFFF9F7F4FFFDFDFDFFFFFFFFFFFFFF
|
||||
FFFFFFFFFFFFFFFFFFFFFAF8F7FFB39D8DFFD8C6BBFFC1AC9FFF81634FFFB2A1
|
||||
967E000000000000000000000000000000000000000000000000000000006256
|
||||
4F7EDCCEC3FFFAF6F5FFE9E2DDFF5F3C24FFD2BFB5FFDFCDC4FFDECCC3FFE0CE
|
||||
C6FFE4D4CDFFE9DDD6FFEFE4E0FFF1EAE8FFF7F1EFFFFBF8F6FFFFFEFFFFFFFF
|
||||
FFFFFFFFFFFFFFFFFFFFFCFBFAFFB5A090FFD9C7BEFFC1AD9FFF81634FFFB2A1
|
||||
967E000000000000000000000000000000000000000000000000000000006257
|
||||
4F7EDDCFC4FFFCF9F9FFE9E4E0FF5F3A23FF7C5D49FF7F5F4CFF7E5F4CFF7E60
|
||||
4DFF7F614DFF816350FF826552FF836654FF846856FF856A57FF866B59FF876C
|
||||
5BFF876D5BFF876D5BFF866B59FF72523DFFD5C3B9FFC1AFA1FF81634FFFB2A1
|
||||
967E000000000000000000000000000000000000000000000000000000006357
|
||||
507EDECFC6FFFCFCFBFFF4F1F0FFC3B6AEFFC3B5ADFFC1B4ACFFC0B3AAFFBFB1
|
||||
A9FFBEB0A6FFBDAEA5FFBDACA3FFBCABA2FFBBAAA0FFBAA99FFFB8A69AFFB8A4
|
||||
98FFB6A396FFB5A194FFB49F93FFB39D90FFDCCDC4FFC2AEA1FF81634FFFB2A1
|
||||
967E000000000000000000000000000000000000000000000000000000006357
|
||||
507EDFD2C7FFFEFEFDFFF9F5EFFFE8C696FFE9C799FFE8C697FFE7C596FFE7C4
|
||||
95FFE6C394FFE5C293FFE4C091FFE4C090FFE3BF8FFFE2BD8CFFE9D5BFFFEBE1
|
||||
DCFFEADFD8FFE7DCD5FFE5DAD3FFE4D8D0FFE3D4CCFFC2AFA2FF81634FFFB2A1
|
||||
967E000000000000000000000000000000000000000000000000000000006458
|
||||
517EE0D3C8FFFFFFFFFFFAF5EFFFE3B77CFFE4B97FFFE2B87EFFE3B77DFFE2B7
|
||||
7CFFE2B67BFFE1B57AFFE1B479FFE0B478FFE0B377FFDFB174FFE6D0B7FFEBE1
|
||||
DCFFE8DFD9FFE8DDD6FFE6D9D2FFE3D8D1FFE4D7CFFFC3AFA2FF81634FFFB2A1
|
||||
967E000000000000000000000000000000000000000000000000000000006458
|
||||
517EE1D2C9FFFFFFFFFFFEFEFDFFFEFFFFFFFCFDFEFFFBFBFBFFF9F7F8FFF8F5
|
||||
F6FFF7F3F2FFF5F1F0FFF4EFEEFFF1EDEBFFF0EBE9FFEEE9E6FFEDE6E2FFECE3
|
||||
DEFFEBE1DBFFE9DFD9FFE8DDD6FFE6DAD3FFE5D9D2FFC3B0A3FF81634FFFB2A1
|
||||
967E000000000000000000000000000000000000000000000000000000006459
|
||||
517EE1D4CAFFFFFFFFFFFDFDFCFFEEEBE8FFF5F2F0FFF4F0EFFFF3EFECFFF2ED
|
||||
EAFFF1EBE8FFEEE9E5FFEFE7E3FFECE5E1FFEAE4DEFFEAE1DCFFE8E0DAFFE7DE
|
||||
D8FFE6DDD6FFE5DBD4FFE4D8D1FFE2D6CEFFE6DBD4FFC3B1A4FF81634EFFB2A1
|
||||
967E000000000000000000000000000000000000000000000000000000006559
|
||||
527EE2D4CAFFFFFFFFFFF0ECEAFF5B361EFFAB9383FFB39D8EFFB39D8DFFB39D
|
||||
8DFFB29D8DFFB29C8DFFB29C8CFFB29C8CFFB29C8CFFB29C8CFFB29C8CFFB29C
|
||||
8CFFB29C8CFFB29C8CFFB29C8DFFB39D8EFFE3D8D0FFC4B1A4FF81634EFFB2A1
|
||||
967E000000000000000000000000000000000000000000000000000000006559
|
||||
527EE5D4CAFFFFFFFFFFF7F0EBFF5F3B24FFCCB8ADFFD7C5BAFFD9C7BDFFDCCC
|
||||
C3FFE1D4CCFFE5DAD4FFE8E0DBFFEDE5E1FFF1EBE9FFF5F2EFFFF7F5F3FFF8F6
|
||||
F4FFF8F5F4FFF8F6F4FFF1EEEAFFB29C8DFFE6DAD3FFC4B2A5FF81634EFFB2A1
|
||||
967E00000000000000000000000000000000000000000000000000000000685A
|
||||
527E9AC6C9FF35CFFEFF3DAEEBFF663E24FFD2BFB4FFE0CBBFFFE0C9BDFFE1CD
|
||||
C4FFE4D5CDFFE9DED7FFEEE5E0FFF2EBE8FFF6F2F0FFFCF8F8FFFFFFFEFFFFFF
|
||||
FFFFFFFFFFFFFFFFFFFFFCFAF9FFB49E8FFFE7DED7FFC5B3A6FF81634EFFB2A1
|
||||
967E00000000000000000000000000000000007792910072A7A3001E33366957
|
||||
4C7C86C1C8FF00BFFBFF079AEBFF6A3E23FF926D57FF5FA3C8FF4AC1E8FF6C9C
|
||||
A2FF917260FF927767FF947A69FF957C6CFF977E6FFF998171FF9A8374FF9B85
|
||||
76FF9C8678FF9C8678FF998274FF7D5E49FFE3D9D4FFC5B3A7FF81634EFFB2A1
|
||||
967E00000000000000000000000000000000005A6F7000A9E5E40075AEAE5C90
|
||||
A5BD75D0E0FF00BFFAFF0CA3F4FF8A9A91FF3C7492FF03A4E4FF4AD5FFFF98C4
|
||||
CBFFB3A196FFB1A197FFB0A096FFB09F95FFAF9D92FFAF9C91FFAD9A8EFFAC99
|
||||
8CFFAB988AFFAB9789FFAA9688FFA99386FFE8E0DAFFC5B4A7FF81634EFFB2A1
|
||||
967E00000000000000000000000000000000000000002DA5BFC110C2FFFF4DD0
|
||||
FDFF64DBF9FF00B3FAFF09A8FEFF68D7FFFF04B5FFFF24CCFBFFAFD8CEFFF7DA
|
||||
B8FFF3DBBBFFF3DBBAFFF2D9B9FFF1D8B7FFF0D7B4FFEED5B2FFF6EADDFFF9F6
|
||||
F4FFF7F3F1FFF5F1EEFFF5EFECFFF4EDEAFFF1EBE7FFC6B4A8FF81634EFFB2A1
|
||||
967E00000000000000000000000000000000000000005F8A909142C7E4E960DE
|
||||
F8FF64D7FAFF00B6FDFF00B8FDFF21B2FDFF1ECCF7FF93EBFCFFD2C69BFFE1AB
|
||||
63FFDFAC66FFDFAC66FFDFAC66FFDFAC66FFDFAC66FFDEA961FFEFDBC0FFF8F6
|
||||
F5FFF6F2F0FFF3EDEBFFECE2DCFFE9DFD9FFE5DBD6FFC2B1A4FF81634FFFB2A1
|
||||
967E000000000000000000000000000E171A000E171A00040B145994A4A990EB
|
||||
FCFF61F1F7FF13FAF7FF23F9F7FF93EDF7FF8CE5F8FFD5F2FDFFE9F8FFFFE7F8
|
||||
FFFFF0FCFFFFFFFFFFFFFFFFFFFFFFFFFFFFFEFFFFFFFDFEFFFFFAFAF9FFF9F7
|
||||
F5FFF7F2F0FFE8DFD8FFC7AE9FFFBEA998FFAF9888FFB09A8AFF7F604DFFB2A1
|
||||
967E00000000000000000000000000AAFFFF00AAFFFF00AAFFFF00A4FFFF00CD
|
||||
FAFF5DFCF9FFFFFFFFFFEEFEFEFF00FBF7FF00AAFEFF00A1FFFF00A1FFFF00A0
|
||||
FFFF56C3FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFCFDFBFFFCFBFAFFFBFA
|
||||
F8FFE6DDD6FFAA9180FF5D3922FF603D26FF613E27FF613E28FF634029FFB4A3
|
||||
987E00000000000000000000000000CAFFFF00CAFFFF00CBFFFF00B0FFFF00CD
|
||||
FBFF38F5F7FFC3EFFAFFF0FFFEFF00FAF7FF00C8F7FF00C2F7FF00C2F7FF00C1
|
||||
F7FF57D7FAFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFEFEFEFFFDFDFCFFFCFC
|
||||
FBFFE7DED8FFCCB9ACFFE6DBD5FFE2D7D0FFDCCFC5FFD7C5BBFF8E705DFFB4A2
|
||||
9680000000000000000000000000002E383C002E383C00252F364C99B0B57DE8
|
||||
FBFF59F1F7FF25F7F7FF41FAF8FF7CEEF7FF77E4F7FFB5EFFCFFC6F2FDFFC3F2
|
||||
FDFFD9F6FCFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFDFEFEFFFEFE
|
||||
FEFFE9E1DAFFCEBCAFFFF1E9E3FFEADFD8FFE4D5CCFF9D816FFF3A291F868985
|
||||
831C00000000000000000000000000000000000000004E7073774AB0DADC37C9
|
||||
FBFF22D5F7FF00D3F9FF02C3FBFF37D5F7FF34BEFCFFA2E6FAFFECFBFDFFFFFF
|
||||
FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFEFF
|
||||
FFFFEAE2DCFFCDBBADFFEADFD8FFE3D5CBFF9F8271FF3E2D2386050100200000
|
||||
000000000000000000000000000000000000000000003E9CC4C219C0FFFF23C9
|
||||
FCFF30D3F8FF00BEF8FF06A8FEFF4FDCF8FF00B8FCFF32C2FBFFC0EBFCFFFFFF
|
||||
FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
|
||||
FFFFEAE3DEFFCDB9ABFFDDCEC4FFA58979FF3E2C1F8F0905041B000000000000
|
||||
000000000000000000000000000000000000003451510099DDDB0091C0C35DAD
|
||||
BCCF76D7E9FF00BEF9FF10A9FBFFBDDEDEFF5AC8DDFF0AB5F7FF62CEFFFFCBE4
|
||||
F1FFF1E7E0FFEFE7E1FFEEE6E1FFEEE6E1FFEEE6E0FFEDE6E0FFEDE5E0FFEEE6
|
||||
E1FFE1D4CCFFC5AE9FFFA68D7FF53E2718A10402000E00000000000000000000
|
||||
0000000000000000000000000000000000000075B7AF0099C7C500323E425442
|
||||
3B5C6BA8B1DA00C1FCFF0EA1F3F8A98E80C0AB9081C12698B1C10088C4C14C85
|
||||
A3C1A18D80C19E8D81C19E8B81C19D8C80C19B8C7FC19B8A7FC19C897FC19A89
|
||||
7EC19B8B7EC1897769C2432B1BAC000000000000000000000000000000000000
|
||||
0000000000000000000000000000000000000000000000000000000000000000
|
||||
00000045565A00C5FFFF0094E6E2000000000000000000000000000000000000
|
||||
0000000000000000000000000000000000000000000000000000000000000000
|
||||
0000000000000000000000000000000000000000000000000000000000000000
|
||||
0000000000000000000000000000FFFFFFFFF0000007F0000007F0000007F000
|
||||
0007F0000007F0000007F0000007F0000007F0000007F0000007F0000007F000
|
||||
0007F0000007F0000007F0000007F0000007F0000007F0000007800000078000
|
||||
0007C0000007C000000700000007000000070000000700000007C000000FC000
|
||||
001F8000003F800000FFF8FFFFFF}
|
||||
Width = 450
|
||||
Left = 408
|
||||
Top = 72
|
||||
end
|
||||
end
|
||||
|
||||
@ -31,10 +31,14 @@ type
|
||||
JsPrevisualizarDialog: TJSDialog;
|
||||
JsImprimirDialog: TJSDialog;
|
||||
JsListaFacturasNoEliminadas: TJSDialog;
|
||||
JSInformesDialog: TJSDialog;
|
||||
actInformes: TAction;
|
||||
TBXItem40: TTBXItem;
|
||||
procedure FormShow(Sender: TObject);
|
||||
procedure actEliminarUpdate(Sender: TObject);
|
||||
procedure actNuevaFacturaExecute(Sender: TObject);
|
||||
procedure actNuevoAbonoExecute(Sender: TObject);
|
||||
procedure actInformesExecute(Sender: TObject);
|
||||
private
|
||||
FFacturas: IBizFacturaProveedor;
|
||||
FController : IFacturasProveedorController;
|
||||
@ -65,7 +69,8 @@ uses
|
||||
uDataModuleFacturasProveedor, uDataModuleUsuarios,
|
||||
uGridStatusUtils, uDBSelectionListUtils, uFactuGES_App,
|
||||
uAlbaranesProveedorController, uBizAlbaranesProveedor,
|
||||
uEditorBase, uGenerarFacturasProvAlbProvUtils, uGenerarFacturasProvPedUtils;
|
||||
uEditorBase, uGenerarFacturasProvAlbProvUtils, uGenerarFacturasProvPedUtils,
|
||||
uGestorInformesController;
|
||||
|
||||
{$R *.dfm}
|
||||
|
||||
@ -79,6 +84,37 @@ begin
|
||||
(Sender as TAction).Enabled := (FFacturas.SITUACION = CTE_PENDIENTE);
|
||||
end;
|
||||
|
||||
procedure TfEditorFacturasProveedor.actInformesExecute(Sender: TObject);
|
||||
var
|
||||
Respuesta : Integer;
|
||||
AGestorInformesController : IGestorInformesController;
|
||||
|
||||
begin
|
||||
AGestorInformesController := TGestorInformesController.Create;
|
||||
try
|
||||
|
||||
Respuesta := JsInformesDialog.Execute;
|
||||
|
||||
if Respuesta <> IDCANCEL then
|
||||
begin
|
||||
case JsInformesDialog.CustomButtonResult of
|
||||
100 : begin // Listado de facturas pendientes
|
||||
AGestorInformesController.VerInformeListadoFacturasProvPendientes;
|
||||
end;
|
||||
200 : begin // Listado de IVA
|
||||
AGestorInformesController.VerInformeIVAProveedores;
|
||||
end;
|
||||
300 : begin // Listado de facturas de cliente
|
||||
AGestorInformesController.VerInformeListadoFacturasProv;
|
||||
end;
|
||||
end;
|
||||
end;
|
||||
|
||||
finally
|
||||
AGestorInformesController := NIL;
|
||||
end;
|
||||
end;
|
||||
|
||||
procedure TfEditorFacturasProveedor.actNuevaFacturaExecute(Sender: TObject);
|
||||
begin
|
||||
actNuevo.Execute;
|
||||
|
||||
@ -73,6 +73,36 @@ object PluginGestorInformes: TPluginGestorInformes
|
||||
ImageIndex = 0
|
||||
OnExecute = actInformeRecibosCliPendientesExecute
|
||||
end
|
||||
object actInformeFacturasProveedor: TAction
|
||||
Category = 'Facturas de proveedor'
|
||||
Caption = 'Listado de facturas de proveedor'
|
||||
ImageIndex = 0
|
||||
OnExecute = actInformeFacturasProveedorExecute
|
||||
end
|
||||
object actInformeFacturasProveedorPendientes: TAction
|
||||
Category = 'Facturas de proveedor'
|
||||
Caption = 'Listado de facturas de proveedor pendientes'
|
||||
ImageIndex = 0
|
||||
OnExecute = actInformeFacturasProveedorPendientesExecute
|
||||
end
|
||||
object actInformeFacturasProveedorIVA: TAction
|
||||
Category = 'Facturas de proveedor'
|
||||
Caption = 'Listado de IVA de facturas de proveedor'
|
||||
ImageIndex = 0
|
||||
OnExecute = actInformeFacturasProveedorIVAExecute
|
||||
end
|
||||
object actInformeRecibosProveedor: TAction
|
||||
Category = 'Recibos de proveedor'
|
||||
Caption = 'Listado de recibos de proveedor'
|
||||
ImageIndex = 0
|
||||
OnExecute = actInformeRecibosProveedorExecute
|
||||
end
|
||||
object actInformeRecibosProvPendientes: TAction
|
||||
Category = 'Recibos de proveedor'
|
||||
Caption = 'Listado de recibos de proveedor pendientes'
|
||||
ImageIndex = 0
|
||||
OnExecute = actInformeRecibosProvPendientesExecute
|
||||
end
|
||||
end
|
||||
object MainMenu: TMainMenu
|
||||
Images = LargeImages
|
||||
@ -81,23 +111,57 @@ object PluginGestorInformes: TPluginGestorInformes
|
||||
object Informes1: TMenuItem
|
||||
Caption = 'Informes'
|
||||
object Listadodefacturasdecliente1: TMenuItem
|
||||
Tag = 10
|
||||
Action = actInformeFacturasCliente
|
||||
end
|
||||
object Listadodefacturasdeclientependientes1: TMenuItem
|
||||
Tag = 20
|
||||
Action = actInformeFacturasClientePendientes
|
||||
end
|
||||
object ListadodeIVAdefacturasdecliente1: TMenuItem
|
||||
Tag = 30
|
||||
Action = actInformeFacturasClienteIVA
|
||||
end
|
||||
object N2: TMenuItem
|
||||
Tag = 40
|
||||
Caption = '-'
|
||||
end
|
||||
object N1: TMenuItem
|
||||
Tag = 50
|
||||
Action = actInformeRecibosCliente
|
||||
end
|
||||
object Listadoderecibosdeclientependientes1: TMenuItem
|
||||
Tag = 60
|
||||
Action = actInformeRecibosCliPendientes
|
||||
end
|
||||
object N3: TMenuItem
|
||||
Tag = 70
|
||||
Caption = '-'
|
||||
end
|
||||
object Listadodefacturasdeproveedor1: TMenuItem
|
||||
Tag = 80
|
||||
Action = actInformeFacturasProveedor
|
||||
end
|
||||
object Listadodefacturasdeproveedorpendientes1: TMenuItem
|
||||
Tag = 90
|
||||
Action = actInformeFacturasProveedorPendientes
|
||||
end
|
||||
object ListadodeIVAdefacturasdeproveedor1: TMenuItem
|
||||
Tag = 100
|
||||
Action = actInformeFacturasProveedorIVA
|
||||
end
|
||||
object N4: TMenuItem
|
||||
Tag = 110
|
||||
Caption = '-'
|
||||
end
|
||||
object Listadoderecibosdeproveedor1: TMenuItem
|
||||
Tag = 120
|
||||
Action = actInformeRecibosProveedor
|
||||
end
|
||||
object Listadoderecibosdeproveedorpendientes1: TMenuItem
|
||||
Tag = 130
|
||||
Action = actInformeRecibosProvPendientes
|
||||
end
|
||||
end
|
||||
end
|
||||
object SmallImages: TPngImageList
|
||||
|
||||
@ -29,11 +29,28 @@ type
|
||||
N2: TMenuItem;
|
||||
actInformeRecibosCliPendientes: TAction;
|
||||
Listadoderecibosdeclientependientes1: TMenuItem;
|
||||
actInformeFacturasProveedor: TAction;
|
||||
actInformeFacturasProveedorPendientes: TAction;
|
||||
actInformeFacturasProveedorIVA: TAction;
|
||||
actInformeRecibosProveedor: TAction;
|
||||
actInformeRecibosProvPendientes: TAction;
|
||||
N3: TMenuItem;
|
||||
Listadodefacturasdeproveedor1: TMenuItem;
|
||||
Listadodefacturasdeproveedorpendientes1: TMenuItem;
|
||||
ListadodeIVAdefacturasdeproveedor1: TMenuItem;
|
||||
N4: TMenuItem;
|
||||
Listadoderecibosdeproveedor1: TMenuItem;
|
||||
Listadoderecibosdeproveedorpendientes1: TMenuItem;
|
||||
procedure actInformeFacturasClienteExecute(Sender: TObject);
|
||||
procedure actInformeFacturasClientePendientesExecute(Sender: TObject);
|
||||
procedure actInformeFacturasClienteIVAExecute(Sender: TObject);
|
||||
procedure actInformeRecibosClienteExecute(Sender: TObject);
|
||||
procedure actInformeRecibosCliPendientesExecute(Sender: TObject);
|
||||
procedure actInformeFacturasProveedorExecute(Sender: TObject);
|
||||
procedure actInformeFacturasProveedorPendientesExecute(Sender: TObject);
|
||||
procedure actInformeFacturasProveedorIVAExecute(Sender: TObject);
|
||||
procedure actInformeRecibosProveedorExecute(Sender: TObject);
|
||||
procedure actInformeRecibosProvPendientesExecute(Sender: TObject);
|
||||
private
|
||||
FController : IGestorInformesController;
|
||||
public
|
||||
@ -75,6 +92,24 @@ begin
|
||||
FController.VerInformeListadoFacturasCliPendientes;
|
||||
end;
|
||||
|
||||
procedure TPluginGestorInformes.actInformeFacturasProveedorExecute(
|
||||
Sender: TObject);
|
||||
begin
|
||||
FController.VerInformeListadoFacturasProv;
|
||||
end;
|
||||
|
||||
procedure TPluginGestorInformes.actInformeFacturasProveedorIVAExecute(
|
||||
Sender: TObject);
|
||||
begin
|
||||
FController.VerInformeIVAProveedores;
|
||||
end;
|
||||
|
||||
procedure TPluginGestorInformes.actInformeFacturasProveedorPendientesExecute(
|
||||
Sender: TObject);
|
||||
begin
|
||||
FController.VerInformeListadoFacturasProvPendientes;
|
||||
end;
|
||||
|
||||
procedure TPluginGestorInformes.actInformeRecibosClienteExecute(
|
||||
Sender: TObject);
|
||||
begin
|
||||
@ -87,6 +122,18 @@ begin
|
||||
FController.VerInformeListadoRecibosCliPendientes;
|
||||
end;
|
||||
|
||||
procedure TPluginGestorInformes.actInformeRecibosProveedorExecute(
|
||||
Sender: TObject);
|
||||
begin
|
||||
FController.VerInformeListadoRecibosProveedor;
|
||||
end;
|
||||
|
||||
procedure TPluginGestorInformes.actInformeRecibosProvPendientesExecute(
|
||||
Sender: TObject);
|
||||
begin
|
||||
FController.VerInformeListadoRecibosProvPendientes;
|
||||
end;
|
||||
|
||||
constructor TPluginGestorInformes.Create(AOwner: TComponent);
|
||||
begin
|
||||
inherited;
|
||||
|
||||
@ -62,7 +62,9 @@ requires
|
||||
dxThemeD11,
|
||||
dxGDIPlusD11,
|
||||
dxLayoutControlD11,
|
||||
dxComnD11;
|
||||
dxComnD11,
|
||||
cxEditorsD11,
|
||||
cxDataD11;
|
||||
|
||||
contains
|
||||
uGestorInformesViewRegister in 'uGestorInformesViewRegister.pas',
|
||||
@ -72,9 +74,16 @@ contains
|
||||
uEditorInformeBase in 'uEditorInformeBase.pas' {fEditorInformeBase: TForm},
|
||||
uViewFiltroClientes in 'uViewFiltroClientes.pas' {frViewFiltroClientes: TFrame},
|
||||
uViewParametrosInforme in 'uViewParametrosInforme.pas' {frViewParametrosInforme: TFrame},
|
||||
uEditorInformeFacturasClientePendientesReport in 'uEditorInformeFacturasClientePendientesReport.pas' {fEditorInformeFacturasClientePendientesReport: t},
|
||||
uEditorInformeFacturasClienteReport in 'uEditorInformeFacturasClienteReport.pas' {fEditorInformeFacturasClienteReport: TfEditorInformeFacturasClienteReport},
|
||||
uEditorInformeRecibosClienteReport in 'uEditorInformeRecibosClienteReport.pas' {fEditorInformeRecibosClienteReport: TfEditorInformeRecibosClienteReport},
|
||||
uEditorInformeRecibosCliPendientesReport in 'uEditorInformeRecibosCliPendientesReport.pas' {fEditorInformeRecibosCliPendientesReport: TfEditorInformeRecibosCliPendientesReport};
|
||||
uEditorInformeFacturasClientePendientesReport in 'uEditorInformeFacturasClientePendientesReport.pas' {fEditorInformeFacturasClientePendientesReport: TForm},
|
||||
uEditorInformeFacturasClienteReport in 'uEditorInformeFacturasClienteReport.pas' {fEditorInformeFacturasClienteReport: TForm},
|
||||
uEditorInformeRecibosClienteReport in 'uEditorInformeRecibosClienteReport.pas' {fEditorInformeRecibosClienteReport: TForm},
|
||||
uEditorInformeRecibosCliPendientesReport in 'uEditorInformeRecibosCliPendientesReport.pas' {fEditorInformeRecibosCliPendientesReport: TForm},
|
||||
uViewFiltroProveedores in 'uViewFiltroProveedores.pas' {frViewFiltroProveedores: TFrame},
|
||||
uEditorInformeIVAProveedoresReport in 'uEditorInformeIVAProveedoresReport.pas' {fEditorInformeIVAProveedoresReport: TForm},
|
||||
uEditorInformeRecibosProvPendientesReport in 'uEditorInformeRecibosProvPendientesReport.pas' {fEditorInformeRecibosProvPendientesReport: TForm},
|
||||
uEditorInformeFacturasProveedorPendientesReport in 'uEditorInformeFacturasProveedorPendientesReport.pas' {fEditorInformeFacturasProveedorPendientesReport: TForm},
|
||||
uEditorInformeFacturasProveedorReport in 'uEditorInformeFacturasProveedorReport.pas' {fEditorInformeFacturasProveedorReport: TForm},
|
||||
uEditorInformePedidosReport in 'uEditorInformePedidosReport.pas' {fEditorInformePedidosReport: TForm},
|
||||
uEditorInformeRecibosProveedorReport in 'uEditorInformeRecibosProveedorReport.pas' {fEditorInformeRecibosProveedorReport: TForm};
|
||||
|
||||
end.
|
||||
|
||||
@ -38,44 +38,40 @@
|
||||
<DelphiCompile Include="GestorInformes_view.dpk">
|
||||
<MainSource>MainSource</MainSource>
|
||||
</DelphiCompile>
|
||||
<DCCReference Include="C:\Documents and Settings\Usuario\ApplicationBase.dcp" />
|
||||
<DCCReference Include="C:\Documents and Settings\Usuario\Base.dcp" />
|
||||
<DCCReference Include="C:\Documents and Settings\Usuario\ccpackD11.dcp" />
|
||||
<DCCReference Include="C:\Documents and Settings\Usuario\cfpack_d11.dcp" />
|
||||
<DCCReference Include="C:\Documents and Settings\Usuario\Contactos_controller.dcp" />
|
||||
<DCCReference Include="C:\Documents and Settings\Usuario\Contactos_model.dcp" />
|
||||
<DCCReference Include="C:\Documents and Settings\Usuario\Contactos_view.dcp" />
|
||||
<DCCReference Include="C:\Documents and Settings\Usuario\cxLibraryD11.dcp" />
|
||||
<DCCReference Include="C:\Documents and Settings\Usuario\dbrtl.dcp" />
|
||||
<DCCReference Include="C:\Documents and Settings\Usuario\designide.dcp" />
|
||||
<DCCReference Include="C:\Documents and Settings\Usuario\dxComnD11.dcp" />
|
||||
<DCCReference Include="C:\Documents and Settings\Usuario\dxGDIPlusD11.dcp" />
|
||||
<DCCReference Include="C:\Documents and Settings\Usuario\dxLayoutControlD11.dcp" />
|
||||
<DCCReference Include="C:\Documents and Settings\Usuario\dxThemeD11.dcp" />
|
||||
<DCCReference Include="C:\Documents and Settings\Usuario\frx11.dcp" />
|
||||
<DCCReference Include="C:\Documents and Settings\Usuario\frxe11.dcp" />
|
||||
<DCCReference Include="C:\Documents and Settings\Usuario\fs11.dcp" />
|
||||
<DCCReference Include="C:\Documents and Settings\Usuario\GestorInformes_controller.dcp" />
|
||||
<DCCReference Include="C:\Documents and Settings\Usuario\GUIBase.dcp" />
|
||||
<DCCReference Include="C:\Documents and Settings\Usuario\GUISDK_D11.dcp" />
|
||||
<DCCReference Include="C:\Documents and Settings\Usuario\Jcl.dcp" />
|
||||
<DCCReference Include="C:\Documents and Settings\Usuario\JclVcl.dcp" />
|
||||
<DCCReference Include="C:\Documents and Settings\Usuario\JvCoreD11R.dcp" />
|
||||
<DCCReference Include="C:\Documents and Settings\Usuario\JvPageCompsD11R.dcp" />
|
||||
<DCCReference Include="C:\Documents and Settings\Usuario\JvStdCtrlsD11R.dcp" />
|
||||
<DCCReference Include="C:\Documents and Settings\Usuario\JvSystemD11R.dcp" />
|
||||
<DCCReference Include="C:\Documents and Settings\Usuario\PngComponentsD10.dcp" />
|
||||
<DCCReference Include="C:\Documents and Settings\Usuario\PNG_D10.dcp" />
|
||||
<DCCReference Include="C:\Documents and Settings\Usuario\RemObjects_Core_D11.dcp" />
|
||||
<DCCReference Include="C:\Documents and Settings\Usuario\rtl.dcp" />
|
||||
<DCCReference Include="C:\Documents and Settings\Usuario\tb2k_d10.dcp" />
|
||||
<DCCReference Include="C:\Documents and Settings\Usuario\tbx_d10.dcp" />
|
||||
<DCCReference Include="C:\Documents and Settings\Usuario\vcl.dcp" />
|
||||
<DCCReference Include="C:\Documents and Settings\Usuario\vclactnband.dcp" />
|
||||
<DCCReference Include="C:\Documents and Settings\Usuario\vcldb.dcp" />
|
||||
<DCCReference Include="C:\Documents and Settings\Usuario\vcljpg.dcp" />
|
||||
<DCCReference Include="C:\Documents and Settings\Usuario\vclx.dcp" />
|
||||
<DCCReference Include="C:\Documents and Settings\Usuario\xmlrtl.dcp" />
|
||||
<DCCReference Include="ApplicationBase.dcp" />
|
||||
<DCCReference Include="Base.dcp" />
|
||||
<DCCReference Include="ccpackD11.dcp" />
|
||||
<DCCReference Include="cfpack_d11.dcp" />
|
||||
<DCCReference Include="Contactos_controller.dcp" />
|
||||
<DCCReference Include="Contactos_model.dcp" />
|
||||
<DCCReference Include="Contactos_view.dcp" />
|
||||
<DCCReference Include="cxDataD11.dcp" />
|
||||
<DCCReference Include="cxEditorsD11.dcp" />
|
||||
<DCCReference Include="cxLibraryD11.dcp" />
|
||||
<DCCReference Include="dbrtl.dcp" />
|
||||
<DCCReference Include="designide.dcp" />
|
||||
<DCCReference Include="dxComnD11.dcp" />
|
||||
<DCCReference Include="dxGDIPlusD11.dcp" />
|
||||
<DCCReference Include="dxLayoutControlD11.dcp" />
|
||||
<DCCReference Include="dxThemeD11.dcp" />
|
||||
<DCCReference Include="frx11.dcp" />
|
||||
<DCCReference Include="frxe11.dcp" />
|
||||
<DCCReference Include="fs11.dcp" />
|
||||
<DCCReference Include="GestorInformes_controller.dcp" />
|
||||
<DCCReference Include="GUIBase.dcp" />
|
||||
<DCCReference Include="GUISDK_D11.dcp" />
|
||||
<DCCReference Include="Jcl.dcp" />
|
||||
<DCCReference Include="JclVcl.dcp" />
|
||||
<DCCReference Include="JvCoreD11R.dcp" />
|
||||
<DCCReference Include="JvPageCompsD11R.dcp" />
|
||||
<DCCReference Include="JvStdCtrlsD11R.dcp" />
|
||||
<DCCReference Include="JvSystemD11R.dcp" />
|
||||
<DCCReference Include="PngComponentsD10.dcp" />
|
||||
<DCCReference Include="PNG_D10.dcp" />
|
||||
<DCCReference Include="RemObjects_Core_D11.dcp" />
|
||||
<DCCReference Include="rtl.dcp" />
|
||||
<DCCReference Include="tb2k_d10.dcp" />
|
||||
<DCCReference Include="tbx_d10.dcp" />
|
||||
<DCCReference Include="uEditorInformeBase.pas">
|
||||
<Form>fEditorInformeBase</Form>
|
||||
<DesignClass>TForm</DesignClass>
|
||||
@ -88,10 +84,26 @@
|
||||
<Form>fEditorInformeFacturasClienteReport</Form>
|
||||
<DesignClass>T</DesignClass>
|
||||
</DCCReference>
|
||||
<DCCReference Include="uEditorInformeFacturasProveedorPendientesReport.pas">
|
||||
<Form>fEditorInformeFacturasProveedorPendientesReport</Form>
|
||||
<DesignClass>TForm</DesignClass>
|
||||
</DCCReference>
|
||||
<DCCReference Include="uEditorInformeFacturasProveedorReport.pas">
|
||||
<Form>fEditorInformeFacturasProveedorReport</Form>
|
||||
<DesignClass>TForm</DesignClass>
|
||||
</DCCReference>
|
||||
<DCCReference Include="uEditorInformeIVAClientesReport.pas">
|
||||
<Form>fEditorInformeIVAClientesReport</Form>
|
||||
<DesignClass>TForm</DesignClass>
|
||||
</DCCReference>
|
||||
<DCCReference Include="uEditorInformeIVAProveedoresReport.pas">
|
||||
<Form>fEditorInformeIVAProveedoresReport</Form>
|
||||
<DesignClass>TForm</DesignClass>
|
||||
</DCCReference>
|
||||
<DCCReference Include="uEditorInformePedidosReport.pas">
|
||||
<Form>fEditorInformePedidosReport</Form>
|
||||
<DesignClass>TForm</DesignClass>
|
||||
</DCCReference>
|
||||
<DCCReference Include="uEditorInformeRecibosClienteReport.pas">
|
||||
<Form>fEditorInformeRecibosClienteReport</Form>
|
||||
<DesignClass>T</DesignClass>
|
||||
@ -100,6 +112,14 @@
|
||||
<Form>fEditorInformeRecibosCliPendientesReport</Form>
|
||||
<DesignClass>T</DesignClass>
|
||||
</DCCReference>
|
||||
<DCCReference Include="uEditorInformeRecibosProveedorReport.pas">
|
||||
<Form>fEditorInformeIVAProveedoresReport</Form>
|
||||
<DesignClass>TForm</DesignClass>
|
||||
</DCCReference>
|
||||
<DCCReference Include="uEditorInformeRecibosProvPendientesReport.pas">
|
||||
<Form>fEditorInformeRecibosProvPendientesReport</Form>
|
||||
<DesignClass>TForm</DesignClass>
|
||||
</DCCReference>
|
||||
<DCCReference Include="uGestorInformesViewRegister.pas" />
|
||||
<DCCReference Include="uViewFiltroClientes.pas">
|
||||
<Form>frViewFiltroClientes</Form>
|
||||
@ -109,6 +129,10 @@
|
||||
<Form>frViewFiltroImportes</Form>
|
||||
<DesignClass>TFrame</DesignClass>
|
||||
</DCCReference>
|
||||
<DCCReference Include="uViewFiltroProveedores.pas">
|
||||
<Form>frViewFiltroProveedores</Form>
|
||||
<DesignClass>TFrame</DesignClass>
|
||||
</DCCReference>
|
||||
<DCCReference Include="uViewParametrosInforme.pas">
|
||||
<Form>frViewParametrosInforme</Form>
|
||||
<DesignClass>TFrame</DesignClass>
|
||||
@ -117,6 +141,12 @@
|
||||
<Form>frViewPeriodoFechas</Form>
|
||||
<DesignClass>TFrame</DesignClass>
|
||||
</DCCReference>
|
||||
<DCCReference Include="vcl.dcp" />
|
||||
<DCCReference Include="vclactnband.dcp" />
|
||||
<DCCReference Include="vcldb.dcp" />
|
||||
<DCCReference Include="vcljpg.dcp" />
|
||||
<DCCReference Include="vclx.dcp" />
|
||||
<DCCReference Include="xmlrtl.dcp" />
|
||||
</ItemGroup>
|
||||
</Project>
|
||||
<!-- EurekaLog First Line
|
||||
|
||||
@ -0,0 +1,201 @@
|
||||
inherited fEditorInformeFacturasProveedorPendientesReport: TfEditorInformeFacturasProveedorPendientesReport
|
||||
Caption = 'fEditorInformeFacturasProveedorPendientesReport'
|
||||
ClientHeight = 655
|
||||
ClientWidth = 895
|
||||
ExplicitWidth = 903
|
||||
ExplicitHeight = 689
|
||||
PixelsPerInch = 96
|
||||
TextHeight = 13
|
||||
inherited JvNavPanelHeader: TJvNavPanelHeader
|
||||
Width = 895
|
||||
ExplicitWidth = 895
|
||||
inherited Image1: TImage
|
||||
Left = 868
|
||||
ExplicitLeft = 868
|
||||
end
|
||||
end
|
||||
inherited TBXDock: TTBXDock
|
||||
Width = 895
|
||||
ExplicitWidth = 895
|
||||
inherited tbxMenu: TTBXToolbar
|
||||
ExplicitWidth = 895
|
||||
end
|
||||
inherited TBXToolbar1: TTBXToolbar
|
||||
ExplicitWidth = 591
|
||||
object TBXItem58: TTBXItem [0]
|
||||
Action = actRefrescar
|
||||
DisplayMode = nbdmImageAndText
|
||||
Images = SmallImages
|
||||
end
|
||||
end
|
||||
end
|
||||
inherited StatusBar: TJvStatusBar
|
||||
Top = 636
|
||||
Width = 895
|
||||
ExplicitTop = 636
|
||||
ExplicitWidth = 895
|
||||
end
|
||||
inherited TBXMultiDockIzquierdo: TTBXMultiDock
|
||||
Height = 534
|
||||
ExplicitHeight = 534
|
||||
end
|
||||
inherited TBXMultiDockDerecho: TTBXMultiDock
|
||||
Left = 703
|
||||
Width = 192
|
||||
Height = 534
|
||||
ExplicitLeft = 703
|
||||
ExplicitWidth = 192
|
||||
ExplicitHeight = 534
|
||||
inherited pnlParametros: TTBXDockablePanel
|
||||
DockedWidth = 188
|
||||
ExplicitWidth = 192
|
||||
ExplicitHeight = 518
|
||||
inline frViewPeriodoFechas1: TfrViewPeriodoFechas [0]
|
||||
Left = 0
|
||||
Top = 0
|
||||
Width = 188
|
||||
Height = 136
|
||||
Align = alTop
|
||||
Font.Charset = DEFAULT_CHARSET
|
||||
Font.Color = clWindowText
|
||||
Font.Height = -11
|
||||
Font.Name = 'Tahoma'
|
||||
Font.Style = []
|
||||
ParentFont = False
|
||||
TabOrder = 0
|
||||
ReadOnly = False
|
||||
ExplicitWidth = 188
|
||||
ExplicitHeight = 136
|
||||
inherited TBXAlignmentPanel1: TTBXAlignmentPanel
|
||||
Width = 182
|
||||
ExplicitWidth = 182
|
||||
inherited cbPeriodo: TcxComboBox
|
||||
Style.LookAndFeel.SkinName = ''
|
||||
StyleDisabled.LookAndFeel.SkinName = ''
|
||||
StyleFocused.LookAndFeel.SkinName = ''
|
||||
StyleHot.LookAndFeel.SkinName = ''
|
||||
ExplicitWidth = 153
|
||||
Width = 153
|
||||
end
|
||||
end
|
||||
inherited TBXAlignmentPanel2: TTBXAlignmentPanel
|
||||
Width = 182
|
||||
ExplicitWidth = 182
|
||||
inherited Label3: TLabel
|
||||
Width = 172
|
||||
end
|
||||
inherited edtFechaFin: TcxDateEdit
|
||||
Style.LookAndFeel.SkinName = ''
|
||||
StyleDisabled.LookAndFeel.SkinName = ''
|
||||
StyleFocused.LookAndFeel.SkinName = ''
|
||||
StyleHot.LookAndFeel.SkinName = ''
|
||||
ExplicitWidth = 99
|
||||
Width = 99
|
||||
end
|
||||
inherited edtFechaIni: TcxDateEdit
|
||||
Style.LookAndFeel.SkinName = ''
|
||||
StyleDisabled.LookAndFeel.SkinName = ''
|
||||
StyleFocused.LookAndFeel.SkinName = ''
|
||||
StyleHot.LookAndFeel.SkinName = ''
|
||||
ExplicitWidth = 97
|
||||
Width = 97
|
||||
end
|
||||
end
|
||||
inherited TBXLabel2: TTBXLabel
|
||||
Width = 188
|
||||
ExplicitWidth = 188
|
||||
end
|
||||
end
|
||||
inherited TBXDockablePanel1: TTBXDockablePanel
|
||||
Top = 368
|
||||
TabOrder = 2
|
||||
ExplicitTop = 368
|
||||
ExplicitWidth = 188
|
||||
inherited TBXButton1: TTBXButton
|
||||
AlignWithMargins = True
|
||||
Left = 3
|
||||
Top = 3
|
||||
Width = 182
|
||||
Height = 37
|
||||
Margins.Left = 8
|
||||
Margins.Top = 8
|
||||
Margins.Right = 8
|
||||
Margins.Bottom = 8
|
||||
Align = alTop
|
||||
ExplicitLeft = 3
|
||||
ExplicitTop = 3
|
||||
ExplicitWidth = 182
|
||||
ExplicitHeight = 37
|
||||
end
|
||||
end
|
||||
inline frViewFiltroImportes1: TfrViewFiltroImportes
|
||||
Left = 0
|
||||
Top = 136
|
||||
Width = 188
|
||||
Height = 77
|
||||
Align = alTop
|
||||
AutoSize = True
|
||||
Font.Charset = DEFAULT_CHARSET
|
||||
Font.Color = clWindowText
|
||||
Font.Height = -11
|
||||
Font.Name = 'Tahoma'
|
||||
Font.Style = []
|
||||
ParentFont = False
|
||||
TabOrder = 1
|
||||
ReadOnly = False
|
||||
ExplicitTop = 136
|
||||
ExplicitWidth = 188
|
||||
ExplicitHeight = 77
|
||||
inherited TBXLabel2: TTBXLabel
|
||||
Width = 188
|
||||
ExplicitWidth = 188
|
||||
end
|
||||
inherited TBXAlignmentPanel1: TTBXAlignmentPanel
|
||||
Width = 182
|
||||
ExplicitWidth = 182
|
||||
inherited eImporte: TcxSpinEdit
|
||||
Style.LookAndFeel.SkinName = ''
|
||||
StyleDisabled.LookAndFeel.SkinName = ''
|
||||
StyleFocused.LookAndFeel.SkinName = ''
|
||||
StyleHot.LookAndFeel.SkinName = ''
|
||||
end
|
||||
end
|
||||
end
|
||||
inline frViewFiltroProveedores1: TfrViewFiltroProveedores
|
||||
Left = 0
|
||||
Top = 213
|
||||
Width = 188
|
||||
Height = 146
|
||||
Align = alTop
|
||||
AutoSize = True
|
||||
Font.Charset = DEFAULT_CHARSET
|
||||
Font.Color = clWindowText
|
||||
Font.Height = -11
|
||||
Font.Name = 'Tahoma'
|
||||
Font.Style = []
|
||||
ParentFont = False
|
||||
TabOrder = 3
|
||||
ReadOnly = False
|
||||
ExplicitTop = 213
|
||||
ExplicitWidth = 188
|
||||
ExplicitHeight = 146
|
||||
inherited TBXLabel2: TTBXLabel
|
||||
Width = 188
|
||||
ExplicitWidth = 188
|
||||
end
|
||||
inherited bElegirProveedor: TBitBtn
|
||||
Width = 108
|
||||
ExplicitWidth = 108
|
||||
end
|
||||
inherited edtProveedor: TcxTextEdit
|
||||
Style.LookAndFeel.SkinName = ''
|
||||
StyleDisabled.LookAndFeel.SkinName = ''
|
||||
StyleFocused.LookAndFeel.SkinName = ''
|
||||
StyleHot.LookAndFeel.SkinName = ''
|
||||
ExplicitWidth = 141
|
||||
Width = 141
|
||||
end
|
||||
end
|
||||
end
|
||||
end
|
||||
end
|
||||
@ -0,0 +1,132 @@
|
||||
unit uEditorInformeFacturasProveedorPendientesReport;
|
||||
|
||||
interface
|
||||
|
||||
uses
|
||||
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
|
||||
Dialogs, uEditorPreview, frxExportText, frxExportRTF, frxExportMail,
|
||||
frxExportXLS, frxExportImage, frxExportPDF, frxClass, frxDCtrl, frxGradient,
|
||||
frxChBox, frxCross, frxRich, frxOLE, frxBarcode, JvAppStorage,
|
||||
JvAppRegistryStorage, JvComponentBase, JvFormPlacement, ImgList, PngImageList,
|
||||
StdActns, ActnList, ComCtrls, JvExComCtrls, JvStatusBar, TB2ExtItems,
|
||||
TBXExtItems, TBX, TB2Item, TB2Dock, TB2Toolbar, pngimage, ExtCtrls,
|
||||
JvExControls, JvNavigationPane, uCustomView,
|
||||
uViewBase, uViewPeriodoFechas,
|
||||
uViewFiltroProveedores, dxLayoutControl, cxControls, uViewFiltroImportes,
|
||||
FactuGES_Intf, TBXDkPanels, uEditorInformeBase,
|
||||
uIEditorInformeBase, uViewParametrosInforme,
|
||||
uIEditorInformeFacturasProveedorPendientesReport;
|
||||
|
||||
type
|
||||
TfEditorInformeFacturasProveedorPendientesReport = class(TfEditorInformeBase, IEditorInformeFacturasProveedorPendientesReport)
|
||||
TBXItem58: TTBXItem;
|
||||
frViewPeriodoFechas1: TfrViewPeriodoFechas;
|
||||
frViewFiltroImportes1: TfrViewFiltroImportes;
|
||||
frViewFiltroProveedores1: TfrViewFiltroProveedores;
|
||||
procedure actRefrescarExecute(Sender: TObject);
|
||||
private
|
||||
FListaIDProveedores: TIntegerArray;
|
||||
function GetFechaFin: TDateTime;
|
||||
function GetFechaInicio: TDateTime;
|
||||
function GetListaIDProveedores: TIntegerArray;
|
||||
function GetImporteMinimo: Currency;
|
||||
function GetDesglosadoProveedor: Boolean;
|
||||
|
||||
procedure RefrescarInforme;
|
||||
|
||||
public
|
||||
property FechaInicio: TDateTime read GetFechaInicio;
|
||||
property FechaFin: TDateTime read GetFechaFin;
|
||||
property ListaIDProveedores: TIntegerArray read GetListaIDProveedores;
|
||||
property DesglosadoProveedor: Boolean read GetDesglosadoProveedor;
|
||||
property ImporteMinimo: Currency read GetImporteMinimo;
|
||||
|
||||
constructor Create(AOwner: TComponent); override;
|
||||
destructor Destroy; override;
|
||||
end;
|
||||
|
||||
|
||||
implementation
|
||||
|
||||
{$R *.dfm}
|
||||
|
||||
uses uROTypes, uGestorInformesController, uFactuGES_App;
|
||||
|
||||
{ TfEditorGestorInformesReport }
|
||||
|
||||
procedure TfEditorInformeFacturasProveedorPendientesReport.actRefrescarExecute(Sender: TObject);
|
||||
begin
|
||||
inherited;
|
||||
RefrescarInforme;
|
||||
end;
|
||||
|
||||
constructor TfEditorInformeFacturasProveedorPendientesReport.Create(AOwner: TComponent);
|
||||
begin
|
||||
inherited;
|
||||
FListaIDProveedores := TIntegerArray.Create;
|
||||
end;
|
||||
|
||||
destructor TfEditorInformeFacturasProveedorPendientesReport.Destroy;
|
||||
begin
|
||||
FListaIDProveedores.Free;
|
||||
inherited;
|
||||
end;
|
||||
|
||||
function TfEditorInformeFacturasProveedorPendientesReport.GetDesglosadoProveedor: Boolean;
|
||||
begin
|
||||
if frViewFiltroImportes1.cbxDesglosado.Enabled then
|
||||
Result := frViewFiltroProveedores1.cbxDesglosado.Checked
|
||||
else
|
||||
Result := False;
|
||||
end;
|
||||
|
||||
function TfEditorInformeFacturasProveedorPendientesReport.GetFechaFin: TDateTime;
|
||||
begin
|
||||
Result := frViewPeriodoFechas1.edtFechaFin.Date;
|
||||
end;
|
||||
|
||||
function TfEditorInformeFacturasProveedorPendientesReport.GetFechaInicio: TDateTime;
|
||||
begin
|
||||
Result := frViewPeriodoFechas1.edtFechaIni.Date;
|
||||
end;
|
||||
|
||||
function TfEditorInformeFacturasProveedorPendientesReport.GetImporteMinimo: Currency;
|
||||
begin
|
||||
if frViewFiltroImportes1.eImporte.Enabled then
|
||||
Result := frViewFiltroImportes1.eImporte.Value
|
||||
else
|
||||
Result := 0;
|
||||
end;
|
||||
|
||||
function TfEditorInformeFacturasProveedorPendientesReport.GetListaIDProveedores: TIntegerArray;
|
||||
begin
|
||||
FListaIDProveedores.Clear;
|
||||
if Assigned(frViewFiltroProveedores1.Proveedor) then
|
||||
FListaIDProveedores.Add(frViewFiltroProveedores1.Proveedor.ID);
|
||||
|
||||
Result := FListaIDProveedores;
|
||||
end;
|
||||
|
||||
procedure TfEditorInformeFacturasProveedorPendientesReport.RefrescarInforme;
|
||||
var
|
||||
AStream: Binary;
|
||||
begin
|
||||
ShowHourglassCursor;
|
||||
try
|
||||
AStream := (Controller as IGestorInformesController).DataModule.GenerarInformeListadoFacturasProvPendientes(
|
||||
AppFactuGES.EmpresaActiva.ID,
|
||||
FechaInicio,
|
||||
FechaFin,
|
||||
ListaIDProveedores,
|
||||
DesglosadoProveedor,
|
||||
ImporteMinimo);
|
||||
|
||||
LoadFromStream(AStream);
|
||||
Report.ShowPreparedReport;
|
||||
finally
|
||||
FreeAndNil(AStream);
|
||||
HideHourglassCursor;
|
||||
end;
|
||||
end;
|
||||
|
||||
end.
|
||||
@ -0,0 +1,201 @@
|
||||
inherited fEditorInformeFacturasProveedorReport: TfEditorInformeFacturasProveedorReport
|
||||
Caption = 'fEditorInformeFacturasProveedorReport'
|
||||
ClientHeight = 655
|
||||
ClientWidth = 895
|
||||
ExplicitWidth = 903
|
||||
ExplicitHeight = 689
|
||||
PixelsPerInch = 96
|
||||
TextHeight = 13
|
||||
inherited JvNavPanelHeader: TJvNavPanelHeader
|
||||
Width = 895
|
||||
ExplicitWidth = 895
|
||||
inherited Image1: TImage
|
||||
Left = 868
|
||||
ExplicitLeft = 868
|
||||
end
|
||||
end
|
||||
inherited TBXDock: TTBXDock
|
||||
Width = 895
|
||||
ExplicitWidth = 895
|
||||
inherited tbxMenu: TTBXToolbar
|
||||
ExplicitWidth = 895
|
||||
end
|
||||
inherited TBXToolbar1: TTBXToolbar
|
||||
ExplicitWidth = 591
|
||||
object TBXItem58: TTBXItem [0]
|
||||
Action = actRefrescar
|
||||
DisplayMode = nbdmImageAndText
|
||||
Images = SmallImages
|
||||
end
|
||||
end
|
||||
end
|
||||
inherited StatusBar: TJvStatusBar
|
||||
Top = 636
|
||||
Width = 895
|
||||
ExplicitTop = 636
|
||||
ExplicitWidth = 895
|
||||
end
|
||||
inherited TBXMultiDockIzquierdo: TTBXMultiDock
|
||||
Height = 534
|
||||
ExplicitHeight = 534
|
||||
end
|
||||
inherited TBXMultiDockDerecho: TTBXMultiDock
|
||||
Left = 703
|
||||
Width = 192
|
||||
Height = 534
|
||||
ExplicitLeft = 703
|
||||
ExplicitWidth = 192
|
||||
ExplicitHeight = 534
|
||||
inherited pnlParametros: TTBXDockablePanel
|
||||
DockedWidth = 188
|
||||
ExplicitWidth = 192
|
||||
ExplicitHeight = 518
|
||||
inline frViewPeriodoFechas1: TfrViewPeriodoFechas [0]
|
||||
Left = 0
|
||||
Top = 0
|
||||
Width = 188
|
||||
Height = 136
|
||||
Align = alTop
|
||||
Font.Charset = DEFAULT_CHARSET
|
||||
Font.Color = clWindowText
|
||||
Font.Height = -11
|
||||
Font.Name = 'Tahoma'
|
||||
Font.Style = []
|
||||
ParentFont = False
|
||||
TabOrder = 0
|
||||
ReadOnly = False
|
||||
ExplicitWidth = 188
|
||||
ExplicitHeight = 136
|
||||
inherited TBXAlignmentPanel1: TTBXAlignmentPanel
|
||||
Width = 182
|
||||
ExplicitWidth = 182
|
||||
inherited cbPeriodo: TcxComboBox
|
||||
Style.LookAndFeel.SkinName = ''
|
||||
StyleDisabled.LookAndFeel.SkinName = ''
|
||||
StyleFocused.LookAndFeel.SkinName = ''
|
||||
StyleHot.LookAndFeel.SkinName = ''
|
||||
ExplicitWidth = 153
|
||||
Width = 153
|
||||
end
|
||||
end
|
||||
inherited TBXAlignmentPanel2: TTBXAlignmentPanel
|
||||
Width = 182
|
||||
ExplicitWidth = 182
|
||||
inherited Label3: TLabel
|
||||
Width = 172
|
||||
end
|
||||
inherited edtFechaFin: TcxDateEdit
|
||||
Style.LookAndFeel.SkinName = ''
|
||||
StyleDisabled.LookAndFeel.SkinName = ''
|
||||
StyleFocused.LookAndFeel.SkinName = ''
|
||||
StyleHot.LookAndFeel.SkinName = ''
|
||||
ExplicitWidth = 99
|
||||
Width = 99
|
||||
end
|
||||
inherited edtFechaIni: TcxDateEdit
|
||||
Style.LookAndFeel.SkinName = ''
|
||||
StyleDisabled.LookAndFeel.SkinName = ''
|
||||
StyleFocused.LookAndFeel.SkinName = ''
|
||||
StyleHot.LookAndFeel.SkinName = ''
|
||||
ExplicitWidth = 97
|
||||
Width = 97
|
||||
end
|
||||
end
|
||||
inherited TBXLabel2: TTBXLabel
|
||||
Width = 188
|
||||
ExplicitWidth = 188
|
||||
end
|
||||
end
|
||||
inherited TBXDockablePanel1: TTBXDockablePanel
|
||||
Top = 368
|
||||
TabOrder = 2
|
||||
ExplicitTop = 368
|
||||
ExplicitWidth = 188
|
||||
inherited TBXButton1: TTBXButton
|
||||
AlignWithMargins = True
|
||||
Left = 3
|
||||
Top = 3
|
||||
Width = 182
|
||||
Height = 37
|
||||
Margins.Left = 8
|
||||
Margins.Top = 8
|
||||
Margins.Right = 8
|
||||
Margins.Bottom = 8
|
||||
Align = alTop
|
||||
ExplicitLeft = 3
|
||||
ExplicitTop = 3
|
||||
ExplicitWidth = 182
|
||||
ExplicitHeight = 37
|
||||
end
|
||||
end
|
||||
inline frViewFiltroImportes1: TfrViewFiltroImportes
|
||||
Left = 0
|
||||
Top = 136
|
||||
Width = 188
|
||||
Height = 77
|
||||
Align = alTop
|
||||
AutoSize = True
|
||||
Font.Charset = DEFAULT_CHARSET
|
||||
Font.Color = clWindowText
|
||||
Font.Height = -11
|
||||
Font.Name = 'Tahoma'
|
||||
Font.Style = []
|
||||
ParentFont = False
|
||||
TabOrder = 1
|
||||
ReadOnly = False
|
||||
ExplicitTop = 136
|
||||
ExplicitWidth = 188
|
||||
ExplicitHeight = 77
|
||||
inherited TBXLabel2: TTBXLabel
|
||||
Width = 188
|
||||
ExplicitWidth = 188
|
||||
end
|
||||
inherited TBXAlignmentPanel1: TTBXAlignmentPanel
|
||||
Width = 182
|
||||
ExplicitWidth = 182
|
||||
inherited eImporte: TcxSpinEdit
|
||||
Style.LookAndFeel.SkinName = ''
|
||||
StyleDisabled.LookAndFeel.SkinName = ''
|
||||
StyleFocused.LookAndFeel.SkinName = ''
|
||||
StyleHot.LookAndFeel.SkinName = ''
|
||||
end
|
||||
end
|
||||
end
|
||||
inline frViewFiltroProveedores1: TfrViewFiltroProveedores
|
||||
Left = 0
|
||||
Top = 213
|
||||
Width = 188
|
||||
Height = 146
|
||||
Align = alTop
|
||||
AutoSize = True
|
||||
Font.Charset = DEFAULT_CHARSET
|
||||
Font.Color = clWindowText
|
||||
Font.Height = -11
|
||||
Font.Name = 'Tahoma'
|
||||
Font.Style = []
|
||||
ParentFont = False
|
||||
TabOrder = 3
|
||||
ReadOnly = False
|
||||
ExplicitTop = 213
|
||||
ExplicitWidth = 188
|
||||
ExplicitHeight = 146
|
||||
inherited TBXLabel2: TTBXLabel
|
||||
Width = 188
|
||||
ExplicitWidth = 188
|
||||
end
|
||||
inherited bElegirProveedor: TBitBtn
|
||||
Width = 108
|
||||
ExplicitWidth = 108
|
||||
end
|
||||
inherited edtProveedor: TcxTextEdit
|
||||
Style.LookAndFeel.SkinName = ''
|
||||
StyleDisabled.LookAndFeel.SkinName = ''
|
||||
StyleFocused.LookAndFeel.SkinName = ''
|
||||
StyleHot.LookAndFeel.SkinName = ''
|
||||
ExplicitWidth = 141
|
||||
Width = 141
|
||||
end
|
||||
end
|
||||
end
|
||||
end
|
||||
end
|
||||
@ -0,0 +1,131 @@
|
||||
unit uEditorInformeFacturasProveedorReport;
|
||||
|
||||
interface
|
||||
|
||||
uses
|
||||
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
|
||||
Dialogs, uEditorPreview, frxExportText, frxExportRTF, frxExportMail,
|
||||
frxExportXLS, frxExportImage, frxExportPDF, frxClass, frxDCtrl, frxGradient,
|
||||
frxChBox, frxCross, frxRich, frxOLE, frxBarcode, JvAppStorage,
|
||||
JvAppRegistryStorage, JvComponentBase, JvFormPlacement, ImgList, PngImageList,
|
||||
StdActns, ActnList, ComCtrls, JvExComCtrls, JvStatusBar, TB2ExtItems,
|
||||
TBXExtItems, TBX, TB2Item, TB2Dock, TB2Toolbar, pngimage, ExtCtrls,
|
||||
JvExControls, JvNavigationPane, uCustomView,
|
||||
uViewBase, uViewPeriodoFechas,
|
||||
uViewFiltroProveedores, dxLayoutControl, cxControls, uViewFiltroImportes,
|
||||
FactuGES_Intf, TBXDkPanels, uEditorInformeBase,
|
||||
uIEditorInformeBase, uViewParametrosInforme, uIEditorInformeFacturasProveedorReport;
|
||||
|
||||
type
|
||||
TfEditorInformeFacturasProveedorReport = class(TfEditorInformeBase, IEditorInformeFacturasProveedorReport)
|
||||
TBXItem58: TTBXItem;
|
||||
frViewPeriodoFechas1: TfrViewPeriodoFechas;
|
||||
frViewFiltroImportes1: TfrViewFiltroImportes;
|
||||
frViewFiltroProveedores1: TfrViewFiltroProveedores;
|
||||
procedure actRefrescarExecute(Sender: TObject);
|
||||
private
|
||||
FListaIDProveedores: TIntegerArray;
|
||||
function GetFechaFin: TDateTime;
|
||||
function GetFechaInicio: TDateTime;
|
||||
function GetListaIDProveedores: TIntegerArray;
|
||||
function GetImporteMinimo: Currency;
|
||||
function GetDesglosadoProveedor: Boolean;
|
||||
|
||||
procedure RefrescarInforme;
|
||||
|
||||
public
|
||||
property FechaInicio: TDateTime read GetFechaInicio;
|
||||
property FechaFin: TDateTime read GetFechaFin;
|
||||
property ListaIDProveedores: TIntegerArray read GetListaIDProveedores;
|
||||
property DesglosadoProveedor: Boolean read GetDesglosadoProveedor;
|
||||
property ImporteMinimo: Currency read GetImporteMinimo;
|
||||
|
||||
constructor Create(AOwner: TComponent); override;
|
||||
destructor Destroy; override;
|
||||
end;
|
||||
|
||||
|
||||
implementation
|
||||
|
||||
{$R *.dfm}
|
||||
|
||||
uses uROTypes, uGestorInformesController, uFactuGES_App;
|
||||
|
||||
{ TfEditorGestorInformesReport }
|
||||
|
||||
procedure TfEditorInformeFacturasProveedorReport.actRefrescarExecute(Sender: TObject);
|
||||
begin
|
||||
inherited;
|
||||
RefrescarInforme;
|
||||
end;
|
||||
|
||||
constructor TfEditorInformeFacturasProveedorReport.Create(AOwner: TComponent);
|
||||
begin
|
||||
inherited;
|
||||
FListaIDProveedores := TIntegerArray.Create;
|
||||
end;
|
||||
|
||||
destructor TfEditorInformeFacturasProveedorReport.Destroy;
|
||||
begin
|
||||
FListaIDProveedores.Free;
|
||||
inherited;
|
||||
end;
|
||||
|
||||
function TfEditorInformeFacturasProveedorReport.GetDesglosadoProveedor: Boolean;
|
||||
begin
|
||||
if frViewFiltroImportes1.cbxDesglosado.Enabled then
|
||||
Result := frViewFiltroProveedores1.cbxDesglosado.Checked
|
||||
else
|
||||
Result := False;
|
||||
end;
|
||||
|
||||
function TfEditorInformeFacturasProveedorReport.GetFechaFin: TDateTime;
|
||||
begin
|
||||
Result := frViewPeriodoFechas1.edtFechaFin.Date;
|
||||
end;
|
||||
|
||||
function TfEditorInformeFacturasProveedorReport.GetFechaInicio: TDateTime;
|
||||
begin
|
||||
Result := frViewPeriodoFechas1.edtFechaIni.Date;
|
||||
end;
|
||||
|
||||
function TfEditorInformeFacturasProveedorReport.GetImporteMinimo: Currency;
|
||||
begin
|
||||
if frViewFiltroImportes1.eImporte.Enabled then
|
||||
Result := frViewFiltroImportes1.eImporte.Value
|
||||
else
|
||||
Result := 0;
|
||||
end;
|
||||
|
||||
function TfEditorInformeFacturasProveedorReport.GetListaIDProveedores: TIntegerArray;
|
||||
begin
|
||||
FListaIDProveedores.Clear;
|
||||
if Assigned(frViewFiltroProveedores1.Proveedor) then
|
||||
FListaIDProveedores.Add(frViewFiltroProveedores1.Proveedor.ID);
|
||||
|
||||
Result := FListaIDProveedores;
|
||||
end;
|
||||
|
||||
procedure TfEditorInformeFacturasProveedorReport.RefrescarInforme;
|
||||
var
|
||||
AStream: Binary;
|
||||
begin
|
||||
ShowHourglassCursor;
|
||||
try
|
||||
AStream := (Controller as IGestorInformesController).DataModule.GenerarInformeListadoFacturasProv(
|
||||
AppFactuGES.EmpresaActiva.ID,
|
||||
FechaInicio,
|
||||
FechaFin,
|
||||
ListaIDProveedores,
|
||||
DesglosadoProveedor,
|
||||
ImporteMinimo);
|
||||
|
||||
LoadFromStream(AStream);
|
||||
Report.ShowPreparedReport;
|
||||
finally
|
||||
FreeAndNil(AStream);
|
||||
HideHourglassCursor;
|
||||
end;
|
||||
end;
|
||||
|
||||
end.
|
||||
@ -82,7 +82,7 @@ inherited fEditorInformeIVAClientesReport: TfEditorInformeIVAClientesReport
|
||||
Width = 182
|
||||
ExplicitWidth = 182
|
||||
inherited Label3: TLabel
|
||||
Width = 85
|
||||
Width = 172
|
||||
end
|
||||
inherited edtFechaFin: TcxDateEdit
|
||||
Style.LookAndFeel.SkinName = ''
|
||||
@ -109,9 +109,8 @@ inherited fEditorInformeIVAClientesReport: TfEditorInformeIVAClientesReport
|
||||
inherited TBXDockablePanel1: TTBXDockablePanel
|
||||
Top = 368
|
||||
TabOrder = 2
|
||||
ExplicitTop = 424
|
||||
ExplicitTop = 368
|
||||
ExplicitWidth = 188
|
||||
ExplicitHeight = 50
|
||||
inherited TBXButton1: TTBXButton
|
||||
AlignWithMargins = True
|
||||
Left = 3
|
||||
|
||||
@ -11,7 +11,7 @@ uses
|
||||
StdActns, ActnList, ComCtrls, JvExComCtrls, JvStatusBar, TB2ExtItems,
|
||||
TBXExtItems, TBX, TB2Item, TB2Dock, TB2Toolbar, pngimage, ExtCtrls,
|
||||
JvExControls, JvNavigationPane, uCustomView,
|
||||
uViewBase, uViewPeriodoFechas, uViewDatosYSeleccionClienteBase,
|
||||
uViewBase, uViewPeriodoFechas,
|
||||
uViewFiltroClientes, dxLayoutControl, cxControls, uViewFiltroImportes,
|
||||
FactuGES_Intf, TBXDkPanels, uEditorInformeBase,
|
||||
uIEditorInformeBase, uViewParametrosInforme, uIEditorInformeIVAClientesReport;
|
||||
|
||||
@ -0,0 +1,201 @@
|
||||
inherited fEditorInformeIVAProveedoresReport: TfEditorInformeIVAProveedoresReport
|
||||
Caption = 'fEditorInformeIVAProveedoresReport'
|
||||
ClientHeight = 655
|
||||
ClientWidth = 895
|
||||
ExplicitWidth = 903
|
||||
ExplicitHeight = 689
|
||||
PixelsPerInch = 96
|
||||
TextHeight = 13
|
||||
inherited JvNavPanelHeader: TJvNavPanelHeader
|
||||
Width = 895
|
||||
ExplicitWidth = 895
|
||||
inherited Image1: TImage
|
||||
Left = 868
|
||||
ExplicitLeft = 868
|
||||
end
|
||||
end
|
||||
inherited TBXDock: TTBXDock
|
||||
Width = 895
|
||||
ExplicitWidth = 895
|
||||
inherited tbxMenu: TTBXToolbar
|
||||
ExplicitWidth = 895
|
||||
end
|
||||
inherited TBXToolbar1: TTBXToolbar
|
||||
ExplicitWidth = 591
|
||||
object TBXItem58: TTBXItem [0]
|
||||
Action = actRefrescar
|
||||
DisplayMode = nbdmImageAndText
|
||||
Images = SmallImages
|
||||
end
|
||||
end
|
||||
end
|
||||
inherited StatusBar: TJvStatusBar
|
||||
Top = 636
|
||||
Width = 895
|
||||
ExplicitTop = 636
|
||||
ExplicitWidth = 895
|
||||
end
|
||||
inherited TBXMultiDockIzquierdo: TTBXMultiDock
|
||||
Height = 534
|
||||
ExplicitHeight = 534
|
||||
end
|
||||
inherited TBXMultiDockDerecho: TTBXMultiDock
|
||||
Left = 703
|
||||
Width = 192
|
||||
Height = 534
|
||||
ExplicitLeft = 703
|
||||
ExplicitWidth = 192
|
||||
ExplicitHeight = 534
|
||||
inherited pnlParametros: TTBXDockablePanel
|
||||
DockedWidth = 188
|
||||
ExplicitWidth = 192
|
||||
ExplicitHeight = 518
|
||||
inline frViewPeriodoFechas1: TfrViewPeriodoFechas [0]
|
||||
Left = 0
|
||||
Top = 0
|
||||
Width = 188
|
||||
Height = 136
|
||||
Align = alTop
|
||||
Font.Charset = DEFAULT_CHARSET
|
||||
Font.Color = clWindowText
|
||||
Font.Height = -11
|
||||
Font.Name = 'Tahoma'
|
||||
Font.Style = []
|
||||
ParentFont = False
|
||||
TabOrder = 0
|
||||
ReadOnly = False
|
||||
ExplicitWidth = 188
|
||||
ExplicitHeight = 136
|
||||
inherited TBXAlignmentPanel1: TTBXAlignmentPanel
|
||||
Width = 182
|
||||
ExplicitWidth = 182
|
||||
inherited cbPeriodo: TcxComboBox
|
||||
Style.LookAndFeel.SkinName = ''
|
||||
StyleDisabled.LookAndFeel.SkinName = ''
|
||||
StyleFocused.LookAndFeel.SkinName = ''
|
||||
StyleHot.LookAndFeel.SkinName = ''
|
||||
ExplicitWidth = 153
|
||||
Width = 153
|
||||
end
|
||||
end
|
||||
inherited TBXAlignmentPanel2: TTBXAlignmentPanel
|
||||
Width = 182
|
||||
ExplicitWidth = 182
|
||||
inherited Label3: TLabel
|
||||
Width = 85
|
||||
end
|
||||
inherited edtFechaFin: TcxDateEdit
|
||||
Style.LookAndFeel.SkinName = ''
|
||||
StyleDisabled.LookAndFeel.SkinName = ''
|
||||
StyleFocused.LookAndFeel.SkinName = ''
|
||||
StyleHot.LookAndFeel.SkinName = ''
|
||||
ExplicitWidth = 99
|
||||
Width = 99
|
||||
end
|
||||
inherited edtFechaIni: TcxDateEdit
|
||||
Style.LookAndFeel.SkinName = ''
|
||||
StyleDisabled.LookAndFeel.SkinName = ''
|
||||
StyleFocused.LookAndFeel.SkinName = ''
|
||||
StyleHot.LookAndFeel.SkinName = ''
|
||||
ExplicitWidth = 97
|
||||
Width = 97
|
||||
end
|
||||
end
|
||||
inherited TBXLabel2: TTBXLabel
|
||||
Width = 188
|
||||
ExplicitWidth = 188
|
||||
end
|
||||
end
|
||||
inherited TBXDockablePanel1: TTBXDockablePanel
|
||||
Top = 368
|
||||
TabOrder = 2
|
||||
ExplicitTop = 368
|
||||
ExplicitWidth = 188
|
||||
inherited TBXButton1: TTBXButton
|
||||
AlignWithMargins = True
|
||||
Left = 3
|
||||
Top = 3
|
||||
Width = 182
|
||||
Height = 37
|
||||
Margins.Left = 8
|
||||
Margins.Top = 8
|
||||
Margins.Right = 8
|
||||
Margins.Bottom = 8
|
||||
Align = alTop
|
||||
ExplicitLeft = 3
|
||||
ExplicitTop = 3
|
||||
ExplicitWidth = 182
|
||||
ExplicitHeight = 37
|
||||
end
|
||||
end
|
||||
inline frViewFiltroImportes1: TfrViewFiltroImportes
|
||||
Left = 0
|
||||
Top = 136
|
||||
Width = 188
|
||||
Height = 77
|
||||
Align = alTop
|
||||
AutoSize = True
|
||||
Font.Charset = DEFAULT_CHARSET
|
||||
Font.Color = clWindowText
|
||||
Font.Height = -11
|
||||
Font.Name = 'Tahoma'
|
||||
Font.Style = []
|
||||
ParentFont = False
|
||||
TabOrder = 1
|
||||
ReadOnly = False
|
||||
ExplicitTop = 136
|
||||
ExplicitWidth = 188
|
||||
ExplicitHeight = 77
|
||||
inherited TBXLabel2: TTBXLabel
|
||||
Width = 188
|
||||
ExplicitWidth = 188
|
||||
end
|
||||
inherited TBXAlignmentPanel1: TTBXAlignmentPanel
|
||||
Width = 182
|
||||
ExplicitWidth = 182
|
||||
inherited eImporte: TcxSpinEdit
|
||||
Style.LookAndFeel.SkinName = ''
|
||||
StyleDisabled.LookAndFeel.SkinName = ''
|
||||
StyleFocused.LookAndFeel.SkinName = ''
|
||||
StyleHot.LookAndFeel.SkinName = ''
|
||||
end
|
||||
end
|
||||
end
|
||||
inline frViewFiltroProveedores1: TfrViewFiltroProveedores
|
||||
Left = 0
|
||||
Top = 213
|
||||
Width = 188
|
||||
Height = 146
|
||||
Align = alTop
|
||||
AutoSize = True
|
||||
Font.Charset = DEFAULT_CHARSET
|
||||
Font.Color = clWindowText
|
||||
Font.Height = -11
|
||||
Font.Name = 'Tahoma'
|
||||
Font.Style = []
|
||||
ParentFont = False
|
||||
TabOrder = 3
|
||||
ReadOnly = False
|
||||
ExplicitTop = 213
|
||||
ExplicitWidth = 188
|
||||
ExplicitHeight = 146
|
||||
inherited TBXLabel2: TTBXLabel
|
||||
Width = 188
|
||||
ExplicitWidth = 188
|
||||
end
|
||||
inherited bElegirProveedor: TBitBtn
|
||||
Width = 108
|
||||
ExplicitWidth = 108
|
||||
end
|
||||
inherited edtProveedor: TcxTextEdit
|
||||
Style.LookAndFeel.SkinName = ''
|
||||
StyleDisabled.LookAndFeel.SkinName = ''
|
||||
StyleFocused.LookAndFeel.SkinName = ''
|
||||
StyleHot.LookAndFeel.SkinName = ''
|
||||
ExplicitWidth = 141
|
||||
Width = 141
|
||||
end
|
||||
end
|
||||
end
|
||||
end
|
||||
end
|
||||
@ -0,0 +1,131 @@
|
||||
unit uEditorInformeIVAProveedoresReport;
|
||||
|
||||
interface
|
||||
|
||||
uses
|
||||
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
|
||||
Dialogs, uEditorPreview, frxExportText, frxExportRTF, frxExportMail,
|
||||
frxExportXLS, frxExportImage, frxExportPDF, frxClass, frxDCtrl, frxGradient,
|
||||
frxChBox, frxCross, frxRich, frxOLE, frxBarcode, JvAppStorage,
|
||||
JvAppRegistryStorage, JvComponentBase, JvFormPlacement, ImgList, PngImageList,
|
||||
StdActns, ActnList, ComCtrls, JvExComCtrls, JvStatusBar, TB2ExtItems,
|
||||
TBXExtItems, TBX, TB2Item, TB2Dock, TB2Toolbar, pngimage, ExtCtrls,
|
||||
JvExControls, JvNavigationPane, uCustomView,
|
||||
uViewBase, uViewPeriodoFechas,
|
||||
uViewFiltroProveedores, dxLayoutControl, cxControls, uViewFiltroImportes,
|
||||
FactuGES_Intf, TBXDkPanels, uEditorInformeBase,
|
||||
uIEditorInformeBase, uViewParametrosInforme, uIEditorInformeIVAProveedoresReport;
|
||||
|
||||
type
|
||||
TfEditorInformeIVAProveedoresReport = class(TfEditorInformeBase, IEditorInformeIVAProveedoresReport)
|
||||
TBXItem58: TTBXItem;
|
||||
frViewPeriodoFechas1: TfrViewPeriodoFechas;
|
||||
frViewFiltroImportes1: TfrViewFiltroImportes;
|
||||
frViewFiltroProveedores1: TfrViewFiltroProveedores;
|
||||
procedure actRefrescarExecute(Sender: TObject);
|
||||
private
|
||||
FListaIDProveedores: TIntegerArray;
|
||||
function GetFechaFin: TDateTime;
|
||||
function GetFechaInicio: TDateTime;
|
||||
function GetListaIDProveedores: TIntegerArray;
|
||||
function GetImporteMinimo: Currency;
|
||||
function GetDesglosadoProveedor: Boolean;
|
||||
|
||||
procedure RefrescarInforme;
|
||||
|
||||
public
|
||||
property FechaInicio: TDateTime read GetFechaInicio;
|
||||
property FechaFin: TDateTime read GetFechaFin;
|
||||
property ListaIDProveedores: TIntegerArray read GetListaIDProveedores;
|
||||
property DesglosadoProveedor: Boolean read GetDesglosadoProveedor;
|
||||
property ImporteMinimo: Currency read GetImporteMinimo;
|
||||
|
||||
constructor Create(AOwner: TComponent); override;
|
||||
destructor Destroy; override;
|
||||
end;
|
||||
|
||||
|
||||
implementation
|
||||
|
||||
{$R *.dfm}
|
||||
|
||||
uses uROTypes, uGestorInformesController, uFactuGES_App;
|
||||
|
||||
{ TfEditorGestorInformesReport }
|
||||
|
||||
procedure TfEditorInformeIVAProveedoresReport.actRefrescarExecute(Sender: TObject);
|
||||
begin
|
||||
inherited;
|
||||
RefrescarInforme;
|
||||
end;
|
||||
|
||||
constructor TfEditorInformeIVAProveedoresReport.Create(AOwner: TComponent);
|
||||
begin
|
||||
inherited;
|
||||
FListaIDProveedores := TIntegerArray.Create;
|
||||
end;
|
||||
|
||||
destructor TfEditorInformeIVAProveedoresReport.Destroy;
|
||||
begin
|
||||
FListaIDProveedores.Free;
|
||||
inherited;
|
||||
end;
|
||||
|
||||
function TfEditorInformeIVAProveedoresReport.GetDesglosadoProveedor: Boolean;
|
||||
begin
|
||||
if frViewFiltroImportes1.cbxDesglosado.Enabled then
|
||||
Result := frViewFiltroProveedores1.cbxDesglosado.Checked
|
||||
else
|
||||
Result := False;
|
||||
end;
|
||||
|
||||
function TfEditorInformeIVAProveedoresReport.GetFechaFin: TDateTime;
|
||||
begin
|
||||
Result := frViewPeriodoFechas1.edtFechaFin.Date;
|
||||
end;
|
||||
|
||||
function TfEditorInformeIVAProveedoresReport.GetFechaInicio: TDateTime;
|
||||
begin
|
||||
Result := frViewPeriodoFechas1.edtFechaIni.Date;
|
||||
end;
|
||||
|
||||
function TfEditorInformeIVAProveedoresReport.GetImporteMinimo: Currency;
|
||||
begin
|
||||
if frViewFiltroImportes1.eImporte.Enabled then
|
||||
Result := frViewFiltroImportes1.eImporte.Value
|
||||
else
|
||||
Result := 0;
|
||||
end;
|
||||
|
||||
function TfEditorInformeIVAProveedoresReport.GetListaIDProveedores: TIntegerArray;
|
||||
begin
|
||||
FListaIDProveedores.Clear;
|
||||
if Assigned(frViewFiltroProveedores1.Proveedor) then
|
||||
FListaIDProveedores.Add(frViewFiltroProveedores1.Proveedor.ID);
|
||||
|
||||
Result := FListaIDProveedores;
|
||||
end;
|
||||
|
||||
procedure TfEditorInformeIVAProveedoresReport.RefrescarInforme;
|
||||
var
|
||||
AStream: Binary;
|
||||
begin
|
||||
ShowHourglassCursor;
|
||||
try
|
||||
AStream := (Controller as IGestorInformesController).DataModule.GenerarInformeIVAProveedores(
|
||||
AppFactuGES.EmpresaActiva.ID,
|
||||
FechaInicio,
|
||||
FechaFin,
|
||||
ListaIDProveedores,
|
||||
DesglosadoProveedor,
|
||||
ImporteMinimo);
|
||||
|
||||
LoadFromStream(AStream);
|
||||
Report.ShowPreparedReport;
|
||||
finally
|
||||
FreeAndNil(AStream);
|
||||
HideHourglassCursor;
|
||||
end;
|
||||
end;
|
||||
|
||||
end.
|
||||
@ -0,0 +1,201 @@
|
||||
inherited fEditorInformePedidosReport: TfEditorInformePedidosReport
|
||||
Caption = 'fEditorInformePedidosReport'
|
||||
ClientHeight = 655
|
||||
ClientWidth = 895
|
||||
ExplicitWidth = 903
|
||||
ExplicitHeight = 689
|
||||
PixelsPerInch = 96
|
||||
TextHeight = 13
|
||||
inherited JvNavPanelHeader: TJvNavPanelHeader
|
||||
Width = 895
|
||||
ExplicitWidth = 895
|
||||
inherited Image1: TImage
|
||||
Left = 868
|
||||
ExplicitLeft = 868
|
||||
end
|
||||
end
|
||||
inherited TBXDock: TTBXDock
|
||||
Width = 895
|
||||
ExplicitWidth = 895
|
||||
inherited tbxMenu: TTBXToolbar
|
||||
ExplicitWidth = 895
|
||||
end
|
||||
inherited TBXToolbar1: TTBXToolbar
|
||||
ExplicitWidth = 591
|
||||
object TBXItem58: TTBXItem [0]
|
||||
Action = actRefrescar
|
||||
DisplayMode = nbdmImageAndText
|
||||
Images = SmallImages
|
||||
end
|
||||
end
|
||||
end
|
||||
inherited StatusBar: TJvStatusBar
|
||||
Top = 636
|
||||
Width = 895
|
||||
ExplicitTop = 636
|
||||
ExplicitWidth = 895
|
||||
end
|
||||
inherited TBXMultiDockIzquierdo: TTBXMultiDock
|
||||
Height = 534
|
||||
ExplicitHeight = 534
|
||||
end
|
||||
inherited TBXMultiDockDerecho: TTBXMultiDock
|
||||
Left = 703
|
||||
Width = 192
|
||||
Height = 534
|
||||
ExplicitLeft = 703
|
||||
ExplicitWidth = 192
|
||||
ExplicitHeight = 534
|
||||
inherited pnlParametros: TTBXDockablePanel
|
||||
DockedWidth = 188
|
||||
ExplicitWidth = 192
|
||||
ExplicitHeight = 518
|
||||
inline frViewPeriodoFechas1: TfrViewPeriodoFechas [0]
|
||||
Left = 0
|
||||
Top = 0
|
||||
Width = 188
|
||||
Height = 136
|
||||
Align = alTop
|
||||
Font.Charset = DEFAULT_CHARSET
|
||||
Font.Color = clWindowText
|
||||
Font.Height = -11
|
||||
Font.Name = 'Tahoma'
|
||||
Font.Style = []
|
||||
ParentFont = False
|
||||
TabOrder = 0
|
||||
ReadOnly = False
|
||||
ExplicitWidth = 188
|
||||
ExplicitHeight = 136
|
||||
inherited TBXAlignmentPanel1: TTBXAlignmentPanel
|
||||
Width = 182
|
||||
ExplicitWidth = 182
|
||||
inherited cbPeriodo: TcxComboBox
|
||||
Style.LookAndFeel.SkinName = ''
|
||||
StyleDisabled.LookAndFeel.SkinName = ''
|
||||
StyleFocused.LookAndFeel.SkinName = ''
|
||||
StyleHot.LookAndFeel.SkinName = ''
|
||||
ExplicitWidth = 153
|
||||
Width = 153
|
||||
end
|
||||
end
|
||||
inherited TBXAlignmentPanel2: TTBXAlignmentPanel
|
||||
Width = 182
|
||||
ExplicitWidth = 182
|
||||
inherited Label3: TLabel
|
||||
Width = 85
|
||||
end
|
||||
inherited edtFechaFin: TcxDateEdit
|
||||
Style.LookAndFeel.SkinName = ''
|
||||
StyleDisabled.LookAndFeel.SkinName = ''
|
||||
StyleFocused.LookAndFeel.SkinName = ''
|
||||
StyleHot.LookAndFeel.SkinName = ''
|
||||
ExplicitWidth = 99
|
||||
Width = 99
|
||||
end
|
||||
inherited edtFechaIni: TcxDateEdit
|
||||
Style.LookAndFeel.SkinName = ''
|
||||
StyleDisabled.LookAndFeel.SkinName = ''
|
||||
StyleFocused.LookAndFeel.SkinName = ''
|
||||
StyleHot.LookAndFeel.SkinName = ''
|
||||
ExplicitWidth = 97
|
||||
Width = 97
|
||||
end
|
||||
end
|
||||
inherited TBXLabel2: TTBXLabel
|
||||
Width = 188
|
||||
ExplicitWidth = 188
|
||||
end
|
||||
end
|
||||
inherited TBXDockablePanel1: TTBXDockablePanel
|
||||
Top = 368
|
||||
TabOrder = 2
|
||||
ExplicitTop = 368
|
||||
ExplicitWidth = 188
|
||||
inherited TBXButton1: TTBXButton
|
||||
AlignWithMargins = True
|
||||
Left = 3
|
||||
Top = 3
|
||||
Width = 182
|
||||
Height = 37
|
||||
Margins.Left = 8
|
||||
Margins.Top = 8
|
||||
Margins.Right = 8
|
||||
Margins.Bottom = 8
|
||||
Align = alTop
|
||||
ExplicitLeft = 3
|
||||
ExplicitTop = 3
|
||||
ExplicitWidth = 182
|
||||
ExplicitHeight = 37
|
||||
end
|
||||
end
|
||||
inline frViewFiltroImportes1: TfrViewFiltroImportes
|
||||
Left = 0
|
||||
Top = 136
|
||||
Width = 188
|
||||
Height = 77
|
||||
Align = alTop
|
||||
AutoSize = True
|
||||
Font.Charset = DEFAULT_CHARSET
|
||||
Font.Color = clWindowText
|
||||
Font.Height = -11
|
||||
Font.Name = 'Tahoma'
|
||||
Font.Style = []
|
||||
ParentFont = False
|
||||
TabOrder = 1
|
||||
ReadOnly = False
|
||||
ExplicitTop = 136
|
||||
ExplicitWidth = 188
|
||||
ExplicitHeight = 77
|
||||
inherited TBXLabel2: TTBXLabel
|
||||
Width = 188
|
||||
ExplicitWidth = 188
|
||||
end
|
||||
inherited TBXAlignmentPanel1: TTBXAlignmentPanel
|
||||
Width = 182
|
||||
ExplicitWidth = 182
|
||||
inherited eImporte: TcxSpinEdit
|
||||
Style.LookAndFeel.SkinName = ''
|
||||
StyleDisabled.LookAndFeel.SkinName = ''
|
||||
StyleFocused.LookAndFeel.SkinName = ''
|
||||
StyleHot.LookAndFeel.SkinName = ''
|
||||
end
|
||||
end
|
||||
end
|
||||
inline frViewFiltroProveedores1: TfrViewFiltroProveedores
|
||||
Left = 0
|
||||
Top = 213
|
||||
Width = 188
|
||||
Height = 146
|
||||
Align = alTop
|
||||
AutoSize = True
|
||||
Font.Charset = DEFAULT_CHARSET
|
||||
Font.Color = clWindowText
|
||||
Font.Height = -11
|
||||
Font.Name = 'Tahoma'
|
||||
Font.Style = []
|
||||
ParentFont = False
|
||||
TabOrder = 3
|
||||
ReadOnly = False
|
||||
ExplicitTop = 213
|
||||
ExplicitWidth = 188
|
||||
ExplicitHeight = 146
|
||||
inherited TBXLabel2: TTBXLabel
|
||||
Width = 188
|
||||
ExplicitWidth = 188
|
||||
end
|
||||
inherited bElegirProveedor: TBitBtn
|
||||
Width = 108
|
||||
ExplicitWidth = 108
|
||||
end
|
||||
inherited edtProveedor: TcxTextEdit
|
||||
Style.LookAndFeel.SkinName = ''
|
||||
StyleDisabled.LookAndFeel.SkinName = ''
|
||||
StyleFocused.LookAndFeel.SkinName = ''
|
||||
StyleHot.LookAndFeel.SkinName = ''
|
||||
ExplicitWidth = 141
|
||||
Width = 141
|
||||
end
|
||||
end
|
||||
end
|
||||
end
|
||||
end
|
||||
@ -0,0 +1,131 @@
|
||||
unit uEditorInformePedidosReport;
|
||||
|
||||
interface
|
||||
|
||||
uses
|
||||
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
|
||||
Dialogs, uEditorPreview, frxExportText, frxExportRTF, frxExportMail,
|
||||
frxExportXLS, frxExportImage, frxExportPDF, frxClass, frxDCtrl, frxGradient,
|
||||
frxChBox, frxCross, frxRich, frxOLE, frxBarcode, JvAppStorage,
|
||||
JvAppRegistryStorage, JvComponentBase, JvFormPlacement, ImgList, PngImageList,
|
||||
StdActns, ActnList, ComCtrls, JvExComCtrls, JvStatusBar, TB2ExtItems,
|
||||
TBXExtItems, TBX, TB2Item, TB2Dock, TB2Toolbar, pngimage, ExtCtrls,
|
||||
JvExControls, JvNavigationPane, uCustomView,
|
||||
uViewBase, uViewPeriodoFechas,
|
||||
uViewFiltroProveedores, dxLayoutControl, cxControls, uViewFiltroImportes,
|
||||
FactuGES_Intf, TBXDkPanels, uEditorInformeBase,
|
||||
uIEditorInformeBase, uViewParametrosInforme, uIEditorInformePedidosReport;
|
||||
|
||||
type
|
||||
TfEditorInformePedidosReport = class(TfEditorInformeBase, IEditorInformePedidosReport)
|
||||
TBXItem58: TTBXItem;
|
||||
frViewPeriodoFechas1: TfrViewPeriodoFechas;
|
||||
frViewFiltroImportes1: TfrViewFiltroImportes;
|
||||
frViewFiltroProveedores1: TfrViewFiltroProveedores;
|
||||
procedure actRefrescarExecute(Sender: TObject);
|
||||
private
|
||||
FListaIDProveedores: TIntegerArray;
|
||||
function GetFechaFin: TDateTime;
|
||||
function GetFechaInicio: TDateTime;
|
||||
function GetListaIDProveedores: TIntegerArray;
|
||||
function GetImporteMinimo: Currency;
|
||||
function GetDesglosadoProveedor: Boolean;
|
||||
|
||||
procedure RefrescarInforme;
|
||||
|
||||
public
|
||||
property FechaInicio: TDateTime read GetFechaInicio;
|
||||
property FechaFin: TDateTime read GetFechaFin;
|
||||
property ListaIDProveedores: TIntegerArray read GetListaIDProveedores;
|
||||
property DesglosadoProveedor: Boolean read GetDesglosadoProveedor;
|
||||
property ImporteMinimo: Currency read GetImporteMinimo;
|
||||
|
||||
constructor Create(AOwner: TComponent); override;
|
||||
destructor Destroy; override;
|
||||
end;
|
||||
|
||||
|
||||
implementation
|
||||
|
||||
{$R *.dfm}
|
||||
|
||||
uses uROTypes, uGestorInformesController, uFactuGES_App;
|
||||
|
||||
{ TfEditorGestorInformesReport }
|
||||
|
||||
procedure TfEditorInformePedidosReport.actRefrescarExecute(Sender: TObject);
|
||||
begin
|
||||
inherited;
|
||||
RefrescarInforme;
|
||||
end;
|
||||
|
||||
constructor TfEditorInformePedidosReport.Create(AOwner: TComponent);
|
||||
begin
|
||||
inherited;
|
||||
FListaIDProveedores := TIntegerArray.Create;
|
||||
end;
|
||||
|
||||
destructor TfEditorInformePedidosReport.Destroy;
|
||||
begin
|
||||
FListaIDProveedores.Free;
|
||||
inherited;
|
||||
end;
|
||||
|
||||
function TfEditorInformePedidosReport.GetDesglosadoProveedor: Boolean;
|
||||
begin
|
||||
if frViewFiltroImportes1.cbxDesglosado.Enabled then
|
||||
Result := frViewFiltroProveedores1.cbxDesglosado.Checked
|
||||
else
|
||||
Result := False;
|
||||
end;
|
||||
|
||||
function TfEditorInformePedidosReport.GetFechaFin: TDateTime;
|
||||
begin
|
||||
Result := frViewPeriodoFechas1.edtFechaFin.Date;
|
||||
end;
|
||||
|
||||
function TfEditorInformePedidosReport.GetFechaInicio: TDateTime;
|
||||
begin
|
||||
Result := frViewPeriodoFechas1.edtFechaIni.Date;
|
||||
end;
|
||||
|
||||
function TfEditorInformePedidosReport.GetImporteMinimo: Currency;
|
||||
begin
|
||||
if frViewFiltroImportes1.eImporte.Enabled then
|
||||
Result := frViewFiltroImportes1.eImporte.Value
|
||||
else
|
||||
Result := 0;
|
||||
end;
|
||||
|
||||
function TfEditorInformePedidosReport.GetListaIDProveedores: TIntegerArray;
|
||||
begin
|
||||
FListaIDProveedores.Clear;
|
||||
if Assigned(frViewFiltroProveedores1.Proveedor) then
|
||||
FListaIDProveedores.Add(frViewFiltroProveedores1.Proveedor.ID);
|
||||
|
||||
Result := FListaIDProveedores;
|
||||
end;
|
||||
|
||||
procedure TfEditorInformePedidosReport.RefrescarInforme;
|
||||
var
|
||||
AStream: Binary;
|
||||
begin
|
||||
ShowHourglassCursor;
|
||||
try
|
||||
AStream := (Controller as IGestorInformesController).DataModule.GenerarInformeListadoPedidos(
|
||||
AppFactuGES.EmpresaActiva.ID,
|
||||
FechaInicio,
|
||||
FechaFin,
|
||||
ListaIDProveedores,
|
||||
DesglosadoProveedor,
|
||||
ImporteMinimo);
|
||||
|
||||
LoadFromStream(AStream);
|
||||
Report.ShowPreparedReport;
|
||||
finally
|
||||
FreeAndNil(AStream);
|
||||
HideHourglassCursor;
|
||||
end;
|
||||
end;
|
||||
|
||||
end.
|
||||
@ -0,0 +1,201 @@
|
||||
inherited fEditorInformeRecibosProvPendientesReport: TfEditorInformeRecibosProvPendientesReport
|
||||
Caption = 'fEditorInformeRecibosProvPendientesReport'
|
||||
ClientHeight = 655
|
||||
ClientWidth = 895
|
||||
ExplicitWidth = 903
|
||||
ExplicitHeight = 689
|
||||
PixelsPerInch = 96
|
||||
TextHeight = 13
|
||||
inherited JvNavPanelHeader: TJvNavPanelHeader
|
||||
Width = 895
|
||||
ExplicitWidth = 895
|
||||
inherited Image1: TImage
|
||||
Left = 868
|
||||
ExplicitLeft = 868
|
||||
end
|
||||
end
|
||||
inherited TBXDock: TTBXDock
|
||||
Width = 895
|
||||
ExplicitWidth = 895
|
||||
inherited tbxMenu: TTBXToolbar
|
||||
ExplicitWidth = 895
|
||||
end
|
||||
inherited TBXToolbar1: TTBXToolbar
|
||||
ExplicitWidth = 591
|
||||
object TBXItem58: TTBXItem [0]
|
||||
Action = actRefrescar
|
||||
DisplayMode = nbdmImageAndText
|
||||
Images = SmallImages
|
||||
end
|
||||
end
|
||||
end
|
||||
inherited StatusBar: TJvStatusBar
|
||||
Top = 636
|
||||
Width = 895
|
||||
ExplicitTop = 636
|
||||
ExplicitWidth = 895
|
||||
end
|
||||
inherited TBXMultiDockIzquierdo: TTBXMultiDock
|
||||
Height = 534
|
||||
ExplicitHeight = 534
|
||||
end
|
||||
inherited TBXMultiDockDerecho: TTBXMultiDock
|
||||
Left = 703
|
||||
Width = 192
|
||||
Height = 534
|
||||
ExplicitLeft = 703
|
||||
ExplicitWidth = 192
|
||||
ExplicitHeight = 534
|
||||
inherited pnlParametros: TTBXDockablePanel
|
||||
DockedWidth = 188
|
||||
ExplicitWidth = 192
|
||||
ExplicitHeight = 518
|
||||
inline frViewPeriodoFechas1: TfrViewPeriodoFechas [0]
|
||||
Left = 0
|
||||
Top = 0
|
||||
Width = 188
|
||||
Height = 136
|
||||
Align = alTop
|
||||
Font.Charset = DEFAULT_CHARSET
|
||||
Font.Color = clWindowText
|
||||
Font.Height = -11
|
||||
Font.Name = 'Tahoma'
|
||||
Font.Style = []
|
||||
ParentFont = False
|
||||
TabOrder = 0
|
||||
ReadOnly = False
|
||||
ExplicitWidth = 188
|
||||
ExplicitHeight = 136
|
||||
inherited TBXAlignmentPanel1: TTBXAlignmentPanel
|
||||
Width = 182
|
||||
ExplicitWidth = 182
|
||||
inherited cbPeriodo: TcxComboBox
|
||||
Style.LookAndFeel.SkinName = ''
|
||||
StyleDisabled.LookAndFeel.SkinName = ''
|
||||
StyleFocused.LookAndFeel.SkinName = ''
|
||||
StyleHot.LookAndFeel.SkinName = ''
|
||||
ExplicitWidth = 153
|
||||
Width = 153
|
||||
end
|
||||
end
|
||||
inherited TBXAlignmentPanel2: TTBXAlignmentPanel
|
||||
Width = 182
|
||||
ExplicitWidth = 182
|
||||
inherited Label3: TLabel
|
||||
Width = 85
|
||||
end
|
||||
inherited edtFechaFin: TcxDateEdit
|
||||
Style.LookAndFeel.SkinName = ''
|
||||
StyleDisabled.LookAndFeel.SkinName = ''
|
||||
StyleFocused.LookAndFeel.SkinName = ''
|
||||
StyleHot.LookAndFeel.SkinName = ''
|
||||
ExplicitWidth = 99
|
||||
Width = 99
|
||||
end
|
||||
inherited edtFechaIni: TcxDateEdit
|
||||
Style.LookAndFeel.SkinName = ''
|
||||
StyleDisabled.LookAndFeel.SkinName = ''
|
||||
StyleFocused.LookAndFeel.SkinName = ''
|
||||
StyleHot.LookAndFeel.SkinName = ''
|
||||
ExplicitWidth = 97
|
||||
Width = 97
|
||||
end
|
||||
end
|
||||
inherited TBXLabel2: TTBXLabel
|
||||
Width = 188
|
||||
ExplicitWidth = 188
|
||||
end
|
||||
end
|
||||
inherited TBXDockablePanel1: TTBXDockablePanel
|
||||
Top = 368
|
||||
TabOrder = 2
|
||||
ExplicitTop = 368
|
||||
ExplicitWidth = 188
|
||||
inherited TBXButton1: TTBXButton
|
||||
AlignWithMargins = True
|
||||
Left = 3
|
||||
Top = 3
|
||||
Width = 182
|
||||
Height = 37
|
||||
Margins.Left = 8
|
||||
Margins.Top = 8
|
||||
Margins.Right = 8
|
||||
Margins.Bottom = 8
|
||||
Align = alTop
|
||||
ExplicitLeft = 3
|
||||
ExplicitTop = 3
|
||||
ExplicitWidth = 182
|
||||
ExplicitHeight = 37
|
||||
end
|
||||
end
|
||||
inline frViewFiltroImportes1: TfrViewFiltroImportes
|
||||
Left = 0
|
||||
Top = 136
|
||||
Width = 188
|
||||
Height = 77
|
||||
Align = alTop
|
||||
AutoSize = True
|
||||
Font.Charset = DEFAULT_CHARSET
|
||||
Font.Color = clWindowText
|
||||
Font.Height = -11
|
||||
Font.Name = 'Tahoma'
|
||||
Font.Style = []
|
||||
ParentFont = False
|
||||
TabOrder = 1
|
||||
ReadOnly = False
|
||||
ExplicitTop = 136
|
||||
ExplicitWidth = 188
|
||||
ExplicitHeight = 77
|
||||
inherited TBXLabel2: TTBXLabel
|
||||
Width = 188
|
||||
ExplicitWidth = 188
|
||||
end
|
||||
inherited TBXAlignmentPanel1: TTBXAlignmentPanel
|
||||
Width = 182
|
||||
ExplicitWidth = 182
|
||||
inherited eImporte: TcxSpinEdit
|
||||
Style.LookAndFeel.SkinName = ''
|
||||
StyleDisabled.LookAndFeel.SkinName = ''
|
||||
StyleFocused.LookAndFeel.SkinName = ''
|
||||
StyleHot.LookAndFeel.SkinName = ''
|
||||
end
|
||||
end
|
||||
end
|
||||
inline frViewFiltroProveedores1: TfrViewFiltroProveedores
|
||||
Left = 0
|
||||
Top = 213
|
||||
Width = 188
|
||||
Height = 146
|
||||
Align = alTop
|
||||
AutoSize = True
|
||||
Font.Charset = DEFAULT_CHARSET
|
||||
Font.Color = clWindowText
|
||||
Font.Height = -11
|
||||
Font.Name = 'Tahoma'
|
||||
Font.Style = []
|
||||
ParentFont = False
|
||||
TabOrder = 3
|
||||
ReadOnly = False
|
||||
ExplicitTop = 213
|
||||
ExplicitWidth = 188
|
||||
ExplicitHeight = 146
|
||||
inherited TBXLabel2: TTBXLabel
|
||||
Width = 188
|
||||
ExplicitWidth = 188
|
||||
end
|
||||
inherited bElegirProveedor: TBitBtn
|
||||
Width = 108
|
||||
ExplicitWidth = 108
|
||||
end
|
||||
inherited edtProveedor: TcxTextEdit
|
||||
Style.LookAndFeel.SkinName = ''
|
||||
StyleDisabled.LookAndFeel.SkinName = ''
|
||||
StyleFocused.LookAndFeel.SkinName = ''
|
||||
StyleHot.LookAndFeel.SkinName = ''
|
||||
ExplicitWidth = 141
|
||||
Width = 141
|
||||
end
|
||||
end
|
||||
end
|
||||
end
|
||||
end
|
||||
@ -0,0 +1,131 @@
|
||||
unit uEditorInformeRecibosProvPendientesReport;
|
||||
|
||||
interface
|
||||
|
||||
uses
|
||||
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
|
||||
Dialogs, uEditorPreview, frxExportText, frxExportRTF, frxExportMail,
|
||||
frxExportXLS, frxExportImage, frxExportPDF, frxClass, frxDCtrl, frxGradient,
|
||||
frxChBox, frxCross, frxRich, frxOLE, frxBarcode, JvAppStorage,
|
||||
JvAppRegistryStorage, JvComponentBase, JvFormPlacement, ImgList, PngImageList,
|
||||
StdActns, ActnList, ComCtrls, JvExComCtrls, JvStatusBar, TB2ExtItems,
|
||||
TBXExtItems, TBX, TB2Item, TB2Dock, TB2Toolbar, pngimage, ExtCtrls,
|
||||
JvExControls, JvNavigationPane, uCustomView,
|
||||
uViewBase, uViewPeriodoFechas,
|
||||
uViewFiltroProveedores, dxLayoutControl, cxControls, uViewFiltroImportes,
|
||||
FactuGES_Intf, TBXDkPanels, uEditorInformeBase,
|
||||
uIEditorInformeBase, uViewParametrosInforme, uIEditorInformeRecibosProvPendientesReport;
|
||||
|
||||
type
|
||||
TfEditorInformeRecibosProvPendientesReport = class(TfEditorInformeBase, IEditorInformeRecibosProvPendientesReport)
|
||||
TBXItem58: TTBXItem;
|
||||
frViewPeriodoFechas1: TfrViewPeriodoFechas;
|
||||
frViewFiltroImportes1: TfrViewFiltroImportes;
|
||||
frViewFiltroProveedores1: TfrViewFiltroProveedores;
|
||||
procedure actRefrescarExecute(Sender: TObject);
|
||||
private
|
||||
FListaIDProveedores: TIntegerArray;
|
||||
function GetFechaFin: TDateTime;
|
||||
function GetFechaInicio: TDateTime;
|
||||
function GetListaIDProveedores: TIntegerArray;
|
||||
function GetImporteMinimo: Currency;
|
||||
function GetDesglosadoProveedor: Boolean;
|
||||
|
||||
procedure RefrescarInforme;
|
||||
|
||||
public
|
||||
property FechaInicio: TDateTime read GetFechaInicio;
|
||||
property FechaFin: TDateTime read GetFechaFin;
|
||||
property ListaIDProveedores: TIntegerArray read GetListaIDProveedores;
|
||||
property DesglosadoProveedor: Boolean read GetDesglosadoProveedor;
|
||||
property ImporteMinimo: Currency read GetImporteMinimo;
|
||||
|
||||
constructor Create(AOwner: TComponent); override;
|
||||
destructor Destroy; override;
|
||||
end;
|
||||
|
||||
|
||||
implementation
|
||||
|
||||
{$R *.dfm}
|
||||
|
||||
uses uROTypes, uGestorInformesController, uFactuGES_App;
|
||||
|
||||
{ TfEditorGestorInformesReport }
|
||||
|
||||
procedure TfEditorInformeRecibosProvPendientesReport.actRefrescarExecute(Sender: TObject);
|
||||
begin
|
||||
inherited;
|
||||
RefrescarInforme;
|
||||
end;
|
||||
|
||||
constructor TfEditorInformeRecibosProvPendientesReport.Create(AOwner: TComponent);
|
||||
begin
|
||||
inherited;
|
||||
FListaIDProveedores := TIntegerArray.Create;
|
||||
end;
|
||||
|
||||
destructor TfEditorInformeRecibosProvPendientesReport.Destroy;
|
||||
begin
|
||||
FListaIDProveedores.Free;
|
||||
inherited;
|
||||
end;
|
||||
|
||||
function TfEditorInformeRecibosProvPendientesReport.GetDesglosadoProveedor: Boolean;
|
||||
begin
|
||||
if frViewFiltroImportes1.cbxDesglosado.Enabled then
|
||||
Result := frViewFiltroProveedores1.cbxDesglosado.Checked
|
||||
else
|
||||
Result := False;
|
||||
end;
|
||||
|
||||
function TfEditorInformeRecibosProvPendientesReport.GetFechaFin: TDateTime;
|
||||
begin
|
||||
Result := frViewPeriodoFechas1.edtFechaFin.Date;
|
||||
end;
|
||||
|
||||
function TfEditorInformeRecibosProvPendientesReport.GetFechaInicio: TDateTime;
|
||||
begin
|
||||
Result := frViewPeriodoFechas1.edtFechaIni.Date;
|
||||
end;
|
||||
|
||||
function TfEditorInformeRecibosProvPendientesReport.GetImporteMinimo: Currency;
|
||||
begin
|
||||
if frViewFiltroImportes1.eImporte.Enabled then
|
||||
Result := frViewFiltroImportes1.eImporte.Value
|
||||
else
|
||||
Result := 0;
|
||||
end;
|
||||
|
||||
function TfEditorInformeRecibosProvPendientesReport.GetListaIDProveedores: TIntegerArray;
|
||||
begin
|
||||
FListaIDProveedores.Clear;
|
||||
if Assigned(frViewFiltroProveedores1.Proveedor) then
|
||||
FListaIDProveedores.Add(frViewFiltroProveedores1.Proveedor.ID);
|
||||
|
||||
Result := FListaIDProveedores;
|
||||
end;
|
||||
|
||||
procedure TfEditorInformeRecibosProvPendientesReport.RefrescarInforme;
|
||||
var
|
||||
AStream: Binary;
|
||||
begin
|
||||
ShowHourglassCursor;
|
||||
try
|
||||
AStream := (Controller as IGestorInformesController).DataModule.GenerarInformeListadoRecibosProvPendientes(
|
||||
AppFactuGES.EmpresaActiva.ID,
|
||||
FechaInicio,
|
||||
FechaFin,
|
||||
ListaIDProveedores,
|
||||
DesglosadoProveedor,
|
||||
ImporteMinimo);
|
||||
|
||||
LoadFromStream(AStream);
|
||||
Report.ShowPreparedReport;
|
||||
finally
|
||||
FreeAndNil(AStream);
|
||||
HideHourglassCursor;
|
||||
end;
|
||||
end;
|
||||
|
||||
end.
|
||||
@ -0,0 +1,201 @@
|
||||
inherited fEditorInformeRecibosProveedorReport: TfEditorInformeRecibosProveedorReport
|
||||
Caption = 'fEditorInformeRecibosProveedorReport'
|
||||
ClientHeight = 655
|
||||
ClientWidth = 895
|
||||
ExplicitWidth = 903
|
||||
ExplicitHeight = 689
|
||||
PixelsPerInch = 96
|
||||
TextHeight = 13
|
||||
inherited JvNavPanelHeader: TJvNavPanelHeader
|
||||
Width = 895
|
||||
ExplicitWidth = 895
|
||||
inherited Image1: TImage
|
||||
Left = 868
|
||||
ExplicitLeft = 868
|
||||
end
|
||||
end
|
||||
inherited TBXDock: TTBXDock
|
||||
Width = 895
|
||||
ExplicitWidth = 895
|
||||
inherited tbxMenu: TTBXToolbar
|
||||
ExplicitWidth = 895
|
||||
end
|
||||
inherited TBXToolbar1: TTBXToolbar
|
||||
ExplicitWidth = 591
|
||||
object TBXItem58: TTBXItem [0]
|
||||
Action = actRefrescar
|
||||
DisplayMode = nbdmImageAndText
|
||||
Images = SmallImages
|
||||
end
|
||||
end
|
||||
end
|
||||
inherited StatusBar: TJvStatusBar
|
||||
Top = 636
|
||||
Width = 895
|
||||
ExplicitTop = 636
|
||||
ExplicitWidth = 895
|
||||
end
|
||||
inherited TBXMultiDockIzquierdo: TTBXMultiDock
|
||||
Height = 534
|
||||
ExplicitHeight = 534
|
||||
end
|
||||
inherited TBXMultiDockDerecho: TTBXMultiDock
|
||||
Left = 703
|
||||
Width = 192
|
||||
Height = 534
|
||||
ExplicitLeft = 703
|
||||
ExplicitWidth = 192
|
||||
ExplicitHeight = 534
|
||||
inherited pnlParametros: TTBXDockablePanel
|
||||
DockedWidth = 188
|
||||
ExplicitWidth = 192
|
||||
ExplicitHeight = 518
|
||||
inline frViewPeriodoFechas1: TfrViewPeriodoFechas [0]
|
||||
Left = 0
|
||||
Top = 0
|
||||
Width = 188
|
||||
Height = 136
|
||||
Align = alTop
|
||||
Font.Charset = DEFAULT_CHARSET
|
||||
Font.Color = clWindowText
|
||||
Font.Height = -11
|
||||
Font.Name = 'Tahoma'
|
||||
Font.Style = []
|
||||
ParentFont = False
|
||||
TabOrder = 0
|
||||
ReadOnly = False
|
||||
ExplicitWidth = 188
|
||||
ExplicitHeight = 136
|
||||
inherited TBXAlignmentPanel1: TTBXAlignmentPanel
|
||||
Width = 182
|
||||
ExplicitWidth = 182
|
||||
inherited cbPeriodo: TcxComboBox
|
||||
Style.LookAndFeel.SkinName = ''
|
||||
StyleDisabled.LookAndFeel.SkinName = ''
|
||||
StyleFocused.LookAndFeel.SkinName = ''
|
||||
StyleHot.LookAndFeel.SkinName = ''
|
||||
ExplicitWidth = 153
|
||||
Width = 153
|
||||
end
|
||||
end
|
||||
inherited TBXAlignmentPanel2: TTBXAlignmentPanel
|
||||
Width = 182
|
||||
ExplicitWidth = 182
|
||||
inherited Label3: TLabel
|
||||
Width = 85
|
||||
end
|
||||
inherited edtFechaFin: TcxDateEdit
|
||||
Style.LookAndFeel.SkinName = ''
|
||||
StyleDisabled.LookAndFeel.SkinName = ''
|
||||
StyleFocused.LookAndFeel.SkinName = ''
|
||||
StyleHot.LookAndFeel.SkinName = ''
|
||||
ExplicitWidth = 99
|
||||
Width = 99
|
||||
end
|
||||
inherited edtFechaIni: TcxDateEdit
|
||||
Style.LookAndFeel.SkinName = ''
|
||||
StyleDisabled.LookAndFeel.SkinName = ''
|
||||
StyleFocused.LookAndFeel.SkinName = ''
|
||||
StyleHot.LookAndFeel.SkinName = ''
|
||||
ExplicitWidth = 97
|
||||
Width = 97
|
||||
end
|
||||
end
|
||||
inherited TBXLabel2: TTBXLabel
|
||||
Width = 188
|
||||
ExplicitWidth = 188
|
||||
end
|
||||
end
|
||||
inherited TBXDockablePanel1: TTBXDockablePanel
|
||||
Top = 368
|
||||
TabOrder = 2
|
||||
ExplicitTop = 368
|
||||
ExplicitWidth = 188
|
||||
inherited TBXButton1: TTBXButton
|
||||
AlignWithMargins = True
|
||||
Left = 3
|
||||
Top = 3
|
||||
Width = 182
|
||||
Height = 37
|
||||
Margins.Left = 8
|
||||
Margins.Top = 8
|
||||
Margins.Right = 8
|
||||
Margins.Bottom = 8
|
||||
Align = alTop
|
||||
ExplicitLeft = 3
|
||||
ExplicitTop = 3
|
||||
ExplicitWidth = 182
|
||||
ExplicitHeight = 37
|
||||
end
|
||||
end
|
||||
inline frViewFiltroImportes1: TfrViewFiltroImportes
|
||||
Left = 0
|
||||
Top = 136
|
||||
Width = 188
|
||||
Height = 77
|
||||
Align = alTop
|
||||
AutoSize = True
|
||||
Font.Charset = DEFAULT_CHARSET
|
||||
Font.Color = clWindowText
|
||||
Font.Height = -11
|
||||
Font.Name = 'Tahoma'
|
||||
Font.Style = []
|
||||
ParentFont = False
|
||||
TabOrder = 1
|
||||
ReadOnly = False
|
||||
ExplicitTop = 136
|
||||
ExplicitWidth = 188
|
||||
ExplicitHeight = 77
|
||||
inherited TBXLabel2: TTBXLabel
|
||||
Width = 188
|
||||
ExplicitWidth = 188
|
||||
end
|
||||
inherited TBXAlignmentPanel1: TTBXAlignmentPanel
|
||||
Width = 182
|
||||
ExplicitWidth = 182
|
||||
inherited eImporte: TcxSpinEdit
|
||||
Style.LookAndFeel.SkinName = ''
|
||||
StyleDisabled.LookAndFeel.SkinName = ''
|
||||
StyleFocused.LookAndFeel.SkinName = ''
|
||||
StyleHot.LookAndFeel.SkinName = ''
|
||||
end
|
||||
end
|
||||
end
|
||||
inline frViewFiltroProveedores1: TfrViewFiltroProveedores
|
||||
Left = 0
|
||||
Top = 213
|
||||
Width = 188
|
||||
Height = 146
|
||||
Align = alTop
|
||||
AutoSize = True
|
||||
Font.Charset = DEFAULT_CHARSET
|
||||
Font.Color = clWindowText
|
||||
Font.Height = -11
|
||||
Font.Name = 'Tahoma'
|
||||
Font.Style = []
|
||||
ParentFont = False
|
||||
TabOrder = 3
|
||||
ReadOnly = False
|
||||
ExplicitTop = 213
|
||||
ExplicitWidth = 188
|
||||
ExplicitHeight = 146
|
||||
inherited TBXLabel2: TTBXLabel
|
||||
Width = 188
|
||||
ExplicitWidth = 188
|
||||
end
|
||||
inherited bElegirProveedor: TBitBtn
|
||||
Width = 108
|
||||
ExplicitWidth = 108
|
||||
end
|
||||
inherited edtProveedor: TcxTextEdit
|
||||
Style.LookAndFeel.SkinName = ''
|
||||
StyleDisabled.LookAndFeel.SkinName = ''
|
||||
StyleFocused.LookAndFeel.SkinName = ''
|
||||
StyleHot.LookAndFeel.SkinName = ''
|
||||
ExplicitWidth = 141
|
||||
Width = 141
|
||||
end
|
||||
end
|
||||
end
|
||||
end
|
||||
end
|
||||
@ -0,0 +1,131 @@
|
||||
unit uEditorInformeRecibosProveedorReport;
|
||||
|
||||
interface
|
||||
|
||||
uses
|
||||
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
|
||||
Dialogs, uEditorPreview, frxExportText, frxExportRTF, frxExportMail,
|
||||
frxExportXLS, frxExportImage, frxExportPDF, frxClass, frxDCtrl, frxGradient,
|
||||
frxChBox, frxCross, frxRich, frxOLE, frxBarcode, JvAppStorage,
|
||||
JvAppRegistryStorage, JvComponentBase, JvFormPlacement, ImgList, PngImageList,
|
||||
StdActns, ActnList, ComCtrls, JvExComCtrls, JvStatusBar, TB2ExtItems,
|
||||
TBXExtItems, TBX, TB2Item, TB2Dock, TB2Toolbar, pngimage, ExtCtrls,
|
||||
JvExControls, JvNavigationPane, uCustomView,
|
||||
uViewBase, uViewPeriodoFechas,
|
||||
uViewFiltroProveedores, dxLayoutControl, cxControls, uViewFiltroImportes,
|
||||
FactuGES_Intf, TBXDkPanels, uEditorInformeBase,
|
||||
uIEditorInformeBase, uViewParametrosInforme, uIEditorInformeRecibosProveedorReport;
|
||||
|
||||
type
|
||||
TfEditorInformeRecibosProveedorReport = class(TfEditorInformeBase, IEditorInformeRecibosProveedorReport)
|
||||
TBXItem58: TTBXItem;
|
||||
frViewPeriodoFechas1: TfrViewPeriodoFechas;
|
||||
frViewFiltroImportes1: TfrViewFiltroImportes;
|
||||
frViewFiltroProveedores1: TfrViewFiltroProveedores;
|
||||
procedure actRefrescarExecute(Sender: TObject);
|
||||
private
|
||||
FListaIDProveedores: TIntegerArray;
|
||||
function GetFechaFin: TDateTime;
|
||||
function GetFechaInicio: TDateTime;
|
||||
function GetListaIDProveedores: TIntegerArray;
|
||||
function GetImporteMinimo: Currency;
|
||||
function GetDesglosadoProveedor: Boolean;
|
||||
|
||||
procedure RefrescarInforme;
|
||||
|
||||
public
|
||||
property FechaInicio: TDateTime read GetFechaInicio;
|
||||
property FechaFin: TDateTime read GetFechaFin;
|
||||
property ListaIDProveedores: TIntegerArray read GetListaIDProveedores;
|
||||
property DesglosadoProveedor: Boolean read GetDesglosadoProveedor;
|
||||
property ImporteMinimo: Currency read GetImporteMinimo;
|
||||
|
||||
constructor Create(AOwner: TComponent); override;
|
||||
destructor Destroy; override;
|
||||
end;
|
||||
|
||||
|
||||
implementation
|
||||
|
||||
{$R *.dfm}
|
||||
|
||||
uses uROTypes, uGestorInformesController, uFactuGES_App;
|
||||
|
||||
{ TfEditorGestorInformesReport }
|
||||
|
||||
procedure TfEditorInformeRecibosProveedorReport.actRefrescarExecute(Sender: TObject);
|
||||
begin
|
||||
inherited;
|
||||
RefrescarInforme;
|
||||
end;
|
||||
|
||||
constructor TfEditorInformeRecibosProveedorReport.Create(AOwner: TComponent);
|
||||
begin
|
||||
inherited;
|
||||
FListaIDProveedores := TIntegerArray.Create;
|
||||
end;
|
||||
|
||||
destructor TfEditorInformeRecibosProveedorReport.Destroy;
|
||||
begin
|
||||
FListaIDProveedores.Free;
|
||||
inherited;
|
||||
end;
|
||||
|
||||
function TfEditorInformeRecibosProveedorReport.GetDesglosadoProveedor: Boolean;
|
||||
begin
|
||||
if frViewFiltroImportes1.cbxDesglosado.Enabled then
|
||||
Result := frViewFiltroProveedores1.cbxDesglosado.Checked
|
||||
else
|
||||
Result := False;
|
||||
end;
|
||||
|
||||
function TfEditorInformeRecibosProveedorReport.GetFechaFin: TDateTime;
|
||||
begin
|
||||
Result := frViewPeriodoFechas1.edtFechaFin.Date;
|
||||
end;
|
||||
|
||||
function TfEditorInformeRecibosProveedorReport.GetFechaInicio: TDateTime;
|
||||
begin
|
||||
Result := frViewPeriodoFechas1.edtFechaIni.Date;
|
||||
end;
|
||||
|
||||
function TfEditorInformeRecibosProveedorReport.GetImporteMinimo: Currency;
|
||||
begin
|
||||
if frViewFiltroImportes1.eImporte.Enabled then
|
||||
Result := frViewFiltroImportes1.eImporte.Value
|
||||
else
|
||||
Result := 0;
|
||||
end;
|
||||
|
||||
function TfEditorInformeRecibosProveedorReport.GetListaIDProveedores: TIntegerArray;
|
||||
begin
|
||||
FListaIDProveedores.Clear;
|
||||
if Assigned(frViewFiltroProveedores1.Proveedor) then
|
||||
FListaIDProveedores.Add(frViewFiltroProveedores1.Proveedor.ID);
|
||||
|
||||
Result := FListaIDProveedores;
|
||||
end;
|
||||
|
||||
procedure TfEditorInformeRecibosProveedorReport.RefrescarInforme;
|
||||
var
|
||||
AStream: Binary;
|
||||
begin
|
||||
ShowHourglassCursor;
|
||||
try
|
||||
AStream := (Controller as IGestorInformesController).DataModule.GenerarInformeListadoRecibosProveedor(
|
||||
AppFactuGES.EmpresaActiva.ID,
|
||||
FechaInicio,
|
||||
FechaFin,
|
||||
ListaIDProveedores,
|
||||
DesglosadoProveedor,
|
||||
ImporteMinimo);
|
||||
|
||||
LoadFromStream(AStream);
|
||||
Report.ShowPreparedReport;
|
||||
finally
|
||||
FreeAndNil(AStream);
|
||||
HideHourglassCursor;
|
||||
end;
|
||||
end;
|
||||
|
||||
end.
|
||||
@ -10,7 +10,10 @@ implementation
|
||||
uses
|
||||
uEditorRegistryUtils,
|
||||
uEditorInformeIVAClientesReport, uEditorInformeFacturasClienteReport, uEditorInformeFacturasClientePendientesReport,
|
||||
uEditorInformeRecibosClienteReport, uEditorInformeRecibosCliPendientesReport, uEditorInformePresupuestosReport
|
||||
uEditorInformeRecibosClienteReport, uEditorInformeRecibosCliPendientesReport, uEditorInformePresupuestosReport,
|
||||
|
||||
uEditorInformeIVAProveedoresReport, uEditorInformeFacturasProveedorReport, uEditorInformeFacturasProveedorPendientesReport,
|
||||
uEditorInformeRecibosProveedorReport, uEditorInformeRecibosProvPendientesReport, uEditorInformePedidosReport
|
||||
;
|
||||
|
||||
procedure RegisterViews;
|
||||
@ -21,6 +24,13 @@ begin
|
||||
EditorRegistry.RegisterClass(TfEditorInformeFacturasClientePendientesReport, 'EditorInformeFacturasClientePendientesReport');
|
||||
EditorRegistry.RegisterClass(TfEditorInformeRecibosClienteReport, 'EditorInformeRecibosClienteReport');
|
||||
EditorRegistry.RegisterClass(TfEditorInformeRecibosCliPendientesReport, 'EditorInformeRecibosCliPendientesReport');
|
||||
|
||||
EditorRegistry.RegisterClass(TfEditorInformePedidosReport, 'EditorInformePedidosReport');
|
||||
EditorRegistry.RegisterClass(TfEditorInformeIVAProveedoresReport, 'EditorInformeIVAProveedoresReport');
|
||||
EditorRegistry.RegisterClass(TfEditorInformeFacturasProveedorReport, 'EditorInformeFacturasProveedorReport');
|
||||
EditorRegistry.RegisterClass(TfEditorInformeFacturasProveedorPendientesReport, 'EditorInformeFacturasProveedorPendientesReport');
|
||||
EditorRegistry.RegisterClass(TfEditorInformeRecibosProveedorReport, 'EditorInformeRecibosProveedorReport');
|
||||
EditorRegistry.RegisterClass(TfEditorInformeRecibosProvPendientesReport, 'EditorInformeRecibosProvPendientesReport');
|
||||
end;
|
||||
|
||||
procedure UnregisterViews;
|
||||
@ -31,6 +41,13 @@ begin
|
||||
EditorRegistry.UnRegisterClass(TfEditorInformeFacturasClientePendientesReport);
|
||||
EditorRegistry.UnRegisterClass(TfEditorInformeRecibosClienteReport);
|
||||
EditorRegistry.UnRegisterClass(TfEditorInformeRecibosCliPendientesReport);
|
||||
|
||||
EditorRegistry.UnRegisterClass(TfEditorInformePedidosReport);
|
||||
EditorRegistry.UnRegisterClass(TfEditorInformeIVAProveedoresReport);
|
||||
EditorRegistry.UnRegisterClass(TfEditorInformeFacturasProveedorReport);
|
||||
EditorRegistry.UnRegisterClass(TfEditorInformeFacturasProveedorPendientesReport);
|
||||
EditorRegistry.UnRegisterClass(TfEditorInformeRecibosProveedorReport);
|
||||
EditorRegistry.UnRegisterClass(TfEditorInformeRecibosProvPendientesReport);
|
||||
end;
|
||||
|
||||
end.
|
||||
|
||||
@ -82,8 +82,6 @@ inherited frViewFiltroClientes: TfrViewFiltroClientes
|
||||
Width = 146
|
||||
Height = 17
|
||||
Caption = 'Desglosar por cliente'
|
||||
Checked = True
|
||||
State = cbChecked
|
||||
TabOrder = 2
|
||||
end
|
||||
object edtCliente: TcxTextEdit
|
||||
|
||||
@ -0,0 +1,131 @@
|
||||
inherited frViewFiltroProveedores: TfrViewFiltroProveedores
|
||||
Width = 451
|
||||
Align = alTop
|
||||
OnCreate = CustomViewCreate
|
||||
OnDestroy = CustomViewDestroy
|
||||
ExplicitWidth = 451
|
||||
DesignSize = (
|
||||
451
|
||||
195)
|
||||
object TBXLabel2: TTBXLabel
|
||||
Left = 0
|
||||
Top = 0
|
||||
Width = 451
|
||||
Height = 29
|
||||
Margins.Top = 5
|
||||
Margins.Bottom = 10
|
||||
Align = alTop
|
||||
Caption = 'Proveedores'
|
||||
Font.Charset = DEFAULT_CHARSET
|
||||
Font.Color = clWindowText
|
||||
Font.Height = -11
|
||||
Font.Name = 'MS Sans Serif'
|
||||
Font.Style = [fsBold]
|
||||
ParentColor = True
|
||||
ParentFont = False
|
||||
Underline = True
|
||||
end
|
||||
object bElegirProveedor: TBitBtn
|
||||
AlignWithMargins = True
|
||||
Left = 61
|
||||
Top = 123
|
||||
Width = 382
|
||||
Height = 23
|
||||
Margins.Left = 0
|
||||
Margins.Top = 0
|
||||
Margins.Right = 2
|
||||
Margins.Bottom = 0
|
||||
Anchors = [akLeft, akTop, akRight]
|
||||
Caption = 'Elegir un proveedor'
|
||||
Enabled = False
|
||||
TabOrder = 1
|
||||
OnClick = bElegirProveedorClick
|
||||
Glyph.Data = {
|
||||
36040000424D3604000000000000360000002800000010000000100000000100
|
||||
2000000000000004000000000000000000000000000000000000FF00FF00FF00
|
||||
FF00FF00FF00EB00EB00C507C600AB13AD00A119A2009F19A000A215A400AA10
|
||||
AC00B608B800CE00CE00EF00EF00FF00FF00FF00FF00FF00FF00FF00FF00FF00
|
||||
FF00B426B000526840004A823400478F310043962F0042992F0043972F004690
|
||||
3100488533004B7237005A405100D201D200FF00FF00FF00FF00FF00FF00FF00
|
||||
FF0062654E004F81350047903100409C2E003AA62C0038AA2B0039A72B003E9E
|
||||
2D00459230004D84340056753800A0189F00FF00FF00FF00FF00FF00FF00FF00
|
||||
FF005F6B4C004B89330042992F0039A82B0032B428002EBB260031B6270037AB
|
||||
2A00409C2E00498C3200527B3600B015B100FF00FF00FF00FF00FF00FF00FF00
|
||||
FF0090488700488D32003E9E2D0035AF290035B631007ACB7B002DBF280033B2
|
||||
28003DA12D0047903100576A4800EC01EC00FF00FF00FF00FF00FF00FF00FF00
|
||||
FF00F008F1005F7351003E9F2D0034B0290080AC8100D2D3D30081BB820032B2
|
||||
28003DA22D004A863A00C519C500FF00FF00FF00FF00FF00FF00FF00FF00FF00
|
||||
FF00FF00FF00EE09EF007861730036923E00598CAE00498CBB004A81A6002B70
|
||||
3A00606D5900D613D600FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00
|
||||
FF00FF00FF00FF00FF00EA0CF400608CD00054A2D80053A1D6004F9DD300488B
|
||||
C2009D11AC00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00
|
||||
FF00FF00FF00FF00FF008C67DE005CA9DD005CA9DD005AA7DC0056A4D900519F
|
||||
D400565FAB00EA00EA00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00
|
||||
FF00FF00FF00EC0DF60060A7DE0063B0E30063B0E30061AEE1005CA9DD0056A4
|
||||
D9004E94CC00C105C600FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00
|
||||
FF00FF00FF00C532ED0066B2E5006BB7E9006BB7E90067B3E60061AEE1005AA7
|
||||
DC00539FD500A817BE00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00
|
||||
FF00FF00FF00BA3AE7004989B1004A85AC005895BD0068B2E30064B0E4005CA9
|
||||
DE0053A0D400AA1BC300FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00
|
||||
FF00FF00FF00CA23E8005098C400539AC7004E93BE00437DA2005190BA005198
|
||||
C6003C79A000BE08C300FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00
|
||||
FF00FF00FF00F804FC006995D40062ACDA005DA6D3005299C6004284AD003C7F
|
||||
A900535AA100F300F300FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00
|
||||
FF00FF00FF00FF00FF00C140ED0071BAEA0068B2E00059A1CF004990BC004378
|
||||
AA00C315D600FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00
|
||||
FF00FF00FF00FF00FF00FF00FF00C83EF000808BDF00668BCC007C60C700D116
|
||||
E400FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00}
|
||||
end
|
||||
object cbxDesglosado: TCheckBox
|
||||
Left = 23
|
||||
Top = 49
|
||||
Width = 158
|
||||
Height = 17
|
||||
Caption = 'Desglosar por proveedor'
|
||||
TabOrder = 2
|
||||
end
|
||||
object edtProveedor: TcxTextEdit
|
||||
Left = 28
|
||||
Top = 99
|
||||
Anchors = [akLeft, akTop, akRight]
|
||||
AutoSize = False
|
||||
Enabled = False
|
||||
Properties.ReadOnly = True
|
||||
Properties.UseLeftAlignmentOnEditing = False
|
||||
Style.BorderColor = clWindowFrame
|
||||
Style.BorderStyle = ebs3D
|
||||
Style.HotTrack = False
|
||||
Style.LookAndFeel.NativeStyle = True
|
||||
Style.LookAndFeel.SkinName = ''
|
||||
StyleDisabled.LookAndFeel.NativeStyle = True
|
||||
StyleDisabled.LookAndFeel.SkinName = ''
|
||||
StyleDisabled.TextColor = clWindowText
|
||||
StyleFocused.LookAndFeel.NativeStyle = True
|
||||
StyleFocused.LookAndFeel.SkinName = ''
|
||||
StyleHot.LookAndFeel.NativeStyle = True
|
||||
StyleHot.LookAndFeel.SkinName = ''
|
||||
TabOrder = 3
|
||||
Height = 21
|
||||
Width = 415
|
||||
end
|
||||
object rbTodosProveedores: TRadioButton
|
||||
Left = 6
|
||||
Top = 29
|
||||
Width = 195
|
||||
Height = 17
|
||||
Caption = 'Incluir a todos los Proveedores'
|
||||
Checked = True
|
||||
TabOrder = 4
|
||||
TabStop = True
|
||||
OnClick = rbTodosProveedoresClick
|
||||
end
|
||||
object rbUnProveedor: TRadioButton
|
||||
Left = 6
|
||||
Top = 76
|
||||
Width = 175
|
||||
Height = 17
|
||||
Caption = 'S'#243'lo listar el proveedor siguiente:'
|
||||
TabOrder = 5
|
||||
OnClick = rbUnProveedorClick
|
||||
end
|
||||
end
|
||||
@ -0,0 +1,95 @@
|
||||
unit uViewFiltroProveedores;
|
||||
|
||||
interface
|
||||
|
||||
uses
|
||||
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
|
||||
Dialogs, uViewBase, cxControls, cxContainer, cxEdit, cxTextEdit, cxDBEdit,
|
||||
StdCtrls, Buttons, TBXDkPanels, uViewParametrosInforme, uBizContactos,
|
||||
uProveedoresController;
|
||||
|
||||
type
|
||||
IViewFiltroProveedores = interface(IViewParametrosInforme)
|
||||
['{129906DA-8E64-4312-8095-A04F8007CF7F}']
|
||||
end;
|
||||
|
||||
TfrViewFiltroProveedores = class(TfrViewParametrosInforme, IViewFiltroProveedores)
|
||||
TBXLabel2: TTBXLabel;
|
||||
rbTodosProveedores: TRadioButton;
|
||||
rbUnProveedor: TRadioButton;
|
||||
cbxDesglosado: TCheckBox;
|
||||
bElegirProveedor: TBitBtn;
|
||||
edtProveedor: TcxTextEdit;
|
||||
procedure rbTodosProveedoresClick(Sender: TObject);
|
||||
procedure rbUnProveedorClick(Sender: TObject);
|
||||
procedure CustomViewCreate(Sender: TObject);
|
||||
procedure bElegirProveedorClick(Sender: TObject);
|
||||
procedure CustomViewDestroy(Sender: TObject);
|
||||
private
|
||||
FProveedor : IBizProveedor;
|
||||
FProveedoresController : IProveedoresController;
|
||||
public
|
||||
property Proveedor : IBizProveedor read FProveedor;
|
||||
end;
|
||||
|
||||
implementation
|
||||
|
||||
{$R *.dfm}
|
||||
|
||||
procedure TfrViewFiltroProveedores.bElegirProveedorClick(Sender: TObject);
|
||||
var
|
||||
AProveedores : IBizProveedor;
|
||||
begin
|
||||
inherited;
|
||||
AProveedores := IBizProveedor(FProveedoresController.BuscarTodos);
|
||||
try
|
||||
FProveedor := IBizProveedor(FProveedoresController.ElegirContacto(AProveedores, '', False));
|
||||
if Assigned(FProveedor) then
|
||||
begin
|
||||
FProveedor.Open;
|
||||
edtProveedor.Text := FProveedor.NOMBRE;
|
||||
end;
|
||||
finally
|
||||
AProveedores := NIL;
|
||||
end;
|
||||
end;
|
||||
|
||||
procedure TfrViewFiltroProveedores.CustomViewCreate(Sender: TObject);
|
||||
begin
|
||||
inherited;
|
||||
FProveedor := NIL;
|
||||
FProveedoresController := NIL;
|
||||
end;
|
||||
|
||||
procedure TfrViewFiltroProveedores.CustomViewDestroy(Sender: TObject);
|
||||
begin
|
||||
inherited;
|
||||
FProveedor := NIL;
|
||||
FProveedoresController := NIL;
|
||||
end;
|
||||
|
||||
procedure TfrViewFiltroProveedores.rbTodosProveedoresClick(Sender: TObject);
|
||||
begin
|
||||
if rbTodosProveedores.Checked then
|
||||
begin
|
||||
cbxDesglosado.Enabled := True;
|
||||
FProveedor := NIL;
|
||||
bElegirProveedor.Enabled := False;
|
||||
edtProveedor.Clear;
|
||||
edtProveedor.Enabled := False;
|
||||
end;
|
||||
end;
|
||||
|
||||
procedure TfrViewFiltroProveedores.rbUnProveedorClick(Sender: TObject);
|
||||
begin
|
||||
if rbUnProveedor.Checked then
|
||||
begin
|
||||
cbxDesglosado.Enabled := False;
|
||||
bElegirProveedor.Enabled := True;
|
||||
edtProveedor.Enabled := True;
|
||||
if not Assigned(FProveedoresController) then
|
||||
FProveedoresController := TProveedoresController.Create;
|
||||
end;
|
||||
end;
|
||||
|
||||
end.
|
||||
@ -19,6 +19,7 @@
|
||||
<Projects Include="..\Articulos\Views\Articulos_view.dproj" />
|
||||
<Projects Include="..\Contactos\Controller\Contactos_controller.dproj" />
|
||||
<Projects Include="..\Contactos\Views\Contactos_view.dproj" />
|
||||
<Projects Include="..\Facturas de cliente\Views\FacturasCliente_view.dproj" />
|
||||
<Projects Include="..\Facturas de proveedor\Controller\FacturasProveedor_controller.dproj" />
|
||||
<Projects Include="..\Inventario\Controller\Inventario_controller.dproj" />
|
||||
<Projects Include="..\Inventario\Data\Inventario_data.dproj" />
|
||||
@ -281,14 +282,23 @@
|
||||
<Target Name="Inventario_data:Make">
|
||||
<MSBuild Projects="..\Inventario\Data\Inventario_data.dproj" Targets="Make" />
|
||||
</Target>
|
||||
<Target Name="FacturasCliente_view">
|
||||
<MSBuild Projects="..\Facturas de cliente\Views\FacturasCliente_view.dproj" Targets="" />
|
||||
</Target>
|
||||
<Target Name="FacturasCliente_view:Clean">
|
||||
<MSBuild Projects="..\Facturas de cliente\Views\FacturasCliente_view.dproj" Targets="Clean" />
|
||||
</Target>
|
||||
<Target Name="FacturasCliente_view:Make">
|
||||
<MSBuild Projects="..\Facturas de cliente\Views\FacturasCliente_view.dproj" Targets="Make" />
|
||||
</Target>
|
||||
<Target Name="Build">
|
||||
<CallTarget Targets="Base;GUIBase;ApplicationBase;Contactos_controller;Contactos_view;Articulos_data;Articulos_controller;Articulos_view;PedidosProveedor_model;PedidosProveedor_data;PedidosProveedor_controller;PedidosProveedor_view;PedidosProveedor_plugin;AlbaranesProveedor_controller;Inventario_controller;PedProv_AlbProv_relation;FacturasProveedor_controller;PedProv_FacProv_relation;AlbaranesProveedor_data;AlbaranesCliente_data;FactuGES;FactuGES_Server;AlbaranesProveedor_view;AlbaranesProveedor_model;Inventario_view;PresupuestosCliente_view;Inventario_data" />
|
||||
<CallTarget Targets="Base;GUIBase;ApplicationBase;Contactos_controller;Contactos_view;Articulos_data;Articulos_controller;Articulos_view;PedidosProveedor_model;PedidosProveedor_data;PedidosProveedor_controller;PedidosProveedor_view;PedidosProveedor_plugin;AlbaranesProveedor_controller;Inventario_controller;PedProv_AlbProv_relation;FacturasProveedor_controller;PedProv_FacProv_relation;AlbaranesProveedor_data;AlbaranesCliente_data;FactuGES;FactuGES_Server;AlbaranesProveedor_view;AlbaranesProveedor_model;Inventario_view;PresupuestosCliente_view;Inventario_data;FacturasCliente_view" />
|
||||
</Target>
|
||||
<Target Name="Clean">
|
||||
<CallTarget Targets="Base:Clean;GUIBase:Clean;ApplicationBase:Clean;Contactos_controller:Clean;Contactos_view:Clean;Articulos_data:Clean;Articulos_controller:Clean;Articulos_view:Clean;PedidosProveedor_model:Clean;PedidosProveedor_data:Clean;PedidosProveedor_controller:Clean;PedidosProveedor_view:Clean;PedidosProveedor_plugin:Clean;AlbaranesProveedor_controller:Clean;Inventario_controller:Clean;PedProv_AlbProv_relation:Clean;FacturasProveedor_controller:Clean;PedProv_FacProv_relation:Clean;AlbaranesProveedor_data:Clean;AlbaranesCliente_data:Clean;FactuGES:Clean;FactuGES_Server:Clean;AlbaranesProveedor_view:Clean;AlbaranesProveedor_model:Clean;Inventario_view:Clean;PresupuestosCliente_view:Clean;Inventario_data:Clean" />
|
||||
<CallTarget Targets="Base:Clean;GUIBase:Clean;ApplicationBase:Clean;Contactos_controller:Clean;Contactos_view:Clean;Articulos_data:Clean;Articulos_controller:Clean;Articulos_view:Clean;PedidosProveedor_model:Clean;PedidosProveedor_data:Clean;PedidosProveedor_controller:Clean;PedidosProveedor_view:Clean;PedidosProveedor_plugin:Clean;AlbaranesProveedor_controller:Clean;Inventario_controller:Clean;PedProv_AlbProv_relation:Clean;FacturasProveedor_controller:Clean;PedProv_FacProv_relation:Clean;AlbaranesProveedor_data:Clean;AlbaranesCliente_data:Clean;FactuGES:Clean;FactuGES_Server:Clean;AlbaranesProveedor_view:Clean;AlbaranesProveedor_model:Clean;Inventario_view:Clean;PresupuestosCliente_view:Clean;Inventario_data:Clean;FacturasCliente_view:Clean" />
|
||||
</Target>
|
||||
<Target Name="Make">
|
||||
<CallTarget Targets="Base:Make;GUIBase:Make;ApplicationBase:Make;Contactos_controller:Make;Contactos_view:Make;Articulos_data:Make;Articulos_controller:Make;Articulos_view:Make;PedidosProveedor_model:Make;PedidosProveedor_data:Make;PedidosProveedor_controller:Make;PedidosProveedor_view:Make;PedidosProveedor_plugin:Make;AlbaranesProveedor_controller:Make;Inventario_controller:Make;PedProv_AlbProv_relation:Make;FacturasProveedor_controller:Make;PedProv_FacProv_relation:Make;AlbaranesProveedor_data:Make;AlbaranesCliente_data:Make;FactuGES:Make;FactuGES_Server:Make;AlbaranesProveedor_view:Make;AlbaranesProveedor_model:Make;Inventario_view:Make;PresupuestosCliente_view:Make;Inventario_data:Make" />
|
||||
<CallTarget Targets="Base:Make;GUIBase:Make;ApplicationBase:Make;Contactos_controller:Make;Contactos_view:Make;Articulos_data:Make;Articulos_controller:Make;Articulos_view:Make;PedidosProveedor_model:Make;PedidosProveedor_data:Make;PedidosProveedor_controller:Make;PedidosProveedor_view:Make;PedidosProveedor_plugin:Make;AlbaranesProveedor_controller:Make;Inventario_controller:Make;PedProv_AlbProv_relation:Make;FacturasProveedor_controller:Make;PedProv_FacProv_relation:Make;AlbaranesProveedor_data:Make;AlbaranesCliente_data:Make;FactuGES:Make;FactuGES_Server:Make;AlbaranesProveedor_view:Make;AlbaranesProveedor_model:Make;Inventario_view:Make;PresupuestosCliente_view:Make;Inventario_data:Make;FacturasCliente_view:Make" />
|
||||
</Target>
|
||||
<Import Condition="Exists('$(MSBuildBinPath)\Borland.Group.Targets')" Project="$(MSBuildBinPath)\Borland.Group.Targets" />
|
||||
</Project>
|
||||
@ -60,7 +60,8 @@ requires
|
||||
ccpackD11,
|
||||
dxLayoutControlD11,
|
||||
dxComnD11,
|
||||
PedProv_FacProv_relation;
|
||||
PedProv_FacProv_relation,
|
||||
GestorInformes_controller;
|
||||
|
||||
contains
|
||||
uPedidosProveedorViewRegister in 'uPedidosProveedorViewRegister.pas',
|
||||
@ -79,6 +80,6 @@ contains
|
||||
uViewProveedorPedido in 'uViewProveedorPedido.pas' {frViewProveedorPedido: TFrame},
|
||||
uEditorElegirPersonaContactoPedido in 'uEditorElegirPersonaContactoPedido.pas' {fEditorElegirPersonaContactoPedido: TfEditorSituacionPedidoProveedor},
|
||||
uViewObraReserva in 'uViewObraReserva.pas' {frViewObraReserva: TFrame},
|
||||
uDialogOpcionesImpresion in 'uDialogOpcionesImpresion.pas' {fDialogOpcionesImpresion: TForm};
|
||||
uDialogOpcionesImpresion in 'uDialogOpcionesImpresion.pas' {fDialogOpcionesImpresion: T};
|
||||
|
||||
end.
|
||||
|
||||
@ -49,42 +49,43 @@
|
||||
<DelphiCompile Include="PedidosProveedor_view.dpk">
|
||||
<MainSource>MainSource</MainSource>
|
||||
</DelphiCompile>
|
||||
<DCCReference Include="..\adortl.dcp" />
|
||||
<DCCReference Include="..\Almacenes_controller.dcp" />
|
||||
<DCCReference Include="..\Almacenes_model.dcp" />
|
||||
<DCCReference Include="..\Articulos_view.dcp" />
|
||||
<DCCReference Include="..\ccpackD11.dcp" />
|
||||
<DCCReference Include="..\cfpack_d11.dcp" />
|
||||
<DCCReference Include="..\Contactos_controller.dcp" />
|
||||
<DCCReference Include="..\Contactos_model.dcp" />
|
||||
<DCCReference Include="..\Contactos_view.dcp" />
|
||||
<DCCReference Include="..\cxDataD11.dcp" />
|
||||
<DCCReference Include="..\cxEditorsD11.dcp" />
|
||||
<DCCReference Include="..\cxLibraryD11.dcp" />
|
||||
<DCCReference Include="..\DataAbstract_Core_D11.dcp" />
|
||||
<DCCReference Include="..\dbrtl.dcp" />
|
||||
<DCCReference Include="..\designide.dcp" />
|
||||
<DCCReference Include="..\dsnap.dcp" />
|
||||
<DCCReference Include="..\dxComnD11.dcp" />
|
||||
<DCCReference Include="..\dxGDIPlusD11.dcp" />
|
||||
<DCCReference Include="..\dxLayoutControlD11.dcp" />
|
||||
<DCCReference Include="..\dxThemeD11.dcp" />
|
||||
<DCCReference Include="..\GUIBase.dcp" />
|
||||
<DCCReference Include="..\GUISDK_D11.dcp" />
|
||||
<DCCReference Include="..\Obras_controller.dcp" />
|
||||
<DCCReference Include="..\Obras_model.dcp" />
|
||||
<DCCReference Include="..\PedidosProveedor_controller.dcp" />
|
||||
<DCCReference Include="..\PedidosProveedor_model.dcp" />
|
||||
<DCCReference Include="..\PedProv_AlbProv_relation.dcp" />
|
||||
<DCCReference Include="..\PedProv_FacProv_relation.dcp" />
|
||||
<DCCReference Include="..\RemObjects_Core_D11.dcp" />
|
||||
<DCCReference Include="..\rtl.dcp" />
|
||||
<DCCReference Include="..\vcl.dcp" />
|
||||
<DCCReference Include="..\vclactnband.dcp" />
|
||||
<DCCReference Include="..\vcldb.dcp" />
|
||||
<DCCReference Include="..\vcljpg.dcp" />
|
||||
<DCCReference Include="..\vclx.dcp" />
|
||||
<DCCReference Include="..\xmlrtl.dcp" />
|
||||
<DCCReference Include="..\..\Lib\adortl.dcp" />
|
||||
<DCCReference Include="..\..\Lib\Almacenes_controller.dcp" />
|
||||
<DCCReference Include="..\..\Lib\Almacenes_model.dcp" />
|
||||
<DCCReference Include="..\..\Lib\Articulos_view.dcp" />
|
||||
<DCCReference Include="..\..\Lib\ccpackD11.dcp" />
|
||||
<DCCReference Include="..\..\Lib\cfpack_d11.dcp" />
|
||||
<DCCReference Include="..\..\Lib\Contactos_controller.dcp" />
|
||||
<DCCReference Include="..\..\Lib\Contactos_model.dcp" />
|
||||
<DCCReference Include="..\..\Lib\Contactos_view.dcp" />
|
||||
<DCCReference Include="..\..\Lib\cxDataD11.dcp" />
|
||||
<DCCReference Include="..\..\Lib\cxEditorsD11.dcp" />
|
||||
<DCCReference Include="..\..\Lib\cxLibraryD11.dcp" />
|
||||
<DCCReference Include="..\..\Lib\DataAbstract_Core_D11.dcp" />
|
||||
<DCCReference Include="..\..\Lib\dbrtl.dcp" />
|
||||
<DCCReference Include="..\..\Lib\designide.dcp" />
|
||||
<DCCReference Include="..\..\Lib\dsnap.dcp" />
|
||||
<DCCReference Include="..\..\Lib\dxComnD11.dcp" />
|
||||
<DCCReference Include="..\..\Lib\dxGDIPlusD11.dcp" />
|
||||
<DCCReference Include="..\..\Lib\dxLayoutControlD11.dcp" />
|
||||
<DCCReference Include="..\..\Lib\dxThemeD11.dcp" />
|
||||
<DCCReference Include="..\..\Lib\GestorInformes_controller.dcp" />
|
||||
<DCCReference Include="..\..\Lib\GUIBase.dcp" />
|
||||
<DCCReference Include="..\..\Lib\GUISDK_D11.dcp" />
|
||||
<DCCReference Include="..\..\Lib\Obras_controller.dcp" />
|
||||
<DCCReference Include="..\..\Lib\Obras_model.dcp" />
|
||||
<DCCReference Include="..\..\Lib\PedidosProveedor_controller.dcp" />
|
||||
<DCCReference Include="..\..\Lib\PedidosProveedor_model.dcp" />
|
||||
<DCCReference Include="..\..\Lib\PedProv_AlbProv_relation.dcp" />
|
||||
<DCCReference Include="..\..\Lib\PedProv_FacProv_relation.dcp" />
|
||||
<DCCReference Include="..\..\Lib\RemObjects_Core_D11.dcp" />
|
||||
<DCCReference Include="..\..\Lib\rtl.dcp" />
|
||||
<DCCReference Include="..\..\Lib\vcl.dcp" />
|
||||
<DCCReference Include="..\..\Lib\vclactnband.dcp" />
|
||||
<DCCReference Include="..\..\Lib\vcldb.dcp" />
|
||||
<DCCReference Include="..\..\Lib\vcljpg.dcp" />
|
||||
<DCCReference Include="..\..\Lib\vclx.dcp" />
|
||||
<DCCReference Include="..\..\Lib\xmlrtl.dcp" />
|
||||
<DCCReference Include="uDialogOpcionesImpresion.pas">
|
||||
<Form>fDialogOpcionesImpresion</Form>
|
||||
<DesignClass>T</DesignClass>
|
||||
|
||||
Binary file not shown.
@ -54,7 +54,7 @@ inherited fEditorPedidosProveedor: TfEditorPedidosProveedor
|
||||
end
|
||||
inherited TBXTMain2: TTBXToolbar
|
||||
Visible = True
|
||||
ExplicitWidth = 223
|
||||
ExplicitWidth = 276
|
||||
object TBXItem39: TTBXItem
|
||||
Action = actRecibirPedido
|
||||
DisplayMode = nbdmImageAndText
|
||||
@ -63,6 +63,9 @@ inherited fEditorPedidosProveedor: TfEditorPedidosProveedor
|
||||
Action = actFacturarPedido
|
||||
DisplayMode = nbdmImageAndText
|
||||
end
|
||||
object TBXItem41: TTBXItem
|
||||
Action = actInformes
|
||||
end
|
||||
end
|
||||
end
|
||||
inherited StatusBar: TJvStatusBar
|
||||
@ -235,6 +238,11 @@ inherited fEditorPedidosProveedor: TfEditorPedidosProveedor
|
||||
OnExecute = actEnviarEMailExecute
|
||||
OnUpdate = actEnviarEMailUpdate
|
||||
end
|
||||
object actInformes: TAction
|
||||
Category = 'Acciones'
|
||||
Caption = 'Informes'
|
||||
OnExecute = actInformesExecute
|
||||
end
|
||||
end
|
||||
inherited SmallImages: TPngImageList [5]
|
||||
PngImages = <
|
||||
@ -2850,4 +2858,311 @@ inherited fEditorPedidosProveedor: TfEditorPedidosProveedor
|
||||
Left = 184
|
||||
Top = 112
|
||||
end
|
||||
object JSInformesDialog: TJSDialog
|
||||
Content.Strings = (
|
||||
'Seleccione el informe que desea realizar')
|
||||
DialogOptions = [doCommandLinks, doModal]
|
||||
Glyph.Data = {
|
||||
0A54504E474F626A65637489504E470D0A1A0A0000000D494844520000001C00
|
||||
00001C0806000000720DDF940000000970485973000017120000171201679FD2
|
||||
520000000467414D410000B18E7CFB5193000003104944415478DAAD96FB4B14
|
||||
5114C7CFE463DC1E606444BFF54424D3DC55CA52B1CCD7165A219905054182FD
|
||||
1452FD5810FD100406610A669A998FC4F5BDB6266265DAB60F5DD15E58FE03B2
|
||||
3F99D29ABBA7B9779C71C61D9D6177CFCE70CFDCB97B3EF7DCF3BD33C38082FD
|
||||
B502B2B300CC656020048688A24F036233A0671F40D43160BA87BF62AEEE1010
|
||||
60D7AE293AD8B835815E9B625C80DC8F1E88D4A7C1E8C1FB8F9FD6C3C44035B3
|
||||
21500A65F6D700FE2EA580A5EC551F4A50359316B31D76EFDC0EE5F72A645045
|
||||
A067AE0623074B8140891108F1057064CC0D556053DF173812B707E6DCF332A8
|
||||
225080D201DB4AF99BF335B4D502F371415BCC364833C4C29F458F0C2A031281
|
||||
081734AB0B3C88403C1E6E3E2E7960F6A8FFD27A7D3EF07A11DA2C76C84A8D87
|
||||
A57FCB32E8B8A54A4C8C21B59365C9015996EF2240B6634DF435B51460A46D1F
|
||||
70C093AA46BF09C980C12CA914E6F371ADD707EF1DB3B0B0B8006EB79B8EA96B
|
||||
EA5106121851245129118FD8BFA2DC5C53C6BAF5EBBBBA97C2D64EC064195B1F
|
||||
286C76E956A0EA5C51AEB4764A9929F5750D5A9581D2274B9B651C0BA2F514A8
|
||||
6F28E36B70AD9A4253EF97A9AA55B0CEBA87D03B645B3F43C1DE589C58186D10
|
||||
81150FCAC57B11E161B04517099BB953C78643141B01BA28EEE4DAB0B04DE2B8
|
||||
CA460B9C399902E661BB3AB0F5AD038BF30CD4D7E7DD14815A61023027DD00EF
|
||||
469C1A80FD1C307F1578FD4A81E665945AD68924181A9D5007B6F4DBF1527E32
|
||||
F5C9D3632351F8F549AEE916B14EAA039BCD362C31A6040D23E7887D4A03B0CF
|
||||
86C5C6641A24BB7646D3F2D51A77F8C1BCDCFFC79CD3EAC0D7BD56AE86294165
|
||||
4660CB5C6B737DD3062CCA31D00069E76E05241862CF1EDD05E7D40F756063CF
|
||||
673C7F5A4F679A59541EF03E4C8C3B0893DF67D481AFBAC7B0F05412CD30EBE2
|
||||
ED80F7617CEC0198FEF94B1BF06C6622AD4B4EC99D80F7A1666043D7281A3312
|
||||
FD84C20B8417C3AA789405239826E0CBCE4F98979E10344C33B0BE630473D312
|
||||
82866906D6993E62F6F1C3F45D160A5305BE68FF8095CF5B4302134CFE1185EA
|
||||
1FB8A1B4FF4FE32FF6FADB8B5E0000000049454E44AE426082}
|
||||
Instruction.Text = 'Nuevo informe'
|
||||
Instruction.Glyph.Data = {
|
||||
0A54504E474F626A65637489504E470D0A1A0A0000000D494844520000001C00
|
||||
00001C0806000000720DDF940000000970485973000017120000171201679FD2
|
||||
520000000467414D410000B18E7CFB5193000003104944415478DAAD96FB4B14
|
||||
5114C7CFE463DC1E606444BFF54424D3DC55CA52B1CCD7165A219905054182FD
|
||||
1452FD5810FD100406610A669A998FC4F5BDB6266265DAB60F5DD15E58FE03B2
|
||||
3F99D29ABBA7B9779C71C61D9D6177CFCE70CFDCB97B3EF7DCF3BD33C38082FD
|
||||
B502B2B300CC656020048688A24F036233A0671F40D43160BA87BF62AEEE1010
|
||||
60D7AE293AD8B835815E9B625C80DC8F1E88D4A7C1E8C1FB8F9FD6C3C44035B3
|
||||
21500A65F6D700FE2EA580A5EC551F4A50359316B31D76EFDC0EE5F72A645045
|
||||
A067AE0623074B8140891108F1057064CC0D556053DF173812B707E6DCF332A8
|
||||
225080D201DB4AF99BF335B4D502F371415BCC364833C4C29F458F0C2A031281
|
||||
081734AB0B3C88403C1E6E3E2E7960F6A8FFD27A7D3EF07A11DA2C76C84A8D87
|
||||
A57FCB32E8B8A54A4C8C21B59365C9015996EF2240B6634DF435B51460A46D1F
|
||||
70C093AA46BF09C980C12CA914E6F371ADD707EF1DB3B0B0B8006EB79B8EA96B
|
||||
EA5106121851245129118FD8BFA2DC5C53C6BAF5EBBBBA97C2D64EC064195B1F
|
||||
286C76E956A0EA5C51AEB4764A9929F5750D5A9581D2274B9B651C0BA2F514A8
|
||||
6F28E36B70AD9A4253EF97A9AA55B0CEBA87D03B645B3F43C1DE589C58186D10
|
||||
81150FCAC57B11E161B04517099BB953C78643141B01BA28EEE4DAB0B04DE2B8
|
||||
CA460B9C399902E661BB3AB0F5AD038BF30CD4D7E7DD14815A61023027DD00EF
|
||||
469C1A80FD1C307F1578FD4A81E665945AD68924181A9D5007B6F4DBF1527E32
|
||||
F5C9D3632351F8F549AEE916B14EAA039BCD362C31A6040D23E7887D4A03B0CF
|
||||
86C5C6641A24BB7646D3F2D51A77F8C1BCDCFFC79CD3EAC0D7BD56AE86294165
|
||||
4660CB5C6B737DD3062CCA31D00069E76E05241862CF1EDD05E7D40F756063CF
|
||||
673C7F5A4F679A59541EF03E4C8C3B0893DF67D481AFBAC7B0F05412CD30EBE2
|
||||
ED80F7617CEC0198FEF94B1BF06C6622AD4B4EC99D80F7A1666043D7281A3312
|
||||
FD84C20B8417C3AA789405239826E0CBCE4F98979E10344C33B0BE630473D312
|
||||
82866906D6993E62F6F1C3F45D160A5305BE68FF8095CF5B4302134CFE1185EA
|
||||
1FB8A1B4FF4FE32FF6FADB8B5E0000000049454E44AE426082}
|
||||
Instruction.Icon = tdiCustom
|
||||
CustomButtons = <
|
||||
item
|
||||
Caption = 'Listado de pedidos.'
|
||||
Value = 100
|
||||
Default = True
|
||||
end>
|
||||
ButtonBar.Buttons = [cbCancel]
|
||||
MainIcon = tdiCustom
|
||||
Title = 'FactuGES'
|
||||
Position = dpMainFormCenter
|
||||
Icon.Data = {
|
||||
0000010003002020100001000400E8020000360000002020000001000800A808
|
||||
00001E0300002020000001002000A8100000C60B000028000000200000004000
|
||||
0000010004000000000000020000000000000000000000000000000000000000
|
||||
000000008000008000000080800080000000800080008080000080808000C0C0
|
||||
C0000000FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF000000
|
||||
0000000000000000000000000000000008777777777777777777777700000000
|
||||
0877767777677776777767760000000008F88888888888888888888700000000
|
||||
08F8FF8F8F888888888888860000000008FF8F8F88F8F8888888888C00000000
|
||||
08F88888F8888888888888860000000008F8688878E8888E88E8788700000000
|
||||
08F8688888F8F8FFFFFF88760000000008FF4888888F8FFFFFFF788700000000
|
||||
08F8676767677677677658E50000000008FF8888888887878787888700000000
|
||||
08FF8887887E8888888888860000000008FFE8E8E788C8E8FF8F8F8600000000
|
||||
08FFF8F8F8F8FF8F88F8F8870000000008FFFFFF8FF8F8F8F88F888600000000
|
||||
0FF8477878787878788788860000000008FF68888888F8FF8F8F788700000000
|
||||
08B7588888FF8FFFFFFF78860000083008BB47887776777777776F86000000B7
|
||||
8B9B73BB88788787E87878870000008BB8B9BB78888888EFF8F8FF8600000087
|
||||
B8BB8B888E8E8E88FFF8F886000000088BBB888FFFFFFFFFF8F877770000B9BB
|
||||
B8FFBB9B9BFFFFFFF87466460000BBB9BB8FBBBBB8FFFFFFF88F888700000008
|
||||
B8BB88888FFFFFFFF88F8F7700000008BBBBBB8FFFFFFFFFFF8887700000007B
|
||||
B7B98BB8FFFFFFFFF8887700000000B78B9B87B888F88F88F8877000000007B0
|
||||
08BB883B78888788787700000000000000B9000000000000000000000000FFFF
|
||||
FFFFF800000FF800000FF800000FF800000FF800000FF800000FF800000FF800
|
||||
000FF800000FF800000FF800000FF800000FF800000FF800000FF800000FF800
|
||||
000FF800000FF800000F9800000FC000000FC000000FC000000FE000000F0000
|
||||
000F0000000FE000000FE000001FC000003FC000007F980000FFFCFFFFFF2800
|
||||
0000200000004000000001000800000000000004000000000000000000000001
|
||||
00000001000000000000694731007C5D49007E604C0081635000826451008567
|
||||
540085685500886B5900896D5B008A6E5D008B705F008E715F008B7260008C72
|
||||
61008E74640084766C00957A6900977D6D00887B72009A8171009D8272009C84
|
||||
76009D8778009F897B00A28A7900A08B7D00A18C7E00E1B06E00E1B67D003E7A
|
||||
970073A0A5007AA2B70074AFBD007BB2BB003CAACE0028A5DB0020ADDF000D9A
|
||||
E500209EE3000DA6E2001AA4EF0000A6FF000CABFE0009ACFE0010A4F10015AC
|
||||
FA0000B5FB0000B0FD000CB6FC0000BFF90000BAFD0004BAFD0009BBFB0013B6
|
||||
F40015BFFA001CBDFB0026B7FD00589EC50040A4CD0040ABCC0050A2C7005DAE
|
||||
C00060A3C20062A4C60060B7CB006AB0CD007BB6C80077BAC80061BADD0044AD
|
||||
E50000C3F80007C6FB0000CAF80000CFFB0000D4F90026C8FA0026CDF8002BCC
|
||||
F90039C4FB0039C2FC0039CAFA003FCFFB0024D6F80030D2F80039D5F80000F8
|
||||
F8001FF8F8002CF6F8003EF4F8005AC6DC0070CDDF0052C0E40054C9E3004DCE
|
||||
FA005FC7FF004FD2FB004DD9F8005FD9FB006ED3E70063CDFE0060D1FB0060D8
|
||||
F90060DDF80046F8F90056F0F8005FFAFA0073E3F80073E4F90073EEF80060F1
|
||||
F800958A84009A918C0081999500A68F8200AD968500A3968C00AE988900AD9A
|
||||
8D00B19A8B00AF9C9000B09E9200B59F9200B7A29300B2A19600B5A19400B7A4
|
||||
9700BDA79700B4A39800B1A59D00B4A79F00BAA69800BCA79900B4A89F00BCA8
|
||||
9900BAA89C00BDAA9D00BEAC9E0083ADBD00B5A9A100BDABA000BEADA100BFAF
|
||||
A500A0BABE00C0AB9E00C1AC9E00C6AE9F00E2B98100E4BA8300E4BB8400E5BC
|
||||
8500E1BD8E00E3BF9000C0ADA000C2B0A300C2B1A500C4B2A600C1B2A800C3B5
|
||||
AB00C8B4A800CCB9AD00CEBCB100D0BEB200D1BFB400E4C19300E5C29400E6C4
|
||||
9600E8C69900D0C9A300CFC1B800D2C1B600D3C3B800D5C4B900D6C6BC00D8C6
|
||||
BC00D6C8BE00DAC9BF00ECD3B000EDD4B200EFD6B500E7D1B800E7D3BD00F0D8
|
||||
B6008CB7C40080BEC70097C3C70099C3C900ABD7CF00AFD9DD0086E3F90086E7
|
||||
F90086ECF8009EE5FB0090E8F900ACEDFC00BCEAFD00BCF1FB00BFF1FD00D7C9
|
||||
C000D9CAC100DCCBC200DACCC200DDCCC300DACCC400DDCEC400DED0C600DED1
|
||||
C900DED3CC00DFD4CD00E1D1C900E2D5CD00F0DCC200E3D8D200E5D9D200E2DA
|
||||
D500E6DBD400E5DCD500E8DDD600E6DDD800E9DFD900E6E0DB00EAE0DA00EAE2
|
||||
DD00ECE3DE00EBE4DE00ECE4DE00F3E7D900C6E1EF00C9EFFD00D7F6FD00DFF3
|
||||
FF00DFFEFE00EBE7E300EDE6E100EFE7E400EEE8E400F0EAE600F2EDE900F2EE
|
||||
EC00F4EFEC00F5F0EE00F9F4ED00E7FAFD00EBF8FF00F6F2F000F7F4F100F8F4
|
||||
F200F9F7F500FAF8F600FBF9F900FCFBFA00FCFCFB00FEFEFE00000000000000
|
||||
0000000000000000000000000000000000000000000000000000000000000000
|
||||
00000000000000000000007D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
|
||||
0D0D0000000000000000009C9C19191919191919191919191919191919191919
|
||||
1903000000000000000000ABDECBCBC7C7AFABABABABAAA3A2A2A0A0A0A0A0A0
|
||||
8607000000000000000000ABECEAE9DEDEDEDED7D5D2D2D2CBCBCBCBB0CBB0CB
|
||||
9007000000000000000000ABEDECEAE9DEDEDBD7D7D5D2D2D2CDCDCBB0B0B0B0
|
||||
9007000000000000000000AFEDE9A9CFD2CFD2CDCBCBCBB0B0ABACA3A3A3A3B0
|
||||
9007000000000000000000AFF0D5017783838386868686869099909999907BB0
|
||||
9007000000000000000000B0F4D501A0B0CBD2D5DEECEDF7FAFAFAFAFAF77BAA
|
||||
9007000000000000000000CBF4DC01A0B0B0B0D2D5DBEAEDF7FAFAFAFAF47BB0
|
||||
9007000000000000000000CBF8DC010404070604090909090D0D110D110D02A3
|
||||
9007000000000000000000CBFAED9E9E9E9C999E8C8C8C868683837E7D7D7ACB
|
||||
9007000000000000000000CBFAF1A7A7A6A6A6A69898989898B5DBDBD5D5D2D2
|
||||
9907000000000000000000CDFAF796969696961D961D931D1DB4DEDBD7D5D5D2
|
||||
9C07000000000000000000CFFAFAFAFAF8F7F0F0EDEDEDECE9E9DEDEDED7D5D5
|
||||
9907000000000000000000CDFAFAEAF0EDEDECEAEAE9DEDEDBDCD5D5D5D5D2D5
|
||||
9C07000000000000000000D2FAEC01737D7D7B7D7D7B7D7B7D7B7B7B7D7B7DD2
|
||||
9907000000000000000000CFFAEC019EABB0CBD2D5DCDEECEDF4F4F4F4EA7BD2
|
||||
9C07000000000000000000B9524601A0B0B0CBB5D5DEEAEDF7FAFAFAFAF47DD5
|
||||
9C070000000000213F0000B83226010C3F5C1F111214141616191B1B1B1807D2
|
||||
9C07000000000000253D8A5B322D711E2860BA7E7E7A7E797A797979767676D5
|
||||
9E0700000000000041375E662F2B65314EBBB6B6B6B6B4B4B1E2F4EDEDEDECEA
|
||||
9C070000000000008F5D66663232394EC1A81C1C1C1C1C1C1CD3F7F4EDDED7D5
|
||||
9C0700000000000000B7BE6E5758BEBDE4E6E6F3FAFAFAFAFAFAF7F4D5928675
|
||||
7304000000002A2A2A2A4A6AFAE7562F2A2A2A5FFAFAFAFAFAFAF8D577010101
|
||||
0101000000004747472F4A59C5E7564A32474766FAFAFAFAFAFAFADCA0D2CFB0
|
||||
A20C00000000000000436C6958686D6BC2C5C5E7FAFAFAFAFAFAFADEAADEDBCB
|
||||
1470000000000000004551534A4A5250C0E7FAFAFAFAFAFAFAFAFADEAAD7B514
|
||||
700000000000000042384C54472B613550C3FAFAFAFAFAFAFAFAFADEA1B0196F
|
||||
000000000000000024234463322EBC5A3664E3ECE9E9E9E9E9E9E9CF90731300
|
||||
000000000000003A3C00002232298B8B3E3B207E8B7E8B7E827E817E74100000
|
||||
0000000000000000000000003227000000000000000000000000000000000000
|
||||
000000000000FFFFFFFFF800000FF800000FF800000FF800000FF800000FF800
|
||||
000FF800000FF800000FF800000FF800000FF800000FF800000FF800000FF800
|
||||
000FF800000FF800000FF800000FF800000F9800000FC000000FC000000FC000
|
||||
000FE000000F0000000F0000000FE000000FE000001FC000003FC000007F9800
|
||||
00FFFCFFFFFF2800000020000000400000000100200000000000801000000000
|
||||
0000000000000000000000000000000000000000000000000000000000000000
|
||||
0000000000000000000000000000000000000000000000000000000000000000
|
||||
0000000000000000000000000000000000000000000000000000000000000000
|
||||
0000000000000000000000000000000000000000000000000000000000000000
|
||||
0000000000000000000000000000000000000000000000000000000000007067
|
||||
5F70AA9382E570513CE3735540E3735540E3735540E3735540E3735540E37355
|
||||
40E3735540E3735540E3735540E3735540E3735540E3735540E3735540E37355
|
||||
40E3735540E3735540E3735540E3735540E3735540E3735540E372533EE5BAAB
|
||||
A070000000000000000000000000000000000000000000000000000000005E54
|
||||
4C7FCAB7ABFFC5B5AAFFA18877FFA28A78FFA28A79FFA28A79FFA28A79FFA28A
|
||||
79FFA28A79FFA28A79FFA28A79FFA28A79FFA28A79FFA28A79FFA28A79FFA28A
|
||||
79FFA28A79FFA28A79FFA28A79FFA28A79FFA28A79FFA58D7CFF7A5B46FFB2A1
|
||||
967F000000000000000000000000000000000000000000000000000000006055
|
||||
4D7ED7C6BBFFEDE4E0FFD9CCC4FFD9CCC4FFD9CBC3FFD8CAC1FFD7C9BFFFD6C7
|
||||
BDFFD5C6BBFFD4C4BAFFD3C3B8FFD2C1B7FFD1C0B5FFD0BEB3FFCFBDB2FFCEBC
|
||||
B0FFCEBBAFFFCEBBAFFFCEBBAFFFCEBBAFFFCEBCB0FFBEAA9CFF82644FFFB2A1
|
||||
967E000000000000000000000000000000000000000000000000000000006056
|
||||
4D7ED7C8BCFFF2EBE8FFEFE9E5FFEEE7E2FFECE5E0FFEBE2DEFFEAE0DBFFE9DE
|
||||
D8FFE7DBD4FFE5D9D1FFE3D7CFFFE2D4CCFFE1D2C9FFDFD0C7FFDDCDC4FFDCCB
|
||||
C2FFDBC9BFFFDBC9BFFFDBC9BFFFDBC9BFFFDCCAC1FFC1AC9FFF81634FFFB2A1
|
||||
967E000000000000000000000000000000000000000000000000000000006155
|
||||
4E7ED8C9BDFFF3EDE9FFF1EAE6FFF0E9E6FFEEE6E1FFECE4DFFFEBE2DDFFEAE0
|
||||
DAFFE9DED7FFE7DBD4FFE5D9D1FFE3D7CFFFE2D4CCFFE1D2C9FFDFD0C7FFDDCD
|
||||
C4FFDCCBC2FFDBC9BFFFDBC9BFFFDBC9BFFFDCCAC0FFC1AC9FFF81634FFFB2A1
|
||||
967E000000000000000000000000000000000000000000000000000000006157
|
||||
4E7ED9C9BFFFF4EFEDFFEFE8E3FFD0C2B9FFDFD5CEFFE0D5CEFFE0D4CCFFDED3
|
||||
CBFFDDD1C8FFDCCFC6FFDACCC4FFD9CBC1FFD8C9BFFFD7C7BDFFD6C5BBFFD5C4
|
||||
B9FFD3C2B7FFD2C0B5FFD2BFB4FFD2BFB4FFDAC8BEFFC1AC9FFF81634FFFB2A1
|
||||
967E000000000000000000000000000000000000000000000000000000006256
|
||||
4F7EDACCC0FFF5F2EFFFE5DDD9FF5C3821FFB0998AFFB8A394FFB8A394FFB9A3
|
||||
94FFB8A495FFB9A597FFB9A698FFBAA698FFBBA799FFBBA89AFFBBA89BFFBCA8
|
||||
9BFFBCA89BFFBCA89BFFBBA89AFFB49E8FFFD8C6BBFFC1AC9FFF81634FFFB2A1
|
||||
967E000000000000000000000000000000000000000000000000000000006256
|
||||
4F7EDBCBC1FFF8F4F3FFE7E0DBFF5F3C24FFD0BDB2FFDCCBC1FFDDCCC3FFE2D2
|
||||
CBFFE7DBD4FFEDE2DEFFF0E8E6FFF5F0EDFFF9F7F4FFFDFDFDFFFFFFFFFFFFFF
|
||||
FFFFFFFFFFFFFFFFFFFFFAF8F7FFB39D8DFFD8C6BBFFC1AC9FFF81634FFFB2A1
|
||||
967E000000000000000000000000000000000000000000000000000000006256
|
||||
4F7EDCCEC3FFFAF6F5FFE9E2DDFF5F3C24FFD2BFB5FFDFCDC4FFDECCC3FFE0CE
|
||||
C6FFE4D4CDFFE9DDD6FFEFE4E0FFF1EAE8FFF7F1EFFFFBF8F6FFFFFEFFFFFFFF
|
||||
FFFFFFFFFFFFFFFFFFFFFCFBFAFFB5A090FFD9C7BEFFC1AD9FFF81634FFFB2A1
|
||||
967E000000000000000000000000000000000000000000000000000000006257
|
||||
4F7EDDCFC4FFFCF9F9FFE9E4E0FF5F3A23FF7C5D49FF7F5F4CFF7E5F4CFF7E60
|
||||
4DFF7F614DFF816350FF826552FF836654FF846856FF856A57FF866B59FF876C
|
||||
5BFF876D5BFF876D5BFF866B59FF72523DFFD5C3B9FFC1AFA1FF81634FFFB2A1
|
||||
967E000000000000000000000000000000000000000000000000000000006357
|
||||
507EDECFC6FFFCFCFBFFF4F1F0FFC3B6AEFFC3B5ADFFC1B4ACFFC0B3AAFFBFB1
|
||||
A9FFBEB0A6FFBDAEA5FFBDACA3FFBCABA2FFBBAAA0FFBAA99FFFB8A69AFFB8A4
|
||||
98FFB6A396FFB5A194FFB49F93FFB39D90FFDCCDC4FFC2AEA1FF81634FFFB2A1
|
||||
967E000000000000000000000000000000000000000000000000000000006357
|
||||
507EDFD2C7FFFEFEFDFFF9F5EFFFE8C696FFE9C799FFE8C697FFE7C596FFE7C4
|
||||
95FFE6C394FFE5C293FFE4C091FFE4C090FFE3BF8FFFE2BD8CFFE9D5BFFFEBE1
|
||||
DCFFEADFD8FFE7DCD5FFE5DAD3FFE4D8D0FFE3D4CCFFC2AFA2FF81634FFFB2A1
|
||||
967E000000000000000000000000000000000000000000000000000000006458
|
||||
517EE0D3C8FFFFFFFFFFFAF5EFFFE3B77CFFE4B97FFFE2B87EFFE3B77DFFE2B7
|
||||
7CFFE2B67BFFE1B57AFFE1B479FFE0B478FFE0B377FFDFB174FFE6D0B7FFEBE1
|
||||
DCFFE8DFD9FFE8DDD6FFE6D9D2FFE3D8D1FFE4D7CFFFC3AFA2FF81634FFFB2A1
|
||||
967E000000000000000000000000000000000000000000000000000000006458
|
||||
517EE1D2C9FFFFFFFFFFFEFEFDFFFEFFFFFFFCFDFEFFFBFBFBFFF9F7F8FFF8F5
|
||||
F6FFF7F3F2FFF5F1F0FFF4EFEEFFF1EDEBFFF0EBE9FFEEE9E6FFEDE6E2FFECE3
|
||||
DEFFEBE1DBFFE9DFD9FFE8DDD6FFE6DAD3FFE5D9D2FFC3B0A3FF81634FFFB2A1
|
||||
967E000000000000000000000000000000000000000000000000000000006459
|
||||
517EE1D4CAFFFFFFFFFFFDFDFCFFEEEBE8FFF5F2F0FFF4F0EFFFF3EFECFFF2ED
|
||||
EAFFF1EBE8FFEEE9E5FFEFE7E3FFECE5E1FFEAE4DEFFEAE1DCFFE8E0DAFFE7DE
|
||||
D8FFE6DDD6FFE5DBD4FFE4D8D1FFE2D6CEFFE6DBD4FFC3B1A4FF81634EFFB2A1
|
||||
967E000000000000000000000000000000000000000000000000000000006559
|
||||
527EE2D4CAFFFFFFFFFFF0ECEAFF5B361EFFAB9383FFB39D8EFFB39D8DFFB39D
|
||||
8DFFB29D8DFFB29C8DFFB29C8CFFB29C8CFFB29C8CFFB29C8CFFB29C8CFFB29C
|
||||
8CFFB29C8CFFB29C8CFFB29C8DFFB39D8EFFE3D8D0FFC4B1A4FF81634EFFB2A1
|
||||
967E000000000000000000000000000000000000000000000000000000006559
|
||||
527EE5D4CAFFFFFFFFFFF7F0EBFF5F3B24FFCCB8ADFFD7C5BAFFD9C7BDFFDCCC
|
||||
C3FFE1D4CCFFE5DAD4FFE8E0DBFFEDE5E1FFF1EBE9FFF5F2EFFFF7F5F3FFF8F6
|
||||
F4FFF8F5F4FFF8F6F4FFF1EEEAFFB29C8DFFE6DAD3FFC4B2A5FF81634EFFB2A1
|
||||
967E00000000000000000000000000000000000000000000000000000000685A
|
||||
527E9AC6C9FF35CFFEFF3DAEEBFF663E24FFD2BFB4FFE0CBBFFFE0C9BDFFE1CD
|
||||
C4FFE4D5CDFFE9DED7FFEEE5E0FFF2EBE8FFF6F2F0FFFCF8F8FFFFFFFEFFFFFF
|
||||
FFFFFFFFFFFFFFFFFFFFFCFAF9FFB49E8FFFE7DED7FFC5B3A6FF81634EFFB2A1
|
||||
967E00000000000000000000000000000000007792910072A7A3001E33366957
|
||||
4C7C86C1C8FF00BFFBFF079AEBFF6A3E23FF926D57FF5FA3C8FF4AC1E8FF6C9C
|
||||
A2FF917260FF927767FF947A69FF957C6CFF977E6FFF998171FF9A8374FF9B85
|
||||
76FF9C8678FF9C8678FF998274FF7D5E49FFE3D9D4FFC5B3A7FF81634EFFB2A1
|
||||
967E00000000000000000000000000000000005A6F7000A9E5E40075AEAE5C90
|
||||
A5BD75D0E0FF00BFFAFF0CA3F4FF8A9A91FF3C7492FF03A4E4FF4AD5FFFF98C4
|
||||
CBFFB3A196FFB1A197FFB0A096FFB09F95FFAF9D92FFAF9C91FFAD9A8EFFAC99
|
||||
8CFFAB988AFFAB9789FFAA9688FFA99386FFE8E0DAFFC5B4A7FF81634EFFB2A1
|
||||
967E00000000000000000000000000000000000000002DA5BFC110C2FFFF4DD0
|
||||
FDFF64DBF9FF00B3FAFF09A8FEFF68D7FFFF04B5FFFF24CCFBFFAFD8CEFFF7DA
|
||||
B8FFF3DBBBFFF3DBBAFFF2D9B9FFF1D8B7FFF0D7B4FFEED5B2FFF6EADDFFF9F6
|
||||
F4FFF7F3F1FFF5F1EEFFF5EFECFFF4EDEAFFF1EBE7FFC6B4A8FF81634EFFB2A1
|
||||
967E00000000000000000000000000000000000000005F8A909142C7E4E960DE
|
||||
F8FF64D7FAFF00B6FDFF00B8FDFF21B2FDFF1ECCF7FF93EBFCFFD2C69BFFE1AB
|
||||
63FFDFAC66FFDFAC66FFDFAC66FFDFAC66FFDFAC66FFDEA961FFEFDBC0FFF8F6
|
||||
F5FFF6F2F0FFF3EDEBFFECE2DCFFE9DFD9FFE5DBD6FFC2B1A4FF81634FFFB2A1
|
||||
967E000000000000000000000000000E171A000E171A00040B145994A4A990EB
|
||||
FCFF61F1F7FF13FAF7FF23F9F7FF93EDF7FF8CE5F8FFD5F2FDFFE9F8FFFFE7F8
|
||||
FFFFF0FCFFFFFFFFFFFFFFFFFFFFFFFFFFFFFEFFFFFFFDFEFFFFFAFAF9FFF9F7
|
||||
F5FFF7F2F0FFE8DFD8FFC7AE9FFFBEA998FFAF9888FFB09A8AFF7F604DFFB2A1
|
||||
967E00000000000000000000000000AAFFFF00AAFFFF00AAFFFF00A4FFFF00CD
|
||||
FAFF5DFCF9FFFFFFFFFFEEFEFEFF00FBF7FF00AAFEFF00A1FFFF00A1FFFF00A0
|
||||
FFFF56C3FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFCFDFBFFFCFBFAFFFBFA
|
||||
F8FFE6DDD6FFAA9180FF5D3922FF603D26FF613E27FF613E28FF634029FFB4A3
|
||||
987E00000000000000000000000000CAFFFF00CAFFFF00CBFFFF00B0FFFF00CD
|
||||
FBFF38F5F7FFC3EFFAFFF0FFFEFF00FAF7FF00C8F7FF00C2F7FF00C2F7FF00C1
|
||||
F7FF57D7FAFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFEFEFEFFFDFDFCFFFCFC
|
||||
FBFFE7DED8FFCCB9ACFFE6DBD5FFE2D7D0FFDCCFC5FFD7C5BBFF8E705DFFB4A2
|
||||
9680000000000000000000000000002E383C002E383C00252F364C99B0B57DE8
|
||||
FBFF59F1F7FF25F7F7FF41FAF8FF7CEEF7FF77E4F7FFB5EFFCFFC6F2FDFFC3F2
|
||||
FDFFD9F6FCFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFDFEFEFFFEFE
|
||||
FEFFE9E1DAFFCEBCAFFFF1E9E3FFEADFD8FFE4D5CCFF9D816FFF3A291F868985
|
||||
831C00000000000000000000000000000000000000004E7073774AB0DADC37C9
|
||||
FBFF22D5F7FF00D3F9FF02C3FBFF37D5F7FF34BEFCFFA2E6FAFFECFBFDFFFFFF
|
||||
FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFEFF
|
||||
FFFFEAE2DCFFCDBBADFFEADFD8FFE3D5CBFF9F8271FF3E2D2386050100200000
|
||||
000000000000000000000000000000000000000000003E9CC4C219C0FFFF23C9
|
||||
FCFF30D3F8FF00BEF8FF06A8FEFF4FDCF8FF00B8FCFF32C2FBFFC0EBFCFFFFFF
|
||||
FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
|
||||
FFFFEAE3DEFFCDB9ABFFDDCEC4FFA58979FF3E2C1F8F0905041B000000000000
|
||||
000000000000000000000000000000000000003451510099DDDB0091C0C35DAD
|
||||
BCCF76D7E9FF00BEF9FF10A9FBFFBDDEDEFF5AC8DDFF0AB5F7FF62CEFFFFCBE4
|
||||
F1FFF1E7E0FFEFE7E1FFEEE6E1FFEEE6E1FFEEE6E0FFEDE6E0FFEDE5E0FFEEE6
|
||||
E1FFE1D4CCFFC5AE9FFFA68D7FF53E2718A10402000E00000000000000000000
|
||||
0000000000000000000000000000000000000075B7AF0099C7C500323E425442
|
||||
3B5C6BA8B1DA00C1FCFF0EA1F3F8A98E80C0AB9081C12698B1C10088C4C14C85
|
||||
A3C1A18D80C19E8D81C19E8B81C19D8C80C19B8C7FC19B8A7FC19C897FC19A89
|
||||
7EC19B8B7EC1897769C2432B1BAC000000000000000000000000000000000000
|
||||
0000000000000000000000000000000000000000000000000000000000000000
|
||||
00000045565A00C5FFFF0094E6E2000000000000000000000000000000000000
|
||||
0000000000000000000000000000000000000000000000000000000000000000
|
||||
0000000000000000000000000000000000000000000000000000000000000000
|
||||
0000000000000000000000000000FFFFFFFFF0000007F0000007F0000007F000
|
||||
0007F0000007F0000007F0000007F0000007F0000007F0000007F0000007F000
|
||||
0007F0000007F0000007F0000007F0000007F0000007F0000007800000078000
|
||||
0007C0000007C000000700000007000000070000000700000007C000000FC000
|
||||
001F8000003F800000FFF8FFFFFF}
|
||||
Width = 450
|
||||
Left = 624
|
||||
Top = 80
|
||||
end
|
||||
end
|
||||
|
||||
@ -30,6 +30,9 @@ type
|
||||
actEnviarEMail: TAction;
|
||||
TBXItem40: TTBXItem;
|
||||
Acercade1: TMenuItem;
|
||||
actInformes: TAction;
|
||||
TBXItem41: TTBXItem;
|
||||
JSInformesDialog: TJSDialog;
|
||||
procedure FormShow(Sender: TObject);
|
||||
procedure actCambiarSituacionExecute(Sender: TObject);
|
||||
procedure actRecibirPedidoUpdate(Sender: TObject);
|
||||
@ -39,6 +42,7 @@ type
|
||||
procedure actFacturarPedidoUpdate(Sender: TObject);
|
||||
procedure actEnviarEMailExecute(Sender: TObject);
|
||||
procedure actEnviarEMailUpdate(Sender: TObject);
|
||||
procedure actInformesExecute(Sender: TObject);
|
||||
|
||||
protected
|
||||
FPedidos: IBizPedidoProveedor;
|
||||
@ -71,7 +75,7 @@ uses
|
||||
uGenerarAlbaranesProvUtils, uGenerarFacturasProvPedUtils,
|
||||
// uInventarioController, uBizInventario,
|
||||
uDialogUtils, uGridStatusUtils, uDBSelectionListUtils,
|
||||
uDialogOpcionesImpresion;
|
||||
uDialogOpcionesImpresion, uGestorInformesController;
|
||||
// uAlbaranesProveedorController, uBizAlbaranesProveedor,
|
||||
// uGenerarPedidosProvUtils, ;
|
||||
|
||||
@ -133,6 +137,31 @@ begin
|
||||
and ViewGrid.esSeleccionCeldaDatos;
|
||||
end;
|
||||
|
||||
procedure TfEditorPedidosProveedor.actInformesExecute(Sender: TObject);
|
||||
var
|
||||
Respuesta : Integer;
|
||||
AGestorInformesController : IGestorInformesController;
|
||||
|
||||
begin
|
||||
AGestorInformesController := TGestorInformesController.Create;
|
||||
try
|
||||
|
||||
Respuesta := JsInformesDialog.Execute;
|
||||
|
||||
if Respuesta <> IDCANCEL then
|
||||
begin
|
||||
case JsInformesDialog.CustomButtonResult of
|
||||
100 : begin // Listado de facturas pendientes
|
||||
AGestorInformesController.VerInformeListadoPedidos;
|
||||
end;
|
||||
end;
|
||||
end;
|
||||
|
||||
finally
|
||||
AGestorInformesController := NIL;
|
||||
end;
|
||||
end;
|
||||
|
||||
procedure TfEditorPedidosProveedor.actRecibirPedidoExecute(Sender: TObject);
|
||||
begin
|
||||
inherited;
|
||||
|
||||
@ -65,11 +65,11 @@ requires
|
||||
cfpack_d11,
|
||||
designide,
|
||||
ccpackD11,
|
||||
cxExtEditorsD11;
|
||||
cxExtEditorsD11,
|
||||
GestorInformes_controller;
|
||||
|
||||
contains
|
||||
uPresupuestosClienteViewRegister in 'uPresupuestosClienteViewRegister.pas',
|
||||
uEditorPresupuestosCliente in 'uEditorPresupuestosCliente.pas' {fEditorPresupuestosCliente: TfEditorPedidosCliente},
|
||||
uViewPresupuestosCliente in 'uViewPresupuestosCliente.pas' {frViewPresupuestosCliente: TFrame},
|
||||
uViewPresupuestoCliente in 'uViewPresupuestoCliente.pas' {frViewPresupuestoCliente: TFrame},
|
||||
uEditorPresupuestoCliente in 'uEditorPresupuestoCliente.pas' {fEditorPresupuestoCliente: TfEditorPedidoCliente},
|
||||
|
||||
@ -49,47 +49,48 @@
|
||||
<DelphiCompile Include="PresupuestosCliente_view.dpk">
|
||||
<MainSource>MainSource</MainSource>
|
||||
</DelphiCompile>
|
||||
<DCCReference Include="C:\Documents and Settings\Usuario\adortl.dcp" />
|
||||
<DCCReference Include="C:\Documents and Settings\Usuario\Articulos_view.dcp" />
|
||||
<DCCReference Include="C:\Documents and Settings\Usuario\Base.dcp" />
|
||||
<DCCReference Include="C:\Documents and Settings\Usuario\ccpackD11.dcp" />
|
||||
<DCCReference Include="C:\Documents and Settings\Usuario\cfpack_d11.dcp" />
|
||||
<DCCReference Include="C:\Documents and Settings\Usuario\cxDataD11.dcp" />
|
||||
<DCCReference Include="C:\Documents and Settings\Usuario\cxEditorsD11.dcp" />
|
||||
<DCCReference Include="C:\Documents and Settings\Usuario\cxExtEditorsD11.dcp" />
|
||||
<DCCReference Include="C:\Documents and Settings\Usuario\cxLibraryD11.dcp" />
|
||||
<DCCReference Include="C:\Documents and Settings\Usuario\DataAbstract_Core_D11.dcp" />
|
||||
<DCCReference Include="C:\Documents and Settings\Usuario\dbrtl.dcp" />
|
||||
<DCCReference Include="C:\Documents and Settings\Usuario\designide.dcp" />
|
||||
<DCCReference Include="C:\Documents and Settings\Usuario\dsnap.dcp" />
|
||||
<DCCReference Include="C:\Documents and Settings\Usuario\dxComnD11.dcp" />
|
||||
<DCCReference Include="C:\Documents and Settings\Usuario\dxGDIPlusD11.dcp" />
|
||||
<DCCReference Include="C:\Documents and Settings\Usuario\dxLayoutControlD11.dcp" />
|
||||
<DCCReference Include="C:\Documents and Settings\Usuario\dxThemeD11.dcp" />
|
||||
<DCCReference Include="C:\Documents and Settings\Usuario\GUIBase.dcp" />
|
||||
<DCCReference Include="C:\Documents and Settings\Usuario\GUISDK_D11.dcp" />
|
||||
<DCCReference Include="C:\Documents and Settings\Usuario\Jcl.dcp" />
|
||||
<DCCReference Include="C:\Documents and Settings\Usuario\JclVcl.dcp" />
|
||||
<DCCReference Include="C:\Documents and Settings\Usuario\JvCoreD11R.dcp" />
|
||||
<DCCReference Include="C:\Documents and Settings\Usuario\JvCtrlsD11R.dcp" />
|
||||
<DCCReference Include="C:\Documents and Settings\Usuario\JvStdCtrlsD11R.dcp" />
|
||||
<DCCReference Include="C:\Documents and Settings\Usuario\JvSystemD11R.dcp" />
|
||||
<DCCReference Include="C:\Documents and Settings\Usuario\PngComponentsD10.dcp" />
|
||||
<DCCReference Include="C:\Documents and Settings\Usuario\PNG_D10.dcp" />
|
||||
<DCCReference Include="C:\Documents and Settings\Usuario\PreCli_AlbCli_relation.dcp" />
|
||||
<DCCReference Include="C:\Documents and Settings\Usuario\PreCli_FacCli_relation.dcp" />
|
||||
<DCCReference Include="C:\Documents and Settings\Usuario\PresupuestosCliente_controller.dcp" />
|
||||
<DCCReference Include="C:\Documents and Settings\Usuario\PresupuestosCliente_model.dcp" />
|
||||
<DCCReference Include="C:\Documents and Settings\Usuario\RemObjects_Core_D11.dcp" />
|
||||
<DCCReference Include="C:\Documents and Settings\Usuario\rtl.dcp" />
|
||||
<DCCReference Include="C:\Documents and Settings\Usuario\tb2k_d10.dcp" />
|
||||
<DCCReference Include="C:\Documents and Settings\Usuario\tbx_d10.dcp" />
|
||||
<DCCReference Include="C:\Documents and Settings\Usuario\vcl.dcp" />
|
||||
<DCCReference Include="C:\Documents and Settings\Usuario\vclactnband.dcp" />
|
||||
<DCCReference Include="C:\Documents and Settings\Usuario\vcldb.dcp" />
|
||||
<DCCReference Include="C:\Documents and Settings\Usuario\vcljpg.dcp" />
|
||||
<DCCReference Include="C:\Documents and Settings\Usuario\vclx.dcp" />
|
||||
<DCCReference Include="C:\Documents and Settings\Usuario\xmlrtl.dcp" />
|
||||
<DCCReference Include="..\..\Lib\adortl.dcp" />
|
||||
<DCCReference Include="..\..\Lib\Articulos_view.dcp" />
|
||||
<DCCReference Include="..\..\Lib\Base.dcp" />
|
||||
<DCCReference Include="..\..\Lib\ccpackD11.dcp" />
|
||||
<DCCReference Include="..\..\Lib\cfpack_d11.dcp" />
|
||||
<DCCReference Include="..\..\Lib\cxDataD11.dcp" />
|
||||
<DCCReference Include="..\..\Lib\cxEditorsD11.dcp" />
|
||||
<DCCReference Include="..\..\Lib\cxExtEditorsD11.dcp" />
|
||||
<DCCReference Include="..\..\Lib\cxLibraryD11.dcp" />
|
||||
<DCCReference Include="..\..\Lib\DataAbstract_Core_D11.dcp" />
|
||||
<DCCReference Include="..\..\Lib\dbrtl.dcp" />
|
||||
<DCCReference Include="..\..\Lib\designide.dcp" />
|
||||
<DCCReference Include="..\..\Lib\dsnap.dcp" />
|
||||
<DCCReference Include="..\..\Lib\dxComnD11.dcp" />
|
||||
<DCCReference Include="..\..\Lib\dxGDIPlusD11.dcp" />
|
||||
<DCCReference Include="..\..\Lib\dxLayoutControlD11.dcp" />
|
||||
<DCCReference Include="..\..\Lib\dxThemeD11.dcp" />
|
||||
<DCCReference Include="..\..\Lib\GestorInformes_controller.dcp" />
|
||||
<DCCReference Include="..\..\Lib\GUIBase.dcp" />
|
||||
<DCCReference Include="..\..\Lib\GUISDK_D11.dcp" />
|
||||
<DCCReference Include="..\..\Lib\Jcl.dcp" />
|
||||
<DCCReference Include="..\..\Lib\JclVcl.dcp" />
|
||||
<DCCReference Include="..\..\Lib\JvCoreD11R.dcp" />
|
||||
<DCCReference Include="..\..\Lib\JvCtrlsD11R.dcp" />
|
||||
<DCCReference Include="..\..\Lib\JvStdCtrlsD11R.dcp" />
|
||||
<DCCReference Include="..\..\Lib\JvSystemD11R.dcp" />
|
||||
<DCCReference Include="..\..\Lib\PngComponentsD10.dcp" />
|
||||
<DCCReference Include="..\..\Lib\PNG_D10.dcp" />
|
||||
<DCCReference Include="..\..\Lib\PreCli_AlbCli_relation.dcp" />
|
||||
<DCCReference Include="..\..\Lib\PreCli_FacCli_relation.dcp" />
|
||||
<DCCReference Include="..\..\Lib\PresupuestosCliente_controller.dcp" />
|
||||
<DCCReference Include="..\..\Lib\PresupuestosCliente_model.dcp" />
|
||||
<DCCReference Include="..\..\Lib\RemObjects_Core_D11.dcp" />
|
||||
<DCCReference Include="..\..\Lib\rtl.dcp" />
|
||||
<DCCReference Include="..\..\Lib\tb2k_d10.dcp" />
|
||||
<DCCReference Include="..\..\Lib\tbx_d10.dcp" />
|
||||
<DCCReference Include="..\..\Lib\vcl.dcp" />
|
||||
<DCCReference Include="..\..\Lib\vclactnband.dcp" />
|
||||
<DCCReference Include="..\..\Lib\vcldb.dcp" />
|
||||
<DCCReference Include="..\..\Lib\vcljpg.dcp" />
|
||||
<DCCReference Include="..\..\Lib\vclx.dcp" />
|
||||
<DCCReference Include="..\..\Lib\xmlrtl.dcp" />
|
||||
<DCCReference Include="uEditorElegirArticulosPresupuestoCliente.pas">
|
||||
<Form>fEditorElegirArticulosPresupuestoCliente</Form>
|
||||
<DesignClass>TfEditorElegirArticulosPedidoCliente</DesignClass>
|
||||
@ -106,10 +107,6 @@
|
||||
<Form>fEditorPresupuestoCliente</Form>
|
||||
<DesignClass>TfEditorPedidoCliente</DesignClass>
|
||||
</DCCReference>
|
||||
<DCCReference Include="uEditorPresupuestosCliente.pas">
|
||||
<Form>fEditorPresupuestosCliente</Form>
|
||||
<DesignClass>TfEditorPedidosCliente</DesignClass>
|
||||
</DCCReference>
|
||||
<DCCReference Include="uEditorPresupuestosClienteReport.pas">
|
||||
<Form>fEditorPresupuestosClientePreview</Form>
|
||||
<DesignClass>TfEditorPedidosClientePreview</DesignClass>
|
||||
|
||||
Binary file not shown.
@ -7,7 +7,7 @@ inherited fEditorPresupuestosCliente: TfEditorPresupuestosCliente
|
||||
inherited JvNavPanelHeader: TJvNavPanelHeader
|
||||
Width = 805
|
||||
Caption = 'Lista de presupuestos de cliente'
|
||||
ExplicitWidth = 674
|
||||
ExplicitWidth = 805
|
||||
inherited Image1: TImage
|
||||
Left = 778
|
||||
Picture.Data = {
|
||||
@ -122,7 +122,7 @@ inherited fEditorPresupuestosCliente: TfEditorPresupuestosCliente
|
||||
end
|
||||
inherited TBXDock: TTBXDock
|
||||
Width = 805
|
||||
ExplicitWidth = 674
|
||||
ExplicitWidth = 805
|
||||
inherited tbxMain: TTBXToolbar
|
||||
ExplicitWidth = 775
|
||||
end
|
||||
@ -151,7 +151,7 @@ inherited fEditorPresupuestosCliente: TfEditorPresupuestosCliente
|
||||
DockPos = 343
|
||||
Visible = True
|
||||
ExplicitLeft = 343
|
||||
ExplicitWidth = 365
|
||||
ExplicitWidth = 418
|
||||
object TBXItem43: TTBXItem
|
||||
Action = actAceptar
|
||||
DisplayMode = nbdmImageAndText
|
||||
@ -170,11 +170,14 @@ inherited fEditorPresupuestosCliente: TfEditorPresupuestosCliente
|
||||
Action = actGenerarFactura
|
||||
DisplayMode = nbdmImageAndText
|
||||
end
|
||||
object TBXItem46: TTBXItem
|
||||
Action = actInformes
|
||||
end
|
||||
end
|
||||
end
|
||||
inherited StatusBar: TJvStatusBar
|
||||
Width = 805
|
||||
ExplicitWidth = 674
|
||||
ExplicitWidth = 805
|
||||
end
|
||||
inherited EditorActionList: TActionList
|
||||
inherited actNuevo: TAction
|
||||
@ -227,6 +230,11 @@ inherited fEditorPresupuestosCliente: TfEditorPresupuestosCliente
|
||||
OnExecute = actEnviarEMailExecute
|
||||
OnUpdate = actEnviarEMailUpdate
|
||||
end
|
||||
object actInformes: TAction
|
||||
Category = 'Acciones'
|
||||
Caption = 'Informes'
|
||||
OnExecute = actInformesExecute
|
||||
end
|
||||
end
|
||||
inherited SmallImages: TPngImageList
|
||||
PngImages = <
|
||||
@ -3217,4 +3225,311 @@ inherited fEditorPresupuestosCliente: TfEditorPresupuestosCliente
|
||||
Left = 184
|
||||
Top = 112
|
||||
end
|
||||
object JSInformesDialog: TJSDialog
|
||||
Content.Strings = (
|
||||
'Seleccione el informe que desea realizar')
|
||||
DialogOptions = [doCommandLinks, doModal]
|
||||
Glyph.Data = {
|
||||
0A54504E474F626A65637489504E470D0A1A0A0000000D494844520000001C00
|
||||
00001C0806000000720DDF940000000970485973000017120000171201679FD2
|
||||
520000000467414D410000B18E7CFB5193000003104944415478DAAD96FB4B14
|
||||
5114C7CFE463DC1E606444BFF54424D3DC55CA52B1CCD7165A219905054182FD
|
||||
1452FD5810FD100406610A669A998FC4F5BDB6266265DAB60F5DD15E58FE03B2
|
||||
3F99D29ABBA7B9779C71C61D9D6177CFCE70CFDCB97B3EF7DCF3BD33C38082FD
|
||||
B502B2B300CC656020048688A24F036233A0671F40D43160BA87BF62AEEE1010
|
||||
60D7AE293AD8B835815E9B625C80DC8F1E88D4A7C1E8C1FB8F9FD6C3C44035B3
|
||||
21500A65F6D700FE2EA580A5EC551F4A50359316B31D76EFDC0EE5F72A645045
|
||||
A067AE0623074B8140891108F1057064CC0D556053DF173812B707E6DCF332A8
|
||||
225080D201DB4AF99BF335B4D502F371415BCC364833C4C29F458F0C2A031281
|
||||
081734AB0B3C88403C1E6E3E2E7960F6A8FFD27A7D3EF07A11DA2C76C84A8D87
|
||||
A57FCB32E8B8A54A4C8C21B59365C9015996EF2240B6634DF435B51460A46D1F
|
||||
70C093AA46BF09C980C12CA914E6F371ADD707EF1DB3B0B0B8006EB79B8EA96B
|
||||
EA5106121851245129118FD8BFA2DC5C53C6BAF5EBBBBA97C2D64EC064195B1F
|
||||
286C76E956A0EA5C51AEB4764A9929F5750D5A9581D2274B9B651C0BA2F514A8
|
||||
6F28E36B70AD9A4253EF97A9AA55B0CEBA87D03B645B3F43C1DE589C58186D10
|
||||
81150FCAC57B11E161B04517099BB953C78643141B01BA28EEE4DAB0B04DE2B8
|
||||
CA460B9C399902E661BB3AB0F5AD038BF30CD4D7E7DD14815A61023027DD00EF
|
||||
469C1A80FD1C307F1578FD4A81E665945AD68924181A9D5007B6F4DBF1527E32
|
||||
F5C9D3632351F8F549AEE916B14EAA039BCD362C31A6040D23E7887D4A03B0CF
|
||||
86C5C6641A24BB7646D3F2D51A77F8C1BCDCFFC79CD3EAC0D7BD56AE86294165
|
||||
4660CB5C6B737DD3062CCA31D00069E76E05241862CF1EDD05E7D40F756063CF
|
||||
673C7F5A4F679A59541EF03E4C8C3B0893DF67D481AFBAC7B0F05412CD30EBE2
|
||||
ED80F7617CEC0198FEF94B1BF06C6622AD4B4EC99D80F7A1666043D7281A3312
|
||||
FD84C20B8417C3AA789405239826E0CBCE4F98979E10344C33B0BE630473D312
|
||||
82866906D6993E62F6F1C3F45D160A5305BE68FF8095CF5B4302134CFE1185EA
|
||||
1FB8A1B4FF4FE32FF6FADB8B5E0000000049454E44AE426082}
|
||||
Instruction.Text = 'Nuevo informe'
|
||||
Instruction.Glyph.Data = {
|
||||
0A54504E474F626A65637489504E470D0A1A0A0000000D494844520000001C00
|
||||
00001C0806000000720DDF940000000970485973000017120000171201679FD2
|
||||
520000000467414D410000B18E7CFB5193000003104944415478DAAD96FB4B14
|
||||
5114C7CFE463DC1E606444BFF54424D3DC55CA52B1CCD7165A219905054182FD
|
||||
1452FD5810FD100406610A669A998FC4F5BDB6266265DAB60F5DD15E58FE03B2
|
||||
3F99D29ABBA7B9779C71C61D9D6177CFCE70CFDCB97B3EF7DCF3BD33C38082FD
|
||||
B502B2B300CC656020048688A24F036233A0671F40D43160BA87BF62AEEE1010
|
||||
60D7AE293AD8B835815E9B625C80DC8F1E88D4A7C1E8C1FB8F9FD6C3C44035B3
|
||||
21500A65F6D700FE2EA580A5EC551F4A50359316B31D76EFDC0EE5F72A645045
|
||||
A067AE0623074B8140891108F1057064CC0D556053DF173812B707E6DCF332A8
|
||||
225080D201DB4AF99BF335B4D502F371415BCC364833C4C29F458F0C2A031281
|
||||
081734AB0B3C88403C1E6E3E2E7960F6A8FFD27A7D3EF07A11DA2C76C84A8D87
|
||||
A57FCB32E8B8A54A4C8C21B59365C9015996EF2240B6634DF435B51460A46D1F
|
||||
70C093AA46BF09C980C12CA914E6F371ADD707EF1DB3B0B0B8006EB79B8EA96B
|
||||
EA5106121851245129118FD8BFA2DC5C53C6BAF5EBBBBA97C2D64EC064195B1F
|
||||
286C76E956A0EA5C51AEB4764A9929F5750D5A9581D2274B9B651C0BA2F514A8
|
||||
6F28E36B70AD9A4253EF97A9AA55B0CEBA87D03B645B3F43C1DE589C58186D10
|
||||
81150FCAC57B11E161B04517099BB953C78643141B01BA28EEE4DAB0B04DE2B8
|
||||
CA460B9C399902E661BB3AB0F5AD038BF30CD4D7E7DD14815A61023027DD00EF
|
||||
469C1A80FD1C307F1578FD4A81E665945AD68924181A9D5007B6F4DBF1527E32
|
||||
F5C9D3632351F8F549AEE916B14EAA039BCD362C31A6040D23E7887D4A03B0CF
|
||||
86C5C6641A24BB7646D3F2D51A77F8C1BCDCFFC79CD3EAC0D7BD56AE86294165
|
||||
4660CB5C6B737DD3062CCA31D00069E76E05241862CF1EDD05E7D40F756063CF
|
||||
673C7F5A4F679A59541EF03E4C8C3B0893DF67D481AFBAC7B0F05412CD30EBE2
|
||||
ED80F7617CEC0198FEF94B1BF06C6622AD4B4EC99D80F7A1666043D7281A3312
|
||||
FD84C20B8417C3AA789405239826E0CBCE4F98979E10344C33B0BE630473D312
|
||||
82866906D6993E62F6F1C3F45D160A5305BE68FF8095CF5B4302134CFE1185EA
|
||||
1FB8A1B4FF4FE32FF6FADB8B5E0000000049454E44AE426082}
|
||||
Instruction.Icon = tdiCustom
|
||||
CustomButtons = <
|
||||
item
|
||||
Caption = 'Listado de presupuestos.'
|
||||
Value = 100
|
||||
Default = True
|
||||
end>
|
||||
ButtonBar.Buttons = [cbCancel]
|
||||
MainIcon = tdiCustom
|
||||
Title = 'FactuGES'
|
||||
Position = dpMainFormCenter
|
||||
Icon.Data = {
|
||||
0000010003002020100001000400E8020000360000002020000001000800A808
|
||||
00001E0300002020000001002000A8100000C60B000028000000200000004000
|
||||
0000010004000000000000020000000000000000000000000000000000000000
|
||||
000000008000008000000080800080000000800080008080000080808000C0C0
|
||||
C0000000FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF000000
|
||||
0000000000000000000000000000000008777777777777777777777700000000
|
||||
0877767777677776777767760000000008F88888888888888888888700000000
|
||||
08F8FF8F8F888888888888860000000008FF8F8F88F8F8888888888C00000000
|
||||
08F88888F8888888888888860000000008F8688878E8888E88E8788700000000
|
||||
08F8688888F8F8FFFFFF88760000000008FF4888888F8FFFFFFF788700000000
|
||||
08F8676767677677677658E50000000008FF8888888887878787888700000000
|
||||
08FF8887887E8888888888860000000008FFE8E8E788C8E8FF8F8F8600000000
|
||||
08FFF8F8F8F8FF8F88F8F8870000000008FFFFFF8FF8F8F8F88F888600000000
|
||||
0FF8477878787878788788860000000008FF68888888F8FF8F8F788700000000
|
||||
08B7588888FF8FFFFFFF78860000083008BB47887776777777776F86000000B7
|
||||
8B9B73BB88788787E87878870000008BB8B9BB78888888EFF8F8FF8600000087
|
||||
B8BB8B888E8E8E88FFF8F886000000088BBB888FFFFFFFFFF8F877770000B9BB
|
||||
B8FFBB9B9BFFFFFFF87466460000BBB9BB8FBBBBB8FFFFFFF88F888700000008
|
||||
B8BB88888FFFFFFFF88F8F7700000008BBBBBB8FFFFFFFFFFF8887700000007B
|
||||
B7B98BB8FFFFFFFFF8887700000000B78B9B87B888F88F88F8877000000007B0
|
||||
08BB883B78888788787700000000000000B9000000000000000000000000FFFF
|
||||
FFFFF800000FF800000FF800000FF800000FF800000FF800000FF800000FF800
|
||||
000FF800000FF800000FF800000FF800000FF800000FF800000FF800000FF800
|
||||
000FF800000FF800000F9800000FC000000FC000000FC000000FE000000F0000
|
||||
000F0000000FE000000FE000001FC000003FC000007F980000FFFCFFFFFF2800
|
||||
0000200000004000000001000800000000000004000000000000000000000001
|
||||
00000001000000000000694731007C5D49007E604C0081635000826451008567
|
||||
540085685500886B5900896D5B008A6E5D008B705F008E715F008B7260008C72
|
||||
61008E74640084766C00957A6900977D6D00887B72009A8171009D8272009C84
|
||||
76009D8778009F897B00A28A7900A08B7D00A18C7E00E1B06E00E1B67D003E7A
|
||||
970073A0A5007AA2B70074AFBD007BB2BB003CAACE0028A5DB0020ADDF000D9A
|
||||
E500209EE3000DA6E2001AA4EF0000A6FF000CABFE0009ACFE0010A4F10015AC
|
||||
FA0000B5FB0000B0FD000CB6FC0000BFF90000BAFD0004BAFD0009BBFB0013B6
|
||||
F40015BFFA001CBDFB0026B7FD00589EC50040A4CD0040ABCC0050A2C7005DAE
|
||||
C00060A3C20062A4C60060B7CB006AB0CD007BB6C80077BAC80061BADD0044AD
|
||||
E50000C3F80007C6FB0000CAF80000CFFB0000D4F90026C8FA0026CDF8002BCC
|
||||
F90039C4FB0039C2FC0039CAFA003FCFFB0024D6F80030D2F80039D5F80000F8
|
||||
F8001FF8F8002CF6F8003EF4F8005AC6DC0070CDDF0052C0E40054C9E3004DCE
|
||||
FA005FC7FF004FD2FB004DD9F8005FD9FB006ED3E70063CDFE0060D1FB0060D8
|
||||
F90060DDF80046F8F90056F0F8005FFAFA0073E3F80073E4F90073EEF80060F1
|
||||
F800958A84009A918C0081999500A68F8200AD968500A3968C00AE988900AD9A
|
||||
8D00B19A8B00AF9C9000B09E9200B59F9200B7A29300B2A19600B5A19400B7A4
|
||||
9700BDA79700B4A39800B1A59D00B4A79F00BAA69800BCA79900B4A89F00BCA8
|
||||
9900BAA89C00BDAA9D00BEAC9E0083ADBD00B5A9A100BDABA000BEADA100BFAF
|
||||
A500A0BABE00C0AB9E00C1AC9E00C6AE9F00E2B98100E4BA8300E4BB8400E5BC
|
||||
8500E1BD8E00E3BF9000C0ADA000C2B0A300C2B1A500C4B2A600C1B2A800C3B5
|
||||
AB00C8B4A800CCB9AD00CEBCB100D0BEB200D1BFB400E4C19300E5C29400E6C4
|
||||
9600E8C69900D0C9A300CFC1B800D2C1B600D3C3B800D5C4B900D6C6BC00D8C6
|
||||
BC00D6C8BE00DAC9BF00ECD3B000EDD4B200EFD6B500E7D1B800E7D3BD00F0D8
|
||||
B6008CB7C40080BEC70097C3C70099C3C900ABD7CF00AFD9DD0086E3F90086E7
|
||||
F90086ECF8009EE5FB0090E8F900ACEDFC00BCEAFD00BCF1FB00BFF1FD00D7C9
|
||||
C000D9CAC100DCCBC200DACCC200DDCCC300DACCC400DDCEC400DED0C600DED1
|
||||
C900DED3CC00DFD4CD00E1D1C900E2D5CD00F0DCC200E3D8D200E5D9D200E2DA
|
||||
D500E6DBD400E5DCD500E8DDD600E6DDD800E9DFD900E6E0DB00EAE0DA00EAE2
|
||||
DD00ECE3DE00EBE4DE00ECE4DE00F3E7D900C6E1EF00C9EFFD00D7F6FD00DFF3
|
||||
FF00DFFEFE00EBE7E300EDE6E100EFE7E400EEE8E400F0EAE600F2EDE900F2EE
|
||||
EC00F4EFEC00F5F0EE00F9F4ED00E7FAFD00EBF8FF00F6F2F000F7F4F100F8F4
|
||||
F200F9F7F500FAF8F600FBF9F900FCFBFA00FCFCFB00FEFEFE00000000000000
|
||||
0000000000000000000000000000000000000000000000000000000000000000
|
||||
00000000000000000000007D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
|
||||
0D0D0000000000000000009C9C19191919191919191919191919191919191919
|
||||
1903000000000000000000ABDECBCBC7C7AFABABABABAAA3A2A2A0A0A0A0A0A0
|
||||
8607000000000000000000ABECEAE9DEDEDEDED7D5D2D2D2CBCBCBCBB0CBB0CB
|
||||
9007000000000000000000ABEDECEAE9DEDEDBD7D7D5D2D2D2CDCDCBB0B0B0B0
|
||||
9007000000000000000000AFEDE9A9CFD2CFD2CDCBCBCBB0B0ABACA3A3A3A3B0
|
||||
9007000000000000000000AFF0D5017783838386868686869099909999907BB0
|
||||
9007000000000000000000B0F4D501A0B0CBD2D5DEECEDF7FAFAFAFAFAF77BAA
|
||||
9007000000000000000000CBF4DC01A0B0B0B0D2D5DBEAEDF7FAFAFAFAF47BB0
|
||||
9007000000000000000000CBF8DC010404070604090909090D0D110D110D02A3
|
||||
9007000000000000000000CBFAED9E9E9E9C999E8C8C8C868683837E7D7D7ACB
|
||||
9007000000000000000000CBFAF1A7A7A6A6A6A69898989898B5DBDBD5D5D2D2
|
||||
9907000000000000000000CDFAF796969696961D961D931D1DB4DEDBD7D5D5D2
|
||||
9C07000000000000000000CFFAFAFAFAF8F7F0F0EDEDEDECE9E9DEDEDED7D5D5
|
||||
9907000000000000000000CDFAFAEAF0EDEDECEAEAE9DEDEDBDCD5D5D5D5D2D5
|
||||
9C07000000000000000000D2FAEC01737D7D7B7D7D7B7D7B7D7B7B7B7D7B7DD2
|
||||
9907000000000000000000CFFAEC019EABB0CBD2D5DCDEECEDF4F4F4F4EA7BD2
|
||||
9C07000000000000000000B9524601A0B0B0CBB5D5DEEAEDF7FAFAFAFAF47DD5
|
||||
9C070000000000213F0000B83226010C3F5C1F111214141616191B1B1B1807D2
|
||||
9C07000000000000253D8A5B322D711E2860BA7E7E7A7E797A797979767676D5
|
||||
9E0700000000000041375E662F2B65314EBBB6B6B6B6B4B4B1E2F4EDEDEDECEA
|
||||
9C070000000000008F5D66663232394EC1A81C1C1C1C1C1C1CD3F7F4EDDED7D5
|
||||
9C0700000000000000B7BE6E5758BEBDE4E6E6F3FAFAFAFAFAFAF7F4D5928675
|
||||
7304000000002A2A2A2A4A6AFAE7562F2A2A2A5FFAFAFAFAFAFAF8D577010101
|
||||
0101000000004747472F4A59C5E7564A32474766FAFAFAFAFAFAFADCA0D2CFB0
|
||||
A20C00000000000000436C6958686D6BC2C5C5E7FAFAFAFAFAFAFADEAADEDBCB
|
||||
1470000000000000004551534A4A5250C0E7FAFAFAFAFAFAFAFAFADEAAD7B514
|
||||
700000000000000042384C54472B613550C3FAFAFAFAFAFAFAFAFADEA1B0196F
|
||||
000000000000000024234463322EBC5A3664E3ECE9E9E9E9E9E9E9CF90731300
|
||||
000000000000003A3C00002232298B8B3E3B207E8B7E8B7E827E817E74100000
|
||||
0000000000000000000000003227000000000000000000000000000000000000
|
||||
000000000000FFFFFFFFF800000FF800000FF800000FF800000FF800000FF800
|
||||
000FF800000FF800000FF800000FF800000FF800000FF800000FF800000FF800
|
||||
000FF800000FF800000FF800000FF800000F9800000FC000000FC000000FC000
|
||||
000FE000000F0000000F0000000FE000000FE000001FC000003FC000007F9800
|
||||
00FFFCFFFFFF2800000020000000400000000100200000000000801000000000
|
||||
0000000000000000000000000000000000000000000000000000000000000000
|
||||
0000000000000000000000000000000000000000000000000000000000000000
|
||||
0000000000000000000000000000000000000000000000000000000000000000
|
||||
0000000000000000000000000000000000000000000000000000000000000000
|
||||
0000000000000000000000000000000000000000000000000000000000007067
|
||||
5F70AA9382E570513CE3735540E3735540E3735540E3735540E3735540E37355
|
||||
40E3735540E3735540E3735540E3735540E3735540E3735540E3735540E37355
|
||||
40E3735540E3735540E3735540E3735540E3735540E3735540E372533EE5BAAB
|
||||
A070000000000000000000000000000000000000000000000000000000005E54
|
||||
4C7FCAB7ABFFC5B5AAFFA18877FFA28A78FFA28A79FFA28A79FFA28A79FFA28A
|
||||
79FFA28A79FFA28A79FFA28A79FFA28A79FFA28A79FFA28A79FFA28A79FFA28A
|
||||
79FFA28A79FFA28A79FFA28A79FFA28A79FFA28A79FFA58D7CFF7A5B46FFB2A1
|
||||
967F000000000000000000000000000000000000000000000000000000006055
|
||||
4D7ED7C6BBFFEDE4E0FFD9CCC4FFD9CCC4FFD9CBC3FFD8CAC1FFD7C9BFFFD6C7
|
||||
BDFFD5C6BBFFD4C4BAFFD3C3B8FFD2C1B7FFD1C0B5FFD0BEB3FFCFBDB2FFCEBC
|
||||
B0FFCEBBAFFFCEBBAFFFCEBBAFFFCEBBAFFFCEBCB0FFBEAA9CFF82644FFFB2A1
|
||||
967E000000000000000000000000000000000000000000000000000000006056
|
||||
4D7ED7C8BCFFF2EBE8FFEFE9E5FFEEE7E2FFECE5E0FFEBE2DEFFEAE0DBFFE9DE
|
||||
D8FFE7DBD4FFE5D9D1FFE3D7CFFFE2D4CCFFE1D2C9FFDFD0C7FFDDCDC4FFDCCB
|
||||
C2FFDBC9BFFFDBC9BFFFDBC9BFFFDBC9BFFFDCCAC1FFC1AC9FFF81634FFFB2A1
|
||||
967E000000000000000000000000000000000000000000000000000000006155
|
||||
4E7ED8C9BDFFF3EDE9FFF1EAE6FFF0E9E6FFEEE6E1FFECE4DFFFEBE2DDFFEAE0
|
||||
DAFFE9DED7FFE7DBD4FFE5D9D1FFE3D7CFFFE2D4CCFFE1D2C9FFDFD0C7FFDDCD
|
||||
C4FFDCCBC2FFDBC9BFFFDBC9BFFFDBC9BFFFDCCAC0FFC1AC9FFF81634FFFB2A1
|
||||
967E000000000000000000000000000000000000000000000000000000006157
|
||||
4E7ED9C9BFFFF4EFEDFFEFE8E3FFD0C2B9FFDFD5CEFFE0D5CEFFE0D4CCFFDED3
|
||||
CBFFDDD1C8FFDCCFC6FFDACCC4FFD9CBC1FFD8C9BFFFD7C7BDFFD6C5BBFFD5C4
|
||||
B9FFD3C2B7FFD2C0B5FFD2BFB4FFD2BFB4FFDAC8BEFFC1AC9FFF81634FFFB2A1
|
||||
967E000000000000000000000000000000000000000000000000000000006256
|
||||
4F7EDACCC0FFF5F2EFFFE5DDD9FF5C3821FFB0998AFFB8A394FFB8A394FFB9A3
|
||||
94FFB8A495FFB9A597FFB9A698FFBAA698FFBBA799FFBBA89AFFBBA89BFFBCA8
|
||||
9BFFBCA89BFFBCA89BFFBBA89AFFB49E8FFFD8C6BBFFC1AC9FFF81634FFFB2A1
|
||||
967E000000000000000000000000000000000000000000000000000000006256
|
||||
4F7EDBCBC1FFF8F4F3FFE7E0DBFF5F3C24FFD0BDB2FFDCCBC1FFDDCCC3FFE2D2
|
||||
CBFFE7DBD4FFEDE2DEFFF0E8E6FFF5F0EDFFF9F7F4FFFDFDFDFFFFFFFFFFFFFF
|
||||
FFFFFFFFFFFFFFFFFFFFFAF8F7FFB39D8DFFD8C6BBFFC1AC9FFF81634FFFB2A1
|
||||
967E000000000000000000000000000000000000000000000000000000006256
|
||||
4F7EDCCEC3FFFAF6F5FFE9E2DDFF5F3C24FFD2BFB5FFDFCDC4FFDECCC3FFE0CE
|
||||
C6FFE4D4CDFFE9DDD6FFEFE4E0FFF1EAE8FFF7F1EFFFFBF8F6FFFFFEFFFFFFFF
|
||||
FFFFFFFFFFFFFFFFFFFFFCFBFAFFB5A090FFD9C7BEFFC1AD9FFF81634FFFB2A1
|
||||
967E000000000000000000000000000000000000000000000000000000006257
|
||||
4F7EDDCFC4FFFCF9F9FFE9E4E0FF5F3A23FF7C5D49FF7F5F4CFF7E5F4CFF7E60
|
||||
4DFF7F614DFF816350FF826552FF836654FF846856FF856A57FF866B59FF876C
|
||||
5BFF876D5BFF876D5BFF866B59FF72523DFFD5C3B9FFC1AFA1FF81634FFFB2A1
|
||||
967E000000000000000000000000000000000000000000000000000000006357
|
||||
507EDECFC6FFFCFCFBFFF4F1F0FFC3B6AEFFC3B5ADFFC1B4ACFFC0B3AAFFBFB1
|
||||
A9FFBEB0A6FFBDAEA5FFBDACA3FFBCABA2FFBBAAA0FFBAA99FFFB8A69AFFB8A4
|
||||
98FFB6A396FFB5A194FFB49F93FFB39D90FFDCCDC4FFC2AEA1FF81634FFFB2A1
|
||||
967E000000000000000000000000000000000000000000000000000000006357
|
||||
507EDFD2C7FFFEFEFDFFF9F5EFFFE8C696FFE9C799FFE8C697FFE7C596FFE7C4
|
||||
95FFE6C394FFE5C293FFE4C091FFE4C090FFE3BF8FFFE2BD8CFFE9D5BFFFEBE1
|
||||
DCFFEADFD8FFE7DCD5FFE5DAD3FFE4D8D0FFE3D4CCFFC2AFA2FF81634FFFB2A1
|
||||
967E000000000000000000000000000000000000000000000000000000006458
|
||||
517EE0D3C8FFFFFFFFFFFAF5EFFFE3B77CFFE4B97FFFE2B87EFFE3B77DFFE2B7
|
||||
7CFFE2B67BFFE1B57AFFE1B479FFE0B478FFE0B377FFDFB174FFE6D0B7FFEBE1
|
||||
DCFFE8DFD9FFE8DDD6FFE6D9D2FFE3D8D1FFE4D7CFFFC3AFA2FF81634FFFB2A1
|
||||
967E000000000000000000000000000000000000000000000000000000006458
|
||||
517EE1D2C9FFFFFFFFFFFEFEFDFFFEFFFFFFFCFDFEFFFBFBFBFFF9F7F8FFF8F5
|
||||
F6FFF7F3F2FFF5F1F0FFF4EFEEFFF1EDEBFFF0EBE9FFEEE9E6FFEDE6E2FFECE3
|
||||
DEFFEBE1DBFFE9DFD9FFE8DDD6FFE6DAD3FFE5D9D2FFC3B0A3FF81634FFFB2A1
|
||||
967E000000000000000000000000000000000000000000000000000000006459
|
||||
517EE1D4CAFFFFFFFFFFFDFDFCFFEEEBE8FFF5F2F0FFF4F0EFFFF3EFECFFF2ED
|
||||
EAFFF1EBE8FFEEE9E5FFEFE7E3FFECE5E1FFEAE4DEFFEAE1DCFFE8E0DAFFE7DE
|
||||
D8FFE6DDD6FFE5DBD4FFE4D8D1FFE2D6CEFFE6DBD4FFC3B1A4FF81634EFFB2A1
|
||||
967E000000000000000000000000000000000000000000000000000000006559
|
||||
527EE2D4CAFFFFFFFFFFF0ECEAFF5B361EFFAB9383FFB39D8EFFB39D8DFFB39D
|
||||
8DFFB29D8DFFB29C8DFFB29C8CFFB29C8CFFB29C8CFFB29C8CFFB29C8CFFB29C
|
||||
8CFFB29C8CFFB29C8CFFB29C8DFFB39D8EFFE3D8D0FFC4B1A4FF81634EFFB2A1
|
||||
967E000000000000000000000000000000000000000000000000000000006559
|
||||
527EE5D4CAFFFFFFFFFFF7F0EBFF5F3B24FFCCB8ADFFD7C5BAFFD9C7BDFFDCCC
|
||||
C3FFE1D4CCFFE5DAD4FFE8E0DBFFEDE5E1FFF1EBE9FFF5F2EFFFF7F5F3FFF8F6
|
||||
F4FFF8F5F4FFF8F6F4FFF1EEEAFFB29C8DFFE6DAD3FFC4B2A5FF81634EFFB2A1
|
||||
967E00000000000000000000000000000000000000000000000000000000685A
|
||||
527E9AC6C9FF35CFFEFF3DAEEBFF663E24FFD2BFB4FFE0CBBFFFE0C9BDFFE1CD
|
||||
C4FFE4D5CDFFE9DED7FFEEE5E0FFF2EBE8FFF6F2F0FFFCF8F8FFFFFFFEFFFFFF
|
||||
FFFFFFFFFFFFFFFFFFFFFCFAF9FFB49E8FFFE7DED7FFC5B3A6FF81634EFFB2A1
|
||||
967E00000000000000000000000000000000007792910072A7A3001E33366957
|
||||
4C7C86C1C8FF00BFFBFF079AEBFF6A3E23FF926D57FF5FA3C8FF4AC1E8FF6C9C
|
||||
A2FF917260FF927767FF947A69FF957C6CFF977E6FFF998171FF9A8374FF9B85
|
||||
76FF9C8678FF9C8678FF998274FF7D5E49FFE3D9D4FFC5B3A7FF81634EFFB2A1
|
||||
967E00000000000000000000000000000000005A6F7000A9E5E40075AEAE5C90
|
||||
A5BD75D0E0FF00BFFAFF0CA3F4FF8A9A91FF3C7492FF03A4E4FF4AD5FFFF98C4
|
||||
CBFFB3A196FFB1A197FFB0A096FFB09F95FFAF9D92FFAF9C91FFAD9A8EFFAC99
|
||||
8CFFAB988AFFAB9789FFAA9688FFA99386FFE8E0DAFFC5B4A7FF81634EFFB2A1
|
||||
967E00000000000000000000000000000000000000002DA5BFC110C2FFFF4DD0
|
||||
FDFF64DBF9FF00B3FAFF09A8FEFF68D7FFFF04B5FFFF24CCFBFFAFD8CEFFF7DA
|
||||
B8FFF3DBBBFFF3DBBAFFF2D9B9FFF1D8B7FFF0D7B4FFEED5B2FFF6EADDFFF9F6
|
||||
F4FFF7F3F1FFF5F1EEFFF5EFECFFF4EDEAFFF1EBE7FFC6B4A8FF81634EFFB2A1
|
||||
967E00000000000000000000000000000000000000005F8A909142C7E4E960DE
|
||||
F8FF64D7FAFF00B6FDFF00B8FDFF21B2FDFF1ECCF7FF93EBFCFFD2C69BFFE1AB
|
||||
63FFDFAC66FFDFAC66FFDFAC66FFDFAC66FFDFAC66FFDEA961FFEFDBC0FFF8F6
|
||||
F5FFF6F2F0FFF3EDEBFFECE2DCFFE9DFD9FFE5DBD6FFC2B1A4FF81634FFFB2A1
|
||||
967E000000000000000000000000000E171A000E171A00040B145994A4A990EB
|
||||
FCFF61F1F7FF13FAF7FF23F9F7FF93EDF7FF8CE5F8FFD5F2FDFFE9F8FFFFE7F8
|
||||
FFFFF0FCFFFFFFFFFFFFFFFFFFFFFFFFFFFFFEFFFFFFFDFEFFFFFAFAF9FFF9F7
|
||||
F5FFF7F2F0FFE8DFD8FFC7AE9FFFBEA998FFAF9888FFB09A8AFF7F604DFFB2A1
|
||||
967E00000000000000000000000000AAFFFF00AAFFFF00AAFFFF00A4FFFF00CD
|
||||
FAFF5DFCF9FFFFFFFFFFEEFEFEFF00FBF7FF00AAFEFF00A1FFFF00A1FFFF00A0
|
||||
FFFF56C3FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFCFDFBFFFCFBFAFFFBFA
|
||||
F8FFE6DDD6FFAA9180FF5D3922FF603D26FF613E27FF613E28FF634029FFB4A3
|
||||
987E00000000000000000000000000CAFFFF00CAFFFF00CBFFFF00B0FFFF00CD
|
||||
FBFF38F5F7FFC3EFFAFFF0FFFEFF00FAF7FF00C8F7FF00C2F7FF00C2F7FF00C1
|
||||
F7FF57D7FAFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFEFEFEFFFDFDFCFFFCFC
|
||||
FBFFE7DED8FFCCB9ACFFE6DBD5FFE2D7D0FFDCCFC5FFD7C5BBFF8E705DFFB4A2
|
||||
9680000000000000000000000000002E383C002E383C00252F364C99B0B57DE8
|
||||
FBFF59F1F7FF25F7F7FF41FAF8FF7CEEF7FF77E4F7FFB5EFFCFFC6F2FDFFC3F2
|
||||
FDFFD9F6FCFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFDFEFEFFFEFE
|
||||
FEFFE9E1DAFFCEBCAFFFF1E9E3FFEADFD8FFE4D5CCFF9D816FFF3A291F868985
|
||||
831C00000000000000000000000000000000000000004E7073774AB0DADC37C9
|
||||
FBFF22D5F7FF00D3F9FF02C3FBFF37D5F7FF34BEFCFFA2E6FAFFECFBFDFFFFFF
|
||||
FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFEFF
|
||||
FFFFEAE2DCFFCDBBADFFEADFD8FFE3D5CBFF9F8271FF3E2D2386050100200000
|
||||
000000000000000000000000000000000000000000003E9CC4C219C0FFFF23C9
|
||||
FCFF30D3F8FF00BEF8FF06A8FEFF4FDCF8FF00B8FCFF32C2FBFFC0EBFCFFFFFF
|
||||
FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
|
||||
FFFFEAE3DEFFCDB9ABFFDDCEC4FFA58979FF3E2C1F8F0905041B000000000000
|
||||
000000000000000000000000000000000000003451510099DDDB0091C0C35DAD
|
||||
BCCF76D7E9FF00BEF9FF10A9FBFFBDDEDEFF5AC8DDFF0AB5F7FF62CEFFFFCBE4
|
||||
F1FFF1E7E0FFEFE7E1FFEEE6E1FFEEE6E1FFEEE6E0FFEDE6E0FFEDE5E0FFEEE6
|
||||
E1FFE1D4CCFFC5AE9FFFA68D7FF53E2718A10402000E00000000000000000000
|
||||
0000000000000000000000000000000000000075B7AF0099C7C500323E425442
|
||||
3B5C6BA8B1DA00C1FCFF0EA1F3F8A98E80C0AB9081C12698B1C10088C4C14C85
|
||||
A3C1A18D80C19E8D81C19E8B81C19D8C80C19B8C7FC19B8A7FC19C897FC19A89
|
||||
7EC19B8B7EC1897769C2432B1BAC000000000000000000000000000000000000
|
||||
0000000000000000000000000000000000000000000000000000000000000000
|
||||
00000045565A00C5FFFF0094E6E2000000000000000000000000000000000000
|
||||
0000000000000000000000000000000000000000000000000000000000000000
|
||||
0000000000000000000000000000000000000000000000000000000000000000
|
||||
0000000000000000000000000000FFFFFFFFF0000007F0000007F0000007F000
|
||||
0007F0000007F0000007F0000007F0000007F0000007F0000007F0000007F000
|
||||
0007F0000007F0000007F0000007F0000007F0000007F0000007800000078000
|
||||
0007C0000007C000000700000007000000070000000700000007C000000FC000
|
||||
001F8000003F800000FFF8FFFFFF}
|
||||
Width = 450
|
||||
Left = 768
|
||||
Top = 72
|
||||
end
|
||||
end
|
||||
|
||||
@ -42,6 +42,9 @@ type
|
||||
actEnviarEMail: TAction;
|
||||
TBXItem45: TTBXItem;
|
||||
Enviarporemail1: TMenuItem;
|
||||
actInformes: TAction;
|
||||
TBXItem46: TTBXItem;
|
||||
JSInformesDialog: TJSDialog;
|
||||
procedure FormShow(Sender: TObject);
|
||||
procedure actGenerarAlbaranCliExecute(Sender: TObject);
|
||||
procedure actEliminarUpdate(Sender: TObject);
|
||||
@ -57,6 +60,7 @@ type
|
||||
procedure actAnularUpdate(Sender: TObject);
|
||||
procedure actEnviarEMailExecute(Sender: TObject);
|
||||
procedure actEnviarEMailUpdate(Sender: TObject);
|
||||
procedure actInformesExecute(Sender: TObject);
|
||||
|
||||
protected
|
||||
FPresupuestos: IBizPresupuestoCliente;
|
||||
@ -96,7 +100,7 @@ uses
|
||||
uGenerarFacturasCliPreCliUtils, uEditorFechaDecision,
|
||||
// uBizAlbaranesCliente, uAlbaranesClienteController,
|
||||
// uFacturasClienteController, uBizFacturasCliente,
|
||||
uGenerarAlbaranesCliUtils;
|
||||
uGenerarAlbaranesCliUtils, uGestorInformesController;
|
||||
|
||||
|
||||
{$R *.dfm}
|
||||
@ -324,6 +328,31 @@ begin
|
||||
// GenerarPresupuestosProv(FPresupuestos);
|
||||
end;
|
||||
|
||||
procedure TfEditorPresupuestosCliente.actInformesExecute(Sender: TObject);
|
||||
var
|
||||
Respuesta : Integer;
|
||||
AGestorInformesController : IGestorInformesController;
|
||||
|
||||
begin
|
||||
AGestorInformesController := TGestorInformesController.Create;
|
||||
try
|
||||
|
||||
Respuesta := JsInformesDialog.Execute;
|
||||
|
||||
if Respuesta <> IDCANCEL then
|
||||
begin
|
||||
case JsInformesDialog.CustomButtonResult of
|
||||
100 : begin // Listado de facturas pendientes
|
||||
AGestorInformesController.VerInformeListadoPresupuestos;
|
||||
end;
|
||||
end;
|
||||
end;
|
||||
|
||||
finally
|
||||
AGestorInformesController := NIL;
|
||||
end;
|
||||
end;
|
||||
|
||||
procedure TfEditorPresupuestosCliente.AsignarVista;
|
||||
begin
|
||||
ViewGrid := CreateView(TfrViewPresupuestosCliente) as IViewPresupuestosCliente;
|
||||
|
||||
@ -2261,7 +2261,7 @@ inherited fEditorRecibosCliente: TfEditorRecibosCliente
|
||||
Default = True
|
||||
end
|
||||
item
|
||||
Caption = 'Listado de recibos de cliente'
|
||||
Caption = 'Listado de recibos'
|
||||
Value = 200
|
||||
end>
|
||||
ButtonBar.Buttons = [cbCancel]
|
||||
|
||||
@ -9,6 +9,7 @@
|
||||
<Projects Include="..\..\Cliente\FactuGES.dproj" />
|
||||
<Projects Include="..\..\GUIBase\GUIBase.dproj" />
|
||||
<Projects Include="..\..\Servidor\FactuGES_Server.dproj" />
|
||||
<Projects Include="..\Recibos de cliente\Views\RecibosCliente_view.dproj" />
|
||||
<Projects Include="Controller\RecibosProveedor_controller.dproj" />
|
||||
<Projects Include="Data\RecibosProveedor_data.dproj" />
|
||||
<Projects Include="Model\RecibosProveedor_model.dproj" />
|
||||
@ -111,14 +112,23 @@
|
||||
<Target Name="FactuGES_Server:Make">
|
||||
<MSBuild Projects="..\..\Servidor\FactuGES_Server.dproj" Targets="Make" />
|
||||
</Target>
|
||||
<Target Name="RecibosCliente_view">
|
||||
<MSBuild Projects="..\Recibos de cliente\Views\RecibosCliente_view.dproj" Targets="" />
|
||||
</Target>
|
||||
<Target Name="RecibosCliente_view:Clean">
|
||||
<MSBuild Projects="..\Recibos de cliente\Views\RecibosCliente_view.dproj" Targets="Clean" />
|
||||
</Target>
|
||||
<Target Name="RecibosCliente_view:Make">
|
||||
<MSBuild Projects="..\Recibos de cliente\Views\RecibosCliente_view.dproj" Targets="Make" />
|
||||
</Target>
|
||||
<Target Name="Build">
|
||||
<CallTarget Targets="Base;GUIBase;ApplicationBase;RecibosProveedor_model;RecibosProveedor_data;RecibosProveedor_controller;RecibosProveedor_view;RecibosProveedor_plugin;FactuGES;FactuGES_Server" />
|
||||
<CallTarget Targets="Base;GUIBase;ApplicationBase;RecibosProveedor_model;RecibosProveedor_data;RecibosProveedor_controller;RecibosProveedor_view;RecibosProveedor_plugin;FactuGES;FactuGES_Server;RecibosCliente_view" />
|
||||
</Target>
|
||||
<Target Name="Clean">
|
||||
<CallTarget Targets="Base:Clean;GUIBase:Clean;ApplicationBase:Clean;RecibosProveedor_model:Clean;RecibosProveedor_data:Clean;RecibosProveedor_controller:Clean;RecibosProveedor_view:Clean;RecibosProveedor_plugin:Clean;FactuGES:Clean;FactuGES_Server:Clean" />
|
||||
<CallTarget Targets="Base:Clean;GUIBase:Clean;ApplicationBase:Clean;RecibosProveedor_model:Clean;RecibosProveedor_data:Clean;RecibosProveedor_controller:Clean;RecibosProveedor_view:Clean;RecibosProveedor_plugin:Clean;FactuGES:Clean;FactuGES_Server:Clean;RecibosCliente_view:Clean" />
|
||||
</Target>
|
||||
<Target Name="Make">
|
||||
<CallTarget Targets="Base:Make;GUIBase:Make;ApplicationBase:Make;RecibosProveedor_model:Make;RecibosProveedor_data:Make;RecibosProveedor_controller:Make;RecibosProveedor_view:Make;RecibosProveedor_plugin:Make;FactuGES:Make;FactuGES_Server:Make" />
|
||||
<CallTarget Targets="Base:Make;GUIBase:Make;ApplicationBase:Make;RecibosProveedor_model:Make;RecibosProveedor_data:Make;RecibosProveedor_controller:Make;RecibosProveedor_view:Make;RecibosProveedor_plugin:Make;FactuGES:Make;FactuGES_Server:Make;RecibosCliente_view:Make" />
|
||||
</Target>
|
||||
<Import Condition="Exists('$(MSBuildBinPath)\Borland.Group.Targets')" Project="$(MSBuildBinPath)\Borland.Group.Targets" />
|
||||
</Project>
|
||||
@ -828,7 +828,7 @@ object RptRecibosProveedor: TRptRecibosProveedor
|
||||
PrintOptions.Printer = 'Por defecto'
|
||||
PrintOptions.PrintOnSheet = 0
|
||||
ReportOptions.CreateDate = 37800.807714351900000000
|
||||
ReportOptions.LastChange = 39741.852018379630000000
|
||||
ReportOptions.LastChange = 39743.775704560180000000
|
||||
ScriptLanguage = 'PascalScript'
|
||||
ScriptText.Strings = (
|
||||
'procedure frxReportOnStartReport(Sender: TfrxComponent);'
|
||||
|
||||
@ -51,8 +51,8 @@ const
|
||||
rptInforme = 'InfReciboProveedor.fr3';
|
||||
rptInformeListadoRecibosProveedorDesglosado = 'InformeListadoRecibosProveedorDesglosado.fr3';
|
||||
rptInformeListadoRecibosProveedor = 'InformeListadoRecibosProveedor.fr3';
|
||||
rptInformeListadoRecibosCliPendientes = 'InformeListadoRecibosCliPendientes.fr3';
|
||||
rptInformeListadoRecibosCliPendientesDesglosado = 'InformeListadoRecibosCliPendientesDesglosado.fr3';
|
||||
rptInformeListadoRecibosProvPendientes = 'InformeListadoRecibosProvPendientes.fr3';
|
||||
rptInformeListadoRecibosProvPendientesDesglosado = 'InformeListadoRecibosProvPendientesDesglosado.fr3';
|
||||
|
||||
{ Dataset names for schReport }
|
||||
ds_InformeCabecera = 'Informe_Cabecera';
|
||||
@ -114,10 +114,9 @@ begin
|
||||
|
||||
//DESGLOSADO POR CLIENTE EN ESTE INFORME NO SE DESGLOSARÁ POR CLIENTE
|
||||
if Desglosado then
|
||||
ATipoInforme := rptInformeListadoRecibosCliPendientesDesglosado
|
||||
ATipoInforme := rptInformeListadoRecibosProvPendientesDesglosado
|
||||
else
|
||||
ATipoInforme := rptInformeListadoRecibosCliPendientes;
|
||||
|
||||
ATipoInforme := rptInformeListadoRecibosProvPendientes;
|
||||
|
||||
Result := _GenerarInforme(ATipoInforme, IdEmpresa, FechaInicio, FechaFin, ListaIDProveedors, ImporteMinimo);
|
||||
end;
|
||||
|
||||
Binary file not shown.
@ -39,17 +39,18 @@
|
||||
<Borland.Personality>Delphi.Personality</Borland.Personality>
|
||||
<Borland.ProjectType>Package</Borland.ProjectType>
|
||||
<BorlandProject>
|
||||
<BorlandProject><Delphi.Personality><Parameters><Parameters Name="UseLauncher">False</Parameters><Parameters Name="LoadAllSymbols">True</Parameters><Parameters Name="LoadUnspecifiedSymbols">False</Parameters></Parameters><Package_Options><Package_Options Name="ImplicitBuild">True</Package_Options><Package_Options Name="DesigntimeOnly">False</Package_Options><Package_Options Name="RuntimeOnly">False</Package_Options></Package_Options><VersionInfo><VersionInfo Name="IncludeVerInfo">True</VersionInfo><VersionInfo Name="AutoIncBuild">False</VersionInfo><VersionInfo Name="MajorVer">1</VersionInfo><VersionInfo Name="MinorVer">0</VersionInfo><VersionInfo Name="Release">0</VersionInfo><VersionInfo Name="Build">0</VersionInfo><VersionInfo Name="Debug">False</VersionInfo><VersionInfo Name="PreRelease">False</VersionInfo><VersionInfo Name="Special">False</VersionInfo><VersionInfo Name="Private">False</VersionInfo><VersionInfo Name="DLL">False</VersionInfo><VersionInfo Name="Locale">3082</VersionInfo><VersionInfo Name="CodePage">1252</VersionInfo></VersionInfo><VersionInfoKeys><VersionInfoKeys Name="CompanyName"></VersionInfoKeys><VersionInfoKeys Name="FileDescription"></VersionInfoKeys><VersionInfoKeys Name="FileVersion">1.0.0.0</VersionInfoKeys><VersionInfoKeys Name="InternalName"></VersionInfoKeys><VersionInfoKeys Name="LegalCopyright"></VersionInfoKeys><VersionInfoKeys Name="LegalTrademarks"></VersionInfoKeys><VersionInfoKeys Name="OriginalFilename"></VersionInfoKeys><VersionInfoKeys Name="ProductName"></VersionInfoKeys><VersionInfoKeys Name="ProductVersion">1.0.0.0</VersionInfoKeys><VersionInfoKeys Name="Comments"></VersionInfoKeys></VersionInfoKeys><Source><Source Name="MainSource">RecibosProveedor_view.dpk</Source></Source></Delphi.Personality></BorlandProject></BorlandProject>
|
||||
<BorlandProject><Delphi.Personality><Parameters><Parameters Name="UseLauncher">False</Parameters><Parameters Name="LoadAllSymbols">True</Parameters><Parameters Name="LoadUnspecifiedSymbols">False</Parameters></Parameters><Package_Options><Package_Options Name="ImplicitBuild">False</Package_Options><Package_Options Name="DesigntimeOnly">False</Package_Options><Package_Options Name="RuntimeOnly">False</Package_Options></Package_Options><VersionInfo><VersionInfo Name="IncludeVerInfo">True</VersionInfo><VersionInfo Name="AutoIncBuild">False</VersionInfo><VersionInfo Name="MajorVer">1</VersionInfo><VersionInfo Name="MinorVer">0</VersionInfo><VersionInfo Name="Release">0</VersionInfo><VersionInfo Name="Build">0</VersionInfo><VersionInfo Name="Debug">False</VersionInfo><VersionInfo Name="PreRelease">False</VersionInfo><VersionInfo Name="Special">False</VersionInfo><VersionInfo Name="Private">False</VersionInfo><VersionInfo Name="DLL">False</VersionInfo><VersionInfo Name="Locale">3082</VersionInfo><VersionInfo Name="CodePage">1252</VersionInfo></VersionInfo><VersionInfoKeys><VersionInfoKeys Name="CompanyName"></VersionInfoKeys><VersionInfoKeys Name="FileDescription"></VersionInfoKeys><VersionInfoKeys Name="FileVersion">1.0.0.0</VersionInfoKeys><VersionInfoKeys Name="InternalName"></VersionInfoKeys><VersionInfoKeys Name="LegalCopyright"></VersionInfoKeys><VersionInfoKeys Name="LegalTrademarks"></VersionInfoKeys><VersionInfoKeys Name="OriginalFilename"></VersionInfoKeys><VersionInfoKeys Name="ProductName"></VersionInfoKeys><VersionInfoKeys Name="ProductVersion">1.0.0.0</VersionInfoKeys><VersionInfoKeys Name="Comments"></VersionInfoKeys></VersionInfoKeys><Source><Source Name="MainSource">RecibosProveedor_view.dpk</Source></Source></Delphi.Personality></BorlandProject></BorlandProject>
|
||||
</ProjectExtensions>
|
||||
<Import Project="$(MSBuildBinPath)\Borland.Delphi.Targets" />
|
||||
<ItemGroup>
|
||||
<DelphiCompile Include="RecibosProveedor_view.dpk">
|
||||
<MainSource>MainSource</MainSource>
|
||||
</DelphiCompile>
|
||||
<DCCReference Include="..\GUIBase.dcp" />
|
||||
<DCCReference Include="..\JvGlobusD11R.dcp" />
|
||||
<DCCReference Include="..\RecibosProveedor_controller.dcp" />
|
||||
<DCCReference Include="..\RecibosProveedor_model.dcp" />
|
||||
<DCCReference Include="..\..\Lib\GestorInformes_controller.dcp" />
|
||||
<DCCReference Include="..\..\Lib\GUIBase.dcp" />
|
||||
<DCCReference Include="..\..\Lib\JvGlobusD11R.dcp" />
|
||||
<DCCReference Include="..\..\Lib\RecibosProveedor_controller.dcp" />
|
||||
<DCCReference Include="..\..\Lib\RecibosProveedor_model.dcp" />
|
||||
<DCCReference Include="uEditorElegirRecibosProveedor.pas">
|
||||
<Form>fEditorElegirRecibosProveedor</Form>
|
||||
<DesignClass>TfEditorElegirRecibosProveedor</DesignClass>
|
||||
@ -94,7 +95,7 @@
|
||||
</Project>
|
||||
<!-- EurekaLog First Line
|
||||
[Exception Log]
|
||||
EurekaLog Version=6006
|
||||
EurekaLog Version=6011
|
||||
Activate=0
|
||||
Activate Handle=1
|
||||
Save Log File=1
|
||||
|
||||
Binary file not shown.
@ -46,6 +46,13 @@ inherited fEditorRecibosProveedor: TfEditorRecibosProveedor
|
||||
inherited tbxMenu: TTBXToolbar
|
||||
ExplicitWidth = 638
|
||||
end
|
||||
inherited TBXTMain2: TTBXToolbar
|
||||
Visible = True
|
||||
ExplicitWidth = 66
|
||||
object TBXItem38: TTBXItem
|
||||
Action = actInformes
|
||||
end
|
||||
end
|
||||
end
|
||||
inherited StatusBar: TJvStatusBar
|
||||
Top = 645
|
||||
@ -215,6 +222,11 @@ inherited fEditorRecibosProveedor: TfEditorRecibosProveedor
|
||||
Enabled = False
|
||||
Visible = False
|
||||
end
|
||||
object actInformes: TAction
|
||||
Category = 'Acciones'
|
||||
Caption = 'Informes'
|
||||
OnExecute = actInformesExecute
|
||||
end
|
||||
end
|
||||
inherited SmallImages: TPngImageList [5]
|
||||
PngImages = <
|
||||
@ -1556,4 +1568,315 @@ inherited fEditorRecibosProveedor: TfEditorRecibosProveedor
|
||||
end
|
||||
inherited StatusBarImages: TPngImageList [10]
|
||||
end
|
||||
object JSInformesDialog: TJSDialog
|
||||
Content.Strings = (
|
||||
'Seleccione el informe que desea realizar')
|
||||
DialogOptions = [doCommandLinks, doModal]
|
||||
Glyph.Data = {
|
||||
0A54504E474F626A65637489504E470D0A1A0A0000000D494844520000001C00
|
||||
00001C0806000000720DDF940000000970485973000017120000171201679FD2
|
||||
520000000467414D410000B18E7CFB5193000003104944415478DAAD96FB4B14
|
||||
5114C7CFE463DC1E606444BFF54424D3DC55CA52B1CCD7165A219905054182FD
|
||||
1452FD5810FD100406610A669A998FC4F5BDB6266265DAB60F5DD15E58FE03B2
|
||||
3F99D29ABBA7B9779C71C61D9D6177CFCE70CFDCB97B3EF7DCF3BD33C38082FD
|
||||
B502B2B300CC656020048688A24F036233A0671F40D43160BA87BF62AEEE1010
|
||||
60D7AE293AD8B835815E9B625C80DC8F1E88D4A7C1E8C1FB8F9FD6C3C44035B3
|
||||
21500A65F6D700FE2EA580A5EC551F4A50359316B31D76EFDC0EE5F72A645045
|
||||
A067AE0623074B8140891108F1057064CC0D556053DF173812B707E6DCF332A8
|
||||
225080D201DB4AF99BF335B4D502F371415BCC364833C4C29F458F0C2A031281
|
||||
081734AB0B3C88403C1E6E3E2E7960F6A8FFD27A7D3EF07A11DA2C76C84A8D87
|
||||
A57FCB32E8B8A54A4C8C21B59365C9015996EF2240B6634DF435B51460A46D1F
|
||||
70C093AA46BF09C980C12CA914E6F371ADD707EF1DB3B0B0B8006EB79B8EA96B
|
||||
EA5106121851245129118FD8BFA2DC5C53C6BAF5EBBBBA97C2D64EC064195B1F
|
||||
286C76E956A0EA5C51AEB4764A9929F5750D5A9581D2274B9B651C0BA2F514A8
|
||||
6F28E36B70AD9A4253EF97A9AA55B0CEBA87D03B645B3F43C1DE589C58186D10
|
||||
81150FCAC57B11E161B04517099BB953C78643141B01BA28EEE4DAB0B04DE2B8
|
||||
CA460B9C399902E661BB3AB0F5AD038BF30CD4D7E7DD14815A61023027DD00EF
|
||||
469C1A80FD1C307F1578FD4A81E665945AD68924181A9D5007B6F4DBF1527E32
|
||||
F5C9D3632351F8F549AEE916B14EAA039BCD362C31A6040D23E7887D4A03B0CF
|
||||
86C5C6641A24BB7646D3F2D51A77F8C1BCDCFFC79CD3EAC0D7BD56AE86294165
|
||||
4660CB5C6B737DD3062CCA31D00069E76E05241862CF1EDD05E7D40F756063CF
|
||||
673C7F5A4F679A59541EF03E4C8C3B0893DF67D481AFBAC7B0F05412CD30EBE2
|
||||
ED80F7617CEC0198FEF94B1BF06C6622AD4B4EC99D80F7A1666043D7281A3312
|
||||
FD84C20B8417C3AA789405239826E0CBCE4F98979E10344C33B0BE630473D312
|
||||
82866906D6993E62F6F1C3F45D160A5305BE68FF8095CF5B4302134CFE1185EA
|
||||
1FB8A1B4FF4FE32FF6FADB8B5E0000000049454E44AE426082}
|
||||
Instruction.Text = 'Nuevo informe'
|
||||
Instruction.Glyph.Data = {
|
||||
0A54504E474F626A65637489504E470D0A1A0A0000000D494844520000001C00
|
||||
00001C0806000000720DDF940000000970485973000017120000171201679FD2
|
||||
520000000467414D410000B18E7CFB5193000003104944415478DAAD96FB4B14
|
||||
5114C7CFE463DC1E606444BFF54424D3DC55CA52B1CCD7165A219905054182FD
|
||||
1452FD5810FD100406610A669A998FC4F5BDB6266265DAB60F5DD15E58FE03B2
|
||||
3F99D29ABBA7B9779C71C61D9D6177CFCE70CFDCB97B3EF7DCF3BD33C38082FD
|
||||
B502B2B300CC656020048688A24F036233A0671F40D43160BA87BF62AEEE1010
|
||||
60D7AE293AD8B835815E9B625C80DC8F1E88D4A7C1E8C1FB8F9FD6C3C44035B3
|
||||
21500A65F6D700FE2EA580A5EC551F4A50359316B31D76EFDC0EE5F72A645045
|
||||
A067AE0623074B8140891108F1057064CC0D556053DF173812B707E6DCF332A8
|
||||
225080D201DB4AF99BF335B4D502F371415BCC364833C4C29F458F0C2A031281
|
||||
081734AB0B3C88403C1E6E3E2E7960F6A8FFD27A7D3EF07A11DA2C76C84A8D87
|
||||
A57FCB32E8B8A54A4C8C21B59365C9015996EF2240B6634DF435B51460A46D1F
|
||||
70C093AA46BF09C980C12CA914E6F371ADD707EF1DB3B0B0B8006EB79B8EA96B
|
||||
EA5106121851245129118FD8BFA2DC5C53C6BAF5EBBBBA97C2D64EC064195B1F
|
||||
286C76E956A0EA5C51AEB4764A9929F5750D5A9581D2274B9B651C0BA2F514A8
|
||||
6F28E36B70AD9A4253EF97A9AA55B0CEBA87D03B645B3F43C1DE589C58186D10
|
||||
81150FCAC57B11E161B04517099BB953C78643141B01BA28EEE4DAB0B04DE2B8
|
||||
CA460B9C399902E661BB3AB0F5AD038BF30CD4D7E7DD14815A61023027DD00EF
|
||||
469C1A80FD1C307F1578FD4A81E665945AD68924181A9D5007B6F4DBF1527E32
|
||||
F5C9D3632351F8F549AEE916B14EAA039BCD362C31A6040D23E7887D4A03B0CF
|
||||
86C5C6641A24BB7646D3F2D51A77F8C1BCDCFFC79CD3EAC0D7BD56AE86294165
|
||||
4660CB5C6B737DD3062CCA31D00069E76E05241862CF1EDD05E7D40F756063CF
|
||||
673C7F5A4F679A59541EF03E4C8C3B0893DF67D481AFBAC7B0F05412CD30EBE2
|
||||
ED80F7617CEC0198FEF94B1BF06C6622AD4B4EC99D80F7A1666043D7281A3312
|
||||
FD84C20B8417C3AA789405239826E0CBCE4F98979E10344C33B0BE630473D312
|
||||
82866906D6993E62F6F1C3F45D160A5305BE68FF8095CF5B4302134CFE1185EA
|
||||
1FB8A1B4FF4FE32FF6FADB8B5E0000000049454E44AE426082}
|
||||
Instruction.Icon = tdiCustom
|
||||
CustomButtons = <
|
||||
item
|
||||
Caption = 'Listado de recibos pendientes.'
|
||||
Value = 100
|
||||
Default = True
|
||||
end
|
||||
item
|
||||
Caption = 'Listado de recibos'
|
||||
Value = 200
|
||||
end>
|
||||
ButtonBar.Buttons = [cbCancel]
|
||||
MainIcon = tdiCustom
|
||||
Title = 'FactuGES'
|
||||
Position = dpMainFormCenter
|
||||
Icon.Data = {
|
||||
0000010003002020100001000400E8020000360000002020000001000800A808
|
||||
00001E0300002020000001002000A8100000C60B000028000000200000004000
|
||||
0000010004000000000000020000000000000000000000000000000000000000
|
||||
000000008000008000000080800080000000800080008080000080808000C0C0
|
||||
C0000000FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF000000
|
||||
0000000000000000000000000000000008777777777777777777777700000000
|
||||
0877767777677776777767760000000008F88888888888888888888700000000
|
||||
08F8FF8F8F888888888888860000000008FF8F8F88F8F8888888888C00000000
|
||||
08F88888F8888888888888860000000008F8688878E8888E88E8788700000000
|
||||
08F8688888F8F8FFFFFF88760000000008FF4888888F8FFFFFFF788700000000
|
||||
08F8676767677677677658E50000000008FF8888888887878787888700000000
|
||||
08FF8887887E8888888888860000000008FFE8E8E788C8E8FF8F8F8600000000
|
||||
08FFF8F8F8F8FF8F88F8F8870000000008FFFFFF8FF8F8F8F88F888600000000
|
||||
0FF8477878787878788788860000000008FF68888888F8FF8F8F788700000000
|
||||
08B7588888FF8FFFFFFF78860000083008BB47887776777777776F86000000B7
|
||||
8B9B73BB88788787E87878870000008BB8B9BB78888888EFF8F8FF8600000087
|
||||
B8BB8B888E8E8E88FFF8F886000000088BBB888FFFFFFFFFF8F877770000B9BB
|
||||
B8FFBB9B9BFFFFFFF87466460000BBB9BB8FBBBBB8FFFFFFF88F888700000008
|
||||
B8BB88888FFFFFFFF88F8F7700000008BBBBBB8FFFFFFFFFFF8887700000007B
|
||||
B7B98BB8FFFFFFFFF8887700000000B78B9B87B888F88F88F8877000000007B0
|
||||
08BB883B78888788787700000000000000B9000000000000000000000000FFFF
|
||||
FFFFF800000FF800000FF800000FF800000FF800000FF800000FF800000FF800
|
||||
000FF800000FF800000FF800000FF800000FF800000FF800000FF800000FF800
|
||||
000FF800000FF800000F9800000FC000000FC000000FC000000FE000000F0000
|
||||
000F0000000FE000000FE000001FC000003FC000007F980000FFFCFFFFFF2800
|
||||
0000200000004000000001000800000000000004000000000000000000000001
|
||||
00000001000000000000694731007C5D49007E604C0081635000826451008567
|
||||
540085685500886B5900896D5B008A6E5D008B705F008E715F008B7260008C72
|
||||
61008E74640084766C00957A6900977D6D00887B72009A8171009D8272009C84
|
||||
76009D8778009F897B00A28A7900A08B7D00A18C7E00E1B06E00E1B67D003E7A
|
||||
970073A0A5007AA2B70074AFBD007BB2BB003CAACE0028A5DB0020ADDF000D9A
|
||||
E500209EE3000DA6E2001AA4EF0000A6FF000CABFE0009ACFE0010A4F10015AC
|
||||
FA0000B5FB0000B0FD000CB6FC0000BFF90000BAFD0004BAFD0009BBFB0013B6
|
||||
F40015BFFA001CBDFB0026B7FD00589EC50040A4CD0040ABCC0050A2C7005DAE
|
||||
C00060A3C20062A4C60060B7CB006AB0CD007BB6C80077BAC80061BADD0044AD
|
||||
E50000C3F80007C6FB0000CAF80000CFFB0000D4F90026C8FA0026CDF8002BCC
|
||||
F90039C4FB0039C2FC0039CAFA003FCFFB0024D6F80030D2F80039D5F80000F8
|
||||
F8001FF8F8002CF6F8003EF4F8005AC6DC0070CDDF0052C0E40054C9E3004DCE
|
||||
FA005FC7FF004FD2FB004DD9F8005FD9FB006ED3E70063CDFE0060D1FB0060D8
|
||||
F90060DDF80046F8F90056F0F8005FFAFA0073E3F80073E4F90073EEF80060F1
|
||||
F800958A84009A918C0081999500A68F8200AD968500A3968C00AE988900AD9A
|
||||
8D00B19A8B00AF9C9000B09E9200B59F9200B7A29300B2A19600B5A19400B7A4
|
||||
9700BDA79700B4A39800B1A59D00B4A79F00BAA69800BCA79900B4A89F00BCA8
|
||||
9900BAA89C00BDAA9D00BEAC9E0083ADBD00B5A9A100BDABA000BEADA100BFAF
|
||||
A500A0BABE00C0AB9E00C1AC9E00C6AE9F00E2B98100E4BA8300E4BB8400E5BC
|
||||
8500E1BD8E00E3BF9000C0ADA000C2B0A300C2B1A500C4B2A600C1B2A800C3B5
|
||||
AB00C8B4A800CCB9AD00CEBCB100D0BEB200D1BFB400E4C19300E5C29400E6C4
|
||||
9600E8C69900D0C9A300CFC1B800D2C1B600D3C3B800D5C4B900D6C6BC00D8C6
|
||||
BC00D6C8BE00DAC9BF00ECD3B000EDD4B200EFD6B500E7D1B800E7D3BD00F0D8
|
||||
B6008CB7C40080BEC70097C3C70099C3C900ABD7CF00AFD9DD0086E3F90086E7
|
||||
F90086ECF8009EE5FB0090E8F900ACEDFC00BCEAFD00BCF1FB00BFF1FD00D7C9
|
||||
C000D9CAC100DCCBC200DACCC200DDCCC300DACCC400DDCEC400DED0C600DED1
|
||||
C900DED3CC00DFD4CD00E1D1C900E2D5CD00F0DCC200E3D8D200E5D9D200E2DA
|
||||
D500E6DBD400E5DCD500E8DDD600E6DDD800E9DFD900E6E0DB00EAE0DA00EAE2
|
||||
DD00ECE3DE00EBE4DE00ECE4DE00F3E7D900C6E1EF00C9EFFD00D7F6FD00DFF3
|
||||
FF00DFFEFE00EBE7E300EDE6E100EFE7E400EEE8E400F0EAE600F2EDE900F2EE
|
||||
EC00F4EFEC00F5F0EE00F9F4ED00E7FAFD00EBF8FF00F6F2F000F7F4F100F8F4
|
||||
F200F9F7F500FAF8F600FBF9F900FCFBFA00FCFCFB00FEFEFE00000000000000
|
||||
0000000000000000000000000000000000000000000000000000000000000000
|
||||
00000000000000000000007D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D
|
||||
0D0D0000000000000000009C9C19191919191919191919191919191919191919
|
||||
1903000000000000000000ABDECBCBC7C7AFABABABABAAA3A2A2A0A0A0A0A0A0
|
||||
8607000000000000000000ABECEAE9DEDEDEDED7D5D2D2D2CBCBCBCBB0CBB0CB
|
||||
9007000000000000000000ABEDECEAE9DEDEDBD7D7D5D2D2D2CDCDCBB0B0B0B0
|
||||
9007000000000000000000AFEDE9A9CFD2CFD2CDCBCBCBB0B0ABACA3A3A3A3B0
|
||||
9007000000000000000000AFF0D5017783838386868686869099909999907BB0
|
||||
9007000000000000000000B0F4D501A0B0CBD2D5DEECEDF7FAFAFAFAFAF77BAA
|
||||
9007000000000000000000CBF4DC01A0B0B0B0D2D5DBEAEDF7FAFAFAFAF47BB0
|
||||
9007000000000000000000CBF8DC010404070604090909090D0D110D110D02A3
|
||||
9007000000000000000000CBFAED9E9E9E9C999E8C8C8C868683837E7D7D7ACB
|
||||
9007000000000000000000CBFAF1A7A7A6A6A6A69898989898B5DBDBD5D5D2D2
|
||||
9907000000000000000000CDFAF796969696961D961D931D1DB4DEDBD7D5D5D2
|
||||
9C07000000000000000000CFFAFAFAFAF8F7F0F0EDEDEDECE9E9DEDEDED7D5D5
|
||||
9907000000000000000000CDFAFAEAF0EDEDECEAEAE9DEDEDBDCD5D5D5D5D2D5
|
||||
9C07000000000000000000D2FAEC01737D7D7B7D7D7B7D7B7D7B7B7B7D7B7DD2
|
||||
9907000000000000000000CFFAEC019EABB0CBD2D5DCDEECEDF4F4F4F4EA7BD2
|
||||
9C07000000000000000000B9524601A0B0B0CBB5D5DEEAEDF7FAFAFAFAF47DD5
|
||||
9C070000000000213F0000B83226010C3F5C1F111214141616191B1B1B1807D2
|
||||
9C07000000000000253D8A5B322D711E2860BA7E7E7A7E797A797979767676D5
|
||||
9E0700000000000041375E662F2B65314EBBB6B6B6B6B4B4B1E2F4EDEDEDECEA
|
||||
9C070000000000008F5D66663232394EC1A81C1C1C1C1C1C1CD3F7F4EDDED7D5
|
||||
9C0700000000000000B7BE6E5758BEBDE4E6E6F3FAFAFAFAFAFAF7F4D5928675
|
||||
7304000000002A2A2A2A4A6AFAE7562F2A2A2A5FFAFAFAFAFAFAF8D577010101
|
||||
0101000000004747472F4A59C5E7564A32474766FAFAFAFAFAFAFADCA0D2CFB0
|
||||
A20C00000000000000436C6958686D6BC2C5C5E7FAFAFAFAFAFAFADEAADEDBCB
|
||||
1470000000000000004551534A4A5250C0E7FAFAFAFAFAFAFAFAFADEAAD7B514
|
||||
700000000000000042384C54472B613550C3FAFAFAFAFAFAFAFAFADEA1B0196F
|
||||
000000000000000024234463322EBC5A3664E3ECE9E9E9E9E9E9E9CF90731300
|
||||
000000000000003A3C00002232298B8B3E3B207E8B7E8B7E827E817E74100000
|
||||
0000000000000000000000003227000000000000000000000000000000000000
|
||||
000000000000FFFFFFFFF800000FF800000FF800000FF800000FF800000FF800
|
||||
000FF800000FF800000FF800000FF800000FF800000FF800000FF800000FF800
|
||||
000FF800000FF800000FF800000FF800000F9800000FC000000FC000000FC000
|
||||
000FE000000F0000000F0000000FE000000FE000001FC000003FC000007F9800
|
||||
00FFFCFFFFFF2800000020000000400000000100200000000000801000000000
|
||||
0000000000000000000000000000000000000000000000000000000000000000
|
||||
0000000000000000000000000000000000000000000000000000000000000000
|
||||
0000000000000000000000000000000000000000000000000000000000000000
|
||||
0000000000000000000000000000000000000000000000000000000000000000
|
||||
0000000000000000000000000000000000000000000000000000000000007067
|
||||
5F70AA9382E570513CE3735540E3735540E3735540E3735540E3735540E37355
|
||||
40E3735540E3735540E3735540E3735540E3735540E3735540E3735540E37355
|
||||
40E3735540E3735540E3735540E3735540E3735540E3735540E372533EE5BAAB
|
||||
A070000000000000000000000000000000000000000000000000000000005E54
|
||||
4C7FCAB7ABFFC5B5AAFFA18877FFA28A78FFA28A79FFA28A79FFA28A79FFA28A
|
||||
79FFA28A79FFA28A79FFA28A79FFA28A79FFA28A79FFA28A79FFA28A79FFA28A
|
||||
79FFA28A79FFA28A79FFA28A79FFA28A79FFA28A79FFA58D7CFF7A5B46FFB2A1
|
||||
967F000000000000000000000000000000000000000000000000000000006055
|
||||
4D7ED7C6BBFFEDE4E0FFD9CCC4FFD9CCC4FFD9CBC3FFD8CAC1FFD7C9BFFFD6C7
|
||||
BDFFD5C6BBFFD4C4BAFFD3C3B8FFD2C1B7FFD1C0B5FFD0BEB3FFCFBDB2FFCEBC
|
||||
B0FFCEBBAFFFCEBBAFFFCEBBAFFFCEBBAFFFCEBCB0FFBEAA9CFF82644FFFB2A1
|
||||
967E000000000000000000000000000000000000000000000000000000006056
|
||||
4D7ED7C8BCFFF2EBE8FFEFE9E5FFEEE7E2FFECE5E0FFEBE2DEFFEAE0DBFFE9DE
|
||||
D8FFE7DBD4FFE5D9D1FFE3D7CFFFE2D4CCFFE1D2C9FFDFD0C7FFDDCDC4FFDCCB
|
||||
C2FFDBC9BFFFDBC9BFFFDBC9BFFFDBC9BFFFDCCAC1FFC1AC9FFF81634FFFB2A1
|
||||
967E000000000000000000000000000000000000000000000000000000006155
|
||||
4E7ED8C9BDFFF3EDE9FFF1EAE6FFF0E9E6FFEEE6E1FFECE4DFFFEBE2DDFFEAE0
|
||||
DAFFE9DED7FFE7DBD4FFE5D9D1FFE3D7CFFFE2D4CCFFE1D2C9FFDFD0C7FFDDCD
|
||||
C4FFDCCBC2FFDBC9BFFFDBC9BFFFDBC9BFFFDCCAC0FFC1AC9FFF81634FFFB2A1
|
||||
967E000000000000000000000000000000000000000000000000000000006157
|
||||
4E7ED9C9BFFFF4EFEDFFEFE8E3FFD0C2B9FFDFD5CEFFE0D5CEFFE0D4CCFFDED3
|
||||
CBFFDDD1C8FFDCCFC6FFDACCC4FFD9CBC1FFD8C9BFFFD7C7BDFFD6C5BBFFD5C4
|
||||
B9FFD3C2B7FFD2C0B5FFD2BFB4FFD2BFB4FFDAC8BEFFC1AC9FFF81634FFFB2A1
|
||||
967E000000000000000000000000000000000000000000000000000000006256
|
||||
4F7EDACCC0FFF5F2EFFFE5DDD9FF5C3821FFB0998AFFB8A394FFB8A394FFB9A3
|
||||
94FFB8A495FFB9A597FFB9A698FFBAA698FFBBA799FFBBA89AFFBBA89BFFBCA8
|
||||
9BFFBCA89BFFBCA89BFFBBA89AFFB49E8FFFD8C6BBFFC1AC9FFF81634FFFB2A1
|
||||
967E000000000000000000000000000000000000000000000000000000006256
|
||||
4F7EDBCBC1FFF8F4F3FFE7E0DBFF5F3C24FFD0BDB2FFDCCBC1FFDDCCC3FFE2D2
|
||||
CBFFE7DBD4FFEDE2DEFFF0E8E6FFF5F0EDFFF9F7F4FFFDFDFDFFFFFFFFFFFFFF
|
||||
FFFFFFFFFFFFFFFFFFFFFAF8F7FFB39D8DFFD8C6BBFFC1AC9FFF81634FFFB2A1
|
||||
967E000000000000000000000000000000000000000000000000000000006256
|
||||
4F7EDCCEC3FFFAF6F5FFE9E2DDFF5F3C24FFD2BFB5FFDFCDC4FFDECCC3FFE0CE
|
||||
C6FFE4D4CDFFE9DDD6FFEFE4E0FFF1EAE8FFF7F1EFFFFBF8F6FFFFFEFFFFFFFF
|
||||
FFFFFFFFFFFFFFFFFFFFFCFBFAFFB5A090FFD9C7BEFFC1AD9FFF81634FFFB2A1
|
||||
967E000000000000000000000000000000000000000000000000000000006257
|
||||
4F7EDDCFC4FFFCF9F9FFE9E4E0FF5F3A23FF7C5D49FF7F5F4CFF7E5F4CFF7E60
|
||||
4DFF7F614DFF816350FF826552FF836654FF846856FF856A57FF866B59FF876C
|
||||
5BFF876D5BFF876D5BFF866B59FF72523DFFD5C3B9FFC1AFA1FF81634FFFB2A1
|
||||
967E000000000000000000000000000000000000000000000000000000006357
|
||||
507EDECFC6FFFCFCFBFFF4F1F0FFC3B6AEFFC3B5ADFFC1B4ACFFC0B3AAFFBFB1
|
||||
A9FFBEB0A6FFBDAEA5FFBDACA3FFBCABA2FFBBAAA0FFBAA99FFFB8A69AFFB8A4
|
||||
98FFB6A396FFB5A194FFB49F93FFB39D90FFDCCDC4FFC2AEA1FF81634FFFB2A1
|
||||
967E000000000000000000000000000000000000000000000000000000006357
|
||||
507EDFD2C7FFFEFEFDFFF9F5EFFFE8C696FFE9C799FFE8C697FFE7C596FFE7C4
|
||||
95FFE6C394FFE5C293FFE4C091FFE4C090FFE3BF8FFFE2BD8CFFE9D5BFFFEBE1
|
||||
DCFFEADFD8FFE7DCD5FFE5DAD3FFE4D8D0FFE3D4CCFFC2AFA2FF81634FFFB2A1
|
||||
967E000000000000000000000000000000000000000000000000000000006458
|
||||
517EE0D3C8FFFFFFFFFFFAF5EFFFE3B77CFFE4B97FFFE2B87EFFE3B77DFFE2B7
|
||||
7CFFE2B67BFFE1B57AFFE1B479FFE0B478FFE0B377FFDFB174FFE6D0B7FFEBE1
|
||||
DCFFE8DFD9FFE8DDD6FFE6D9D2FFE3D8D1FFE4D7CFFFC3AFA2FF81634FFFB2A1
|
||||
967E000000000000000000000000000000000000000000000000000000006458
|
||||
517EE1D2C9FFFFFFFFFFFEFEFDFFFEFFFFFFFCFDFEFFFBFBFBFFF9F7F8FFF8F5
|
||||
F6FFF7F3F2FFF5F1F0FFF4EFEEFFF1EDEBFFF0EBE9FFEEE9E6FFEDE6E2FFECE3
|
||||
DEFFEBE1DBFFE9DFD9FFE8DDD6FFE6DAD3FFE5D9D2FFC3B0A3FF81634FFFB2A1
|
||||
967E000000000000000000000000000000000000000000000000000000006459
|
||||
517EE1D4CAFFFFFFFFFFFDFDFCFFEEEBE8FFF5F2F0FFF4F0EFFFF3EFECFFF2ED
|
||||
EAFFF1EBE8FFEEE9E5FFEFE7E3FFECE5E1FFEAE4DEFFEAE1DCFFE8E0DAFFE7DE
|
||||
D8FFE6DDD6FFE5DBD4FFE4D8D1FFE2D6CEFFE6DBD4FFC3B1A4FF81634EFFB2A1
|
||||
967E000000000000000000000000000000000000000000000000000000006559
|
||||
527EE2D4CAFFFFFFFFFFF0ECEAFF5B361EFFAB9383FFB39D8EFFB39D8DFFB39D
|
||||
8DFFB29D8DFFB29C8DFFB29C8CFFB29C8CFFB29C8CFFB29C8CFFB29C8CFFB29C
|
||||
8CFFB29C8CFFB29C8CFFB29C8DFFB39D8EFFE3D8D0FFC4B1A4FF81634EFFB2A1
|
||||
967E000000000000000000000000000000000000000000000000000000006559
|
||||
527EE5D4CAFFFFFFFFFFF7F0EBFF5F3B24FFCCB8ADFFD7C5BAFFD9C7BDFFDCCC
|
||||
C3FFE1D4CCFFE5DAD4FFE8E0DBFFEDE5E1FFF1EBE9FFF5F2EFFFF7F5F3FFF8F6
|
||||
F4FFF8F5F4FFF8F6F4FFF1EEEAFFB29C8DFFE6DAD3FFC4B2A5FF81634EFFB2A1
|
||||
967E00000000000000000000000000000000000000000000000000000000685A
|
||||
527E9AC6C9FF35CFFEFF3DAEEBFF663E24FFD2BFB4FFE0CBBFFFE0C9BDFFE1CD
|
||||
C4FFE4D5CDFFE9DED7FFEEE5E0FFF2EBE8FFF6F2F0FFFCF8F8FFFFFFFEFFFFFF
|
||||
FFFFFFFFFFFFFFFFFFFFFCFAF9FFB49E8FFFE7DED7FFC5B3A6FF81634EFFB2A1
|
||||
967E00000000000000000000000000000000007792910072A7A3001E33366957
|
||||
4C7C86C1C8FF00BFFBFF079AEBFF6A3E23FF926D57FF5FA3C8FF4AC1E8FF6C9C
|
||||
A2FF917260FF927767FF947A69FF957C6CFF977E6FFF998171FF9A8374FF9B85
|
||||
76FF9C8678FF9C8678FF998274FF7D5E49FFE3D9D4FFC5B3A7FF81634EFFB2A1
|
||||
967E00000000000000000000000000000000005A6F7000A9E5E40075AEAE5C90
|
||||
A5BD75D0E0FF00BFFAFF0CA3F4FF8A9A91FF3C7492FF03A4E4FF4AD5FFFF98C4
|
||||
CBFFB3A196FFB1A197FFB0A096FFB09F95FFAF9D92FFAF9C91FFAD9A8EFFAC99
|
||||
8CFFAB988AFFAB9789FFAA9688FFA99386FFE8E0DAFFC5B4A7FF81634EFFB2A1
|
||||
967E00000000000000000000000000000000000000002DA5BFC110C2FFFF4DD0
|
||||
FDFF64DBF9FF00B3FAFF09A8FEFF68D7FFFF04B5FFFF24CCFBFFAFD8CEFFF7DA
|
||||
B8FFF3DBBBFFF3DBBAFFF2D9B9FFF1D8B7FFF0D7B4FFEED5B2FFF6EADDFFF9F6
|
||||
F4FFF7F3F1FFF5F1EEFFF5EFECFFF4EDEAFFF1EBE7FFC6B4A8FF81634EFFB2A1
|
||||
967E00000000000000000000000000000000000000005F8A909142C7E4E960DE
|
||||
F8FF64D7FAFF00B6FDFF00B8FDFF21B2FDFF1ECCF7FF93EBFCFFD2C69BFFE1AB
|
||||
63FFDFAC66FFDFAC66FFDFAC66FFDFAC66FFDFAC66FFDEA961FFEFDBC0FFF8F6
|
||||
F5FFF6F2F0FFF3EDEBFFECE2DCFFE9DFD9FFE5DBD6FFC2B1A4FF81634FFFB2A1
|
||||
967E000000000000000000000000000E171A000E171A00040B145994A4A990EB
|
||||
FCFF61F1F7FF13FAF7FF23F9F7FF93EDF7FF8CE5F8FFD5F2FDFFE9F8FFFFE7F8
|
||||
FFFFF0FCFFFFFFFFFFFFFFFFFFFFFFFFFFFFFEFFFFFFFDFEFFFFFAFAF9FFF9F7
|
||||
F5FFF7F2F0FFE8DFD8FFC7AE9FFFBEA998FFAF9888FFB09A8AFF7F604DFFB2A1
|
||||
967E00000000000000000000000000AAFFFF00AAFFFF00AAFFFF00A4FFFF00CD
|
||||
FAFF5DFCF9FFFFFFFFFFEEFEFEFF00FBF7FF00AAFEFF00A1FFFF00A1FFFF00A0
|
||||
FFFF56C3FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFCFDFBFFFCFBFAFFFBFA
|
||||
F8FFE6DDD6FFAA9180FF5D3922FF603D26FF613E27FF613E28FF634029FFB4A3
|
||||
987E00000000000000000000000000CAFFFF00CAFFFF00CBFFFF00B0FFFF00CD
|
||||
FBFF38F5F7FFC3EFFAFFF0FFFEFF00FAF7FF00C8F7FF00C2F7FF00C2F7FF00C1
|
||||
F7FF57D7FAFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFEFEFEFFFDFDFCFFFCFC
|
||||
FBFFE7DED8FFCCB9ACFFE6DBD5FFE2D7D0FFDCCFC5FFD7C5BBFF8E705DFFB4A2
|
||||
9680000000000000000000000000002E383C002E383C00252F364C99B0B57DE8
|
||||
FBFF59F1F7FF25F7F7FF41FAF8FF7CEEF7FF77E4F7FFB5EFFCFFC6F2FDFFC3F2
|
||||
FDFFD9F6FCFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFDFEFEFFFEFE
|
||||
FEFFE9E1DAFFCEBCAFFFF1E9E3FFEADFD8FFE4D5CCFF9D816FFF3A291F868985
|
||||
831C00000000000000000000000000000000000000004E7073774AB0DADC37C9
|
||||
FBFF22D5F7FF00D3F9FF02C3FBFF37D5F7FF34BEFCFFA2E6FAFFECFBFDFFFFFF
|
||||
FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFEFF
|
||||
FFFFEAE2DCFFCDBBADFFEADFD8FFE3D5CBFF9F8271FF3E2D2386050100200000
|
||||
000000000000000000000000000000000000000000003E9CC4C219C0FFFF23C9
|
||||
FCFF30D3F8FF00BEF8FF06A8FEFF4FDCF8FF00B8FCFF32C2FBFFC0EBFCFFFFFF
|
||||
FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
|
||||
FFFFEAE3DEFFCDB9ABFFDDCEC4FFA58979FF3E2C1F8F0905041B000000000000
|
||||
000000000000000000000000000000000000003451510099DDDB0091C0C35DAD
|
||||
BCCF76D7E9FF00BEF9FF10A9FBFFBDDEDEFF5AC8DDFF0AB5F7FF62CEFFFFCBE4
|
||||
F1FFF1E7E0FFEFE7E1FFEEE6E1FFEEE6E1FFEEE6E0FFEDE6E0FFEDE5E0FFEEE6
|
||||
E1FFE1D4CCFFC5AE9FFFA68D7FF53E2718A10402000E00000000000000000000
|
||||
0000000000000000000000000000000000000075B7AF0099C7C500323E425442
|
||||
3B5C6BA8B1DA00C1FCFF0EA1F3F8A98E80C0AB9081C12698B1C10088C4C14C85
|
||||
A3C1A18D80C19E8D81C19E8B81C19D8C80C19B8C7FC19B8A7FC19C897FC19A89
|
||||
7EC19B8B7EC1897769C2432B1BAC000000000000000000000000000000000000
|
||||
0000000000000000000000000000000000000000000000000000000000000000
|
||||
00000045565A00C5FFFF0094E6E2000000000000000000000000000000000000
|
||||
0000000000000000000000000000000000000000000000000000000000000000
|
||||
0000000000000000000000000000000000000000000000000000000000000000
|
||||
0000000000000000000000000000FFFFFFFFF0000007F0000007F0000007F000
|
||||
0007F0000007F0000007F0000007F0000007F0000007F0000007F0000007F000
|
||||
0007F0000007F0000007F0000007F0000007F0000007F0000007800000078000
|
||||
0007C0000007C000000700000007000000070000000700000007C000000FC000
|
||||
001F8000003F800000FFF8FFFFFF}
|
||||
Width = 450
|
||||
Left = 408
|
||||
Top = 80
|
||||
end
|
||||
end
|
||||
|
||||
@ -36,13 +36,17 @@ uses
|
||||
uEditorGridBase, uCustomView,
|
||||
|
||||
uBizRecibosProveedor, uIEditorRecibosProveedor, uRecibosProveedorController,
|
||||
uViewRecibosProveedor, uDAInterfaces;
|
||||
uViewRecibosProveedor, uDAInterfaces, JSDialog;
|
||||
|
||||
type
|
||||
|
||||
TfEditorRecibosProveedor = class(TfEditorGridBase, IEditorRecibosProveedor)
|
||||
frViewRecibosProveedor1: TfrViewRecibosProveedor;
|
||||
JSInformesDialog: TJSDialog;
|
||||
actInformes: TAction;
|
||||
TBXItem38: TTBXItem;
|
||||
procedure FormShow(Sender: TObject);
|
||||
procedure actInformesExecute(Sender: TObject);
|
||||
private
|
||||
FRecibosProveedor: IBizRecibosProveedor;
|
||||
FController : IRecibosProveedorController;
|
||||
@ -71,13 +75,41 @@ type
|
||||
implementation
|
||||
|
||||
uses
|
||||
uDataModuleRecibosProveedor, uFactuGES_App, uDataModuleUsuarios;
|
||||
uDataModuleRecibosProveedor, uFactuGES_App, uDataModuleUsuarios, uGestorInformesController;
|
||||
|
||||
{$R *.dfm}
|
||||
|
||||
{
|
||||
*************************** TfEditorRecibosProveedor ***************************
|
||||
}
|
||||
procedure TfEditorRecibosProveedor.actInformesExecute(Sender: TObject);
|
||||
var
|
||||
Respuesta : Integer;
|
||||
AGestorInformesController : IGestorInformesController;
|
||||
|
||||
begin
|
||||
AGestorInformesController := TGestorInformesController.Create;
|
||||
try
|
||||
|
||||
Respuesta := JsInformesDialog.Execute;
|
||||
|
||||
if Respuesta <> IDCANCEL then
|
||||
begin
|
||||
case JsInformesDialog.CustomButtonResult of
|
||||
100 : begin // Listado de recibos pendientes
|
||||
AGestorInformesController.VerInformeListadoRecibosProvPendientes;
|
||||
end;
|
||||
200 : begin // Listado de recibos de cliente
|
||||
AGestorInformesController.VerInformeListadoRecibosProveedor;
|
||||
end;
|
||||
end;
|
||||
end;
|
||||
|
||||
finally
|
||||
AGestorInformesController := NIL;
|
||||
end;
|
||||
end;
|
||||
|
||||
constructor TfEditorRecibosProveedor.Create(AOwner: TComponent);
|
||||
begin
|
||||
inherited;
|
||||
|
||||
Binary file not shown.
@ -14,7 +14,7 @@ BEGIN
|
||||
BEGIN
|
||||
VALUE "FileVersion", "1.4.0.0\0"
|
||||
VALUE "ProductVersion", "1.4.0.0\0"
|
||||
VALUE "CompileDate", "martes, 21 de octubre de 2008 19:50\0"
|
||||
VALUE "CompileDate", "miércoles, 22 de octubre de 2008 18:09\0"
|
||||
END
|
||||
END
|
||||
BLOCK "VarFileInfo"
|
||||
|
||||
Loading…
Reference in New Issue
Block a user