campo-sirio/sc/sc2100a.uml

#include "scselmsk.h"
#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 
  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

NUMBER F_CODPROF 4
BEGIN 
  PROMPT 1 8 "Profilo "   
  FLAGS "Z"
  USE LF_FORM
  INPUT TIPOPROF BASE_EC_PROFILE
  INPUT CODPROF[1,4] F_CODPROF 
  INPUT CODPROF[5,5] F_LINPROF
  DISPLAY "Codice" CODPROF
  DISPLAY "Descrizione@50" DESC
  OUTPUT F_CODPROF CODPROF[1,4]
  OUTPUT F_LINPROF CODPROF[5,5]
  OUTPUT F_DESPROF DESC 
  CHECKTYPE REQUIRED
END

STRING F_LINPROF 1
BEGIN 
  PROMPT 18 8 ""   
  USE %LNG
  INPUT CODTAB F_LINPROF
  DISPLAY "Codice" CODTAB
  DISPLAY "Descrizione@50" S0
  OUTPUT F_LINPROF CODTAB
  CHECKTYPE NORMAL
END

STRING F_DESPROF 50 40
BEGIN 
  PROMPT 25 8 ""
  FLAGS "D"
END


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

DATE F_DATALIMSC
BEGIN                                 
  PROMPT 1 10 "Data limite scaduto     "
  FLAGS "A"
  CHECKTYPE REQUIRED
END

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

BOOLEAN F_STAMPCHIU
BEGIN 
  PROMPT 1 12 "Stampa partite chiuse" 
  MESSAGE FALSE DISABLE,F_DATACHIU
  MESSAGE TRUE ENABLE,F_DATACHIU
END

DATE F_DATACHIU
BEGIN 
  PROMPT 25 12 "dal "
  FLAGS "D"
END

STRING F_LUOGOSEND 50 32
BEGIN 
  PROMPT 1 13 "Luogo d'invio "
END

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


RADIOBUTTON SC_CLIFO 20
BEGIN 
  PROMPT 1 2 "Selezione"   
  ITEM "C|Clienti"   MESSAGE ENABLE,1@
  ITEM "F|Fornitori" MESSAGE CLEAR,1@
END

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

BUTTON SC_SELECT 10 1
BEGIN 
  PROMPT 51 3 "~Selezione"
END

BUTTON SC_RESET 10 1
BEGIN 
  PROMPT 51 4 "~Azzera"
END

NUMBER SC_CFCODFR 5
BEGIN 
  PROMPT 1 6 "Da codice               "
END

NUMBER SC_CFCODTO 5
BEGIN 
  PROMPT 36 6  "a codice "
END
 
NUMBER SC_NSEL 3
BEGIN
  PROMPT 56 6 "N. "
  FLAGS "D"
END          
          
BUTTON SC_CFBUTFR 2 1
BEGIN  
  PROMPT 31 6 ""
  PICTURE 109
END

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


BUTTON DLG_PRINT 10 2
BEGIN
  PROMPT -12 -1 ""
  MESSAGE EXIT,K_ENTER
END

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


ENDPAGE
ENDMASK