77 lines
1.2 KiB
Plaintext
77 lines
1.2 KiB
Plaintext
|
#include "pg0001500a.h"
|
|||
|
|
|||
|
PAGE "Copia movimenti di magazzino" -1 -1 76 18
|
|||
|
|
|||
|
NUMBER F_DANUM 7
|
|||
|
BEGIN
|
|||
|
PROMPT 1 2 "Dal numero "
|
|||
|
USE LF_MOVMAG
|
|||
|
INPUT NUMREG F_DANUM
|
|||
|
DISPLAY "N.reg.@7" NUMREG
|
|||
|
DISPLAY "Anno" ANNOES
|
|||
|
DISPLAY "Data reg. @10" DATAREG
|
|||
|
DISPLAY "Data comp.@10" DATACOMP
|
|||
|
DISPLAY "Descrizione@30" DESCR
|
|||
|
DISPLAY "Causale" CODCAUS
|
|||
|
OUTPUT F_DANUM NUMREG
|
|||
|
CHECKTYPE REQUIRED
|
|||
|
END
|
|||
|
|
|||
|
NUMBER F_ANUM 7
|
|||
|
BEGIN
|
|||
|
PROMPT 1 4 " Al numero "
|
|||
|
GROUP 15
|
|||
|
USE LF_MOVMAG
|
|||
|
INPUT NUMREG F_ANUM
|
|||
|
DISPLAY "N.reg.@7" NUMREG
|
|||
|
DISPLAY "Anno" ANNOES
|
|||
|
DISPLAY "Data reg. @10" DATAREG
|
|||
|
DISPLAY "Data comp.@10" DATACOMP
|
|||
|
DISPLAY "Descrizione@30" DESCR
|
|||
|
DISPLAY "Causale" CODCAUS
|
|||
|
OUTPUT F_ANUM NUMREG
|
|||
|
CHECKTYPE REQUIRED
|
|||
|
END
|
|||
|
|
|||
|
DATE F_DATAMOV
|
|||
|
BEGIN
|
|||
|
PROMPT 1 6 "Data movimenti "
|
|||
|
CHECKTYPE REQUIRED
|
|||
|
END
|
|||
|
|
|||
|
CURRENCY F_VALTOT
|
|||
|
BEGIN
|
|||
|
PROMPT 1 8 "Valore totale "
|
|||
|
END
|
|||
|
|
|||
|
NUMBER F_QMAX 5
|
|||
|
BEGIN
|
|||
|
PROMPT 1 10 "Quantit<69> massima "
|
|||
|
END
|
|||
|
|
|||
|
CURRENCY F_VMIN 12
|
|||
|
BEGIN
|
|||
|
PROMPT 1 12 "Valore unitario minimo "
|
|||
|
FLAGS "U"
|
|||
|
END
|
|||
|
|
|||
|
NUMBER F_CMAX 2
|
|||
|
BEGIN
|
|||
|
PROMPT 1 14 "Articoli da saltare "
|
|||
|
CHECKTYPE REQUIRED
|
|||
|
END
|
|||
|
|
|||
|
BUTTON DLG_OK 10 2
|
|||
|
BEGIN
|
|||
|
PROMPT -12 -1 ""
|
|||
|
END
|
|||
|
|
|||
|
BUTTON DLG_QUIT 10 2
|
|||
|
BEGIN
|
|||
|
PROMPT -22 -1 ""
|
|||
|
END
|
|||
|
|
|||
|
ENDPAGE
|
|||
|
ENDMASK
|
|||
|
|