romfast/roaauto
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

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

Browse Source 
Co-Authored-By: Claude Fable 5 <noreply@anthropic.com>
This commit is contained in:
Marius Mutu
2026-07-16 11:30:39 +03:00
commit 1fb478ae81
152 changed files with 129219 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files

38
Meniuri/analize_prod_neterm.mn2 Normal file
View File

@@ -0,0 +1,38 @@
*--------------------------------------------------------------------------------------------------------------------------------------------------------
* (EN) AUTOGENERATED - ATTENTION!! - NOT INTENDED FOR EXECUTION!! USE ONLY FOR MERGING CHANGES AND STORING WITH SCM TOOLS!!
*--------------------------------------------------------------------------------------------------------------------------------------------------------
*< FOXBIN2PRG: Version="1.21" SourceFile="analize_prod_neterm.mnx" CPID="1250" /> (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 "Valori materiale bonate pe comenzi nefacturate"
ON SELECTION BAR 1 OF Shortcut DO BAR_1_OF_Shortcut_FB2P
DEFINE BAR 2 OF Shortcut PROMPT "\-"
DEFINE BAR 3 OF Shortcut PROMPT "Bonuri pe comenzi nefacturate"
ON SELECTION BAR 3 OF Shortcut DO BAR_3_OF_Shortcut_FB2P
DEFINE BAR 4 OF Shortcut PROMPT "Bonuri pe comenzi nefacturate - pe sectii"
ON SELECTION BAR 4 OF Shortcut DO BAR_4_OF_Shortcut_FB2P
ACTIVATE POPUP Shortcut
*</MenuCode>
*<Procedures>
PROCEDURE BAR_1_OF_Shortcut_FB2P
DO valori_mat_bon IN oproceduri_analize.prg
ENDPROC && BAR_1_OF_Shortcut_FB2P
PROCEDURE BAR_3_OF_Shortcut_FB2P
DO bon_com_nefact IN oproceduri_analize.prg WITH .F. && pe sectii
ENDPROC && BAR_3_OF_Shortcut_FB2P
PROCEDURE BAR_4_OF_Shortcut_FB2P
DO bon_com_nefact IN oproceduri_analize.prg WITH .T. && pe sectii
ENDPROC && BAR_4_OF_Shortcut_FB2P
*</Procedures>

61
Meniuri/editscurt.mn2 Normal file
View File

@@ -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="editscurt.mnx" CPID="1250" /> (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 _med_copy OF Shortcut PROMPT "\<Copiaza"
DEFINE BAR _med_paste OF Shortcut PROMPT "Re\<da"
DEFINE BAR 3 OF Shortcut PROMPT "LLL"
ON BAR 3 OF Shortcut ACTIVATE POPUP LLL
*----------------------------------
DEFINE POPUP LLL SHORTCUT RELATIVE
DEFINE BAR 1 OF LLL PROMPT "PPPPPP"
ON BAR 1 OF LLL ACTIVATE POPUP PPPPPP
*----------------------------------
DEFINE POPUP PPPPPP SHORTCUT RELATIVE
DEFINE BAR 2 OF LLL PROMPT "JJJJJ"
ON BAR 2 OF LLL ACTIVATE POPUP JJJJJ
*----------------------------------
DEFINE POPUP JJJJJ SHORTCUT RELATIVE
DEFINE BAR 3 OF LLL PROMPT "KKKKKKKK"
ON BAR 3 OF LLL ACTIVATE POPUP KKKKKKKK
*----------------------------------
DEFINE POPUP KKKKKKKK SHORTCUT RELATIVE
DEFINE BAR 1 OF KKKKKKKK PROMPT "IIIIII"
ON BAR 1 OF KKKKKKKK ACTIVATE POPUP IIIIII
*----------------------------------
DEFINE POPUP IIIIII SHORTCUT RELATIVE
DEFINE BAR 2 OF KKKKKKKK PROMPT "OOOOOO"
ON BAR 2 OF KKKKKKKK ACTIVATE POPUP OOOOOO
*----------------------------------
DEFINE POPUP OOOOOO SHORTCUT RELATIVE
DEFINE BAR 3 OF KKKKKKKK PROMPT "PPPPPP"
ON BAR 3 OF KKKKKKKK ACTIVATE POPUP _09f0no8qv
*----------------------------------
DEFINE POPUP _09f0no8qv SHORTCUT RELATIVE
DEFINE BAR 4 OF KKKKKKKK PROMPT "LLLLLL"
ON BAR 4 OF KKKKKKKK ACTIVATE POPUP LLLLLL
*----------------------------------
DEFINE POPUP LLLLLL SHORTCUT RELATIVE
DEFINE BAR 5 OF KKKKKKKK PROMPT "MMMMMM"
ON BAR 5 OF KKKKKKKK ACTIVATE POPUP MMMMMM
*----------------------------------
DEFINE POPUP MMMMMM SHORTCUT RELATIVEACTIVATE POPUP Shortcut
*</MenuCode>

68
Meniuri/listari_facturi.mn2 Normal file
View File

@@ -0,0 +1,68 @@
*--------------------------------------------------------------------------------------------------------------------------------------------------------
* (EN) AUTOGENERATED - ATTENTION!! - NOT INTENDED FOR EXECUTION!! USE ONLY FOR MERGING CHANGES AND STORING WITH SCM TOOLS!!
*--------------------------------------------------------------------------------------------------------------------------------------------------------
*< FOXBIN2PRG: Version="1.21" SourceFile="listari_facturi.mnx" CPID="1250" /> (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 "Facturi emise pe \<asiguratori"
ON SELECTION BAR 1 OF Shortcut DO BAR_1_OF_Shortcut_FB2P
DEFINE BAR 2 OF Shortcut PROMPT "Facturi emise pe \<clienti"
ON SELECTION BAR 2 OF Shortcut DO BAR_2_OF_Shortcut_FB2P
DEFINE BAR 3 OF Shortcut PROMPT "Facturi \<ITP"
ON SELECTION BAR 3 OF Shortcut DO BAR_3_OF_Shortcut_FB2P
DEFINE BAR 4 OF Shortcut PROMPT "Facturi \<spalare"
ON SELECTION BAR 4 OF Shortcut DO BAR_4_OF_Shortcut_FB2P
DEFINE BAR 5 OF Shortcut PROMPT "\-"
ON BAR 5 OF Shortcut ACTIVATE POPUP _24b0yw84b
*----------------------------------
DEFINE POPUP _24b0yw84b SHORTCUT RELATIVE
DEFINE BAR 6 OF Shortcut PROMPT "\<Comenzi validate pe marci"
ON SELECTION BAR 6 OF Shortcut DO BAR_6_OF_Shortcut_FB2P
DEFINE BAR 7 OF Shortcut PROMPT "\-"
ON BAR 7 OF Shortcut ACTIVATE POPUP _24p11blhg
*----------------------------------
DEFINE POPUP _24p11blhg SHORTCUT RELATIVE
DEFINE BAR 8 OF Shortcut PROMPT "Facturi finale pe sec\<tii"
ON SELECTION BAR 8 OF Shortcut DO BAR_8_OF_Shortcut_FB2P
ACTIVATE POPUP Shortcut
*</MenuCode>
*<Procedures>
PROCEDURE BAR_1_OF_Shortcut_FB2P
DO facturi_emise_pe_asig IN oproceduri_listari.prg
*!* DO fact_emi IN oproceduri_listari.prg
ENDPROC && BAR_1_OF_Shortcut_FB2P
PROCEDURE BAR_2_OF_Shortcut_FB2P
DO fact_ord_em IN oproceduri_listari.prg
ENDPROC && BAR_2_OF_Shortcut_FB2P
PROCEDURE BAR_3_OF_Shortcut_FB2P
DO listarefacturi_itp IN oproceduri_listari.prg
ENDPROC && BAR_3_OF_Shortcut_FB2P
PROCEDURE BAR_4_OF_Shortcut_FB2P
DO listarefacturi_spalare IN oproceduri_listari.prg
ENDPROC && BAR_4_OF_Shortcut_FB2P
PROCEDURE BAR_6_OF_Shortcut_FB2P
DO devize_pe_marci_de_masini IN oproceduri_listari.prg
ENDPROC && BAR_6_OF_Shortcut_FB2P
PROCEDURE BAR_8_OF_Shortcut_FB2P
DO facturi_emise_pe_sectii IN oproceduri_listari.prg
ENDPROC && BAR_8_OF_Shortcut_FB2P
*</Procedures>

104
Meniuri/listari_manopera.mn2 Normal file
View File

@@ -0,0 +1,104 @@
*--------------------------------------------------------------------------------------------------------------------------------------------------------
* (EN) AUTOGENERATED - ATTENTION!! - NOT INTENDED FOR EXECUTION!! USE ONLY FOR MERGING CHANGES AND STORING WITH SCM TOOLS!!
*--------------------------------------------------------------------------------------------------------------------------------------------------------
*< FOXBIN2PRG: Version="1.21" SourceFile="listari_manopera.mnx" CPID="1250" /> (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 "Total pe salariati"
ON BAR 1 OF Shortcut ACTIVATE POPUP Totalpesal
*----------------------------------
DEFINE POPUP Totalpesal SHORTCUT RELATIVE
DEFINE BAR 1 OF Totalpesal PROMPT "Desfasurat"
ON SELECTION BAR 1 OF Totalpesal DO BAR_1_OF_Totalpesal_FB2P
DEFINE BAR 2 OF Totalpesal PROMPT "Totaluri pe comenzi"
ON SELECTION BAR 2 OF Totalpesal DO BAR_2_OF_Totalpesal_FB2P
DEFINE BAR 2 OF Shortcut PROMPT "Un singur salariat"
ON BAR 2 OF Shortcut ACTIVATE POPUP Unsingursa
*----------------------------------
DEFINE POPUP Unsingursa SHORTCUT RELATIVE
DEFINE BAR 1 OF Unsingursa PROMPT "Desfasurat"
ON SELECTION BAR 1 OF Unsingursa DO BAR_1_OF_Unsingursa_FB2P
DEFINE BAR 2 OF Unsingursa PROMPT "Totaluri pe comenzi"
ON SELECTION BAR 2 OF Unsingursa DO BAR_2_OF_Unsingursa_FB2P
DEFINE BAR 3 OF Shortcut PROMPT "\-"
ON BAR 3 OF Shortcut ACTIVATE POPUP _28q0kwgxe
*----------------------------------
DEFINE POPUP _28q0kwgxe SHORTCUT RELATIVE
DEFINE BAR 4 OF Shortcut PROMPT "Manopera pe comenzi inchise / sectie / an de fabricatie"
ON BAR 4 OF Shortcut ACTIVATE POPUP _28q0knxys
*----------------------------------
DEFINE POPUP _28q0knxys SHORTCUT RELATIVE
DEFINE BAR 1 OF _28q0knxys PROMPT "\<Desfasurat"
ON SELECTION BAR 1 OF _28q0knxys DO BAR_1_OF__28q0knxys_FB2P
DEFINE BAR 2 OF _28q0knxys PROMPT "\<Centralizat"
ON SELECTION BAR 2 OF _28q0knxys DO BAR_2_OF__28q0knxys_FB2P
DEFINE BAR 5 OF Shortcut PROMPT "Manopera pe comenzi inchise pe sectie"
ON SELECTION BAR 5 OF Shortcut DO BAR_5_OF_Shortcut_FB2P
DEFINE BAR 6 OF Shortcut PROMPT "\-"
ON BAR 6 OF Shortcut ACTIVATE POPUP _3lg0qi2qj
*----------------------------------
DEFINE POPUP _3lg0qi2qj SHORTCUT RELATIVE
DEFINE BAR 7 OF Shortcut PROMPT "Raport de salarizare - comenzi validate"
ON SELECTION BAR 7 OF Shortcut DO BAR_7_OF_Shortcut_FB2P
ACTIVATE POPUP Shortcut
*</MenuCode>
*<Procedures>
PROCEDURE BAR_1_OF_Totalpesal_FB2P
*!* gofundal.alwaysontop=.F.
DO list_man_tot_desf IN oproceduri_listari.prg
*!* gofundal.alwaysontop=.T.
ENDPROC && BAR_1_OF_Totalpesal_FB2P
PROCEDURE BAR_2_OF_Totalpesal_FB2P
*!* gofundal.alwaysontop=.F.
DO list_man_tot_com IN oproceduri_listari.prg
*!* gofundal.alwaysontop=.T.
ENDPROC && BAR_2_OF_Totalpesal_FB2P
PROCEDURE BAR_1_OF_Unsingursa_FB2P
*!* gofundal.alwaysontop=.F.
DO list_man_tot_desf WITH .t. IN oproceduri_listari.prg
*!* gofundal.alwaysontop=.T.
ENDPROC && BAR_1_OF_Unsingursa_FB2P
PROCEDURE BAR_2_OF_Unsingursa_FB2P
*!* gofundal.alwaysontop=.F.
DO list_man_tot_com WITH .t. IN oproceduri_listari.prg
*!* gofundal.alwaysontop=.T.
ENDPROC && BAR_2_OF_Unsingursa_FB2P
PROCEDURE BAR_1_OF__28q0knxys_FB2P
DO manopera_sectii_anfabr IN oproceduri_listari.prg
ENDPROC && BAR_1_OF__28q0knxys_FB2P
PROCEDURE BAR_2_OF__28q0knxys_FB2P
DO manopera_sectii_anfabr_centralizator IN oproceduri_listari.prg
ENDPROC && BAR_2_OF__28q0knxys_FB2P
PROCEDURE BAR_5_OF_Shortcut_FB2P
DO manopera_sectii IN oproceduri_listari.prg
ENDPROC && BAR_5_OF_Shortcut_FB2P
PROCEDURE BAR_7_OF_Shortcut_FB2P
DO raport_salarizare_val IN oproceduri_analize.prg
ENDPROC && BAR_7_OF_Shortcut_FB2P
*</Procedures>

142
Meniuri/roaauto.mn2 Normal file
View File

@@ -0,0 +1,142 @@
*--------------------------------------------------------------------------------------------------------------------------------------------------------
* (EN) AUTOGENERATED - ATTENTION!! - NOT INTENDED FOR EXECUTION!! USE ONLY FOR MERGING CHANGES AND STORING WITH SCM TOOLS!!
*--------------------------------------------------------------------------------------------------------------------------------------------------------
*< FOXBIN2PRG: Version="1.21" SourceFile="roaauto.mnx" CPID="1252" /> (Solo para binarios VFP 9 / Only for VFP 9 binaries)
*
*<MenuType>1</MenuType>
*<MenuLocation>REPLACE</MenuLocation>
*<MenuCode>
DEFINE MENU _MSYSMENU BAR
DEFINE PAD _000000001 OF _MSYSMENU PROMPT "\<Utile" COLOR SCHEME 3
ON PAD _000000001 OF _MSYSMENU ACTIVATE POPUP Utile
*----------------------------------
DEFINE POPUP Utile MARGIN RELATIVE SHADOW COLOR SCHEME 4
DEFINE BAR 1 OF Utile PROMPT "\<Calculator"
ON SELECTION BAR 1 OF Utile DO BAR_1_OF_Utile_FB2P
DEFINE BAR 2 OF Utile PROMPT "\<Notepad"
ON SELECTION BAR 2 OF Utile DO BAR_2_OF_Utile_FB2P
DEFINE BAR 3 OF Utile PROMPT "\-"
ON BAR 3 OF Utile ACTIVATE POPUP _3vq0lspgc
*----------------------------------
DEFINE POPUP _3vq0lspgc MARGIN RELATIVE SHADOW COLOR SCHEME 4
DEFINE BAR 4 OF Utile PROMPT "\<Iesire" ;
KEY F2, "F2" ;
MESSAGE 'Iesire din program'
ON SELECTION BAR 4 OF Utile DO BAR_4_OF_Utile_FB2P
DEFINE PAD _000000002 OF _MSYSMENU PROMPT "\<Editare" COLOR SCHEME 3
ON PAD _000000002 OF _MSYSMENU ACTIVATE POPUP Editare
*----------------------------------
DEFINE POPUP Editare MARGIN RELATIVE SHADOW COLOR SCHEME 4
DEFINE BAR _med_undo OF Editare PROMPT "\<Anuleaza" ;
KEY CTRL+Z, "CTRL+Z" ;
MESSAGE 'Anuleaza ultima comanda de editare.'
DEFINE BAR _med_redo OF Editare PROMPT "\<Refa" ;
KEY CTRL+R, "CTRL+R" ;
MESSAGE 'Repeta ultima comanda anulata.'
DEFINE BAR 3 OF Editare PROMPT "\-"
ON BAR 3 OF Editare ACTIVATE POPUP _3vq0m1ceq
*----------------------------------
DEFINE POPUP _3vq0m1ceq MARGIN RELATIVE SHADOW COLOR SCHEME 4
DEFINE BAR _med_cut OF Editare PROMPT "\<Taie si retine" ;
KEY CTRL+X, "CTRL+X"
DEFINE BAR _med_copy OF Editare PROMPT "\<Copiaza" ;
KEY CTRL+C, "CTRL+C" ;
MESSAGE 'Copiaza in memorie textul selectat.'
DEFINE BAR _med_paste OF Editare PROMPT "Re\<da" ;
KEY CTRL+V, "CTRL+V" ;
MESSAGE 'Reda din memorie textul retinut cu comanda <Copiaza>.'
DEFINE PAD _000000003 OF _MSYSMENU PROMPT "\<Configurare" COLOR SCHEME 3
ON PAD _000000003 OF _MSYSMENU ACTIVATE POPUP Configurar
*----------------------------------
DEFINE POPUP Configurar MARGIN RELATIVE SHADOW COLOR SCHEME 4
DEFINE BAR 1 OF Configurar PROMPT "\<Rapoarte utilizator"
ON BAR 1 OF Configurar ACTIVATE POPUP Rapoarteut
*----------------------------------
DEFINE POPUP Rapoarteut MARGIN RELATIVE SHADOW COLOR SCHEME 4
DEFINE BAR 1 OF Rapoarteut PROMPT "\<Generare raport"
ON SELECTION BAR 1 OF Rapoarteut DO BAR_1_OF_Rapoarteut_FB2P
DEFINE BAR 2 OF Rapoarteut PROMPT "\<Modificare raport"
ON SELECTION BAR 2 OF Rapoarteut DO BAR_2_OF_Rapoarteut_FB2P
DEFINE BAR 3 OF Rapoarteut PROMPT "\<Setari imprimanta"
ON SELECTION BAR 3 OF Rapoarteut DO BAR_3_OF_Rapoarteut_FB2P
DEFINE PAD _000000004 OF _MSYSMENU PROMPT "A\<jutor" COLOR SCHEME 3
ON PAD _000000004 OF _MSYSMENU ACTIVATE POPUP Ajutor
*----------------------------------
DEFINE POPUP Ajutor MARGIN RELATIVE SHADOW COLOR SCHEME 4
DEFINE BAR 1 OF Ajutor PROMPT "\<Instructiuni de utilizare"
ON SELECTION BAR 1 OF Ajutor DO BAR_1_OF_Ajutor_FB2P
DEFINE BAR 2 OF Ajutor PROMPT "\-"
ON BAR 2 OF Ajutor ACTIVATE POPUP _3vq0m4jf5
*----------------------------------
DEFINE POPUP _3vq0m4jf5 MARGIN RELATIVE SHADOW COLOR SCHEME 4
DEFINE BAR 3 OF Ajutor PROMPT "\<Jurnal modificari"
ON SELECTION BAR 3 OF Ajutor DO BAR_3_OF_Ajutor_FB2P
DEFINE BAR 4 OF Ajutor PROMPT "\<Despre program"
ON SELECTION BAR 4 OF Ajutor DO BAR_4_OF_Ajutor_FB2P
*</MenuCode>
*<Procedures>
PROCEDURE BAR_1_OF_Utile_FB2P
Do apeleaza_calc In oproceduri_comune.prg
ENDPROC && BAR_1_OF_Utile_FB2P
PROCEDURE BAR_2_OF_Utile_FB2P
Do apeleaza_notepad In oproceduri_comune.prg
ENDPROC && BAR_2_OF_Utile_FB2P
PROCEDURE BAR_4_OF_Utile_FB2P
Quit
ENDPROC && BAR_4_OF_Utile_FB2P
PROCEDURE BAR_1_OF_Rapoarteut_FB2P
do UserReport2File IN PROCEDURI_RAPOARTE.PRG
ENDPROC && BAR_1_OF_Rapoarteut_FB2P
PROCEDURE BAR_2_OF_Rapoarteut_FB2P
DO MODIFICA_RAPORT_UTILIZATOR IN PROCEDURI_RAPOARTE.PRG
ENDPROC && BAR_2_OF_Rapoarteut_FB2P
PROCEDURE BAR_3_OF_Rapoarteut_FB2P
sys(1037)
ENDPROC && BAR_3_OF_Rapoarteut_FB2P
PROCEDURE BAR_1_OF_Ajutor_FB2P
Do arata_manual In oproceduri_comune.prg
ENDPROC && BAR_1_OF_Ajutor_FB2P
PROCEDURE BAR_3_OF_Ajutor_FB2P
DO arata_modificari IN oproceduri_comune.prg
ENDPROC && BAR_3_OF_Ajutor_FB2P
PROCEDURE BAR_4_OF_Ajutor_FB2P
DO arata_versiune IN oproceduri_comune.prg
ENDPROC && BAR_4_OF_Ajutor_FB2P
*</Procedures>

43
Meniuri/serii.mn2 Normal file
View File

@@ -0,0 +1,43 @@
*--------------------------------------------------------------------------------------------------------------------------------------------------------
* (EN) AUTOGENERATED - ATTENTION!! - NOT INTENDED FOR EXECUTION!! USE ONLY FOR MERGING CHANGES AND STORING WITH SCM TOOLS!!
*--------------------------------------------------------------------------------------------------------------------------------------------------------
*< FOXBIN2PRG: Version="1.21" SourceFile="serii.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 "\<Comenzi"
ON SELECTION BAR 1 OF Shortcut DO BAR_1_OF_Shortcut_FB2P
DEFINE BAR 2 OF Shortcut PROMPT "\<Bonuri fiscale"
ON SELECTION BAR 2 OF Shortcut DO BAR_2_OF_Shortcut_FB2P
DEFINE BAR 3 OF Shortcut PROMPT "C\<hitante"
ON SELECTION BAR 3 OF Shortcut DO BAR_3_OF_Shortcut_FB2P
DEFINE BAR 4 OF Shortcut PROMPT "\<Facturi"
ON SELECTION BAR 4 OF Shortcut DO BAR_4_OF_Shortcut_FB2P
ACTIVATE POPUP Shortcut
*</MenuCode>
*<Procedures>
PROCEDURE BAR_1_OF_Shortcut_FB2P
DO viz_config_serii_complet WITH 20 IN oserii_numere.prg
ENDPROC && BAR_1_OF_Shortcut_FB2P
PROCEDURE BAR_2_OF_Shortcut_FB2P
DO viz_config_serii_complet WITH 3 IN oserii_numere.prg
ENDPROC && BAR_2_OF_Shortcut_FB2P
PROCEDURE BAR_3_OF_Shortcut_FB2P
DO viz_config_serii_complet WITH 16 IN oserii_numere.prg
ENDPROC && BAR_3_OF_Shortcut_FB2P
PROCEDURE BAR_4_OF_Shortcut_FB2P
DO viz_config_serii_complet WITH 5 IN oserii_numere.prg
ENDPROC && BAR_4_OF_Shortcut_FB2P
*</Procedures>

29
Meniuri/verificari.mn2 Normal file
View File

@@ -0,0 +1,29 @@
*--------------------------------------------------------------------------------------------------------------------------------------------------------
* (EN) AUTOGENERATED - ATTENTION!! - NOT INTENDED FOR EXECUTION!! USE ONLY FOR MERGING CHANGES AND STORING WITH SCM TOOLS!!
*--------------------------------------------------------------------------------------------------------------------------------------------------------
*< FOXBIN2PRG: Version="1.21" SourceFile="verificari.mnx" CPID="1250" /> (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 "\<Venituri"
ON SELECTION BAR 1 OF Shortcut DO BAR_1_OF_Shortcut_FB2P
DEFINE BAR 2 OF Shortcut PROMPT "\<Articole pe comenzi"
ON SELECTION BAR 2 OF Shortcut DO BAR_2_OF_Shortcut_FB2P
ACTIVATE POPUP Shortcut
*</MenuCode>
*<Procedures>
PROCEDURE BAR_1_OF_Shortcut_FB2P
DO verificare_venituri IN oproceduri_analize.prg
ENDPROC && BAR_1_OF_Shortcut_FB2P
PROCEDURE BAR_2_OF_Shortcut_FB2P
DO verificare_articole IN oproceduri_analize.prg
ENDPROC && BAR_2_OF_Shortcut_FB2P
*</Procedures>

121
Meniuri/verificari_com.mn2 Normal file
View File

@@ -0,0 +1,121 @@
*--------------------------------------------------------------------------------------------------------------------------------------------------------
* (EN) AUTOGENERATED - ATTENTION!! - NOT INTENDED FOR EXECUTION!! USE ONLY FOR MERGING CHANGES AND STORING WITH SCM TOOLS!!
*--------------------------------------------------------------------------------------------------------------------------------------------------------
*< FOXBIN2PRG: Version="1.21" SourceFile="verificari_com.mnx" CPID="1250" /> (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 "\<Comenzi validate in luna curenta"
ON SELECTION BAR 1 OF Shortcut DO BAR_1_OF_Shortcut_FB2P
DEFINE BAR 2 OF Shortcut PROMPT "\<Total comenzi validate"
ON SELECTION BAR 2 OF Shortcut DO BAR_2_OF_Shortcut_FB2P
DEFINE BAR 3 OF Shortcut PROMPT "\<Comenzi nevalidate"
ON SELECTION BAR 3 OF Shortcut DO BAR_3_OF_Shortcut_FB2P
DEFINE BAR 4 OF Shortcut PROMPT "\<Comenzi nefacturate"
ON SELECTION BAR 4 OF Shortcut DO BAR_4_OF_Shortcut_FB2P
DEFINE BAR 5 OF Shortcut PROMPT "\<Comenzi validate si nefacturate"
ON SELECTION BAR 5 OF Shortcut DO BAR_5_OF_Shortcut_FB2P
DEFINE BAR 6 OF Shortcut PROMPT "\-"
ON BAR 6 OF Shortcut ACTIVATE POPUP _1ho0zp71a
*----------------------------------
DEFINE POPUP _1ho0zp71a SHORTCUT RELATIVE
DEFINE BAR 7 OF Shortcut PROMPT "\<Comenzi reportate din luna precedenta"
ON SELECTION BAR 7 OF Shortcut DO BAR_7_OF_Shortcut_FB2P
DEFINE BAR 8 OF Shortcut PROMPT "\-"
ON BAR 8 OF Shortcut ACTIVATE POPUP _1ho0zp71b
*----------------------------------
DEFINE POPUP _1ho0zp71b SHORTCUT RELATIVE
DEFINE BAR 9 OF Shortcut PROMPT "\Comenzi deschise pe zile"
ON SELECTION BAR 9 OF Shortcut DO BAR_9_OF_Shortcut_FB2P
ACTIVATE POPUP Shortcut
*</MenuCode>
*<Procedures>
PROCEDURE BAR_1_OF_Shortcut_FB2P
DO ver_valid_lun IN oproceduri_analize.prg
ENDPROC && BAR_1_OF_Shortcut_FB2P
PROCEDURE BAR_2_OF_Shortcut_FB2P
DO ver_valid IN oproceduri_analize.prg
ENDPROC && BAR_2_OF_Shortcut_FB2P
PROCEDURE BAR_3_OF_Shortcut_FB2P
DO ver_nevalid IN oproceduri_analize.prg
ENDPROC && BAR_3_OF_Shortcut_FB2P
PROCEDURE BAR_4_OF_Shortcut_FB2P
DO ver_nefact IN oproceduri_analize.prg
ENDPROC && BAR_4_OF_Shortcut_FB2P
PROCEDURE BAR_5_OF_Shortcut_FB2P
DO ver_valid_nefact IN oproceduri_analize.prg
ENDPROC && BAR_5_OF_Shortcut_FB2P
PROCEDURE BAR_7_OF_Shortcut_FB2P
DO ver_com_rep IN oproceduri_analize.prg
ENDPROC && BAR_7_OF_Shortcut_FB2P
PROCEDURE BAR_9_OF_Shortcut_FB2P
*!* PUBLIC m.dataact1,m.dataact2
*!* store date() to m.dataact1,m.dataact2
*!* Ointre=CREATEOBJECT("CAUTintre")
*!* WITH Ointre
*!* .CAPTION="Data de referinta"
*!* .label1.caption="Data intrarii:"
*!* .label2.VISIBLE=.F.
*!* .text1.controlsource="m.dataact1"
*!* .text2.VISIBLE=.F.
*!* endwith
*!* ointre.show(1)
*!* public titlu
*!* set excl on
*!* titlu='LISTA COMENZILOR DESCHISE IN DATA DE: '+ALLT(DTOC(M.DATAACT1))
*!* SELE DISTINCT CLIE.NUME,ORDL.NRORD,ORDL.ASIG,ORDL.DATAI,ORDL.NRINMAT,ordl.valoare,ordl.nrfact,ordl.datafact;
*!* FROM CLIE,ORDL WHERE ORDL.CODC=CLIE.CODC AND ORDL.dataI=m.dataact1;
*!* INTO CURSOR C1
*!* SELE DISTINCT MASINI.MARCAM,MASINI.MASINA,C1.*;
*!* FROM MASINI,C1 WHERE C1.NRINMAT=MASINI.NRINMAT ;
*!* INTO table &loc\&nfscurt\tempo\C2 order by nrord
*!* set excl off
*!* alter table c2 add column suma n(14) add column nract n(14)
*!* sele c2
*!* scan
*!* scat memv
*!* sele act
*!* loca for scc='4111' and scd='5311' and m.datai=dataact and pereche=m.nrfact
*!* if found()
*!* scat fiel suma,nract memv
*!* sele c2
*!* repl suma with m.suma
*!* repl nract with m.nract
*!* endif
*!* sele c2
*!* endscan
*!* *
*!* *set filter to dataI>=m.dataact1 and dataI<=m.dataact2
*!* sele C2
*!* if reccount()=0
*!* do mesaj with 'Nu exista inregistrari la aceasta data',''
*!* return
*!* endif
*!* report form comZI to printer prompt preview
*!* sele ordl
*!* set filter to
ENDPROC && BAR_9_OF_Shortcut_FB2P
*</Procedures>