*--------------------------------------------------------------------------------------------------------------------------------------------------------
* (EN) AUTOGENERATED - ATTENTION!! - NOT INTENDED FOR EXECUTION!! USE ONLY FOR MERGING CHANGES AND STORING WITH SCM TOOLS!!
*--------------------------------------------------------------------------------------------------------------------------------------------------------
*< FOXBIN2PRG: Version="1.21" SourceFile="listterti.mnx" CPID="1252" /> (Solo para binarios VFP 9 / Only for VFP 9 binaries)
*
*<MenuType>4</MenuType>
*<MenuLocation>REPLACE</MenuLocation>

*<MenuCode>
DEFINE POPUP Listare SHORTCUT RELATIVE FROM MROW(),MCOL()
DEFINE BAR 1 OF Listare PROMPT "\<Balanta analitica" ;
	MESSAGE 'Tiparirea fiselor analitice'
ON BAR 1 OF Listare ACTIVATE POPUP Balantaana

	*----------------------------------
	DEFINE POPUP Balantaana SHORTCUT RELATIVE
	DEFINE BAR 1 OF Balantaana PROMPT "A\<ltii"
	ON SELECTION BAR 1 OF Balantaana DO BAR_1_OF_Balantaana_FB2P

	DEFINE BAR 2 OF Balantaana PROMPT "\-"
	ON BAR 2 OF Balantaana ACTIVATE POPUP _1dl0i71ek

		*----------------------------------
		DEFINE POPUP _1dl0i71ek SHORTCUT RELATIVE
	DEFINE BAR 3 OF Balantaana PROMPT "C\<reditori"
	ON SELECTION BAR 3 OF Balantaana DO BAR_3_OF_Balantaana_FB2P

	DEFINE BAR 4 OF Balantaana PROMPT "\<Debitori"
	ON SELECTION BAR 4 OF Balantaana DO BAR_4_OF_Balantaana_FB2P

	DEFINE BAR 5 OF Balantaana PROMPT "\<Achizitori"
	ON SELECTION BAR 5 OF Balantaana DO BAR_5_OF_Balantaana_FB2P

	DEFINE BAR 6 OF Balantaana PROMPT "A\<ctionari"
	ON SELECTION BAR 6 OF Balantaana DO BAR_6_OF_Balantaana_FB2P

DEFINE BAR 2 OF Listare PROMPT "Situatii \<operative"
ON BAR 2 OF Listare ACTIVATE POPUP Situatiiop

	*----------------------------------
	DEFINE POPUP Situatiiop SHORTCUT RELATIVE
	DEFINE BAR 1 OF Situatiiop PROMPT "A\<ltii"
	ON SELECTION BAR 1 OF Situatiiop DO BAR_1_OF_Situatiiop_FB2P

	DEFINE BAR 2 OF Situatiiop PROMPT "\-"
	ON BAR 2 OF Situatiiop ACTIVATE POPUP _1dl0i76vl

		*----------------------------------
		DEFINE POPUP _1dl0i76vl SHORTCUT RELATIVE
	DEFINE BAR 3 OF Situatiiop PROMPT "C\<reditori"
	ON SELECTION BAR 3 OF Situatiiop DO BAR_3_OF_Situatiiop_FB2P

	DEFINE BAR 4 OF Situatiiop PROMPT "\<Debitori"
	ON SELECTION BAR 4 OF Situatiiop DO BAR_4_OF_Situatiiop_FB2P

	DEFINE BAR 5 OF Situatiiop PROMPT "\<Achizitori"
	ON SELECTION BAR 5 OF Situatiiop DO BAR_5_OF_Situatiiop_FB2P

	DEFINE BAR 6 OF Situatiiop PROMPT "A\<ctionari"
	ON SELECTION BAR 6 OF Situatiiop DO BAR_6_OF_Situatiiop_FB2P

DEFINE BAR 3 OF Listare PROMPT "\-"
ON BAR 3 OF Listare ACTIVATE POPUP _1s60kszls

	*----------------------------------
	DEFINE POPUP _1s60kszls SHORTCUT RELATIVE
DEFINE BAR 4 OF Listare PROMPT "Situatii \<inregistrari"
ON SELECTION BAR 4 OF Listare DO BAR_4_OF_Listare_FB2P

DEFINE BAR 5 OF Listare PROMPT "Situatii \<facturi"
ON SELECTION BAR 5 OF Listare DO BAR_5_OF_Listare_FB2P

DEFINE BAR 6 OF Listare PROMPT "\-"
ON BAR 6 OF Listare ACTIVATE POPUP _2hk0ugcft

	*----------------------------------
	DEFINE POPUP _2hk0ugcft SHORTCUT RELATIVE
DEFINE BAR 7 OF Listare PROMPT "Inregistrari parteneri cu \<sold final in luna"
ON BAR 7 OF Listare ACTIVATE POPUP Inregistra

	*----------------------------------
	DEFINE POPUP Inregistra SHORTCUT RELATIVE
	DEFINE BAR 1 OF Inregistra PROMPT "In \<lei"
	ON SELECTION BAR 1 OF Inregistra DO BAR_1_OF_Inregistra_FB2P

	DEFINE BAR 2 OF Inregistra PROMPT "In lei si in \<valuta"
	ON SELECTION BAR 2 OF Inregistra DO BAR_2_OF_Inregistra_FB2P

DEFINE BAR 8 OF Listare PROMPT "Situatii pe vechimi"
ON BAR 8 OF Listare ACTIVATE POPUP Situatiipe

	*----------------------------------
	DEFINE POPUP Situatiipe SHORTCUT RELATIVE
	DEFINE BAR 1 OF Situatiipe PROMPT "Fata de data scadenta"
	ON SELECTION BAR 1 OF Situatiipe Do sold_fact_pe_vechimi In orap_terti.prg with "A", .F.

	DEFINE BAR 2 OF Situatiipe PROMPT "Fata de data emitere"
	ON SELECTION BAR 2 OF Situatiipe Do sold_fact_pe_vechimi In orap_terti.prg with "A", .T.
ACTIVATE POPUP Listare

*</MenuCode>

*<Procedures>
PROCEDURE BAR_1_OF_Balantaana_FB2P
	DO PrepareRptBalantaFC WITH "","Jurnal","balanta_parteneri_rpt3",.F. IN osituatii_operative.prg 
ENDPROC && BAR_1_OF_Balantaana_FB2P

PROCEDURE BAR_3_OF_Balantaana_FB2P
	*!*	SELE creditor
	*!*	*	set filter to luat-dAT#0
	*!*	TITLU = 'CREDITORI'
	*!*		REPORT FORMAT creditor.FRX to printer prompt PREVIEW 
	*!*		*WINDOW WPRINT
		
	DO PrepareRptBalantaFC WITH "462","Jurnal Creditori","balanta_parteneri_rpt3",.F. IN osituatii_operative.prg 
ENDPROC && BAR_3_OF_Balantaana_FB2P

PROCEDURE BAR_4_OF_Balantaana_FB2P
	*!*	SELE DEBitor
	*!*	REPORT FORMAT DEBitor.FRX to printer prompt PREVIEW
	
	DO PrepareRptBalantaFC WITH "461","Jurnal  Debitori","balanta_parteneri_rpt3",.T. IN osituatii_operative.prg 
ENDPROC && BAR_4_OF_Balantaana_FB2P

PROCEDURE BAR_5_OF_Balantaana_FB2P
	*!*	*SELE ACHIT542
	*!*	SELECT nume_2 as nume , totdeb , totcred FROM achit542 INTO CURSOR tachi
	*!*	SELECT tachi
	*!*	REPORT FORMAT ACHIZ.FRX TO PRINTER PROMPT NOCONSOLE preview 
	*!*	*WINDOW WPRINT
	*!*	USE IN tachi
	
	DO PrepareRptBalantaFC WITH "542","Jurnal Achizitori","balanta_parteneri_rpt3",.T. IN osituatii_operative.prg 
ENDPROC && BAR_5_OF_Balantaana_FB2P

PROCEDURE BAR_6_OF_Balantaana_FB2P
	*!*	SELE actionar
	*!*	TITLU = 'ACTIONARI'
	*!*	REPORT FORMAT creditor.FRX to printer prompt PREVIEW 
	
	DO PrepareRptBalantaFC WITH "455","Jurnal Actionari","balanta_parteneri_rpt3",.F. IN osituatii_operative.prg 
ENDPROC && BAR_6_OF_Balantaana_FB2P

PROCEDURE BAR_1_OF_Situatiiop_FB2P
	**parametrii:
	**tcCont,tlActiv,tlTitlu,tlCauta_alfa_Cu_Toti,tlPerioada_Blocata,tcRaport_sau_Vizualizare,tc_NumeForma
	
	** titlu lasat gol ca sa keme cereTitlu
	DO PrepareRptSitOp IN osituatii_operative.prg
ENDPROC && BAR_1_OF_Situatiiop_FB2P

PROCEDURE BAR_3_OF_Situatiiop_FB2P
	**parametrii:
	**tcCont,tlActiv,tlTitlu,tlCauta_alfa_Cu_Toti,tlPerioada_Blocata,tcRaport_sau_Vizualizare,tc_NumeForma
	
	** titlu lasat gol ca sa keme cereTitlu
	DO PrepareRptSitOp IN osituatii_operative.prg WITH '462',.F.,"",.T.,.F.,
ENDPROC && BAR_3_OF_Situatiiop_FB2P

PROCEDURE BAR_4_OF_Situatiiop_FB2P
	**parametrii:
	**tcCont,tlActiv,tlTitlu,tlCauta_alfa_Cu_Toti,tlPerioada_Blocata,tcRaport_sau_Vizualizare,tc_NumeForma
	
	** titlu lasat gol ca sa keme cereTitlu
	DO PrepareRptSitOp IN osituatii_operative.prg WITH '461',.T.,"",.T.,.F.,
ENDPROC && BAR_4_OF_Situatiiop_FB2P

PROCEDURE BAR_5_OF_Situatiiop_FB2P
	**parametrii:
	**tcCont,tlActiv,tlTitlu,tlCauta_alfa_Cu_Toti,tlPerioada_Blocata,tcRaport_sau_Vizualizare,tc_NumeForma
	
	** titlu lasat gol ca sa keme cereTitlu
	DO PrepareRptSitOp IN osituatii_operative.prg WITH '452',.T.,"",.T.,.F.,
ENDPROC && BAR_5_OF_Situatiiop_FB2P

PROCEDURE BAR_6_OF_Situatiiop_FB2P
	**parametrii:
	**tcCont,tlActiv,tlTitlu,tlCauta_alfa_Cu_Toti,tlPerioada_Blocata,tcRaport_sau_Vizualizare,tc_NumeForma
	
	** titlu lasat gol ca sa keme cereTitlu
	DO PrepareRptSitOp IN osituatii_operative.prg WITH '455',.F.,"",.T.,.F.,
ENDPROC && BAR_6_OF_Situatiiop_FB2P

PROCEDURE BAR_4_OF_Listare_FB2P
	DO rap_fact_grup_pe_lucari_parteneri WITH [], .F., 1 IN orap_terti.prg
ENDPROC && BAR_4_OF_Listare_FB2P

PROCEDURE BAR_5_OF_Listare_FB2P
	DO viz_frm_facturi IN orap_terti_comun WITH 1
ENDPROC && BAR_5_OF_Listare_FB2P

PROCEDURE BAR_1_OF_Inregistra_FB2P
	Do parteneri_cu_sold_final In orap_terti.prg with .F.
ENDPROC && BAR_1_OF_Inregistra_FB2P

PROCEDURE BAR_2_OF_Inregistra_FB2P
	Do parteneri_cu_sold_final In orap_terti.prg with .T.
ENDPROC && BAR_2_OF_Inregistra_FB2P

*</Procedures>