Adattamenti MRP da 3.2 a 11.0
git-svn-id: svn://10.65.10.50/branches/R_10_00@22686 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
parent
70be917985
commit
661cd394fd
@ -52,20 +52,16 @@ bool TLoadfile_mask::on_field_event(TOperable_field& o, TField_event e, long jol
|
||||
case F_FILE:
|
||||
if(e==fe_button) //se e (che é l'evento) = pressione del bottone 'cerca' (fe button)
|
||||
{
|
||||
DIRECTORY dir;
|
||||
FILE_SPEC fs;
|
||||
|
||||
TFilename fname=o.get(); //se il nome del file non esiste -> gli assegna automaticamente il nome
|
||||
if(fname == "") //articoli.dat
|
||||
fname = "articoli";
|
||||
fname.ext("dat");
|
||||
|
||||
xvt_fsys_get_dir(&dir); //funzioni di xvt (grafica); utilizzate per creare la finestra di ricerca del
|
||||
xvt_fsys_get_dir(&fs.dir); //file di tipo .dat (é una finestra tipo gestione risorse Windows)
|
||||
strcpy(fs.type, "dat");
|
||||
strcpy(fs.name, fname);
|
||||
strcpy(fs.creator, "ELD");
|
||||
|
||||
DIRECTORY dir; xvt_fsys_get_dir(&dir); //funzioni di xvt (grafica); utilizzate per creare la finestra di ricerca del
|
||||
|
||||
FILE_SPEC fs; xvt_fsys_convert_str_to_fspec(fname, &fs);
|
||||
const bool good = xvt_dm_post_file_open(&fs, "Selezionare il file ...") == FL_OK;
|
||||
|
||||
xvt_fsys_set_dir(&dir);
|
||||
|
||||
if (good)
|
||||
@ -352,7 +348,7 @@ void TRilprod_mask::load_prod_file(const char * nomefile, bool savefile, bool on
|
||||
{
|
||||
const TTipo_rec tipo = (TTipo_rec) atoi(rec.get(type_field));
|
||||
|
||||
p.setstatus(prod.read_file()->tellg());
|
||||
p.setstatus((long)prod.read_file()->tellg());
|
||||
if (tipo == _no_type)
|
||||
{
|
||||
display_error(vwin, TR("Tipo record non valido - record scartato"), trec, rec);
|
||||
|
@ -7,11 +7,11 @@ int main(int argc, char** argv)
|
||||
int a = argc > 1 ? (argv[1][1] - '0') : 0;
|
||||
switch (a)
|
||||
{
|
||||
case 1: // master schedule planning
|
||||
case 1: // Pianificazione ordini
|
||||
mr2200(argc,argv); break;
|
||||
case 2: // generic planning
|
||||
case 2: // Master Schedule plan
|
||||
mr2300(argc,argv); break;
|
||||
case 3: // generic planning
|
||||
case 3: // pianificazione ordini acquisto
|
||||
mr2400(argc,argv); break;
|
||||
case 4: // generic planning
|
||||
mr2500(argc,argv); break;
|
||||
|
@ -12,7 +12,7 @@ END
|
||||
BUTTON F_CHECK 10 2
|
||||
BEGIN
|
||||
PROMPT -26 -1 "Controlla"
|
||||
PICTURE TOOL_CHECK
|
||||
PICTURE TOOL_CHECK
|
||||
GROUP G_POSTPROCESS
|
||||
FLAGS "D"
|
||||
END
|
||||
@ -101,6 +101,7 @@ BEGIN
|
||||
FLAGS "D"
|
||||
GROUP G_BUCKET_WEEK
|
||||
END
|
||||
|
||||
NUMBER F_BUCKET 2
|
||||
BEGIN
|
||||
PROMPT 41 5 "= "
|
||||
@ -109,18 +110,21 @@ BEGIN
|
||||
MESSAGE COPY,H_BUCKET
|
||||
GROUP G_PREPROCESS G_BUCKET_DEF
|
||||
END
|
||||
|
||||
LIST F_DAYXBUCK 1 9
|
||||
BEGIN
|
||||
PROMPT 48 5 ""
|
||||
ITEM "1|giorni"
|
||||
ITEM "7|settimane"
|
||||
FLAGS "D"
|
||||
GROUP G_BUCKET_WEEK
|
||||
GROUP G_BUCKET_WEEK
|
||||
END
|
||||
|
||||
NUMBER F_LIM 2
|
||||
BEGIN
|
||||
PROMPT 2 6 "Gg.limite residui"
|
||||
END
|
||||
|
||||
BOOL F_RESCHEDULING
|
||||
BEGIN
|
||||
PROMPT 2 9 "Permetti rescheduling"
|
||||
@ -128,6 +132,7 @@ BEGIN
|
||||
MESSAGE TRUE SHOW,F_RESCHED_ALERT
|
||||
MESSAGE FALSE HIDE,F_RESCHED_ALERT
|
||||
END
|
||||
|
||||
LIST F_RESCHED_ALERT 16
|
||||
BEGIN
|
||||
PROMPT 30 9 "Segnalazioni "
|
||||
|
@ -1124,8 +1124,7 @@ TCalendar_mask::TCalendar_mask(const char* name, int num)
|
||||
}
|
||||
|
||||
//***********************************
|
||||
//********
|
||||
TImpianto * get_impianto(const char * codice)
|
||||
TImpianto* get_impianto(const char * codice)
|
||||
{
|
||||
static TImpianto *buffer=NULL;
|
||||
if (!buffer)
|
||||
|
Loading…
x
Reference in New Issue
Block a user