// SHEET DI VE2400
#include "VE2400.H"
#define DESLIN 51


PAGE "Pagina 1" 8 5 65 14
  
STRING FS_CODLIN 1 
BEGIN
  PROMPT 3 3 "Codice lingua  "
  FIELD DESLIN->CODLIN
  USE %LIN
  INPUT  CODTAB FS_CODLIN
  DISPLAY "Codice" CODTAB
  DISPLAY "Descrizione@30" S0 
  OUTPUT FS_CODLIN CODTAB  
//  OUTPUT FS_CODLIN1  S0
 END

 STRING FS_DESCR 50
BEGIN
  PROMPT 1 7 "Descrizione "
  FIELD DESLIN->DESCR 
END

/*
STRING FS_CODLIN1 30
BEGIN
  PROMPT 1 5 ""
  FLAG "D"
END

*/
BUTTON 1 9 2
BEGIN
  PROMPT  15 12 ""
END

BUTTON 2 9 2
BEGIN
  PROMPT  38 12 ""
END


 
ENDPAGE

ENDMASK