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
		
			
				
	
	
		
			160 lines
		
	
	
		
			2.6 KiB
		
	
	
	
		
			Plaintext
		
	
	
		
			Executable File
		
	
	
	
	
			
		
		
	
	
			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
 |