Initial: flux text FoxBin2Prg (git urmareste .??2 in-arbore, binarele VFP git-ignored)
Co-Authored-By: Claude Fable 5 <noreply@anthropic.com>
This commit is contained in:
48
Meniuri/rulaje.mn2
Normal file
48
Meniuri/rulaje.mn2
Normal file
@@ -0,0 +1,48 @@
|
||||
*--------------------------------------------------------------------------------------------------------------------------------------------------------
|
||||
* (EN) AUTOGENERATED - ATTENTION!! - NOT INTENDED FOR EXECUTION!! USE ONLY FOR MERGING CHANGES AND STORING WITH SCM TOOLS!!
|
||||
*--------------------------------------------------------------------------------------------------------------------------------------------------------
|
||||
*< FOXBIN2PRG: Version="1.21" SourceFile="rulaje.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 "\<In luna curenta"
|
||||
ON SELECTION BAR 1 OF Shortcut DO BAR_1_OF_Shortcut_FB2P
|
||||
|
||||
DEFINE BAR 2 OF Shortcut PROMPT "\<Total rulaje"
|
||||
ON SELECTION BAR 2 OF Shortcut DO BAR_2_OF_Shortcut_FB2P
|
||||
ACTIVATE POPUP Shortcut
|
||||
|
||||
*</MenuCode>
|
||||
|
||||
*<Procedures>
|
||||
PROCEDURE BAR_1_OF_Shortcut_FB2P
|
||||
osetgest.tbrprim.buton6.click
|
||||
ENDPROC && BAR_1_OF_Shortcut_FB2P
|
||||
|
||||
PROCEDURE BAR_2_OF_Shortcut_FB2P
|
||||
|
||||
sele rul
|
||||
set relation off into actan
|
||||
SET ORDER TO TAG Cod OF &calefirma\datean\actan.cdx IN Actan
|
||||
sele rul
|
||||
SET RELATION TO cod INTO Actan ADDITIVE
|
||||
SELE RUL
|
||||
SET FILTER TO
|
||||
SELE ACTAN
|
||||
SET FILTER TO
|
||||
SELE RULL
|
||||
SET FILTER TO
|
||||
*select DISTINCT rul.denumire,rul.pret,rul.um,rul.cant,rul.cante,rul.scd,rul.gest,actan.dataact,actan.nract,rul.cod,rul.tva;
|
||||
* from rul,actan;
|
||||
* where rul.cod=actan.cod;
|
||||
* into cursor rullactanfact
|
||||
sele 0
|
||||
use &datean\rul again alias rullactanfact
|
||||
do form afrul
|
||||
use in rullactanfact
|
||||
ENDPROC && BAR_2_OF_Shortcut_FB2P
|
||||
|
||||
*</Procedures>
|
||||
Reference in New Issue
Block a user