COSO59A -- Invio Estratti Conto con Email¶

Sorgente: cbl/coso59a.cbl | Tipo: Programma interattivo | Program-ID: COSO59A

Menu: Contabilita' > Unione soci/clienti > Attivita' in Zona

Scopo¶

Variante di COSO59 per l'invio di estratti conto dettagliati ai soci. La struttura della scansione contabile e' la stessa: scorre l'anagrafica soci di una zona, calcola il saldo aperto per ciascuno, scarta i sotto-soglia. La differenza principale e' nella generazione dell'allegato:

COSO59 compila un modello Word (lettera-addebiti.doc) tramite WORDMDL e lo converte in PDF.
COSO59A genera l'estratto conto come stampa formattata su file PCL, poi convertita in PDF tramite SVIEW.

Il corpo della mail e' inoltre piu' ricco: include riferimento esplicito all'IBAN dell'azienda (letto da COGAPPOG) e segnalazione di competenze pregresse non saldate quando il totale supera l'importo del periodo.

File e tabelle¶

Identiche a COSO59:

File/Tabella	Tipo	Descrizione
COGTABEL (FEURTAB)	Indexed, I-O	Tabella generale (tipo 66, 06/90, AH, 67)
COGCOATT	Indexed, Input	Prima Nota contabilizzata
COGPNONC	Indexed, Input	Prima Nota non contabilizzata
UNANASO	Indexed, I-O	Anagrafica soci (aggiorna `anas-data-email-addebiti`)
COGGEANA	Indexed, Input	Anagrafica generale (email "from" per SRL)
COGAPPOG	Indexed, Input	Coordinate bancarie azienda (IBAN per testo email)
COGTRANS	Indexed temp, I-O	Aggregazione partite per socio + causale
PERSTEXT	Line sequential	File di personalizzazione testo
FLSTA	Sequential	File di stampa estratto conto (formato PCL)

Copybook principali¶

Il programma riusa i copybook di screen di COSO59:

coso59.select / coso59.fd / coso59.decla / coso59.prc -- Screen designer (condivisi con COSO59)
coso59.wrk -- Working dichiarata da coso59
cogfiles.cpy, cogcoatt.cpy, k-u10.cpy
utilmymail.cpy, utilpost.cpy -- Client posta MyMail
utilsview.cpy -- Conversione PCL -> PDF (SVIEW)
utilwordmdl.cpy -- Modelli Word (usato per la variante stampa modello)
Chiavi: cogcoatt.k02, cogpnonc.k02, cogtrans.k01

Configurazioni RNEWCONF lette¶

Identiche a COSO59: gruppo SOCI (conto-di-sconto, email-oggetto), gruppo STAMPE (PERIFERICA-STAMPA-FILE, PATH-STAMPA-FILE), gruppo ARC-OTT (path-apri-file).

Paragrafi principali¶

Struttura analoga a COSO59 (vedi quel programma per i dettagli):

Paragrafo	Funzione
`apri` / `a4` / `a-tm-*` / `a-richiesta-conferma`	Identici a COSO59
`mail` / `conteggia-cogpnonc` / `emibol`	Scansione contabile identica a COSO59
`prepara-nomi-pdf`	Compone nomi file PCL e PDF dell'estratto conto: `stampa.pcl` (input) e `<path-apri-file>\estratto-conto-socio-<anas-cod>.pdf` (output)
`email-estra`	Variante di `chiudi-emi-lettera`: converte stampa.pcl in PDF con SVIEW, prepara mail con testo personalizzato e IBAN, invia con POSTA

Logica di elaborazione¶

Differenze rispetto a COSO59¶

Generazione allegato: SVIEW operazione CONVERTI da stampa.pcl (locale, stampa di sistema) a PDF (path client). L'estratto conto e' la stampa accumulata su FLSTA durante la scansione delle causali.
Corpo email: testo costruito esplicitamente in mymail-text con:
"Spettabile" + ragione sociale + codice socio + indirizzo
"Alleghiamo alla presente il riepilogo delle pratiche e/o servizi... per un totale di Euro "
"Puo' effettuare il bonifico utilizzando il seguente codice IBAN: " (letto da COGAPPOG: app-iban-st + app-iban-cin-e + app-iban-cin-it + app-abi + app-cab + app-c-corr)
Se all-tot >= w-totsocio: nota aggiuntiva sulle competenze pregresse non saldate
No modello Word: a differenza di COSO59 non viene chiamato WORDMDL per "Esegui" del modello; il PDF deriva direttamente dalla stampa PCL.

Selezione soci, scansione contabilita', aggregazione COGTRANS¶

Vedi COSO59 -- la logica e' la stessa.

CALL esterne¶

Programma	Scopo
`COGS52W`, `COGS54`, `COGS65W`, `COGS60W2`, `COGS95W`, `COGS99W`, `COGU10W`	Come COSO59
`SVIEW`	Conversione stampa PCL -> PDF
`WORDMDL`	(Eredita la chiamata per "Apri-XML"/"Aggiungi-XML"/"Chiudi-XML" dal codice condiviso con COSO59, ma non usa "Esegui" per il modello)
`POSTA`	Invio email tramite MyMail
`COPIAF`	Manipolazione file
`RNEWCONF`	Lettura configurazioni

Note implementative¶

File COGTRANS temporaneo: ext-tmp-dir/#$coso59-<datasis>-<timesis>.<operatore> (stesso prefisso di COSO59, gestione separata grazie al timestamp).
I PDF dell'estratto conto sono scritti su <tm-cfg-path-apri-file>\estratto-conto-socio-<anas-cod>.pdf.
Il file PCL sorgente (stampa.pcl) e' nella directory temporanea: il sistema deve poter accedere alla stampa formattata generata durante la scansione.
L'IBAN viene letto da COGAPPOG (record tipo "C", codice = az-cli-int). Cambia per ogni azienda gestita.
Il segnale di "competenze pregresse" nell'email scatta confrontando all-tot (totale generale aperti) con w-totsocio (totale del periodo selezionato).
Non sono presenti marcatori *>DOC: nel sorgente.
Riusa i copybook screen di coso59 (stessa maschera, stessa struttura tab-maschera).