*-------------------------------------------------------------------------------------------------------------------------------------------------------- * (EN) AUTOGENERATED - ATTENTION!! - NOT INTENDED FOR EXECUTION!! USE ONLY FOR MERGING CHANGES AND STORING WITH SCM TOOLS!! *-------------------------------------------------------------------------------------------------------------------------------------------------------- *< FOXBIN2PRG: Version="1.21" SourceFile="frm_date_comenzi.scx" CPID="1252" /> (Solo para binarios VFP 9 / Only for VFP 9 binaries) * * DEFINE CLASS dataenvironment AS dataenvironment *< CLASSDATA: Baseclass="dataenvironment" Timestamp="" Scale="" Uniqueid="" ClassIcon="1" /> * DataSource = .NULL. Height = 0 Left = 0 Name = "Dataenvironment" Top = 0 Width = 0 * ENDDEFINE DEFINE CLASS form1 AS form *< CLASSDATA: Baseclass="form" Timestamp="" Scale="" Uniqueid="" /> *-- OBJECTDATA items order determines ZOrder / El orden de los items OBJECTDATA determina el ZOrder *< OBJECTDATA: ObjPath="grdCrsdatecomenzi" UniqueID="" Timestamp="" /> *< OBJECTDATA: ObjPath="grdCrsdatecomenzi.Column1.Header1" UniqueID="" Timestamp="" /> *< OBJECTDATA: ObjPath="grdCrsdatecomenzi.Column1.Text1" UniqueID="" Timestamp="" /> *< OBJECTDATA: ObjPath="grdCrsdatecomenzi.Column2.Header1" UniqueID="" Timestamp="" /> *< OBJECTDATA: ObjPath="grdCrsdatecomenzi.Column2.Text1" UniqueID="" Timestamp="" /> *< OBJECTDATA: ObjPath="grdCrsdatecomenzi.Column3.Header1" UniqueID="" Timestamp="" /> *< OBJECTDATA: ObjPath="grdCrsdatecomenzi.Column3.Text1" UniqueID="" Timestamp="" /> *< OBJECTDATA: ObjPath="grdCrsdatecomenzi.Column4.Header1" UniqueID="" Timestamp="" /> *< OBJECTDATA: ObjPath="grdCrsdatecomenzi.Column4.Text1" UniqueID="" Timestamp="" /> *< OBJECTDATA: ObjPath="grdCrsdatecomenzi.Column5.Header1" UniqueID="" Timestamp="" /> *< OBJECTDATA: ObjPath="grdCrsdatecomenzi.Column5.Text1" UniqueID="" Timestamp="" /> *< OBJECTDATA: ObjPath="grdCrsdatecomenzi.Column6.Header1" UniqueID="" Timestamp="" /> *< OBJECTDATA: ObjPath="grdCrsdatecomenzi.Column6.Text1" UniqueID="" Timestamp="" /> *< OBJECTDATA: ObjPath="grdCrsdatecomenzi.Column7.Header1" UniqueID="" Timestamp="" /> *< OBJECTDATA: ObjPath="grdCrsdatecomenzi.Column7.Text1" UniqueID="" Timestamp="" /> *< OBJECTDATA: ObjPath="grdCrsdatecomenzi.Column8.Header1" UniqueID="" Timestamp="" /> *< OBJECTDATA: ObjPath="grdCrsdatecomenzi.Column8.Text1" UniqueID="" Timestamp="" /> *< OBJECTDATA: ObjPath="grdCrsdatecomenzi.Column9.Header1" UniqueID="" Timestamp="" /> *< OBJECTDATA: ObjPath="grdCrsdatecomenzi.Column9.Text1" UniqueID="" Timestamp="" /> *< OBJECTDATA: ObjPath="grdCrsdatecomenzi.Column10.Header1" UniqueID="" Timestamp="" /> *< OBJECTDATA: ObjPath="grdCrsdatecomenzi.Column10.Text1" UniqueID="" Timestamp="" /> *< OBJECTDATA: ObjPath="grdCrsdatecomenzi.Column11.Header1" UniqueID="" Timestamp="" /> *< OBJECTDATA: ObjPath="grdCrsdatecomenzi.Column11.Text1" UniqueID="" Timestamp="" /> *< OBJECTDATA: ObjPath="grdCrsdatecomenzi.Column12.Header1" UniqueID="" Timestamp="" /> *< OBJECTDATA: ObjPath="grdCrsdatecomenzi.Column12.Text1" UniqueID="" Timestamp="" /> *< OBJECTDATA: ObjPath="grdCrsdatecomenzi.Column13.Header1" UniqueID="" Timestamp="" /> *< OBJECTDATA: ObjPath="grdCrsdatecomenzi.Column13.Text1" UniqueID="" Timestamp="" /> *< OBJECTDATA: ObjPath="grdCrsdatecomenzi.Column14.Header1" UniqueID="" Timestamp="" /> *< OBJECTDATA: ObjPath="grdCrsdatecomenzi.Column14.Text1" UniqueID="" Timestamp="" /> *< OBJECTDATA: ObjPath="grdCrsdatecomenzi.Column15.Header1" UniqueID="" Timestamp="" /> *< OBJECTDATA: ObjPath="grdCrsdatecomenzi.Column15.Text1" UniqueID="" Timestamp="" /> *< OBJECTDATA: ObjPath="grdCrsdatecomenzi.Column16.Header1" UniqueID="" Timestamp="" /> *< OBJECTDATA: ObjPath="grdCrsdatecomenzi.Column16.Text1" UniqueID="" Timestamp="" /> *< OBJECTDATA: ObjPath="grdCrsdatecomenzi.Column17.Header1" UniqueID="" Timestamp="" /> *< OBJECTDATA: ObjPath="grdCrsdatecomenzi.Column17.Text1" UniqueID="" Timestamp="" /> *< OBJECTDATA: ObjPath="grdCrsdatecomenzi.Column18.Header1" UniqueID="" Timestamp="" /> *< OBJECTDATA: ObjPath="grdCrsdatecomenzi.Column18.Text1" UniqueID="" Timestamp="" /> *< OBJECTDATA: ObjPath="grdCrsdatecomenzi.Column19.Header1" UniqueID="" Timestamp="" /> *< OBJECTDATA: ObjPath="grdCrsdatecomenzi.Column19.Text1" UniqueID="" Timestamp="" /> *< OBJECTDATA: ObjPath="grdCrsdatecomenzi.Column20.Header1" UniqueID="" Timestamp="" /> *< OBJECTDATA: ObjPath="grdCrsdatecomenzi.Column20.Text1" UniqueID="" Timestamp="" /> *< OBJECTDATA: ObjPath="grdCrsdatecomenzi.Column21.Header1" UniqueID="" Timestamp="" /> *< OBJECTDATA: ObjPath="grdCrsdatecomenzi.Column21.Text1" UniqueID="" Timestamp="" /> *< OBJECTDATA: ObjPath="grdCrsdatecomenzi.Column22.Header1" UniqueID="" Timestamp="" /> *< OBJECTDATA: ObjPath="grdCrsdatecomenzi.Column22.Text1" UniqueID="" Timestamp="" /> *< OBJECTDATA: ObjPath="grdCrsdatecomenzi.Column23.Header1" UniqueID="" Timestamp="" /> *< OBJECTDATA: ObjPath="grdCrsdatecomenzi.Column23.Text1" UniqueID="" Timestamp="" /> *< OBJECTDATA: ObjPath="grdCrsdatecomenzi.Column24.Header1" UniqueID="" Timestamp="" /> *< OBJECTDATA: ObjPath="grdCrsdatecomenzi.Column24.Text1" UniqueID="" Timestamp="" /> *< OBJECTDATA: ObjPath="grdCrsdatecomenzi.Column25.Header1" UniqueID="" Timestamp="" /> *< OBJECTDATA: ObjPath="grdCrsdatecomenzi.Column25.Text1" UniqueID="" Timestamp="" /> *< OBJECTDATA: ObjPath="grdCrsdatecomenzi.Column26.Header1" UniqueID="" Timestamp="" /> *< OBJECTDATA: ObjPath="grdCrsdatecomenzi.Column26.Text1" UniqueID="" Timestamp="" /> *< OBJECTDATA: ObjPath="grdCrsdatecomenzi.Column27.Header1" UniqueID="" Timestamp="" /> *< OBJECTDATA: ObjPath="grdCrsdatecomenzi.Column27.Text1" UniqueID="" Timestamp="" /> *< OBJECTDATA: ObjPath="grdCrsdatecomenzi.Column28.Header1" UniqueID="" Timestamp="" /> *< OBJECTDATA: ObjPath="grdCrsdatecomenzi.Column28.Text1" UniqueID="" Timestamp="" /> *< OBJECTDATA: ObjPath="grdCrsdatecomenzi.Column29.Header1" UniqueID="" Timestamp="" /> *< OBJECTDATA: ObjPath="grdCrsdatecomenzi.Column29.Text1" UniqueID="" Timestamp="" /> *< OBJECTDATA: ObjPath="grdCrsdatecomenzi.Column30.Header1" UniqueID="" Timestamp="" /> *< OBJECTDATA: ObjPath="grdCrsdatecomenzi.Column30.Text1" UniqueID="" Timestamp="" /> *< OBJECTDATA: ObjPath="grdCrsdatecomenzi.Column31.Header1" UniqueID="" Timestamp="" /> *< OBJECTDATA: ObjPath="grdCrsdatecomenzi.Column31.Text1" UniqueID="" Timestamp="" /> *< OBJECTDATA: ObjPath="grdCrsdatecomenzi.Column32.Header1" UniqueID="" Timestamp="" /> *< OBJECTDATA: ObjPath="grdCrsdatecomenzi.Column32.Text1" UniqueID="" Timestamp="" /> *< OBJECTDATA: ObjPath="grdCrsdatecomenzi.Column33.Header1" UniqueID="" Timestamp="" /> *< OBJECTDATA: ObjPath="grdCrsdatecomenzi.Column33.Text1" UniqueID="" Timestamp="" /> *< OBJECTDATA: ObjPath="Gridtreeview1" UniqueID="" Timestamp="" /> *< OBJECTDATA: ObjPath="Gridtreeview1.ColumnTV.Text1" UniqueID="" Timestamp="" /> *< OBJECTDATA: ObjPath="Gridtreeview1.ColumnTV.Text2" UniqueID="" Timestamp="" /> *< OBJECTDATA: ObjPath="Gridtreeview1.ColumnTV.Text3" UniqueID="" Timestamp="" /> *< OBJECTDATA: ObjPath="Gridtreeview1.Column2.Header1" UniqueID="" Timestamp="" /> *< OBJECTDATA: ObjPath="Gridtreeview1.Column2.Text1" UniqueID="" Timestamp="" /> *< OBJECTDATA: ObjPath="Gridtreeview1.Column2.Text2" UniqueID="" Timestamp="" /> *< OBJECTDATA: ObjPath="Gridtreeview1.Column2.Text3" UniqueID="" Timestamp="" /> *< OBJECTDATA: ObjPath="Gridtreeview1.Column2.Label1" UniqueID="" Timestamp="" /> *< OBJECTDATA: ObjPath="Gridtreeview1.Column4.Header1" UniqueID="" Timestamp="" /> *< OBJECTDATA: ObjPath="Gridtreeview1.Column4.Text1" UniqueID="" Timestamp="" /> *< OBJECTDATA: ObjPath="Gridtreeview1.Column4.Text2" UniqueID="" Timestamp="" /> *< OBJECTDATA: ObjPath="Gridtreeview1.Column4.Label1" UniqueID="" Timestamp="" /> *< OBJECTDATA: ObjPath="Gridtreeview1.Column3.Header1" UniqueID="" Timestamp="" /> *< OBJECTDATA: ObjPath="Gridtreeview1.Column3.Text1" UniqueID="" Timestamp="" /> *< OBJECTDATA: ObjPath="Gridtreeview1.Column3.Label1" UniqueID="" Timestamp="" /> *< OBJECTDATA: ObjPath="Gridtreeview1.Column1.Header1" UniqueID="" Timestamp="" /> *< OBJECTDATA: ObjPath="Gridtreeview1.Column1.Text1" UniqueID="" Timestamp="" /> *< OBJECTDATA: ObjPath="Afficherniveau1" UniqueID="" Timestamp="" /> *< OBJECTDATA: ObjPath="Gridextra1" UniqueID="" Timestamp="" /> *< OBJECTDATA: ObjPath="Gridtreeview2" UniqueID="" Timestamp="" /> *< OBJECTDATA: ObjPath="Gridtreeview2.ColumnTV.Text1" UniqueID="" Timestamp="" /> *< OBJECTDATA: ObjPath="Gridtreeview2.ColumnTV.Text2" UniqueID="" Timestamp="" /> *< OBJECTDATA: ObjPath="Gridtreeview2.ColumnTV.Text3" UniqueID="" Timestamp="" /> *< OBJECTDATA: ObjPath="Gridtreeview2.ColumnTV.Text4" UniqueID="" Timestamp="" /> *< OBJECTDATA: ObjPath="Gridtreeview2.Column2.Header1" UniqueID="" Timestamp="" /> *< OBJECTDATA: ObjPath="Gridtreeview2.Column2.Text1" UniqueID="" Timestamp="" /> *< OBJECTDATA: ObjPath="Gridtreeview2.Column2.Text2" UniqueID="" Timestamp="" /> *< OBJECTDATA: ObjPath="Gridtreeview2.Column2.Text3" UniqueID="" Timestamp="" /> *< OBJECTDATA: ObjPath="Gridtreeview2.Column3.Header1" UniqueID="" Timestamp="" /> *< OBJECTDATA: ObjPath="Gridtreeview2.Column3.Text1" UniqueID="" Timestamp="" /> *< OBJECTDATA: ObjPath="Gridtreeview2.Column3.Text2" UniqueID="" Timestamp="" /> *< OBJECTDATA: ObjPath="Gridtreeview2.Column3.Text3" UniqueID="" Timestamp="" /> *< OBJECTDATA: ObjPath="Gridtreeview2.Column4.Header1" UniqueID="" Timestamp="" /> *< OBJECTDATA: ObjPath="Gridtreeview2.Column4.Text1" UniqueID="" Timestamp="" /> *< OBJECTDATA: ObjPath="Gridtreeview2.Column4.Text2" UniqueID="" Timestamp="" /> *< OBJECTDATA: ObjPath="Gridtreeview2.Column5.Header1" UniqueID="" Timestamp="" /> *< OBJECTDATA: ObjPath="Gridtreeview2.Column5.Text1" UniqueID="" Timestamp="" /> *< OBJECTDATA: ObjPath="Gridtreeview2.Column5.Label1" UniqueID="" Timestamp="" /> * Caption = "Form1" DoCreate = .T. Height = 501 Left = 0 Name = "Form1" Top = 0 Width = 800 * ADD OBJECT 'Afficherniveau1' AS afficherniveau WITH ; Left = 13, ; Name = "Afficherniveau1", ; Top = 18, ; CmdN0.Name = "CmdN0", ; CmdN1.Name = "CmdN1", ; CmdN2.Name = "CmdN2" *< END OBJECT: ClassLib="..\comun\clase\gridtreeview.vcx" BaseClass="container" /> ADD OBJECT 'grdCrsdatecomenzi' AS _grdrow WITH ; Anchor = 14, ; ColumnCount = 33, ; DeleteMark = .F., ; FontName = "Arial Narrow", ; Height = 87, ; Left = 0, ; Name = "grdCrsdatecomenzi", ; RecordSource = "crsdatecomenzi", ; RecordSourceType = 1, ; TabIndex = 7, ; Top = 408, ; Width = 768, ; ZOrderSet = 6, ; Column1.ControlSource = "crsdatecomenzi.nrord", ; Column1.FontName = "Arial Narrow", ; Column1.Name = "Column1", ; Column2.ControlSource = "crsdatecomenzi.id_part", ; Column2.FontName = "Arial Narrow", ; Column2.Name = "Column2", ; Column3.ControlSource = "crsdatecomenzi.nume", ; Column3.FontName = "Arial Narrow", ; Column3.Name = "Column3", ; Column4.ControlSource = "crsdatecomenzi.cod_fiscal", ; Column4.FontName = "Arial Narrow", ; Column4.Name = "Column4", ; Column5.ControlSource = "crsdatecomenzi.datai", ; Column5.FontName = "Arial Narrow", ; Column5.Name = "Column5", ; Column6.ControlSource = "crsdatecomenzi.asigurator", ; Column6.FontName = "Arial Narrow", ; Column6.Name = "Column6", ; Column7.ControlSource = "crsdatecomenzi.inspector", ; Column7.FontName = "Arial Narrow", ; Column7.Name = "Column7", ; Column8.ControlSource = "crsdatecomenzi.banca", ; Column8.FontName = "Arial Narrow", ; Column8.Name = "Column8", ; Column9.ControlSource = "crsdatecomenzi.cont_banca", ; Column9.FontName = "Arial Narrow", ; Column9.Name = "Column9", ; Column10.ControlSource = "crsdatecomenzi.adresa", ; Column10.FontName = "Arial Narrow", ; Column10.Name = "Column10", ; Column11.ControlSource = "crsdatecomenzi.email", ; Column11.FontName = "Arial Narrow", ; Column11.Name = "Column11", ; Column12.ControlSource = "crsdatecomenzi.telefon1", ; Column12.FontName = "Arial Narrow", ; Column12.Name = "Column12", ; Column13.ControlSource = "crsdatecomenzi.telefon2", ; Column13.FontName = "Arial Narrow", ; Column13.Name = "Column13", ; Column14.ControlSource = "crsdatecomenzi.nr_dosar", ; Column14.FontName = "Arial Narrow", ; Column14.Name = "Column14", ; Column15.ControlSource = "crsdatecomenzi.validat", ; Column15.FontName = "Arial Narrow", ; Column15.Name = "Column15", ; Column16.ControlSource = "crsdatecomenzi.id_masiniclient", ; Column16.FontName = "Arial Narrow", ; Column16.Name = "Column16", ; Column17.ControlSource = "crsdatecomenzi.nrinmat", ; Column17.FontName = "Arial Narrow", ; Column17.Name = "Column17", ; Column18.ControlSource = "crsdatecomenzi.series", ; Column18.FontName = "Arial Narrow", ; Column18.Name = "Column18", ; Column19.ControlSource = "crsdatecomenzi.seriem", ; Column19.FontName = "Arial Narrow", ; Column19.Name = "Column19", ; Column20.ControlSource = "crsdatecomenzi.culoare", ; Column20.FontName = "Arial Narrow", ; Column20.Name = "Column20", ; Column21.ControlSource = "crsdatecomenzi.kmint", ; Column21.FontName = "Arial Narrow", ; Column21.Name = "Column21", ; Column22.ControlSource = "crsdatecomenzi.id_masina", ; Column22.FontName = "Arial Narrow", ; Column22.Name = "Column22", ; Column23.ControlSource = "crsdatecomenzi.id_marca", ; Column23.FontName = "Arial Narrow", ; Column23.Name = "Column23", ; Column24.ControlSource = "crsdatecomenzi.marca", ; Column24.FontName = "Arial Narrow", ; Column24.Name = "Column24", ; Column25.ControlSource = "crsdatecomenzi.masina", ; Column25.FontName = "Arial Narrow", ; Column25.Name = "Column25", ; Column26.ControlSource = "crsdatecomenzi.semn", ; Column26.FontName = "Arial Narrow", ; Column26.Name = "Column26", ; Column27.ControlSource = "crsdatecomenzi.id_lucrare", ; Column27.FontName = "Arial Narrow", ; Column27.Name = "Column27", ; Column28.ControlSource = "crsdatecomenzi.codmat", ; Column28.FontName = "Arial Narrow", ; Column28.Name = "Column28", ; Column29.ControlSource = "crsdatecomenzi.denumire", ; Column29.FontName = "Arial Narrow", ; Column29.Name = "Column29", ; Column30.ControlSource = "crsdatecomenzi.cante", ; Column30.FontName = "Arial Narrow", ; Column30.Name = "Column30", ; Column31.ControlSource = "crsdatecomenzi.pret", ; Column31.FontName = "Arial Narrow", ; Column31.Name = "Column31", ; Column32.ControlSource = "crsdatecomenzi.data", ; Column32.FontName = "Arial Narrow", ; Column32.Name = "Column32", ; Column33.ControlSource = "crsdatecomenzi.id", ; Column33.FontName = "Arial Narrow", ; Column33.Name = "Column33" *< END OBJECT: ClassLib="..\comun\clase\_grd_base.vcx" BaseClass="grid" /> ADD OBJECT 'grdCrsdatecomenzi.Column1.Header1' AS header WITH ; Caption = "nrord", ; FontName = "Arial Narrow", ; Name = "Header1" *< END OBJECT: BaseClass="header" /> ADD OBJECT 'grdCrsdatecomenzi.Column1.Text1' AS textbox WITH ; BackColor = 255,255,255, ; BorderStyle = 0, ; FontName = "Arial Narrow", ; ForeColor = 0,0,0, ; Margin = 0, ; Name = "Text1" *< END OBJECT: BaseClass="textbox" /> ADD OBJECT 'grdCrsdatecomenzi.Column10.Header1' AS header WITH ; Caption = "adresa", ; FontName = "Arial Narrow", ; Name = "Header1" *< END OBJECT: BaseClass="header" /> ADD OBJECT 'grdCrsdatecomenzi.Column10.Text1' AS textbox WITH ; BackColor = 255,255,255, ; BorderStyle = 0, ; FontName = "Arial Narrow", ; ForeColor = 0,0,0, ; Margin = 0, ; Name = "Text1" *< END OBJECT: BaseClass="textbox" /> ADD OBJECT 'grdCrsdatecomenzi.Column11.Header1' AS header WITH ; Caption = "email", ; FontName = "Arial Narrow", ; Name = "Header1" *< END OBJECT: BaseClass="header" /> ADD OBJECT 'grdCrsdatecomenzi.Column11.Text1' AS textbox WITH ; BackColor = 255,255,255, ; BorderStyle = 0, ; FontName = "Arial Narrow", ; ForeColor = 0,0,0, ; Margin = 0, ; Name = "Text1" *< END OBJECT: BaseClass="textbox" /> ADD OBJECT 'grdCrsdatecomenzi.Column12.Header1' AS header WITH ; Caption = "telefon1", ; FontName = "Arial Narrow", ; Name = "Header1" *< END OBJECT: BaseClass="header" /> ADD OBJECT 'grdCrsdatecomenzi.Column12.Text1' AS textbox WITH ; BackColor = 255,255,255, ; BorderStyle = 0, ; FontName = "Arial Narrow", ; ForeColor = 0,0,0, ; Margin = 0, ; Name = "Text1" *< END OBJECT: BaseClass="textbox" /> ADD OBJECT 'grdCrsdatecomenzi.Column13.Header1' AS header WITH ; Caption = "telefon2", ; FontName = "Arial Narrow", ; Name = "Header1" *< END OBJECT: BaseClass="header" /> ADD OBJECT 'grdCrsdatecomenzi.Column13.Text1' AS textbox WITH ; BackColor = 255,255,255, ; BorderStyle = 0, ; FontName = "Arial Narrow", ; ForeColor = 0,0,0, ; Margin = 0, ; Name = "Text1" *< END OBJECT: BaseClass="textbox" /> ADD OBJECT 'grdCrsdatecomenzi.Column14.Header1' AS header WITH ; Caption = "nr_dosar", ; FontName = "Arial Narrow", ; Name = "Header1" *< END OBJECT: BaseClass="header" /> ADD OBJECT 'grdCrsdatecomenzi.Column14.Text1' AS textbox WITH ; BackColor = 255,255,255, ; BorderStyle = 0, ; FontName = "Arial Narrow", ; ForeColor = 0,0,0, ; Margin = 0, ; Name = "Text1" *< END OBJECT: BaseClass="textbox" /> ADD OBJECT 'grdCrsdatecomenzi.Column15.Header1' AS header WITH ; Caption = "validat", ; FontName = "Arial Narrow", ; Name = "Header1" *< END OBJECT: BaseClass="header" /> ADD OBJECT 'grdCrsdatecomenzi.Column15.Text1' AS textbox WITH ; BackColor = 255,255,255, ; BorderStyle = 0, ; FontName = "Arial Narrow", ; ForeColor = 0,0,0, ; Margin = 0, ; Name = "Text1" *< END OBJECT: BaseClass="textbox" /> ADD OBJECT 'grdCrsdatecomenzi.Column16.Header1' AS header WITH ; Caption = "id_masinic", ; FontName = "Arial Narrow", ; Name = "Header1" *< END OBJECT: BaseClass="header" /> ADD OBJECT 'grdCrsdatecomenzi.Column16.Text1' AS textbox WITH ; BackColor = 255,255,255, ; BorderStyle = 0, ; FontName = "Arial Narrow", ; ForeColor = 0,0,0, ; Margin = 0, ; Name = "Text1" *< END OBJECT: BaseClass="textbox" /> ADD OBJECT 'grdCrsdatecomenzi.Column17.Header1' AS header WITH ; Caption = "nrinmat", ; FontName = "Arial Narrow", ; Name = "Header1" *< END OBJECT: BaseClass="header" /> ADD OBJECT 'grdCrsdatecomenzi.Column17.Text1' AS textbox WITH ; BackColor = 255,255,255, ; BorderStyle = 0, ; FontName = "Arial Narrow", ; ForeColor = 0,0,0, ; Margin = 0, ; Name = "Text1" *< END OBJECT: BaseClass="textbox" /> ADD OBJECT 'grdCrsdatecomenzi.Column18.Header1' AS header WITH ; Caption = "series", ; FontName = "Arial Narrow", ; Name = "Header1" *< END OBJECT: BaseClass="header" /> ADD OBJECT 'grdCrsdatecomenzi.Column18.Text1' AS textbox WITH ; BackColor = 255,255,255, ; BorderStyle = 0, ; FontName = "Arial Narrow", ; ForeColor = 0,0,0, ; Margin = 0, ; Name = "Text1" *< END OBJECT: BaseClass="textbox" /> ADD OBJECT 'grdCrsdatecomenzi.Column19.Header1' AS header WITH ; Caption = "seriem", ; FontName = "Arial Narrow", ; Name = "Header1" *< END OBJECT: BaseClass="header" /> ADD OBJECT 'grdCrsdatecomenzi.Column19.Text1' AS textbox WITH ; BackColor = 255,255,255, ; BorderStyle = 0, ; FontName = "Arial Narrow", ; ForeColor = 0,0,0, ; Margin = 0, ; Name = "Text1" *< END OBJECT: BaseClass="textbox" /> ADD OBJECT 'grdCrsdatecomenzi.Column2.Header1' AS header WITH ; Caption = "id_part", ; FontName = "Arial Narrow", ; Name = "Header1" *< END OBJECT: BaseClass="header" /> ADD OBJECT 'grdCrsdatecomenzi.Column2.Text1' AS textbox WITH ; BackColor = 255,255,255, ; BorderStyle = 0, ; FontName = "Arial Narrow", ; ForeColor = 0,0,0, ; Margin = 0, ; Name = "Text1" *< END OBJECT: BaseClass="textbox" /> ADD OBJECT 'grdCrsdatecomenzi.Column20.Header1' AS header WITH ; Caption = "culoare", ; FontName = "Arial Narrow", ; Name = "Header1" *< END OBJECT: BaseClass="header" /> ADD OBJECT 'grdCrsdatecomenzi.Column20.Text1' AS textbox WITH ; BackColor = 255,255,255, ; BorderStyle = 0, ; FontName = "Arial Narrow", ; ForeColor = 0,0,0, ; Margin = 0, ; Name = "Text1" *< END OBJECT: BaseClass="textbox" /> ADD OBJECT 'grdCrsdatecomenzi.Column21.Header1' AS header WITH ; Caption = "kmint", ; FontName = "Arial Narrow", ; Name = "Header1" *< END OBJECT: BaseClass="header" /> ADD OBJECT 'grdCrsdatecomenzi.Column21.Text1' AS textbox WITH ; BackColor = 255,255,255, ; BorderStyle = 0, ; FontName = "Arial Narrow", ; ForeColor = 0,0,0, ; Margin = 0, ; Name = "Text1" *< END OBJECT: BaseClass="textbox" /> ADD OBJECT 'grdCrsdatecomenzi.Column22.Header1' AS header WITH ; Caption = "id_masina", ; FontName = "Arial Narrow", ; Name = "Header1" *< END OBJECT: BaseClass="header" /> ADD OBJECT 'grdCrsdatecomenzi.Column22.Text1' AS textbox WITH ; BackColor = 255,255,255, ; BorderStyle = 0, ; FontName = "Arial Narrow", ; ForeColor = 0,0,0, ; Margin = 0, ; Name = "Text1" *< END OBJECT: BaseClass="textbox" /> ADD OBJECT 'grdCrsdatecomenzi.Column23.Header1' AS header WITH ; Caption = "id_marca", ; FontName = "Arial Narrow", ; Name = "Header1" *< END OBJECT: BaseClass="header" /> ADD OBJECT 'grdCrsdatecomenzi.Column23.Text1' AS textbox WITH ; BackColor = 255,255,255, ; BorderStyle = 0, ; FontName = "Arial Narrow", ; ForeColor = 0,0,0, ; Margin = 0, ; Name = "Text1" *< END OBJECT: BaseClass="textbox" /> ADD OBJECT 'grdCrsdatecomenzi.Column24.Header1' AS header WITH ; Caption = "marca", ; FontName = "Arial Narrow", ; Name = "Header1" *< END OBJECT: BaseClass="header" /> ADD OBJECT 'grdCrsdatecomenzi.Column24.Text1' AS textbox WITH ; BackColor = 255,255,255, ; BorderStyle = 0, ; FontName = "Arial Narrow", ; ForeColor = 0,0,0, ; Margin = 0, ; Name = "Text1" *< END OBJECT: BaseClass="textbox" /> ADD OBJECT 'grdCrsdatecomenzi.Column25.Header1' AS header WITH ; Caption = "masina", ; FontName = "Arial Narrow", ; Name = "Header1" *< END OBJECT: BaseClass="header" /> ADD OBJECT 'grdCrsdatecomenzi.Column25.Text1' AS textbox WITH ; BackColor = 255,255,255, ; BorderStyle = 0, ; FontName = "Arial Narrow", ; ForeColor = 0,0,0, ; Margin = 0, ; Name = "Text1" *< END OBJECT: BaseClass="textbox" /> ADD OBJECT 'grdCrsdatecomenzi.Column26.Header1' AS header WITH ; Caption = "semn", ; FontName = "Arial Narrow", ; Name = "Header1" *< END OBJECT: BaseClass="header" /> ADD OBJECT 'grdCrsdatecomenzi.Column26.Text1' AS textbox WITH ; BackColor = 255,255,255, ; BorderStyle = 0, ; FontName = "Arial Narrow", ; ForeColor = 0,0,0, ; Margin = 0, ; Name = "Text1" *< END OBJECT: BaseClass="textbox" /> ADD OBJECT 'grdCrsdatecomenzi.Column27.Header1' AS header WITH ; Caption = "id_lucrare", ; FontName = "Arial Narrow", ; Name = "Header1" *< END OBJECT: BaseClass="header" /> ADD OBJECT 'grdCrsdatecomenzi.Column27.Text1' AS textbox WITH ; BackColor = 255,255,255, ; BorderStyle = 0, ; FontName = "Arial Narrow", ; ForeColor = 0,0,0, ; Margin = 0, ; Name = "Text1" *< END OBJECT: BaseClass="textbox" /> ADD OBJECT 'grdCrsdatecomenzi.Column28.Header1' AS header WITH ; Caption = "codmat", ; FontName = "Arial Narrow", ; Name = "Header1" *< END OBJECT: BaseClass="header" /> ADD OBJECT 'grdCrsdatecomenzi.Column28.Text1' AS textbox WITH ; BackColor = 255,255,255, ; BorderStyle = 0, ; FontName = "Arial Narrow", ; ForeColor = 0,0,0, ; Margin = 0, ; Name = "Text1" *< END OBJECT: BaseClass="textbox" /> ADD OBJECT 'grdCrsdatecomenzi.Column29.Header1' AS header WITH ; Caption = "denumire", ; FontName = "Arial Narrow", ; Name = "Header1" *< END OBJECT: BaseClass="header" /> ADD OBJECT 'grdCrsdatecomenzi.Column29.Text1' AS textbox WITH ; BackColor = 255,255,255, ; BorderStyle = 0, ; FontName = "Arial Narrow", ; ForeColor = 0,0,0, ; Margin = 0, ; Name = "Text1" *< END OBJECT: BaseClass="textbox" /> ADD OBJECT 'grdCrsdatecomenzi.Column3.Header1' AS header WITH ; Caption = "nume", ; FontName = "Arial Narrow", ; Name = "Header1" *< END OBJECT: BaseClass="header" /> ADD OBJECT 'grdCrsdatecomenzi.Column3.Text1' AS textbox WITH ; BackColor = 255,255,255, ; BorderStyle = 0, ; FontName = "Arial Narrow", ; ForeColor = 0,0,0, ; Margin = 0, ; Name = "Text1" *< END OBJECT: BaseClass="textbox" /> ADD OBJECT 'grdCrsdatecomenzi.Column30.Header1' AS header WITH ; Caption = "cante", ; FontName = "Arial Narrow", ; Name = "Header1" *< END OBJECT: BaseClass="header" /> ADD OBJECT 'grdCrsdatecomenzi.Column30.Text1' AS textbox WITH ; BackColor = 255,255,255, ; BorderStyle = 0, ; FontName = "Arial Narrow", ; ForeColor = 0,0,0, ; Margin = 0, ; Name = "Text1" *< END OBJECT: BaseClass="textbox" /> ADD OBJECT 'grdCrsdatecomenzi.Column31.Header1' AS header WITH ; Caption = "pret", ; FontName = "Arial Narrow", ; Name = "Header1" *< END OBJECT: BaseClass="header" /> ADD OBJECT 'grdCrsdatecomenzi.Column31.Text1' AS textbox WITH ; BackColor = 255,255,255, ; BorderStyle = 0, ; FontName = "Arial Narrow", ; ForeColor = 0,0,0, ; Margin = 0, ; Name = "Text1" *< END OBJECT: BaseClass="textbox" /> ADD OBJECT 'grdCrsdatecomenzi.Column32.Header1' AS header WITH ; Caption = "data", ; FontName = "Arial Narrow", ; Name = "Header1" *< END OBJECT: BaseClass="header" /> ADD OBJECT 'grdCrsdatecomenzi.Column32.Text1' AS textbox WITH ; BackColor = 255,255,255, ; BorderStyle = 0, ; FontName = "Arial Narrow", ; ForeColor = 0,0,0, ; Margin = 0, ; Name = "Text1" *< END OBJECT: BaseClass="textbox" /> ADD OBJECT 'grdCrsdatecomenzi.Column33.Header1' AS header WITH ; Caption = "id", ; FontName = "Arial Narrow", ; Name = "Header1" *< END OBJECT: BaseClass="header" /> ADD OBJECT 'grdCrsdatecomenzi.Column33.Text1' AS textbox WITH ; BackColor = 255,255,255, ; BorderStyle = 0, ; FontName = "Arial Narrow", ; ForeColor = 0,0,0, ; Margin = 0, ; Name = "Text1" *< END OBJECT: BaseClass="textbox" /> ADD OBJECT 'grdCrsdatecomenzi.Column4.Header1' AS header WITH ; Caption = "cod_fiscal", ; FontName = "Arial Narrow", ; Name = "Header1" *< END OBJECT: BaseClass="header" /> ADD OBJECT 'grdCrsdatecomenzi.Column4.Text1' AS textbox WITH ; BackColor = 255,255,255, ; BorderStyle = 0, ; FontName = "Arial Narrow", ; ForeColor = 0,0,0, ; Margin = 0, ; Name = "Text1" *< END OBJECT: BaseClass="textbox" /> ADD OBJECT 'grdCrsdatecomenzi.Column5.Header1' AS header WITH ; Caption = "datai", ; FontName = "Arial Narrow", ; Name = "Header1" *< END OBJECT: BaseClass="header" /> ADD OBJECT 'grdCrsdatecomenzi.Column5.Text1' AS textbox WITH ; BackColor = 255,255,255, ; BorderStyle = 0, ; FontName = "Arial Narrow", ; ForeColor = 0,0,0, ; Margin = 0, ; Name = "Text1" *< END OBJECT: BaseClass="textbox" /> ADD OBJECT 'grdCrsdatecomenzi.Column6.Header1' AS header WITH ; Caption = "asigurator", ; FontName = "Arial Narrow", ; Name = "Header1" *< END OBJECT: BaseClass="header" /> ADD OBJECT 'grdCrsdatecomenzi.Column6.Text1' AS textbox WITH ; BackColor = 255,255,255, ; BorderStyle = 0, ; FontName = "Arial Narrow", ; ForeColor = 0,0,0, ; Margin = 0, ; Name = "Text1" *< END OBJECT: BaseClass="textbox" /> ADD OBJECT 'grdCrsdatecomenzi.Column7.Header1' AS header WITH ; Caption = "inspector", ; FontName = "Arial Narrow", ; Name = "Header1" *< END OBJECT: BaseClass="header" /> ADD OBJECT 'grdCrsdatecomenzi.Column7.Text1' AS textbox WITH ; BackColor = 255,255,255, ; BorderStyle = 0, ; FontName = "Arial Narrow", ; ForeColor = 0,0,0, ; Margin = 0, ; Name = "Text1" *< END OBJECT: BaseClass="textbox" /> ADD OBJECT 'grdCrsdatecomenzi.Column8.Header1' AS header WITH ; Caption = "banca", ; FontName = "Arial Narrow", ; Name = "Header1" *< END OBJECT: BaseClass="header" /> ADD OBJECT 'grdCrsdatecomenzi.Column8.Text1' AS textbox WITH ; BackColor = 255,255,255, ; BorderStyle = 0, ; FontName = "Arial Narrow", ; ForeColor = 0,0,0, ; Margin = 0, ; Name = "Text1" *< END OBJECT: BaseClass="textbox" /> ADD OBJECT 'grdCrsdatecomenzi.Column9.Header1' AS header WITH ; Caption = "cont_banca", ; FontName = "Arial Narrow", ; Name = "Header1" *< END OBJECT: BaseClass="header" /> ADD OBJECT 'grdCrsdatecomenzi.Column9.Text1' AS textbox WITH ; BackColor = 255,255,255, ; BorderStyle = 0, ; FontName = "Arial Narrow", ; ForeColor = 0,0,0, ; Margin = 0, ; Name = "Text1" *< END OBJECT: BaseClass="textbox" /> ADD OBJECT 'Gridextra1' AS gridextra WITH ; gridexpression = thisform.gridtreeview1, ; Left = 179, ; Name = "Gridextra1", ; Top = 11 *< END OBJECT: ClassLib="..\comun\utile\gridextras\gridextras.vcx" BaseClass="custom" /> ADD OBJECT 'Gridtreeview1' AS gridtreeview WITH ; Anchor = 15, ; ColumnCount = 5, ; FontName = "Arial", ; GridLines = 3, ; HeaderHeight = 35, ; Height = 240, ; Left = 12, ; Name = "Gridtreeview1", ; niveau0 = cle1, ; niveau1 = cle2, ; niveau2 = cle3, ; Panel = 1, ; RecordMark = .T., ; RecordSource = "commandes", ; RecordSourceType = 1, ; ScrollBars = 3, ; Top = 36, ; Width = 768, ; ColumnTV.ControlSource = "", ; ColumnTV.FontName = "Arial", ; ColumnTV.HeaderTV.Caption = "Client - Masina / Comanda / Articol", ; ColumnTV.HeaderTV.FontName = "Arial", ; ColumnTV.HeaderTV.Name = "HeaderTV", ; ColumnTV.Name = "ColumnTV", ; ColumnTV.Width = 260, ; Column2.Bound = .F., ; Column2.CurrentControl = "Text1", ; Column2.DynamicCurrentControl = 'iif(niveau=0,"label1",iif(niveau=1,"text2",iif(niveau=2,"text3","")))', ; Column2.DynamicInputMask = "", ; Column2.FontName = "Arial", ; Column2.Name = "Column2", ; Column2.Sparse = .F., ; Column2.Width = 109, ; Column3.Bound = .F., ; Column3.ColumnOrder = 4, ; Column3.DynamicCurrentControl = 'iif(niveau=0,"label1",iif(niveau=2,"text2",""))', ; Column3.FontName = "Arial", ; Column3.Name = "Column4", ; Column3.Sparse = .F., ; Column4.Bound = .F., ; Column4.ColumnOrder = 5, ; Column4.DynamicCurrentControl = 'iif(niveau=2,"text1","label1")', ; Column4.FontName = "Arial", ; Column4.Name = "Column3", ; Column4.Sparse = .F., ; Column5.ColumnOrder = 3, ; Column5.ControlSource = "cante", ; Column5.DynamicCurrentControl = 'iif(niveau=2, "text1", "")', ; Column5.FontName = "Arial", ; Column5.Name = "Column1", ; Column5.ReadOnly = .T., ; Column5.Width = 55 *< END OBJECT: ClassLib="..\comun\clase\gridtreeview.vcx" BaseClass="grid" /> ADD OBJECT 'Gridtreeview1.Column1.Header1' AS header WITH ; Alignment = 2, ; Caption = "Cantitate", ; Name = "Header1" *< END OBJECT: BaseClass="header" /> ADD OBJECT 'Gridtreeview1.Column1.Text1' AS textbox WITH ; BackColor = 255,255,255, ; BorderStyle = 0, ; ForeColor = 0,0,0, ; Margin = 0, ; Name = "Text1", ; ReadOnly = .T. *< END OBJECT: BaseClass="textbox" /> ADD OBJECT 'Gridtreeview1.Column2.Header1' AS header WITH ; Caption = "Data Comanda / Cod Material", ; FontName = "Arial", ; Name = "Header1", ; WordWrap = .T. *< END OBJECT: BaseClass="header" /> ADD OBJECT 'Gridtreeview1.Column2.Label1' AS label WITH ; Caption = "", ; Height = 17, ; Left = 76, ; Name = "Label1", ; Top = 107, ; Width = 40 *< END OBJECT: BaseClass="label" /> ADD OBJECT 'Gridtreeview1.Column2.Text1' AS textbox WITH ; Alignment = 3, ; BorderStyle = 0, ; ControlSource = "cod_fiscal", ; FontName = "Arial", ; Format = "!K", ; Height = 10, ; Left = 26, ; Margin = 1, ; Name = "Text1", ; Top = 29, ; Width = 10 *< END OBJECT: BaseClass="textbox" /> ADD OBJECT 'Gridtreeview1.Column2.Text2' AS textbox WITH ; BorderStyle = 0, ; ControlSource = "datai", ; Format = "!KD", ; Height = 10, ; InputMask = "", ; Left = 38, ; Name = "Text2", ; Top = 29, ; Width = 10 *< END OBJECT: BaseClass="textbox" /> ADD OBJECT 'Gridtreeview1.Column2.Text3' AS textbox WITH ; BorderStyle = 0, ; ControlSource = "codmat", ; Format = "!K", ; Height = 23, ; Left = 40, ; Name = "Text3", ; Top = 83, ; Width = 100 *< END OBJECT: BaseClass="textbox" /> ADD OBJECT 'Gridtreeview1.Column3.Header1' AS header WITH ; Alignment = 2, ; Caption = "Data", ; FontName = "Arial", ; Name = "Header1" *< END OBJECT: BaseClass="header" /> ADD OBJECT 'Gridtreeview1.Column3.Label1' AS label WITH ; BackStyle = 0, ; BorderStyle = 0, ; Caption = "", ; Height = 17, ; Left = 31, ; Name = "Label1", ; Top = 83, ; Width = 40 *< END OBJECT: BaseClass="label" /> ADD OBJECT 'Gridtreeview1.Column3.Text1' AS textbox WITH ; BackColor = 255,255,255, ; BorderStyle = 0, ; ControlSource = "data", ; DateFormat = 11, ; FontName = "Arial", ; ForeColor = 0,0,0, ; Format = "DZK", ; Margin = 0, ; Name = "Text1" *< END OBJECT: BaseClass="textbox" /> ADD OBJECT 'Gridtreeview1.Column4.Header1' AS header WITH ; Alignment = 2, ; Caption = "Pret", ; FontName = "Arial", ; Name = "Header1" *< END OBJECT: BaseClass="header" /> ADD OBJECT 'Gridtreeview1.Column4.Label1' AS label WITH ; Caption = "", ; Height = 17, ; Left = 11, ; Name = "Label1", ; Top = 95, ; Width = 40 *< END OBJECT: BaseClass="label" /> ADD OBJECT 'Gridtreeview1.Column4.Text1' AS textbox WITH ; BackColor = 255,255,255, ; BorderStyle = 0, ; ControlSource = "telefon1", ; FontName = "Arial", ; ForeColor = 0,0,0, ; Format = "RK", ; InputMask = "UUUUUUUUUUUUUUUU", ; Margin = 0, ; Name = "Text1" *< END OBJECT: BaseClass="textbox" /> ADD OBJECT 'Gridtreeview1.Column4.Text2' AS textbox WITH ; Alignment = 1, ; BorderStyle = 0, ; ControlSource = "pret", ; Format = "RK", ; Height = 23, ; InputMask = "999 999 999.99", ; Left = 23, ; Name = "Text2", ; Top = 71, ; Width = 100 *< END OBJECT: BaseClass="textbox" /> ADD OBJECT 'Gridtreeview1.ColumnTV.Text1' AS textbox WITH ; BackColor = 255,255,255, ; BorderStyle = 0, ; FontName = "Arial", ; ForeColor = 0,0,0, ; Margin = 0, ; Name = "Text1" *< END OBJECT: BaseClass="textbox" /> ADD OBJECT 'Gridtreeview1.ColumnTV.Text2' AS textbox WITH ; BackColor = 255,255,255, ; BorderStyle = 0, ; FontName = "Arial Narrow", ; ForeColor = 0,0,0, ; Margin = 0, ; Name = "Text2" *< END OBJECT: BaseClass="textbox" /> ADD OBJECT 'Gridtreeview1.ColumnTV.Text3' AS textbox WITH ; BackColor = 255,255,255, ; BorderStyle = 0, ; ForeColor = 0,0,0, ; Margin = 0, ; Name = "Text3" *< END OBJECT: BaseClass="textbox" /> ADD OBJECT 'Gridtreeview2' AS gridtreeview WITH ; Anchor = 14, ; ColumnCount = 5, ; FontName = "Arial", ; GridLines = 3, ; HeaderHeight = 35, ; Height = 112, ; Left = 12, ; Name = "Gridtreeview2", ; niveau0 = cle1, ; niveau1 = cle2, ; niveau2 = cle3, ; Panel = 1, ; RecordMark = .T., ; RecordSource = "commandes", ; RecordSourceType = 1, ; ScrollBars = 3, ; Top = 288, ; Width = 768, ; ColumnTV.ControlSource = "", ; ColumnTV.FontName = "Arial", ; ColumnTV.HeaderTV.Caption = "Client / Comanda / Articol", ; ColumnTV.HeaderTV.FontName = "Arial", ; ColumnTV.HeaderTV.Name = "HeaderTV", ; ColumnTV.Name = "ColumnTV", ; ColumnTV.Width = 260, ; Column2.Bound = .F., ; Column2.CurrentControl = "Text1", ; Column2.DynamicCurrentControl = 'iif(niveau=0,"text1",iif(niveau=1,"text2",iif(niveau=2,"text3","")))', ; Column2.DynamicInputMask = "", ; Column2.FontName = "Arial", ; Column2.Name = "Column2", ; Column2.Sparse = .F., ; Column2.Width = 109, ; Column3.Bound = .F., ; Column3.CurrentControl = "Text1", ; Column3.DynamicCurrentControl = 'iif(niveau=0,"text1",iif(niveau=1,"text2",iif(niveau=2,"text3","")))', ; Column3.DynamicInputMask = "", ; Column3.FontName = "Arial", ; Column3.Name = "Column3", ; Column3.Sparse = .F., ; Column3.Width = 86, ; Column4.Bound = .F., ; Column4.DynamicCurrentControl = 'iif(niveau=0,"text1",iif(niveau=2,"text2",""))', ; Column4.FontName = "Arial", ; Column4.Name = "Column4", ; Column4.Sparse = .F., ; Column5.Bound = .F., ; Column5.DynamicCurrentControl = 'iif(niveau=2,"text1","label1")', ; Column5.FontName = "Arial", ; Column5.Name = "Column5", ; Column5.Sparse = .F. *< END OBJECT: ClassLib="..\comun\clase\gridtreeview.vcx" BaseClass="grid" /> ADD OBJECT 'Gridtreeview2.Column2.Header1' AS header WITH ; Caption = "Cod fiscal / Data Com. / Cod Mat.", ; FontName = "Arial", ; Name = "Header1", ; WordWrap = .T. *< END OBJECT: BaseClass="header" /> ADD OBJECT 'Gridtreeview2.Column2.Text1' AS textbox WITH ; Alignment = 3, ; BorderStyle = 0, ; ControlSource = "cod_fiscal", ; FontName = "Arial", ; Format = "!K", ; Height = 10, ; Left = 26, ; Margin = 1, ; Name = "Text1", ; Top = 29, ; Width = 10 *< END OBJECT: BaseClass="textbox" /> ADD OBJECT 'Gridtreeview2.Column2.Text2' AS textbox WITH ; BorderStyle = 0, ; ControlSource = "datai", ; Format = "!KD", ; Height = 10, ; InputMask = "", ; Left = 38, ; Name = "Text2", ; Top = 29, ; Width = 10 *< END OBJECT: BaseClass="textbox" /> ADD OBJECT 'Gridtreeview2.Column2.Text3' AS textbox WITH ; BorderStyle = 0, ; ControlSource = "codmat", ; Format = "!K", ; Height = 23, ; Left = 40, ; Name = "Text3", ; Top = 83, ; Width = 100 *< END OBJECT: BaseClass="textbox" /> ADD OBJECT 'Gridtreeview2.Column3.Header1' AS header WITH ; Caption = "Email / Nr. inmatr. / Cantitate", ; FontName = "Arial", ; Name = "Header1", ; WordWrap = .T. *< END OBJECT: BaseClass="header" /> ADD OBJECT 'Gridtreeview2.Column3.Text1' AS textbox WITH ; BorderStyle = 0, ; ControlSource = "email", ; FontName = "Arial", ; Format = "RK", ; InputMask = "WWWWWWWWWWWWWWWWWWWWWW", ; Name = "Text1" *< END OBJECT: BaseClass="textbox" /> ADD OBJECT 'Gridtreeview2.Column3.Text2' AS textbox WITH ; BorderStyle = 0, ; ControlSource = "nrinmat", ; Format = "RK", ; Height = 23, ; InputMask = "UUUUUUUUUUUUUUUUUUUU", ; Left = 26, ; Name = "Text2", ; Top = 95, ; Width = 100 *< END OBJECT: BaseClass="textbox" /> ADD OBJECT 'Gridtreeview2.Column3.Text3' AS textbox WITH ; Alignment = 1, ; BorderStyle = 0, ; ControlSource = "cante", ; Format = "RK", ; Height = 10, ; InputMask = "999 999 999.99", ; Left = 26, ; Name = "Text3", ; Top = 95, ; Width = 10 *< END OBJECT: BaseClass="textbox" /> ADD OBJECT 'Gridtreeview2.Column4.Header1' AS header WITH ; Alignment = 2, ; Caption = "Telefon / Pret", ; FontName = "Arial", ; Name = "Header1" *< END OBJECT: BaseClass="header" /> ADD OBJECT 'Gridtreeview2.Column4.Text1' AS textbox WITH ; BackColor = 255,255,255, ; BorderStyle = 0, ; ControlSource = "telefon1", ; FontName = "Arial", ; ForeColor = 0,0,0, ; Format = "RK", ; InputMask = "UUUUUUUUUUUUUUUU", ; Margin = 0, ; Name = "Text1" *< END OBJECT: BaseClass="textbox" /> ADD OBJECT 'Gridtreeview2.Column4.Text2' AS textbox WITH ; Alignment = 1, ; BorderStyle = 0, ; ControlSource = "pret", ; Format = "RK", ; Height = 23, ; InputMask = "999 999 999.99", ; Left = 23, ; Name = "Text2", ; Top = 71, ; Width = 100 *< END OBJECT: BaseClass="textbox" /> ADD OBJECT 'Gridtreeview2.Column5.Header1' AS header WITH ; Alignment = 2, ; Caption = "Data", ; FontName = "Arial", ; Name = "Header1" *< END OBJECT: BaseClass="header" /> ADD OBJECT 'Gridtreeview2.Column5.Label1' AS label WITH ; BackStyle = 0, ; BorderStyle = 0, ; Caption = "", ; Height = 17, ; Left = 31, ; Name = "Label1", ; Top = 83, ; Width = 40 *< END OBJECT: BaseClass="label" /> ADD OBJECT 'Gridtreeview2.Column5.Text1' AS textbox WITH ; BackColor = 255,255,255, ; BorderStyle = 0, ; ControlSource = "data", ; DateFormat = 11, ; FontName = "Arial", ; ForeColor = 0,0,0, ; Format = "DZK", ; Margin = 0, ; Name = "Text1" *< END OBJECT: BaseClass="textbox" /> ADD OBJECT 'Gridtreeview2.ColumnTV.Text1' AS textbox WITH ; BackColor = 255,255,255, ; BorderStyle = 0, ; FontName = "Arial", ; ForeColor = 0,0,0, ; Margin = 0, ; Name = "Text1" *< END OBJECT: BaseClass="textbox" /> ADD OBJECT 'Gridtreeview2.ColumnTV.Text2' AS textbox WITH ; BackColor = 255,255,255, ; BorderStyle = 0, ; FontName = "Arial", ; ForeColor = 0,0,0, ; Margin = 0, ; Name = "Text2" *< END OBJECT: BaseClass="textbox" /> ADD OBJECT 'Gridtreeview2.ColumnTV.Text3' AS textbox WITH ; BackColor = 255,255,255, ; BorderStyle = 0, ; FontName = "Arial Narrow", ; ForeColor = 0,0,0, ; Margin = 0, ; Name = "Text3" *< END OBJECT: BaseClass="textbox" /> ADD OBJECT 'Gridtreeview2.ColumnTV.Text4' AS textbox WITH ; BackColor = 255,255,255, ; BorderStyle = 0, ; ForeColor = 0,0,0, ; Margin = 0, ; Name = "Text4" *< END OBJECT: BaseClass="textbox" /> PROCEDURE Init THIS.Gridtreeview1.SetAll("DynamicForeColor", "IIF(SEMN = 'A', RGB(0,200,100), IIF(SEMN = 'B', RGB(0,100,250), RGB(0,0,0)))", "Column") this.gridextra1.setup() ENDPROC PROCEDURE Load SET PATH TO "d:\roa\roaauto\comun\clase\" addi TEXT TO lcSql NOSHOW select nrord, id_part, nume, cod_fiscal, datai, asigurator, inspector, banca, cont_banca, adresa, email, telefon1, telefon2, nr_dosar, validat, id_masiniclient, nrinmat, series, seriem, culoare, kmint, id_masina, id_marca, marca, masina, semn, id_lucrare, codmat, denumire, cante, pret, data, id from auto_analiza_comenzi WHERE UPPER(nume) LIKE '%ROM%' ORDER BY NUME, DATAI, NRORD, SEMN, DENUMIRE ENDTEXT * AND DENUMIRE LIKE '%ULEI%' lnHandle = SQLConnect("roa_central","mariusm_auto", "romfastsoft") lnSucces = SQLExec(lnHandle, lcSql, "crsDateComenzi") lnTip = 2 && client-masina/comanda/articol Do Case Case lnTip = 1 && client/comanda/articol Select nume As cle1, nrord As cle2, denumire As cle3, 2 As niveau, "" As expanded, .F. As Visible, ; cod_fiscal, email, telefon1, ; TTOD(datai) As datai, nrinmat, ; semn, codmat, cante, Pret, Ttod(Data) As Data ; FROM crsDateComenzi ; order By nume, datai, semn, denumire ; into Cursor Commandes Readwrite Select Distinct cle1, 0 As niveau, "N" As expanded, .T. As Visible, ; cod_fiscal, email, telefon1 ; from Commandes Into Cursor c0 Select Distinct cle1, cle2, 1 As niveau, "N" As expanded, .F. As Visible, ; datai, nrinmat ; from Commandes Into Cursor c1 Case lnTip = 2 && client-masina/comanda/articol Select PADR(ALLTRIM(nume) + ' - ' + ALLTRIM(nrinmat), 70, ' ') As cle1, nrord As cle2, denumire As cle3, 2 As niveau, "" As expanded, .F. As Visible, ; cod_fiscal, email, telefon1, ; TTOD(datai) As datai, ; semn, codmat, cante, Pret, Ttod(Data) As Data ; FROM crsDateComenzi ; order By nume, datai, semn, denumire ; into Cursor Commandes Readwrite Select Distinct cle1, 0 As niveau, "N" As expanded, .T. As Visible, ; cod_fiscal, email, telefon1 ; from Commandes Into Cursor c0 Select Distinct cle1, cle2, 1 As niveau, "N" As expanded, .F. As Visible, ; datai ; from Commandes Into Cursor c1 Otherwise && client/masina/articol Select nume As cle1, nrinmat As cle2, denumire As cle3, 2 As niveau, "" As expanded, .F. As Visible, ; cod_fiscal, email, telefon1, ; TTOD(datai) As datai, nrord, ; semn, codmat, cante, Pret, Ttod(Data) As Data ; FROM crsDateComenzi ; order By nume, nrinmat, semn, Data, denumire ; into Cursor Commandes Readwrite Select Distinct cle1, 0 As niveau, "N" As expanded, .T. As Visible, ; cod_fiscal, email, telefon1 ; from Commandes Into Cursor c0 Select Distinct cle1, cle2, 1 As niveau, "N" As expanded, .F. As Visible, ; datai, nrord ; from Commandes Into Cursor c1 Endcase Select Commandes Append From Dbf("c0") Append From Dbf("c1") Index On cle1+cle2+semn+cle3 Tag Id Use In (Select('c0')) Use In (Select('c1')) Select Commandes ENDPROC ENDDEFINE