Vai al contenuto

COGG14P - Stampa note su modello per clienti potenziali

Sorgente: cbl/cogg14p.cbl | Tipo: Stampa (con modello testuale) | Program-ID: COGG14P

Menu: Contabilita' > Clienti Potenziali > Stampe

Scopo

Stampa note su clienti potenziali utilizzando un modello testuale (file inpfil, nome configurato in euta-c058-file-dat). Per ogni cliente nel range, applica il modello e produce una stampa personalizzata con dati anagrafici e informazioni configurate.

Richiamabile dall'esterno (g14p-called = "Y") per stampare la scheda di un singolo cliente.

File e Tabelle

File/Tabella Uso
FEURTAB Parametri generali
COGTABEL Configurazione (tipo euta-c058 per parametri stampa)
COGGEANA Anagrafica clienti
COGAPPOG Appoggio
COGCNDCF Condizioni cliente
COGPOTCL Clienti potenziali
COGCLIPT Schede clienti potenziali
COGDESGN Descrizioni
INPFIL File modello (line sequential) — nome da nome_modello configurato
FLSTA File stampa

Configurazioni RNEWCONF

Lette tramite COGTABEL tipo euta-c058:

Chiave Variabile Significato
euta-c058-inf-sex tm-cfg-inf-sex Codice informazione "sesso"
euta-c058-inf-tel tm-cfg-inf-tel Codice informazione "telefono"
euta-c058-file-dat tm-cfg-file-dat (nom+ext) Nome file modello

Programmi chiamati

Programma Scopo
COGS54 Gestione stampante

Linkage (utilg14p.cpy)

  • g14p-called — flag richiamo esterno ("Y")
  • g14p-tip — tipo anagrafico
  • g14p-cli — codice anagrafico
  • g14p-scheda — n. scheda (progressivo su cliente)

Logica

  1. Lettura configurazione euta-c058, apertura modello (inpfil).
  2. Maschera: tipo, codice da/a, descrizione da/a, n. scheda da/a, affianca S/N, telefono.
  3. Se g14p-called = "Y": salto a stampa diretta con cliente/scheda passati.
  4. Scansione COGPOTCL/COGCLIPT per il range; per ciascuna scheda lettura modello e sostituzione campi.
  5. Stampa su flsta.

Note

  • Il modello e' un file di testo line-sequential che contiene placeholder per i campi dell'anagrafica/scheda.
  • Le configurazioni (sesso, telefono, file dati) sono lette da cogtabel tipo 58.
  • Author: Eurosystem (intestazione storica).