#include <batb%clr.h>

TOOLBAR "" 0 20 0 2

#include <toolbar.h>

ENDPAGE

PAGE "Ulteriore classificazione" -1 -1 78 13

STRING F_CODICERATA 1 
BEGIN
  PROMPT 4 1 "Codice      "
  FIELD %CLR->CODTAB[1,1]
  SHEET "Cod|Descrizione@60"
  INPUT F_CODICERATA
  OUTPUT F_CODICERATA
  ITEM " |Totale documento ripartito tra tutte le rate"
  ITEM "1|Tutte le imposte sulla prima rata"
  ITEM "2|Tutte le spese sulla prima rata"
  ITEM "3|Imposte e spese sulla prima rata"
  ITEM "4|Spese e merce sulla prima rata, l'imposta su tutte le altre"
  ITEM "5|Merce e imposte sulla prima rata, le spese su tutte le altre"
  ITEM "6|La merce sulla prima rata, imposte e spese su tutte le altre"
END 

STRING F_CODICEALFA 1
BEGIN
  PROMPT 20 1 ""
  FIELD %CLR->CODTAB[2,2]
  KEY 1
  USE %CLR
  INPUT CODTAB[1,1] F_CODICERATA
  INPUT CODTAB[2,2] F_CODICEALFA
  DISPLAY "Codice" CODTAB
  DISPLAY "Descrizione@50" S0
  OUTPUT F_CODICERATA CODTAB[1,1]
  OUTPUT F_CODICEALFA CODTAB[2,2]
  OUTPUT F_DESCR S0
  HELP "Inserire il codice dell' ulteriore classificazione"
  CHECKTYPE REQUIRED
END

STRING F_DESCR 50
BEGIN
  PROMPT 4 3 "Descrizione "
  FIELD %CLR->S0
  USE %CLR
  INPUT S0 F_DESCR
  DISPLAY "Descrizione@50" S0
  DISPLAY "Codice" CODTAB
  OUTPUT F_CODICERATA CODTAB[1,1]
  OUTPUT F_CODICEALFA CODTAB[2,2]
  OUTPUT F_DESCR S0
  HELP "Inserire la descrizione dell' ulteriore classificazione"
END

ENDPAGE

ENDMASK