campo-sirio/ab/ab1200.frm
sauro 8156729afe ab0200a.uml: Commentato il campo F_DETTAGLIO poichè non è più utilizzato
ab1.cpp: Aggiunto commenti per descrivere la sintassi per lanciare le varie applicazini
ab1200.frm: Tolto il campo F_DETTAGLIO e aggiornato di conseguenza
ab2100.cpp, ab2100.h: Completato l'applicazione di ricezione e trasferimento
ab2100a.ini: Completato con tutti i tracciati disponibili nel TRDANBI
ab2100a.uml: Completata la gestione a livello di maschera dei campi booleani


git-svn-id: svn://10.65.10.50/trunk@5741 c028cbd2-c16b-5b4b-a496-9718f37d4682
1997-12-15 11:12:32 +00:00

114 lines
1.4 KiB
Plaintext
Executable File

//stampa piano dei conti
USE 78
END
DESCRIPRION
BEGIN
78->* "Piano dei Conti"
END
GENERAL
BEGIN
OFFSET 0 0
FONT "Courier New"
SIZE 7
END
SECTION HEADER ODD 6
STRINGA 1 80
BEGIN
KEY "Separatore (iniziale)"
PROMPT 1 3 "--------------------------------------------------------------------------------"
END
STRINGA 2 12
BEGIN
KEY "Intestazione (Codice)"
PROMPT 1 4 "Codice"
END
STRINGA 3 40
BEGIN
KEY "Intestazione (Descrizione)"
PROMPT 25 4 "Descrizione"
END
NUMERO 4 5
BEGIN
KEY "Intestazione (I.b.)"
PROMPT 53 4 "I.b."
END
STRINGA 5 12
BEGIN
KEY "Intestazione (Codcontr)"
PROMPT 63 4 "Cod. Contr."
END
STRINGA 6 6
BEGIN
KEY "Intestazione (Sosp.)"
PROMPT 75 4 "Sosp."
END
STRINGA 7 80
BEGIN
KEY "Separatore (finale)"
PROMPT 1 5 "--------------------------------------------------------------------------------"
END
END
//Il -2 significa che stampa su 1 o 2 righe secondo quello che devo stampare
SECTION BODY ODD -2
STRINGA 2 12
BEGIN
KEY "Codice"
PROMPT 1 1 ""
FIELD 78->CODCBL
END
//Sintassi: TIPO id lunghezza_per_riga numero_righe
STRINGA 3 40 2
BEGIN
KEY "Descrizione"
PROMPT 14 1 ""
FIELD 78->DESCRIZ
END
NUMERO 4 1
BEGIN
KEY "Indicatore"
PROMPT 55 1 ""
FIELD 78->INDBIL
END
STRINGA 5 12
BEGIN
KEY "Cod. contr."
PROMPT 63 1 ""
FIELD 78->CODCONTR
END
STRINGA 6 1
BEGIN
KEY "Sospeso"
PROMPT 76 1 ""
FIELD 78->SOSPESO
END
END
END