COGP46 — Estrazione Archivio / Etichette¶
Sorgente: cbl/cogp46.cbl | Program-ID: COGP46 | Tipo: Programma di estrazione e stampa etichette
Menu: Contabilita' > Archivi & Tabelle > Stampe > Clienti > Estrazione Archivio / Etichette
Scopo¶
Estrae un elenco di clienti in base a criteri di selezione (provincia, CAP, fatturato annuo, tipo estrazione) e produce una stampa etichette su 1 o 3 piste oppure un file sequenziale CSV per esportazione. Consente anche la selezione manuale di singoli clienti.
Struttura della maschera¶
| Campo | Variabile | Descrizione |
|---|---|---|
| Provincia | tm-prov |
Filtro per provincia (vuoto = tutte). F8 per help (COGF09) |
| C.A.P. | tm-cap |
Filtro per CAP |
| Anno Fatturato | tm-fatt-ann |
Anno di riferimento per filtro fatturato |
| Da Soglia Fatturato | tm-fatt-imp-1 |
Importo minimo fatturato (visibile solo se anno impostato) |
| A Soglia Fatturato | tm-fatt-imp-2 |
Importo massimo fatturato (visibile solo se anno impostato) |
| Tipo Estrazione | tm-fax |
Tipo di estrazione (combo-box: Tutti, con Fax, ...) |
| Tipo Elaborazione | tm-elab |
"S" = Stampa etichette, "C" = Creazione archivio CSV |
| Numero Piste | tm-piste |
1 o 3 piste per etichette (visibile solo se elaborazione = Stampa) |
| Selezione Clienti | tm-sel-cli |
"S" = selezione manuale di clienti specifici |
| Cliente Da | tm-cli-da |
Codice cliente da aggiungere (visibile solo se selezione manuale) |
Logica di elaborazione¶
Flusso principale¶
- Selezione parametri: l'operatore configura i filtri e il tipo di elaborazione
- Estrazione anagrafiche (
rie-ana): se non e' stata fatta selezione manuale, scansiona COGGEANA tipo "C" e per ogni cliente verifica i criteri (provincia, CAP, fatturato), scrivendo i selezionati nel file temporaneo COGP46 - Elaborazione: in base a
tm-elab: - "S" (Stampa): stampa etichette su 1 o 3 piste con nome, indirizzo, CAP/localita'/provincia
- "C" (Creazione archivio): crea un file sequenziale CSV (
ANAGR{operatore}.ARCinext-tmp-dir) con codice, nome, indirizzo, CAP, localita', provincia, fax, telefono, email, P.IVA, codice fiscale, privato, natura giuridica, agente, pagamento
File temporaneo COGP46¶
Il programma usa un file temporaneo indicizzato per operatore (#$COGP46.{operatore} in ext-tmp-dir) per memorizzare i clienti selezionati. Viene svuotato e ricreato ad ogni esecuzione.
Selezione manuale clienti¶
Se tm-sel-cli = "S", l'operatore puo' aggiungere clienti uno alla volta tramite il campo tm-cli-da con ricerca (COGS65W). Ogni cliente viene scritto nel file COGP46 e il contatore tm-nr-cli viene aggiornato.
File utilizzati¶
| File | Accesso | Scopo |
|---|---|---|
| COGGEANA | Input | Anagrafica clienti |
| COGFATTU | Input | Fatturato annuo (per filtro importo) |
| COGAPPOG | Input | Dati commerciali clienti |
| COGP46 | I-O | File temporaneo per operatore (selezione clienti) |
| OUTSEQ | Output | File sequenziale CSV per esportazione |
| FLSTA | Output | File spool stampa etichette |
Programmi chiamati¶
| Programma | Scopo |
|---|---|
| COGF09 | Help selezione provincia (F8) |
| COGS52W | Gestione campo anno |
| COGS54 | Gestione stampa/spooler |
| COGS65W | Help selezione cliente con ricerca (F8/F9) |
Copybook principali¶
cogp46.wrk, cogp46.select, cogp46.fd, cogp46.decla, cogp46-01.scr, cogp46.prc, cogazien.cpy, utilf09.cpy, utils52.cpy, utils54.cpy, utils65.cpy
Note¶
- La larghezza di stampa e' 132 caratteri.
- Le etichette possono essere stampate su 1 o 3 piste (colonne affiancate).
- Il file temporaneo COGP46 viene cancellato (
delete file) alla chiusura del programma. - Il file di esportazione CSV usa il carattere virgola (
,) come separatore tramite campiseq-vir-*. - Il filtro per soglie di fatturato e' attivo solo se l'anno fatturato e' impostato (
tm-fatt-ann not = zero). - Nel menu esiste anche COGP46F (versione Fornitori) che richiama lo stesso programma con tipo diverso.