#include "fp0500a.h"

TOOLBAR "Relapbar" 0 0 0 2
#include <relapbar.h>
ENDPAGE

PAGE "Pag. 1" -1 -1 78 20

STRING F_CODICE 10
BEGIN
  PROMPT 1 1 "Codice "
  FIELD CODICE
  USE FPCUST
  INPUT CODICE F_CODICE
  DISPLAY "Codice" CODICE
  DISPLAY "Descrizione" DESCR
  OUTPUT F_CODICE CODICE
  OUTPUT F_DESCR DESCR
  CHECKTYPE REQUIRED
  KEY 1
END

STRING F_DESCR 50
BEGIN
  PROMPT 25 1 "Descrizione "
  FIELD DESCR
  USE FPCUST
  INPUT DESCR F_CODICE
  DISPLAY "Codice" CODICE
  DISPLAY "Descrizione" DESCR
  COPY OUTPUT F_CODICE
  CHECKTYPE REQUIRED
  KEY 2
END

SPREADSHEET F_CAUSALI 60 6
BEGIN
  PROMPT 1 3 "Causale"
  ITEM "Valore@50"
END

ENDPAGE

PAGE "Pag. 2" 0 2 0 0

SPREADSHEET F_ARTICOLI 80 6
BEGIN
  PROMPT 1 1 "Codice Articolo"
  ITEM "Tipo@50"
  ITEM "Valore@50"
END

SPREADSHEET F_ADG 0 6
BEGIN
  PROMPT 0 10 "Altri dati gestionali"
  ITEM "Tipo Dato@50"
  ITEM "Rif Testo@50"
  ITEM "Rif Numero@20"
  ITEM "Rif Data@20"
END

ENDPAGE
ENDMASK

PAGE "Riga Causale" -1 -1 60 12

STRING S_CAUS_VALORE 250 50
BEGIN
  PROMPT 1 1  "Valore "
  HELP "Valore da inserire nella causale"
END

ENDPAGE

TOOLBAR "Riga" 0 0 0 2

BUTTON DLG_OK 2 2 
BEGIN
  PROMPT 1 1 ""
END

BUTTON DLG_CANCEL 2 2 
BEGIN
  PROMPT 1 1 ""
END

ENDPAGE
ENDMASK

PAGE "Riga Articolo" -1 -1 60 12

STRING S_ART_TIPO 90 50
BEGIN
  PROMPT 1 1  "Tipo "
  HELP "Tag TipoArticolo"
END

STRING S_ART_VALORE 90 50
BEGIN
  PROMPT 1 1  "Valore "
  HELP "Tag ValoreArticolo"
END

ENDPAGE

TOOLBAR "Riga" 0 0 0 2

BUTTON DLG_OK 2 2 
BEGIN
  PROMPT 1 1 ""
END

BUTTON DLG_CANCEL 2 2 
BEGIN
  PROMPT 1 1 ""
END

ENDPAGE
ENDMASK

PAGE "Riga Altri Dati Gestionali" -1 -1 60 12

STRING S_ADG_TIPODATO 90 50
BEGIN
  PROMPT 1 1  "Tipo dato  "
  HELP "Tag 2.2.1.16.1 TipoDato"
END

STRING S_ADG_RTESTO 90 50
BEGIN
  PROMPT 1 2  "Rif testo  "
  HELP "Tag 2.2.1.16.2 RiferimentoTesto"
END

NUMBER S_ADG_RNUMERO 18 5
BEGIN
  PROMPT 1 3  "Rif numero "
  HELP "Tag 2.2.1.16.3 RiferimentoNumero"
END

DATE S_ADG_RDATA
BEGIN
  PROMPT 1 4  "Rif data   "
  HELP "Tag 2.2.1.16.4 RiferimentoData"
END

ENDPAGE

TOOLBAR "Riga" 0 0 0 2

BUTTON DLG_OK 2 2 
BEGIN
  PROMPT 1 1 ""
END

BUTTON DLG_CANCEL 2 2 
BEGIN
  PROMPT 1 1 ""
END

ENDPAGE
ENDMASK