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

*<MenuCode>
DEFINE POPUP Capitalsoc SHORTCUT RELATIVE FROM MROW(),MCOL()
DEFINE BAR 1 OF Capitalsoc PROMPT "Subscriere capital social" ;
	MESSAGE '456 :1011'
ON SELECTION BAR 1 OF Capitalsoc DO BAR_1_OF_Capitalsoc_FB2P

DEFINE BAR "11010" OF Capitalsoc PROMPT "Majorare capital social"
ON BAR 11010 OF Capitalsoc ACTIVATE POPUP Majorareca

	*----------------------------------
	DEFINE POPUP Majorareca SHORTCUT RELATIVE
	DEFINE BAR 1 OF Majorareca PROMPT "Terenuri" ;
		MESSAGE '2111:456 ; 1011:1012'
	ON SELECTION BAR 1 OF Majorareca DO BAR_1_OF_Majorareca_FB2P

	DEFINE BAR 2 OF Majorareca PROMPT "Cladiri" ;
		MESSAGE '212 :456 ;1011:1012'
	ON SELECTION BAR 2 OF Majorareca DO BAR_2_OF_Majorareca_FB2P

	DEFINE BAR 3 OF Majorareca PROMPT "Materii prime" ;
		MESSAGE '301 :456 ;1011:1012'
	ON SELECTION BAR 3 OF Majorareca DO BAR_3_OF_Majorareca_FB2P

	DEFINE BAR 4 OF Majorareca PROMPT "Materiale de natura obiectelor de inventar" ;
		MESSAGE '303 :456 ;1011:1012'
	ON SELECTION BAR 4 OF Majorareca DO BAR_4_OF_Majorareca_FB2P

	DEFINE BAR 5 OF Majorareca PROMPT "Marfuri" ;
		MESSAGE '371:456 ;1011:1012'
	ON SELECTION BAR 5 OF Majorareca DO BAR_5_OF_Majorareca_FB2P

	DEFINE BAR 6 OF Majorareca PROMPT "Conturi la banci" ;
		MESSAGE '5121:456 ;1011:1012'
	ON SELECTION BAR 6 OF Majorareca DO BAR_6_OF_Majorareca_FB2P

	DEFINE BAR 7 OF Majorareca PROMPT "Numerar la casierie" ;
		MESSAGE '5311:456 ;1011:1012'
	ON SELECTION BAR 7 OF Majorareca DO BAR_7_OF_Majorareca_FB2P

	DEFINE BAR 8 OF Majorareca PROMPT "Alte valori" ;
		MESSAGE '532 :456 ;1011:1012'
	ON SELECTION BAR 8 OF Majorareca DO BAR_8_OF_Majorareca_FB2P

	DEFINE BAR 9 OF Majorareca PROMPT "Incorporare profit" ;
		MESSAGE '129 :1012'
	ON SELECTION BAR 9 OF Majorareca DO BAR_9_OF_Majorareca_FB2P

	DEFINE BAR 10 OF Majorareca PROMPT "Incorporare rezerve" ;
		MESSAGE '1061:1012'
	ON SELECTION BAR 10 OF Majorareca DO BAR_10_OF_Majorareca_FB2P

DEFINE BAR "11020" OF Capitalsoc PROMPT "Reducere capital social"
ON BAR 11020 OF Capitalsoc ACTIVATE POPUP _09a0rejku

	*----------------------------------
	DEFINE POPUP _09a0rejku SHORTCUT RELATIVE
	DEFINE BAR 1 OF _09a0rejku PROMPT "Retragere asociat" ;
		MESSAGE '1012:456 ;456 :5121'
	ON SELECTION BAR 1 OF _09a0rejku DO BAR_1_OF__09a0rejku_FB2P

	DEFINE BAR 2 OF _09a0rejku PROMPT "Acoperire pierdere"
	ON BAR 2 OF _09a0rejku ACTIVATE POPUP Acoperirep

		*----------------------------------
		DEFINE POPUP Acoperirep SHORTCUT RELATIVE
		DEFINE BAR 1 OF Acoperirep PROMPT "Exercitiul curent" ;
			MESSAGE '1012:121 '
		ON SELECTION BAR 1 OF Acoperirep DO BAR_1_OF_Acoperirep_FB2P

		DEFINE BAR 2 OF Acoperirep PROMPT "Exercitii precedente" ;
			MESSAGE '1012:117 '
		ON SELECTION BAR 2 OF Acoperirep DO BAR_2_OF_Acoperirep_FB2P
ACTIVATE POPUP Capitalsoc

*</MenuCode>

*<Procedures>
PROCEDURE BAR_1_OF_Capitalsoc_FB2P
	*DO ABC1 WITH '456 ','1011'
	lans(10001)
ENDPROC && BAR_1_OF_Capitalsoc_FB2P

PROCEDURE BAR_1_OF_Majorareca_FB2P
	*DO ABC2 WITH '2111',"456 ","1011","1012"
	lans(10002)
ENDPROC && BAR_1_OF_Majorareca_FB2P

PROCEDURE BAR_2_OF_Majorareca_FB2P
	*DO ABC2 WITH '212 ',"456 ","1011","1012"
	lans(10003)
ENDPROC && BAR_2_OF_Majorareca_FB2P

PROCEDURE BAR_3_OF_Majorareca_FB2P
	*DO ABC2 WITH '301 ',"456 ","1011","1012"
	lans(10004)
ENDPROC && BAR_3_OF_Majorareca_FB2P

PROCEDURE BAR_4_OF_Majorareca_FB2P
	*DO ABC2 WITH '303 ',"456 ","1011","1012"
	lans(10005)
ENDPROC && BAR_4_OF_Majorareca_FB2P

PROCEDURE BAR_5_OF_Majorareca_FB2P
	*DO ABC2 WITH '371 ',"456 ","1011","1012"
	lans(10006)
ENDPROC && BAR_5_OF_Majorareca_FB2P

PROCEDURE BAR_6_OF_Majorareca_FB2P
	*DO ABC2 WITH '5121',"456 ","1011","1012"
	lans(10007)
ENDPROC && BAR_6_OF_Majorareca_FB2P

PROCEDURE BAR_7_OF_Majorareca_FB2P
	*DO ABC2 WITH '5311',"456 ","1011","1012"
	lans(10008)
ENDPROC && BAR_7_OF_Majorareca_FB2P

PROCEDURE BAR_8_OF_Majorareca_FB2P
	*DO ABC2 WITH '532 ',"456 ","1011","1012"
	lans(10009)
ENDPROC && BAR_8_OF_Majorareca_FB2P

PROCEDURE BAR_9_OF_Majorareca_FB2P
	*DO ABC1 WITH '129 ',"1012"
	lans(10010)
ENDPROC && BAR_9_OF_Majorareca_FB2P

PROCEDURE BAR_10_OF_Majorareca_FB2P
	*DO ABC1 WITH '1061',"1012"
	lans(10011)
ENDPROC && BAR_10_OF_Majorareca_FB2P

PROCEDURE BAR_1_OF__09a0rejku_FB2P
	*DO ABC2 WITH '1012',"456 ","456 ","5121"
	lans(10012)
ENDPROC && BAR_1_OF__09a0rejku_FB2P

PROCEDURE BAR_1_OF_Acoperirep_FB2P
	*DO ABC1 WITH '1012',"121 "
	lans(10013)
ENDPROC && BAR_1_OF_Acoperirep_FB2P

PROCEDURE BAR_2_OF_Acoperirep_FB2P
	*DO ABC1 WITH '1012',"117 "
	lans(10014)
ENDPROC && BAR_2_OF_Acoperirep_FB2P

*</Procedures>