#include "cg1300.h"

PAGE "" -1 -1 70 8

NUMBER F_CODDITTA 5
BEGIN
    PROMPT 1 1 "Ditta             "
    FLAGS "FRD"
    USE LF_NDITTE KEY 1  
    CHECKTYPE REQUIRED
    INPUT CODDITTA F_CODDITTA
    OUTPUT F_CODDITTA CODDITTA
    OUTPUT F_RAGSOC RAGSOC                  
END

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

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

BUTTON DLG_CANCEL 10 2
BEGIN
 PROMPT -22 -1 ""  
END

ENDPAGE

ENDMASK