*--------------------------------------------------------------------------------------------------------------------------------------------------------
* (EN) AUTOGENERATED - ATTENTION!! - NOT INTENDED FOR EXECUTION!! USE ONLY FOR MERGING CHANGES AND STORING WITH SCM TOOLS!!
*--------------------------------------------------------------------------------------------------------------------------------------------------------
*< FOXBIN2PRG: Version="1.21" SourceFile="introd.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" />

	*<PropValue>
		Name = "Dataenvironment"
	*</PropValue>

ENDDEFINE

DEFINE CLASS ffergen1 AS ffergen OF "..\clase\ferestrebaza.vcx" 
 	*< CLASSDATA: Baseclass="form" Timestamp="" Scale="" Uniqueid="" />

	*-- OBJECTDATA items order determines ZOrder / El orden de los items OBJECTDATA determina el ZOrder 
	*< OBJECTDATA: ObjPath="Shape1" UniqueID="" Timestamp="" />
	*< OBJECTDATA: ObjPath="Label18" UniqueID="" Timestamp="" />
	*< OBJECTDATA: ObjPath="Label10" UniqueID="" Timestamp="" />
	*< OBJECTDATA: ObjPath="Label1" UniqueID="" Timestamp="" />
	*< OBJECTDATA: ObjPath="Grid1" UniqueID="" Timestamp="" />
	*< OBJECTDATA: ObjPath="Grid1.Column1.Header1" UniqueID="" Timestamp="" />
	*< OBJECTDATA: ObjPath="Grid1.Column1.Text1" UniqueID="" Timestamp="" />
	*< OBJECTDATA: ObjPath="Grid1.Column2.Header1" UniqueID="" Timestamp="" />
	*< OBJECTDATA: ObjPath="Grid1.Column2.Text1" UniqueID="" Timestamp="" />
	*< OBJECTDATA: ObjPath="Grid1.Column3.Header1" UniqueID="" Timestamp="" />
	*< OBJECTDATA: ObjPath="Grid1.Column3.Text1" UniqueID="" Timestamp="" />
	*< OBJECTDATA: ObjPath="Grid1.Column4.Header1" UniqueID="" Timestamp="" />
	*< OBJECTDATA: ObjPath="Grid1.Column4.Text1" UniqueID="" Timestamp="" />
	*< OBJECTDATA: ObjPath="Shape2" UniqueID="" Timestamp="" />
	*< OBJECTDATA: ObjPath="Label2" UniqueID="" Timestamp="" />
	*< OBJECTDATA: ObjPath="Text1" UniqueID="" Timestamp="" />
	*< OBJECTDATA: ObjPath="Label3" UniqueID="" Timestamp="" />
	*< OBJECTDATA: ObjPath="Text2" UniqueID="" Timestamp="" />
	*< OBJECTDATA: ObjPath="Label4" UniqueID="" Timestamp="" />
	*< OBJECTDATA: ObjPath="Text3" UniqueID="" Timestamp="" />
	*< OBJECTDATA: ObjPath="Label5" UniqueID="" Timestamp="" />
	*< OBJECTDATA: ObjPath="Text4" UniqueID="" Timestamp="" />
	*< OBJECTDATA: ObjPath="Label6" UniqueID="" Timestamp="" />
	*< OBJECTDATA: ObjPath="Text5" UniqueID="" Timestamp="" />
	*< OBJECTDATA: ObjPath="Label7" UniqueID="" Timestamp="" />
	*< OBJECTDATA: ObjPath="Text6" UniqueID="" Timestamp="" />
	*< OBJECTDATA: ObjPath="Label8" UniqueID="" Timestamp="" />
	*< OBJECTDATA: ObjPath="Text14" UniqueID="" Timestamp="" />
	*< OBJECTDATA: ObjPath="Label17" UniqueID="" Timestamp="" />
	*< OBJECTDATA: ObjPath="Text7" UniqueID="" Timestamp="" />
	*< OBJECTDATA: ObjPath="Label9" UniqueID="" Timestamp="" />
	*< OBJECTDATA: ObjPath="Text8" UniqueID="" Timestamp="" />
	*< OBJECTDATA: ObjPath="Label11" UniqueID="" Timestamp="" />
	*< OBJECTDATA: ObjPath="Text9" UniqueID="" Timestamp="" />
	*< OBJECTDATA: ObjPath="Label12" UniqueID="" Timestamp="" />
	*< OBJECTDATA: ObjPath="Text10" UniqueID="" Timestamp="" />
	*< OBJECTDATA: ObjPath="Label13" UniqueID="" Timestamp="" />
	*< OBJECTDATA: ObjPath="Text11" UniqueID="" Timestamp="" />
	*< OBJECTDATA: ObjPath="Label14" UniqueID="" Timestamp="" />
	*< OBJECTDATA: ObjPath="Text12" UniqueID="" Timestamp="" />
	*< OBJECTDATA: ObjPath="Label15" UniqueID="" Timestamp="" />
	*< OBJECTDATA: ObjPath="Text13" UniqueID="" Timestamp="" />
	*< OBJECTDATA: ObjPath="Label16" UniqueID="" Timestamp="" />
	*< OBJECTDATA: ObjPath="Shape3" UniqueID="" Timestamp="" />
	*< OBJECTDATA: ObjPath="CMDTERMIN1" UniqueID="" Timestamp="" />
	*< OBJECTDATA: ObjPath="CMDRENUNT1" UniqueID="" Timestamp="" />
	*< OBJECTDATA: ObjPath="Cmdlist1" UniqueID="" Timestamp="" />
	*< OBJECTDATA: ObjPath="Text16" UniqueID="" Timestamp="" />
	*< OBJECTDATA: ObjPath="Text17" UniqueID="" Timestamp="" />

	*<PropValue>
		DoCreate = .T.
		Height = 480
		Name = "Ffergen1"
		Width = 721
		WindowState = 0
		Line1.Left = 0
		Line1.Name = "Line1"
		Line1.Top = 472
		Line1.ZOrderSet = 1
	*</PropValue>

	ADD OBJECT 'Cmdlist1' AS cmdlist WITH ;
		Enabled = .F., ;
		Left = 408, ;
		Name = "Cmdlist1", ;
		TabIndex = 36, ;
		Top = 435, ;
		Width = 90
		*< END OBJECT: ClassLib="..\clase\ferestrebaza.vcx" BaseClass="commandbutton" />

	ADD OBJECT 'CMDRENUNT1' AS cmdrenunt WITH ;
		Left = 505, ;
		Name = "CMDRENUNT1", ;
		TabIndex = 35, ;
		Top = 435, ;
		Width = 90
		*< END OBJECT: ClassLib="..\clase\ferestrebaza.vcx" BaseClass="commandbutton" />

	ADD OBJECT 'CMDTERMIN1' AS cmdtermin WITH ;
		Left = 600, ;
		Name = "CMDTERMIN1", ;
		TabIndex = 34, ;
		Top = 435, ;
		Width = 90, ;
		ZOrderSet = 34
		*< END OBJECT: ClassLib="..\clase\ferestrebaza.vcx" BaseClass="commandbutton" />

	ADD OBJECT 'Grid1' AS grid WITH ;
		BackColor = 192,192,192, ;
		ColumnCount = 4, ;
		DeleteMark = .F., ;
		FontName = "Arial Narrow", ;
		GridLines = 0, ;
		Height = 336, ;
		Left = 24, ;
		Name = "Grid1", ;
		Panel = 1, ;
		ReadOnly = .T., ;
		RecordSource = "actcs", ;
		TabIndex = 19, ;
		Top = 69, ;
		View = 0, ;
		Width = 300, ;
		ZOrderSet = 4, ;
		Column1.BackColor = 192,192,192, ;
		Column1.ControlSource = "nract", ;
		Column1.FontName = "Arial Narrow", ;
		Column1.Name = "Column1", ;
		Column1.ReadOnly = .T., ;
		Column1.Width = 59, ;
		Column2.BackColor = 192,192,192, ;
		Column2.ControlSource = "dataact", ;
		Column2.FontName = "Arial Narrow", ;
		Column2.Name = "Column2", ;
		Column2.ReadOnly = .T., ;
		Column2.Width = 61, ;
		Column3.BackColor = 192,192,192, ;
		Column3.ColumnOrder = 4, ;
		Column3.ControlSource = "nume", ;
		Column3.FontName = "Arial Narrow", ;
		Column3.Name = "Column3", ;
		Column3.ReadOnly = .T., ;
		Column3.Width = 123, ;
		Column4.BackColor = 192,192,192, ;
		Column4.ColumnOrder = 3, ;
		Column4.ControlSource = "explicatia", ;
		Column4.FontName = "Arial Narrow", ;
		Column4.Name = "Column4", ;
		Column4.ReadOnly = .T., ;
		Column4.Width = 148
		*< END OBJECT: BaseClass="grid" />

	ADD OBJECT 'Grid1.Column1.Header1' AS header WITH ;
		Caption = "Nr.Act", ;
		FontName = "Arial Narrow", ;
		Name = "Header1"
		*< END OBJECT: BaseClass="header" />

	ADD OBJECT 'Grid1.Column1.Text1' AS textbox WITH ;
		BackColor = 192,192,192, ;
		BorderStyle = 0, ;
		FontName = "Arial Narrow", ;
		ForeColor = 0,0,0, ;
		Margin = 0, ;
		Name = "Text1", ;
		ReadOnly = .T.
		*< END OBJECT: BaseClass="textbox" />

	ADD OBJECT 'Grid1.Column2.Header1' AS header WITH ;
		Caption = "Data", ;
		FontName = "Arial Narrow", ;
		Name = "Header1"
		*< END OBJECT: BaseClass="header" />

	ADD OBJECT 'Grid1.Column2.Text1' AS textbox WITH ;
		BackColor = 192,192,192, ;
		BorderStyle = 0, ;
		FontName = "Arial Narrow", ;
		ForeColor = 0,0,0, ;
		Margin = 0, ;
		Name = "Text1", ;
		ReadOnly = .T.
		*< END OBJECT: BaseClass="textbox" />

	ADD OBJECT 'Grid1.Column3.Header1' AS header WITH ;
		Caption = "Furnizor", ;
		FontName = "Arial Narrow", ;
		Name = "Header1"
		*< END OBJECT: BaseClass="header" />

	ADD OBJECT 'Grid1.Column3.Text1' AS textbox WITH ;
		BackColor = 192,192,192, ;
		BorderStyle = 0, ;
		FontName = "Arial Narrow", ;
		ForeColor = 0,0,0, ;
		Margin = 0, ;
		Name = "Text1", ;
		ReadOnly = .T.
		*< END OBJECT: BaseClass="textbox" />

	ADD OBJECT 'Grid1.Column4.Header1' AS header WITH ;
		Caption = "Explicatia", ;
		FontName = "Arial Narrow", ;
		Name = "Header1"
		*< END OBJECT: BaseClass="header" />

	ADD OBJECT 'Grid1.Column4.Text1' AS textbox WITH ;
		BackColor = 192,192,192, ;
		BorderStyle = 0, ;
		FontName = "Arial Narrow", ;
		ForeColor = 0,0,0, ;
		Margin = 0, ;
		Name = "Text1"
		*< END OBJECT: BaseClass="textbox" />

	ADD OBJECT 'Label1' AS label WITH ;
		Alignment = 0, ;
		AutoSize = .T., ;
		Caption = "Lista documentelor de achizitie", ;
		FontBold = .F., ;
		FontName = "BankGothic Md BT", ;
		FontShadow = .F., ;
		FontSize = 12, ;
		ForeColor = 0,0,0, ;
		Height = 19, ;
		Left = 24, ;
		Name = "Label1", ;
		TabIndex = 3, ;
		Top = 39, ;
		Width = 287, ;
		ZOrderSet = 3
		*< END OBJECT: BaseClass="label" />

	ADD OBJECT 'Label10' AS label WITH ;
		Alignment = 0, ;
		AutoSize = .T., ;
		Caption = "INTRODUCERE MIJLOACE FIXE in luna", ;
		FontBold = .T., ;
		FontName = "BankGothic Md BT", ;
		FontShadow = .F., ;
		FontSize = 12, ;
		ForeColor = 255,255,255, ;
		Height = 19, ;
		Left = 11, ;
		Name = "Label10", ;
		TabIndex = 2, ;
		Top = 8, ;
		Width = 386, ;
		ZOrderSet = 2
		*< END OBJECT: BaseClass="label" />

	ADD OBJECT 'Label11' AS label WITH ;
		Alignment = 0, ;
		AutoSize = .T., ;
		Caption = "Durata de amortizare", ;
		FontBold = .F., ;
		FontName = "Arial", ;
		FontShadow = .F., ;
		FontSize = 10, ;
		ForeColor = 0,0,0, ;
		Height = 18, ;
		Left = 366, ;
		Name = "Label11", ;
		TabIndex = 4, ;
		Top = 264, ;
		Width = 123, ;
		ZOrderSet = 22
		*< END OBJECT: BaseClass="label" />

	ADD OBJECT 'Label12' AS label WITH ;
		Alignment = 0, ;
		AutoSize = .T., ;
		Caption = "Uzura", ;
		FontBold = .F., ;
		FontName = "Arial", ;
		FontShadow = .F., ;
		FontSize = 10, ;
		ForeColor = 0,0,0, ;
		Height = 18, ;
		Left = 366, ;
		Name = "Label12", ;
		TabIndex = 6, ;
		Top = 287, ;
		Width = 36, ;
		ZOrderSet = 24
		*< END OBJECT: BaseClass="label" />

	ADD OBJECT 'Label13' AS label WITH ;
		Alignment = 0, ;
		AutoSize = .T., ;
		Caption = "Tip de amortizare", ;
		FontBold = .F., ;
		FontName = "Arial", ;
		FontShadow = .F., ;
		FontSize = 10, ;
		ForeColor = 0,0,0, ;
		Height = 18, ;
		Left = 366, ;
		Name = "Label13", ;
		TabIndex = 8, ;
		Top = 312, ;
		Width = 102, ;
		ZOrderSet = 26
		*< END OBJECT: BaseClass="label" />

	ADD OBJECT 'Label14' AS label WITH ;
		Alignment = 0, ;
		AutoSize = .T., ;
		Caption = "Gestiunea", ;
		FontBold = .F., ;
		FontName = "Arial", ;
		FontShadow = .F., ;
		FontSize = 10, ;
		ForeColor = 0,0,0, ;
		Height = 18, ;
		Left = 366, ;
		Name = "Label14", ;
		TabIndex = 10, ;
		Top = 336, ;
		Width = 61, ;
		ZOrderSet = 28
		*< END OBJECT: BaseClass="label" />

	ADD OBJECT 'Label15' AS label WITH ;
		Alignment = 0, ;
		AutoSize = .T., ;
		Caption = "Responsabil", ;
		FontBold = .F., ;
		FontName = "Arial", ;
		FontShadow = .F., ;
		FontSize = 10, ;
		ForeColor = 0,0,0, ;
		Height = 18, ;
		Left = 366, ;
		Name = "Label15", ;
		TabIndex = 12, ;
		Top = 361, ;
		Width = 73, ;
		ZOrderSet = 30
		*< END OBJECT: BaseClass="label" />

	ADD OBJECT 'Label16' AS label WITH ;
		Alignment = 0, ;
		AutoSize = .T., ;
		Caption = "Caracteristici", ;
		FontBold = .F., ;
		FontName = "Arial", ;
		FontShadow = .F., ;
		FontSize = 10, ;
		ForeColor = 0,0,0, ;
		Height = 18, ;
		Left = 367, ;
		Name = "Label16", ;
		TabIndex = 14, ;
		Top = 385, ;
		Width = 78, ;
		ZOrderSet = 32
		*< END OBJECT: BaseClass="label" />

	ADD OBJECT 'Label17' AS label WITH ;
		Alignment = 0, ;
		AutoSize = .T., ;
		Caption = "Nr. inventar", ;
		FontBold = .F., ;
		FontName = "Arial", ;
		FontShadow = .F., ;
		FontSize = 10, ;
		ForeColor = 0,0,0, ;
		Height = 18, ;
		Left = 366, ;
		Name = "Label17", ;
		TabIndex = 17, ;
		Top = 240, ;
		Width = 67, ;
		ZOrderSet = 20
		*< END OBJECT: BaseClass="label" />

	ADD OBJECT 'Label18' AS label WITH ;
		Alignment = 0, ;
		AutoSize = .T., ;
		Caption = "", ;
		FontBold = .T., ;
		FontName = "BankGothic Md BT", ;
		FontShadow = .F., ;
		FontSize = 12, ;
		ForeColor = 255,255,255, ;
		Height = 19, ;
		Left = 19, ;
		Name = "Label18", ;
		TabIndex = 1, ;
		Top = 15, ;
		Width = 2, ;
		ZOrderSet = 2
		*< END OBJECT: BaseClass="label" />

	ADD OBJECT 'Label2' AS label WITH ;
		Alignment = 0, ;
		AutoSize = .T., ;
		Caption = "Fisa mijlocului fix", ;
		FontBold = .F., ;
		FontName = "BankGothic Md BT", ;
		FontShadow = .F., ;
		FontSize = 12, ;
		ForeColor = 0,0,0, ;
		Height = 19, ;
		Left = 364, ;
		Name = "Label2", ;
		TabIndex = 5, ;
		Top = 39, ;
		Width = 167, ;
		ZOrderSet = 6
		*< END OBJECT: BaseClass="label" />

	ADD OBJECT 'Label3' AS label WITH ;
		Alignment = 0, ;
		AutoSize = .T., ;
		Caption = "Nr. document achizitie", ;
		FontBold = .F., ;
		FontName = "Arial", ;
		FontShadow = .F., ;
		FontSize = 10, ;
		ForeColor = 0,0,0, ;
		Height = 18, ;
		Left = 366, ;
		Name = "Label3", ;
		TabIndex = 7, ;
		Top = 70, ;
		Width = 132, ;
		ZOrderSet = 8
		*< END OBJECT: BaseClass="label" />

	ADD OBJECT 'Label4' AS label WITH ;
		Alignment = 0, ;
		AutoSize = .T., ;
		Caption = "Data document achizitie", ;
		FontBold = .F., ;
		FontName = "Arial", ;
		FontShadow = .F., ;
		FontSize = 10, ;
		ForeColor = 0,0,0, ;
		Height = 18, ;
		Left = 366, ;
		Name = "Label4", ;
		TabIndex = 9, ;
		Top = 95, ;
		Width = 142, ;
		ZOrderSet = 10
		*< END OBJECT: BaseClass="label" />

	ADD OBJECT 'Label5' AS label WITH ;
		Alignment = 0, ;
		AutoSize = .T., ;
		Caption = "Denumire ", ;
		FontBold = .F., ;
		FontName = "Arial", ;
		FontShadow = .F., ;
		FontSize = 10, ;
		ForeColor = 0,0,0, ;
		Height = 18, ;
		Left = 366, ;
		Name = "Label5", ;
		TabIndex = 11, ;
		Top = 119, ;
		Width = 61, ;
		ZOrderSet = 12
		*< END OBJECT: BaseClass="label" />

	ADD OBJECT 'Label6' AS label WITH ;
		Alignment = 0, ;
		AutoSize = .T., ;
		Caption = "Valoare de achizitie", ;
		FontBold = .F., ;
		FontName = "Arial", ;
		FontShadow = .F., ;
		FontSize = 10, ;
		ForeColor = 0,0,0, ;
		Height = 18, ;
		Left = 366, ;
		Name = "Label6", ;
		TabIndex = 13, ;
		Top = 144, ;
		Width = 116, ;
		ZOrderSet = 14
		*< END OBJECT: BaseClass="label" />

	ADD OBJECT 'Label7' AS label WITH ;
		Alignment = 0, ;
		AutoSize = .T., ;
		Caption = "Data punerii in functiune", ;
		FontBold = .F., ;
		FontName = "Arial", ;
		FontShadow = .F., ;
		FontSize = 10, ;
		ForeColor = 0,0,0, ;
		Height = 18, ;
		Left = 366, ;
		Name = "Label7", ;
		TabIndex = 15, ;
		Top = 168, ;
		Width = 141, ;
		ZOrderSet = 16
		*< END OBJECT: BaseClass="label" />

	ADD OBJECT 'Label8' AS label WITH ;
		Alignment = 0, ;
		AutoSize = .T., ;
		Caption = "Nr. p.i.f.", ;
		FontBold = .F., ;
		FontName = "Arial", ;
		FontShadow = .F., ;
		FontSize = 10, ;
		ForeColor = 0,0,0, ;
		Height = 18, ;
		Left = 366, ;
		Name = "Label8", ;
		TabIndex = 16, ;
		Top = 193, ;
		Width = 48, ;
		ZOrderSet = 18
		*< END OBJECT: BaseClass="label" />

	ADD OBJECT 'Label9' AS label WITH ;
		Alignment = 0, ;
		AutoSize = .T., ;
		Caption = "Cod", ;
		FontBold = .F., ;
		FontName = "Arial", ;
		FontShadow = .F., ;
		FontSize = 10, ;
		ForeColor = 0,0,0, ;
		Height = 18, ;
		Left = 366, ;
		Name = "Label9", ;
		TabIndex = 18, ;
		Top = 217, ;
		Width = 25, ;
		ZOrderSet = 20
		*< END OBJECT: BaseClass="label" />

	ADD OBJECT 'Shape1' AS shape WITH ;
		Height = 372, ;
		Left = 12, ;
		Name = "Shape1", ;
		SpecialEffect = 0, ;
		Top = 45, ;
		Width = 324, ;
		ZOrderSet = 0
		*< END OBJECT: BaseClass="shape" />

	ADD OBJECT 'Shape2' AS shape WITH ;
		Height = 372, ;
		Left = 348, ;
		Name = "Shape2", ;
		SpecialEffect = 0, ;
		Top = 45, ;
		Width = 360, ;
		ZOrderSet = 5
		*< END OBJECT: BaseClass="shape" />

	ADD OBJECT 'Shape3' AS shape WITH ;
		Height = 48, ;
		Left = 12, ;
		Name = "Shape3", ;
		SpecialEffect = 0, ;
		Top = 424, ;
		Width = 696, ;
		ZOrderSet = 33
		*< END OBJECT: BaseClass="shape" />

	ADD OBJECT 'Text1' AS textbox WITH ;
		Alignment = 3, ;
		BorderStyle = 1, ;
		ControlSource = "m.nract", ;
		Enabled = .F., ;
		FontName = "Arial Narrow", ;
		Height = 22, ;
		Left = 508, ;
		Name = "Text1", ;
		ReadOnly = .T., ;
		TabIndex = 20, ;
		Top = 68, ;
		Width = 180, ;
		ZOrderSet = 7
		*< END OBJECT: BaseClass="textbox" />

	ADD OBJECT 'Text10' AS textbox WITH ;
		Alignment = 3, ;
		ControlSource = "m.tipamort", ;
		Enabled = .F., ;
		FontName = "Arial Narrow", ;
		Height = 22, ;
		Left = 508, ;
		Name = "Text10", ;
		TabIndex = 30, ;
		Top = 310, ;
		Width = 180, ;
		ZOrderSet = 25
		*< END OBJECT: BaseClass="textbox" />

	ADD OBJECT 'Text11' AS textbox WITH ;
		Alignment = 3, ;
		ControlSource = "m.NUMEgest", ;
		Enabled = .F., ;
		FontName = "Arial Narrow", ;
		Height = 22, ;
		Left = 508, ;
		Name = "Text11", ;
		ReadOnly = .T., ;
		TabIndex = 31, ;
		Top = 334, ;
		Width = 180, ;
		ZOrderSet = 27
		*< END OBJECT: BaseClass="textbox" />

	ADD OBJECT 'Text12' AS textbox WITH ;
		Alignment = 3, ;
		ControlSource = "m.respons", ;
		Enabled = .F., ;
		FontName = "Arial Narrow", ;
		Height = 22, ;
		Left = 508, ;
		Name = "Text12", ;
		ReadOnly = .T., ;
		TabIndex = 32, ;
		Top = 359, ;
		Width = 180, ;
		ZOrderSet = 29
		*< END OBJECT: BaseClass="textbox" />

	ADD OBJECT 'Text13' AS textbox WITH ;
		Alignment = 3, ;
		ControlSource = "m.caract", ;
		Enabled = .F., ;
		FontName = "Arial Narrow", ;
		Height = 22, ;
		Left = 508, ;
		Name = "Text13", ;
		TabIndex = 33, ;
		Top = 383, ;
		Width = 180, ;
		ZOrderSet = 31
		*< END OBJECT: BaseClass="textbox" />

	ADD OBJECT 'Text14' AS textbox WITH ;
		Alignment = 3, ;
		ControlSource = "m.nrinv", ;
		Enabled = .F., ;
		FontName = "Arial Narrow", ;
		Height = 22, ;
		Left = 508, ;
		Name = "Text14", ;
		TabIndex = 27, ;
		Top = 238, ;
		Width = 180, ;
		ZOrderSet = 19
		*< END OBJECT: BaseClass="textbox" />

	ADD OBJECT 'Text16' AS textbox WITH ;
		BorderStyle = 0, ;
		ControlSource = "m.nl", ;
		FontBold = .T., ;
		FontName = "BankGothic Md BT", ;
		FontSize = 12, ;
		ForeColor = 255,255,255, ;
		Height = 23, ;
		Left = 404, ;
		Name = "Text16", ;
		ReadOnly = .T., ;
		TabIndex = 37, ;
		Top = 6, ;
		Width = 36
		*< END OBJECT: BaseClass="textbox" />

	ADD OBJECT 'Text17' AS textbox WITH ;
		Alignment = 0, ;
		BorderStyle = 0, ;
		ControlSource = "m.an", ;
		FontBold = .T., ;
		FontName = "BankGothic Md BT", ;
		FontSize = 12, ;
		ForeColor = 255,255,255, ;
		Height = 23, ;
		Left = 446, ;
		Name = "Text17", ;
		ReadOnly = .T., ;
		TabIndex = 38, ;
		Top = 6, ;
		Width = 80
		*< END OBJECT: BaseClass="textbox" />

	ADD OBJECT 'Text2' AS textbox WITH ;
		Alignment = 3, ;
		BorderStyle = 1, ;
		ControlSource = "m.dataact", ;
		Enabled = .F., ;
		FontName = "Arial Narrow", ;
		Height = 22, ;
		Left = 508, ;
		Name = "Text2", ;
		ReadOnly = .T., ;
		TabIndex = 21, ;
		Top = 93, ;
		Width = 180, ;
		ZOrderSet = 9
		*< END OBJECT: BaseClass="textbox" />

	ADD OBJECT 'Text3' AS textbox WITH ;
		Alignment = 3, ;
		ControlSource = "m.denumire", ;
		Enabled = .F., ;
		FontName = "Arial Narrow", ;
		Height = 22, ;
		Left = 508, ;
		Name = "Text3", ;
		TabIndex = 22, ;
		Top = 117, ;
		Width = 180, ;
		ZOrderSet = 11
		*< END OBJECT: BaseClass="textbox" />

	ADD OBJECT 'Text4' AS textbox WITH ;
		Alignment = 3, ;
		ControlSource = "m.valoare", ;
		Enabled = .F., ;
		FontName = "Arial Narrow", ;
		Height = 22, ;
		Left = 508, ;
		Name = "Text4", ;
		TabIndex = 23, ;
		Top = 142, ;
		Width = 180, ;
		ZOrderSet = 13
		*< END OBJECT: BaseClass="textbox" />

	ADD OBJECT 'Text5' AS textbox WITH ;
		Alignment = 3, ;
		ControlSource = "m.datapif", ;
		Enabled = .F., ;
		FontName = "Arial Narrow", ;
		Height = 22, ;
		Left = 508, ;
		Name = "Text5", ;
		TabIndex = 24, ;
		Top = 166, ;
		Width = 180, ;
		ZOrderSet = 15
		*< END OBJECT: BaseClass="textbox" />

	ADD OBJECT 'Text6' AS textbox WITH ;
		Alignment = 3, ;
		ControlSource = "m.nrpif", ;
		Enabled = .F., ;
		FontName = "Arial Narrow", ;
		Height = 22, ;
		Left = 508, ;
		Name = "Text6", ;
		TabIndex = 25, ;
		Top = 191, ;
		Width = 180, ;
		ZOrderSet = 17
		*< END OBJECT: BaseClass="textbox" />

	ADD OBJECT 'Text7' AS textbox WITH ;
		Alignment = 3, ;
		ControlSource = "m.codmf", ;
		Enabled = .F., ;
		FontName = "Arial Narrow", ;
		Height = 22, ;
		Left = 508, ;
		Name = "Text7", ;
		TabIndex = 26, ;
		Top = 215, ;
		Width = 180, ;
		ZOrderSet = 19
		*< END OBJECT: BaseClass="textbox" />

	ADD OBJECT 'Text8' AS textbox WITH ;
		Alignment = 3, ;
		ControlSource = "m.normat", ;
		Enabled = .F., ;
		FontName = "Arial Narrow", ;
		Height = 22, ;
		Left = 508, ;
		Name = "Text8", ;
		TabIndex = 28, ;
		Top = 262, ;
		Width = 180, ;
		ZOrderSet = 21
		*< END OBJECT: BaseClass="textbox" />

	ADD OBJECT 'Text9' AS textbox WITH ;
		Alignment = 3, ;
		ControlSource = "m.uzura", ;
		Enabled = .F., ;
		FontName = "Arial Narrow", ;
		Height = 22, ;
		Left = 508, ;
		Name = "Text9", ;
		TabIndex = 29, ;
		Top = 285, ;
		Width = 180, ;
		ZOrderSet = 23
		*< END OBJECT: BaseClass="textbox" />
	
	PROCEDURE Init
		sele act
		set filter to left(scc,3)='404' 
	ENDPROC

	PROCEDURE CMDTERMIN1.Valid
		sele mf
		appe blank
		gather memvar
		
	ENDPROC

	PROCEDURE Grid1.AfterRowColChange
		LPARAMETERS nColIndex
		local i,t
		
		sele actcs
		scatter memvar
		for i=1 to 14
		t='thisform.text'+alltrim(str(i))+'.enabled=.t.'
		&t
		next
		
		M.DENUMIRE=M.EXPLICATIA
		thisform.text1.refresh
		thisform.text2.refresh
		thisform.text3.refresh
	ENDPROC

	PROCEDURE Text11.GotFocus
		thisform.cmdtermin1.enabled=.f.
		thisform.cmdrenunt1.enabled=.f.
		thisform.cmdlist1.enabled=.f.
		DO CAUT_ALF WITH "NUMEGEST","NUMEGEST",'NUMELE GESTIUNII','M.NUMEGEST'
		thisform.cmdtermin1.enabled=.t.
		thisform.cmdrenunt1.enabled=.t.
		thisform.cmdlist1.enabled=.t.
		SELE NUMEGEST
		LOCATE FOR NUMEGEST=M.NUMEGEST
		SCATTER MEMVAR
	ENDPROC

	PROCEDURE Text12.GotFocus
		thisform.cmdtermin1.enabled=.f.
		thisform.cmdrenunt1.enabled=.f.
		thisform.cmdlist1.enabled=.f.
		DO CAUT_ALF WITH "respons","nume_2",'NUMELE RESPONSABILULUI','M.NUME_2'
		thisform.cmdtermin1.enabled=.t.
		thisform.cmdrenunt1.enabled=.t.
		thisform.cmdlist1.enabled=.t.
		M.RESPONS=M.NUME_2
	ENDPROC

ENDDEFINE
