// SHEET 1 (descrizioni in lingua) DI VE2400

PAGE "Pagina 1" 8 5 65 14
  
STRING FS_CODLIN 1 
BEGIN
  PROMPT 3 3 "Codice lingua  "
  FIELD LF_DESLIN->CODLIN
  USE %LNG
  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 LF_DESLIN->DESCR 
  VALIDATE REQIF_FUNC 1 FS_CODLIN
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