campo-sirio/cg/cg2200a.uml
guy ab754188c1 Aggiornato uso di TRelation::lfile e main_app
Aggiunto programma cancellazione movimenti provvisori


git-svn-id: svn://10.65.10.50/trunk@276 c028cbd2-c16b-5b4b-a496-9718f37d4682
1994-09-22 07:46:09 +00:00

60 lines
953 B
Plaintext
Executable File

#include "cg2200.h"
PAGE "Eliminazione Movimenti Provvisori" -1 -1 44 9
GROUPBOX DLG_NULL 42 3
BEGIN
PROMPT 1 1 "Dal movimento"
END
DATE F_FROMDATE
BEGIN
PROMPT 2 2 "Data "
USE LF_MOV KEY 2 SELECT PROVVIS="P"
INPUT DATAREG F_FROMDATE
INPUT NUMREG F_FROMREG
DISPLAY "Data@10" DATAREG
DISPLAY "Numero@6" NUMREG
DISPLAY "Causale" CODCAUS
DISPLAY "Documento" NUMDOC
DISPLAY "Descrizione@50" DESCR
OUTPUT F_FROMDATE DATAREG
OUTPUT F_FROMREG NUMREG
CHECKTYPE NORMAL
END
NUMBER F_FROMREG 5
BEGIN
PROMPT 22 2 "Operazione "
FLAGS "D"
END
GROUPBOX DLG_NULL 42 3
BEGIN
PROMPT 1 4 "Al movimento"
END
DATE F_TODATE
BEGIN
PROMPT 2 5 "Data "
COPY ALL F_FROMDATE
CHECKTYPE NORMAL
END
NUMBER F_TOREG 5
BEGIN
PROMPT 22 5 "Operazione "
FLAGS "D"
END
BUTTON DLG_DELREC 10 2
BEGIN
PROMPT -12 -1 ""
END
BUTTON DLG_QUIT 10 2
BEGIN
PROMPT -22 -1 ""
END
ENDPAGE