// SHEET DI VE2400
#include "VE2400.H"
#define CODCORR 48
#define ANAMAG  47


PAGE "Pagina 1" 8 5 65 14
  
STRING FS_CODARTALT 30 
BEGIN
  PROMPT 3 3 "Codice art. alt.  "
  FIELD CODCORR->CODARTALT
  USE ANAMAG 
  INPUT  CODART FS_CODARTALT
  DISPLAY "Codice" CODART
  DISPLAY "Descrizione@50" DESCR 
  OUTPUT FS_CODARTALT CODART  
//  OUTPUT FS_CODARTALT1 DESCR
 END

LISTBOX FS_TIPO 10
BEGIN
  PROMPT 2 7 "Tipo di codice  "
  ITEM "N|Normal "  
  ITEM "8|EAN8   "  
  ITEM "1|EA13   "
  ITEM "3|3/9    "
  ITEM "C|Codabar"

  FIELD CODCORR->TIPO 
END

/* STRING FS_CODARTALT1 50
BEGIN
  PROMPT 2 5 ""
  FLAG "D"
END

*/

BUTTON 1 9 2
BEGIN
  PROMPT  15 12 ""
END
 
BUTTON 2 9 2
BEGIN
  PROMPT  38 12 ""
END


ENDPAGE

ENDMASK