COGP47 - Stampa Clienti/Fornitori per Contropartita¶

Panoramica¶

Programma di stampa che produce l'elenco di clienti o fornitori raggruppati per contropartita contabile. Supporta la stampa di tutte le contropartite o di una singola, con ordinamento per codice anagrafico o per ragione sociale.

Tipo: Report interattivo con selezione parametri e file di transito.

Menu	Percorso
Contabilita'	Archivi & Tabelle > Stampe > Clienti/Fornitori

Struttura del programma¶

File e tabelle utilizzati¶

File/Tabella	Tipo	Descrizione
FEURTAB (cogfiles)	Input	Tabella parametri generali
COGGEANA	Input	Anagrafica generale (clienti/fornitori)
COGPNCON	Input	Piano dei conti (descrizione contropartite)
COGTRANS	Transito	File indicizzato temporaneo per ordinamento
FLSTA	Output	File di stampa

Copybook principali¶

Copybook	Descrizione
cogp47.select	SELECT per i file del programma
cogp47.fd	File description
cogp47.wrk	Working storage generata da Screens
cogp47-01.scr	Screen section maschera di selezione
cogp47.decla	Declaratives per gestione errori I/O
cogp47.prc	Procedure generate da Screens
cogazien.cpy	Dati azienda corrente
utils54.cpy	Utility gestione stampante (COGS54)
utils67.cpy	Utility selezione contropartita (COGS67)
wcont.cpy / wcont1.cpy	Linkage section standard

Chiamate a sottoprogrammi (CALL)¶

Programma	Scopo
COGS54	Gestione stampante (apertura, chiusura, anteprima)

Record di transito (COGTRANS)¶

Il file di transito e' indicizzato con due chiavi:

Chiave primaria (trs-chia1): contropartita (mastro/conto/sconto) + codice anagrafico
Chiave secondaria (trs-chia2): contropartita + ragione sociale (con duplicati)

Record: codice, ragione sociale, contropartita, indirizzo, localita', CAP, provincia.

Logica di elaborazione¶

Maschera di selezione¶

Il programma determina il tipo anagrafica (clienti/fornitori) dal parametro wo-parametro:

"C": Stampa Clienti per Contropartita
Altro (default): Stampa Fornitori per Contropartita

Parametri:

tm-cli-for: tipo anagrafica (C/F)
tm-tutte: "T" = tutte le contropartite, "S" = singola
tm-controp: codice contropartita (mastro/conto/sconto), abilitato solo se tm-tutte = "S"
tm-ord: "C" = per codice, altro = per ragione sociale

Fase di elaborazione (fill-trs)¶

Scansione sequenziale di COGGEANA per il tipo anagrafica selezionato
Se singola contropartita, filtra solo le anagrafiche con ana-controp = tm-controp
Copia i dati nel file di transito COGTRANS (codice, ragione sociale, contropartita, indirizzo, localita', CAP, provincia)

Fase di stampa (stampa)¶

Legge COGTRANS sulla chiave primaria (per codice) o secondaria (per ragione sociale)
Gestisce rottura di livello su trs-controp: al cambio di contropartita, emette salto pagina e nuova testata
Per ogni contropartita, legge la descrizione da COGPNCON (des-controp)
Stampa intestazione con data, azienda, numero pagina, codice e descrizione contropartita, tipo ordinamento
Per ogni anagrafica: codice, ragione sociale, indirizzo, localita', CAP, provincia

Gestione salto pagina¶

Controlla ctr-rig > s54-stm-lin - 10 per determinare se serve un salto pagina prima della prossima riga.

Note tecniche¶

Il file di transito COGTRANS viene creato in ext-tmp-dir con nome #$COGP47.{operatore}
Larghezza di stampa: 132 caratteri (k-chr-stampa = 132)
Il programma usa PERFORM ... THRU per le sezioni principali (elabora/stampa/testa/corpo)
Il parametro di ingresso wo-parametro controlla il comportamento clienti/fornitori