campo-sirio/cg/cg6900a.uml

#include "cg6900a.h"

PAGE "Invio contabilita'" -1 -1 78 15

NUMBER F_DITTAINV 5
BEGIN
  PROMPT 2 1 "Codice ditta inviante  "
  FLAGS "ZG"
  CHECKTYPE REQUIRED
END

STRING F_RAGSOC 50
BEGIN
  PROMPT 2 2 "Ragione sociale        "
  FLAGS "D"
END

NUMBER F_NUMULINV 3
BEGIN
  PROMPT 2 4 "Numero ultimo invio    "
  FLAGS "RG"
END

DATE F_DATAULIN 
BEGIN
  PROMPT 45 4 "Data ultimo invio   "
END
            
STRING F_STATO 1
BEGIN
  PROMPT 2 6 "Stato ultimo "
END             

STRING F_USELAB 1
BEGIN
  PROMPT 19 6 ""
END

TEXT DLG_NULL
BEGIN
  PROMPT 2 7 "invio        "
END

STRING F_CHIAVE 60
BEGIN
  PROMPT 15 7 ""
END

DATE F_DATALIM
BEGIN
  PROMPT 2 9 "Data limite invio      "
  CHECKTYPE REQUIRED
END

NUMBER F_DITTAAS 4
BEGIN
  PROMPT 2 11 "Ditta da inviare a sistema   "
  FLAGS "H"  
  CHECKTYPE REQUIRED
END

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

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

ENDMASK