COSO86 - Carica addebiti ricevuti dalla periferia
Funzione
Carica in prima nota della sede gli addebiti ai soci provenienti dai file scaricati dalle periferie dell'Unione. Genera un movimento batch in COGPNONC (prima nota non contabilizzata) e produce stampa di riscontro dare/avere per zona.
- Contabilita' > Unione soci/clienti > Carica Addebiti Ricevuti
Tabelle e file principali
| Tabella/File |
Descrizione |
Accesso |
| FEURTAB |
Tabella file aziendali |
Lettura |
| COGTABEL |
Tabella generica contabilita' |
Lettura (zona, esercizio, contropartite) |
| COGPNCON (pco-chia) |
Piano dei conti |
Lettura |
| COGPNONC (pno-rec) |
Prima nota non contabilizzata |
Scrittura |
| COGCOATT |
Prima nota contabilizzata corrente |
Apertura per controlli |
| COGCCOPR |
Prima nota contabilizzata precedente |
Apertura per controlli |
| COGGEANA |
Anagrafica generica |
Lettura |
File c:\datirice\addeb{zona}.dps |
File addebiti ricevuti dalla periferia |
Lettura |
Copybook e sottoprogrammi
| Elemento |
Tipo |
Ruolo |
| cogconta.cpy |
Copybook |
Record contabilita' (esercizio, contropartite) |
| cogazien.cpy |
Copybook |
Dati azienda |
| utils54, utils25 |
Copybook |
Utility (date, numerazione documento) |
| cogcopre.cpy |
Copybook |
Apertura archivio P.N. contabilizzata |
| COGS52 |
Sottoprogramma |
Calendario/data |
| COSO85 |
Sottoprogramma (call-coso85) |
Letture/elaborazione addebiti |
Logica principale
- a000: open files, lettura tabella esercizio (euta-tipo=66)
- Maschera: data registrazione (validata con cogs52), zona di lettura (compone path
c:\datirice\addeb{zona}.dps)
- Controlli: data >= conta-dachiur (ultima chiusura), tabella zona esistente (06-90-{zona})
- Apertura archivio attuale: apre cogcoatt per riferimenti contabili
- call COSO85: elabora il file addebiti, accumula per contropartita, costruisce movimenti
- Genera prima nota: scrive in cogpnonc i movimenti dare (cliente) / avere (contropartite causali) con totali per zona
- Stampa: produce listing con righe dettaglio (rdet1-4) e totali (rtot)
Note tecniche
- Programma legacy DOS-style (source RMCOBOL, poi acu-cobol); maschera testuale "mm-1"
- File
.dps e' tracciato semicolon-separated proveniente dalle periferie
- Il programma di sede chiama COSO85 per il vero parsing del file ricevuto
- Limite max 50 righe distinte di contropartite per movimento (
tmr table)
- Parte del flusso periferia → sede (controparte di COSO70/COSO88)