696c2fd07a
Files correlati : f9.exe, f23.dirr, f23.trr Commento : - Pulizia codice - Ripensata estrazione - Corretta procedura di guessing - Spostata pagina controllo errori in una nuova maschera - Aggiunta maschera per estrazione degli esclusi - Aggionto campo elabf9 su mov per segnarmi lo stato di estrazione
145 lines
1.6 KiB
Plaintext
145 lines
1.6 KiB
Plaintext
#include "f90100c.h"
|
|
|
|
TOOLBAR "topbar" 0 0 0 2
|
|
|
|
BUTTON DLG_OK 2 2
|
|
BEGIN
|
|
PROMPT 1 1 "Estrai"
|
|
PICTURE TOOL_ELABORA
|
|
END
|
|
|
|
BUTTON DLG_NULL 2
|
|
BEGIN
|
|
PROMPT 1 2 ""
|
|
PICTURE 0
|
|
END
|
|
|
|
BUTTON DLG_FINDREC 2 2
|
|
BEGIN
|
|
PROMPT 1 4 "Controllo Estr."
|
|
PICTURE TOOL_PERMISSIONS
|
|
FLAGS ""
|
|
END
|
|
|
|
#include <helpbar.h>
|
|
ENDPAGE
|
|
|
|
PAGE "Esclusi" 0 2 0 0
|
|
|
|
TEXT F_ETEXT
|
|
BEGIN
|
|
PROMPT 0 0 "@BMovimenti esclusi dalle precedenti estrazioni:"
|
|
END
|
|
|
|
SPREADSHEET S_ESCL -1 10
|
|
BEGIN
|
|
PROMPT 0 1 "Movimenti da controllare"
|
|
ITEM " "
|
|
ITEM "NUMREG@8"
|
|
ITEM "DATAREG@8"
|
|
ITEM "DATADOC@8"
|
|
ITEM "CODCAUS@8"
|
|
ITEM "MESELIQ@8"
|
|
ITEM "NUMDOC@8"
|
|
ITEM "IMPTOTDOC@8"
|
|
ITEM "FORNITORE@8"
|
|
ITEM "RAGSOC@8"
|
|
ITEM "PROTIVA@8"
|
|
ITEM "DESCR@8"
|
|
END
|
|
ENDPAGE
|
|
ENDMASK
|
|
|
|
|
|
PAGE "Mov Esclusi" -1 -1 78 13
|
|
|
|
BOOLEAN F_SEL
|
|
BEGIN
|
|
PROMPT 1 1 ""
|
|
END
|
|
|
|
NUMERIC F_NUMREG 7
|
|
BEGIN
|
|
PROMPT 1 1 ""
|
|
FLAGS "D"
|
|
END
|
|
|
|
DATA F_DATAREG
|
|
BEGIN
|
|
PROMPT 1 1 ""
|
|
FLAGS "D"
|
|
END
|
|
|
|
DATA F_DATADOC
|
|
BEGIN
|
|
PROMPT 1 1 ""
|
|
FLAGS "D"
|
|
END
|
|
|
|
STRING F_CODCAUS 3
|
|
BEGIN
|
|
PROMPT 1 1 ""
|
|
FLAGS "D"
|
|
END
|
|
|
|
NUMERIC F_MESELIQ 2
|
|
BEGIN
|
|
PROMPT 1 1 ""
|
|
FLAGS "D"
|
|
END
|
|
|
|
STRING F_NUMDOC 50
|
|
BEGIN
|
|
PROMPT 1 1 ""
|
|
FLAGS "D"
|
|
END
|
|
|
|
NUMERIC F_IMPTOTDOC 15 2
|
|
BEGIN
|
|
PROMPT 1 1 ""
|
|
FLAGS "D"
|
|
END
|
|
|
|
NUMERIC F_FORN 6
|
|
BEGIN
|
|
PROMPT 1 1 ""
|
|
FLAGS "D"
|
|
END
|
|
|
|
STRING F_RAGSOC 80
|
|
BEGIN
|
|
PROMPT 1 1 ""
|
|
FLAGS "D"
|
|
END
|
|
|
|
NUMERIC F_PROTIVA 6
|
|
BEGIN
|
|
PROMPT 1 1 ""
|
|
FLAGS "D"
|
|
END
|
|
|
|
STRING F_DESCR 50
|
|
BEGIN
|
|
PROMPT 1 1 ""
|
|
FLAGS "D"
|
|
END
|
|
|
|
ENDPAGE
|
|
|
|
TOOLBAR "topbar" 0 0 0 2
|
|
|
|
BUTTON DLG_NULL 2 2
|
|
BEGIN
|
|
PROMPT -1 0 ""
|
|
PICTURE 0
|
|
END
|
|
|
|
BUTTON DLG_QUIT 2 2
|
|
BEGIN
|
|
PROMPT 3 1 "Fine"
|
|
MESSAGE EXIT,K_QUIT
|
|
PICTURE TOOL_QUIT
|
|
END
|
|
|
|
ENPAGE
|
|
ENDMASK |