SWN135 - Lotti di default per operatore/sede¶
Nome programma SWN135 Linkage section UTILAGPRG - Linkage comune Id processo: 135 Nome processo: LOTTI-DEFAULT Tabelle principali gestite
| AREA | AREAGATE | Direzione |
|---|---|---|
| COGMERLT | ARPLOTTIDEFAULT | ------> <------ |
Logica generale Sincronizzazione dei lotti di default per merce/operatore/sede ATTENZIONE: La funzione dovrà essere eseguita solo se è configurata la gestione semplificata dei lotti (AZ-LOTTI = "S") Esportazione Esportazione di tutti i record effettivamente modificati, valutati in base al log di aggiornamento Importazione Le applicazioni WEB potranno inserire, modificare o cancellare logicamente nuovi record 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 Skippare tutta l'elaborazione se: * AZ-LOTTI = 'S' * AZ-GES-LO = 'S' 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: ARPLOTTIDEFAULT Se fallita inviare una Segnalazione critica e chiudere. C - Importazione aggiornamenti Effettuare una query per estrarre tutti gli elementi aggiornati su APP: SELECT * FROM ARPLOTTIDEFAULT WHERE a_ldef_azienda = azienda AND (a_ldef_agg_app <> ' ') Gli elementi potranno essere: * Cancellati: se A-LDEF-FL-CANC = "C" * Inseriti o aggiornati: se A-LDEF-FL-CANC <> "C" C.1 - Importazione elemento nuovo o aggiornato Fare una ricerca su COGMERLT impostando:
| Dato | Contenuto |
|---|---|
| MLT-MERCE | A-LDEF-MERCE |
| MLT-MAG | A-LDEF-SEDE |
| MLT-PROG | A-LDEF-OPERATORE |
Se l'elemento non esiste, inserirlo. Quindi proseguire con l'aggiornamento di COGMERLT.
| Dato | Contenuto |
|---|---|
| MLT-LOTTO | A-LDEF-LOTTO |
C.2 - Importazione elemento cancellato Dopo aver cercato l'esistenza del record di COGMERLT, come al punto C.1, se il record esiste effettuare la cancellazione fisica 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 "ARPLOTTIDEFAULT"; se il record non esiste, crearlo impostando
| Dato | Contenuto |
|---|---|
| A_SYN_AZIENDA | Codice azienda |
| A_SYN_TABELLA | "ARPLOTTIDEFAULT" |
| 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 ARPLOTTIDEFAULT: SELECT * FROM ARPLOTTIDEFAULT WHERE a_ldef_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 COGMERLT 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 COGMERLT; ogni record va considerato |
| Esportazione standard | Si effettua la ricerca del log aggiornamenti della tabella COGMERLT a partire da ultima data/ora aggiornamento. Vedi ad esempio SWN134 Se il flag di log TLF-CO-LOG (138) non è attivo, dare una segnalazione critica e 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 ARPLOTTIDEFAULT
| Dato | Contenuto |
|---|---|
| A-LDEF-AZIENDA | Codice azienda |
| A-LDEF-MERCE | MLT-MERCE |
| A-LDEF-SEDE | MLT-MAG |
| A-LDEF-OPERATORE | MLT-PROG |
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 COGMERLT
| Dato | Contenuto | Confronto? |
|---|---|---|
| A-LDEF-LOTTO | MLT-LOTTO | Si |
| A-LDEF-AGG-APP | " " | |
| A-LDEF-ID-SINCRO | Id sincro + 1 | |
| A-LDEF-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-LDEF-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 | "ARPLOTTIDEFAULT" |
| 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 |
Estratto da documentazione interna ClickUp