SWN006 - Tipi difetto¶
Nome programma SWN006 Linkage section UTILAGPRG - Linkage comune Id processo: 9 Nome processo:TIPI-DIFETTO Tabelle principali gestite
| AREA | AREAGATE | Direzione |
|---|---|---|
| ASNTPDIF | ARPTPDIF | ------> <------ |
Logica generale Esportazione della tabella "Tipi difetto" Al momento è previsto solo l'esportazione da gestionale. Configurazioni possibili
| Gruppo | Parametro | Note |
|---|---|---|
| abilita | attiva-areaapp | |
| areaapp | cod-azienda | |
| areaapp | db-conn-string | |
| areaapp | agg-postgres-online | |
| ass-strum | priorita-default |
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. B - Apertura B.1 Apertura tabelle Tentare l'apertura della tabella da sincronizzare: ARPTPDIF Se fallita inviare una Segnalazione critica e chiudere. C - Importazione aggiornamenti Effettuare una query per estrarre tutti i tipi difetto aggiornati su APP: SELECT * FROM arptpdif WHERE a_atpd_azi = azienda AND a_atpd_fl_agg = 'A' I tipi difetto potranno essere: * Cancellati: se A_ATPD_FL_CANC = "C" * Inseriti o aggiornati: se A_ATPD_FL_CANC <> "C" C.1 - Importazione tipo difetto nuovo o aggiornato Fare una ricerca su ASNTPDIF impostando:
| Dato | Contenuto |
|---|---|
| ATPD-COD | A-ATPD-COD |
Se il tipo difetto non esiste, inserirlo. Quindi proseguire con l'aggiornamento di ASNTPDIF.
| Dato | Contenuto |
|---|---|
| ATPD-DES | A-ATPD-DES |
C.2 - Importazione tipo difetto cancellato Fare una ricerca su ASNTPDIF impostando:
| Dato | Contenuto |
|---|---|
| ATPD-COD | A-ATPD-COD |
Se il tipo difetto esiste, effettuare la cancellazione fisica del record. B - Esportazione informazioni aggiornate * ID SINCRO: gestito * Esportazione differenziale: gestita ma non ottimizzata: non esiste una chiave diretta per ottenere solo i record aggiornati: si dovrà usare data/ora ultimo aggiornamento * Cancellazione logica: 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 "ARPTPDIF"; se il record non esiste, crearlo impostando
| Dato | Contenuto |
|---|---|
| A_SYN_AZIENDA | Codice azienda |
| A_SYN_TABELLA | "ARPTPDIF" |
| A_SYN_DA_GES_DATA | 0 |
| A_SYN_DA_GES_ORA | 0 |
| A_SYN_DA_ID_SINCRO | 1 |
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.1 Ricerca record da esportare
| Tipo di elaborazione | Condizione | Cosa fare |
|---|---|---|
| Singolo record | AGPRG-KEY <> " " | Si legge direttamente il record da aggiornare su ASNTPDIF 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 ASNTPDIF; ogni record va considerato |
| Esportazione standard | Si scorrono tutti i record di ASNTPDIF: si considerano solo i record dove: (ATPD-DA-DATA+ATPD-DA-TIME) >= (A-SYN-DA-GES-DATA+A-SYN-DA-GES-ORA) |
|
| Pulizia | AGPRG-OPE = "PULIZIA" | Eseguire solo il giro di cancellazione logica B.3 quindi uscire |
Per ciascun record valido si cercano tutti i record collegati (in questo caso non ce ne sono) B.2.2 Verifica ed esportazione record Dopodichè si effettua la ricerca dell'informazione su ARPTPDIF
| Dato | Contenuto |
|---|---|
| A-ATPD-AZI | Codice azienda |
| A-ATPD-COD | ATPD-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 ASNPRIOR
| Dato | Contenuto | Confronto? |
|---|---|---|
| A-ATPD-AZIENDA | Codice azienda | |
| A-ATPD-COD | ATPD-COD | |
| A-ATPD-DES | ATPD-DES | Si |
| A-ATPD-TIP-MAT | APRI-TIP-MAT | Si |
| A-ATPD-FL-CANC | " " | |
| A-ATPD-ID-SINCRO | Prossimo id sincro | |
| A-ATPD-FL-AGG | " " |
In questa fase tenere memoria di data+ora dell'ultimo record di input considerato. B.3 Verifica record cancellati Sulla tabella di origine ASNTPDIF non esiste il flag di cancellazione logica. Quindi per esportare l'informazione relativa ai record cancellati si opererà come segue: 1. Scorrere tutti i record di ARPTPDIF 2. Ricerca, per ciascuno, del corrispondente record su ASNTPDIF A questo punto la situazione potrebbe essere la seguente:
| ASNTPDIF trovato? |
A-ATPD-FL-CANC | Cosa fare |
|---|---|---|
| Si | "C" | Aggiornare ARPTPDIF impostando |
| Si | " " | Nessuna operazione |
| No | "C" | Nessuna operazione |
| No | " " | Aggiornare ARPTPDIF impostando |
B.9 - Aggiornamento id syncro Al termine dell'elaborazione, aggiornare il record APSTATOSYN:
| Dato | Contenuto |
|---|---|
| A_SYN_AZIENDA | Codice azienda |
| A_SYN_TABELLA | "ARPTPDIF" |
| 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 |
Estratto da documentazione interna ClickUp