Coassicurazioni — Gestione polizze e pool assicurativi¶

Area funzionale: Contabilita' / Coassicurazioni Programmi documentati: 11 | Righe totali analizzate: 17.366

Indice¶

Gestione operativa
Tabelle
Stampe
Flusso integrato
File principali
Tabella riepilogativa

1. Gestione operativa¶

COGK80 — Polizze in coassicurazione¶

File: /programmi/eurocoge/cbl/cogk80.cbl (1.989 righe)

Gestione archivio polizze in coassicurazione. Per ogni polizza (ramo + numero) definisce il pool coassicurativo: compagnie partecipanti, percentuali, dati contrattuali (date inizio/fine, rateazione, contraente). Modalita' "A" (Aggiornamento) o "S" (Selezione quando chiamato da altri).

Dati testata: Ramo (2 cifre), polizza (13 cifre), date contratto, rateazione (A=Annuale, S=Semestrale), contraente. Delegazione fissa = 56.

Dettaglio griglia (max 900 righe): Codice compagnia, descrizione (da COGGEANA tipo "C"), percentuale partecipazione, agente associato. Somma percentuali <= 100%.

File: COGTABEL (euta- tipo "A8"), COGGEANA (ana-), COGCOASS (coa-). CALL: COGK63, COGS52W, COGS60W, COGS65W, GRIDADMN.

COGK84 — Inserimento quietanze¶

File: /programmi/eurocoge/cbl/cogk84.cbl (1.864 righe)

Caricamento e gestione quietanze (premi) con calcolo automatico provvigioni e ripartizione pro-quota per ogni compagnia del pool.

Dati: Ramo, polizza, data scadenza, premio lordo/netto, provvigione, tipo provvigione (Q=quietanza, P=polizza nuova), flag pagato, data pagamento.

Calcoli automatici: Provvigione = 7% del netto (se non specificata). Ripartizione: lordo(k) = importo * perc(k) / 100. Ritenuta d'acconto: (provvigione / 5) * 23 / 100. Se data incasso presente, copia importi quietanza su importi incasso.

File: COGTABEL (euta-), COGCOASS (coa-), COASSMOV (csm-). CALL: COGK63, COGK88, COGS52W, COGS95, COGU10W, GRIDADMN.

COGK98 — Inserimento quietanze (variante con dettaglio per compagnia)¶

File: /programmi/eurocoge/cbl/cogk98.cbl (1.594 righe)

Variante di COGK84 con input dettagliato per singola compagnia. A differenza di COGK84 (ripartizione automatica), qui si specificano manualmente per ciascuna compagnia: premio lordo, netto, provvigione, ritenuta d'acconto, flag polizza nuova. Aggiorna sia COGCOASS che COASSMOV con flag csm-aggio-det-quie = 1.

File: COGCOASS (coa-), COASSMOV (csm-). CALL: COGK63, COGS65W, GRIDADMN.

COGK83 — Inserimento incassi da file esterno¶

File: /programmi/eurocoge/cbl/cogk83.cbl (1.191 righe)

Import automatizzato incassi coassicurativi da file CSV/XLS (diari di cassa). Incrocia i dati con le polizze e aggiorna i movimenti di incasso.

Input: Percorso file, delimitatore (default ";", forzato a ","). Supporto thin-client (COPIAF) e conversione Excel (ESTRXLS).

Logica matching: Per ogni riga CSV, ricerca polizza in COGCOASS per numero → ricerca in COASSMOV delle quietanze anno corrente/precedente non incassate → copia importi quietanza su importi incasso con flag csm-tipo-ins = "A" (automatico).

File: COGCOASS (coa-), COASSMOV (csm-), file CSV input. CALL: C$OPENSAVEBOX, COPIAF, ESTRXLS, RNEWCONF.

COGK62 — Gestione incassi¶

File: /programmi/eurocoge/cbl/cogk62.cbl (1.788 righe)

Gestione interattiva incassi nel periodo selezionato. Visualizza solo movimenti con importo incasso lordo <> 0.

Parametri: Data inizio/fine. Lettura COASSMOV per chiave secondaria (data incasso).

Modifica: Calcolo automatico provvigione (7% netto se zero), ripartizione per compagnia, riscrittura COASSMOV. Eliminazione = azzeramento campi incasso (non cancellazione fisica).

File: COGTABEL (euta-), COGCOASS (coa-), COASSMOV (csm-). CALL: COGK88, COGS52W, COGU10W, GRIDADMN.

COGK64 — Inserimento prima nota contabile da coassicurazioni¶

File: /programmi/eurocoge/cbl/cogk64.cbl (1.667 righe)

Ponte tra modulo coassicurazioni e contabilita' generale. Legge movimenti di incasso, raggruppa per compagnia, genera scritture contabili.

Parametri: Date intervallo, data contabile, tipo (Q/I/N).

Configurazione: File COGK64.cnf con mapping conti: conto 1 = ricavi provvigioni, conto 2 = ritenute acconto, conto 20 = tipo operazione.

Registrazioni generate per ogni compagnia:

Riga AVERE conto ricavi (da configurazione)
Riga DARE conto agente (da ana-rifmas/ana-rifcon)
Riga IVA su registro "CC" con codice "ES" (esente) esenzione "10"
Righe ritenute d'acconto (se presenti): dare agente / avere conto ritenute
Riga provvigione netta agente (AVERE)
Riga provvigione netta compagnia come fornitore (DARE)

Numerazione: COGS25 (tipo 66 per prima nota, tipo 68 per IVA).

File: COGTABEL (euta-), COGGEANA (ana-), COGPNONC (pno-), COGARIVA (iva-), COGCOASS (coa-), COASSMOV (csm-), COGAPPOG (app-), COGBNCA (bnc-). CALL: COGS25, COGS52W, COGS54.

2. Tabelle¶

COGK65 — Tabella rami assicurativi¶

File: /programmi/eurocoge/cbl/cogk65.cbl (1.057 righe)

Gestione tabella rami assicurativi (COGTABEL tipo "A8"). Interfaccia a griglia, richiamabile in modalita' selezione (linkage utilk65.cpy).

Struttura record: Codice ramo, descrizione, tipologia (E=Elementare, O=Obbligatorio, V=Vita, N=Altri rami), codice alternativo, descrizione alternativa.

Modalita': Selezione (ritorna codice+descrizione) o Aggiornamento (CRUD). Griglia fino a 900 righe.

File: COGTABEL (euta- tipo "A8"). CALL: GRIDADMN, COGS60W.

3. Stampe¶

COGK89 — Elenco polizze in coassicurazione¶

File: /programmi/eurocoge/cbl/cogk89.cbl (1.006 righe)

Stampa elenco polizze raggruppate per ramo/polizza. Per ogni polizza mostra tutte le compagnie con percentuale, agente, date.

Logica: Scansione COGCOASS → file lavoro (chiave ramo+polizza+compagnia) → stampa con rottura su ramo/polizza. Decodifica compagnie e agenti da COGGEANA (tipo "C" e "F").

File: COGCOASS (coa-), COASSMOV (csm-), COGGEANA (ana-), FLSTA. CALL: COGS52W, COGS54.

COGK86 — Elenchi raggruppati per compagnia¶

File: /programmi/eurocoge/cbl/cogk86.cbl (1.516 righe)

Stampa di controllo raggruppata per compagnia con 3 tipi: Q=Quietanze, I=Incassi, N=Non Incassati.

Parametri: Date da/a, tipo stampa (Q/I/N).

Dettaglio per compagnia: Intestazione con dati bancari (ABI/CAB da COGAPPOG+COGBNCA), C/C, CIN, agente. Righe: data, contraente, ramo, polizza, percentuale, premio lordo/netto, Q/P, provvigione, ritenuta. Totali parziali e generali (4 colonne: lordo, netto, provvigioni, ritenute).

File: COGCOASS (coa-), COASSMOV (csm-), COGGEANA (ana-), COGAPPOG (app-), COGBNCA (bnc-), FLSTA. CALL: COGS52W, COGS54, COGS60W.

COGK90 — Elenchi raggruppati per polizza¶

File: /programmi/eurocoge/cbl/cogk90.cbl (1.427 righe)

Stampa di controllo raggruppata per ramo/polizza (anziche' per compagnia). Stessi 3 tipi di COGK86. Struttura identica a COGK86 ma con chiave lavoro ramo+polizza in testa.

Parametri: Date da/a, tipo stampa (Q/I/N).

File: COGCOASS (coa-), COASSMOV (csm-), COGGEANA (ana-), COGAPPOG (app-), COGBNCA (bnc-), FLSTA. CALL: COGS52W, COGS54, COGS60W.

COGK87 — Estratto conto per compagnia¶

File: /programmi/eurocoge/cbl/cogk87.cbl (2.267 righe)

Programma piu' complesso del modulo: genera estratto conto formale per compagnie con intestazione, dettaglio tabellare, calcolo saldo, ritenute d'acconto (legge 53/83) e opzionalmente contabilizzazione in prima nota.

Parametri: Flag contabilizzo (S/N), data estratto conto, periodo competenza da/a, tutte le compagnie o singola (con ricerca per nome).

Calcolo automatico ritenuta: Se provvigione presente ma ritenuta a zero: (provvigione / 5) * 23 / 100, con REWRITE su COASSMOV. Esclude compagnia 88888 (propria agenzia).

Contabilizzazione (opzionale): Per ogni compagnia, scrive 2 righe prima nota: AVERE conto compagnia (ana-rifmas/rifcon/cod) tipo op. 150, DARE conto 01-22-18 (debito CAP). Numerazione via COGS25.

File: COGTABEL (euta- tipo "A8"/66), COGGEANA (ana-), COGCOASS (coa-), COASSMOV (csm-), COGAPPOG (app-), COGBNCA (bnc-), COGPNONC (pno-), FLSTA. CALL: COGS52W, COGS54, COGS95, COGS25.

4. Flusso integrato¶

CONFIGURAZIONE:
└── COGK65 (tabella rami assicurativi — COGTABEL tipo "A8")

GESTIONE POLIZZE:
└── COGK80 (definizione pool: compagnie + percentuali)
    └── WRITE COGCOASS

QUIETANZE (premi):
├── COGK84 (inserimento con ripartizione automatica)
│   └── WRITE COASSMOV (quietanze)
└── COGK98 (inserimento con dettaglio manuale per compagnia)
    └── WRITE COASSMOV + UPDATE COGCOASS

INCASSI:
├── COGK83 (import automatico da file CSV/XLS)
│   └── UPDATE COASSMOV (incassi, flag "A")
└── COGK62 (gestione interattiva incassi)
    └── UPDATE COASSMOV (incassi)

CONTABILIZZAZIONE:
└── COGK64 (genera prima nota + IVA da incassi)
    ├── WRITE COGPNONC (provvigioni, ritenute, partite)
    └── WRITE COGARIVA (registro IVA "CC")

STAMPE / ESTRATTI CONTO:
├── COGK89 (elenco polizze per ramo/polizza)
├── COGK86 (controllo per compagnia — Q/I/N)
├── COGK90 (controllo per polizza — Q/I/N)
└── COGK87 (estratto conto formale + contabilizzazione opzionale)
    ├── REWRITE COASSMOV (ricalcolo ritenute)
    └── WRITE COGPNONC (se contabilizzo=S)

5. File principali¶

File	Prefisso	Descrizione
COGCOASS	coa-	Polizze coassicurazione: pool compagnie, percentuali, contraente, date, rateazione
COASSMOV	csm-	Movimenti coassicurazione: quietanze e incassi con dettaglio per compagnia (lordo, netto, provvigioni, ritenute)
COGTABEL tipo "A8"	euta-	Rami assicurativi (codice, descrizione, tipologia E/O/V/N)

Matrice utilizzo file:

File	K80	K84	K98	K83	K62	K64	K65	K89	K86	K90	K87
COGCOASS	R/W/D	R	R/W	R	R	R	-	R	R	R	R
COASSMOV	-	R/W/D	R/W	R/W	R/W	R	-	R	R	R	R/W
COGGEANA	R	-	-	-	-	R	-	R	R	R	R
COGPNONC	-	-	-	-	-	W	-	-	-	-	W
COGARIVA	-	-	-	-	-	W	-	-	-	-	-

6. Tabella riepilogativa¶

#	Programma	Righe	Tipo	Funzione
1	COGK80	1.989	Operativo	Polizze in coassicurazione
2	COGK84	1.864	Operativo	Inserimento quietanze (auto)
3	COGK98	1.594	Operativo	Inserimento quietanze (dettaglio)
4	COGK83	1.191	Batch/Import	Import incassi da file CSV/XLS
5	COGK62	1.788	Operativo	Gestione incassi
6	COGK64	1.667	Batch	Prima nota contabile da coassicurazioni
7	COGK65	1.057	Tabella	Rami assicurativi
8	COGK89	1.006	Stampa	Elenco polizze per ramo/polizza
9	COGK86	1.516	Stampa	Controllo per compagnia (Q/I/N)
10	COGK90	1.427	Stampa	Controllo per polizza (Q/I/N)
11	COGK87	2.267	Stampa	Estratto conto per compagnia (+contab.)
	TOTALE	17.366