romfast/roacont
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity
Files
b3cbeef69180bbbe5e088c4eabb7302e0379c55d
roacont/Clase/contab.vc2

3442 lines
99 KiB
Plaintext
Raw Blame History

*--------------------------------------------------------------------------------------------------------------------------------------------------------
* (EN) AUTOGENERATED - ATTENTION!! - NOT INTENDED FOR EXECUTION!! USE ONLY FOR MERGING CHANGES AND STORING WITH SCM TOOLS!!
*--------------------------------------------------------------------------------------------------------------------------------------------------------
*< FOXBIN2PRG: Version="1.21" SourceFile="contab.vcx" CPID="1252" /> (Solo para binarios VFP 9 / Only for VFP 9 binaries)
*
*
DEFINE CLASS pagefr AS pageframe
*< CLASSDATA: Baseclass="pageframe" Timestamp="" Scale="Pixels" Uniqueid="" />
*<DefinedPropArrayMethod>
*m: activate_pag
*p: c_deschis
*p: c_gri
*p: c_inchis
*</DefinedPropArrayMethod>
*<PropValue>
c_deschis = 16777215
c_gri = 255
c_inchis = 8404992
ErasePage = .T.
Height = 90
Name = "pagefr"
PageCount = 7
TabStyle = 1
Themes = .F.
Width = 787
Page1.Caption = " * "
Page1.FontName = "Segoe UI"
Page1.FontSize = 10
Page1.Name = "p1"
Page2.Caption = "Capitaluri"
Page2.FontName = "Segoe UI"
Page2.FontSize = 10
Page2.Name = "p2"
Page3.Caption = "Imobilizari"
Page3.FontName = "Segoe UI"
Page3.FontSize = 10
Page3.Name = "p3"
Page4.Caption = " Terti "
Page4.FontName = "Segoe UI"
Page4.FontSize = 10
Page4.Name = "p4"
Page5.Caption = "Trezorerie"
Page5.FontName = "Segoe UI"
Page5.FontSize = 10
Page5.Name = "p5"
Page6.Caption = "Cheltuieli"
Page6.FontName = "Segoe UI"
Page6.FontSize = 10
Page6.Name = "p6"
Page7.Caption = "Venituri"
Page7.FontName = "Segoe UI"
Page7.FontSize = 10
Page7.Name = "p7"
*</PropValue>
PROCEDURE activate_pag
Lparameters toPagina, tnPagina1, tnPagina2
*!* FOR i=1 TO THIS.PAGECOUNT
*!* zi='this.p'+ALLTRIM(STR(i))+'.'
*!* IF i<>np
*!* &zi.BACKCOLOR=THIS.c_gri
*!* &zi.FORECOLOR=THIS.c_deschis
*!* ELSE
*!* &zi.BACKCOLOR=THIS.c_deschis
*!* &zi.FORECOLOR=THIS.c_inchis
*!* ENDIF
*!* NEXT
*nr_gest=np
*osetgest.tbrprim.refresh
ENDPROC
PROCEDURE Init
*!* this.c_gri = 11630087
this.c_gri = RGB(255,255,255)
*!* this.c_deschis = RGB(255,255,255) && 016777215
this.c_deschis = RGB(255,255,255) && 016777215
this.c_inchis = RGB(255,255,255) && 0 &&8404992
this.SetAll('backcolor',this.c_gri,'page')
ENDPROC
PROCEDURE p1.Activate
this.parent.activate_pag(1)
ENDPROC
PROCEDURE p2.Activate
this.parent.activate_pag(2)
ENDPROC
PROCEDURE p3.Activate
this.parent.activate_pag(3)
ENDPROC
PROCEDURE p4.Activate
this.parent.activate_pag(4)
ENDPROC
PROCEDURE p5.Activate
this.parent.activate_pag(5)
ENDPROC
PROCEDURE p6.Activate
this.parent.activate_pag(6)
ENDPROC
PROCEDURE p7.Activate
this.parent.activate_pag(7)
ENDPROC
ENDDEFINE
DEFINE CLASS princ AS ffergen OF "..\comun\clase\_frm_base.vcx"
*< CLASSDATA: Baseclass="form" Timestamp="" Scale="Pixels" Uniqueid="" />
*-- OBJECTDATA items order determines ZOrder / El orden de los items OBJECTDATA determina el ZOrder
*< OBJECTDATA: ObjPath="Pagefr1" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="Pagefr1.p1.shape1" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="Pagefr1.p1.Cw1" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="Pagefr1.p1.Cw2" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="Pagefr1.p1.Cw6" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="Pagefr1.p1.Cw4" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="Pagefr1.p1.Cw3" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="Pagefr1.p1.Cw7" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="Pagefr1.p1.Cw10" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="Pagefr1.p1.Cw8" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="Pagefr1.p1.Cw9" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="Pagefr1.p1.Cw5" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="Pagefr1.p1.Pict_liniuta1" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="Pagefr1.p1.Pict_liniuta2" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="Pagefr1.p1.Pict_liniuta5" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="Pagefr1.p2.shape1" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="Pagefr1.p2.Cw1" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="Pagefr1.p2.Cw2" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="Pagefr1.p2.Cw3" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="Pagefr1.p2.Cw4" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="Pagefr1.p2.Cw5" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="Pagefr1.p2.Cw6" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="Pagefr1.p2.Pict_liniuta1" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="Pagefr1.p2.Cw7" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="Pagefr1.p2.Cw8" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="Pagefr1.p3.shape1" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="Pagefr1.p3.Cw1" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="Pagefr1.p3.Cw2" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="Pagefr1.p3.Cw3" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="Pagefr1.p3.Cw4" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="Pagefr1.p3.Cw5" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="Pagefr1.p3.Pict_liniuta1" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="Pagefr1.p3.Cw6" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="Pagefr1.p4.Pfr" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="Pagefr1.p4.Pfr.pp1.shape1" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="Pagefr1.p4.Pfr.pp1.Cw1" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="Pagefr1.p4.Pfr.pp1.Cw2" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="Pagefr1.p4.Pfr.pp1.Cw3" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="Pagefr1.p4.Pfr.pp1.Cw5" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="Pagefr1.p4.Pfr.pp1.Cw6" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="Pagefr1.p4.Pfr.pp1.Cw7" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="Pagefr1.p4.Pfr.pp1.Cw9" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="Pagefr1.p4.Pfr.pp1.Cw10" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="Pagefr1.p4.Pfr.pp1.Cw8" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="Pagefr1.p4.Pfr.pp1.Pict_liniuta1" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="Pagefr1.p4.Pfr.pp1.Pict_liniuta2" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="Pagefr1.p4.Pfr.pp1.Pict_liniuta3" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="Pagefr1.p4.Pfr.pp2.shape1" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="Pagefr1.p4.Pfr.pp2.Cw1" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="Pagefr1.p4.Pfr.pp2.Cw2" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="Pagefr1.p4.Pfr.pp2.Cw3" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="Pagefr1.p4.Pfr.pp2.Cw4" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="Pagefr1.p4.Pfr.pp2.Cw5" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="Pagefr1.p4.Pfr.pp2.Cw6" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="Pagefr1.p4.Pfr.pp2.Cw7" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="Pagefr1.p4.Pfr.pp2.Cw9" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="Pagefr1.p4.Pfr.pp2.Cw10" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="Pagefr1.p4.Pfr.pp2.Pict_liniuta1" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="Pagefr1.p4.Pfr.pp2.Pict_liniuta2" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="Pagefr1.p4.Pfr.pp2.Pict_liniuta3" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="Pagefr1.p4.Pfr.pp2.Cw101" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="Pagefr1.p4.Pfr.pp3.shape1" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="Pagefr1.p4.Pfr.pp3.Cw1" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="Pagefr1.p4.Pfr.pp3.Cw2" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="Pagefr1.p4.Pfr.pp3.Cw4" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="Pagefr1.p4.Pfr.pp3.Cw9" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="Pagefr1.p4.Pfr.pp3.Cw3" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="Pagefr1.p4.Pfr.pp3.Cw7" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="Pagefr1.p4.Pfr.pp3.Cw8" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="Pagefr1.p4.Pfr.pp3.Cw10" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="Pagefr1.p4.Pfr.pp3.Cw11" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="Pagefr1.p4.Pfr.pp3.Cw12" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="Pagefr1.p4.Pfr.pp3.Cw13" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="Pagefr1.p4.Pfr.pp3.Pict_liniuta1" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="Pagefr1.p4.Pfr.pp3.Pict_liniuta2" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="Pagefr1.p4.Pfr.pp3.Pict_liniuta3" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="Pagefr1.p4.Pfr.pp3.Pict_liniuta4" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="Pagefr1.p4.Pfr.pp3.Cw5" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="Pagefr1.p4.Pfr.pp3.Cw6" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="Pagefr1.p4.Pfr.pp3.Cw14" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="Pagefr1.p5.Pfr" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="Pagefr1.p5.Pfr.pp1.shape1" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="Pagefr1.p5.Pfr.pp1.Cw1" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="Pagefr1.p5.Pfr.pp1.Cw2" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="Pagefr1.p5.Pfr.pp1.Cw3" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="Pagefr1.p5.Pfr.pp1.Cw4" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="Pagefr1.p5.Pfr.pp1.Cw5" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="Pagefr1.p5.Pfr.pp1.Cw6" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="Pagefr1.p5.Pfr.pp1.Cw7" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="Pagefr1.p5.Pfr.pp1.Cw8" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="Pagefr1.p5.Pfr.pp1.Pict_liniuta1" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="Pagefr1.p5.Pfr.pp1.Pict_liniuta2" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="Pagefr1.p5.Pfr.pp1.Pict_liniuta3" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="Pagefr1.p5.Pfr.pp1.Pict_liniuta4" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="Pagefr1.p5.Pfr.pp2.shape1" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="Pagefr1.p5.Pfr.pp2.Cw1" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="Pagefr1.p5.Pfr.pp2.Cw2" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="Pagefr1.p5.Pfr.pp2.Cw3" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="Pagefr1.p5.Pfr.pp2.Cw4" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="Pagefr1.p5.Pfr.pp2.Cw5" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="Pagefr1.p5.Pfr.pp2.Cw6" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="Pagefr1.p5.Pfr.pp2.Cw7" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="Pagefr1.p5.Pfr.pp2.Cw8" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="Pagefr1.p5.Pfr.pp2.Pict_liniuta1" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="Pagefr1.p5.Pfr.pp2.Pict_liniuta2" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="Pagefr1.p5.Pfr.pp2.Pict_liniuta3" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="Pagefr1.p5.Pfr.pp2.Pict_liniuta4" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="Pagefr1.p5.Pfr.pp3.shape1" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="Pagefr1.p5.Pfr.pp3.Cw1" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="Pagefr1.p5.Pfr.pp3.Cw4" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="Pagefr1.p5.Pfr.pp3.Cw2" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="Pagefr1.p5.Pfr.pp3.Cw3" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="Pagefr1.p5.Pfr.pp3.Cw5" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="Pagefr1.p5.Pfr.pp3.Cw6" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="Pagefr1.p5.Pfr.pp3.Cw7" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="Pagefr1.p5.Pfr.pp3.Cw8" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="Pagefr1.p5.Pfr.pp3.Pict_liniuta1" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="Pagefr1.p5.Pfr.pp3.Pict_liniuta2" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="Pagefr1.p5.Pfr.pp3.Pict_liniuta3" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="Pagefr1.p6.shape1" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="Pagefr1.p6.Cw1" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="Pagefr1.p6.Cw3" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="Pagefr1.p6.Pict_liniuta1" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="Pagefr1.p6.Pict_liniuta2" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="Pagefr1.p6.Cw4" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="Pagefr1.p7.shape1" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="Pagefr1.p7.Cw1" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="Pagefr1.p7.Cw3" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="Pagefr1.p7.Pict_liniuta1" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="Pagefr1.p7.Pict_liniuta2" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="Image1" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="Container1" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="Container1.Label1" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="Container1.Text1" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="Image2" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="Imagine06" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="Imagine08" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="Imagine07" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="Imagine10" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="Imagine09" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="Imagine04" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="Imagine05" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="Imagine02" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="Imagine03" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="Imagine01" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="oContextMenu" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="Imagine11" UniqueID="" Timestamp="" />
*<DefinedPropArrayMethod>
*m: activate_pag2
*m: activate_pag3
*m: getcwbynumber
*m: verifica_invalidat
*p: npagina1 && numarul paginii din pageframe-ul principal
*p: npagina2 && numarul paginii din pageframe-ul secundar
*p: opaginaactiva
*p: _memberdata && XML Metadata for customizable properties
*</DefinedPropArrayMethod>
*<PropValue>
AlwaysOnTop = .F.
BackColor = 255,255,255
BorderStyle = 1
DoCreate = .T.
Height = 565
KeyPreview = .T.
Name = "princ"
npagina1 = 1
npagina2 = 1
opaginaactiva = NULL
ShowTips = .T.
Width = 800
WindowState = 2
WindowType = 0
_memberdata = <VFPData>
</VFPData>
*</PropValue>
ADD OBJECT 'Container1' AS container WITH ;
Anchor = 6, ;
BackColor = 255,255,255, ;
BackStyle = 0, ;
BorderWidth = 0, ;
Height = 48, ;
Left = 204, ;
Name = "Container1", ;
SpecialEffect = 1, ;
TabIndex = 2, ;
TabStop = .F., ;
Top = 478, ;
Width = 302, ;
ZOrderSet = 3
*< END OBJECT: BaseClass="container" />
ADD OBJECT 'Container1.Label1' AS label WITH ;
AutoSize = .T., ;
BackStyle = 0, ;
Caption = "Operator:", ;
FontItalic = .T., ;
ForeColor = 0,0,128, ;
Height = 17, ;
Left = 8, ;
Name = "Label1", ;
Top = 7, ;
Width = 53
*< END OBJECT: BaseClass="label" />
ADD OBJECT 'Container1.Text1' AS label WITH ;
BackStyle = 0, ;
Caption = "Text", ;
FontBold = .T., ;
FontItalic = .T., ;
ForeColor = 0,0,128, ;
Height = 17, ;
Left = 66, ;
Name = "Text1", ;
Top = 7, ;
Width = 216
*< END OBJECT: BaseClass="label" />
ADD OBJECT 'Image1' AS image WITH ;
Anchor = 12, ;
BackStyle = 0, ;
Height = 220, ;
Left = 215, ;
Name = "Image1", ;
Picture = ..\grafice\roacont.bmp, ;
Stretch = 0, ;
Top = 279, ;
Visible = .T., ;
Width = 556, ;
ZOrderSet = 2
*< END OBJECT: BaseClass="image" />
ADD OBJECT 'Image2' AS image WITH ;
Height = 63, ;
Left = -3, ;
Name = "Image2", ;
Picture = ..\comun\grafice\f1.jpg, ;
Stretch = 2, ;
Top = 0, ;
Width = 851
*< END OBJECT: BaseClass="image" />
ADD OBJECT 'Imagine01' AS imagine WITH ;
ccod = A01, ;
Height = 55, ;
Left = 3, ;
Name = "Imagine01", ;
nid_img = 1, ;
ntip = 3, ;
Picture = ..\grafice\bal1.bmp, ;
picturedown = bal2.bmp, ;
pictureup = bal1.bmp, ;
ToolTipText = "Balanta", ;
Top = 0, ;
Width = 52
*< END OBJECT: ClassLib="..\comun\clase\ofundal.vcx" BaseClass="image" />
ADD OBJECT 'Imagine02' AS imagine WITH ;
ccod = A02, ;
Height = 55, ;
Left = 56, ;
Name = "Imagine02", ;
nid_img = 2, ;
ntip = 4, ;
Picture = ..\comun\grafice\rj1.bmp, ;
picturedown = rj2.bmp, ;
pictureup = rj1.bmp, ;
ToolTipText = "Registrul jurnal", ;
Top = 0, ;
Width = 52
*< END OBJECT: ClassLib="..\comun\clase\ofundal.vcx" BaseClass="image" />
ADD OBJECT 'Imagine03' AS imagine WITH ;
ccod = EA04, ;
Height = 55, ;
Left = 108, ;
Name = "Imagine03", ;
nid_img = 3, ;
ntip = 2, ;
Picture = ..\grafice\casa1.bmp, ;
picturedown = casa2.bmp, ;
pictureup = casa1.bmp, ;
ToolTipText = "Registrul de Casa", ;
Top = 0, ;
Width = 52
*< END OBJECT: ClassLib="..\comun\clase\ofundal.vcx" BaseClass="image" />
ADD OBJECT 'Imagine04' AS imagine WITH ;
ccod = EB04, ;
Height = 55, ;
Left = 160, ;
Name = "Imagine04", ;
nid_img = 4, ;
ntip = 2, ;
Picture = ..\grafice\banca1.bmp, ;
picturedown = banca2.bmp, ;
pictureup = banca1.bmp, ;
ToolTipText = "Registrul de Banca", ;
Top = 0, ;
Width = 52
*< END OBJECT: ClassLib="..\comun\clase\ofundal.vcx" BaseClass="image" />
ADD OBJECT 'Imagine05' AS imagine WITH ;
ccod = DB06, ;
Height = 55, ;
Left = 212, ;
Name = "Imagine05", ;
nid_img = 5, ;
ntip = 2, ;
Picture = ..\comun\grafice\rv1.bmp, ;
picturedown = rv2.bmp, ;
pictureup = rv1.bmp, ;
ToolTipText = "Registrul de vanzari", ;
Top = 0, ;
Width = 52
*< END OBJECT: ClassLib="..\comun\clase\ofundal.vcx" BaseClass="image" />
ADD OBJECT 'Imagine06' AS imagine WITH ;
ccod = DA06, ;
Height = 55, ;
Left = 264, ;
Name = "Imagine06", ;
nid_img = 6, ;
ntip = 2, ;
Picture = ..\comun\grafice\rc1.bmp, ;
picturedown = rc2.bmp, ;
pictureup = rc1.bmp, ;
ToolTipText = "Registrul de cumparari", ;
Top = 0, ;
Width = 52
*< END OBJECT: ClassLib="..\comun\clase\ofundal.vcx" BaseClass="image" />
ADD OBJECT 'Imagine07' AS imagine WITH ;
ccod = DB08, ;
Height = 55, ;
Left = 315, ;
Name = "Imagine07", ;
nid_img = 7, ;
ntip = 3, ;
Picture = ..\grafice\fctv1.bmp, ;
picturedown = fctv2.bmp, ;
pictureup = fctv1.bmp, ;
ToolTipText = "Facturi vanzari", ;
Top = 0, ;
Width = 52
*< END OBJECT: ClassLib="..\comun\clase\ofundal.vcx" BaseClass="image" />
ADD OBJECT 'Imagine08' AS imagine WITH ;
ccod = DA08, ;
Height = 55, ;
Left = 367, ;
Name = "Imagine08", ;
nid_img = 8, ;
ntip = 3, ;
Picture = ..\grafice\fctc1.bmp, ;
picturedown = fctc2.bmp, ;
pictureup = fctc1.bmp, ;
ToolTipText = "Facturi cumparari", ;
Top = 0, ;
Width = 52
*< END OBJECT: ClassLib="..\comun\clase\ofundal.vcx" BaseClass="image" />
ADD OBJECT 'Imagine09' AS imagine WITH ;
ccod = DB07, ;
Height = 55, ;
Left = 419, ;
Name = "Imagine09", ;
nid_img = 9, ;
ntip = 3, ;
Picture = ..\grafice\clie1.bmp, ;
picturedown = clie2.bmp, ;
pictureup = clie1.bmp, ;
ToolTipText = "Analitic Clienti", ;
Top = 0, ;
Width = 52
*< END OBJECT: ClassLib="..\comun\clase\ofundal.vcx" BaseClass="image" />
ADD OBJECT 'Imagine10' AS imagine WITH ;
ccod = DA07, ;
Height = 55, ;
Left = 471, ;
Name = "Imagine10", ;
nid_img = 10, ;
ntip = 3, ;
Picture = ..\grafice\furn1.bmp, ;
picturedown = furn2.bmp, ;
pictureup = furn1.bmp, ;
ToolTipText = "Analitic Furnizori", ;
Top = 0, ;
Width = 52
*< END OBJECT: ClassLib="..\comun\clase\ofundal.vcx" BaseClass="image" />
ADD OBJECT 'Imagine11' AS imagine WITH ;
BackStyle = 0, ;
ccod = A01, ;
Height = 55, ;
Left = 522, ;
Name = "Imagine11", ;
nid_img = 10, ;
ntip = 3, ;
Picture = ..\comun\grafice\validare11.bmp, ;
picturedown = validare12.bmp, ;
pictureup = validare11.bmp, ;
ToolTipText = "Situatii invalidate", ;
Top = 0, ;
Width = 42
*< END OBJECT: ClassLib="..\comun\clase\ofundal.vcx" BaseClass="image" />
ADD OBJECT 'oContextMenu' AS ctl32_contextmenu WITH ;
Height = 21, ;
Left = 204, ;
Name = "oContextMenu", ;
TabIndex = 3, ;
Top = 444, ;
Width = 64, ;
lblname.Name = "lblname"
*< END OBJECT: ClassLib="..\comun\utile\ctl32\ctl32_contextmenu.vcx" BaseClass="container" />
ADD OBJECT 'Pagefr1' AS pagefr WITH ;
c_deschis = 255, ;
c_gri = 16777215, ;
c_inchis = 0, ;
ErasePage = .T., ;
Height = 487, ;
Left = -1, ;
Name = "Pagefr1", ;
TabIndex = 1, ;
TabStyle = 0, ;
Top = 65, ;
Width = 787, ;
ZOrderSet = 1, ;
p1.BackColor = 255,255,255, ;
p1.Caption = " * ", ;
p1.FontName = "Segoe UI", ;
p1.FontSize = 10, ;
p1.Name = "p1", ;
p1.ToolTipText = "* (HOME)", ;
p2.BackColor = 255,255,255, ;
p2.Caption = "\<Capitaluri", ;
p2.FontName = "Segoe UI", ;
p2.FontSize = 10, ;
p2.Name = "p2", ;
p2.ToolTipText = "Capitaluri (C)", ;
p3.BackColor = 255,255,255, ;
p3.Caption = "\<Imobilizari", ;
p3.FontCharSet = 238, ;
p3.FontName = "Segoe UI", ;
p3.FontSize = 10, ;
p3.Name = "p3", ;
p3.ToolTipText = "Imobilizari (I)", ;
p4.BackColor = 255,255,255, ;
p4.Caption = " \<Terti ", ;
p4.FontCharSet = 238, ;
p4.FontName = "Segoe UI", ;
p4.FontSize = 10, ;
p4.Name = "p4", ;
p4.ToolTipText = "Terti (T)", ;
p5.BackColor = 255,255,255, ;
p5.Caption = "\<Trezorerie", ;
p5.FontName = "Segoe UI", ;
p5.FontSize = 10, ;
p5.Name = "p5", ;
p5.ToolTipText = "Trezorerie (T)", ;
p6.BackColor = 255,255,255, ;
p6.Caption = "\<Cheltuieli", ;
p6.FontName = "Segoe UI", ;
p6.FontSize = 10, ;
p6.Name = "p6", ;
p6.ToolTipText = "Cheltuieli (C)", ;
p7.BackColor = 255,255,255, ;
p7.Caption = "\<Venituri", ;
p7.FontName = "Segoe UI", ;
p7.FontSize = 10, ;
p7.Name = "p7", ;
p7.ToolTipText = "Venituri (V)"
*< END OBJECT: ClassLib="contab.vcx" BaseClass="pageframe" />
ADD OBJECT 'Pagefr1.p1.Cw1' AS cw_2019 WITH ;
Height = 20, ;
Left = 5, ;
Name = "Cw1", ;
nid_cw = 1, ;
ntip = 3, ;
TabIndex = 1, ;
Top = 13, ;
Width = 180, ;
ZOrderSet = 1, ;
Label_item1.Caption = "1. Balanta", ;
Label_item1.Name = "Label_item1"
*< END OBJECT: ClassLib="..\comun\clase\ofundal.vcx" BaseClass="container" />
ADD OBJECT 'Pagefr1.p1.Cw10' AS cw_2019 WITH ;
Height = 20, ;
Left = 5, ;
Name = "Cw10", ;
nid_cw = 10, ;
ntip = 4, ;
TabIndex = 10, ;
Top = 283, ;
Width = 180, ;
ZOrderSet = 2, ;
LABEL_ITEM1.Caption = "10. Situatii extrabilantiere", ;
LABEL_ITEM1.Name = "LABEL_ITEM1"
*< END OBJECT: ClassLib="..\comun\clase\ofundal.vcx" BaseClass="container" />
ADD OBJECT 'Pagefr1.p1.Cw2' AS cw_2019 WITH ;
Height = 20, ;
Left = 5, ;
Name = "Cw2", ;
nid_cw = 2, ;
ntip = 4, ;
TabIndex = 2, ;
Top = 42, ;
Width = 180, ;
ZOrderSet = 2, ;
Label_item1.Caption = "2. Registrul Jurnal", ;
Label_item1.Left = 5, ;
Label_item1.Name = "Label_item1", ;
Label_item1.Top = 1
*< END OBJECT: ClassLib="..\comun\clase\ofundal.vcx" BaseClass="container" />
ADD OBJECT 'Pagefr1.p1.Cw3' AS cw_2019 WITH ;
Height = 20, ;
Left = 5, ;
Name = "Cw3", ;
nid_cw = 3, ;
ntip = 0, ;
TabIndex = 3, ;
Top = 79, ;
Width = 180, ;
ZOrderSet = 4, ;
Label_item1.Caption = "3. Note fara predefinire", ;
Label_item1.Enabled = .T., ;
Label_item1.Name = "Label_item1"
*< END OBJECT: ClassLib="..\comun\clase\ofundal.vcx" BaseClass="container" />
ADD OBJECT 'Pagefr1.p1.Cw4' AS cw_2019 WITH ;
Height = 20, ;
Left = 5, ;
Name = "Cw4", ;
nid_cw = 4, ;
ntip = 0, ;
TabIndex = 4, ;
Top = 104, ;
Width = 180, ;
ZOrderSet = 4, ;
Label_item1.Caption = "4. Note definite de utilizator", ;
Label_item1.Enabled = .T., ;
Label_item1.Name = "Label_item1"
*< END OBJECT: ClassLib="..\comun\clase\ofundal.vcx" BaseClass="container" />
ADD OBJECT 'Pagefr1.p1.Cw5' AS cw_2019 WITH ;
cmeniu = notei, ;
Height = 20, ;
Left = 5, ;
Name = "Cw5", ;
nid_cw = 5, ;
ntip = 0, ;
TabIndex = 5, ;
Top = 131, ;
Width = 180, ;
ZOrderSet = 10, ;
Label_item1.Caption = "5. Note de <20>nchidere", ;
Label_item1.Name = "Label_item1"
*< END OBJECT: ClassLib="..\comun\clase\ofundal.vcx" BaseClass="container" />
ADD OBJECT 'Pagefr1.p1.Cw6' AS cw_2019 WITH ;
cmeniu = fisedecont, ;
Enabled = .F., ;
Height = 20, ;
Left = 5, ;
Name = "Cw6", ;
nid_cw = 6, ;
ntip = 1, ;
TabIndex = 6, ;
Top = 168, ;
Width = 180, ;
ZOrderSet = 3, ;
Label_item1.Caption = "6. Situatii contabile", ;
Label_item1.Left = 5, ;
Label_item1.Name = "Label_item1", ;
Label_item1.Top = 3
*< END OBJECT: ClassLib="..\comun\clase\ofundal.vcx" BaseClass="container" />
ADD OBJECT 'Pagefr1.p1.Cw7' AS cw_2019 WITH ;
Enabled = .F., ;
Height = 20, ;
Left = 5, ;
Name = "Cw7", ;
nid_cw = 7, ;
TabIndex = 7, ;
Top = 196, ;
Width = 180, ;
ZOrderSet = 5, ;
Label_item1.Caption = "7. Inventarul patrimoniului", ;
Label_item1.Left = 5, ;
Label_item1.Name = "Label_item1", ;
Label_item1.Top = 3
*< END OBJECT: ClassLib="..\comun\clase\ofundal.vcx" BaseClass="container" />
ADD OBJECT 'Pagefr1.p1.Cw8' AS cw_2019 WITH ;
cmeniu = listgen, ;
Enabled = .F., ;
Height = 20, ;
Left = 5, ;
Name = "Cw8", ;
nid_cw = 8, ;
ntip = 1, ;
TabIndex = 8, ;
Top = 222, ;
Width = 180, ;
ZOrderSet = 8, ;
Label_item1.Caption = "8. Rapoarte", ;
Label_item1.Name = "Label_item1"
*< END OBJECT: ClassLib="..\comun\clase\ofundal.vcx" BaseClass="container" />
ADD OBJECT 'Pagefr1.p1.Cw9' AS cw_2019 WITH ;
Enabled = .F., ;
Height = 20, ;
Left = 5, ;
Name = "Cw9", ;
nid_cw = 9, ;
TabIndex = 9, ;
Top = 248, ;
Width = 180, ;
ZOrderSet = 8, ;
Label_item1.Caption = "9. Notificari", ;
Label_item1.Name = "Label_item1"
*< END OBJECT: ClassLib="..\comun\clase\ofundal.vcx" BaseClass="container" />
ADD OBJECT 'Pagefr1.p1.Pict_liniuta1' AS pict_liniuta WITH ;
Left = 4, ;
Name = "Pict_liniuta1", ;
Picture = ..\comun\grafice\f3.jpg, ;
Top = 272, ;
Width = 180
*< END OBJECT: ClassLib="..\comun\clase\ofundal.vcx" BaseClass="image" />
ADD OBJECT 'Pagefr1.p1.Pict_liniuta2' AS pict_liniuta WITH ;
Left = 4, ;
Name = "Pict_liniuta2", ;
Picture = ..\comun\grafice\f3.jpg, ;
Top = 154, ;
Width = 180
*< END OBJECT: ClassLib="..\comun\clase\ofundal.vcx" BaseClass="image" />
ADD OBJECT 'Pagefr1.p1.Pict_liniuta5' AS pict_liniuta WITH ;
Left = 4, ;
Name = "Pict_liniuta5", ;
Picture = ..\comun\grafice\f3.jpg, ;
Top = 67, ;
Width = 180
*< END OBJECT: ClassLib="..\comun\clase\ofundal.vcx" BaseClass="image" />
ADD OBJECT 'Pagefr1.p1.shape1' AS pict_meniu WITH ;
Height = 492, ;
Left = 1, ;
Name = "shape1", ;
Picture = ..\comun\grafice\f2.jpg, ;
Top = -39, ;
Width = 200, ;
ZOrderSet = 0
*< END OBJECT: ClassLib="..\comun\clase\ofundal.vcx" BaseClass="image" />
ADD OBJECT 'Pagefr1.p2.Cw1' AS cw_2019 WITH ;
cmeniu = capitaluri1, ;
Height = 20, ;
Left = 5, ;
Name = "Cw1", ;
nid_cw = 1, ;
ntip = 0, ;
TabIndex = 1, ;
Top = 11, ;
Width = 180, ;
ZOrderSet = 1, ;
Label_item1.Caption = "1. Capital social", ;
Label_item1.Left = 5, ;
Label_item1.Name = "Label_item1", ;
Label_item1.Top = 3
*< END OBJECT: ClassLib="..\comun\clase\ofundal.vcx" BaseClass="container" />
ADD OBJECT 'Pagefr1.p2.Cw2' AS cw_2019 WITH ;
cmeniu = capitaluri2, ;
Height = 20, ;
Left = 5, ;
Name = "Cw2", ;
nid_cw = 2, ;
ntip = 0, ;
TabIndex = 2, ;
Top = 34, ;
Width = 180, ;
ZOrderSet = 2, ;
Label_item1.Caption = "2. Rezerve reevaluare", ;
Label_item1.Name = "Label_item1"
*< END OBJECT: ClassLib="..\comun\clase\ofundal.vcx" BaseClass="container" />
ADD OBJECT 'Pagefr1.p2.Cw3' AS cw_2019 WITH ;
cmeniu = capitaluri3, ;
Height = 20, ;
Left = 5, ;
Name = "Cw3", ;
nid_cw = 3, ;
ntip = 0, ;
TabIndex = 3, ;
Top = 57, ;
Width = 180, ;
ZOrderSet = 4, ;
Label_item1.Caption = "3. Rezerve", ;
Label_item1.Name = "Label_item1"
*< END OBJECT: ClassLib="..\comun\clase\ofundal.vcx" BaseClass="container" />
ADD OBJECT 'Pagefr1.p2.Cw4' AS cw_2019 WITH ;
cmeniu = capitaluri4, ;
Height = 20, ;
Left = 5, ;
Name = "Cw4", ;
nid_cw = 4, ;
ntip = 0, ;
TabIndex = 4, ;
Top = 80, ;
Width = 180, ;
ZOrderSet = 5, ;
Label_item1.Caption = "4. Rezerve de conversie", ;
Label_item1.Name = "Label_item1"
*< END OBJECT: ClassLib="..\comun\clase\ofundal.vcx" BaseClass="container" />
ADD OBJECT 'Pagefr1.p2.Cw5' AS cw_2019 WITH ;
cmeniu = capitaluri5, ;
Height = 20, ;
Left = 5, ;
Name = "Cw5", ;
nid_cw = 5, ;
ntip = 0, ;
TabIndex = 5, ;
Top = 103, ;
Width = 180, ;
ZOrderSet = 6, ;
Label_item1.Caption = "5. Profit <20>i pierdere", ;
Label_item1.Name = "Label_item1"
*< END OBJECT: ClassLib="..\comun\clase\ofundal.vcx" BaseClass="container" />
ADD OBJECT 'Pagefr1.p2.Cw6' AS cw_2019 WITH ;
cmeniu = capitaluri6, ;
Height = 20, ;
Left = 5, ;
Name = "Cw6", ;
nid_cw = 6, ;
ntip = 0, ;
TabIndex = 6, ;
Top = 126, ;
Width = 180, ;
ZOrderSet = 7, ;
Label_item1.Caption = "6. Repartizarea profitului", ;
Label_item1.Name = "Label_item1"
*< END OBJECT: ClassLib="..\comun\clase\ofundal.vcx" BaseClass="container" />
ADD OBJECT 'Pagefr1.p2.Cw7' AS cw_2019 WITH ;
cmeniu = capitaluri7, ;
Height = 20, ;
Left = 5, ;
Name = "Cw7", ;
nid_cw = 7, ;
ntip = 0, ;
TabIndex = 7, ;
Top = 149, ;
Width = 180, ;
ZOrderSet = 8, ;
Label_item1.Caption = "7. <20>mprumuturi", ;
Label_item1.Name = "Label_item1"
*< END OBJECT: ClassLib="..\comun\clase\ofundal.vcx" BaseClass="container" />
ADD OBJECT 'Pagefr1.p2.Cw8' AS cw_2019 WITH ;
cmeniu = capitaluri8, ;
Height = 20, ;
Left = 5, ;
Name = "Cw8", ;
nid_cw = 7, ;
ntip = 0, ;
TabIndex = 8, ;
Top = 172, ;
Width = 180, ;
ZOrderSet = 8, ;
Label_item1.Caption = "8. Subventii", ;
Label_item1.Name = "Label_item1"
*< END OBJECT: ClassLib="..\comun\clase\ofundal.vcx" BaseClass="container" />
ADD OBJECT 'Pagefr1.p2.Pict_liniuta1' AS pict_liniuta WITH ;
Left = 5, ;
Name = "Pict_liniuta1", ;
Picture = ..\comun\grafice\f3.jpg, ;
Top = 199, ;
Width = 180
*< END OBJECT: ClassLib="..\comun\clase\ofundal.vcx" BaseClass="image" />
ADD OBJECT 'Pagefr1.p2.shape1' AS pict_meniu WITH ;
Height = 492, ;
Left = 1, ;
Name = "shape1", ;
Picture = ..\comun\grafice\f2.jpg, ;
Top = 5, ;
Width = 200, ;
ZOrderSet = 0
*< END OBJECT: ClassLib="..\comun\clase\ofundal.vcx" BaseClass="image" />
ADD OBJECT 'Pagefr1.p3.Cw1' AS cw_2019 WITH ;
cmeniu = imobilizari1, ;
Height = 20, ;
Left = 5, ;
Name = "Cw1", ;
nid_cw = 5, ;
ntip = 0, ;
Top = 102, ;
Width = 180, ;
ZOrderSet = 1, ;
Label_item1.Caption = "5. Leasing", ;
Label_item1.Name = "Label_item1"
*< END OBJECT: ClassLib="..\comun\clase\ofundal.vcx" BaseClass="container" />
ADD OBJECT 'Pagefr1.p3.Cw2' AS cw_2019 WITH ;
cmeniu = imobilizari2, ;
Height = 20, ;
Left = 5, ;
Name = "Cw2", ;
nid_cw = 1, ;
ntip = 0, ;
Top = 10, ;
Width = 180, ;
ZOrderSet = 2, ;
Label_item1.Caption = "1. Necorporale", ;
Label_item1.Name = "Label_item1"
*< END OBJECT: ClassLib="..\comun\clase\ofundal.vcx" BaseClass="container" />
ADD OBJECT 'Pagefr1.p3.Cw3' AS cw_2019 WITH ;
cmeniu = imobilizari3, ;
Height = 20, ;
Left = 5, ;
Name = "Cw3", ;
nid_cw = 2, ;
ntip = 0, ;
Top = 33, ;
Width = 180, ;
ZOrderSet = 4, ;
Label_item1.Caption = "2. Corporale", ;
Label_item1.Name = "Label_item1"
*< END OBJECT: ClassLib="..\comun\clase\ofundal.vcx" BaseClass="container" />
ADD OBJECT 'Pagefr1.p3.Cw4' AS cw_2019 WITH ;
cmeniu = imobilizari4, ;
Height = 20, ;
Left = 5, ;
Name = "Cw4", ;
nid_cw = 3, ;
ntip = 0, ;
Top = 56, ;
Width = 180, ;
ZOrderSet = 5, ;
Label_item1.Caption = "3. Financiare", ;
Label_item1.Name = "Label_item1"
*< END OBJECT: ClassLib="..\comun\clase\ofundal.vcx" BaseClass="container" />
ADD OBJECT 'Pagefr1.p3.Cw5' AS cw_2019 WITH ;
cmeniu = imobilizari5, ;
Height = 20, ;
Left = 5, ;
Name = "Cw5", ;
nid_cw = 4, ;
ntip = 0, ;
Top = 79, ;
Width = 180, ;
ZOrderSet = 6, ;
Label_item1.Caption = "4. <20>n curs", ;
Label_item1.Name = "Label_item1"
*< END OBJECT: ClassLib="..\comun\clase\ofundal.vcx" BaseClass="container" />
ADD OBJECT 'Pagefr1.p3.Cw6' AS cw_2019 WITH ;
Height = 20, ;
Left = 4, ;
Name = "Cw6", ;
nid_cw = 6, ;
ntip = 0, ;
Top = 137, ;
Visible = .F., ;
Width = 180, ;
ZOrderSet = 7, ;
Label_item1.Caption = "6. Rate", ;
Label_item1.Name = "Label_item1"
*< END OBJECT: ClassLib="..\comun\clase\ofundal.vcx" BaseClass="container" />
ADD OBJECT 'Pagefr1.p3.Pict_liniuta1' AS pict_liniuta WITH ;
Left = 4, ;
Name = "Pict_liniuta1", ;
Picture = ..\comun\grafice\f3.jpg, ;
Top = 126, ;
Width = 180
*< END OBJECT: ClassLib="..\comun\clase\ofundal.vcx" BaseClass="image" />
ADD OBJECT 'Pagefr1.p3.shape1' AS pict_meniu WITH ;
Height = 492, ;
Left = 1, ;
Name = "shape1", ;
Picture = ..\comun\grafice\f2.jpg, ;
Top = 5, ;
Width = 200, ;
ZOrderSet = 0
*< END OBJECT: ClassLib="..\comun\clase\ofundal.vcx" BaseClass="image" />
ADD OBJECT 'Pagefr1.p4.Pfr' AS pageframe WITH ;
ErasePage = .T., ;
Height = 438, ;
Left = 0, ;
Name = "Pfr", ;
PageCount = 3, ;
TabStyle = 0, ;
Themes = .F., ;
Top = -2, ;
Width = 775, ;
ZOrderSet = 3, ;
Page1.BackColor = 255,255,255, ;
Page1.Caption = "\<Furnizori", ;
Page1.FontCharSet = 238, ;
Page1.FontName = "Arial", ;
Page1.FontSize = 10, ;
Page1.Name = "pp1", ;
Page1.ToolTipText = "Furnizori (F)", ;
Page2.BackColor = 255,255,255, ;
Page2.Caption = "\<Clienti", ;
Page2.FontCharSet = 238, ;
Page2.FontSize = 10, ;
Page2.Name = "pp2", ;
Page2.ToolTipText = "Clienti (C)", ;
Page3.BackColor = 255,255,255, ;
Page3.Caption = "\<Alti", ;
Page3.FontCharSet = 238, ;
Page3.FontSize = 10, ;
Page3.Name = "pp3", ;
Page3.ToolTipText = "Alti (A)"
*< END OBJECT: BaseClass="pageframe" />
ADD OBJECT 'Pagefr1.p4.Pfr.pp1.Cw1' AS cw_2019 WITH ;
cmeniu = furnizori1, ;
Height = 20, ;
Left = 4, ;
Name = "Cw1", ;
nid_cw = 1, ;
ntip = 0, ;
TabIndex = 1, ;
Top = 8, ;
Width = 208, ;
Label_item1.Caption = "1. Furnizori", ;
Label_item1.Name = "Label_item1"
*< END OBJECT: ClassLib="..\comun\clase\ofundal.vcx" BaseClass="container" />
ADD OBJECT 'Pagefr1.p4.Pfr.pp1.Cw10' AS cw_2019 WITH ;
Height = 20, ;
Left = 4, ;
Name = "Cw10", ;
nid_cw = 6, ;
ntip = 2, ;
TabIndex = 6, ;
Top = 136, ;
Width = 208, ;
Label_item1.Caption = "6. Registrul de cumparari", ;
Label_item1.Name = "Label_item1"
*< END OBJECT: ClassLib="..\comun\clase\ofundal.vcx" BaseClass="container" />
ADD OBJECT 'Pagefr1.p4.Pfr.pp1.Cw2' AS cw_2019 WITH ;
cmeniu = furnizori2, ;
Height = 20, ;
Left = 4, ;
Name = "Cw2", ;
nid_cw = 2, ;
ntip = 0, ;
TabIndex = 2, ;
Top = 31, ;
Width = 208, ;
Label_item1.Caption = "2. Furnizori de imobilizari", ;
Label_item1.Name = "Label_item1"
*< END OBJECT: ClassLib="..\comun\clase\ofundal.vcx" BaseClass="container" />
ADD OBJECT 'Pagefr1.p4.Pfr.pp1.Cw3' AS cw_2019 WITH ;
cmeniu = furnizori3, ;
Height = 20, ;
Left = 4, ;
Name = "Cw3", ;
nid_cw = 5, ;
ntip = 0, ;
TabIndex = 5, ;
Top = 100, ;
Width = 208, ;
Label_item1.Caption = "5. Regularizari", ;
Label_item1.Name = "Label_item1"
*< END OBJECT: ClassLib="..\comun\clase\ofundal.vcx" BaseClass="container" />
ADD OBJECT 'Pagefr1.p4.Pfr.pp1.Cw5' AS cw_2019 WITH ;
cmeniu = furnizori4, ;
Height = 20, ;
Left = 4, ;
Name = "Cw5", ;
nid_cw = 4, ;
ntip = 0, ;
TabIndex = 4, ;
Top = 77, ;
Width = 208, ;
Label_item1.Caption = "4. Efecte de platit", ;
Label_item1.Name = "Label_item1"
*< END OBJECT: ClassLib="..\comun\clase\ofundal.vcx" BaseClass="container" />
ADD OBJECT 'Pagefr1.p4.Pfr.pp1.Cw6' AS cw_2019 WITH ;
cmeniu = vizfurn1, ;
Height = 20, ;
Left = 4, ;
Name = "Cw6", ;
nid_cw = 7, ;
ntip = 3, ;
TabIndex = 7, ;
Top = 159, ;
Width = 208, ;
Label_item1.Caption = "7. Balante de furnizori", ;
Label_item1.Name = "Label_item1"
*< END OBJECT: ClassLib="..\comun\clase\ofundal.vcx" BaseClass="container" />
ADD OBJECT 'Pagefr1.p4.Pfr.pp1.Cw7' AS cw_2019 WITH ;
cmeniu = vizfurn2, ;
Left = 4, ;
Name = "Cw7", ;
nid_cw = 8, ;
ntip = 3, ;
TabIndex = 8, ;
Top = 182, ;
Width = 208, ;
Label_item1.AutoSize = .F., ;
Label_item1.Caption = "8. Situatii analitice si operative", ;
Label_item1.Height = 33, ;
Label_item1.Left = 4, ;
Label_item1.Name = "Label_item1", ;
Label_item1.Top = 2, ;
Label_item1.Width = 195, ;
Label_item1.WordWrap = .T.
*< END OBJECT: ClassLib="..\comun\clase\ofundal.vcx" BaseClass="container" />
ADD OBJECT 'Pagefr1.p4.Pfr.pp1.Cw8' AS cw_2019 WITH ;
cmeniu = furnizori5, ;
Height = 20, ;
Left = 4, ;
Name = "Cw8", ;
nid_cw = 3, ;
ntip = 0, ;
TabIndex = 3, ;
Top = 54, ;
Width = 208, ;
Label_item1.Caption = "3. Facturi nesosite", ;
Label_item1.Name = "Label_item1"
*< END OBJECT: ClassLib="..\comun\clase\ofundal.vcx" BaseClass="container" />
ADD OBJECT 'Pagefr1.p4.Pfr.pp1.Cw9' AS cw_2019 WITH ;
cmeniu = listfurn, ;
Enabled = .F., ;
Height = 20, ;
Left = 4, ;
Name = "Cw9", ;
nid_cw = 9, ;
ntip = 1, ;
TabIndex = 9, ;
Top = 217, ;
Width = 208, ;
Label_item1.Caption = "9. Rapoarte", ;
Label_item1.Name = "Label_item1"
*< END OBJECT: ClassLib="..\comun\clase\ofundal.vcx" BaseClass="container" />
ADD OBJECT 'Pagefr1.p4.Pfr.pp1.Pict_liniuta1' AS pict_liniuta WITH ;
Left = 3, ;
Name = "Pict_liniuta1", ;
Picture = ..\comun\grafice\f3.jpg, ;
Top = 124, ;
Width = 208
*< END OBJECT: ClassLib="..\comun\clase\ofundal.vcx" BaseClass="image" />
ADD OBJECT 'Pagefr1.p4.Pfr.pp1.Pict_liniuta2' AS pict_liniuta WITH ;
Left = 3, ;
Name = "Pict_liniuta2", ;
Picture = ..\comun\grafice\f3.jpg, ;
Top = 205, ;
Width = 208
*< END OBJECT: ClassLib="..\comun\clase\ofundal.vcx" BaseClass="image" />
ADD OBJECT 'Pagefr1.p4.Pfr.pp1.Pict_liniuta3' AS pict_liniuta WITH ;
Left = 3, ;
Name = "Pict_liniuta3", ;
Picture = ..\comun\grafice\f3.jpg, ;
Top = 241, ;
Width = 208
*< END OBJECT: ClassLib="..\comun\clase\ofundal.vcx" BaseClass="image" />
ADD OBJECT 'Pagefr1.p4.Pfr.pp1.shape1' AS pict_meniu WITH ;
Height = 492, ;
Left = 0, ;
Name = "shape1", ;
Picture = ..\comun\grafice\f2.jpg, ;
Top = 5, ;
Width = 228, ;
ZOrderSet = 0
*< END OBJECT: ClassLib="..\comun\clase\ofundal.vcx" BaseClass="image" />
ADD OBJECT 'Pagefr1.p4.Pfr.pp2.Cw1' AS cw_2019 WITH ;
cmeniu = clienti1, ;
Height = 20, ;
Left = 4, ;
Name = "Cw1", ;
nid_cw = 1, ;
ntip = 0, ;
TabIndex = 1, ;
Top = 8, ;
Width = 208, ;
Label_item1.Caption = "1. Clienti", ;
Label_item1.Name = "Label_item1"
*< END OBJECT: ClassLib="..\comun\clase\ofundal.vcx" BaseClass="container" />
ADD OBJECT 'Pagefr1.p4.Pfr.pp2.Cw10' AS cw_2019 WITH ;
Height = 20, ;
Left = 4, ;
Name = "Cw10", ;
nid_cw = 6, ;
ntip = 2, ;
TabIndex = 6, ;
Top = 134, ;
Width = 208, ;
Label_item1.Caption = "6. Registrul de vanzari", ;
Label_item1.Name = "Label_item1"
*< END OBJECT: ClassLib="..\comun\clase\ofundal.vcx" BaseClass="container" />
ADD OBJECT 'Pagefr1.p4.Pfr.pp2.Cw101' AS cw_2019 WITH ;
Enabled = .F., ;
Height = 20, ;
Left = 4, ;
Name = "Cw101", ;
nid_cw = 10, ;
ntip = 1, ;
TabIndex = 9, ;
Top = 250, ;
Width = 208, ;
Label_item1.Caption = "10. Istoric facturi", ;
Label_item1.Name = "Label_item1"
*< END OBJECT: ClassLib="..\comun\clase\ofundal.vcx" BaseClass="container" />
ADD OBJECT 'Pagefr1.p4.Pfr.pp2.Cw2' AS cw_2019 WITH ;
cmeniu = clienti2, ;
Height = 20, ;
Left = 4, ;
Name = "Cw2", ;
nid_cw = 2, ;
ntip = 0, ;
TabIndex = 2, ;
Top = 31, ;
Width = 208, ;
Label_item1.Caption = "2. Clienti incerti", ;
Label_item1.Name = "Label_item1"
*< END OBJECT: ClassLib="..\comun\clase\ofundal.vcx" BaseClass="container" />
ADD OBJECT 'Pagefr1.p4.Pfr.pp2.Cw3' AS cw_2019 WITH ;
cmeniu = clienti3, ;
Height = 20, ;
Left = 3, ;
Name = "Cw3", ;
nid_cw = 5, ;
ntip = 0, ;
TabIndex = 5, ;
Top = 100, ;
Width = 208, ;
Label_item1.Caption = "5. Regularizari", ;
Label_item1.Name = "Label_item1"
*< END OBJECT: ClassLib="..\comun\clase\ofundal.vcx" BaseClass="container" />
ADD OBJECT 'Pagefr1.p4.Pfr.pp2.Cw4' AS cw_2019 WITH ;
cmeniu = clienti4, ;
Height = 20, ;
Left = 4, ;
Name = "Cw4", ;
nid_cw = 4, ;
ntip = 0, ;
TabIndex = 4, ;
Top = 77, ;
Width = 208, ;
Label_item1.Caption = "4. Efecte de primit", ;
Label_item1.Name = "Label_item1"
*< END OBJECT: ClassLib="..\comun\clase\ofundal.vcx" BaseClass="container" />
ADD OBJECT 'Pagefr1.p4.Pfr.pp2.Cw5' AS cw_2019 WITH ;
cmeniu = clienti5, ;
Height = 20, ;
Left = 4, ;
Name = "Cw5", ;
nid_cw = 3, ;
ntip = 0, ;
TabIndex = 3, ;
Top = 54, ;
Width = 208, ;
Label_item1.Caption = "3. Facturi neintocmite", ;
Label_item1.Name = "Label_item1"
*< END OBJECT: ClassLib="..\comun\clase\ofundal.vcx" BaseClass="container" />
ADD OBJECT 'Pagefr1.p4.Pfr.pp2.Cw6' AS cw_2019 WITH ;
cmeniu = vizcli1, ;
Height = 20, ;
Left = 4, ;
Name = "Cw6", ;
nid_cw = 7, ;
ntip = 3, ;
TabIndex = 7, ;
Top = 157, ;
Width = 208, ;
Label_item1.Caption = "7. Balante de clienti", ;
Label_item1.Name = "Label_item1"
*< END OBJECT: ClassLib="..\comun\clase\ofundal.vcx" BaseClass="container" />
ADD OBJECT 'Pagefr1.p4.Pfr.pp2.Cw7' AS cw_2019 WITH ;
cmeniu = vizcli2, ;
Left = 4, ;
Name = "Cw7", ;
nid_cw = 8, ;
ntip = 3, ;
TabIndex = 8, ;
Top = 180, ;
Width = 208, ;
Label_item1.AutoSize = .F., ;
Label_item1.Caption = "8. Situatii analitice si operative", ;
Label_item1.Height = 33, ;
Label_item1.Left = 5, ;
Label_item1.Name = "Label_item1", ;
Label_item1.Top = 1, ;
Label_item1.Width = 194, ;
Label_item1.WordWrap = .T.
*< END OBJECT: ClassLib="..\comun\clase\ofundal.vcx" BaseClass="container" />
ADD OBJECT 'Pagefr1.p4.Pfr.pp2.Cw9' AS cw_2019 WITH ;
cmeniu = listcli, ;
Enabled = .F., ;
Height = 20, ;
Left = 4, ;
Name = "Cw9", ;
nid_cw = 9, ;
ntip = 1, ;
TabIndex = 9, ;
Top = 216, ;
Width = 208, ;
Label_item1.Caption = "9. Rapoarte", ;
Label_item1.Name = "Label_item1"
*< END OBJECT: ClassLib="..\comun\clase\ofundal.vcx" BaseClass="container" />
ADD OBJECT 'Pagefr1.p4.Pfr.pp2.Pict_liniuta1' AS pict_liniuta WITH ;
Left = 2, ;
Name = "Pict_liniuta1", ;
Picture = ..\comun\grafice\f3.jpg, ;
Top = 123, ;
Width = 208
*< END OBJECT: ClassLib="..\comun\clase\ofundal.vcx" BaseClass="image" />
ADD OBJECT 'Pagefr1.p4.Pfr.pp2.Pict_liniuta2' AS pict_liniuta WITH ;
Left = 2, ;
Name = "Pict_liniuta2", ;
Picture = ..\comun\grafice\f3.jpg, ;
Top = 203, ;
Width = 208
*< END OBJECT: ClassLib="..\comun\clase\ofundal.vcx" BaseClass="image" />
ADD OBJECT 'Pagefr1.p4.Pfr.pp2.Pict_liniuta3' AS pict_liniuta WITH ;
Left = 2, ;
Name = "Pict_liniuta3", ;
Picture = ..\comun\grafice\f3.jpg, ;
Top = 241, ;
Width = 208
*< END OBJECT: ClassLib="..\comun\clase\ofundal.vcx" BaseClass="image" />
ADD OBJECT 'Pagefr1.p4.Pfr.pp2.shape1' AS pict_meniu WITH ;
Height = 492, ;
Left = 0, ;
Name = "shape1", ;
Picture = ..\comun\grafice\f2.jpg, ;
Top = 5, ;
Width = 228, ;
ZOrderSet = 0
*< END OBJECT: ClassLib="..\comun\clase\ofundal.vcx" BaseClass="image" />
ADD OBJECT 'Pagefr1.p4.Pfr.pp3.Cw1' AS cw_2019 WITH ;
cmeniu = debitori, ;
Height = 20, ;
Left = 5, ;
Name = "Cw1", ;
nid_cw = 4, ;
ntip = 3, ;
Top = 108, ;
Width = 208, ;
Label_item1.Caption = "5. Debitori", ;
Label_item1.Name = "Label_item1"
*< END OBJECT: ClassLib="..\comun\clase\ofundal.vcx" BaseClass="container" />
ADD OBJECT 'Pagefr1.p4.Pfr.pp3.Cw10' AS cw_2019 WITH ;
cmeniu = dividende, ;
Height = 20, ;
Left = 5, ;
Name = "Cw10", ;
nid_cw = 2, ;
ntip = 0, ;
Top = 31, ;
Width = 208, ;
LABEL_ITEM1.Caption = "2. Dividende", ;
LABEL_ITEM1.Name = "LABEL_ITEM1"
*< END OBJECT: ClassLib="..\comun\clase\ofundal.vcx" BaseClass="container" />
ADD OBJECT 'Pagefr1.p4.Pfr.pp3.Cw11' AS cw_2019 WITH ;
Height = 20, ;
Left = 5, ;
Name = "Cw11", ;
nid_cw = 10, ;
ntip = 3, ;
Top = 256, ;
Width = 208, ;
Label_item1.Caption = "11. Balanta Parteneri", ;
Label_item1.Name = "Label_item1"
*< END OBJECT: ClassLib="..\comun\clase\ofundal.vcx" BaseClass="container" />
ADD OBJECT 'Pagefr1.p4.Pfr.pp3.Cw12' AS cw_2019 WITH ;
Left = 5, ;
Name = "Cw12", ;
nid_cw = 3, ;
ntip = 0, ;
Top = 54, ;
Width = 208, ;
Label_item1.AutoSize = .F., ;
Label_item1.Caption = "3. Drepturi de personal neridicate", ;
Label_item1.Height = 29, ;
Label_item1.Left = 5, ;
Label_item1.Name = "Label_item1", ;
Label_item1.Top = 1, ;
Label_item1.Width = 200, ;
Label_item1.WordWrap = .T.
*< END OBJECT: ClassLib="..\comun\clase\ofundal.vcx" BaseClass="container" />
ADD OBJECT 'Pagefr1.p4.Pfr.pp3.Cw13' AS cw_2019 WITH ;
cmeniu = decont4511, ;
Left = 5, ;
Name = "Cw13", ;
nid_cw = 1, ;
ntip = 0, ;
Top = 9, ;
Visible = .T., ;
Width = 208, ;
Label_item1.AutoSize = .F., ;
Label_item1.Caption = "1. Decontari in cadrul grupului", ;
Label_item1.Height = 30, ;
Label_item1.Left = 5, ;
Label_item1.Name = "Label_item1", ;
Label_item1.Top = 1, ;
Label_item1.Width = 177, ;
Label_item1.WordWrap = .T.
*< END OBJECT: ClassLib="..\comun\clase\ofundal.vcx" BaseClass="container" />
ADD OBJECT 'Pagefr1.p4.Pfr.pp3.Cw14' AS cw_2019 WITH ;
cmeniu = creditoriOp, ;
Height = 20, ;
Left = 5, ;
Name = "Cw14", ;
nid_cw = 14, ;
ntip = 0, ;
Top = 76, ;
Width = 208, ;
LABEL_ITEM1.Caption = "4. Creditori", ;
LABEL_ITEM1.Name = "LABEL_ITEM1"
*< END OBJECT: ClassLib="..\comun\clase\ofundal.vcx" BaseClass="container" />
ADD OBJECT 'Pagefr1.p4.Pfr.pp3.Cw2' AS cw_2019 WITH ;
cmeniu = creditori, ;
Height = 20, ;
Left = 5, ;
Name = "Cw2", ;
nid_cw = 5, ;
ntip = 3, ;
Top = 131, ;
Width = 208, ;
Label_item1.Caption = "6. Creditori", ;
Label_item1.Name = "Label_item1"
*< END OBJECT: ClassLib="..\comun\clase\ofundal.vcx" BaseClass="container" />
ADD OBJECT 'Pagefr1.p4.Pfr.pp3.Cw3' AS cw_2019 WITH ;
cmeniu = cheltavans, ;
Height = 20, ;
Left = 5, ;
Name = "Cw3", ;
nid_cw = 7, ;
ntip = 3, ;
Top = 177, ;
Width = 208, ;
Label_item1.Caption = "8. Cheltuieli in avans", ;
Label_item1.Name = "Label_item1"
*< END OBJECT: ClassLib="..\comun\clase\ofundal.vcx" BaseClass="container" />
ADD OBJECT 'Pagefr1.p4.Pfr.pp3.Cw4' AS cw_2019 WITH ;
cmeniu = actionari, ;
Height = 20, ;
Left = 5, ;
Name = "Cw4", ;
nid_cw = 9, ;
ntip = 3, ;
Top = 223, ;
Width = 208, ;
Label_item1.Caption = "10. Actionari", ;
Label_item1.Name = "Label_item1"
*< END OBJECT: ClassLib="..\comun\clase\ofundal.vcx" BaseClass="container" />
ADD OBJECT 'Pagefr1.p4.Pfr.pp3.Cw5' AS cw_2019 WITH ;
Left = 5, ;
Name = "Cw5", ;
nid_cw = 11, ;
ntip = 3, ;
Top = 302, ;
Width = 208, ;
LABEL_ITEM1.AutoSize = .F., ;
LABEL_ITEM1.Caption = "13. Balanta Parteneri Cumulata", ;
LABEL_ITEM1.Height = 32, ;
LABEL_ITEM1.Left = 5, ;
LABEL_ITEM1.Name = "LABEL_ITEM1", ;
LABEL_ITEM1.Top = 3, ;
LABEL_ITEM1.Width = 193, ;
LABEL_ITEM1.WordWrap = .T.
*< END OBJECT: ClassLib="..\comun\clase\ofundal.vcx" BaseClass="container" />
ADD OBJECT 'Pagefr1.p4.Pfr.pp3.Cw6' AS cw_2019 WITH ;
Height = 20, ;
Left = 5, ;
Name = "Cw6", ;
nid_cw = 13, ;
ntip = 3, ;
Top = 279, ;
Width = 208, ;
Label_item1.Caption = "12. Inregistrari Parteneri", ;
Label_item1.Name = "Label_item1"
*< END OBJECT: ClassLib="..\comun\clase\ofundal.vcx" BaseClass="container" />
ADD OBJECT 'Pagefr1.p4.Pfr.pp3.Cw7' AS cw_2019 WITH ;
cmeniu = vnavans, ;
Height = 20, ;
Left = 5, ;
Name = "Cw7", ;
nid_cw = 8, ;
ntip = 3, ;
Top = 200, ;
Width = 208, ;
Label_item1.Caption = "9. Venituri in avans", ;
Label_item1.Name = "Label_item1"
*< END OBJECT: ClassLib="..\comun\clase\ofundal.vcx" BaseClass="container" />
ADD OBJECT 'Pagefr1.p4.Pfr.pp3.Cw8' AS cw_2019 WITH ;
cmeniu = vizdividende, ;
Height = 20, ;
Left = 5, ;
Name = "Cw8", ;
nid_cw = 6, ;
ntip = 3, ;
Top = 154, ;
Width = 208, ;
Label_item1.Caption = "7. Dividende", ;
Label_item1.Name = "Label_item1"
*< END OBJECT: ClassLib="..\comun\clase\ofundal.vcx" BaseClass="container" />
ADD OBJECT 'Pagefr1.p4.Pfr.pp3.Cw9' AS cw_2019 WITH ;
cmeniu = listterti, ;
Enabled = .F., ;
Height = 20, ;
Left = 5, ;
Name = "Cw9", ;
nid_cw = 12, ;
ntip = 1, ;
Top = 336, ;
Width = 208, ;
Label_item1.Caption = "14. Rapoarte", ;
Label_item1.Name = "Label_item1"
*< END OBJECT: ClassLib="..\comun\clase\ofundal.vcx" BaseClass="container" />
ADD OBJECT 'Pagefr1.p4.Pfr.pp3.Pict_liniuta1' AS pict_liniuta WITH ;
Left = 3, ;
Name = "Pict_liniuta1", ;
Picture = ..\comun\grafice\f3.jpg, ;
Top = 98, ;
Width = 200
*< END OBJECT: ClassLib="..\comun\clase\ofundal.vcx" BaseClass="image" />
ADD OBJECT 'Pagefr1.p4.Pfr.pp3.Pict_liniuta2' AS pict_liniuta WITH ;
Left = 3, ;
Name = "Pict_liniuta2", ;
Picture = ..\comun\grafice\f3.jpg, ;
Top = 246, ;
Width = 200
*< END OBJECT: ClassLib="..\comun\clase\ofundal.vcx" BaseClass="image" />
ADD OBJECT 'Pagefr1.p4.Pfr.pp3.Pict_liniuta3' AS pict_liniuta WITH ;
Left = 3, ;
Name = "Pict_liniuta3", ;
Picture = ..\comun\grafice\f3.jpg, ;
Top = 324, ;
Width = 200
*< END OBJECT: ClassLib="..\comun\clase\ofundal.vcx" BaseClass="image" />
ADD OBJECT 'Pagefr1.p4.Pfr.pp3.Pict_liniuta4' AS pict_liniuta WITH ;
Left = 3, ;
Name = "Pict_liniuta4", ;
Picture = ..\comun\grafice\f3.jpg, ;
Top = 360, ;
Width = 200
*< END OBJECT: ClassLib="..\comun\clase\ofundal.vcx" BaseClass="image" />
ADD OBJECT 'Pagefr1.p4.Pfr.pp3.shape1' AS pict_meniu WITH ;
Height = 492, ;
Left = 0, ;
Name = "shape1", ;
Picture = ..\comun\grafice\f2.jpg, ;
Top = 5, ;
Width = 228, ;
ZOrderSet = 0
*< END OBJECT: ClassLib="..\comun\clase\ofundal.vcx" BaseClass="image" />
ADD OBJECT 'Pagefr1.p5.Pfr' AS pageframe WITH ;
ErasePage = .T., ;
Height = 412, ;
Left = 0, ;
Name = "Pfr", ;
PageCount = 3, ;
TabStyle = 0, ;
Themes = .F., ;
Top = -2, ;
Width = 775, ;
ZOrderSet = 3, ;
Page1.BackColor = 255,255,255, ;
Page1.Caption = "\<Casa", ;
Page1.FontName = "Segoe UI", ;
Page1.FontSize = 10, ;
Page1.Name = "pp1", ;
Page1.ToolTipText = "Casa (C)", ;
Page2.BackColor = 255,255,255, ;
Page2.Caption = "\<Banca", ;
Page2.FontName = "Segoe UI", ;
Page2.FontSize = 10, ;
Page2.Name = "pp2", ;
Page2.ToolTipText = "Banca (B)", ;
Page3.BackColor = 255,255,255, ;
Page3.Caption = "\<Alte", ;
Page3.FontName = "Segoe UI", ;
Page3.FontSize = 10, ;
Page3.Name = "pp3", ;
Page3.ToolTipText = "Alte (A)"
*< END OBJECT: BaseClass="pageframe" />
ADD OBJECT 'Pagefr1.p5.Pfr.pp1.Cw1' AS cw_2019 WITH ;
cmeniu = casa1, ;
Height = 20, ;
Left = 4, ;
Name = "Cw1", ;
nid_cw = 1, ;
ntip = 0, ;
Top = 8, ;
Width = 180, ;
Label_item1.Caption = "1. Casa incasari", ;
Label_item1.Name = "Label_item1"
*< END OBJECT: ClassLib="..\comun\clase\ofundal.vcx" BaseClass="container" />
ADD OBJECT 'Pagefr1.p5.Pfr.pp1.Cw2' AS cw_2019 WITH ;
cmeniu = casa2, ;
Height = 20, ;
Left = 4, ;
Name = "Cw2", ;
nid_cw = 2, ;
ntip = 0, ;
Top = 31, ;
Width = 180, ;
Label_item1.Caption = "2. Casa plati", ;
Label_item1.Name = "Label_item1"
*< END OBJECT: ClassLib="..\comun\clase\ofundal.vcx" BaseClass="container" />
ADD OBJECT 'Pagefr1.p5.Pfr.pp1.Cw3' AS cw_2019 WITH ;
cmeniu = casa3, ;
Height = 20, ;
Left = 4, ;
Name = "Cw3", ;
nid_cw = 3, ;
ntip = 0, ;
Top = 54, ;
Width = 180, ;
Label_item1.Caption = "3. Casa in valuta", ;
Label_item1.Name = "Label_item1"
*< END OBJECT: ClassLib="..\comun\clase\ofundal.vcx" BaseClass="container" />
ADD OBJECT 'Pagefr1.p5.Pfr.pp1.Cw4' AS cw_2019 WITH ;
Height = 20, ;
Left = 4, ;
Name = "Cw4", ;
nid_cw = 4, ;
ntip = 2, ;
Top = 89, ;
Width = 180, ;
Label_item1.Caption = "4. Registrul de casa", ;
Label_item1.Name = "Label_item1"
*< END OBJECT: ClassLib="..\comun\clase\ofundal.vcx" BaseClass="container" />
ADD OBJECT 'Pagefr1.p5.Pfr.pp1.Cw5' AS cw_2019 WITH ;
Height = 20, ;
Left = 4, ;
Name = "Cw5", ;
nid_cw = 5, ;
ntip = 3, ;
Top = 112, ;
Width = 180, ;
Label_item1.Caption = "5. Solduri case", ;
Label_item1.Name = "Label_item1"
*< END OBJECT: ClassLib="..\comun\clase\ofundal.vcx" BaseClass="container" />
ADD OBJECT 'Pagefr1.p5.Pfr.pp1.Cw6' AS cw_2019 WITH ;
cmeniu = listcasa, ;
Enabled = .F., ;
Height = 20, ;
Left = 4, ;
Name = "Cw6", ;
nid_cw = 8, ;
ntip = 1, ;
Top = 203, ;
Width = 180, ;
Label_item1.Caption = "8. Rapoarte", ;
Label_item1.Name = "Label_item1"
*< END OBJECT: ClassLib="..\comun\clase\ofundal.vcx" BaseClass="container" />
ADD OBJECT 'Pagefr1.p5.Pfr.pp1.Cw7' AS cw_2019 WITH ;
Height = 20, ;
Left = 5, ;
Name = "Cw7", ;
nid_cw = 6, ;
ntip = 2, ;
Top = 145, ;
Width = 180, ;
Label_item1.Caption = "6. Reg.de casa in valuta", ;
Label_item1.Name = "Label_item1"
*< END OBJECT: ClassLib="..\comun\clase\ofundal.vcx" BaseClass="container" />
ADD OBJECT 'Pagefr1.p5.Pfr.pp1.Cw8' AS cw_2019 WITH ;
Height = 20, ;
Left = 5, ;
Name = "Cw8", ;
nid_cw = 7, ;
ntip = 3, ;
Top = 168, ;
Width = 180, ;
Label_item1.Caption = "7. Solduri case in valuta", ;
Label_item1.Height = 19, ;
Label_item1.Left = 5, ;
Label_item1.Name = "Label_item1", ;
Label_item1.Top = 3, ;
Label_item1.Width = 139
*< END OBJECT: ClassLib="..\comun\clase\ofundal.vcx" BaseClass="container" />
ADD OBJECT 'Pagefr1.p5.Pfr.pp1.Pict_liniuta1' AS pict_liniuta WITH ;
Left = 3, ;
Name = "Pict_liniuta1", ;
Picture = ..\comun\grafice\f3.jpg, ;
Top = 78, ;
Width = 180
*< END OBJECT: ClassLib="..\comun\clase\ofundal.vcx" BaseClass="image" />
ADD OBJECT 'Pagefr1.p5.Pfr.pp1.Pict_liniuta2' AS pict_liniuta WITH ;
Left = 3, ;
Name = "Pict_liniuta2", ;
Picture = ..\comun\grafice\f3.jpg, ;
Top = 135, ;
Width = 180
*< END OBJECT: ClassLib="..\comun\clase\ofundal.vcx" BaseClass="image" />
ADD OBJECT 'Pagefr1.p5.Pfr.pp1.Pict_liniuta3' AS pict_liniuta WITH ;
Left = 3, ;
Name = "Pict_liniuta3", ;
Picture = ..\comun\grafice\f3.jpg, ;
Top = 192, ;
Width = 180
*< END OBJECT: ClassLib="..\comun\clase\ofundal.vcx" BaseClass="image" />
ADD OBJECT 'Pagefr1.p5.Pfr.pp1.Pict_liniuta4' AS pict_liniuta WITH ;
Left = 3, ;
Name = "Pict_liniuta4", ;
Picture = ..\comun\grafice\f3.jpg, ;
Top = 228, ;
Width = 180
*< END OBJECT: ClassLib="..\comun\clase\ofundal.vcx" BaseClass="image" />
ADD OBJECT 'Pagefr1.p5.Pfr.pp1.shape1' AS pict_meniu WITH ;
Height = 492, ;
Left = 0, ;
Name = "shape1", ;
Picture = ..\comun\grafice\f2.jpg, ;
Top = 5, ;
Width = 200, ;
ZOrderSet = 0
*< END OBJECT: ClassLib="..\comun\clase\ofundal.vcx" BaseClass="image" />
ADD OBJECT 'Pagefr1.p5.Pfr.pp2.Cw1' AS cw_2019 WITH ;
cmeniu = banca1, ;
Height = 20, ;
Left = 4, ;
Name = "Cw1", ;
nid_cw = 1, ;
ntip = 0, ;
Top = 8, ;
Width = 180, ;
Label_item1.Caption = "1. Banca incasari", ;
Label_item1.Name = "Label_item1"
*< END OBJECT: ClassLib="..\comun\clase\ofundal.vcx" BaseClass="container" />
ADD OBJECT 'Pagefr1.p5.Pfr.pp2.Cw2' AS cw_2019 WITH ;
cmeniu = banca2, ;
Height = 20, ;
Left = 4, ;
Name = "Cw2", ;
nid_cw = 2, ;
ntip = 0, ;
Top = 31, ;
Width = 180, ;
Label_item1.Caption = "2. Banca plati", ;
Label_item1.Name = "Label_item1"
*< END OBJECT: ClassLib="..\comun\clase\ofundal.vcx" BaseClass="container" />
ADD OBJECT 'Pagefr1.p5.Pfr.pp2.Cw3' AS cw_2019 WITH ;
cmeniu = banca3, ;
Height = 20, ;
Left = 4, ;
Name = "Cw3", ;
nid_cw = 3, ;
ntip = 0, ;
Top = 54, ;
Width = 180, ;
Label_item1.Caption = "3. Banca in valuta", ;
Label_item1.Name = "Label_item1"
*< END OBJECT: ClassLib="..\comun\clase\ofundal.vcx" BaseClass="container" />
ADD OBJECT 'Pagefr1.p5.Pfr.pp2.Cw4' AS cw_2019 WITH ;
Height = 20, ;
Left = 4, ;
Name = "Cw4", ;
nid_cw = 4, ;
ntip = 2, ;
Top = 88, ;
Width = 180, ;
Label_item1.Caption = "4. Registrul de banca", ;
Label_item1.Name = "Label_item1"
*< END OBJECT: ClassLib="..\comun\clase\ofundal.vcx" BaseClass="container" />
ADD OBJECT 'Pagefr1.p5.Pfr.pp2.Cw5' AS cw_2019 WITH ;
Height = 20, ;
Left = 4, ;
Name = "Cw5", ;
nid_cw = 6, ;
ntip = 2, ;
Top = 145, ;
Width = 180, ;
Label_item1.Caption = "6. Reg.de banca in valuta", ;
Label_item1.Name = "Label_item1"
*< END OBJECT: ClassLib="..\comun\clase\ofundal.vcx" BaseClass="container" />
ADD OBJECT 'Pagefr1.p5.Pfr.pp2.Cw6' AS cw_2019 WITH ;
cmeniu = listbanca, ;
Enabled = .F., ;
Height = 20, ;
Left = 4, ;
Name = "Cw6", ;
nid_cw = 8, ;
ntip = 1, ;
Top = 201, ;
Width = 180, ;
Label_item1.Caption = "8. Rapoarte", ;
Label_item1.Name = "Label_item1"
*< END OBJECT: ClassLib="..\comun\clase\ofundal.vcx" BaseClass="container" />
ADD OBJECT 'Pagefr1.p5.Pfr.pp2.Cw7' AS cw_2019 WITH ;
Height = 20, ;
Left = 4, ;
Name = "Cw7", ;
nid_cw = 5, ;
ntip = 3, ;
Top = 111, ;
Width = 180, ;
Label_item1.Caption = "5. Solduri banci", ;
Label_item1.Name = "Label_item1"
*< END OBJECT: ClassLib="..\comun\clase\ofundal.vcx" BaseClass="container" />
ADD OBJECT 'Pagefr1.p5.Pfr.pp2.Cw8' AS cw_2019 WITH ;
Height = 20, ;
Left = 4, ;
Name = "Cw8", ;
nid_cw = 7, ;
ntip = 3, ;
Top = 168, ;
Width = 180, ;
Label_item1.Caption = "7. Solduri banci in valuta", ;
Label_item1.Name = "Label_item1"
*< END OBJECT: ClassLib="..\comun\clase\ofundal.vcx" BaseClass="container" />
ADD OBJECT 'Pagefr1.p5.Pfr.pp2.Pict_liniuta1' AS pict_liniuta WITH ;
Left = 3, ;
Name = "Pict_liniuta1", ;
Picture = ..\comun\grafice\f3.jpg, ;
Top = 77, ;
Width = 180
*< END OBJECT: ClassLib="..\comun\clase\ofundal.vcx" BaseClass="image" />
ADD OBJECT 'Pagefr1.p5.Pfr.pp2.Pict_liniuta2' AS pict_liniuta WITH ;
Left = 3, ;
Name = "Pict_liniuta2", ;
Picture = ..\comun\grafice\f3.jpg, ;
Top = 134, ;
Width = 180
*< END OBJECT: ClassLib="..\comun\clase\ofundal.vcx" BaseClass="image" />
ADD OBJECT 'Pagefr1.p5.Pfr.pp2.Pict_liniuta3' AS pict_liniuta WITH ;
Left = 3, ;
Name = "Pict_liniuta3", ;
Picture = ..\comun\grafice\f3.jpg, ;
Top = 191, ;
Width = 180
*< END OBJECT: ClassLib="..\comun\clase\ofundal.vcx" BaseClass="image" />
ADD OBJECT 'Pagefr1.p5.Pfr.pp2.Pict_liniuta4' AS pict_liniuta WITH ;
Left = 3, ;
Name = "Pict_liniuta4", ;
Picture = ..\comun\grafice\f3.jpg, ;
Top = 225, ;
Width = 180
*< END OBJECT: ClassLib="..\comun\clase\ofundal.vcx" BaseClass="image" />
ADD OBJECT 'Pagefr1.p5.Pfr.pp2.shape1' AS pict_meniu WITH ;
Height = 492, ;
Left = 0, ;
Name = "shape1", ;
Picture = ..\comun\grafice\f2.jpg, ;
Top = 5, ;
Width = 200, ;
ZOrderSet = 0
*< END OBJECT: ClassLib="..\comun\clase\ofundal.vcx" BaseClass="image" />
ADD OBJECT 'Pagefr1.p5.Pfr.pp3.Cw1' AS cw_2019 WITH ;
cmeniu = trez1, ;
Height = 20, ;
Left = 5, ;
Name = "Cw1", ;
nid_cw = 1, ;
ntip = 0, ;
Top = 8, ;
Width = 200, ;
Label_item1.Caption = "1. Avansuri de trezorerie", ;
Label_item1.Name = "Label_item1"
*< END OBJECT: ClassLib="..\comun\clase\ofundal.vcx" BaseClass="container" />
ADD OBJECT 'Pagefr1.p5.Pfr.pp3.Cw2' AS cw_2019 WITH ;
Height = 20, ;
Left = 5, ;
Name = "Cw2", ;
nid_cw = 7, ;
ntip = 3, ;
Top = 176, ;
Width = 200, ;
Label_item1.Caption = "7. Cec - Solduri ", ;
Label_item1.Name = "Label_item1"
*< END OBJECT: ClassLib="..\comun\clase\ofundal.vcx" BaseClass="container" />
ADD OBJECT 'Pagefr1.p5.Pfr.pp3.Cw3' AS cw_2019 WITH ;
cmeniu = achi1, ;
Height = 20, ;
Left = 5, ;
Name = "Cw3", ;
nid_cw = 5, ;
ntip = 3, ;
Top = 130, ;
Width = 200, ;
Label_item1.Caption = "5. Achizitori", ;
Label_item1.Name = "Label_item1"
*< END OBJECT: ClassLib="..\comun\clase\ofundal.vcx" BaseClass="container" />
ADD OBJECT 'Pagefr1.p5.Pfr.pp3.Cw4' AS cw_2019 WITH ;
Height = 20, ;
Left = 5, ;
Name = "Cw4", ;
nid_cw = 6, ;
ntip = 3, ;
Top = 153, ;
Width = 200, ;
Label_item1.Caption = "6. Cec - Reg. operatiuni ", ;
Label_item1.Name = "Label_item1"
*< END OBJECT: ClassLib="..\comun\clase\ofundal.vcx" BaseClass="container" />
ADD OBJECT 'Pagefr1.p5.Pfr.pp3.Cw5' AS cw_2019 WITH ;
cmeniu = trez2, ;
Height = 20, ;
Left = 5, ;
Name = "Cw5", ;
nid_cw = 3, ;
ntip = 0, ;
Top = 74, ;
Width = 200, ;
Label_item1.Caption = "3. Operatiuni cu cec", ;
Label_item1.Name = "Label_item1"
*< END OBJECT: ClassLib="..\comun\clase\ofundal.vcx" BaseClass="container" />
ADD OBJECT 'Pagefr1.p5.Pfr.pp3.Cw6' AS cw_2019 WITH ;
cmeniu = trez, ;
Height = 20, ;
Left = 5, ;
Name = "Cw6", ;
nid_cw = 4, ;
ntip = 0, ;
Top = 97, ;
Width = 200, ;
Label_item1.Caption = "4. Alte operatiuni", ;
Label_item1.Name = "Label_item1"
*< END OBJECT: ClassLib="..\comun\clase\ofundal.vcx" BaseClass="container" />
ADD OBJECT 'Pagefr1.p5.Pfr.pp3.Cw7' AS cw_2019 WITH ;
cmeniu = trez3, ;
Height = 37, ;
Left = 5, ;
Name = "Cw7", ;
nid_cw = 2, ;
ntip = 0, ;
Top = 32, ;
Width = 200, ;
Label_item1.AutoSize = .F., ;
Label_item1.Caption = "2. Avansuri de trezorerie in valuta", ;
Label_item1.Height = 33, ;
Label_item1.Left = 5, ;
Label_item1.Name = "Label_item1", ;
Label_item1.Top = 2, ;
Label_item1.Width = 115, ;
Label_item1.WordWrap = .T.
*< END OBJECT: ClassLib="..\comun\clase\ofundal.vcx" BaseClass="container" />
ADD OBJECT 'Pagefr1.p5.Pfr.pp3.Cw8' AS cw_2019 WITH ;
cmeniu = listtrez, ;
Enabled = .F., ;
Height = 20, ;
Left = 4, ;
Name = "Cw8", ;
nid_cw = 8, ;
ntip = 1, ;
Top = 210, ;
Width = 200, ;
Label_item1.Caption = "8. Rapoarte", ;
Label_item1.Name = "Label_item1"
*< END OBJECT: ClassLib="..\comun\clase\ofundal.vcx" BaseClass="container" />
ADD OBJECT 'Pagefr1.p5.Pfr.pp3.Pict_liniuta1' AS pict_liniuta WITH ;
Left = 4, ;
Name = "Pict_liniuta1", ;
Picture = ..\comun\grafice\f3.jpg, ;
Top = 120, ;
Width = 200
*< END OBJECT: ClassLib="..\comun\clase\ofundal.vcx" BaseClass="image" />
ADD OBJECT 'Pagefr1.p5.Pfr.pp3.Pict_liniuta2' AS pict_liniuta WITH ;
Left = 4, ;
Name = "Pict_liniuta2", ;
Picture = ..\comun\grafice\f3.jpg, ;
Top = 199, ;
Width = 200
*< END OBJECT: ClassLib="..\comun\clase\ofundal.vcx" BaseClass="image" />
ADD OBJECT 'Pagefr1.p5.Pfr.pp3.Pict_liniuta3' AS pict_liniuta WITH ;
Left = 4, ;
Name = "Pict_liniuta3", ;
Picture = ..\comun\grafice\f3.jpg, ;
Top = 234, ;
Width = 200
*< END OBJECT: ClassLib="..\comun\clase\ofundal.vcx" BaseClass="image" />
ADD OBJECT 'Pagefr1.p5.Pfr.pp3.shape1' AS pict_meniu WITH ;
Height = 492, ;
Left = 0, ;
Name = "shape1", ;
Picture = ..\comun\grafice\f2.jpg, ;
Top = 5, ;
Width = 228, ;
ZOrderSet = 0
*< END OBJECT: ClassLib="..\comun\clase\ofundal.vcx" BaseClass="image" />
ADD OBJECT 'Pagefr1.p6.Cw1' AS cw_2019 WITH ;
cmeniu = cheltuieli1, ;
Height = 20, ;
Left = 5, ;
Name = "Cw1", ;
nid_cw = 1, ;
ntip = 0, ;
Top = 9, ;
Width = 180, ;
ZOrderSet = 1, ;
Label_item1.Caption = "1. Cheltuieli materiale", ;
Label_item1.Name = "Label_item1"
*< END OBJECT: ClassLib="..\comun\clase\ofundal.vcx" BaseClass="container" />
ADD OBJECT 'Pagefr1.p6.Cw3' AS cw_2019 WITH ;
Enabled = .F., ;
Height = 20, ;
Left = 5, ;
Name = "Cw3", ;
nid_cw = 0, ;
ntip = 0, ;
Top = 68, ;
Visible = .F., ;
Width = 180, ;
ZOrderSet = 3, ;
Label_item1.Caption = "3. Tipuri de cheltuieli", ;
Label_item1.Name = "Label_item1"
*< END OBJECT: ClassLib="..\comun\clase\ofundal.vcx" BaseClass="container" />
ADD OBJECT 'Pagefr1.p6.Cw4' AS cw_2019 WITH ;
cmeniu = cheltuieli2, ;
Height = 20, ;
Left = 5, ;
Name = "Cw4", ;
nid_cw = 2, ;
ntip = 0, ;
Top = 32, ;
Width = 180, ;
ZOrderSet = 5, ;
Label_item1.Caption = "2. Alte cheltuieli", ;
Label_item1.Name = "Label_item1"
*< END OBJECT: ClassLib="..\comun\clase\ofundal.vcx" BaseClass="container" />
ADD OBJECT 'Pagefr1.p6.Pict_liniuta1' AS pict_liniuta WITH ;
Left = 4, ;
Name = "Pict_liniuta1", ;
Picture = ..\comun\grafice\f3.jpg, ;
Top = 55, ;
Width = 180
*< END OBJECT: ClassLib="..\comun\clase\ofundal.vcx" BaseClass="image" />
ADD OBJECT 'Pagefr1.p6.Pict_liniuta2' AS pict_liniuta WITH ;
Left = 4, ;
Name = "Pict_liniuta2", ;
Picture = ..\comun\grafice\f3.jpg, ;
Top = 92, ;
Visible = .F., ;
Width = 180
*< END OBJECT: ClassLib="..\comun\clase\ofundal.vcx" BaseClass="image" />
ADD OBJECT 'Pagefr1.p6.shape1' AS pict_meniu WITH ;
Height = 492, ;
Left = 1, ;
Name = "shape1", ;
Picture = ..\comun\grafice\f2.jpg, ;
Top = 5, ;
Width = 200, ;
ZOrderSet = 0
*< END OBJECT: ClassLib="..\comun\clase\ofundal.vcx" BaseClass="image" />
ADD OBJECT 'Pagefr1.p7.Cw1' AS cw_2019 WITH ;
cmeniu = venituri, ;
Height = 20, ;
Left = 5, ;
Name = "Cw1", ;
nid_cw = 1, ;
ntip = 0, ;
Top = 11, ;
ZOrderSet = 1, ;
Label_item1.Caption = "1. Inregistrare venituri", ;
Label_item1.Name = "Label_item1"
*< END OBJECT: ClassLib="..\comun\clase\ofundal.vcx" BaseClass="container" />
ADD OBJECT 'Pagefr1.p7.Cw3' AS cw_2019 WITH ;
Enabled = .F., ;
Height = 20, ;
Left = 5, ;
Name = "Cw3", ;
ntip = 0, ;
Top = 46, ;
Visible = .F., ;
ZOrderSet = 3, ;
Label_item1.Caption = "2. Tipuri de venituri", ;
Label_item1.Name = "Label_item1"
*< END OBJECT: ClassLib="..\comun\clase\ofundal.vcx" BaseClass="container" />
ADD OBJECT 'Pagefr1.p7.Pict_liniuta1' AS pict_liniuta WITH ;
Left = 5, ;
Name = "Pict_liniuta1", ;
Picture = ..\comun\grafice\f3.jpg, ;
Top = 35, ;
Width = 180
*< END OBJECT: ClassLib="..\comun\clase\ofundal.vcx" BaseClass="image" />
ADD OBJECT 'Pagefr1.p7.Pict_liniuta2' AS pict_liniuta WITH ;
Left = 5, ;
Name = "Pict_liniuta2", ;
Picture = ..\comun\grafice\f3.jpg, ;
Top = 70, ;
Visible = .F., ;
Width = 180
*< END OBJECT: ClassLib="..\comun\clase\ofundal.vcx" BaseClass="image" />
ADD OBJECT 'Pagefr1.p7.shape1' AS pict_meniu WITH ;
Height = 492, ;
Left = 1, ;
Name = "shape1", ;
Picture = ..\comun\grafice\f2.jpg, ;
Top = 5, ;
Width = 200, ;
ZOrderSet = 0
*< END OBJECT: ClassLib="..\comun\clase\ofundal.vcx" BaseClass="image" />
PROCEDURE Activate
*!* Local I
*!* I=Iif(!luna_inchisa,.T.,.F.)
*!* With This.pagefr1
*!* .P2.Enabled=Iif(.P2.Enabled And !luna_inchisa,.T.,.F.)
*!* .P3.Enabled=Iif(.P3.Enabled And !luna_inchisa,.T.,.F.)
*!* .P7.Enabled=Iif(.P7.Enabled And !luna_inchisa,.T.,.F.)
*!* Endwith
ENDPROC
PROCEDURE activate_pag2
PARAMETERS np
*!* FOR i=1 TO THIS.pagefr1.p4.pfr.PAGECOUNT
*!* zi='this.pagefr1.p4.pfr.pp'+ALLTRIM(STR(i))+'.'
*!* IF i<>np
*!* &zi.BACKCOLOR=THIS.pagefr1.c_gri
*!* &zi.FORECOLOR=THIS.pagefr1.c_deschis
*!* ELSE
*!* &zi.BACKCOLOR=THIS.pagefr1.c_deschis
*!* &zi.FORECOLOR=THIS.pagefr1.c_inchis
*!* ENDIF
*!* NEXT
ENDPROC
PROCEDURE activate_pag3
PARAMETERS np
*!* FOR i=1 TO this.pagefr1.p5.pfr.PageCount
*!* zi='this.pagefr1.p5.pfr.pp'+ALLTRIM(STR(i))+'.'
*!* IF i<>np
*!* &zi.BackColor=this.pagefr1.c_gri
*!* &zi.ForeColor=this.pagefr1.c_deschis
*!* else
*!* &zi.BackColor=this.pagefr1.c_deschis
*!* &zi.ForeColor=this.pagefr1.c_inchis
*!* ENDIF
*!* NEXT
ENDPROC
PROCEDURE getcwbynumber
Lparameters tnCWNumber
LOCAL loControl, loCW, lcCaption, lnNumber, i, lnControlCount
loCW = null
loPaginaActiva = this.oPaginaActiva
lnControlCount = this.oPaginaActiva.Controlcount
FOR i = 1 TO lnControlCount
loControl = loPaginaActiva.controls(i)
If Lower(Left(loControl.Name,2)) = 'cw'
lcCaption = loControl.label_item1.caption
lnPos = AT('.', m.lcCaption)
IF lnPos > 0
lnNumber = VAL(LEFT(lcCaption, lnPos - 1))
IF lnNumber = tnCWNumber
loCW = loControl
EXIT
ENDIF
ENDIF
Endif
Endfor
RETURN loCW
ENDPROC
PROCEDURE KeyPress
Lparameters nKeyCode, nShiftAltCtrl
Local lcNumber, lnNumber, loCW, lcNextCharacter, loControl
loControl = Null
Do Case
Case nShiftAltCtrl = 0 And Between(nKeyCode, 49, 57) && 1..9
lcNumber = Alltrim(Str(nKeyCode - 48))
If nKeyCode = 49
Set Cursor Off
Wait "" To lcNextCharacter Timeout 0.5
Set Cursor On
If Alltrim(m.lcNextCharacter)$'0123456789'
lcNumber = m.lcNumber + Alltrim(m.lcNextCharacter) && 10, 11,12,13,14,15
Endif
Endif
lnNumber = Int(Val(m.lcNumber))
loCW = This.Getcwbynumber(m.lnNumber)
If !Isnull(loCW)
If loCW.Enabled
loControl = loCW
Endif
Endif
Case nShiftAltCtrl = 0 And nKeyCode = -4 && F5 Balanta
If Pemstatus(This, "Imagine01", 5) And This.Imagine01.Visible
loControl = This.Imagine01
Endif
Case nShiftAltCtrl = 0 And nKeyCode = -5 && F6 Registrul Jurnal
If Pemstatus(This, "Imagine02", 5) And This.Imagine02.Visible
loControl = This.Imagine02
Endif
Case nShiftAltCtrl = 0 And nKeyCode = -6 && F7 Registru casa lei
If Pemstatus(This, "Imagine03", 5) And This.Imagine03.Visible
loControl = This.Imagine03
Endif
Case nShiftAltCtrl = 0 And nKeyCode = -7 && F8 Registru banca lei
If Pemstatus(This, "Imagine04", 5) And This.Imagine04.Visible
loControl = This.Imagine04
Endif
Case nShiftAltCtrl = 0 And nKeyCode = -8 && F9 JV
If Pemstatus(This, "Imagine05", 5) And This.Imagine05.Visible
loControl = This.Imagine05
Endif
Case nShiftAltCtrl = 2 And nKeyCode = 102 && CTRL + F9 JC
If Pemstatus(This, "Imagine06", 5) And This.Imagine06.Visible
loControl = This.Imagine06
Endif
Case nShiftAltCtrl = 0 And nKeyCode = 96 && ` = F10 Facturi clienti 4111 (Tratat cu ON KEY LABEL F10)
If Pemstatus(This, "Imagine07", 5) And This.Imagine07.Visible
loControl = This.Imagine07
Endif
Case nShiftAltCtrl = 2 And nKeyCode = 103 && CTRL+F10 Facturi furnizori 401
If Pemstatus(This, "Imagine08", 5) And This.Imagine08.Visible
loControl = This.Imagine08
Endif
Case nShiftAltCtrl = 0 And nKeyCode = 39 && ' = F11 Balanta clienti 4111
If Pemstatus(This, "Imagine09", 5) And This.Imagine09.Visible
loControl = This.Imagine09
Endif
Case nShiftAltCtrl = 2 And nKeyCode = 137 && CTRL+F11 Balanta furnizori 401
If Pemstatus(This, "Imagine10", 5) And This.Imagine10.Visible
loControl = This.Imagine10
Endif
Case nShiftAltCtrl = 0 And nKeyCode = 1 && HOME Pagina *
This.Pagefr1.p1.Activate()
Case nShiftAltCtrl = 0 And nKeyCode = 105 && I Pagina Imobilizari
This.Pagefr1.p3.Activate()
Case nShiftAltCtrl = 0 And nKeyCode = 116 && T Pagina Terti / Trezorerie
If This.nPagina1 = 4
this.pagefr1.activate_pag(This.Pagefr1.p5, 5)
this.pagefr1.p5.pfr.pp1.Activate() && Trezorerie > Casa
ELSE
this.pagefr1.activate_pag(This.Pagefr1.p4, 4)
This.Pagefr1.p4.pfr.pp1.Activate() && Terti > Clienti
ENDIF
Case nShiftAltCtrl = 0 And nKeyCode = 102 && F Pagina Terti > Furnizori
this.pagefr1.activate_pag(This.Pagefr1.p4, 4)
this.pagefr1.p4.pfr.pp1.Activate()
Case nShiftAltCtrl = 0 And nKeyCode = 99 && C
Do Case
Case (This.nPagina1 = 4 And This.nPagina2 <> 2) OR (This.nPagina1 = 2) && Terti sau Capitaluri
this.pagefr1.activate_pag(This.Pagefr1.p4, 4)
This.Pagefr1.p4.pfr.pp2.Activate() && Clienti
Case (This.nPagina1 = 5 And This.nPagina2 <> 1) OR (This.nPagina1 = 4 And This.nPagina2 = 2)&& Trezorerie sau Terti > Clienti
this.pagefr1.activate_pag(This.Pagefr1.p5, 5)
This.Pagefr1.p5.pfr.pp1.Activate() && Casa
Case (This.nPagina1 = 5 And This.nPagina2 = 1) && Trezorerie > Casa
This.Pagefr1.p6.Activate()&& Cheltuieli
OTHERWISE
This.Pagefr1.p2.Activate() && Capitaluri
Endcase
Case nShiftAltCtrl = 0 And nKeyCode = 98 && B Pagina Banca
this.pagefr1.activate_pag(This.Pagefr1.p5, 5)
This.Pagefr1.p5.pfr.pp2.Activate()
Case nShiftAltCtrl = 0 And nKeyCode = 97 && A Pagina Terti > Alti sau Trezorerie > Alte
Do Case
Case (This.nPagina1 = 4 And This.nPagina2 <> 3) Or (This.nPagina1 = 5 And This.nPagina2 = 3)
this.pagefr1.activate_pag(This.Pagefr1.p4, 4)
This.Pagefr1.p4.pfr.pp3.Activate() && Terti > Alti
Case (This.nPagina1 = 5 And This.nPagina2 <> 3) Or (This.nPagina1 = 4 And This.nPagina2 = 3)
this.pagefr1.activate_pag(This.Pagefr1.p5, 5)
This.Pagefr1.p5.pfr.pp3.Activate() && Trezorerie > Alti
Otherwise
This.Pagefr1.p4.pfr.pp3.Activate() && Terti > Alti
Endcase
Case nShiftAltCtrl = 0 And nKeyCode = 118 && V
This.Pagefr1.p7.Activate()
Endcase
If !Isnull(loControl)
Nodefault
With loControl
.MouseEnter()
.Click()
.MouseLeave()
Endwith
Else
DoDefault(nKeyCode, nShiftAltCtrl)
Endif
ENDPROC
PROCEDURE RightClick
DO start_firma IN ostartfirma.prg
verifica_drepturi('oprinc','pagefr1')
ENDPROC
PROCEDURE Show
Lparameters nStyle
Local w,h
verifica_drepturi('oprinc','pagefr1')
w=_Screen.Width
h=_Screen.Height
This.Width=w
This.Height=h
* Image1
*!* This.image1.Left=w-This.image1.Width
*!* This.image1.Top=h-This.image1.Height
*!* This.container1.Top=h-This.container1.Height
This.image2.Width = w + 180
*!* this.lbVersion.Left = this.Image1.Left + leftVer
*!* this.lbVersion.Top = this.Image1.Top + topVer
With This.pagefr1
.Width=w
.Height=h
.p1.shape1.Height=h
.p2.shape1.Height=h
.p3.shape1.Height=h
.p4.pfr.Height=h
.p4.pfr.Width=w
.p4.pfr.pp1.shape1.Height=h
.p4.pfr.pp2.shape1.Height=h
.p4.pfr.pp3.shape1.Height=h
.p5.pfr.Height=h
.p5.pfr.Width=w
.p5.pfr.pp1.shape1.Height=h
.p5.pfr.pp2.shape1.Height=h
.p5.pfr.pp3.shape1.Height=h
.p6.shape1.Height=h
.p7.shape1.Height=h
Endwith
Thisform.container1.texT1.Caption=gcUserNameApp
ON KEY LABEL F10 KEYBOARD "`" && F10 activa meniul in loc sa apese pe imaginea Facturi Vanzari
ON KEY LABEL F11 KEYBOARD "'" && F11 nu se stie ce activa, in loc sa apese pe imaginea Facturi Vanzari
KEYBOARD '{CTRL+TAB}'
* Verifica daca exista situatii contabile invalidate pentru a schimba imaginea de atentionare
* Fac verificarea la fiecare actiune sau click dreapta pe fundal
Thisform.verifica_invalidat()
With Thisform.pagefr1
For i=1 To .PageCount
With .Pages(i)
For l=1 To .ControlCount
If Alltrim(Upper(.Objects(l).Class))='CW'
Bindevent(.Objects(l),"do_actiune",Thisform,"verifica_invalidat",1)
Endif
Endfor
Endwith
Endfor
Endwith
With Thisform
For i=1 To .ControlCount
If Alltrim(Upper(.Objects(i).Class))='IMAGINE'
Bindevent(.Objects(i),"do_actiune",Thisform,"verifica_invalidat",1)
Endif
Endfor
ENDWITH
Bindevent(Thisform,"Rightclick",Thisform,"verifica_invalidat",1)
ENDPROC
PROCEDURE verifica_invalidat
LOCAL llInvalidat, lcPictureDown, lcPictureUp
* Verific daca orice luna este invalidata
llInvalidat = VerificaInvalidat() && overificari.prg
lcPictureUp = "validare" + IIF(m.llInvalidat, "3", "1") + "1.bmp"
lcPictureDown = "validare" + IIF(m.llInvalidat, "3", "1") + "2.bmp"
With this.imagine11
.picturedown = m.lcPictureDown
.pictureup = m.lcPictureUp
.ToolTipText = IIF(m.llInvalidat, 'Exista situatii contabile invalidate datorita modificarilor din lunile precedente!' + ;
CHR(13) + CHR(13) + ;
'Situatiile se valideaza automat prin redeschidere de luna sau refaceri individuale sau se pot valida manual.', ;
'Nu exista situatii invalidate.')
.picture = m.lcPictureUp
Endwith
ENDPROC
PROCEDURE Image1.RightClick
thisform.rightclick
ENDPROC
PROCEDURE Imagine01.do_actiune
DO viz_balanta_contabilitate WITH "bal" IN ooperatii_comune.prg
ENDPROC
PROCEDURE Imagine02.do_actiune
DO viz_act IN ooperatii_comune.prg
ENDPROC
PROCEDURE Imagine03.do_actiune
DO viz_bancasa WITH '5311' IN ocasabanca.prg
ENDPROC
PROCEDURE Imagine04.do_actiune
DO viz_bancasa WITH '5121' IN ocasabanca.prg
ENDPROC
PROCEDURE Imagine05.do_actiune
DO viz_regvanz IN oproceduri_decont.prg
ENDPROC
PROCEDURE Imagine06.do_actiune
DO viz_regcump IN oproceduri_decont.prg
ENDPROC
PROCEDURE Imagine07.do_actiune
Do lans_ireg_parteneri With .F.,gcCont411,.T.
ENDPROC
PROCEDURE Imagine08.do_actiune
Do lans_ireg_parteneri With .F.,'401',.F.
ENDPROC
PROCEDURE Imagine09.do_actiune
DO lans_balanta_parteneri WITH gcCont411, .T. IN oparteneri.prg
ENDPROC
PROCEDURE Imagine10.do_actiune
DO lans_balanta_parteneri WITH "401",.F. IN oparteneri.prg
ENDPROC
PROCEDURE Imagine11.do_actiune
gcAcces = "1;2;3;4;"
do SituatiiInvalidate in overificari.prg
ENDPROC
PROCEDURE Pagefr1.activate_pag
Lparameters toPagina, tnPagina1, tnPagina2
thisform.oPaginaActiva = toPagina
thisform.nPagina1 = IIF(!EMPTY(tnPagina1), tnPagina1, 1)
thisform.nPagina2 = IIF(!EMPTY(tnPagina2), tnPagina2, 1)
thisform.opaginaactiva.click()
thisform.opaginaactiva.setfocus()
ENDPROC
PROCEDURE Pagefr1.p1.Activate
this.Parent.activate_pag(this,1)
ENDPROC
PROCEDURE Pagefr1.p1.Cw1.do_actiune
DO viz_balanta_contabilitate WITH "bal" IN ooperatii_comune.prg
ENDPROC
PROCEDURE Pagefr1.p1.Cw10.do_actiune
x = xmenu("Balanta conturi \<speciale (Clasa 8); Balanta conturi de \<gestiune (Clasa 9)")
DO CASE
CASE x = 1
DO viz_balanta_contabilitate WITH 'bal_c8' IN ooperatii_comune.prg
CASE x = 2
DO viz_balanta_contabilitate WITH 'bal_c9' IN ooperatii_comune.prg
ENDCASE
ENDPROC
PROCEDURE Pagefr1.p1.Cw2.do_actiune
DO VIZ_aCT IN ooperatii_comune.prg
ENDPROC
PROCEDURE Pagefr1.p1.Cw3.do_actiune
Local lcKeyCategorie, lcKeySet, lcMenuRetVal, lcSql, llEnabled, lnIdSet, loCategorie, loAct
lnIdSet = 0
llEnabled = !luna_inchisa And m.nivel <= 3
If !m.llEnabled
This.Enabled = .F.
Return m.lnIdSet
Endif
With Thisform.oContextMenu
.Clear
* creare meniu
.Add("000000")
.Add("000000", '99999', [Note fara predefinire])
.Add("000000", '99998', [Note fara predefinire *])
Endwith
Thisform.oContextMenu.ShowFlags = 0x1000
lcMenuRetVal = Thisform.oContextMenu.Show()
lnIdSet = Val(m.lcMenuRetVal) && id_set
If m.lnIdSet > 0
loAct = Null
Do note_fara_predefinire With m.lnIdSet, , m.loAct In ocont2003.prg
Endif
ENDPROC
PROCEDURE Pagefr1.p1.Cw4.do_actiune
*!* 09.03.2026
*!* robert
*!* Adaugat variabila loxSet, scatter name CrsUsets => parametru loxSet pentru procedura note_fara_predefinire
Local lcKeyCategorie, lcKeySet, lcMenuRetVal, lcSql, llEnabled, lnIdSet, loCategorie, loAct, loxSet
lnIdSet = 0
llEnabled = !luna_inchisa And m.nivel <= 3
If !m.llEnabled
This.Enabled = .F.
Return m.lnIdSet
Endif
TEXT To m.lcSql NOSHOW TEXTMERGE
Select Nvl(c.ordine, 0) As ordine,
ct.nr_seturi,
ct.id_categorie,
cast(Nvl(c.categorie, 'Fara categorie') as varchar2(100)) As categorie
FROM (Select CAST(NVL(id_categorie, 0) as Number(6)) as id_categorie,
Count(*) As nr_seturi
From xsets
where id_Set >= 1000000
Group By id_categorie) ct
Left Join xsetscategorii c
On ct.id_categorie = c.id_categorie
ORDER By 1, 3;
ENDTEXT
llSucces = goExecutor.oExecuta(m.lcSql, "crsUCategorii")
TEXT To m.lcSql NOSHOW TEXTMERGE
Select id_set, id_categorie, nume_set
From xsets
Where id_set >= 1000000
ORDER BY id_categorie, nume_set;
ENDTEXT
llSucces = goExecutor.oExecuta(m.lcSql, "crsUSets")
With Thisform.oContextMenu
.Clear
* creare meniu
.Add("000000")
* seturi definite de utilizator pe categorii
Select crsUCategorii
Scan
Scatter Name m.loCategorie
lcKeyCategorie = '_' + Alltrim(Str(Nvl(m.loCategorie.id_categorie, 0)))
* categorie
.Add("000000", m.lcKeyCategorie, m.loCategorie.categorie)
* Seturi note utilizator pe categorie
Select crsUSets
Scan For Nvl(id_categorie,0) = Nvl(m.loCategorie.id_categorie, 0)
lcKeySet = Alltrim(Str(id_set))
lcSet = Alltrim(crsUSets.nume_set)
.Add(m.lcKeyCategorie, m.lcKeySet, m.lcSet)
Endscan
Endscan
Endwith
*Thisform.oContextMenu.ShowFlags = TPM_VERPOSANIMATION
Thisform.oContextMenu.ShowFlags = 0x1000
lcMenuRetVal = Thisform.oContextMenu.Show()
lnIdSet = Val(m.lcMenuRetVal) && id_set
If m.lnIdSet > 0
loAct = Null
Select crsUSets
Locate For id_set = m.lnIdSet
If Found()
Scatter Name loxSet
Else
loxSet = .F.
Endif
If !Inlist(m.lnIdSet, 99998, 99999)
lnButon = lans(m.lnIdSet)
If m.lnButon = 2
Return
Endif
Select actactan
Go Top
Scatter Name loAct
Endif
Do note_fara_predefinire With m.lnIdSet, loxSet, m.loAct In ocont2003.prg
Endif
Use In (Select('crsUCategorii'))
Use In (Select('crsUSets'))
ENDPROC
PROCEDURE Pagefr1.p1.Cw5.do_actiune
gcAcces = [1;2;3;4;]
DO notei.mpr
*!* DO CASE
*!* CASE LUNA_INCHISA
*!* DO mesaj WITH 'Aceasta luna e blocata !','Nu se pot face inchideri!'
*!* CASE luna_neplatita
*!* DO mesaj WITH 'Introduceti seria periodica ! ','Meniu : Initializare / Serie periodica'
*!* OTHERWISE
*!* DO notei.mpr
*!* ENDCASE
ENDPROC
PROCEDURE Pagefr1.p1.Cw6.do_actiune
DO fisedecont.mpr
ENDPROC
PROCEDURE Pagefr1.p1.Cw7.do_actiune
DO inventar_patrimoniu IN orapoarte.prg
ENDPROC
PROCEDURE Pagefr1.p1.Cw8.do_actiune
DO listgen.mpr
ENDPROC
PROCEDURE Pagefr1.p1.Cw9.do_actiune
do meniu_notificari in orapoarte.prg
ENDPROC
PROCEDURE Pagefr1.p1.RightClick
thisform.rightclick
ENDPROC
PROCEDURE Pagefr1.p2.Activate
this.Parent.activate_pag(this,2)
ENDPROC
PROCEDURE Pagefr1.p2.Cw1.do_actiune
*!* 24.05.2011
*!* marius.mutu
*!* nu se pot introduce documente de pe mama
IF !(luna_inchisa OR m.glEMama)
DO capitaluri1.mpr
ENDIF
ENDPROC
PROCEDURE Pagefr1.p2.Cw2.do_actiune
*!* 24.05.2011
*!* marius.mutu
*!* nu se pot introduce documente de pe mama
IF !(luna_inchisa OR m.glEMama)
DO capitaluri2.mpr
ENDIF
ENDPROC
PROCEDURE Pagefr1.p2.Cw3.do_actiune
*!* 24.05.2011
*!* marius.mutu
*!* nu se pot introduce documente de pe mama
IF !(luna_inchisa OR m.glEMama)
DO capitaluri3.mpr
ENDIF
ENDPROC
PROCEDURE Pagefr1.p2.Cw4.do_actiune
*!* 24.05.2011
*!* marius.mutu
*!* nu se pot introduce documente de pe mama
IF !(luna_inchisa OR m.glEMama)
DO capitaluri4.mpr
ENDIF
ENDPROC
PROCEDURE Pagefr1.p2.Cw5.do_actiune
*!* 24.05.2011
*!* marius.mutu
*!* nu se pot introduce documente de pe mama
IF !(luna_inchisa OR m.glEMama)
DO capitaluri5.mpr
ENDIF
ENDPROC
PROCEDURE Pagefr1.p2.Cw6.do_actiune
*!* 24.05.2011
*!* marius.mutu
*!* nu se pot introduce documente de pe mama
IF !(luna_inchisa OR m.glEMama)
DO capitaluri6.mpr
ENDIF
ENDPROC
PROCEDURE Pagefr1.p2.Cw7.do_actiune
*!* 24.05.2011
*!* marius.mutu
*!* nu se pot introduce documente de pe mama
IF !(luna_inchisa OR m.glEMama)
DO capitaluri7.mpr
ENDIF
ENDPROC
PROCEDURE Pagefr1.p2.Cw8.do_actiune
*!* 24.05.2011
*!* marius.mutu
*!* nu se pot introduce documente de pe mama
IF !(luna_inchisa OR m.glEMama)
DO capitaluri8.mpr
ENDIF
ENDPROC
PROCEDURE Pagefr1.p2.RightClick
thisform.rightclick
ENDPROC
PROCEDURE Pagefr1.p3.Activate
this.Parent.activate_pag(this,3)
ENDPROC
PROCEDURE Pagefr1.p3.Cw1.do_actiune
*!* 24.05.2011
*!* marius.mutu
*!* nu se pot introduce documente de pe mama
IF !(luna_inchisa OR m.glEMama)
Do imobilizari1.mpr
Endif
ENDPROC
PROCEDURE Pagefr1.p3.Cw2.do_actiune
*!* 24.05.2011
*!* marius.mutu
*!* nu se pot introduce documente de pe mama
IF !(luna_inchisa OR m.glEMama)
DO imobilizari2.mpr
ENDIF
ENDPROC
PROCEDURE Pagefr1.p3.Cw3.do_actiune
*!* 24.05.2011
*!* marius.mutu
*!* nu se pot introduce documente de pe mama
IF !(luna_inchisa OR m.glEMama)
DO imobilizari3.mpr
ENDIF
ENDPROC
PROCEDURE Pagefr1.p3.Cw4.do_actiune
*!* 24.05.2011
*!* marius.mutu
*!* nu se pot introduce documente de pe mama
IF !(luna_inchisa OR m.glEMama)
Do imobilizari4.mpr
Endif
ENDPROC
PROCEDURE Pagefr1.p3.Cw5.do_actiune
*!* 24.05.2011
*!* marius.mutu
*!* nu se pot introduce documente de pe mama
IF !(luna_inchisa OR m.glEMama)
Do imobilizari5.mpr
Endif
ENDPROC
PROCEDURE Pagefr1.p3.Cw6.do_actiune
*!* 24.05.2011
*!* marius.mutu
*!* nu se pot introduce documente de pe mama
IF !(luna_inchisa OR m.glEMama)
DO imobilizari6.mpr
ENDIF
ENDPROC
PROCEDURE Pagefr1.p3.RightClick
thisform.rightclick
ENDPROC
PROCEDURE Pagefr1.p4.Activate
this.Parent.activate_pag(this,4)
ENDPROC
PROCEDURE Pagefr1.p4.Pfr.pp1.Activate
this.Parent.Parent.Parent.activate_pag(this,4,1)
ENDPROC
PROCEDURE Pagefr1.p4.Pfr.pp1.Cw1.do_actiune
*!* 24.05.2011
*!* marius.mutu
*!* nu se pot introduce documente de pe mama
IF !(luna_inchisa OR m.glEMama)
DO furnizori1.mpr
ENDIF
ENDPROC
PROCEDURE Pagefr1.p4.Pfr.pp1.Cw10.do_actiune
DO viz_regcump IN oproceduri_decont.prg
ENDPROC
PROCEDURE Pagefr1.p4.Pfr.pp1.Cw2.do_actiune
*!* 24.05.2011
*!* marius.mutu
*!* nu se pot introduce documente de pe mama
IF !(luna_inchisa OR m.glEMama)
DO furnizori2.mpr
ENDIF
ENDPROC
PROCEDURE Pagefr1.p4.Pfr.pp1.Cw3.do_actiune
*!* 24.05.2011
*!* marius.mutu
*!* nu se pot introduce documente de pe mama
IF !(luna_inchisa OR m.glEMama)
DO furnizori3.mpr
ENDIF
ENDPROC
PROCEDURE Pagefr1.p4.Pfr.pp1.Cw5.do_actiune
*!* 24.05.2011
*!* marius.mutu
*!* nu se pot introduce documente de pe mama
IF !(luna_inchisa OR m.glEMama)
DO furnizori4.mpr
ENDIF
ENDPROC
PROCEDURE Pagefr1.p4.Pfr.pp1.Cw6.do_actiune
DO vizfurn1.mpr
ENDPROC
PROCEDURE Pagefr1.p4.Pfr.pp1.Cw7.do_actiune
DO vizfurn2.mpr
ENDPROC
PROCEDURE Pagefr1.p4.Pfr.pp1.Cw8.do_actiune
*!* 24.05.2011
*!* marius.mutu
*!* nu se pot introduce documente de pe mama
IF !(luna_inchisa OR m.glEMama)
DO furnizori5.mpr
ENDIF
ENDPROC
PROCEDURE Pagefr1.p4.Pfr.pp1.Cw9.do_actiune
DO listfurn.mpr
ENDPROC
PROCEDURE Pagefr1.p4.Pfr.pp1.RightClick
thisform.rightclick
ENDPROC
PROCEDURE Pagefr1.p4.Pfr.pp2.Activate
this.Parent.Parent.Parent.activate_pag(this,4,2)
ENDPROC
PROCEDURE Pagefr1.p4.Pfr.pp2.Cw1.do_actiune
*!* 24.05.2011
*!* marius.mutu
*!* nu se pot introduce documente de pe mama
IF !(luna_inchisa OR m.glEMama)
DO clienti1.mpr
ENDIF
ENDPROC
PROCEDURE Pagefr1.p4.Pfr.pp2.Cw10.do_actiune
DO viz_regvanz IN oproceduri_decont.prg
ENDPROC
PROCEDURE Pagefr1.p4.Pfr.pp2.Cw101.do_actiune
DO istoric_clienti in orap_terti.prg
ENDPROC
PROCEDURE Pagefr1.p4.Pfr.pp2.Cw2.do_actiune
*!* 24.05.2011
*!* marius.mutu
*!* nu se pot introduce documente de pe mama
IF !(luna_inchisa OR m.glEMama)
DO clienti2.mpr
ENDIF
ENDPROC
PROCEDURE Pagefr1.p4.Pfr.pp2.Cw3.do_actiune
*!* 24.05.2011
*!* marius.mutu
*!* nu se pot introduce documente de pe mama
IF !(luna_inchisa OR m.glEMama)
DO clienti3.mpr
ENDIF
ENDPROC
PROCEDURE Pagefr1.p4.Pfr.pp2.Cw4.do_actiune
*!* 24.05.2011
*!* marius.mutu
*!* nu se pot introduce documente de pe mama
IF !(luna_inchisa OR m.glEMama)
DO clienti4.mpr
ENDIF
ENDPROC
PROCEDURE Pagefr1.p4.Pfr.pp2.Cw5.do_actiune
*!* 24.05.2011
*!* marius.mutu
*!* nu se pot introduce documente de pe mama
IF !(luna_inchisa OR m.glEMama)
DO clienti5.mpr
ENDIF
ENDPROC
PROCEDURE Pagefr1.p4.Pfr.pp2.Cw6.do_actiune
DO vizcli1.mpr
ENDPROC
PROCEDURE Pagefr1.p4.Pfr.pp2.Cw7.do_actiune
DO vizcli2.mpr
ENDPROC
PROCEDURE Pagefr1.p4.Pfr.pp2.Cw9.do_actiune
DO listcli.mpr
ENDPROC
PROCEDURE Pagefr1.p4.Pfr.pp2.RightClick
thisform.rightclick
ENDPROC
PROCEDURE Pagefr1.p4.Pfr.pp3.Activate
this.Parent.Parent.Parent.activate_pag(this,4,3)
ENDPROC
PROCEDURE Pagefr1.p4.Pfr.pp3.Cw1.do_actiune
DO debitori.mpr
ENDPROC
PROCEDURE Pagefr1.p4.Pfr.pp3.Cw10.do_actiune
*!* 24.05.2011
*!* marius.mutu
*!* nu se pot introduce documente de pe mama
IF !(luna_inchisa OR m.glEMama)
DO dividende.mpr
ENDIF
ENDPROC
PROCEDURE Pagefr1.p4.Pfr.pp3.Cw11.do_actiune
DO lans_balanta_parteneri IN OPARTENERI.prg
ENDPROC
PROCEDURE Pagefr1.p4.Pfr.pp3.Cw12.do_actiune
*!* 24.05.2011
*!* marius.mutu
*!* nu se pot introduce documente de pe mama
IF !(luna_inchisa OR m.glEMama)
PRIVATE pcACN
loCont = ret_cont("Selectati contul",'421,423,424,425')
IF buton = 2
RELEASE loCont
RETURN
ENDIF
CN = locont.cont
PcACN = loCont.Acont
lans(10517)
ENDIF
ENDPROC
PROCEDURE Pagefr1.p4.Pfr.pp3.Cw13.do_actiune
*!* 24.05.2011
*!* marius.mutu
*!* nu se pot introduce documente de pe mama
IF !(luna_inchisa OR m.glEMama)
DO decont4511.mpr
ENDIF
ENDPROC
PROCEDURE Pagefr1.p4.Pfr.pp3.Cw14.do_actiune
IF !(luna_inchisa OR m.glEMama)
DO creditoriOp.mpr
ENDIF
ENDPROC
PROCEDURE Pagefr1.p4.Pfr.pp3.Cw2.do_actiune
DO creditori.mpr
ENDPROC
PROCEDURE Pagefr1.p4.Pfr.pp3.Cw3.do_actiune
DO cheltavans.mpr
ENDPROC
PROCEDURE Pagefr1.p4.Pfr.pp3.Cw4.do_actiune
*osetviz.tbrprim.butonacti.click
DO actionari.mpr
ENDPROC
PROCEDURE Pagefr1.p4.Pfr.pp3.Cw5.do_actiune
*!* DO lans_balanta_cumulata IN OPARTENERI.prg
DO balpartc.mpr
ENDPROC
PROCEDURE Pagefr1.p4.Pfr.pp3.Cw6.do_actiune
DO lans_ireg_parteneri WITH .T.,'',.T.
ENDPROC
PROCEDURE Pagefr1.p4.Pfr.pp3.Cw7.do_actiune
DO vnavans.mpr
ENDPROC
PROCEDURE Pagefr1.p4.Pfr.pp3.Cw8.do_actiune
DO vizdividende.mpr
ENDPROC
PROCEDURE Pagefr1.p4.Pfr.pp3.Cw9.do_actiune
DO listterti.mpr
ENDPROC
PROCEDURE Pagefr1.p4.Pfr.pp3.RightClick
thisform.rightclick
ENDPROC
PROCEDURE Pagefr1.p5.Activate
this.Parent.activate_pag(this,5)
ENDPROC
PROCEDURE Pagefr1.p5.Pfr.pp1.Activate
this.Parent.Parent.Parent.activate_pag(this,5,1)
ENDPROC
PROCEDURE Pagefr1.p5.Pfr.pp1.Cw1.do_actiune
*!* 24.05.2011
*!* marius.mutu
*!* nu se pot introduce documente de pe mama
IF !(luna_inchisa OR m.glEMama)
DO casa1.mpr
ENDIF
ENDPROC
PROCEDURE Pagefr1.p5.Pfr.pp1.Cw2.do_actiune
*!* 24.05.2011
*!* marius.mutu
*!* nu se pot introduce documente de pe mama
IF !(luna_inchisa OR m.glEMama)
DO casa2.mpr
ENDIF
ENDPROC
PROCEDURE Pagefr1.p5.Pfr.pp1.Cw3.do_actiune
*!* 24.05.2011
*!* marius.mutu
*!* nu se pot introduce documente de pe mama
IF !(luna_inchisa OR m.glEMama)
DO casa3.mpr
ENDIF
ENDPROC
PROCEDURE Pagefr1.p5.Pfr.pp1.Cw4.do_actiune
DO viz_bancasa WITH '5311' IN ocasabanca.prg
ENDPROC
PROCEDURE Pagefr1.p5.Pfr.pp1.Cw5.do_actiune
*DO afis_sold_casabanca WITH 'CASA','CASANUME','SOLDURI CASE','5311','CASA','INCASARI',.F.
DO lans_balanta_parteneri WITH "5311",.T. IN oparteneri.prg
ENDPROC
PROCEDURE Pagefr1.p5.Pfr.pp1.Cw6.do_actiune
DO listcasa.mpr
ENDPROC
PROCEDURE Pagefr1.p5.Pfr.pp1.Cw7.do_actiune
DO viz_bancasa WITH '5314' IN ocasabanca.prg
ENDPROC
PROCEDURE Pagefr1.p5.Pfr.pp1.Cw8.do_actiune
*DO afis_sold_casabanca WITH 'CASA VALUTA','CASVNUME','SOLDURI CASE IN VALUTA','5314','NUME_5','INCASARI',.T.
DO lans_balanta_parteneri WITH "5314",.T. IN oparteneri.prg
ENDPROC
PROCEDURE Pagefr1.p5.Pfr.pp1.RightClick
thisform.rightclick
ENDPROC
PROCEDURE Pagefr1.p5.Pfr.pp2.Activate
this.Parent.Parent.Parent.activate_pag(this,5,2)
ENDPROC
PROCEDURE Pagefr1.p5.Pfr.pp2.Cw1.do_actiune
*!* 24.05.2011
*!* marius.mutu
*!* nu se pot introduce documente de pe mama
IF !(luna_inchisa OR m.glEMama)
DO banca1.mpr
ENDIF
ENDPROC
PROCEDURE Pagefr1.p5.Pfr.pp2.Cw2.do_actiune
*!* 24.05.2011
*!* marius.mutu
*!* nu se pot introduce documente de pe mama
IF !(luna_inchisa OR m.glEMama)
DO banca2.mpr
ENDIF
ENDPROC
PROCEDURE Pagefr1.p5.Pfr.pp2.Cw3.do_actiune
*!* 24.05.2011
*!* marius.mutu
*!* nu se pot introduce documente de pe mama
IF !(luna_inchisa OR m.glEMama)
DO banca3.mpr
ENDIF
ENDPROC
PROCEDURE Pagefr1.p5.Pfr.pp2.Cw4.do_actiune
DO viz_bancasa WITH '5121' IN ocasabanca.prg
ENDPROC
PROCEDURE Pagefr1.p5.Pfr.pp2.Cw5.do_actiune
DO viz_bancasa WITH '5124' IN ocasabanca.prg
ENDPROC
PROCEDURE Pagefr1.p5.Pfr.pp2.Cw6.do_actiune
Do listbanca.mpr
ENDPROC
PROCEDURE Pagefr1.p5.Pfr.pp2.Cw7.do_actiune
*DO afis_sold_casabanca WITH 'BANCA','BANNUME','SOLDURI BANCI','5121','NUME_2','INCASARI',.F.
DO lans_balanta_parteneri WITH "5121,5126,5081",.T. IN oparteneri.prg
ENDPROC
PROCEDURE Pagefr1.p5.Pfr.pp2.Cw8.do_actiune
*DO afis_sold_casabanca WITH 'BANCA VALUTA','BANVNUME','SOLDURI BANCI IN VALUTA','5124','NUME_3','INCASARI',.T.
DO lans_balanta_parteneri WITH "5124,5127,5081",.T. IN oparteneri.prg
ENDPROC
PROCEDURE Pagefr1.p5.Pfr.pp2.RightClick
thisform.rightclick
ENDPROC
PROCEDURE Pagefr1.p5.Pfr.pp3.Activate
this.Parent.Parent.Parent.activate_pag(this,5,3)
ENDPROC
PROCEDURE Pagefr1.p5.Pfr.pp3.Cw1.do_actiune
*!* 24.05.2011
*!* marius.mutu
*!* nu se pot introduce documente de pe mama
IF !(luna_inchisa OR m.glEMama)
DO trez1.mpr
ENDIF
ENDPROC
PROCEDURE Pagefr1.p5.Pfr.pp3.Cw2.do_actiune
*!* *!* SELE CECNUME
*!* *!* oCEc=create('afCEC')
*!* *!* oCEc.show(1)
*!* DO afis_sold_casabanca WITH 'CEC','CECNUME','CECuri','5112','CEC','INCARCAT',.F.
*!* *PARAMETERS tcTip,tcFis,tcTitlu,TcCont,TcNumeCol1,TcNumeCol2,tlVisibil
DO lans_balanta_parteneri WITH "5112",.T. IN OPARTENERI.prg
ENDPROC
PROCEDURE Pagefr1.p5.Pfr.pp3.Cw3.do_actiune
*osetviz.tbrprim.butonachi.click
Do ACHI1.MPR
ENDPROC
PROCEDURE Pagefr1.p5.Pfr.pp3.Cw4.do_actiune
*!* sele cEC
*!* loca for cod=-1
*!* if !found()
*!* appe blan
*!* repl cod with -1
*!* endif
*!* repl scc with ''
*!* repl scd with ''
*!* select BAL
*!* loca for left(cont,4)='5112'
*!* IF FOUND()
*!* SCATTER MEMVAR
*!* ELSE
*!* STORE 0 TO M.PRECDEB,M.PRECCRED,M.SOLDDEB,M.SOLDCRED
*!* ENDIF
*!* SELECT distinct act.cod,act.fdoc,act.dataact,CEC.dataireg,act.nract,act.NUME,CEC.CEC,CEC.inCARCAT AS INCASARI,CEC.plati,CEC.scd,CEC.scc;
*!* from act,CEC;
*!* WHERE act.cod = CEC.cod and LEFT(ACT.SCC,4)=LEFT(CEC.SCC,4) and !deleted();
*!* into cursor casban
*!* sele casban
*!* INDEX ON DATAireg TAG DATAireg OF CASBAN
*!* Oreg=CREATEOBJECT("casabanca")
*!* with Oreg
*!* .LABEL10.CAPTION="REGISTRUL DE CECURI"
*!* .grid1.column4.header4.caption="CEC"
*!* .grid1.column4.controlsource="CEC"
*!* .check2.caption="CEC"
*!* .nrcont='5112 '
*!* .cmdlist1.visible=.f.
*!* .cmdlist2.visible=.f.
*!* endwith
*!* Oreg.SHOW(1)
Do lans_ireg_parteneri With .F.,'5112',.T.
ENDPROC
PROCEDURE Pagefr1.p5.Pfr.pp3.Cw5.do_actiune
*!* 24.05.2011
*!* marius.mutu
*!* nu se pot introduce documente de pe mama
IF !(luna_inchisa OR m.glEMama)
DO trez2.mpr
ENDIF
ENDPROC
PROCEDURE Pagefr1.p5.Pfr.pp3.Cw6.do_actiune
*!* 24.05.2011
*!* marius.mutu
*!* nu se pot introduce documente de pe mama
IF !(luna_inchisa OR m.glEMama)
DO trez.mpr
ENDIF
ENDPROC
PROCEDURE Pagefr1.p5.Pfr.pp3.Cw7.do_actiune
*!* 24.05.2011
*!* marius.mutu
*!* nu se pot introduce documente de pe mama
IF !(luna_inchisa OR m.glEMama)
DO trez3.mpr
ENDIF
ENDPROC
PROCEDURE Pagefr1.p5.Pfr.pp3.Cw8.do_actiune
DO listtrez.mpr
ENDPROC
PROCEDURE Pagefr1.p5.Pfr.pp3.RightClick
thisform.rightclick
ENDPROC
PROCEDURE Pagefr1.p6.Activate
this.Parent.activate_pag(this,6)
ENDPROC
PROCEDURE Pagefr1.p6.Cw1.do_actiune
*!* 24.05.2011
*!* marius.mutu
*!* nu se pot introduce documente de pe mama
IF !(luna_inchisa OR m.glEMama)
DO cheltuieli1.mpr
ENDIF
ENDPROC
PROCEDURE Pagefr1.p6.Cw3.do_actiune
SELECT CHLTIND
GO TOP
ochlt=CREATEOBJECT('frm_tipchelt')
ochlt.gridb1.recordsource='CHLTIND'
ochlt.gridb1.column1.controlsource='dst_chlt'
ochlt.pctip='CHLTIND'
ochlt.show(1)
*DO FORM cheltuieli
ENDPROC
PROCEDURE Pagefr1.p6.Cw4.do_actiune
*!* 24.05.2011
*!* marius.mutu
*!* nu se pot introduce documente de pe mama
IF !(luna_inchisa OR m.glEMama)
DO cheltuieli2.mpr
ENDIF
ENDPROC
PROCEDURE Pagefr1.p6.RightClick
thisform.rightclick
ENDPROC
PROCEDURE Pagefr1.p7.Activate
this.Parent.activate_pag(this,7)
ENDPROC
PROCEDURE Pagefr1.p7.Cw1.do_actiune
*!* 24.05.2011
*!* marius.mutu
*!* nu se pot introduce documente de pe mama
IF !(luna_inchisa OR m.glEMama)
DO venituri.mpr
ENDIF
ENDPROC
PROCEDURE Pagefr1.p7.Cw3.do_actiune
SELECT VENITURI
GO TOP
ochlt=CREATEOBJECT('frm_tipchelt')
ochlt.titluFrumos1.caption='Tipuri de venituri'
ochlt.gridb1.recordsource='VENITURI'
ochlt.gridb1.column1.controlsource='dst_chlt'
ochlt.pctip='VENITURI'
ochlt.show(1)
ENDPROC
PROCEDURE Pagefr1.p7.RightClick
thisform.rightclick
ENDPROC
ENDDEFINE
Reference in New Issue View Git Blame Copy Permalink