campo-sirio/db/dbcv00a.uml
alex cbb608d183 Patch level : xx.811
Files correlati     :
Ricompilazione Demo : [ ]
Commento           : Riportata la versione 1.5 fino alla patch 811


git-svn-id: svn://10.65.10.50/trunk@8985 c028cbd2-c16b-5b4b-a496-9718f37d4682
2000-05-05 15:25:49 +00:00

160 lines
2.6 KiB
Plaintext
Executable File

#include "dbcv00a.h"
#define G_ARTICOLI 10
#define G_DISTINTE 20
#define G_MOVMAG 30
TOOLBAR "" 0 -2 0 2
BUTTON DLG_OK 10 2
BEGIN
PROMPT -12 -11 "~OK"
PICTURE BMP_OK
END
BUTTON DLG_QUIT 10 2
BEGIN
PROMPT -22 -11 "~Fine"
MESSAGE EXIT,K_QUIT
PICTURE BMP_QUIT
PICTURE BMP_QUITDN
END
ENDPAGE
PAGE "Archivi" -1 -1 80 20
STRING DLG_PROFILE 70
BEGIN
FLAGS "HG"
PROMPT 1 1 ""
PSELECT
END
STRING F_PATH 40
BEGIN
PROMPT 1 1 "Percorso dei files DBF di BPCS "
END
BOOL F_CHECKDEADARTS
BEGIN
PROMPT 1 3 "Utilizza il file degli articoli defunti"
END
BOOL F_ARTS
BEGIN
PROMPT 1 4 "Carica gli articoli"
MESSAGE TRUE SHOW,G_ARTICOLI@
MESSAGE FALSE HIDE,G_ARTICOLI@|RESET,G_ARTICOLI@
END
BOOL F_CHANGEGMC
BEGIN
PROMPT 3 5 "Ricarica solo i gr.merc."
MESSAGE TRUE DISABLE,F_EAN |CLEAR,F_ERASE_ARTS
MESSAGE FALSE ENABLE,F_EAN |ENABLE,F_ERASE_ARTS
GROUP G_ARTICOLI
END
BOOL F_ERASE_ARTS
BEGIN
PROMPT 38 5 "Azzera l'archivio"
GROUP G_ARTICOLI
END
LIST F_ICLAS 45
BEGIN
PROMPT 3 6 ""
ITEM " |Non caricare il campo ICLAS"
ITEM "S|Carica ICLAS come sotto cat.merc."
ITEM "C|Carica ICLAS come cat.merc."
GROUP G_ARTICOLI
END
LIST F_EAN 30
BEGIN
PROMPT 40 6 ""
ITEM " |Non caricare i codici EAN"
ITEM "8|Carica codici EAN 8"
ITEM "13|Carica codici EAN 13"
GROUP G_ARTICOLI
END
BOOL F_BOMS
BEGIN
PROMPT 1 7 "Carica le distinte"
END
NUMBER F_ANNO 2
BEGIN
PROMPT 3 8 "Chiedi conferma per le distinte risalenti al "
END
BOOL F_DIVS
BEGIN
PROMPT 40 7 "Carica i divisori"
END
BOOL F_MOVMAG
BEGIN
PROMPT 1 9 "Carica i movimenti di magazzino"
MESSAGE TRUE SHOW, G_MOVMAG@
MESSAGE FALSE HIDE, G_MOVMAG@
END
BOOL F_BOLACQ
BEGIN
PROMPT 40 9 "Solo bolle di acquisto"
GROUP G_MOVMAG
END
BOOL F_MOVMAG_SE
BEGIN
PROMPT 3 10 "Carica mov. Segrate"
MESSAGE FALSE "X", F_MOVMAG_TS
GROUP G_MOVMAG
END
BOOL F_MOVMAG_TS
BEGIN
PROMPT 40 10 "Carica mov. Trieste"
MESSAGE FALSE "X", F_MOVMAG_SE
GROUP G_MOVMAG
END
STRING F_MOVMAG_FILE 20
BEGIN
PROMPT 3 11 "Nome file: "
GROUP G_MOVMAG
END
DATE F_MOVMAG_FROMD
BEGIN
PROMPT 3 12 "Dalla data:"
GROUP G_MOVMAG
END
DATE F_MOVMAG_TOD
BEGIN
PROMPT 43 12 "alla data:"
GROUP G_MOVMAG
END
BOOL F_TESTONLY
BEGIN
PROMPT 3 13 "Test solo senza caricare i movimenti"
GROUP G_MOVMAG
END
BOOL F_NOCLEAR
BEGIN
PROMPT 3 14 "Non cancellare i vecchi documenti"
GROUP G_MOVMAG
END
BOOL F_ORDACQ
BEGIN
PROMPT 1 16 "Carica gli ordini di acquisto"
END
BOOL F_ORDCLI
BEGIN
PROMPT 1 17 "Carica gli ordini cliente"
END
BOOL F_ORDPROD
BEGIN
PROMPT 1 18 "Carica gli ordini di produzione"
END
ENDPAGE
ENDMASK