#include "mr2200b.h"
#include "mr2url.h"
PAGE "Controllo planning"  -1 -1 76 22


NUMBER FC_RIGA 4
BEGIN
  FLAGS "D"
  PROMPT 1 0 "Riga      "
END

NUMBER FC_BUCKET 2
BEGIN
  FLAGS "D"
  PROMPT 19 0 "Bucket "
END

DATE FC_DATE1
BEGIN
  FLAGS "D"
  PROMPT 34 0 "("
END
DATE FC_DATE2
BEGIN
  FLAGS "D"
  PROMPT 46 0 "-"
END
TEXT DLG_NULL
BEGIN
  PROMPT 58 0 ")"
END


NUMBER FC_CODCLI 9
BEGIN
  FLAGS "DR"
  PROMPT 1 1 "Cli/forn. "
END

STRING FC_CODART 40
BEGIN
  FLAGS "DG"
  PROMPT 1 2 "Articolo  "
END

STRING FC_DESCART 35
BEGIN
  FLAGS "D"
  PROMPT 34 2 ""
END


STRING FC_LIV1 10
BEGIN
  PROMPT 1 3 "Giacenza  "
  FLAGS "UH"
  USE GCG 
  INPUT CODTAB[1,1] "1" 
  INPUT CODTAB[2,11] FC_LIV1
  DISPLAY "Gruppo@20" CODTAB[2,20]
  DISPLAY "Descr.@30" S0
  OUTPUT FC_LIV1 CODTAB[2,12] 
  CHECKTYPE NORMAL
  MESSAGE EMPTY CLEAR,FC_LIV2|CHECK,FC_LIV2
  MESSAGE ENABLE,FC_LIV2
END

STRING FC_LIV2 10
BEGIN
  PROMPT 26 3 ""
  FLAGS "UH"
  USE GCG 
  INPUT CODTAB[1,1] "2" 
  INPUT CODTAB[2,11] FC_LIV2
  DISPLAY "Gruppo@20" CODTAB[2,20]
  DISPLAY "Descr.@30" S0
  OUTPUT FC_LIV2 CODTAB[2,12] 
  CHECKTYPE NORMAL
  MESSAGE EMPTY CLEAR,FC_LIV3|CHECK,FC_LIV3
  MESSAGE ENABLE,FC_LIV3
END

STRING FC_LIV3 10
BEGIN
  PROMPT 41 3  ""
  FLAGS "UH"
  USE GCG 
  INPUT CODTAB[1,1] "3" 
  INPUT CODTAB[2,11] FC_LIV3
  DISPLAY "Gruppo@20" CODTAB[2,20]
  DISPLAY "Descr.@30" S0
  OUTPUT FC_LIV3 CODTAB[2,12] 
  CHECKTYPE NORMAL
  MESSAGE EMPTY CLEAR,FC_LIV4|CHECK,FC_LIV4
  MESSAGE ENABLE,FC_LIV4
END

STRING FC_LIV4 10
BEGIN
  PROMPT 56 3 ""
  FLAGS "UH"
  USE GCG 
  INPUT CODTAB[1,1] "4" 
  INPUT CODTAB[2,11] FC_LIV4
  DISPLAY "Gruppo@20" CODTAB[2,20]
  DISPLAY "Descr.@30" S0
  OUTPUT FC_LIV4 CODTAB[2,12] 
  CHECKTYPE NORMAL
END


STRING FC_CODIMP  5
BEGIN
  FLAGS "DG"
  PROMPT 1 4 "Impianto  "
  USE IMP
  INPUT  CODTAB     FC_CODIMP
  OUTPUT FC_CODIMP  CODTAB
  OUTPUT FC_DESCIMP S0
END

STRING FC_DESCIMP 35
BEGIN
  FLAGS "D"
  PROMPT 24 4 ""
END

STRING FC_CODLIN  5
BEGIN
  FLAGS "DG"
  PROMPT 1 5  "Linea     "
  INPUT  CODTAB    FC_CODLIN
  OUTPUT FC_CODLIN CODTAB
  OUTPUT FC_DESCLIN S0
END

STRING FC_DESCLIN 35
BEGIN
  FLAGS "D"
  PROMPT 24 5 ""
END

STRING FC_CODMAG  3
BEGIN
  FLAGS "D"
  PROMPT 1 6  "Magazzino "
END

STRING FC_CODDEP  2
BEGIN
  FLAGS "D"
  PROMPT 16 6  ""
  USE MAG
  INPUT CODTAB[1,3]  FC_CODMAG 
  INPUT CODTAB[4,5]  FC_CODDEP
  OUTPUT FC_DESCMAG S0
END

STRING FC_DESCMAG 35
BEGIN
  FLAGS "D"
  PROMPT 24 6 ""
END

BOOL FC_IS_VINCOLO
BEGIN
  FLAGS "HG"
  PROMPT 0 0 ""
  MESSAGE FALSE SHOW,G_ARTICOLI@//|HIDE,G_VINCOLI@
  MESSAGE TRUE  HIDE,G_ARTICOLI@//|SHOW,G_VINCOLI@
END

TEXT DLG_NULL
BEGIN
  PROMPT 24 7  "@bARTICOLO"
  GROUP G_ARTICOLI
END
TEXT DLG_NULL
BEGIN
  PROMPT 60 7 "@bVINCOLO"
END

TEXT DLG_NULL
BEGIN
  PROMPT 1  8 "Q.ta attuale    "
  GROUP G_ARTICOLI
END
NUMBER FC_FINAL_VALUE    17 2
BEGIN
  FLAGS "D"
  PROMPT 19  8 ""
  GROUP G_ARTICOLI
END

NUMBER FC_PROPOSED_VALUE 17 2
BEGIN
  FLAGS "D"
  PROMPT 1  9 "@bQ.ta proposta     "
  GROUP G_ARTICOLI
END

TEXT DLG_NULL
BEGIN
  PROMPT 1 10 "Q.ta iniziale   "
  GROUP G_ARTICOLI
END
NUMBER FC_STARTING_VALUE 17 2
BEGIN
  FLAGS "D"
  PROMPT 19 10 ""
  GROUP G_ARTICOLI
END

NUMBER HC_GIAC    17 2
BEGIN
  FLAGS "HG"
  PROMPT 56  8 ""
END

TEXT DLG_NULL
BEGIN
  PROMPT 40  8 "Giacenza        "
END

NUMBER FC_GIAC    17 2
BEGIN
  FLAGS "D"
  PROMPT 56  8 ""
END

NUMBER FC_UNDERSTOCK    17 2
BEGIN
  FLAGS "D"    
  PROMPT 40  9 "@bSotto scorta    "
END

NUMBER FC_GIORNIGIAC    17 2
BEGIN
  FLAGS "D"
  PROMPT 40 10 "Giorni          "
END
NUMBER FC_OVERGIORNIGIAC    17 2
BEGIN
  FLAGS "D"
  PROMPT 40 10 "@bGiorni          "
END

GROUPBOX DLG_NULL 80 10
BEGIN
  PROMPT 0 13 ""
END

TEXT DLG_NULL
BEGIN
  PROMPT 9 14 "@bMovimento"
END

LIST FC_MOVEFILTER 20
BEGIN
  PROMPT 2 15 ""
  ITEM "|Articoli e vincoli"
  ITEM "A|Solo linee articolo"
  ITEM "C|Solo linee vincolo"
END

TEXT DLG_NULL
BEGIN
  PROMPT 39 14 "@bRicerca"
END

LIST FC_FINDFILTER 28
BEGIN
  PROMPT 30 15 ""
  ITEM "8|Sotto scorta"
  MESSAGE HIDE,FC_ARTICLE2FIND|SHOW,G_BUCKETRANGE@
  ITEM "12|Anomalie"
  MESSAGE HIDE,FC_ARTICLE2FIND|SHOW,G_BUCKETRANGE@
  ITEM "4|Eccessiva permanenza"
  MESSAGE HIDE,FC_ARTICLE2FIND|SHOW,G_BUCKETRANGE@
  ITEM "14|Anomalie e nuove proposte"
  MESSAGE HIDE,FC_ARTICLE2FIND|SHOW,G_BUCKETRANGE@
  ITEM "15|Anomalie e modifiche"
  MESSAGE HIDE,FC_ARTICLE2FIND|SHOW,G_BUCKETRANGE@
  ITEM "13|Anomalie e modifiche manuali"
  MESSAGE HIDE,FC_ARTICLE2FIND|SHOW,G_BUCKETRANGE@
  ITEM "2|Nuove proposte"
  MESSAGE HIDE,FC_ARTICLE2FIND|SHOW,G_BUCKETRANGE@
  ITEM "3|Modifiche"
  MESSAGE HIDE,FC_ARTICLE2FIND|SHOW,G_BUCKETRANGE@
  ITEM "1|Modifiche manuali"
  MESSAGE HIDE,FC_ARTICLE2FIND|SHOW,G_BUCKETRANGE@
  ITEM "-1|Articoli per codice"
  MESSAGE SHOW,FC_ARTICLE2FIND|HIDE,G_BUCKETRANGE@
  ITEM "-2|Articoli non master"
  MESSAGE HIDE,FC_ARTICLE2FIND|HIDE,G_BUCKETRANGE@
END

NUMBER FC_MINBUCK2CHECK 2
BEGIN
  PROMPT 30 16 "Dal bucket "
  GROUP G_BUCKETRANGE
END

NUMBER FC_MAXBUCK2CHECK 2
BEGIN
  PROMPT 45 16 "al bucket "
  GROUP G_BUCKETRANGE
END

STRING FC_ARTICLE2FIND 20
BEGIN
  PROMPT 30 17 "Codice "
  FLAGS "U"
  USE LF_ANAMAG
  INPUT CODART FC_ARTICLE2FIND
  DISPLAY "Codice@20" CODART
  DISPLAY "Descrizione@50" DESCR
  OUTPUT FC_ARTICLE2FIND CODART
END


BUTTON FC_RIGHT_BAD 4 2
BEGIN
  PROMPT 46 19 ""
  PICTURE USER_BMP_ARROWRIGHT_RED
  GROUP G_MOVIMENTO  
END
BUTTON FC_DOWN_BAD 4 2
BEGIN
  PROMPT 40 20 ""
  PICTURE USER_BMP_ARROWDOWN_RED
  GROUP G_MOVIMENTO  
END
BUTTON FC_LEFT_BAD 4 2
BEGIN
  PROMPT 34 19 ""
  PICTURE USER_BMP_ARROWLEFT_RED
  GROUP G_MOVIMENTO  
END
BUTTON FC_UP_BAD 4 2
BEGIN
  PROMPT 40 18 ""
  PICTURE USER_BMP_ARROWUP_RED
  GROUP G_MOVIMENTO  
END

BUTTON FC_UPLEFT 4 2
BEGIN
  PROMPT 4 16 "<"
  PICTURE USER_BMP_ARROWUPLEFT
  GROUP G_MOVIMENTO  
END

BUTTON FC_UP 4 2
BEGIN
  PROMPT 10 16 "Su'"
  PICTURE USER_BMP_ARROWUP
  GROUP G_MOVIMENTO  
END

BUTTON FC_UPRIGHT 4 2
BEGIN
  PROMPT 16 16 ">"
  PICTURE USER_BMP_ARROWUPRIGHT
  GROUP G_MOVIMENTO  
END

BUTTON FC_RIGHT 4 2
BEGIN
  PROMPT 16 18 ">"
  PICTURE USER_BMP_ARROWRIGHT
END

BUTTON FC_DOWNRIGHT 4 2
BEGIN
  PROMPT 16 20 ">"
  PICTURE USER_BMP_ARROWDOWNRIGHT
  GROUP G_MOVIMENTO  
END

BUTTON FC_DOWN 4 2
BEGIN
  PROMPT 10 20 "Giu'"
  PICTURE USER_BMP_ARROWDOWN
  GROUP G_MOVIMENTO  
END

BUTTON FC_DOWNLEFT 4 2
BEGIN
  PROMPT 4 20 "<"
  PICTURE USER_BMP_ARROWDOWNLEFT
  GROUP G_MOVIMENTO  
END

BUTTON FC_LEFT 4 2
BEGIN
  PROMPT 4 18 "<"
  PICTURE USER_BMP_ARROWLEFT
END


BUTTON DLG_CANCEL 10 2
BEGIN
  PROMPT 60 20 ""
END


ENDPAGE

ENDMASK