1996-06-04 14:54:43 +00:00
|
|
|
#include "cg6800.h"
|
|
|
|
|
2008-04-10 11:17:28 +00:00
|
|
|
TOOLBAR "topbar" 0 0 0 2
|
1996-06-04 14:54:43 +00:00
|
|
|
|
2003-10-28 11:59:09 +00:00
|
|
|
BUTTON DLG_DELREC 10 2
|
1996-06-04 14:54:43 +00:00
|
|
|
BEGIN
|
2003-10-28 11:59:09 +00:00
|
|
|
PROMPT -13 -1 "~Elimina"
|
1996-06-04 14:54:43 +00:00
|
|
|
MESSAGE EXIT,K_DEL
|
|
|
|
END
|
|
|
|
|
|
|
|
BUTTON DLG_CANCEL 10 2
|
|
|
|
BEGIN
|
2003-10-28 11:59:09 +00:00
|
|
|
PROMPT -23 -1 ""
|
1996-06-04 14:54:43 +00:00
|
|
|
MESSAGE EXIT,K_ESC
|
|
|
|
END
|
|
|
|
|
|
|
|
BUTTON DLG_QUIT 10 2
|
|
|
|
BEGIN
|
2003-10-28 11:59:09 +00:00
|
|
|
PROMPT -33 -1 ""
|
1996-06-04 14:54:43 +00:00
|
|
|
MESSAGE EXIT,K_QUIT
|
|
|
|
END
|
|
|
|
|
|
|
|
ENDPAGE
|
|
|
|
|
2008-04-10 11:17:28 +00:00
|
|
|
PAGE "Annullamento movimenti" 0 0 0 2
|
1996-06-04 14:54:43 +00:00
|
|
|
|
1999-04-26 15:58:05 +00:00
|
|
|
NUMBER F_NUMREG 7
|
1996-06-04 14:54:43 +00:00
|
|
|
BEGIN
|
|
|
|
PROMPT 1 1 "Numero registrazione "
|
|
|
|
HELP "Inserire il numero di registrazione che si vuole modificare"
|
|
|
|
FLAGS "RZ"
|
|
|
|
CHECKTYPE REQUIRED
|
|
|
|
END
|
|
|
|
|
|
|
|
DATE F_DATAREG
|
|
|
|
BEGIN
|
|
|
|
PROMPT 1 3 "Data registrazione "
|
|
|
|
END
|
|
|
|
|
|
|
|
STRING F_NUMDOC 7
|
|
|
|
BEGIN
|
|
|
|
PROMPT 1 5 "Numero documento "
|
|
|
|
END
|
|
|
|
|
|
|
|
DATE F_DATADOC
|
|
|
|
BEGIN
|
|
|
|
PROMPT 1 6 "Data del documento "
|
|
|
|
END
|
|
|
|
|
|
|
|
STRING F_REGIVA 3
|
|
|
|
BEGIN
|
|
|
|
PROMPT 1 8 "Registro IVA "
|
|
|
|
END
|
|
|
|
|
|
|
|
STRING F_DESCRREG 49
|
|
|
|
BEGIN
|
|
|
|
PROMPT 28 8 ""
|
|
|
|
FLAGS "D"
|
|
|
|
END
|
|
|
|
|
|
|
|
NUMBER F_PROTIVA 5
|
|
|
|
BEGIN
|
|
|
|
PROMPT 1 9 "Numero protocollo iva "
|
|
|
|
FLAGS "R"
|
|
|
|
END
|
|
|
|
|
|
|
|
STRING F_CODCAUS 3
|
|
|
|
BEGIN
|
|
|
|
PROMPT 1 11 "Codice causale "
|
|
|
|
FLAGS "Z"
|
|
|
|
END
|
|
|
|
|
|
|
|
STRING F_DESCRCAU 49
|
|
|
|
BEGIN
|
|
|
|
PROMPT 28 11 ""
|
|
|
|
FLAGS "D"
|
|
|
|
END
|
|
|
|
|
|
|
|
STRING F_DESCR 30
|
|
|
|
BEGIN
|
|
|
|
PROMPT 1 13 "Descrizione aggiuntiva "
|
|
|
|
FLAGS "D"
|
|
|
|
END
|
|
|
|
|
|
|
|
ENDPAGE
|
|
|
|
|
|
|
|
ENDMASK
|