#include "sc0300a.h"

PAGE "Assegnamento" -1 -1 75 12

STRING F_CODVAL 3
BEGIN
  PROMPT 41 0 "Valuta"
  FLAGS "D"
END

CURRENCY F_IMPORTO 15
BEGIN
  PROMPT 1 0 "Importo da suddividere "
  DRIVENBY F_CODVAL
  FLAGS "D"
END

SPREADSHEET F_TUTTE 
BEGIN
  PROMPT 0 1 ""
  ITEM "Importo\nnota credito@15R"
  ITEM "Scadenza\nrata@10"
  ITEM "Residuo\nrata@15R"
  ITEM "Importo\nrata@15R"
END

ENDPAGE

TOOLBAR "" -2 0 0 2

BUTTON DLG_OK 2 2 
BEGIN
  PROMPT 1 1 ""
END

BUTTON DLG_CANCEL 2 2 
BEGIN
  PROMPT 2 1 ""
END

ENDPAGE

ENDMASK

PAGE "Riga 1" -1 -1 40 5

CURRENCY 101 15
BEGIN
  PROMPT 1 1 "Importo nota credito "
  DRIVENBY -F_CODVAL
  NUM_EXPR #THIS_FIELD>=0
  WARNING "Inserire un importo positivo"
END

DATE 102
BEGIN
  PROMPT 1 4 "Data scadenza        "
  FLAGS "D"
END

CURRENCY 103 15
BEGIN
  PROMPT 1 2 "Residuo rata         "
  FLAGS "D"
  DRIVENBY -F_CODVAL
END

CURRENCY 104 15
BEGIN
  PROMPT 1 3 "Importo rata         "
  FLAGS "D"
  DRIVENBY -F_CODVAL
END

ENDPAGE

TOOLBAR "" -2 0 0 2

BUTTON DLG_OK 2 2 
BEGIN
  PROMPT 1 1 ""
END

BUTTON DLG_CANCEL 2 2 
BEGIN
  PROMPT 2 1 ""
END

ENDPAGE

ENDMASK