Files
roagest/Clase/orapoarte_gestiuni.vc2

854 lines
30 KiB
Plaintext

*--------------------------------------------------------------------------------------------------------------------------------------------------------
* (EN) AUTOGENERATED - ATTENTION!! - NOT INTENDED FOR EXECUTION!! USE ONLY FOR MERGING CHANGES AND STORING WITH SCM TOOLS!!
*--------------------------------------------------------------------------------------------------------------------------------------------------------
*< FOXBIN2PRG: Version="1.21" SourceFile="orapoarte_gestiuni.vcx" CPID="1250" /> (Solo para binarios VFP 9 / Only for VFP 9 binaries)
*
*
DEFINE CLASS frm_cerere_cont_gestiune AS frm_termin_renunt OF "..\comun\clase\_frm_child.vcx"
*< CLASSDATA: Baseclass="form" Timestamp="" Scale="Pixels" Uniqueid="" />
*-- OBJECTDATA items order determines ZOrder / El orden de los items OBJECTDATA determina el ZOrder
*< OBJECTDATA: ObjPath="Label1" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="Text2" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="Ct_clb_grup" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="Clb_data_referinta" UniqueID="" Timestamp="" />
*<DefinedPropArrayMethod>
*m: do_cauta_gestiune
*</DefinedPropArrayMethod>
*<PropValue>
BorderStyle = 1
DoCreate = .T.
Height = 123
Name = "frm_cerere_cont_gestiune"
Width = 353
_shape1.Name = "_shape1"
_shape2.Left = 280
_shape2.Name = "_shape2"
_shape2.Top = 0
Lb_titlu_alb_b121.Caption = "Introduceti contul si gestiunea"
Lb_titlu_alb_b121.Name = "Lb_titlu_alb_b121"
Lb_titlu_alb_b121.TabIndex = 6
BUT_TERMIN1.Left = 322
BUT_TERMIN1.Name = "BUT_TERMIN1"
BUT_TERMIN1.TabIndex = 4
BUT_TERMIN1.Top = 1
Gridsort1.Name = "Gridsort1"
But_renunt1.Left = 293
But_renunt1.Name = "But_renunt1"
But_renunt1.TabIndex = 5
But_renunt1.Top = 1
*</PropValue>
ADD OBJECT 'Clb_data_referinta' AS clb_tx_simplu WITH ;
Height = 29, ;
Left = 17, ;
Name = "Clb_data_referinta", ;
TabIndex = 3, ;
Top = 89, ;
Width = 207, ;
Text_simplu1.ControlSource = "pdDataReferinta", ;
Text_simplu1.Height = 23, ;
Text_simplu1.Left = 118, ;
Text_simplu1.Name = "Text_simplu1", ;
Text_simplu1.Top = 3, ;
Text_simplu1.Width = 85, ;
Lb_simplu1.Caption = "Data de referinta", ;
Lb_simplu1.Name = "Lb_simplu1"
*< END OBJECT: ClassLib="..\comun\clase\lb_tx.vcx" BaseClass="container" />
ADD OBJECT 'Ct_clb_grup' AS ct_clb_cautare_var WITH ;
cconditie = EMPTY(NVL(pnId_gestiune,0)), ;
cprocedura = thisform.do_cauta_gestiune, ;
cvar_afisata = pcGestiune, ;
Height = 31, ;
Left = 16, ;
Name = "Ct_clb_grup", ;
TabIndex = 2, ;
Top = 60, ;
Width = 337, ;
shape_cautare.Height = 29, ;
shape_cautare.Left = 1, ;
shape_cautare.Name = "shape_cautare", ;
shape_cautare.Top = 1, ;
shape_cautare.Width = 305, ;
img_cautare.Left = 310, ;
img_cautare.Name = "img_cautare", ;
img_cautare.Top = 5, ;
lb_cautare.Caption = "Gestiune", ;
lb_cautare.Name = "lb_cautare", ;
tx_cautare.Left = 119, ;
tx_cautare.Name = "tx_cautare", ;
tx_cautare.Top = 4
*< END OBJECT: ClassLib="..\comun\clase\caut_ora.vcx" BaseClass="container" />
ADD OBJECT 'Label1' AS label WITH ;
AutoSize = .T., ;
BackStyle = 0, ;
Caption = "Cont:", ;
Height = 17, ;
Left = 26, ;
Name = "Label1", ;
TabIndex = 7, ;
Top = 39, ;
Width = 31
*< END OBJECT: BaseClass="label" />
ADD OBJECT 'Text2' AS textbox WITH ;
ControlSource = "pcCont", ;
Format = "k", ;
Height = 23, ;
Left = 136, ;
Name = "Text2", ;
TabIndex = 1, ;
Top = 36, ;
Width = 84
*< END OBJECT: BaseClass="textbox" />
PROCEDURE do_cauta_gestiune
Local loCauta
loCauta = caut_gestiune(0,gnidUtil,.t.)
If gnButon <> 2
pnid_gestiune = loCauta.id_gestiune
pcGestiune = loCauta.nume_gestiune
Thisform.but_termin1.SetFocus()
Else
pnid_gestiune = Null
pcGestiune = []
Endif
ENDPROC
ENDDEFINE
DEFINE CLASS frm_date_rapoarte_rulaje AS frm_date_rapoarte_gen OF "..\comun\clase\orapoarte.vcx"
*< CLASSDATA: Baseclass="form" Timestamp="" Scale="Pixels" Uniqueid="" />
*-- OBJECTDATA items order determines ZOrder / El orden de los items OBJECTDATA determina el ZOrder
*< OBJECTDATA: ObjPath="Ct_selectie1.Ct_selectie_valoutvanzctva" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="Ct_selectie1.Ct_selectie_um2" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="Ct_selectie1.Ct_selectie_articol" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="Ct_selectie1.Ct_selectie_lucrare" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="Ct_selectie1.Ct_selectie_gestiune" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="Ct_selectie1.Ct_selectie_dataact" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="Ct_selectie1.Ct_selectie_nnir" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="Ct_selectie1.Ct_selectie_cont" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="Ct_selectie1.Ct_selectie_serie" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="Ct_selectie1.Ct_selectie_codmat" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="Ct_selectie1.Ct_selectie_subgrupa" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="Ct_selectie1.Ct_selectie_sectie" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="Ct_selectie1.Ct_selectie_pretach" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="Ct_selectie1.Ct_selectie_pretv" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="Ct_selectie1.Ct_selectie_partener" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="Ct_selectie1.Ct_selectie_responsabil" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="Ct_selectie1.Ct_selectie_pretvtva" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="Ct_selectie1.Ct_selectie_valinvanzctva" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="Ct_selectie1.Ct_selectie_valadaosie" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="Ct_selectie1.Ct_selectie_valadaosin" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="Ct_selectie1.Ct_selectie_valoutvz" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="Ct_selectie1.Ct_selectie_valinvz" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="Ct_selectie1.Ct_selectie_valoutach" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="Ct_selectie1.Ct_selectie_valinach" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="Ct_selectie1.Ct_selectie_cante" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="Ct_selectie1.Ct_selectie_cant" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="Ct_selectie1.Ct_selectie_valtvavanzie" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="Ct_selectie1.Ct_selectie_valtvavanzin" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="Ct_selectie1.Ct_selectie_furnizor" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="Ct_selectie1.Ct_selectie_cant_bax" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="Ct_selectie1.Ct_selectie_an" UniqueID="" Timestamp="" />
*< OBJECTDATA: ObjPath="Ct_selectie1.Ct_selectie_luna" UniqueID="" Timestamp="" />
*<PropValue>
BorderStyle = 1
ctitluraportinitial = Rapoarte bazate pe rulaje
DoCreate = .T.
Height = 572
Name = "frm_date_rapoarte_rulaje"
nidformularraport = 1
Width = 696
_memberdata = <VFPData>
<memberdata name="craport" type="property" display="cRaport" favorites="True"/>
<memberdata name="lreadonly" type="property" display="lReadOnly" favorites="True"/>
</VFPData>
_shape1.Height = 29
_shape1.Left = 0
_shape1.Name = "_shape1"
_shape1.Top = 0
_shape1.Width = 696
_shape1.ZOrderSet = 2
_shape2.Height = 29
_shape2.Left = 604
_shape2.Name = "_shape2"
_shape2.Top = 0
_shape2.Width = 90
_shape2.ZOrderSet = 3
Lb_titlu_alb_b121.FontBold = .T.
Lb_titlu_alb_b121.Name = "Lb_titlu_alb_b121"
Lb_titlu_alb_b121.TabIndex = 14
Lb_titlu_alb_b121.ZOrderSet = 4
GRIDSORT1.Left = 480
GRIDSORT1.Name = "GRIDSORT1"
GRIDSORT1.Top = 36
BUT_TERMIN1.Name = "BUT_TERMIN1"
BUT_TERMIN1.TabIndex = 9
BUT_TERMIN1.ZOrderSet = 5
But_listare1.Name = "But_listare1"
But_listare1.TabIndex = 8
But_excel1.Name = "But_excel1"
But_excel1.TabIndex = 7
But_excel1.Visible = .T.
But_help1.Name = "But_help1"
But_help1.TabIndex = 2
But_cautare1.Name = "But_cautare1"
But_cautare1.TabIndex = 4
But_nou1.Name = "But_nou1"
But_nou1.TabIndex = 3
But_sterge1.Name = "But_sterge1"
But_sterge1.TabIndex = 6
Ct_selectie1.cnumetabela = vrapoarte_rul
Ct_selectie1.Ct_grupare1.Height = 187
Ct_selectie1.Ct_grupare1.lblAtentie.Name = "lblAtentie"
Ct_selectie1.Ct_grupare1.lb_grupare.Name = "lb_grupare"
Ct_selectie1.Ct_grupare1.Left = 6
Ct_selectie1.Ct_grupare1.Name = "Ct_grupare1"
Ct_selectie1.Ct_grupare1.TabIndex = 30
Ct_selectie1.Ct_grupare1.Top = 331
Ct_selectie1.Ct_grupare1.Width = 360
Ct_selectie1.Ct_grupare1.ZOrderSet = 11
Ct_selectie1.Ct_grupare1._scrollcontainer1.But_jos1.Name = "But_jos1"
Ct_selectie1.Ct_grupare1._scrollcontainer1.But_sus1.Name = "But_sus1"
Ct_selectie1.Ct_grupare1._scrollcontainer1.Name = "_scrollcontainer1"
Ct_selectie1.Ct_ordonare1.Height = 176
Ct_selectie1.Ct_ordonare1.lb_ordonare.Name = "lb_ordonare"
Ct_selectie1.Ct_ordonare1.Left = 6
Ct_selectie1.Ct_ordonare1.Name = "Ct_ordonare1"
Ct_selectie1.Ct_ordonare1.TabIndex = 31
Ct_selectie1.Ct_ordonare1.Top = 156
Ct_selectie1.Ct_ordonare1.Width = 360
Ct_selectie1.Ct_ordonare1.ZOrderSet = 12
Ct_selectie1.Ct_ordonare1._scrollcontainer1.But_jos1.Name = "But_jos1"
Ct_selectie1.Ct_ordonare1._scrollcontainer1.But_sus1.Name = "But_sus1"
Ct_selectie1.Ct_ordonare1._scrollcontainer1.Name = "_scrollcontainer1"
Ct_selectie1.Height = 527
Ct_selectie1.lb_coloane.Name = "lb_coloane"
Ct_selectie1.lb_coloane.TabIndex = 32
Ct_selectie1.lb_coloane.ZOrderSet = 13
Ct_selectie1.Left = 12
Ct_selectie1.ltitlucoloanesuma = .T.
Ct_selectie1.Name = "Ct_selectie1"
Ct_selectie1.TabIndex = 1
Ct_selectie1.Top = 36
Ct_selectie1.Width = 372
ed_explicatii_filtru.Height = 500
ed_explicatii_filtru.Left = 396
ed_explicatii_filtru.Name = "ed_explicatii_filtru"
ed_explicatii_filtru.TabIndex = 11
ed_explicatii_filtru.Top = 63
ed_explicatii_filtru.Width = 288
But_salveaza1.lvizibil = .F.
But_salveaza1.Name = "But_salveaza1"
But_salveaza1.TabIndex = 5
But_reset2.Name = "But_reset2"
But_reset2.TabIndex = 10
LB_RAPORT_PREDEFINIT.Name = "LB_RAPORT_PREDEFINIT"
LB_RAPORT_PREDEFINIT.TabIndex = 13
But_start_criterii1.Name = "But_start_criterii1"
But_start_criterii1.TabIndex = 12
*</PropValue>
ADD OBJECT 'Ct_selectie1.Ct_selectie_an' AS ct_selectie_camp WITH ;
ccamp = an, ;
cnumecamp = An, ;
Left = 2, ;
lgrupare = .T., ;
lordine = .T., ;
lsuma = .F., ;
Name = "Ct_selectie_an", ;
nid_container = 16, ;
TabIndex = 19, ;
Top = 11, ;
ZOrderSet = 27, ;
ck_camp.Alignment = 0, ;
ck_camp.Caption = "An", ;
ck_camp.Name = "ck_camp"
*< END OBJECT: ClassLib="..\comun\clase\orapoarte.vcx" BaseClass="container" />
ADD OBJECT 'Ct_selectie1.Ct_selectie_articol' AS ct_selectie_camp WITH ;
ccamp = denumire, ;
cnumecamp = Articol, ;
Left = 2, ;
Name = "Ct_selectie_articol", ;
nid_container = 5, ;
TabIndex = 5, ;
Top = 96, ;
ZOrderSet = 2, ;
ck_camp.Alignment = 0, ;
ck_camp.Caption = "Articol", ;
ck_camp.Name = "ck_camp"
*< END OBJECT: ClassLib="..\comun\clase\orapoarte.vcx" BaseClass="container" />
ADD OBJECT 'Ct_selectie1.Ct_selectie_cant' AS ct_selectie_camp WITH ;
ccamp = cant, ;
cnumecamp = Intrari, ;
Left = 117, ;
lgrupare = .F., ;
lordine = .F., ;
lsuma = .T., ;
Name = "Ct_selectie_cant", ;
nid_container = 15, ;
TabIndex = 18, ;
Top = 140, ;
ZOrderSet = 28, ;
ck_camp.Alignment = 0, ;
ck_camp.Caption = "Intrari", ;
ck_camp.Left = 9, ;
ck_camp.Name = "ck_camp", ;
ck_camp.Top = 1
*< END OBJECT: ClassLib="..\comun\clase\orapoarte.vcx" BaseClass="container" />
ADD OBJECT 'Ct_selectie1.Ct_selectie_cant_bax' AS ct_selectie_camp WITH ;
ccamp = cant_bax, ;
cnumecamp = Cant.impach., ;
Left = 117, ;
Name = "Ct_selectie_cant_bax", ;
nid_container = 28, ;
TabIndex = 10, ;
Top = 14, ;
ZOrderSet = 31, ;
ck_camp.Alignment = 0, ;
ck_camp.Caption = "Cant.impach.", ;
ck_camp.Name = "ck_camp"
*< END OBJECT: ClassLib="..\comun\clase\orapoarte.vcx" BaseClass="container" />
ADD OBJECT 'Ct_selectie1.Ct_selectie_cante' AS ct_selectie_camp WITH ;
ccamp = cante, ;
cnumecamp = Iesiri, ;
Left = 232, ;
lgrupare = .F., ;
lordine = .F., ;
lsuma = .T., ;
Name = "Ct_selectie_cante", ;
nid_container = 16, ;
TabIndex = 19, ;
Top = -2, ;
ZOrderSet = 27, ;
ck_camp.Alignment = 0, ;
ck_camp.Caption = "Iesiri", ;
ck_camp.Name = "ck_camp"
*< END OBJECT: ClassLib="..\comun\clase\orapoarte.vcx" BaseClass="container" />
ADD OBJECT 'Ct_selectie1.Ct_selectie_codmat' AS ct_selectie_camp WITH ;
ccamp = codmat, ;
cnumecamp = Cod material, ;
Left = 2, ;
Name = "Ct_selectie_codmat", ;
nid_container = 4, ;
TabIndex = 4, ;
Top = 81, ;
ZOrderSet = 9, ;
ck_camp.Alignment = 0, ;
ck_camp.Caption = "Cod material", ;
ck_camp.Name = "ck_camp"
*< END OBJECT: ClassLib="..\comun\clase\orapoarte.vcx" BaseClass="container" />
ADD OBJECT 'Ct_selectie1.Ct_selectie_cont' AS ct_selectie_camp WITH ;
ccamp = cont, ;
cnumecamp = Cont, ;
Left = 2, ;
Name = "Ct_selectie_cont", ;
nid_container = 7, ;
TabIndex = 7, ;
Top = 125, ;
ZOrderSet = 7, ;
ck_camp.Alignment = 0, ;
ck_camp.Caption = "Cont", ;
ck_camp.Name = "ck_camp"
*< END OBJECT: ClassLib="..\comun\clase\orapoarte.vcx" BaseClass="container" />
ADD OBJECT 'Ct_selectie1.Ct_selectie_dataact' AS ct_selectie_camp WITH ;
ccamp = dataact, ;
cnumecamp = Data, ;
Left = 2, ;
Name = "Ct_selectie_dataact", ;
nid_container = 2, ;
TabIndex = 2, ;
Top = 53, ;
ZOrderSet = 5, ;
ck_camp.Alignment = 0, ;
ck_camp.Caption = "Data", ;
ck_camp.Name = "ck_camp"
*< END OBJECT: ClassLib="..\comun\clase\orapoarte.vcx" BaseClass="container" />
ADD OBJECT 'Ct_selectie1.Ct_selectie_furnizor' AS ct_selectie_camp WITH ;
ccamp = furnizor, ;
cnumecamp = Furnizor, ;
Left = 117, ;
lgrupare = .T., ;
Name = "Ct_selectie_furnizor", ;
nid_container = 27, ;
TabIndex = 12, ;
Top = 56, ;
ZOrderSet = 17, ;
ck_camp.Alignment = 0, ;
ck_camp.Caption = "Furnizor", ;
ck_camp.Name = "ck_camp"
*< END OBJECT: ClassLib="..\comun\clase\orapoarte.vcx" BaseClass="container" />
ADD OBJECT 'Ct_selectie1.Ct_selectie_gestiune' AS ct_selectie_camp WITH ;
ccamp = NUME_GESTIUNE, ;
cidcamp = id_gestiune, ;
cnumecamp = Gestiune, ;
Left = 117, ;
Name = "Ct_selectie_gestiune", ;
nid_container = 9, ;
TabIndex = 9, ;
Top = 0, ;
ZOrderSet = 4, ;
ck_camp.Alignment = 0, ;
ck_camp.Caption = "Gestiune", ;
ck_camp.Name = "ck_camp"
*< END OBJECT: ClassLib="..\comun\clase\orapoarte.vcx" BaseClass="container" />
ADD OBJECT 'Ct_selectie1.Ct_selectie_lucrare' AS ct_selectie_camp WITH ;
ccamp = nrord, ;
cidcamp = id_lucrare, ;
cnumecamp = Lucrare, ;
Left = 2, ;
Name = "Ct_selectie_lucrare", ;
nid_container = 8, ;
TabIndex = 8, ;
Top = 140, ;
ZOrderSet = 3, ;
ck_camp.Alignment = 0, ;
ck_camp.Caption = "Lucrare", ;
ck_camp.Name = "ck_camp"
*< END OBJECT: ClassLib="..\comun\clase\orapoarte.vcx" BaseClass="container" />
ADD OBJECT 'Ct_selectie1.Ct_selectie_luna' AS ct_selectie_camp WITH ;
ccamp = luna, ;
cnumecamp = Luna, ;
Left = 2, ;
lgrupare = .T., ;
lordine = .T., ;
lsuma = .F., ;
Name = "Ct_selectie_luna", ;
nid_container = 16, ;
TabIndex = 19, ;
Top = 25, ;
ZOrderSet = 27, ;
ck_camp.Alignment = 0, ;
ck_camp.Caption = "Luna", ;
ck_camp.Name = "ck_camp"
*< END OBJECT: ClassLib="..\comun\clase\orapoarte.vcx" BaseClass="container" />
ADD OBJECT 'Ct_selectie1.Ct_selectie_nnir' AS ct_selectie_camp WITH ;
ccamp = nnir, ;
cnumecamp = NIR/Bon, ;
Left = 2, ;
lgrupare = .F., ;
Name = "Ct_selectie_nnir", ;
nid_container = 1, ;
TabIndex = 1, ;
Top = 39, ;
ZOrderSet = 6, ;
ck_camp.Alignment = 0, ;
ck_camp.Caption = "NIR/Bon", ;
ck_camp.Name = "ck_camp"
*< END OBJECT: ClassLib="..\comun\clase\orapoarte.vcx" BaseClass="container" />
ADD OBJECT 'Ct_selectie1.Ct_selectie_partener' AS ct_selectie_camp WITH ;
ccamp = partener, ;
cnumecamp = Partener, ;
Left = 117, ;
lgrupare = .T., ;
Name = "Ct_selectie_partener", ;
nid_container = 27, ;
TabIndex = 12, ;
Top = 42, ;
ZOrderSet = 17, ;
ck_camp.Alignment = 0, ;
ck_camp.Caption = "Partener", ;
ck_camp.Name = "ck_camp"
*< END OBJECT: ClassLib="..\comun\clase\orapoarte.vcx" BaseClass="container" />
ADD OBJECT 'Ct_selectie1.Ct_selectie_pretach' AS ct_selectie_camp WITH ;
ccamp = pret, ;
cnumecamp = Pret achizitie, ;
Left = 117, ;
Name = "Ct_selectie_pretach", ;
nid_container = 12, ;
TabIndex = 15, ;
Top = 98, ;
ZOrderSet = 15, ;
ck_camp.Alignment = 0, ;
ck_camp.Caption = "Pret achizitie", ;
ck_camp.Name = "ck_camp"
*< END OBJECT: ClassLib="..\comun\clase\orapoarte.vcx" BaseClass="container" />
ADD OBJECT 'Ct_selectie1.Ct_selectie_pretv' AS ct_selectie_camp WITH ;
ccamp = pretv, ;
cnumecamp = Pret vanzare, ;
Left = 117, ;
Name = "Ct_selectie_pretv", ;
nid_container = 13, ;
TabIndex = 16, ;
Top = 112, ;
ZOrderSet = 16, ;
ck_camp.Alignment = 0, ;
ck_camp.Caption = "Pret vanzare", ;
ck_camp.Name = "ck_camp"
*< END OBJECT: ClassLib="..\comun\clase\orapoarte.vcx" BaseClass="container" />
ADD OBJECT 'Ct_selectie1.Ct_selectie_pretvtva' AS ct_selectie_camp WITH ;
ccamp = pretvtva, ;
cnumecamp = Pret vanz cu TVA, ;
Height = 19, ;
Left = 117, ;
Name = "Ct_selectie_pretvtva", ;
nid_container = 14, ;
TabIndex = 17, ;
Top = 126, ;
Width = 120, ;
ZOrderSet = 19, ;
ck_camp.Alignment = 0, ;
ck_camp.Caption = "Pret vanz. cu TVA", ;
ck_camp.Name = "ck_camp"
*< END OBJECT: ClassLib="..\comun\clase\orapoarte.vcx" BaseClass="container" />
ADD OBJECT 'Ct_selectie1.Ct_selectie_responsabil' AS ct_selectie_camp WITH ;
ccamp = nresp, ;
cnumecamp = Responsabil, ;
Left = 117, ;
lgrupare = .T., ;
Name = "Ct_selectie_responsabil", ;
nid_container = 11, ;
TabIndex = 14, ;
Top = 84, ;
ZOrderSet = 18, ;
ck_camp.Alignment = 0, ;
ck_camp.Caption = "Responsabil", ;
ck_camp.Name = "ck_camp"
*< END OBJECT: ClassLib="..\comun\clase\orapoarte.vcx" BaseClass="container" />
ADD OBJECT 'Ct_selectie1.Ct_selectie_sectie' AS ct_selectie_camp WITH ;
ccamp = sectie, ;
cnumecamp = Sectie, ;
Left = 117, ;
Name = "Ct_selectie_sectie", ;
nid_container = 10, ;
TabIndex = 13, ;
Top = 70, ;
ZOrderSet = 14, ;
ck_camp.Alignment = 0, ;
ck_camp.Caption = "Sectie", ;
ck_camp.Name = "ck_camp"
*< END OBJECT: ClassLib="..\comun\clase\orapoarte.vcx" BaseClass="container" />
ADD OBJECT 'Ct_selectie1.Ct_selectie_serie' AS ct_selectie_camp WITH ;
ccamp = serie, ;
cnumecamp = Serie, ;
Left = 2, ;
lgrupare = .T., ;
Name = "Ct_selectie_serie", ;
nid_container = 6, ;
TabIndex = 6, ;
Top = 111, ;
ZOrderSet = 8, ;
ck_camp.Alignment = 0, ;
ck_camp.Caption = "Serie", ;
ck_camp.Name = "ck_camp"
*< END OBJECT: ClassLib="..\comun\clase\orapoarte.vcx" BaseClass="container" />
ADD OBJECT 'Ct_selectie1.Ct_selectie_subgrupa' AS ct_selectie_camp WITH ;
ccamp = subgrupa, ;
cidcamp = id_subgrupa, ;
cnumecamp = Subgrupa articol, ;
Height = 19, ;
Left = 2, ;
Name = "Ct_selectie_subgrupa", ;
nid_container = 3, ;
TabIndex = 3, ;
Top = 67, ;
Width = 131, ;
ZOrderSet = 10, ;
ck_camp.Alignment = 0, ;
ck_camp.AutoSize = .T., ;
ck_camp.Caption = "Subgrupa articol", ;
ck_camp.Name = "ck_camp"
*< END OBJECT: ClassLib="..\comun\clase\orapoarte.vcx" BaseClass="container" />
ADD OBJECT 'Ct_selectie1.Ct_selectie_um2' AS ct_selectie_camp WITH ;
ccamp = um2, ;
cnumecamp = U.M.2, ;
Left = 117, ;
Name = "Ct_selectie_um2", ;
nid_container = 27, ;
TabIndex = 11, ;
Top = 28, ;
ZOrderSet = 1, ;
ck_camp.Alignment = 0, ;
ck_camp.Caption = "U.M. 2", ;
ck_camp.Name = "ck_camp"
*< END OBJECT: ClassLib="..\comun\clase\orapoarte.vcx" BaseClass="container" />
ADD OBJECT 'Ct_selectie1.Ct_selectie_valadaosie' AS ct_selectie_camp WITH ;
ccamp = round(decode(proc_tvav,0,cante*pretv,(cante*(pretv+tvav)/proc_tvav)),pack_sesiune.getoptiunefirma('PC')) - (cante*pret), ;
cnumecamp = Val.adaos iesiri, ;
Height = 19, ;
Left = 232, ;
lgrupare = .F., ;
lordine = .F., ;
lsuma = .T., ;
Name = "Ct_selectie_valadaosie", ;
nid_container = 22, ;
TabIndex = 25, ;
Top = 82, ;
Width = 132, ;
ZOrderSet = 21, ;
ck_camp.Alignment = 0, ;
ck_camp.Caption = "Val.adaos iesiri", ;
ck_camp.Name = "ck_camp"
*< END OBJECT: ClassLib="..\comun\clase\orapoarte.vcx" BaseClass="container" />
ADD OBJECT 'Ct_selectie1.Ct_selectie_valadaosin' AS ct_selectie_camp WITH ;
ccamp = round(decode(proc_tvav,0,cant*pretv,(cant*(pretv+tvav)/proc_tvav)),pack_sesiune.getoptiunefirma('PC'))-(cant*pret), ;
cnumecamp = Val.adaos intrari, ;
Height = 19, ;
Left = 232, ;
lgrupare = .F., ;
lordine = .F., ;
lsuma = .T., ;
Name = "Ct_selectie_valadaosin", ;
nid_container = 21, ;
TabIndex = 24, ;
Top = 67, ;
Width = 132, ;
ZOrderSet = 22, ;
ck_camp.Alignment = 0, ;
ck_camp.Caption = "Val.adaos intrari", ;
ck_camp.Name = "ck_camp"
*< END OBJECT: ClassLib="..\comun\clase\orapoarte.vcx" BaseClass="container" />
ADD OBJECT 'Ct_selectie1.Ct_selectie_valinach' AS ct_selectie_camp WITH ;
ccamp = round(cant*pret,pack_sesiune.getoptiunefirma('PC')), ;
cnumecamp = Val.intrari ach., ;
Height = 19, ;
Left = 232, ;
lgrupare = .F., ;
lordine = .F., ;
lsuma = .T., ;
Name = "Ct_selectie_valinach", ;
nid_container = 17, ;
TabIndex = 20, ;
Top = 11, ;
Width = 132, ;
ZOrderSet = 26, ;
ck_camp.Alignment = 0, ;
ck_camp.Caption = "Val.intrari ach.", ;
ck_camp.Name = "ck_camp"
*< END OBJECT: ClassLib="..\comun\clase\orapoarte.vcx" BaseClass="container" />
ADD OBJECT 'Ct_selectie1.Ct_selectie_valinvanzctva' AS ct_selectie_camp WITH ;
ccamp = round(cant*(pretv+tvav),pack_sesiune.getoptiunefirma('PC')), ;
cnumecamp = Val.intrari vz.cu TVA, ;
Height = 19, ;
Left = 232, ;
lgrupare = .F., ;
lordine = .F., ;
lsuma = .T., ;
Name = "Ct_selectie_valinvanzctva", ;
nid_container = 23, ;
TabIndex = 26, ;
Top = 97, ;
Width = 140, ;
ZOrderSet = 20, ;
ck_camp.Alignment = 0, ;
ck_camp.Caption = "Val.intrari vz.cu TVA", ;
ck_camp.Name = "ck_camp"
*< END OBJECT: ClassLib="..\comun\clase\orapoarte.vcx" BaseClass="container" />
ADD OBJECT 'Ct_selectie1.Ct_selectie_valinvz' AS ct_selectie_camp WITH ;
ccamp = decode(nr_pag,6,round((pretv + tvav) * cant,?gnPc) - round(round((pretv + tvav) * cant,?gnPc) * (proc_tvav - 1) / proc_tvav,?gnPc) , round(pretv * cant,?gnPc) ), ;
cnumecamp = Val.intrari vz., ;
Height = 19, ;
Left = 232, ;
lgrupare = .F., ;
lordine = .F., ;
lsuma = .T., ;
Name = "Ct_selectie_valinvz", ;
nid_container = 19, ;
TabIndex = 22, ;
Top = 39, ;
Width = 132, ;
ZOrderSet = 24, ;
ck_camp.Alignment = 0, ;
ck_camp.Caption = "Val.intrari vz.", ;
ck_camp.Name = "ck_camp"
*< END OBJECT: ClassLib="..\comun\clase\orapoarte.vcx" BaseClass="container" />
ADD OBJECT 'Ct_selectie1.Ct_selectie_valoutach' AS ct_selectie_camp WITH ;
ccamp = round(cante*pret,pack_sesiune.getoptiunefirma('PC')), ;
cnumecamp = Val.iesiri ach., ;
Height = 19, ;
Left = 232, ;
lgrupare = .F., ;
lordine = .F., ;
lsuma = .T., ;
Name = "Ct_selectie_valoutach", ;
nid_container = 18, ;
TabIndex = 21, ;
Top = 25, ;
Width = 132, ;
ZOrderSet = 25, ;
ck_camp.Alignment = 0, ;
ck_camp.Caption = "Val.iesiri ach.", ;
ck_camp.Name = "ck_camp"
*< END OBJECT: ClassLib="..\comun\clase\orapoarte.vcx" BaseClass="container" />
ADD OBJECT 'Ct_selectie1.Ct_selectie_valoutvanzctva' AS ct_selectie_camp WITH ;
ccamp = round(cante*(pretv+tvav),pack_sesiune.getoptiunefirma('PC')), ;
cnumecamp = Val.iesiri vz.cu TVA, ;
Height = 19, ;
Left = 232, ;
lgrupare = .F., ;
lordine = .F., ;
lsuma = .T., ;
Name = "Ct_selectie_valoutvanzctva", ;
nid_container = 24, ;
TabIndex = 27, ;
Top = 111, ;
Width = 140, ;
ZOrderSet = 0, ;
ck_camp.Alignment = 0, ;
ck_camp.Caption = "Val.iesiri vz.cu TVA", ;
ck_camp.Name = "ck_camp"
*< END OBJECT: ClassLib="..\comun\clase\orapoarte.vcx" BaseClass="container" />
ADD OBJECT 'Ct_selectie1.Ct_selectie_valoutvz' AS ct_selectie_camp WITH ;
ccamp = decode(nr_pag,6,round((pretv + tvav) * cante,?gnPc) - round(round((pretv + tvav) * cante,?gnPc) * (proc_tvav - 1) / proc_tvav,?gnPc), round(pretv * cante,?gnPc) ), ;
cnumecamp = Val.iesiri vz., ;
Height = 19, ;
Left = 232, ;
lgrupare = .F., ;
lordine = .F., ;
lsuma = .T., ;
Name = "Ct_selectie_valoutvz", ;
nid_container = 20, ;
TabIndex = 23, ;
Top = 53, ;
Width = 132, ;
ZOrderSet = 23, ;
ck_camp.Alignment = 0, ;
ck_camp.Caption = "Val.iesiri vz.", ;
ck_camp.Name = "ck_camp"
*< END OBJECT: ClassLib="..\comun\clase\orapoarte.vcx" BaseClass="container" />
ADD OBJECT 'Ct_selectie1.Ct_selectie_valtvavanzie' AS ct_selectie_camp WITH ;
ccamp = decode(proc_tvav,0,0,ROUND(cante*(pretv+tvav)*(proc_tvav-1)/proc_tvav,pack_sesiune.getoptiunefirma('PC'))), ;
cnumecamp = Val.TVA vz. iesiri, ;
Height = 19, ;
Left = 232, ;
lgrupare = .F., ;
lordine = .F., ;
lsuma = .T., ;
Name = "Ct_selectie_valtvavanzie", ;
nid_container = 26, ;
TabIndex = 29, ;
Top = 140, ;
Width = 140, ;
ZOrderSet = 29, ;
ck_camp.Alignment = 0, ;
ck_camp.Caption = "Val.TVA vz. iesiri", ;
ck_camp.Name = "ck_camp"
*< END OBJECT: ClassLib="..\comun\clase\orapoarte.vcx" BaseClass="container" />
ADD OBJECT 'Ct_selectie1.Ct_selectie_valtvavanzin' AS ct_selectie_camp WITH ;
ccamp = decode(proc_tvav,0,0,ROUND(cant*(pretv+tvav)*(proc_tvav-1)/proc_tvav,pack_sesiune.getoptiunefirma('PC'))), ;
cnumecamp = Val.TVA vz. intrari, ;
Height = 19, ;
Left = 232, ;
lgrupare = .F., ;
lordine = .F., ;
lsuma = .T., ;
Name = "Ct_selectie_valtvavanzin", ;
nid_container = 25, ;
TabIndex = 28, ;
Top = 126, ;
Width = 140, ;
ZOrderSet = 30, ;
ck_camp.Alignment = 0, ;
ck_camp.Caption = "Val.TVA vz. intrari", ;
ck_camp.Name = "ck_camp"
*< END OBJECT: ClassLib="..\comun\clase\orapoarte.vcx" BaseClass="container" />
PROCEDURE Init
Lparameters tnIdRaport, tlDrepturi
DoDefault(tnIdRaport, tlDrepturi)
This.ct_selectie1.ct_selectie_valinach.ccamp = [case when id_subgrupa = pack_sesiune.getoptiunefirma('ID_SUBGRUPA_BILETE') ] + ;
[then ROUND((pretv + tvav) * cant, ?gnPc) - round(round((pretv + tvav) * cant, ?gnPc) * ] + ;
[(proc_tvav - 1) / proc_tvav, ?gnPc) ] + ;
[else round(pret * cant, ?gnPc) end]
This.ct_selectie1.ct_selectie_valoutach.ccamp = [case when id_subgrupa = pack_sesiune.getoptiunefirma('ID_SUBGRUPA_BILETE') ] + ;
[then ROUND((pretv + tvav) * cante, ?gnPc) - round(round((pretv + tvav) * cante, ?gnPc) * ] + ;
[(proc_tvav - 1) / proc_tvav, ?gnPc) ] + ;
[else round(pret * cante, ?gnPc) end]
ENDPROC
PROCEDURE But_start_criterii1.loadcriterii
PARAMETERS tacriterii
EXTERNAL ARRAY tacriterii
#DEFINE crlf CHR(13)+CHR(10)
lcStringCriterii="Denumire articol\denumire\T\id_articol\nom_articol"+ crlf + ;
"Cod material\codmat\T\none\" + crlf + ;
"Serie articol\serie\T\none\" + crlf + ;
"Grupa articol\none\I\id_grupa\nom_grupa_articol" + crlf + ;
"Subgrupa articol\none\I\id_subgrupa\nom_subgrupa_articol"+ crlf + ;
"Cod bare\codbare\T\none\"+ crlf + ;
"Nr. document\nract\N\none\" + crlf + ;
"Serie document\serie_act\T\none\" + crlf + ;
"Data document\dataact\D\none\" + crlf + ;
"Nr. NIR/bon\nnir\N\none\" + crlf + ;
"Pret achizitie\pret\N|get_mask(12,gnPpret)\none\"+ crlf + ;
"Pret vz.\pretv\N|get_mask(12,gnPpret)\none\"+ crlf + ;
"Pret vz. TVA\(pretv + tvav)\N|get_mask(12,gnPpret)\none\"+ crlf + ;
"Pret valuta\pretd\N|get_mask(12,gnPPretval)\none\" + crlf + ;
"Valuta\nume_val\T\ID_VALUTA\nom_valuta" + crlf + ;
"Intrari\cant\N|get_mask(12,gnPCant)\none\" + crlf + ;
"Iesiri\cante\N|get_mask(12,gnPCant)\none\" + crlf + ;
"Cont\cont\T\none\"+ crlf + ;
"Cont analitic\acont\T\none\"+ crlf + ;
"Data document\dataact\D\none\" + crlf + ;
"Partener\partener\T\ID_PART\nom_parteneri" + crlf + ;
"Furnizor\furnizor\T\ID_PART_FZ\nom_parteneri" + crlf + ;
"Lucrare/Comanda\nrord\T\ID_LUCRARE\nom_lucrare" + crlf + ;
"Grupa gestiuni\|E|" + ;
[id_gestiune in ( ] + ;
[ select c.id_gestiune ] + ;
[ from vgest_coresp_grupe_gestiuni c ] + ;
[ where id_grupe in (select id_grupe ] + ;
[ from gest_nom_grupe ] + ;
[ where sters = 0 ] + ;
[ start with id_grupe = <<VALOARE>> ] + ;
[ connect by prior id_grupe = parent_id))\I\none\nom_grupa_gestiune] + crlf + ;
"Gestiune\none\I\id_gestiune\nom_gestiune" + crlf + ;
"Gestiune coresp.\none\I\id_gestiunec\nom_gestiune" + crlf + ;
"Sectie\sectie\T\ID_SECTIE\nom_sectie" + crlf + ;
"Lucrare/Comanda\nrord\T\ID_LUCRARE\nom_lucrare" + crlf + ;
"Responsabil\responsabil\T\ID_RESPONSABIL\nom_responsabil" + crlf + ;
"Tip rulaj\none\I\id_tip_rulaj\nom_tip_rulaj" + crlf + ;
"Tip operatie\id_set\N\none\" + crlf + ;
"Data introducerii\trunc(dataora)\D\none\"
DODEFAULT()
ENDPROC
ENDDEFINE