Vai al contenuto

ASN625 -- Importazione xls impianti e matricole (TENEC)

Sorgente: cbl/asn625.cbl | Tipo: utility import | Program-ID: ASN625

Menu: Assist 2.0 > Operativo > Utility > Importazione impianti e matricole

Scopo

Personalizzazione TENEC: importazione massiva di impianti e matricole da file Excel. Estrae per ciascuna riga del file le colonne A-P (info cliente, codice cliente, e blocchi di 4 matricole con tipo, sn, merce, marca) e scrive le matricole in Eurocoge.

File e tabelle principali

File/Tabella Uso
feurtab Parametri Eurocoge
cogseque (line sequential, w-seqname) File intermedio CSV/sequenziale generato dall'XLS
cogtrans (indexed, w-trs-name, chiave trs-amtr-sn) File transitorio per deduplica serial number
File da asn625.select/.fd Matricole Assist (target)

Maschera

tab-maschera: - tm-file-ext, tm-file-base, tm-file-mov, tm-file-remote (path file) - tm-tipo-elab (X), tm-test (X) - tm-delimiter (X) -> tm-cfg-delimiter - tm-log-procedura, tm-fl-errori - Contatori: tm-letti, tm-scritti, tm-errori

Struttura riga XLS estratta (w-seq-rec)

A info-cliente (60), B codcli (10),
C-E matricola1 (tipoimp, sn, marca),
F-I matricola2 (tipoimp, sn, merce, marca),
J-L matricola3, M-P matricola4

Copybook chiave

Copybook Uso
utilopenfile.cpy Open file dialog
utilestrxls.cpy Estrazione XLS (CALL ESTRXLS)
utilgesdebug.cpy Log eventi
utilasns27.cpy Subroutine gestione matricole (CALL ASNS27)
utilncnf.cpy Configurazioni
opensave.def Dialog open/save file

Programmi chiamati

Programma Scopo
ESTRXLS Estrazione celle da file XLS verso cogseque
GESLPRC Log procedura
ASNS27 Subroutine creazione/aggiornamento matricola
RNEWCONF Configurazioni

Configurazioni RNEWCONF

Gruppo Chiave Note
Personale tm-cfg-delimiter Delimitatore campo file intermedio

Logica di elaborazione

  1. Init programma, apertura log con gesdebug-apri-principale.
  2. Caricamento bitmap "file" per pulsante custom "Trova file" (F7).
  3. Maschera per acquisizione path file XLS, tipo elaborazione, test, delimitatore.
  4. F3 conferma: CALL ESTRXLS per convertire XLS in file sequenziale (cogseque).
  5. Loop su cogseque: per ogni riga estrae i campi A-P; per ciascuna delle 4 matricole presenti:
  6. Valida codice cliente (w-codcli), spacca codice merce in gruppo/sottogruppo/codice.
  7. Deduplica via cogtrans su SN.
  8. Se non test: CALL ASNS27 per scrivere matricola assist.
  9. Aggiorna contatori tm-letti/tm-scritti/tm-errori.
  10. Chiusura ambiente; log finale degli errori.

Documentazione tecnica generata -- 2026-06-04