COSO82 - Stampa dati terreni soci¶
Funzione¶
Estrae e stampa i dati dei terreni (fondi) associati ai soci dell'Unione. Supporta tre modalita' di output: Word con salvataggio PDF, Word con stampa diretta, ed Excel (file CSV aperto tramite GRIDTOXS).
Menu¶
- Contabilita' > Unione soci/clienti > Stampa dati terreni soci
Tabelle e file principali¶
| Tabella/File | Descrizione | Accesso |
|---|---|---|
| UNANASO | Anagrafica soci (anas-rec) | Lettura sequenziale con filtro intervallo codice |
| UNANASO2 | Dati terreni/fondi dei soci (ana2-rec) | Lettura sequenziale per codice socio |
| COGTABEL | Tabella generica (tipo 06/90 = zone) | Lettura per decodifica zona |
| FEURTAB | Tabella configurazione | Lettura |
| FLSTA | File di stampa | Scrittura |
| fileasc2 | File CSV temporaneo (terreni.asc) | Scrittura sequenziale per export Excel |
| perstext | File di testo personalizzato | Lettura (opzionale, attualmente disabilitato) |
Copybook e sottoprogrammi¶
| Elemento | Tipo | Ruolo |
|---|---|---|
| coso82.select/fd/wrk/prc/decla | Screen | Definizioni screen e procedure generate |
| cogfiles.cpy | Copybook | Struttura FEURTAB |
| COGCONTA.CPY | Copybook | Strutture contabilita' |
| utilwordmdl.cpy | Copybook | Interfaccia WORDMDL |
| utils54.cpy | Copybook | Interfaccia COGS54 (gestione stampante) |
| utils65.cpy | Copybook | Interfaccia COGS65W (ricerca anagrafica) |
| utilo30.cpy | Copybook | Interfaccia COSO30 (ricerca zone) |
| utils99.cpy | Copybook | Interfaccia stampa |
| utillogo.cpy | Copybook | Gestione logo |
| utilpost.cpy | Copybook | Gestione posta |
| utilmymail.cpy | Copybook | Gestione email |
| opensave.def | Copybook | Definizione dialogo apri/salva file |
| COGS54 | Sottoprogramma | Gestione periferica di stampa |
| COGS65W | Sottoprogramma | Ricerca anagrafica soci con popup |
| COSO30 | Sottoprogramma | Ricerca zone con popup (F8) |
| WORDMDL | Sottoprogramma | Generazione documento Word/XML |
| GRIDTOXS | Sottoprogramma | Apertura file CSV con Excel |
Logica principale¶
-
Acquisizione parametri: intervallo soci (da/a), filtro zona (tutti/singola), tipo soci (tutti/dimessi/attivi), tipo stampa (Word PDF / Word stampa / Excel).
-
Validazione: verifica esistenza soci nell'anagrafica UNANASO, verifica zona in COGTABEL (tipo 06, sottotipo 90).
-
Estrazione dati (paragrafo
stampa/a210): - Scansione sequenziale di UNANASO nell'intervallo richiesto.
- Filtro per zona (
anas-zona2) se non "Tutti". - Filtro per tipo soci: tipo '2' = solo dimessi (
anas-dadimis <> 0), tipo '3' = solo attivi (anas-dadimis = 0). -
Per ogni socio, scansione di UNANASO2 per ottenere i dati dei terreni.
-
Output Word (tipo stampa '1' o '2'):
- Apertura XML tramite WORDMDL (
Apri-XML). - Per ogni socio: intestazione con dati anagrafici (nome, indirizzo, CF/P.IVA, zona), poi righe terreni in tabella (
TAB-RIGHE-01). - Chiusura XML e generazione documento tramite WORDMDL (
Esegui). -
Tipo '1': salvataggio PDF in
C:\ecoge\Terreni-soci-pdf-{data}-{ora}.pdf. -
Output Excel (tipo stampa '3'):
- Scrittura righe CSV su
fileasc2(separatore virgola). - Al termine chiama GRIDTOXS per aprire il file con Excel.
Note¶
- Il campo
tm-path(modello Word) e' attualmente commentato nella maschera; il modello viene preso dalla directoryext-mod-dir. - La struttura
grd-recorddefinisce il layout della riga griglia per i terreni: tipo quota, comune, superficie (et.ar.ca), conduzione, note. - Il file temporaneo
terreni.ascviene creato inext-tmp-dire cancellato alla chiusura. - Il programma gestisce la rottura per socio tramite tag XML
ROTTURA-nper il documento Word.