Vai al contenuto

COSO58 - Carico addebiti da Excel

Scopo

Importa un file di testo tab-delimited (esportato da Excel) contenente addebiti per causale/socio e genera automaticamente movimenti contabili in partita doppia (DARE socio / AVERE conto causale). I movimenti sono raggruppati in documenti di prima nota numerati (max 400 dettagli per documento).

File e tabelle

File Tipo Descrizione
COGPNONC Indicizzato Prima nota non contabilizzata (output: movimenti DARE/AVERE)
COGPNCON Indicizzato Conti contabili
COGGEANA Indicizzato Anagrafiche clienti/fornitori
UNANASO Indicizzato Anagrafiche soci (ricerca CF su CHIA6, P.IVA su CHIA2)
COGTABEL Indicizzato Tabelle (causali tipo 65, parametri divisione)
COGTRANS / COGTRANS2 / COGTRANS3 Indicizzati Accumulatori temporanei (totali causale, totali D/A, dettaglio riga + IVA)
COGMOVCC Indicizzato Movimenti centri di costo (se configurati)
COGDESCR Indicizzato Descrizioni allegate ai movimenti

Copybook

Copybook Sezione Utilizzo
coso58.wrk / .fd / .select tutte Strutture generate da Screens
L-COPIAF.CPY WORKING-STORAGE Copy/delete file da server
cogconta.cpy WORKING-STORAGE Strutture contabili
utilncnf.cpy WORKING-STORAGE Configurazione RNEWCONF
utilu10.cpy / utilo26.cpy WORKING-STORAGE Utility numeriche e zone
OPENSAVE.DEF WORKING-STORAGE File dialog GUI

CALL

Programma Quando Scopo
COGS25 Per ogni nuovo documento Genera numero documento prima nota
COGS54 Su F1 Configurazione causali/stampa
COPIAF All'inizio Copia file Excel da server a locale
COSO26 Su F8 Lookup zona

Logica di elaborazione

Flusso principale

  1. Accetta data, zona, file input, causale e divisione.
  2. Copia il file Excel dal server in locale tramite COPIAF.
  3. Legge il file riga per riga (unstring su tab = 0x09).
  4. Per ogni riga con causale valida:
  5. ricerca il socio in UNANASO per CF o, in fallback, per P.IVA;
  6. se prima riga di nuova causale, chiama COGS25 per generare il numero documento;
  7. scrive il movimento DARE socio e il movimento AVERE a causale in COGPNONC;
  8. accumula totali in COGTRANS2.
  9. Se la configurazione lo prevede, scrive i centri di costo in COGMOVCC usando la zona come livello 2.
  10. Al raggiungimento di 400 dettagli apre un nuovo documento.
  11. Al termine stampa il riepilogo: range documenti creati, totali Dare/Avere per causale.

Note tecniche

  • Divisione (Euro/Lire) letta per causale in COGTABEL tipo 65.
  • Log dettagliato in tmp/#$logcoso58.ope con righe scartate e motivazione.
  • Controlli di blocco: CF vuoto (scarta silenzioso), anagrafica dimessa (avviso), anagrafica non trovata (scarta con log).
  • File input copiato automaticamente dal server tramite COPIAF (riusabile su qualsiasi share).

Note operative

  • L'utente deve esportare il file Excel come "testo tabulato" o "TSV"; CSV con virgola non e' supportato.
  • Limite 400 movimenti per documento e' un vincolo del layout COGPNONC, non configurabile.