campo-sirio/ab/ab2100a.uml

#include "ab2100a.h"

TOOLBAR "" 0 19 0 3

BUTTON DLG_OK 10 2
BEGIN
  PROMPT -13 -11 ""
END        

BUTTON DLG_QUIT 10 2
BEGIN
  PROMPT -22 -11 ""
END

ENDPAGE

PAGE "Ricezione e Invio" -1 -1 0 20
            
GROUPBOX DLG_NULL 76 5
BEGIN
  PROMPT 1 0 ""
  FLAGS "R"
END
           
TEXT F_TESTO_PERCORSO
BEGIN
  PROMPT 2 1 "Percorso completo del file di testo:"
END

STRING F_PERCORSO 80 70
BEGIN
  PROMPT 2 3 ""
  FIELD PERCORSO
  CHECKTYPE REQUIRED
END           
                         
TEXT F_TESTO_SELEZIONE
BEGIN
  PROMT 2 7 "Selezionare le tabelle:"
END        
                 
LISTBOX F_TIPO_RICE 15
BEGIN
  PROMPT 2 5 "Tipo: "
  ITEM "1|WINDOWS"                             
    MESSAGE DISABLE,F_PERCORSO_UTENTE|DISABLE,F_TESTO_UTENTE|HIDE, F_TIPO_BILANCIO
  ITEM "2|AS400"
    MESSAGE DISABLE,F_PERCORSO_UTENTE|DISABLE,F_TESTO_UTENTE|SHOW, F_TIPO_BILANCIO
  ITEM "3|USER DEFINED"
    MESSAGE ENABLE,F_PERCORSO_UTENTE|DISABLE,F_TESTO_UTENTE|SHOW, F_TIPO_BILANCIO
END

TEXT F_TESTO_UTENTE
BEGIN
  PROMPT 2 17 "Percorso completo del file di configurazione:"
END

STRING F_PERCORSO_UTENTE 80 50
BEGIN
  PROMPT 2 18 ""
  FIELD PERCORSO
  CHECKTYPE REQUIRED
END                    

TEXT F_TESTO_TIPOBIL
BEGIN
  PROMPT 55 17 "Tipo bilancio"
END                          

STRING F_TIPO_BILANCIO 2 2
BEGIN
  PROMPT 60 18 ""    
  FLAG "DRU"
  KEY 1
  USE %NTB KEY 1
  INPUT %NTB->CODTAB F_TIPO_BILANCIO 
  DISPLAY "Cod@5" %NTB->CODTAB
  DISPLAY "Descrizione@40" %NTB->S0
  OUTPUT F_TIPO_BILANCIO %NTB->CODTAB
  CHECKTYPE REQUIRED
END
  
GROUPBOX DLG_NULL 76 10
BEGIN
  PROMPT 1 7 ""
  FLAGS "R"
END
  
BOOLEAN F_PIANO_CONTI
BEGIN
  PROMPT 2 9 "Piano dei conti"
  FLAG "D"
  GROUP 1
END                                          

BOOLEAN F_PERIODI_BILANCI
BEGIN
  PROMPT 2 11 "Tabella periodi di bilanci"
  FLAG "D"
  GROUP 1
END                                         

BOOLEAN F_ANALISI
BEGIN
  PROMPT 2 13 "Tabella analisi di bilancio"
  FLAG "D"
  GROUP 1
END                                          
  
BOOLEAN F_MOVIMENTI
BEGIN
  PROMPT 2 15 "Movimenti"
  MESSAGE TRUE ENABLE,F_TIPO_BILANCIO | COPY, F_SALDI
  FLAG "D"
  GROUP 1
END                                          

BOOLEAN F_SALDI
BEGIN
  PROMPT 40 9 "Saldi"
  MESSAGE TRUE ENABLE,F_TIPO_BILANCIO
  MESSAGE FALSE COPY, F_MOVIMENTI | DISABLE, F_TIPO_BILANCIO
  FLAG "D"
  GROUP 1
END                                          

BOOLEAN F_VOCI
BEGIN
  PROMPT 40 11 "Voci"
  MESSAGE TRUE COPY, F_RELAZ | COPY, F_SRELAZ
  MESSAGE FALSE COPY, F_RELAZ | COPY, F_SRELAZ
  GROUP 1
END           

BOOLEAN F_RELAZ
BEGIN
  PROMTP 40 13 "Relazioni"
  MESSAGE TRUE COPY, F_VOCI | COPY, F_SRELAZ
  MESSAGE FALSE COPY, F_VOCI | COPY, F_SRELAZ
  GROUP 1
END

BOOLEAN F_SRELAZ
BEGIN
  PROMPT 40 15 "Sottorelazioni"
  MESSAGE TRUE COPY, F_RELAZ | COPY, F_VOCI
  MESSAGE FALSE COPY, F_RELAZ | COPY, F_VOCI
  GROUP 1
END

ENDPAGE

ENDMASK