Files
roapreturi/Clase/ofundal_preturi.vc2
2026-08-26 13:01:51 +03:00

107 lines
3.4 KiB
Plaintext

*--------------------------------------------------------------------------------------------------------------------------------------------------------
* (EN) AUTOGENERATED - ATTENTION!! - NOT INTENDED FOR EXECUTION!! USE ONLY FOR MERGING CHANGES AND STORING WITH SCM TOOLS!!
*--------------------------------------------------------------------------------------------------------------------------------------------------------
*< FOXBIN2PRG: Version="1.21" SourceFile="ofundal_preturi.vcx" CPID="1252" /> (Solo para binarios VFP 9 / Only for VFP 9 binaries)
*
*
DEFINE CLASS pg_meniu_princ AS pg_meniu OF "..\comun\clase\ofundal.vcx"
*< CLASSDATA: Baseclass="pageframe" Timestamp="" Scale="Pixels" Uniqueid="" />
*-- OBJECTDATA items order determines ZOrder / El orden de los items OBJECTDATA determina el ZOrder
*< OBJECTDATA: ObjPath="Page1.Pict_meniu1" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="Page1.Cw1" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="Page1.Cw6" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="Page1.Cw7" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="Page1.Pict_liniuta2" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="Page2.Pict_meniu1" UniqueID="" Timestamp="" />
*<PropValue>
ErasePage = .T.
Height = 256
Name = "pg_meniu_princ"
PageCount = 2
Themes = .F.
Width = 799
Page1.Caption = "Configurare"
Page1.Name = "Page1"
Page2.Caption = ""
Page2.Enabled = .F.
Page2.Name = "Page2"
*</PropValue>
ADD OBJECT 'Page1.Cw1' AS cw WITH ;
Left = 3, ;
Name = "Cw1", ;
TabIndex = 3, ;
Top = 22, ;
Label_item1.Caption = "Catalog de articole", ;
Label_item1.Name = "Label_item1"
*< END OBJECT: ClassLib="..\comun\clase\ofundal.vcx" BaseClass="container" />
ADD OBJECT 'Page1.Cw6' AS cw WITH ;
Height = 20, ;
Left = 3, ;
Name = "Cw6", ;
TabIndex = 4, ;
Top = 76, ;
Width = 117, ;
Label_item1.Caption = "Liste de preturi", ;
Label_item1.Name = "Label_item1"
*< END OBJECT: ClassLib="..\comun\clase\ofundal.vcx" BaseClass="container" />
ADD OBJECT 'Page1.Cw7' AS cw WITH ;
Height = 20, ;
Left = 3, ;
Name = "Cw7", ;
nid_cw = 8, ;
ntip = 1, ;
TabIndex = 1, ;
Top = 49, ;
Width = 117, ;
Label_item1.Caption = "Note de vanzari", ;
Label_item1.Name = "Label_item1"
*< END OBJECT: ClassLib="..\comun\clase\ofundal.vcx" BaseClass="container" />
ADD OBJECT 'Page1.Pict_liniuta2' AS pict_liniuta WITH ;
Left = 3, ;
Name = "Pict_liniuta2", ;
Picture = ..\comun\grafice\f3.jpg, ;
Top = 101
*< END OBJECT: ClassLib="..\comun\clase\ofundal.vcx" BaseClass="image" />
ADD OBJECT 'Page1.Pict_meniu1' AS pict_meniu WITH ;
Anchor = 7, ;
Height = 553, ;
Left = 0, ;
Name = "Pict_meniu1", ;
Picture = ..\grafice\f2.jpg, ;
Top = 8, ;
Width = 133
*< END OBJECT: ClassLib="..\comun\clase\ofundal.vcx" BaseClass="image" />
ADD OBJECT 'Page2.Pict_meniu1' AS pict_meniu WITH ;
Anchor = 7, ;
Left = 0, ;
Name = "Pict_meniu1", ;
Picture = ..\grafice\f2.jpg, ;
Top = 8
*< END OBJECT: ClassLib="..\comun\clase\ofundal.vcx" BaseClass="image" />
PROCEDURE Page1.Cw1.do_actiune
Do viz_catalog_articole In onom_preturi.prg
ENDPROC
PROCEDURE Page1.Cw6.do_actiune
Do viz_politici In onom_preturi.prg
ENDPROC
PROCEDURE Page1.Cw7.do_actiune
* DO viz_note_vanzari IN onom_preturi.prg
LOCAL llCRM
llCRM = .T.
DO configurare_note WITH llCRM IN omeniu_initializari.prg
ENDPROC
ENDDEFINE