campo-sirio/cg/cg6803a.uml

#include "cg6800.h"

TOOLBAR "" 0 20 0 2

BUTTON DLG_OK 9 2
BEGIN 
  PROMPT -12 -1 ""
END

BUTTON DLG_QUIT 9 2
BEGIN
  PROMPT -22 -1 ""
END
                         
ENDPAGE

PAGE "Visualizzazione stato ricezione" -1 -1 78 19
     
NUMBER F_CODDITTARIC 5
BEGIN
  PROMPT 1 1 "Ditta ricevente "
  USE LF_NDITTE KEY 1
  INPUT CODDITTA F_CODDITTARIC
  OUTPUT F_RAGSOC RAGSOC
  FLAGS "RDZ"
  CHECKTYPE REQUIRED
END
            
STRING F_RAGSOC 50
BEGIN
  PROMPT 1 2 "Ragione sociale "
  FLAGS "D"
END

NUMBER F_NULTRAS 3
BEGIN
  PROMPT 1 4 "Numero ultimo invio ricevuto "
  FLAGS "G"
END

DATE F_DATAULTRAS 
BEGIN
  PROMPT 1 6 "Data ultimo invio ricevuto   "
  FLAGS "G"
END

STRING F_STD 1
BEGIN
  PROMPT 1 8 "Stato del       "
  FLAGS "GU"
END

STRING F_USELAB 1
BEGIN
  PROMPT 21 8 ""
  FLAGS "GU"
END

TEXT DLG_NULL
BEGIN
  PROMPT 1 9 "trasferimento  "
END

STRING F_STATO 60
BEGIN                                    
  PROMPT 17 9 ""
  FLAGS "GU"
END

LIST F_AGGCAUSALI 6
BEGIN           
  PROMPT 1 11 "Aggiornamento causali gia' presenti                "
  ITEM "N|No"
  ITEM "D|Descr."
  ITEM "T|Tutto"
  FLAGS "G"
END

LIST F_AGGCLIFO 6
BEGIN           
  PROMPT 1 12 "Aggiornamento Clienti/Fornitori gia' presenti      "
  ITEM "N|No"
  ITEM "D|Descr."
  ITEM "T|Tutto"
  FLAGS "G"
END

LIST F_AGGPCON 6
BEGIN           
  PROMPT 1 13 "Aggiornamento voci Piano dei Conti gia' presenti   "
  ITEM "N|No"
  ITEM "D|Descr."
  ITEM "T|Tutto"
  FLAGS "G"
END

LIST F_AGGIVD 6
BEGIN           
  PROMPT 1 14 "Aggiornamento classi Piano dei Conti               "
  ITEM "N|No"
  ITEM "T|Tutto"
  FLAGS "G"
END

BOOLEAN F_FATTEM 
BEGIN           
  PROMPT 1 15 "Riattribuzione num. protocollo su fatture emesse   "
  FLAGS "G"
END

BOOLEAN F_FATTRIC 
BEGIN           
  PROMPT 1 16 "Riattribuzione num. protocollo su fatture ricevute "
  FLAGS "G"
END

ENDPAGE

ENDMASK