campo-sirio/cm/cm0100a.frm

#include "cm0100.h"

GENERAL
BEGIN
  OFFSET 0 0
  FONT "Courier New"
  SIZE 12
	GRID ""
END

// intestazione generale stampa conti per commessa
SECTION HEADER FIRST 7

STRINGA 1 5
BEGIN
	KEY "Codice ditta"
	PROMPT  1 1 "Ditta "
	MESSAGE _DITTA,CODDITTA
	PICTURE "#####"
END

STRINGA 2 40 
BEGIN
	KEY "nome ditta"
	PROMPT  13 1 ""
	MESSAGE _DITTA,RAGSOC
END

STRINGA 310
BEGIN
	KEY "Data"
	PROMPT  100 1 "Data "
	MESSAGE _TODAY
END

NUMERO 4 7
BEGIN
  KEY "Nr. pagina"
  PROMPT  120 1 "Pag. "
  MESSAGE _PAGENO
END

STRINGA -1 22
BEGIN
  KEY "Intestazione stampa"
  PROMPT 1 2 "Conti per CDC/Commessa"
END

NUMERO FR_ESERCIZIO 16
BEGIN
  KEY "Parametri stampa: codice esercizio"
  PROMPT 1 3 "Esercizio: "
END

DATA FR_DATAINI                                   
BEGIN
  KEY "Parametri stampa: data iniziale"
  PROMPT 1 4 "Movimenti dal "
END

DATA FR_DATAFIN
BEGIN
  KEY "Parametri stampa: data finale"
  PROMPT 40 4 "al "
END

STRINGA FR_DACDC 20
BEGIN
  KEY "Parametri stampa: da commessa"
  PROMPT 1 5 "Da CDC/commessa: "
END

STRINGA FR_DAFSC 10
BEGIN
  KEY "Parametri stampa: da fase"
  PROMPT 40 5 "Da fase: "
END

STRINGA FR_ACDC 20
BEGIN
  KEY "Parametri stampa: a commessa"
  PROMPT 1 6 "a CDC/commessa: "
END

STRINGA FR_AFSC 10
BEGIN
  KEY "Parametri stampa: a fase"
  PROMPT 40 6 "a fase: "
END

STRINGA -1
BEGIN
  KEY "Intestazione stampa"
  PROMPT 1 7 "____________________________________________________________________________________________________________________________________"
END

END // section header first

// intestazione comessa
SECTION HEADER ODD 5

STRINGA -1
BEGIN
  KEY "Intestazione stampa"
  PROMPT 1 1 "____________________________________________________________________________________________________________________________________"
END

STRINGA FR_CMS 20
BEGIN
  KEY "Codice commessa"
  PROMPT 1 2 "@bCDC/Commessa "
END

STRINGA FR_D_CMS 50
BEGIN
  KEY "Descrizione commessa"
  PROMPT 35 2 "@b"
END

STRINGA -1
BEGIN
  KEY "Intestazione stampa"
  PROMPT 68 3 "Progr. prec."
END

STRINGA -1
BEGIN
  KEY "Intestazione stampa"
  PROMPT 85 3 "Tot. periodo"
END

STRINGA -1
BEGIN
  KEY "Intestazione stampa"
  PROMPT 103 3 "Tot. progr."
END               

STRINGA -1
BEGIN
  KEY "Intestazione stampa"
  PROMPT 118 3 "Saldo attuale"
END

STRINGA -1
BEGIN
  KEY "Intestazione stampa"
  PROMPT 1 4 "____________________________________________________________________________________________________________________________________"
END

END // section header odd

// intestazione fase
SECTION HEADER LAST 1

STRINGA FR_FSC 20
BEGIN
  KEY "Codice fase"
  PROMPT 1 1 "@bFase "
END

STRINGA FR_D_FSC 50
BEGIN
  KEY "Descrizione fase"
  PROMPT 35 1 "@b"
END

END // section header last

// riga di stampa (utilizzata per ogni gruppo/conto/sottoconto e per tutti i totali)
SECTION BODY ODD 1

NUMERO FR_GRUPPO 3
BEGIN
	KEY "Gruppo"
	PROMPT 1 1 ""
END

NUMERO FR_CONTO 3
BEGIN
	KEY "Conto"
	PROMPT 5 1 ""
END

NUMERO FR_SOTTOC 6
BEGIN
	KEY "Gruppo/Conto/Sottoconto"
	PROMPT 9 1 ""
END

STRINGA FR_D_SOTTOC 47
BEGIN      
  KEY "Descrizione sottoconto"
  PROMPT 16 1 ""
END

VALUTA FR_PROGPREC 14
BEGIN
  PROMPT 66 1 ""
  PICTURE "."
END

STRINGA FR_SEGNO_PROGPREC 1
BEGIN
  PROMPT 81 1 ""
END

VALUTA FR_PERIODO 14
BEGIN
  PROMPT 83 1 ""
END

STRINGA FR_SEGNO_PERIODO 1
BEGIN
  PROMPT 98 1 ""
END

VALUTA FR_PROG 14
BEGIN
  PROMPT 100 1 ""
END
                   
STRINGA FR_SEGNO_PROG 1
BEGIN
  PROMPT 115 1 ""
END

VALUTA FR_SALDOATT 14
BEGIN
  PROMPT 117 1 ""
END
                   
STRINGA FR_SEGNO_SALDOATT 1
BEGIN
  PROMPT 132 1 ""
END

END // section body

SECTION FOOTER ODD 3
END

END // form