#include "sc2100a.h"

PAGE "Stampa estratti conto" -1 -1 68 17

NUMBER F_CODDITTA 5
BEGIN 
  PROMPT 1 1 "Cod. "
  FLAGS "DFR" 
  USE LF_NDITTE KEY 1 
  INPUT CODDITTA F_CODDITTA 
  OUTPUT F_RAGSOC RAGSOC 
  CHECKTYPE REQUIRED 
END

STRING F_RAGSOC 50 46
BEGIN 
  PROMPT 13 1 "R.S. "
  FLAGS "D"
END

GROUPBOX DLG_NULL 68 8
BEGIN
   PROMPT 0 7 ""
END

STRING F_PROFBASE 8
BEGIN 
  PROMPT 1 8 "Profilo base"   
  USE LF_FORM KEY 1 SELECT (CODPROF="")&&(TIPOPROF[1,3]=BASE_EC_PROFILE)
  DISPLAY "Codice@9"       TIPOPROF
  DISPLAY "Descrizione@50" DESC
  INPUT  TIPOPROF F_PROFBASE 
  OUTPUT F_PROFBASE TIPOPROF 
  OUTPUT F_DESPROF DESC 
  HELP ""
  FLAGS ""
  CHECKTYPE REQUIRED
END

STRING F_CODPROF 5
BEGIN 
  PROMPT 25 8 ""   
  USE LF_FORM KEY 1 SELECT CODPROF!=""
  DISPLAY "Codice"         CODPROF
  DISPLAY "Descrizione@50" DESC
  INPUT TIPOPROF F_PROFBASE SELECT
  INPUT CODPROF F_CODPROF 
//  OUTPUT F_PROFBASE TIPOPROF 
  OUTPUT F_CODPROF  CODPROF 
  OUTPUT F_DESPROF  DESC 
  HELP ""
  FLAGS ""          
  CHECKTYPE NORMAL
END

STRING F_DESPROF 50 30
BEGIN 
  PROMPT 34 8 " "
  HELP ""
  FLAGS "D"
END


DATE D_DATALIMOP
BEGIN 
  PROMPT 1 9 "Data limite operazione  "
  HELP ""
  FLAGS "A"  
  CHECKTYPE REQUIRED
END

DATE D_DATALIMSC
BEGIN                                 
  PROMPT 1 10 "Data limite scaduto     "
  HELP ""
  FLAGS ""
  CHECKTYPE REQUIRED
END

NUMBER F_GIORISCH 3
BEGIN 
  PROMPT 1 11 "Giorni calcolo rischio  "
  HELP ""
  FLAGS ""
END

BOOLEAN B_STAMPCHIU
BEGIN 
  PROMPT 1 12 "Stampa partite chiuse" 
  MESSAGE TRUE ENABLE,D_DATACHIU
  MESSAGE FALSE DISABLE,D_DATACHIU
  HELP ""
  FLAGS ""
END

DATE D_DATACHIU
BEGIN 
  PROMPT 25 12 "dal "
  HELP ""
  FLAGS ""
END

STRING F_COMSEND 5
BEGIN 
  PROMPT 1 13 "Luogo d'invio "
  USE LF_COMUNI KEY 1
  INPUT  COM    F_COMSEND
  INPUT  DENCOM F_LUOGOSEND
  DISPLAY "Codice" COM 
  DISPLAY "Descrizione@50" DENCOM
  OUTPUT F_COMSEND  COM
  OUTPUT F_LUOGOSEND DENCOM
//  CHECKTYPE NORMAL
END

STRING F_LUOGOSEND 50 20
BEGIN 
  PROMPT 24 13 ""
  USE LF_COMUNI KEY 2
  INPUT  DENCOM F_LUOGOSEND
  INPUT  COM    F_COMSEND
  DISPLAY "Descrizione@50" DENCOM
  DISPLAY "Codice" COM 
  OUTPUT F_COMSEND  COM
  OUTPUT F_LUOGOSEND DENCOM
//  CHECKTYPE NORMAL
END

DATE D_DATASEND
BEGIN 
  PROMPT 50 13 "data "
  HELP ""
  FLAGS "A" 
  CHECKTYPE REQUIRED
END


BUTTON B_SELECT 10 1
BEGIN 
  PROMPT 51 3 "~Selezione"
  HELP ""
  FLAGS ""
END

BUTTON B_RESET 10 1
BEGIN 
  PROMPT 51 4 "~Azzera"
  HELP ""
  FLAGS ""
END

RADIOBUTTON R_CLIFO 20
BEGIN 
  PROMPT 1 2 "Selezione"   
  ITEM "1|Clienti"
  ITEM "2|Fornitori"
  HELP ""
  FLAGS ""
END

RADIOBUTTON R_SORTCF 20
BEGIN 
  PROMPT 25 2 "Ordinamento" 
  ITEM "1|Per codice"
  ITEM "2|Per ragione sociale"
  HELP ""
  FLAGS ""
END

NUMBER F_CFCODFR 5
BEGIN 
  PROMPT 1 6 "Da codice               "
  HELP ""
  FLAGS ""
END

NUMBER F_CFCODTO 5
BEGIN 
  PROMPT 36 6  "a codice "
  HELP ""
  FLAGS ""
END
 
NUMBER F_NSEL 3
BEGIN
  PROMPT 56 6 "N. "
  FLAGS "D"
END          
          
BUTTON B_CFCODFR 2 1
BEGIN  
  PROMPT 31 6 ""
  PICTURE 109
END

BUTTON B_CFCODTO 2 1
BEGIN 
  PROMPT 51 6 ""
  PICTURE 109
END


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

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


ENDPAGE
ENDMASK