57 lines
895 B
Plaintext
57 lines
895 B
Plaintext
|
#include "ps1001_prev_datacomp.h"
|
||
|
|
|
||
|
|
PAGE "Movimenti preventivi" -1 -1 78 7
|
||
|
|
|
||
|
|
TEXT DLG_NULL
|
||
|
|
BEGIN
|
||
|
|
PROMPT 1 1 "Date di competenza"
|
||
|
|
END
|
||
|
|
|
||
|
|
DATA F_DADATA
|
||
|
|
BEGIN
|
||
|
|
PROMPT 1 2 "Dal "
|
||
|
|
CHECKTYPE REQUIRED
|
||
|
|
FIELD #DADATA
|
||
|
|
END
|
||
|
|
|
||
|
|
DATA F_ADATA
|
||
|
|
BEGIN
|
||
|
|
PROMPT 1 3 "Al "
|
||
|
|
CHECKTYPE REQUIRED
|
||
|
|
FIELD #ADATA
|
||
|
|
VALIDATE DATE_CMP_FUNC >= F_DADATA
|
||
|
|
WARNING "La data finale deve essere successiva a quella iniziale"
|
||
|
|
END
|
||
|
|
|
||
|
|
STRING F_CDC 10
|
||
|
|
BEGIN
|
||
|
|
PROMPT 1 5 "Sede "
|
||
|
|
USE CDC
|
||
|
|
INPUT CODCOSTO F_CDC
|
||
|
|
DISPLAY "Sede@10" CODCOSTO
|
||
|
|
DISPLAY "Descrizione@50" DESCRIZ
|
||
|
|
OUTPUT F_CDC CODCOSTO
|
||
|
|
OUTPUT F_CDC_DESCR DESCRIZ
|
||
|
|
CHECKTYPE NORMAL
|
||
|
|
FIELD #CDC
|
||
|
|
END
|
||
|
|
|
||
|
|
STRING F_CDC_DESCR 50
|
||
|
|
BEGIN
|
||
|
|
PROMPT 20 5 ""
|
||
|
|
USE CDC KEY 2
|
||
|
|
INPUT DESCRIZ F_CDC_DESCR
|
||
|
|
DISPLAY "Descrizione@50" DESCRIZ
|
||
|
|
DISPLAY "Sede@10" CODCOSTO
|
||
|
|
COPY OUTPUT F_CDC
|
||
|
|
CHECKTYPE NORMAL
|
||
|
|
END
|
||
|
|
|
||
|
|
ENDPAGE
|
||
|
|
|
||
|
|
TOOLBAR "" 0 0 0 2
|
||
|
|
#include <printbar.h>
|
||
|
|
ENDPAGE
|
||
|
|
|
||
|
|
ENDMASK
|