#include "batbnum.h"

TOOLBAR "" 0 20 60 2

   #include "toolbar.h"

ENDPAGE

PAGE "Numerazione documenti" -1 -1 60 14

   GROUPBOX DLG_NULL 75 7
   BEGIN
      PROMPT 1 0 ""
      FLAG "R"
   END

// GROUPBOX DLG_NULL 84 13
// BEGIN
//    PROMPT 1 5 ""
      // FLAG "R"
// END

   STRING F_CODTAB 4
   BEGIN
      PROMPT 2 2 "Cod. numerazione "
      FIELD CODTAB
      HELP "Codice numerazione"
      USE NUM
      CHECKTYPE REQUIRED
      INPUT CODTAB F_CODTAB
      DISPLAY "Codice" CODTAB
      DISPLAY "Descrizione@50" S0
      OUTPUT F_CODTAB CODTAB
      OUTPUT F_DESNUM S0
      KEY 1
      FLAG "UZ"
   END

   STRING F_DESNUM 50
   BEGIN
      PROMPT 2 4 "Descrizione      "
      FIELD S0
      HELP "Descrizione numerazione"
      USE NUM KEY 2
      CHECKTYPE REQUIRED
      INPUT S0 F_DESNUM
      DISPLAY "Codice" CODTAB
      DISPLAY "Descrizione@50" S0
      OUTPUT F_CODTAB CODTAB
      OUTPUT F_DESNUM S0
      KEY 2
   END

   STRING F_PREFISSO 7
   BEGIN
      PROMPT 2 8 "Prefisso per la numerazione "
      FIELD S6
   END

   STRING F_SUFFISSO 7
   BEGIN
      PROMPT 2 10 "Suffisso per la numerazione "
      FIELD S7
   END

   BOOLEAN F_NUMPROVV
   BEGIN
      PROMPT 2 12 "Utilizzo della numerazione provvisoria"
      FIELD B0
   END

   BOOLEAN F_NUMAUTO
   BEGIN
      PROMPT 2 14 "Utilizzo della numerazione automatica"
      FIELD B1
   END

ENDPAGE

PAGE "Numerazioni documenti pag.2" -1 -1 60 14

   GROUPBOX DLG_NULL 64 15
   BEGIN
      PROMPT 1 1 ""
      // FLAG "R"
   END

        TEXT DLG_NULL
        BEGIN
           PROMPT 2 2 "Tipi di documento validi per la numerazione"
        END

   STRING F_TIPODOC1 4
   BEGIN
      PROMPT 2 4 ""
                USE %TIP
                INPUT CODTAB F_TIPODOC1
                DISPLAY "Codice" CODTAB
      DISPLAY "Descrizione@50" S0
      OUTPUT F_TIPODOC1 CODTAB
      OUTPUT F_DESDOC1 S0
      HELP "Tipo di documento 1"
      FIELD S2[1,4]
      CHECKTYPE NORMAL
   END

        STRING F_DESDOC1 40
        BEGIN
           PROMPT 12 4 ""
           FLAG "D"
        END

   STRING F_TIPODOC2 4
   BEGIN
      PROMPT 2 5 ""
                USE %TIP
                INPUT CODTAB F_TIPODOC2
                DISPLAY "Codice" CODTAB
      DISPLAY "Descrizione@50" S0
      OUTPUT F_TIPODOC2 CODTAB
      OUTPUT F_DESDOC2 S0
      HELP "Tipo di documento 2"
      FIELD S2[5,8]
      CHECKTYPE NORMAL
   END

        STRING F_DESDOC2 40
        BEGIN
           PROMPT 12 5 ""
           FLAG "D"
        END

   STRING F_TIPODOC3 4
   BEGIN
      PROMPT 2 6 ""
                USE %TIP
                INPUT CODTAB F_TIPODOC3
                DISPLAY "Codice" CODTAB
      DISPLAY "Descrizione@50" S0
      OUTPUT F_TIPODOC3 CODTAB
      OUTPUT F_DESDOC3 S0
      HELP "Tipo di documento 3"
      FIELD S2[9,12]
      CHECKTYPE NORMAL
   END

        STRING F_DESDOC3 40
        BEGIN
           PROMPT 12 6 ""
           FLAG "D"
        END

   STRING F_TIPODOC4 4
   BEGIN
      PROMPT 2 7 ""
                USE %TIP
                INPUT CODTAB F_TIPODOC4
                DISPLAY "Codice" CODTAB
      DISPLAY "Descrizione@50" S0
      OUTPUT F_TIPODOC4 CODTAB
      OUTPUT F_DESDOC4 S0
      HELP "Tipo di documento 4"
      FIELD S2[13,16]
      CHECKTYPE NORMAL
   END

        STRING F_DESDOC4 40
        BEGIN
           PROMPT 12 7 ""
           FLAG "D"
        END

   STRING F_TIPODOC5 4
   BEGIN
      PROMPT 2 8 ""
                USE %TIP
                INPUT CODTAB F_TIPODOC5
                DISPLAY "Codice" CODTAB
      DISPLAY "Descrizione@50" S0
      OUTPUT F_TIPODOC5 CODTAB
      OUTPUT F_DESDOC5 S0
      HELP "Tipo di documento 5"
      FIELD S2[17,20]
      CHECKTYPE NORMAL
   END

        STRING F_DESDOC5 40
        BEGIN
           PROMPT 12 8 ""
           FLAG "D"
        END

   STRING F_TIPODOC6 4
   BEGIN
      PROMPT 2 9 ""
                USE %TIP
                INPUT CODTAB F_TIPODOC6
                DISPLAY "Codice" CODTAB
      DISPLAY "Descrizione@50" S0
      OUTPUT F_TIPODOC6 CODTAB
      OUTPUT F_DESDOC6 S0
      HELP "Tipo di documento 6"
      FIELD S2[21,24]
      CHECKTYPE NORMAL
   END

        STRING F_DESDOC6 40
        BEGIN
           PROMPT 12 9 ""
           FLAG "D"
        END

   STRING F_TIPODOC7 4
   BEGIN
      PROMPT 2 10 ""
                USE %TIP
                INPUT CODTAB F_TIPODOC7
                DISPLAY "Codice" CODTAB
      DISPLAY "Descrizione@50" S0
      OUTPUT F_TIPODOC7 CODTAB
      OUTPUT F_DESDOC7 S0
      HELP "Tipo di documento 7"
      FIELD S2[25,28]
      CHECKTYPE NORMAL
   END

        STRING F_DESDOC7 40
        BEGIN
           PROMPT 12 10 ""
           FLAG "D"
        END

   STRING F_TIPODOC8 4
   BEGIN
      PROMPT 2 11 ""
                USE %TIP
                INPUT CODTAB F_TIPODOC8
                DISPLAY "Codice" CODTAB
      DISPLAY "Descrizione@50" S0
      OUTPUT F_TIPODOC8 CODTAB
      OUTPUT F_DESDOC8 S0
      HELP "Tipo di documento 8"
      FIELD S2[29,32]
      CHECKTYPE NORMAL
   END

        STRING F_DESDOC8 40
        BEGIN
           PROMPT 12 11 ""
           FLAG "D"
        END

   STRING F_TIPODOC9 4
   BEGIN
      PROMPT 2 12 ""
                USE %TIP
                INPUT CODTAB F_TIPODOC9
                DISPLAY "Codice" CODTAB
      DISPLAY "Descrizione@50" S0
      OUTPUT F_TIPODOC9 CODTAB
      OUTPUT F_DESDOC9 S0
      HELP "Tipo di documento 9"
      FIELD S2[32,36]
      CHECKTYPE NORMAL
   END

        STRING F_DESDOC9 40
        BEGIN
           PROMPT 12 12 ""
           FLAG "D"
        END

   STRING F_TIPODOC10 4
   BEGIN
      PROMPT 2 13 ""
                USE %TIP
                INPUT CODTAB F_TIPODOC10
                DISPLAY "Codice" CODTAB
      DISPLAY "Descrizione@50" S0
      OUTPUT F_TIPODOC10 CODTAB
      OUTPUT F_DESDOC10 S0
      HELP "Tipo di documento 10"
      FIELD S2[37,40]
      CHECKTYPE NORMAL
   END

        STRING F_DESDOC10 40
        BEGIN
           PROMPT 12 13 ""
           FLAG "D"
        END

ENDMASK