Files
comun/ferestre/frm_cere_nrserie.sc2

107 lines
3.3 KiB
Plaintext

*--------------------------------------------------------------------------------------------------------------------------------------------------------
* (EN) AUTOGENERATED - ATTENTION!! - NOT INTENDED FOR EXECUTION!! USE ONLY FOR MERGING CHANGES AND STORING WITH SCM TOOLS!!
*--------------------------------------------------------------------------------------------------------------------------------------------------------
*< FOXBIN2PRG: Version="1.21" SourceFile="frm_cere_nrserie.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>
DataSource = .NULL.
Height = 0
Left = 0
Name = "Dataenvironment"
Top = 0
Width = 0
*</PropValue>
ENDDEFINE
DEFINE CLASS frm_termin_renunt1 AS frm_termin_renunt OF "..\clase\_frm_child.vcx"
*< CLASSDATA: Baseclass="form" Timestamp="" Scale="" Uniqueid="" />
*-- OBJECTDATA items order determines ZOrder / El orden de los items OBJECTDATA determina el ZOrder
*< OBJECTDATA: ObjPath="Clb_tx_serie" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="Clb_tx_nract" UniqueID="" Timestamp="" />
*<PropValue>
DoCreate = .T.
Height = 108
Name = "Frm_termin_renunt1"
Width = 332
WindowType = 1
_SHAPE1.Name = "_SHAPE1"
_SHAPE2.Height = 29
_SHAPE2.Left = 270
_SHAPE2.Name = "_SHAPE2"
_SHAPE2.Top = 0
_SHAPE2.Width = 67
LB_TITLU_ALB_B121.Caption = ""
LB_TITLU_ALB_B121.Name = "LB_TITLU_ALB_B121"
LB_TITLU_ALB_B121.TabIndex = 5
BUT_TERMIN1.Left = 301
BUT_TERMIN1.Name = "BUT_TERMIN1"
BUT_TERMIN1.TabIndex = 3
BUT_TERMIN1.Top = 1
Gridsort1.Name = "Gridsort1"
BUT_RENUNT1.Left = 272
BUT_RENUNT1.Name = "BUT_RENUNT1"
BUT_RENUNT1.TabIndex = 4
BUT_RENUNT1.Top = 1
*</PropValue>
ADD OBJECT 'Clb_tx_nract' AS clb_tx_simplu WITH ;
Height = 29, ;
Left = 13, ;
Name = "Clb_tx_nract", ;
TabIndex = 2, ;
Top = 68, ;
Width = 306, ;
Text_simplu1.Alignment = 3, ;
Text_simplu1.ControlSource = "pnNrAct", ;
Text_simplu1.Height = 23, ;
Text_simplu1.InputMask = (get_mask(14,0)), ;
Text_simplu1.Left = 144, ;
Text_simplu1.Name = "Text_simplu1", ;
Text_simplu1.TabIndex = 1, ;
Text_simplu1.Top = 3, ;
Text_simplu1.Value = 0, ;
Text_simplu1.Width = 154, ;
Lb_simplu1.Caption = "Numar doc.", ;
Lb_simplu1.FontSize = 10, ;
Lb_simplu1.Name = "Lb_simplu1", ;
Lb_simplu1.TabIndex = 2
*< END OBJECT: ClassLib="..\clase\lb_tx.vcx" BaseClass="container" />
ADD OBJECT 'Clb_tx_serie' AS clb_tx_simplu WITH ;
Height = 29, ;
Left = 13, ;
Name = "Clb_tx_serie", ;
TabIndex = 1, ;
Top = 40, ;
Width = 306, ;
TEXT_SIMPLU1.ControlSource = "pcSerie", ;
TEXT_SIMPLU1.Height = 23, ;
TEXT_SIMPLU1.Left = 144, ;
TEXT_SIMPLU1.Name = "TEXT_SIMPLU1", ;
TEXT_SIMPLU1.TabIndex = 1, ;
TEXT_SIMPLU1.Top = 3, ;
TEXT_SIMPLU1.Width = 154, ;
LB_SIMPLU1.Caption = "Seria", ;
LB_SIMPLU1.FontSize = 10, ;
LB_SIMPLU1.Name = "LB_SIMPLU1", ;
LB_SIMPLU1.TabIndex = 2
*< END OBJECT: ClassLib="..\clase\lb_tx.vcx" BaseClass="container" />
PROCEDURE Init
Parameters tcTitlu
If !Empty(tcTitlu)
This.lB_TITLU_ALB_B121.Caption = tcTitlu
Endif
DoDefault()
ENDPROC
ENDDEFINE