Uecko/AbetoDesign_FactuGES2
2
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity
cee5e36166
AbetoDesign_FactuGES2/Source/Modulos/Contratos de cliente/Views/uViewDatosYSeleccionContrato.dfm
roberto 1f5e6ebcb9 Version 4.5.4 
Cambio en los informes de Contratos de cliente de todas las entidades: Cambio fecha de entrega por fecha expedicion - Solicitado por Próspero
Cambio logo uecko y sellos cabecera en todos los informes de todas las entidades- Solicitado por Noelia
Arreglo para que permita introducir DNI y CIFs raros - Solicitado por Mónica
Las facturas proforma no se tendrán en cuenta en las facturas asociadas a los contratos, listado de contratos - Solicitado por Eva
Se añade comprobación de capitulos para que avise si existe un subtotal sin capitulo correspondiente, ayudará a controlar errores en presupuestos y contratos largos. - Solicitado por Miriam
En los detalles de presupuestos y contratos si eligen un articulo de la tarífa el programa no deja modificar las descripciones (Se ha detectado que lo hen hecho en ocasiones en las tiendas) - Solicitado por Miriam

git-svn-id: https://192.168.0.254/svn/Proyectos.AbetoDesign_FactuGES/trunk@186 93f398dd-4eb6-7a46-baf6-13f46f578da2
2024-02-05 10:15:29 +00:00

335 lines
16 KiB
Plaintext
Raw Blame History

inherited frViewDatosYSeleccionContrato: TfrViewDatosYSeleccionContrato
Width = 425
Height = 133
ExplicitWidth = 425
ExplicitHeight = 133
object dxLayoutControl1: TdxLayoutControl
Left = 0
Top = 0
Width = 425
Height = 133
Margins.Left = 0
Margins.Top = 0
Margins.Right = 0
Margins.Bottom = 0
Align = alClient
ParentBackground = True
TabOrder = 0
TabStop = False
AutoContentSizes = [acsWidth, acsHeight]
DesignSize = (
425
133)
object Button1: TBitBtn
Left = 10
Top = 10
Width = 125
Height = 25
Action = actElegirContrato
Caption = 'Elegir un contrato'
TabOrder = 0
Glyph.Data = {
36040000424D3604000000000000360000002800000010000000100000000100
2000000000000004000000000000000000000000000000000000FF00FF006468
7300183D60006947310069473100694731006947310069473100694731006947
3100694731006947310069473100694731006947310069473100646873005171
98004D5A9100183D6000B7A29300B7A29300B7A29300B7A29300B7A29300B7A2
9300B7A29300B7A29300B7A29300B7A29300B7A29300694731003C98E40098D8
F8004995E1004D5A9100183D6000EFE8E300EDE4DF00EAE0DA00E7DBD500E4D7
D000E2D3CB00DFCFC600DCCBC100DBC9BF00B7A2930069473100FF00FF003C98
E40098D8F800468EDD004D5A9100183D6000EFE8E3002477F4002477F4002477
F4002477F4002477F4002477F400DCCBC100B7A2930069473100FF00FF00FF00
FF003C98E40098D8F8006394CA009B949A008B6E6B008B6E6B008B6E6B00AA88
8200E7DBD500E4D7D0002477F400DFCFC600B7A2930069473100FF00FF00FF00
FF00B7A293003C98E400AFB0B6008B6E6B00F6E9C400D8B98C00D8B98C00FCF5
DE008B6E6B007070700070707000E2D3CB00B7A2930069473100FF00FF00FF00
FF00B7A29300FF00FF008B6E6B00EFE0C000FFE1AF00FFECCC00FFF2DD00FFFB
F500FDFBF300AA8882002477F400E4D7D000B7A2930069473100FF00FF00FF00
FF00B7A29300707070008B6E6B00D8B98C00FFDBA600D8B98C00D8B98C00D8B9
8C00FFF1D7008B6E6B0070707000E9DED800B7A2930069473100FF00FF00FF00
FF00B7A29300FF00FF008B6E6B00F9EEC900FFE6C200FFDFB300FFE8C600FFEA
C900FFE4B2008B6E6B002477F400EBE2DD00B7A2930069473100FF00FF00FF00
FF00B7A2930070707000AA888200D8B98C00FEFEFB00D8B98C00D8B98C00D8B9
8C00F9EBC200AA88820070707000EEE6E100B7A2930069473100FF00FF00FF00
FF00B7A29300FF00FF002477F4008B6E6B00EBE0CE00FAEFCA00FCEDC300EFE0
BF008B6E6B00F6F2EF002477F400F1EAE600B7A2930069473100FF00FF00FF00
FF00B7A29300FF00FF002477F4002477F400AA8882008B6E6B008B6E6B00AA88
82002477F4002477F4002477F400F3EEEA00B7A2930069473100FF00FF00FF00
FF00B7A29300FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00
FF00FF00FF00FCFAF900F9F6F400F6F2EF00B7A2930069473100FF00FF00FF00
FF00B7A29300FF00FF002477F4002477F4002477F4002477F400FF00FF00FF00
FF002477F4002477F4002477F400FAF8F600B7A2930069473100FF00FF00FF00
FF00B7A29300FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00
FF00FF00FF00FF00FF00FF00FF00FDFCFB00FAF8F60069473100FF00FF00FF00
FF00B7A29300B7A29300B7A29300B7A29300B7A29300B7A29300B7A29300B7A2
9300B7A29300B7A29300B7A29300B7A29300B7A29300B7A29300}
end
object Button2: TBitBtn
Left = 141
Top = 10
Width = 150
Height = 25
Action = actAnadirContrato
Caption = 'Dar de alta un contrato'
TabOrder = 1
Glyph.Data = {
36040000424D3604000000000000360000002800000010000000100000000100
2000000000000004000000000000000000000000000000000000FF00FF00FF00
FF00B7A293006947310069473100694731006947310069473100694731006947
3100694731006947310069473100694731006947310069473100FF00FF00FF00
FF00B7A29300F2ECE800B7A29300B7A29300B7A29300B7A29300B7A29300B7A2
9300B7A29300B7A29300B7A29300B7A29300B7A2930069473100FF00FF00FF00
FF00B7A29300F5F0ED00F2ECE800EFE8E300EDE4DF00EAE0DA00E7DBD500E4D7
D000E2D3CB00DFCFC600DCCBC100DBC9BF00B7A2930069473100FF00FF00FF00
FF00B7A29300F7F4F100F5F0ED00F2ECE800EFE8E3002477F4002477F4002477
F4002477F4002477F4002477F400DCCBC100B7A2930069473100FF00FF00FF00
FF00B7A29300FAF8F600F7F4F100F5F0ED00F2ECE8002477F400EDE4DF00EAE0
DA00E7DBD500E4D7D0002477F400DFCFC600B7A2930069473100FF00FF00FF00
FF00B7A29300FDFCFB002477F4002477F4002477F4002477F400EFE8E3002477
F4002477F400E7DBD5002477F400E2D3CB00B7A2930069473100FF00FF00FF00
FF00B7A29300FF00FF002477F400FCFAF900F9F6F400F6F2EF00F3EEEA00F1EA
E600EDE4DF00EAE0DA002477F400E4D7D000B7A2930069473100FF00FF00FF00
FF00B7A29300FF00FF002477F400FEFEFD002477F4002477F400F6F2EF002477
F4002477F400EEE6E1002477F400E9DED800B7A2930069473100FF00FF00FCFB
FA00B7A29300FF00FF002477F400FF00FF00FEFEFD00FCFAF900F9F6F400F6F2
EF00F3EEEA00F1EAE6002477F400EBE2DD00B7A2930069473100FF00FF00FDFC
FB00006000000060000000600000FF00FF002477F4002477F400FCFAF9002477
F4002477F400F3EEEA002477F400EEE6E100B7A2930069473100FEFDFD00FEF0
E9000060000070DA850000600000FF00FF00FF00FF00FF00FF00FEFEFD00FCFA
F900F9F6F400F6F2EF002477F400F1EAE600B7A2930069473100006000000060
00000060000082E59A000060000000600000006000002477F4002477F4002477
F4002477F4002477F4002477F400F3EEEA00B7A293006947310000600000ABFB
C80084CE910094EFAF0082E59A0079E0900000600000FF00FF00FF00FF00FF00
FF00FF00FF00FCFAF900F9F6F400F6F2EF00B7A2930069473100006000000060
000000600000A4F8C1000060000000600000006000002477F400FF00FF00FF00
FF002477F4002477F4002477F400FAF8F600B7A2930069473100F3ECE800F3EC
E80000600000ABFBC80000600000FF00FF00FF00FF00FF00FF00FF00FF00FF00
FF00FF00FF00FF00FF00FF00FF00FDFCFB00FAF8F60069473100FF00FF00FF00
FF00006000000060000000600000B7A29300B7A29300B7A29300B7A29300B7A2
9300B7A29300B7A29300B7A29300B7A29300B7A29300B7A29300}
end
object Button3: TBitBtn
Left = 223
Top = 95
Width = 192
Height = 25
Action = actVerContrato
Caption = 'Ver ficha contrato...'
TabOrder = 4
Glyph.Data = {
36040000424D3604000000000000360000002800000010000000100000000100
2000000000000004000000000000000000000000000000000000FF00FF00B7A2
9300694731006947310069473100694731006947310069473100694731006947
31006947310069473100694731006947310069473100FF00FF00FF00FF00B7A2
9300F2ECE800B7A29300B7A29300B7A29300B7A29300B7A29300B7A29300B7A2
9300B7A29300B7A29300B7A29300B7A2930069473100FF00FF00FF00FF00B7A2
9300F5F0ED00F2ECE800EFE8E300EDE4DF00EAE0DA00E7DBD500E4D7D000E2D3
CB00DFCFC600DCCBC100DBC9BF00B7A2930069473100FF00FF00FF00FF00B7A2
9300F7F4F100F5F0ED00F2ECE800EFE8E3002477F4002477F4002477F4002477
F4002477F4002477F400DCCBC100B7A2930069473100FF00FF00FF00FF00B7A2
9300FAF8F600F7F4F100F5F0ED00F2ECE8002477F400EDE4DF00EAE0DA00E7DB
D500E4D7D0002477F400DFCFC600B7A2930069473100FF00FF00FF00FF00B7A2
9300FDFCFB002477F4002477F4002477F4002477F400EFE8E3002477F4002477
F400E7DBD5002477F400E2D3CB00B7A2930069473100FF00FF00FF00FF00B7A2
9300FF00FF002477F400FCFAF900F9F6F400F6F2EF00F3EEEA00F1EAE600EDE4
DF00EAE0DA002477F400E4D7D000B7A2930069473100FF00FF00FF00FF00B7A2
9300FF00FF002477F400FEFEFD002477F4002477F400F6F2EF002477F4002477
F400EEE6E1002477F400E9DED800B7A2930069473100FF00FF00FF00FF00B7A2
9300FF00FF002477F400FF00FF00FEFEFD00FCFAF900F9F6F400F6F2EF00F3EE
EA00F1EAE6002477F400EBE2DD00B7A2930069473100FF00FF00FF00FF00B7A2
9300FF00FF002477F400FF00FF002477F4002477F400FCFAF9002477F4002477
F400F3EEEA002477F400EEE6E100B7A2930069473100FF00FF00FF00FF00B7A2
9300FF00FF002477F400FF00FF00FF00FF00FF00FF00FEFEFD00FCFAF900F9F6
F400F6F2EF002477F400F1EAE600B7A2930069473100FF00FF00FF00FF00B7A2
9300FF00FF002477F4002477F4002477F4002477F4002477F4002477F4002477
F4002477F4002477F400F3EEEA00B7A2930069473100FF00FF00FF00FF00B7A2
9300FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00
FF00FCFAF900F9F6F400F6F2EF00B7A2930069473100FF00FF00FF00FF00B7A2
9300FF00FF002477F4002477F4002477F4002477F400FF00FF00FF00FF002477
F4002477F4002477F400FAF8F600B7A2930069473100FF00FF00FF00FF00B7A2
9300FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00FF00
FF00FF00FF00FF00FF00FDFCFB00FAF8F60069473100FF00FF00FF00FF00B7A2
9300B7A29300B7A29300B7A29300B7A29300B7A29300B7A29300B7A29300B7A2
9300B7A29300B7A29300B7A29300B7A29300B7A29300FF00FF00}
end
object edtRefContrato: TcxDBTextEdit
Left = 122
Top = 41
Anchors = [akLeft, akTop, akRight]
AutoSize = False
DataBinding.DataField = 'REF_CONTRATO'
DataBinding.DataSource = DADataSource
Enabled = False
ParentFont = False
Properties.ReadOnly = True
Properties.UseLeftAlignmentOnEditing = False
Style.BorderColor = clWindowFrame
Style.BorderStyle = ebs3D
Style.HotTrack = False
Style.LookAndFeel.NativeStyle = True
StyleDisabled.LookAndFeel.NativeStyle = True
StyleDisabled.TextColor = clWindowText
StyleFocused.LookAndFeel.NativeStyle = True
StyleHot.LookAndFeel.NativeStyle = True
TabOrder = 2
Height = 21
Width = 459
end
object edtRefClienteContrato: TcxDBTextEdit
Left = 122
Top = 68
Anchors = [akLeft, akTop, akRight]
AutoSize = False
DataBinding.DataField = 'REF_CLI_CONTRATO'
DataBinding.DataSource = DADataSource
Enabled = False
ParentFont = False
Properties.ReadOnly = True
Properties.UseLeftAlignmentOnEditing = False
Style.BorderColor = clWindowFrame
Style.BorderStyle = ebs3D
Style.HotTrack = False
Style.LookAndFeel.NativeStyle = True
StyleDisabled.LookAndFeel.NativeStyle = True
StyleDisabled.TextColor = clWindowText
StyleFocused.LookAndFeel.NativeStyle = True
StyleHot.LookAndFeel.NativeStyle = True
TabOrder = 3
Height = 21
Width = 459
end
object dxLayoutControl1Group_Root: TdxLayoutGroup
ShowCaption = False
Hidden = True
ShowBorder = False
object dxLayoutControl1Group1: TdxLayoutGroup
ShowCaption = False
Hidden = True
LayoutDirection = ldHorizontal
ShowBorder = False
object dxLayoutControl1Item7: TdxLayoutItem
Caption = 'Button1'
ShowCaption = False
Control = Button1
ControlOptions.ShowBorder = False
end
object dxLayoutControl1Item8: TdxLayoutItem
Caption = 'Button2'
ShowCaption = False
Control = Button2
ControlOptions.ShowBorder = False
end
end
object dxLayoutControl1Item3: TdxLayoutItem
Caption = 'Ref. Contrato:'
Control = edtRefContrato
ControlOptions.ShowBorder = False
end
object dxLayoutControl1Item4: TdxLayoutItem
Caption = 'Ref. Cliente Contrato:'
Control = edtRefClienteContrato
ControlOptions.ShowBorder = False
end
object dxLayoutControl1Item9: TdxLayoutItem
AutoAligns = [aaVertical]
AlignHorz = ahRight
Caption = 'Button3'
ShowCaption = False
Control = Button3
ControlOptions.ShowBorder = False
end
end
end
object DADataSource: TDADataSource
Left = 288
Top = 8
end
object ActionList1: TActionList
Images = PngImageList
Left = 320
Top = 8
object actElegirContrato: TAction
Caption = 'Elegir un contrato'
ImageIndex = 1
OnExecute = actElegirContratoExecute
end
object actAnadirContrato: TAction
Caption = 'Dar de alta un contrato'
ImageIndex = 0
OnExecute = actAnadirContratoExecute
end
object actVerContrato: TAction
Caption = 'Ver ficha contrato...'
ImageIndex = 2
OnExecute = actVerContratoExecute
OnUpdate = actVerContratoUpdate
end
end
object PngImageList: TPngImageList
PngImages = <
item
PngImage.Data = {
89504E470D0A1A0A0000000D4948445200000010000000100803000000282D0F
530000001974455874536F6674776172650041646F626520496D616765526561
647971C9653C00000078504C544593A2B7F47724314769006000FFFFFFEFF2F6
F9FAFCEAEEF3E8ECF2F4F6F9D0D7E4FDFEFEF6F8FAE3E8EFD5DBE7E6EAF1FBFC
FDEDF0F5DAE0EADFE4EDC8FBABF1F4F7E8ECF3E1E6EE9AE582C6CFDFCBD3E2C1
CBDCAFEF94C1F8A4FDFDFE91CE8485DA70D8DEE9E9F0FEBFC9DBDDE2EBFAFBFC
90E079FFFFFF31316E150000002874524E53FFFFFFFFFFFFFFFFFFFFFFFFFFFF
FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF00BEAA2E180000
00BD4944415478DA4DCF6B0B82301406E0B39B6917D120A9A008FAE0FFFF3951
121119152195B8CA33D736A43ADFF6BCEFC61949330DA0E03B24816B5C90F6D4
C78A3080690ED0305BEB9594B0B8A730CC6C8732ACA96D8C2EA6E1AE782F4AE6
7C37DB9BBC5333C4F046497A7A98A715881ABC777232D0ACB96236A7FE7DB931
002BAEBA157084E4BCD8B6206CCE7511540EA29BDDA984C163923BE807285F43
8D28C747072394A2747B4C0F0E62293C93479AFA9903FFF9FBAC030A7FF301A8
864F2FECD25AE30000000049454E44AE426082}
Name = 'PngImage3'
Background = clWindow
end
item
PngImage.Data = {
89504E470D0A1A0A0000000D4948445200000010000000100803000000282D0F
530000001974455874536F6674776172650041646F626520496D616765526561
647971C9653C000000B7504C544593A2B7314769FFFFFFF477246B6E8B8CB9D8
7070708288AA603D18E4983C915A4DD0D7E4F8D898D5DBE7EFF2F6F6F8FACBD3
E2C6CFDFC1CBDC736864E3E8EFFBFEFE9A949BBFE0EFF9FAFCFBFCFDE1E6EEAF
E1FFCA9463C4E9F6DFE4EDDDE2EBCAEFFAC2E6FFDDF2FFBFC9DBD7F1FFB3DFFF
A6DBFFB6B0AFDEF5FCC2EBF9E19549F4F6F9C3EDFC987151E6EAF1C9EEF9DAE0
EAC9EAFFDD8E46CEE0EBC6E8FFF3FBFDCCECFFC0E0EFD8DEE9EAEEF3B2E4FFF5
FBFFFFFFFFDAB9A0EC0000003D74524E53FFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
FFFFFFFFFFFFFFFFFFFFFFFFFF00092FAC5F000000C24944415478DA4D8FDF0B
C15014C7CFB97764EBC6986888445E3C28CAD3FE7C45CA8B171E5C2692F263AC
2696DDB96669E7E174BE9F3E0FE78B168C20392801F9A7F2C38D00CA3B04B9D9
1D9346C9D8B9181B4A00F40D301CC7007B1776BA685E771E81340AFD06D05E87
C5C3CF205D57C905EA34AC6D7F86C0E606A06193FE243606FBEAD9F4E7EF8C17
01B5CECD23B45604B4DB17CCA8EE5F01685A3CB38E0433DA590AE644AFE5AE88
2AADDB8269052E5288798E6854B87826CAA2B5F05EC9FA1F17474720DF2A0F5B
0000000049454E44AE426082}
Name = 'PngImage3'
Background = clWindow
end
item
PngImage.Data = {
89504E470D0A1A0A0000000D4948445200000010000000100803000000282D0F
530000001974455874536F6674776172650041646F626520496D616765526561
647971C9653C00000054504C544593A2B7F47724FFFFFF314769EFF2F6F9FAFC
E8ECF2EAEEF3F4F6F9F6F8FAD5DBE7E6EAF1FDFEFEEDF0F5DAE0EAD0D7E4E3E8
EFDFE4EDCBD3E2C6CFDFE1E6EEF1F4F7C1CBDCFBFCFDDDE2EBD8DEE9BFC9DBFF
FFFF104241DC0000001C74524E53FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
FFFFFFFFFFFFFFFFFF0017B2E2D7000000994944415478DA4DCF7F0F82201006
E0A32396F43BE764E3FB7F34ABB96CC3668AC10C2F34EF0F06CF7BDB714C17B0
2CCD74B19A5F59DDAB1186706710CE4D8B6AD181E81CCE1D54C2466000D2A2F3
B2996000EE40F4E963823147FECEEF11B60DA087B452B7087CCC857F1D0C415E
86014703497B7E1224BBCE7E4EDEADEB4B459075569ADFD74B82BD952CE4C890
5F0944FF5F960097EBAB2FCD9F47C14B5401B30000000049454E44AE426082}
Name = 'PngImage3'
Background = clWindow
end>
Left = 352
Top = 8
Bitmap = {}
end
end
Reference in New Issue View Git Blame Copy Permalink