campo-sirio/ps/pd6292100a.uml

#include "pd6292100.h"

TOOLBAR "" 0 0 0 2

BUTTON DLG_EDIT 10 2
BEGIN
  PROMPT -25 -1 "~Edit"
  MESSAGE EXIT,69
  PICTURE TOOL_EDIT
END

#include <printbar.h>

ENDPAGE

PAGE "Stampa Previsione Incassi/PagamentI" 0 0 0 0

NUMBER F_CODDITTA 5
BEGIN
  PROMPT 2 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 14 1 "R.S. "
  FLAGS "D"
END

GROUPBOX DLG_NULL 68 7
BEGIN
   PROMPT 1 2 ""
END

DATE F_DATASTAMPA
BEGIN
  PROMPT 2 3 "Data di stampa             "
  HELP "Data di stampa"
  CHECKTYPE REQUIRED
  WARNING "Si deve specificare la data di stampa"
  FLAGS "A"
END

DATE F_DATAOPERAZIONE
BEGIN
  PROMPT 2 4 "Data limite operazione     "
  HELP "Data limite operazione"
  CHECKTYPE REQUIRED
  MESSAGE COPY,F_DATASCADUTO
  FLAGS "A"
END

DATE F_DATASCADUTO
BEGIN
  PROMPT 2 5 "Data limite scaduto        "
  HELP "Data limite scaduto"
  FLAGS "H"
  WARNING "Data limite scaduto non valida"
END

NUMBER F_GIORNI 3
BEGIN
  PROMPT 2 6 "Giorni per calcolo rischio "
  HELP "Inserire il numero di giorni per il calcolo del rischio"
END

BOOLEAN F_VALUTA
BEGIN
  PROMPT 2 7 "Stampa in valuta"
  HELP "Selezionare se si vuole la stampa in valuta"
END

RADIOBUTTON SC_CLIFO 20
BEGIN
  PROMPT 1 9 "Selezione"
  ITEM "C|Clienti" MESSAGE ENABLE, F_GIORNI|K_SPACE,SC_SORTCF
  ITEM "F|Fornitori" MESSAGE DISABLE, F_GIORNI|K_SPACE,SC_SORTCF
  //ITEM "P|Conti" MESSAGE DISABLE, F_GIORNI|K_SPACE,SC_SORTCF
END

RADIOBUTTON SC_SORTCF 29
BEGIN
  GROUP 1
  PROMPT 23 9 "Ordinamento"
  ITEM "1|Per codice/conto"
  ITEM "2|Per rag.soc./descrizione"
END

BUTTON SC_SELECT 10 1
BEGIN
  PROMPT 55 10 "S~elezione"
END

BUTTON SC_RESET 10 1
BEGIN
  PROMPT 55 11 "A~zzera"
END

NUMBER SC_CFCODFR 6
BEGIN
  PROMPT 2 14 "Da codice               "
  FLAGS "B"
  GROUP 3
END

NUMBER SC_CFCODTO 6
BEGIN
  PROMPT 37 14  "a codice "
  FLAGS "B"
  GROUP 3
END

STRING SC_CFDESFR  50 40
BEGIN
  PROMPT 2 14 "Da ragione sociale "
  GROUP 4
  FLAGS "HB"
END

STRING SC_CFDESTO 50 40
BEGIN
  PROMPT 2 15 "A ragione sociale  "
  GROUP 4
  FLAGS "HB"
END

NUMBER SC_PCONCODFR1 3
BEGIN
  PROMPT 2 14 "Da conto "
  GROUP 5
END

NUMBER SC_PCONCODFR2 3
BEGIN
  PROMPT 15 14 ""
  GROUP 5
END

NUMBER SC_PCONCODFR3 6
BEGIN
  PROMPT 19 14 ""
  FLAGS "B"
  GROUP 5
END

NUMBER SC_PCONCODTO1 3
BEGIN
  PROMPT 31 14  "a conto "
  GROUP 5
END

NUMBER SC_PCONCODTO2 3
BEGIN
  PROMPT 43 14  ""
  GROUP 5
END

NUMBER SC_PCONCODTO3 6
BEGIN
  PROMPT 47 14  ""
  FLAGS "B"
  GROUP 5
END

STRING SC_PCONDESFR  50 40
BEGIN
  PROMPT 2 14 "Da descrizione     "
  GROUP 6
  FLAGS "HB"
END

STRING SC_PCONDESTO 50 40
BEGIN
  PROMPT 2 15 "A descrizione      "
  GROUP 6
  FLAGS "HB"
END

NUMBER SC_NSEL 3
BEGIN
  PROMPT 60 13 "N. "
  FLAGS "D"
END

BOOLEAN F_SCADINFASCE
BEGIN
	PROMPT 2 16 "Scaduto suddiviso in fasce"
	HELP "Selezionare se si vuole la stampa scaduto suddiviso in fasce"  
  MESSAGE TRUE ENABLE,10@
  MESSAGE FALSE RESET,10@|DISABLE,10@
END

TEXT DLG_NULL
BEGIN
	PROMPT 2 17 "Giorni fascia"
	GROUP 10
END

NUMBER F_SCADFASCE1 2
BEGIN
	PROMPT 20 17 "1 "
	GROUP 10
END

NUMBER F_SCADFASCE2 2
BEGIN
	PROMPT 25 17 "2 "
	GROUP 10
END

NUMBER F_SCADFASCE3 2
BEGIN
	PROMPT 30 17 "2 "
	GROUP 10
END

NUMBER F_SCADFASCE4 2
BEGIN
	PROMPT 35 17 "2 "
	GROUP 10
END

NUMBER F_SCADFASCE5 2
BEGIN
	PROMPT 40 17 "5 "
	GROUP 10
END

NUMBER F_SCADFASCE6 2
BEGIN
	PROMPT 45 17 "6 "
	GROUP 10
END

NUMBER F_SCADFASCE7 2
BEGIN
	PROMPT 50 17 "7 "
	GROUP 10
END

NUMBER F_SCADFASCE8 2
BEGIN
	PROMPT 55 17 "8 "
	GROUP 10
END

NUMBER F_SCADFASCE9 2
BEGIN
	PROMPT 60 17 "9 "
	GROUP 10
END

BOOLEAN F_ASCADINFASCE
BEGIN
	PROMPT 2 18 "A scadere suddiviso in fasce"
	HELP "Selezionare se si vuole la stampa a scadere suddiviso in fasce"
  MESSAGE TRUE ENABLE,11@
  MESSAGE FALSE RESET,11@|DISABLE,11@
END

TEXT DLG_NULL
BEGIN
	PROMPT 2 19 "Giorni fascia"
	GROUP 11
END

NUMBER F_ASCADFASCE1 2
BEGIN
	PROMPT 20 19 "1 "
	GROUP 11
END

NUMBER F_ASCADFASCE2 2
BEGIN
	PROMPT 25 19 "2 "
	GROUP 11
END

NUMBER F_ASCADFASCE3 2
BEGIN
	PROMPT 30 19 "3 "
	GROUP 11
END

NUMBER F_ASCADFASCE4 2
BEGIN
	PROMPT 35 19 "4 "
	GROUP 11
END

NUMBER F_ASCADFASCE5 2
BEGIN
	PROMPT 40 19 "5 "
	GROUP 11
END

NUMBER F_ASCADFASCE6 2
BEGIN
	PROMPT 45 19 "6 "
	GROUP 11
END

NUMBER F_ASCADFASCE7 2
BEGIN
	PROMPT 50 19 "7 "
	GROUP 11
END

NUMBER F_ASCADFASCE8 2
BEGIN
	PROMPT 55 19 "8 "
	GROUP 11
END

NUMBER F_ASCADFASCE9 2
BEGIN
	PROMPT 60 19 "9 "
	GROUP 11
END

STRING DLG_PROFILE 50
BEGIN
  PROMPT 2 -2 "Profilo "
  PSELECT
END

ENDPAGE
ENDMASK