Vai al contenuto

SWN136 - Azioni, Piani di controllo, Raccordi

Nome programma SWN136 Linkage section UTILAGPRG - Linkage comune Id processo: 136 Nome processo: AZIONI Tabelle principali gestite

AREA AREAGATE Direzione
LODAZION ARPLODAZIONI ------>
LODCONTR ARPLODCONTR ------> (TASK-5127, dal 2026-05-26)
LODRACCO ARPLODRACCO ------> (TASK-5127, dal 2026-05-26 -- solo tipo AC = Azioni/Piani di controllo)

Logica generale Sincronizzazione delle "azioni" che compongono i piani di fabbricazione, delle anagrafiche dei piani di controllo (LODCONTR) e dei raccordi azioni-piani di controllo (LODRACCO). Esportazione Esportazione di tutti i record effettivamente modificati, valutati in base al log aggiornamenti Importazione Non prevista Configurazioni possibili

Gruppo Parametro Note
abilita attiva-areaapp
areaapp cod-azienda
areaapp db-conn-string
areaapp agg-postgres-online

Elaborazione Tipi di segnalazione: Vedi Tipi di segnalazione A - Controllo di esecuzione Vedi Controllo di esecuzione A.1 - Aggiornamento KEEP-ALIVE Per il momento non lo eseguiamo: il keep-alive viene tenuto aggiornato dal thread autonomo di aglancio; se il programma venisse chiamato in "tempo reale" dal programma di gestione, non necessita comunque del keep-alive. A.2 - Apertura A.2.1 Apertura tabelle Tentare l'apertura della tabella da sincronizzare: ARPLODAZIONI Se fallita inviare una Segnalazione critica e chiudere. B - Esportazione informazioni aggiornate * ID SINCRO: gestito * Esportazione differenziale: gestita e ottimizzata, attraverso una data specifica collegata a data/ora aggiornamento * Cancellazione logica: non gestita In questa fase si dovrà tenere conto di * Limite record * Limite errori * "Esporta tutto" B.1 - Stato sincronizzazione Sulla tabella APSTATOSYN, leggere il record relativo alla tabella/oggetto da sincronizzare "ARPLODAZIONI"; se il record non esiste, crearlo impostando

Dato Contenuto
A_SYN_AZIENDA Codice azienda
A_SYN_TABELLA "ARPLODAZIONI"
A_SYN_DA_GES_DATA 0
A_SYN_DA_GES_ORA 0
A_SYN_DA_ID_SINCRO 1
A-SYN-VERSIONE 2

Qui otterremo due informazioni importanti: * Data/ora ultima esportazione da gestionale a postgres (A_SYN_DA_GES_DATA e A_SY_DA_GES_ORA) * Prossimo ID sincronizzazione da memorizzare sulla tabella (A_SYN_ID_SINCRO) B.2 - Ricerca record da esportare B.2.0 Verifica se prima esportazione Tramite una query verificare l'esistenza di almeno un record su ARPLODAZIONI: SELECT * FROM ARPLODAZIONI WHERE a_laz_azienda = azienda LIMIT 1 Se non esiste nemmeno un record, forzare l'esportazione completa (AGPR-ESPORTA-TUTTO = "S") B.2.1 Ricerca record da esportare

Tipo di elaborazione Condizione Cosa fare
Singolo record AGPRG-KEY <> " " Si legge direttamente il record da aggiornare su LODAZION
Verrà eseguita se agg-postgres-online è attiva
Se viene sincronizzato un record cancellato, verrà effettuata la cancellazione logica
Esportazione totale AGPRG-ESPORTA-TUTTO = "S" Si scorrono tutti i record di LODAZION; ogni record va considerato
Esportazione standard Si effettua la ricerca del log aggiornamenti della tabella LODAZION a partire da ultima data/ora aggiornamento.
Vedi ad esempio SWN134
Se il flag di log TLF-LOD-LOG (6) non è attivo, dare una segnalazione critica e uscire

Per ciascun record valido si cercano tutti i record collegati: LODDESCR Qui si preleva la descrizione estesa leggendo il record con:ù * LDE-TIP = 'A1' * LDE-COD = Codice azione * LDE-PRO = 0 B.2.2 Verifica ed esportazione record Dopodichè si effettua la ricerca dell'informazione su ARPLODAZIONI

Dato Contenuto
A-LAZ-AZIENDA Codice azienda
A-LAZ-COD LAZ-COD

Se non esiste, inserirlo. Se esiste, aggiornarlo l'aggiornamento del record deve avvenire solo se almeno un dato tra quelli da modificare è diverso. NB: se è stata richiesta l'esportazione completa (AGPRG-ESPORTA-TUTTO = "S") allora il record dovrà essere esportato a prescindere dal confronto Suggerimento Invece di popolare direttamente i dati del record di destinazione, portarli su delle copie in w/s. Al termine confrontare i dati sulla destinazione con la copia in w/s. Aggiornamento da LODAZION

Dato Contenuto Confronto?
A-LAZ-DES LAZ-DES Si
A-LAZ-DES-ATTIVITA Descrizione estesa
A-LAZ-AGG-APP " "
A-LAZ-ID-SINCRO Id sincro + 1
A-LAZ-FL-CANC " " Si

(*) Questi campi dovranno essere parsati con GESSTR prima del confronto B.2.3 - Esportazione record cancellato Se il log di aggiornamento ha LGR-OPERAZIONE = "C" (cancellazione), l'esportazione non cambia, ma si dovrà impostare A-LAZ-FL-CANC = 'S' B.9 - Aggiornamento id syncro Al termine dell'elaborazione, aggiornare il record APSTATOSYN:

Dato Contenuto
A-SYN-AZIENDA Codice azienda
A-SYN-TABELLA "ARPLODAZIONI"
A-SYN-DA-GES-DATA Data/ora dell'ultimo record aggiornato
A-SYN-DA-GES-ORA
A-SYN-DA-ID-SINCRO Ultimo id sincro + 1
A-SYN-VERSIONE 2

TASK-5127 (2026-05-26) - Estensione a LODCONTR e LODRACCO

Aggiunta esportazione delle anagrafiche piani di controllo (LODCONTR) e dei raccordi (LODRACCO) verso le rispettive tabelle Areagate. La logica di gestione APSTATOSYN, id sincro e cancellazione logica e' la stessa di LODAZION, ma con tabelle dedicate (ARPLODCONTR, ARPLODRACCO).

Costanti aggiunte

Nome Valore
k-tabella-statosyn-contr "ARPLODCONTR"
k-tabella-statosyn-racco "ARPLODRACCO"

Variabili working storage aggiunte

Nome Tipo/Scopo
tm-id-sincro-contr / tm-id-sincro-racco Id sincro corrente per ciascuna delle due nuove tabelle
tm-dati-contr (tm-lcn-des-breve, tm-lcn-des-dett, tm-lcn-da-eseguire) Buffer dati per confronto pre-esportazione LODCONTR
tm-dati-racco (tm-lrc-dati) Buffer dati per confronto pre-esportazione LODRACCO
w-tip-des Tipo descrizione da leggere su LODDESCR ("C1"/"C2")
wk Indice di posizione concatenazione descrizione estesa
w-nome-arplodcontr, w-nome-arplodracco Nome file delle nuove tabelle Areagate

Flusso di esportazione LODCONTR (paragrafo b-esportazione-contr)

  1. Lettura/creazione APSTATOSYN con tabella ARPLODCONTR
  2. Scan di LODCONTR (st-lodcontr-notmin + rdnxt-lodcontr)
  3. Per ogni record:
  4. Caricamento descrizione breve (lcn-des) tramite parsing z-converti-w-testo
  5. Caricamento descrizione estesa concatenando LODDESCR tipo C1 poi C2 (paragrafo a2-carica-des); il punto di scrittura nel buffer tm-lcn-des-dett viene avanzato di lde-len + 1 ad ogni segmento. Limite: 1900 caratteri di concatenazione.
  6. Lettura/creazione record su ARPLODCONTR
  7. Skip esportazione se a-lcn-agg-app = "A" (record gia' aggiornato lato APP)
  8. Confronto campi (des-breve, des-dett, da-eseguire, fl-canc); aggiornamento solo se almeno un campo differisce
  9. Incremento tm-id-sincro-contr ad ogni record esportato
  10. Aggiornamento finale APSTATOSYN con data/ora/id sincro

Flusso di esportazione LODRACCO (paragrafo b-esportazione-racco)

Analogo a LODCONTR ma con filtro: scansione limitata a lrc-tip = "AC" (Azioni/Piani di controllo). Chiave: tip + key-1 + key-2. Dati esportati: lrc-dati (2000 char). Tabelle: ARPLODRACCO.

Effetti operativi

  • L'esportazione e' triggerata dalla normale schedulazione di SWN136 (id processo 136).
  • LODCONTR e LODRACCO seguono lo stesso meccanismo differenziale (id sincro + confronto campi) di LODAZION.
  • Per LODRACCO, eventuali altri tipi (diversi da AC) non vengono esportati: utili per altre verticalizzazioni richiederanno l'estensione del filtro.

Estratto da documentazione interna ClickUp -- aggiornato 2026-05-26 (TASK-5127)