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

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

Meniuri/casademarcat.mn2

@@ -0,0 +1,61 @@
+*--------------------------------------------------------------------------------------------------------------------------------------------------------
+* (EN) AUTOGENERATED - ATTENTION!! - NOT INTENDED FOR EXECUTION!! USE ONLY FOR MERGING CHANGES AND STORING WITH SCM TOOLS!!
+*--------------------------------------------------------------------------------------------------------------------------------------------------------
+*< FOXBIN2PRG: Version="1.21" SourceFile="casademarcat.mnx" CPID="1252" /> (Solo para binarios VFP 9 / Only for VFP 9 binaries)
+*
+*<MenuType>4</MenuType>
+*<MenuLocation>REPLACE</MenuLocation>
+
+*<MenuCode>
+DEFINE POPUP Shortcut SHORTCUT RELATIVE FROM MROW(),MCOL()
+DEFINE BAR 1 OF Shortcut PROMPT "Datecs"
+ON SELECTION BAR 1 OF Shortcut DO BAR_1_OF_Shortcut_FB2P
+
+DEFINE BAR 2 OF Shortcut PROMPT "Optima"
+ON SELECTION BAR 2 OF Shortcut DO BAR_2_OF_Shortcut_FB2P
+ACTIVATE POPUP Shortcut
+
+*</MenuCode>
+
+*<Procedures>
+PROCEDURE BAR_1_OF_Shortcut_FB2P
+	LOCAL MES1,MES2
+	MES1='Nu este instalata interfata cu'
+	MES2='Casa de marcat Datecs (MP 500 TR)'
+	
+	IF !DIRECTORY('&DIRGEN\Datecs')
+	DO MESAJ WITH MES1,MES2
+	RETURN
+	ENDIF
+	
+	SET DEFAULT TO &DIRGEN\Datecs
+	IF !FILE('&DIRGEN\Datecs\Datecs.EXE')
+	DO MESAJ WITH MES1,MES2
+	RETURN
+	ENDIF
+	RUN /N Datecs.EXE
+	
+	SET DEFAULT TO &DIRGEN
+ENDPROC && BAR_1_OF_Shortcut_FB2P
+
+PROCEDURE BAR_2_OF_Shortcut_FB2P
+	LOCAL MES1,MES2
+	MES1='Nu este instalata interfata cu'
+	MES2='Casa de marcat Optima (CR715)'
+	
+	IF !DIRECTORY('&DIRGEN\OPTIMA')
+	DO MESAJ WITH MES1,MES2
+	RETURN
+	ENDIF
+	
+	SET DEFAULT TO &DIRGEN\OPTIMA
+	IF !FILE('&DIRGEN\OPTIMA\OPTIMA.EXE')
+	DO MESAJ WITH MES1,MES2
+	RETURN
+	ENDIF
+	RUN /N OPTIMA.EXE
+	
+	SET DEFAULT TO &DIRGEN
+ENDPROC && BAR_2_OF_Shortcut_FB2P
+
+*</Procedures>