Vai al contenuto

COGK48 -- Stampa Lettera Limite Fatturato

Sorgente: cbl/cogk48.cbl | Tipo: Stampa | Program-ID: COGK48

Menu: Vendite > Ristorni > Stampa Lettera Limite Fatturato


Scopo

Genera la stampa delle lettere da inviare ai clienti per comunicare il raggiungimento (o meno) del limite di fatturato previsto per il riconoscimento del ristorno. Utilizza un modello di testo configurabile (file di testo esterno) e un archivio di transito con i dati di fatturato per cliente.


File utilizzati

File Accesso Scopo
FEURTAB (cogfiles) Input Parametri generali
File dati ristorno Input Dati limite fatturato (via cogk48.select/fd)
LAVORO Input File di testo del modello lettera
COGTRANS Transito Dati fatturato per cliente (chiave: trs-tipo + trs-cod)
FLSTA Output Stampa lettere

Copybook principali

Copybook Descrizione
cogk48.select SELECT file del programma
cogk48.fd File description
cogfiles.cpy Record FEURTAB
flsta.cpy Record stampa

Struttura COGTRANS

Chiave: trs-tipo (X(01)) + trs-cod (9(05)). Dati: trs-impo, trs-iva, trs-tot, trs-n-viaggi.

Struttura LAVORO

File di testo (line sequential) con record da 200 caratteri. Contiene il testo base della lettera con segnaposto per i dati del cliente.

Note implementative

  • Autore: Daniele - Eurosystem (conversione Win).
  • Il modello lettera e' un file esterno la cui path e' in nf-lavoro.
  • Il programma interpola i dati del cliente nel testo del modello riga per riga.