campo-sirio/cm/cm1100a.frm

#include "cm1100.h"

SECTION GRAPHICS ODD

LINEA -1 196 1
BEGIN
  PROMPT 1 7 "@b"
END

LINEA -1 196 1
BEGIN
  PROMPT 1 9 "@b"
END

END

// intestazione generale stampa pagato per commessa
SECTION HEADER ODD 9

NUMERO -1
BEGIN
	KEY "Nr. pagina"
	PROMPT  1 1 "Pag. "
	MESSAGE _PAGENO
END

STRINGA -1
BEGIN
	KEY "Data"
	PROMPT  180 1 "Data "
	MESSAGE _TODAY
END

STRINGA -1
BEGIN
  KEY "Intestazione stampa"
  PROMPT 70 2 "@bPAGATO PER COMMESSA / FORNITORE"
END

DATA FR_HO_DATAINI                                   
BEGIN
  KEY "Parametri stampa: data iniziale"
  PROMPT 1 3 "@bMovimenti dal@r "
END

DATA FR_HO_DATAFIN
BEGIN
  KEY "Parametri stampa: data finale"
  PROMPT 40 3 "@bal@r "
END

STRINGA FR_HO_DACDC
BEGIN
  KEY "da codice commessa"
  PROMPT 1 4 "@bDa comm.@r "
END

STRINGA FR_HO_DADESC 60
BEGIN
  KEY "da descr commessa"
  PROMPT 31 4 ""
END

STRINGA FR_HO_ACDC
BEGIN
  KEY "a codice commessa"
  PROMPT 96 4 "@bA comm.@r "
END

STRINGA FR_HO_ADESC 60
BEGIN
  KEY "a descr commessa"
  PROMPT 125 4 ""
END

STRINGA FR_HO_DACFSC
BEGIN
  KEY "da codice fase"
  PROMPT 1 5 "@bDa fase@r "
END

STRINGA FR_HO_DADESFSC
BEGIN
  KEY "da descrizione fase"
  PROMPT 20 5 ""
END

STRINGA FR_HO_ACFSC
BEGIN
  KEY "a codice fase"
  PROMPT 96 5 "@bA fase@r "
END

STRINGA FR_HO_ADESFSC
BEGIN
  KEY "a descrizione fase"
  PROMPT 114 5 ""
END

STRINGA FR_HO_DACODFOR
BEGIN
  KEY "da codice fornitore"
  PROMPT 1 6 "@bDal forn.@r "
END

STRINGA FR_HO_DADESFOR
BEGIN
  KEY "da ragsoc"
  PROMPT 17 6 ""
END

STRINGA FR_HO_ACODFOR
BEGIN
  KEY "a codice fornitore"
  PROMPT 96 6 "@bAl forn.@r "
END

STRINGA FR_HO_ADESFOR
BEGIN
  KEY "a ragsoc"
  PROMPT 111 6 ""
END

//------Legenda campi--------//

STRINGA -1
BEGIN
  KEY "numero registrazione"
  PROMPT 1 8 "@bN. reg."
END

STRINGA -1
BEGIN
  KEY "data pagamento"
  PROMPT 10 8 "@bData pag."
END

STRINGA -1
BEGIN
  KEY "descrizione pagamento"
  PROMPT 22 8 "@bDescrizione pagamento"
END

STRINGA -1
BEGIN
  KEY "numero fattura"
  PROMPT 62 8 "@bN. doc"
END

STRINGA -1
BEGIN
  KEY "data fattura"
  PROMPT 70 8 "@bData doc"
END

STRINGA -1
BEGIN
  KEY "protocollo iva"
  PROMPT 82 8 "@bProt."
END

STRINGA -1
BEGIN
  KEY "totale fattura"
  PROMPT 92 8 "@bTot.fattura"
END

STRINGA -1
BEGIN
  KEY "totale imputato"
  PROMPT 106 8 "@bTot.imputato"
END

STRINGA -1
BEGIN
  KEY "totale pagamento"
  PROMPT 120 8 "@bTot.pagamento"
END

STRINGA -1
BEGIN
  KEY "totale residuo"
  PROMPT 137 8 "@bTot.residuo"
END

STRINGA FR_HO_FORNCMS
BEGIN
  KEY "codice fornitore"
  PROMPT 150 8 "@b"
END

STRINGA FR_HO_FORNCMSDES
BEGIN
  KEY "descrizione fornitore"
  PROMPT 168 8 "@b"
END

END // section header odd

// riga con solo il codice commessa ed una riga vuota
SECTION HEADER LAST 2

STRINGA FR_HL_CODCMS
BEGIN
  KEY "codice+descrizione"
  PROMPT 1 2 "@b"
END

END //section header last

// riga di stampa (utilizzata per ogni tipo di riga pagamento e per tutti i totali)
SECTION BODY ODD 1

STRINGA -1
BEGIN
  KEY "tipo riga"
  PROMPT 1 1 ""
  MESSAGE _TIPORIGA|COPY,FR_BO_TIPORIGA
  FLAGS "H"
END

LISTA FR_BO_TIPORIGA
BEGIN
  KEY "lista tipo riga"
  PROMPT 1 1 ""
  ITEM "0|0" MESSAGE ENABLE,1@|DISABLE,2@
  ITEM "1|1" MESSAGE ENABLE,2@|DISABLE,1@
  ITEM "2|2" MESSAGE ENABLE,2@|DISABLE,1@
  FLAGS "H"
END

STRINGA -1
BEGIN
  KEY "codice commessa"
  PROMPT 1 1 ""
  MESSAGE _CODCMS
  FLAGS "H"
END

STRINGA -1
BEGIN
  KEY "codice fase"
  PROMPT 1 1 ""
  MESSAGE _CODFSC
END

NUMERO -1 7
BEGIN
  KEY "numero registrazione"
  PROMPT 1 1 ""
  MESSAGE _NREG
END

DATA -1
BEGIN
  KEY "data pagamento"
  PROMPT 9 1 ""
  MESSAGE _DATAPAG
END

STRINGA FR_BO_DESC 40
BEGIN
  KEY "descrizione pagamento"
  PROMPT 20 1 ""
  MESSAGE _DESCRPAG
END

NUMERO -1 3
BEGIN
  KEY "gruppo"
  PROMPT 62 1 ""
  MESSAGE _GRUPPO
  GROUP 2
END

NUMERO -1 3
BEGIN
  KEY "conto"
  PROMPT 66 1 ""
  MESSAGE _CONTO
  GROUP 2
END

NUMERO -1 6
BEGIN
  KEY "sottoconto"
  PROMPT 70 1 ""
  MESSAGE _SOTTOCONTO
  GROUP 2
END

STRINGA -1 26
BEGIN
  KEY "descrizione gr/co/sottoc"
  PROMPT 77 1 ""
  MESSAGE _DESCGRCOST
  GROUP 2
END

STRINGA -1
BEGIN
  KEY "numero fattura"
  PROMPT 62 1 ""
  MESSAGE _NFAT
END

DATA -1
BEGIN
  KEY "data fattura"
  PROMPT 70 1 ""
  MESSAGE _DATAFAT
END

NUMERO -1 5
BEGIN
  PROMPT 82 1 ""
  MESSAGE _PROTIVA
END

VALUTA -1 15
BEGIN
  KEY "totale fattura"
  PROMPT 88 1 ""
  MESSAGE _TOTFAT
END

VALUTA -1 15
BEGIN
  KEY "totale imputato"
  PROMPT 103 1 ""
  MESSAGE _TOTIMP
END

VALUTA -1 15
BEGIN
  KEY "totale pagato"
  PROMPT 118 1 ""
  MESSAGE _TOTPAG
END

VALUTA -1 15
BEGIN
  KEY "totale residuo"
  PROMPT 133 1 ""
  MESSAGE _TOTRES
END

STRINGA -1 7
BEGIN
  KEY "codice fornitore"
  PROMPT 150 1 ""
  MESSAGE _CODFORN
  GROUP 1
END

STRINGA -1 20
BEGIN
  KEY "codice commessa"
  PROMPT 150 1 ""
  MESSAGE _CODCMS_B
END

STRINGA -1 37
BEGIN
  KEY "descrizione fornitore"
  PROMPT 158 1 ""
  MESSAGE _DESFORN
  GROUP 1
END

STRINGA -1 25
BEGIN
  KEY "descrizione commessa"
  PROMPT 171 1 ""
  MESSAGE _DESCMS_B
END

STRINGA -1
BEGIN
  KEY "avanza 1 pagamento"
  PROMPT 1 1 ""
  MESSAGE _NEXTPAG
  FLAGS "H"
END

END // section body

SECTION FOOTER ODD 1
END

END // form