SWN134 - Note per prescrittore/cliente

Nome programma SWN134 Linkage section UTILAGPRG - Linkage comune Id processo: 134 Nome processo: NOTE-PRESCR Tabelle principali gestite

AREA	AREAGATE	Direzione
LODNPDFC	ARPNOTEPRESCRITTORE	------> <------

Logica generale Sincronizzazione della note per cliente/prescrittore 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 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: ARPNOTEPRESCRITTORE Se fallita inviare una Segnalazione critica e chiudere. C - Importazione aggiornamenti Effettuare una query per estrarre tutti gli elementi aggiornati su APP: SELECT * FROM ARPNOTEPRESCRITTORE WHERE anpr_azi = azienda AND (anpr_agg_app <> ' ') Gli elementi potranno essere: * Cancellati: se ANPR-FL-CANC = "C" * Inseriti o aggiornati: se ANPR-FL-CANC <> "C" C.1 - Importazione elemento nuovo o aggiornato Fare una ricerca su LODNPDFC impostando:

Dato	Contenuto
NPF-TITOLARE-TIP	Se ANPR-TIPO-TITOLARE:
NPF-TITOLARE-COD	Se ANPR-TIPO-TITOLARE:
NPD-SUD-TIP	ANPR-SUD-TIP
NPD-SUD-1	ANPR-SUD-1
NPD-SUD-2	ANPR-SUD-2
NPD-PROG	ANPR-PROG

Se l'elemento non esiste, inserirlo. Quindi proseguire con l'aggiornamento di LODNPFC.

Dato	Contenuto
NPD-LEN	Lunghezza sighificativa delle note
NPD-DES	ANPR-NOTE

C.2 - Importazione elemento cancellato Dopo aver cercato l'esistenza del record di COGSOTCM, 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 "ARPNOTEPRESCRITTORE"; se il record non esiste, crearlo impostando

Dato	Contenuto
A_SYN_AZIENDA	Codice azienda
A_SYN_TABELLA	"ARPNOTEPRESCRITTORE"
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 ARPNOTEPRESCRITTORE: SELECT * FROM ARPNOTEPRESCRITTORE WHERE anpr_azi = 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 LODNPDFC 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 LODNPDFC; ogni record va considerato
Esportazione standard		Si effettua la ricerca del log aggiornamenti della tabella LODNPDFC a partire da ultima data/ora aggiornamento. Vedi ad esempio GRSM01 Se il flag di log TLF-LOD-LOG (40) non è attivo, dare una segnalazione critica e uscire
Pulizia	AGPRG-OPE = "PULIZIA"	Si esegue il punto B.3

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 ARPNOTEPRESCRITTORE

Dato	Contenuto
ANPR-AZI	Codice azienda
ANPR-TIPO-TITOLARE	Se NPF-TITOLARE-TIP
ANPR-TIT-PRESC-TIP	Se NPF-TITOLARE-TIP
ANPR-TIT-PRESC-COD	Se NPF-TITOLARE-TIP
ANPR-TIT-CLIENTE	Se NPF-TITOLARE-TIP
ANPR-SUD-TIP	NPD-SUD-TIP
ANPR-SUD-1	NPD-SUD-1
ANPR-SUD-2	NPD-SUD-2
ANPR-PROG	NPD-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 COGSOTCM

Dato	Contenuto	Confronto?
ANPR-NOTE	NPD-DES (1:NPD-LEN) (*)	Si
ANPR-AGG-APP	" "
ANPR-ID-SINCRO	Id sincro + 1
ANPR-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 ANPR-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	"ARPNOTEPRESCRITTORE"
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