Initial: flux text FoxBin2Prg (git urmareste .??2 in-arbore, binarele VFP git-ignored)

Co-Authored-By: Claude Fable 5 <noreply@anthropic.com>

Meniuri/trez3.mn2

@@ -0,0 +1,97 @@
+*--------------------------------------------------------------------------------------------------------------------------------------------------------
+* (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>