Vai al contenuto

COGEARCH - Anagrafiche per EuroArcdoc

Intestazione

Campo Valore
Sorgente cbl/cogearch.cbl
Tipo Interattivo (maschera testuale)
Modulo Sistema
Posizione menu Sistema > Utility > Esportazioni > Anagrafiche x EuroArcdoc
Autore Borghesan Gian Luca - Eurosystem

Scopo

COGEARCH aggiorna/allinea le anagrafiche del gestionale verso il sistema di archiviazione ottica documentale EuroArcdoc (Archdoc). L'intestazione del sorgente lo dichiara: "Anagrafica richiamata da ARCHDOC".

L'operatore sceglie il tipo anagrafico (Cliente C, Fornitore F o Vettore/Spedizioniere S) ed eventualmente un codice di partenza; alla conferma il programma scandisce l'anagrafica coggeana e, per ciascun soggetto, chiama la subroutine COGU06 con l'operazione "Nuova-Anagrafica", che effettua l'inserimento/aggiornamento del soggetto nell'archivio di EuroArcdoc.

Non produce un file di scarico sequenziale (a differenza degli altri programmi di esportazione GDO): l'esportazione avviene per chiamata a subroutine, record per record.

Tabelle e file usati

File / logico FD / copybook Ruolo Campi chiave rilevanti
coggeana coggeana.cpy (k01) Anagrafica clienti/fornitori/vettori: scansione sequenziale del tipo selezionato ana-tipo, ana-cod, ana-nome
feurtab cogfiles.cpy File tabella di sistema (apertura standard tramite framework maschere) —

Logica di elaborazione

  1. Inizializzazione (a000): imposta l'ambiente tramite SETENV (util-senv, run-type "S"), apre i file (open-files) e legge l'azienda (rd-azi); prepara la maschera pop-up.
  2. Richiesta tipo anagrafico (a-05): accetta tm-tipo-ana accettando solo C, F o S.
  3. Richiesta codice (a-10): tramite la subroutine di ricerca COGS65 acquisisce il codice anagrafico di partenza (tm-codice) e la descrizione. F3 conferma, ESC/F2 tornano indietro.
  4. Scansione ed esportazione (a-30-loop): posiziona coggeana sul tipo/codice (st-coggeana-notmin) e scandisce in avanti (rdnxt-coggeana). Il ciclo si interrompe al cambio tipo anagrafico o, se e' stato indicato un codice specifico (tm-codice not = 0), al primo codice diverso. Per ogni soggetto:
  5. visualizza codice e nome a video;
  6. chiama COGU06 con u06-ope = "Nuova-Anagrafica", passando tipo (u06-do-ana-tip), codice (u06-do-ana-cod) e descrizione (u06-do-ana-des).
  7. Chiusura (fine/z-chiudi): chiude coggeana e la finestra, stop run.

Chiamate a sottoprogrammi / COPY rilevanti

Elemento Tipo Scopo
COGU06 CALL Inserimento/aggiornamento anagrafica in EuroArcdoc (operazione "Nuova-Anagrafica") - via utilu06.cpy
COGS65 CALL Ricerca/selezione codice anagrafico - via utils65.cpy
SETENV CALL Impostazione variabili d'ambiente (via utilsenv.cpy)
coggeana.k01 COPY Chiave primaria anagrafica (per st-/rdnxt-coggeana)
cogazien.cpy COPY Area azienda
mmmask.cpy, winmsg.cpy, grave.cpy, open1.cpy COPY Maschera, messaggi, errori gravi, apertura file

Note

  • Non genera un file di output: l'esportazione avviene chiamando COGU06 una volta per anagrafica; la logica di scrittura verso EuroArcdoc e' incapsulata in quella subroutine.
  • Tipi anagrafici gestiti: C (clienti), F (fornitori), S (vettori/spedizionieri).
  • Il source-computer/object-computer e' rmcobol (non pc-sperry come gli altri programmi del gruppo): dettaglio ereditato dal sorgente originale.
  • Programma interattivo leggero: nessun accumulo/transito, nessuna configurazione persistente su cogtabel, nessuna configurazione RNEWCONF letta direttamente.
  • Nella panoramica di flusso e' anche citato come "Aggiornamento anagrafiche Eurofax" (vedi Sistema - Archivi); la funzione effettiva e' l'allineamento anagrafico verso EuroArcdoc/Archdoc. Vedi anche Sistema - Import/Export.

Documentazione tecnica -- creata 2026-08-07