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

*<MenuCode>
DEFINE POPUP Trezorerie SHORTCUT RELATIVE FROM MROW(),MCOL()
DEFINE BAR 1 OF Trezorerie PROMPT "Ridicat avans din casa" ;
	MESSAGE '542:5314'
ON SELECTION BAR 1 OF Trezorerie DO BAR_1_OF_Trezorerie_FB2P

DEFINE BAR 2 OF Trezorerie PROMPT "Restituire avans in casa" ;
	MESSAGE '5314:542'
ON SELECTION BAR 2 OF Trezorerie DO BAR_2_OF_Trezorerie_FB2P

DEFINE BAR 3 OF Trezorerie PROMPT "\-"
ON BAR 3 OF Trezorerie ACTIVATE POPUP _15s0jven8

	*----------------------------------
	DEFINE POPUP _15s0jven8 SHORTCUT RELATIVE
DEFINE BAR 4 OF Trezorerie PROMPT "Ridicat avans din banca" ;
	MESSAGE '542:5124'
ON SELECTION BAR 4 OF Trezorerie lans(10569)

DEFINE BAR 5 OF Trezorerie PROMPT "Restituire avans in banca" ;
	MESSAGE '5124:542'
ON SELECTION BAR 5 OF Trezorerie lans(10568)

DEFINE BAR 6 OF Trezorerie PROMPT "\-"
ON BAR 6 OF Trezorerie ACTIVATE POPUP _2070yhzbr

	*----------------------------------
	DEFINE POPUP _2070yhzbr SHORTCUT RELATIVE
DEFINE BAR "89" OF Trezorerie PROMPT "Plati"
ON BAR 89 OF Trezorerie ACTIVATE POPUP Plati

	*----------------------------------
	DEFINE POPUP Plati SHORTCUT RELATIVE
	DEFINE BAR "89020" OF Plati PROMPT "Plata furnizori 401" ;
		MESSAGE ' 401: 542'
	ON SELECTION BAR 89020 OF Plati DO BAR_"89020"_OF_Plati_FB2P

	DEFINE BAR 2 OF Plati PROMPT "Plata furnizori 404" ;
		MESSAGE ' 404: 542'
	ON SELECTION BAR 2 OF Plati DO BAR_2_OF_Plati_FB2P

	DEFINE BAR 3 OF Plati PROMPT "\-"
	ON BAR 3 OF Plati ACTIVATE POPUP _1470mvbgt

		*----------------------------------
		DEFINE POPUP _1470mvbgt SHORTCUT RELATIVE
	DEFINE BAR 4 OF Plati PROMPT "Plata deplasari" ;
		MESSAGE ' 625: 542'
	ON SELECTION BAR 4 OF Plati lans(10484)

	DEFINE BAR 5 OF Plati PROMPT "Plata alte impozite si taxe"
	ON SELECTION BAR 5 OF Plati DO BAR_5_OF_Plati_FB2P
ACTIVATE POPUP Trezorerie

*</MenuCode>

*<Procedures>
PROCEDURE BAR_1_OF_Trezorerie_FB2P
	lans(10432)
ENDPROC && BAR_1_OF_Trezorerie_FB2P

PROCEDURE BAR_2_OF_Trezorerie_FB2P
	LANS(10430)
ENDPROC && BAR_2_OF_Trezorerie_FB2P

PROCEDURE BAR_"89020"_OF_Plati_FB2P
	lans(10433)
ENDPROC && BAR_"89020"_OF_Plati_FB2P

PROCEDURE BAR_2_OF_Plati_FB2P
	lans(10485)
ENDPROC && BAR_2_OF_Plati_FB2P

PROCEDURE BAR_5_OF_Plati_FB2P
	PRIVATE pcACN
	loCont=ret_cont("Selectati contul",'446')  &&,4461,4462,4463,4464,4465,4466,4467,4468,4469')
	IF TYPE('loCont') # 'O'
		RETURN
	ENDIF 
	IF buton=2
		RELEASE loCont
		RETURN 
	ENDIF 
	CN=locont.cont
	PcACN=loCont.Acont
	lans(10544)
ENDPROC && BAR_5_OF_Plati_FB2P

*</Procedures>
