Vai al contenuto

Laboratori odontotecnici - Integrazioni BI

SWL001 - Scaricamento dati commesse

Questo programma esporta le tabelle necessarie alla realizzazione del cubo di BI per l'analisi dati commesse di laboratorio:

Tabella origine Tabella destinazione Contenuto
LODAZION BINAZION Anagrafica azioni
LODPAZIE BINPAZIE Anagrafica pazienti
LODTABEL BINTDISP Tipi dispositivo
LODRISCH / LODDESCR BINANRIS Tabella analisi dei rischi
LODCONTR BINPCONT Tabella piani di controllo
BINTILAV Tipi di lavoro
BINSTCOM Stati commessa
LODPRESC / LODCMTES / ... BINCOMME / BINLODMV Commesse (dati riepilogativi e di dettaglio)

La logica generale di esportazione: * Le tabelle vengono esportate sempre in toto dopo averle svuotate * Commesse: * Vengono esportate solo le commesse aggiornate (LPM-FL-ESTRATTA = "N") * Le commesse cancellate (vedi GESEVLOG) vengono rimosse dalla base dati BI

Esportazione BINAZION

Il contenuto attuale di BINAZION viene rimosso, dopodiche' tutto il contenuto di LODAZION viene esportato:

Nome campo Note
BLAZ-AZI az-personal
BLAZ-COD LAZ-COD
BLAZ-DESCR LAZ-DES
BLAZ-TEMPO-STD LAZ-TEMPO-STD
BLAZ-DATA-AGG Data sistema

Esportazione BINPAZIE

Il contenuto attuale di BINPAZIE viene rimosso, dopodiche' tutto il contenuto di LODPAZIE viene esportato:

Nome campo Note
BLPZ-AZI az-personal
BLPZ-COD LPZ-COD
BLPZ-NOME LPZ-DES
BLPZ-DATA-AGG Data sistema

Esportazione BINTDISP

Il contenuto attuale di BINTDISP viene rimosso. Si scorre LODTABEL per tutti i record di tipo = "08":

Nome campo Note
BTDI-AZI az-personal
BTDI-COD LTA-COD
BTDI-DESCR LTA-08-DES
BTDI-DATA-AGG Data sistema
BTDI-GG LTA-08-GG
BTDI-N-USCITE LTA-08-N-USCITE

Esportazione BINANRIS

Il contenuto attuale di BINANRIS viene rimosso. Si scorre LODRISCH:

Nome campo Note
BARI-AZI az-personal
BARI-COD LRS-COD
BARI-DATA-AGG Data sistema
BARI-DESCR La descrizione viene trovata su LODDESCR

Esportazione BINPCONT

Il contenuto attuale di BINPCONT viene rimosso. Si scorre LODCONTR:

Nome campo Note
BPIC-AZI az-personal
BPIC-COD LCN-COD
BPIC-DATA-AGG Data sistema
BPIC-DESCR LCN-DES

Esportazione BINTILAV

Tabella costruita a runtime da una tabella fissa interna al programma:

Codice Descrizione
C Lavoro completo
P Parte di dispositivo
R Riparazione
D Disp.+riparazione
V Varie
S Scheletrato
A Accessorio
Nome campo Note
BTLA-AZI az-personal
BTLA-COD Codice
BTLA-DATA-AGG Data sistema
BTLA-DESCR Descrizione

Esportazione BINSTCOM

Tabella costruita a runtime da una tabella fissa interna al programma:

Codice Descrizione
P Prescrizione
N Commessa senza progettazione
A Commessa aperta
U Commessa sospesa per controllo utente
C Commessa chiusa
E Commessa evasa
Nome campo Note
BSCO-AZI az-personal
BSCO-COD Codice
BSCO-DATA-AGG Data sistema
BSCO-DESCR Descrizione

Esportazione BINCOMME/BINLODMV

A - Esportazione commesse aggiornate Lettura di LODPRESC usando LPM-CHIA6, impostando LPM-FL-ESTRATTA = "N". Saranno scartate le commesse con stato: "P" e "N" (commesse senza progettazione).

A.1 - Preparazione * Lettura di LODCMTES * Lettura di LODPNTES * Chiamata a COGZS5 con ZS5-SCRIVI-DETTAGLIO = "S"

A.2 - Esportazione commessa

Nome campo Note
BCOM-AZI az-personal
BCOM-NUM LPM-NUM
BCOM-DES LPT-DES
BCOM-MED LPM-MED
BCOM-PADRE Codice cliente padre di LPM-MED
BCOM-PAZ LPM-PAZ
BCOM-PAZ-ESTESO LPM-PAZ-ESTESO
BCOM-PRO LPM-PRO
BCOM-RESP LCT-RESP
BCOM-TIP-LAV LPM-TIP-LAV
BCOM-TIP-DSP LPM-TIP-DST
BCOM-REPARTO LCT-REPARTO
BCOM-DATA-INI LPM-DATA
BCOM-DATA-FIN LCT-DATA-FIN
BCOM-STATO LPM-STATO
BCOM-QTA 1
BCOM-DATA-AGG data sistema
BCOM-COSTO-MAN-OPERA ZS5-COSTO-MAN-OPERA
BCOM-COSTO-MATERIALI ZS5-COSTO-MATERIALI
BCOM-RICAVO-PRESTAZIONI ZS5-RICAVO-PRESTAZIONI
BCOM-SEDE Se la configurazione numero-commessa-automatico vale "K", inserire il primo carattere del numero commessa

A.3 - Esportazione dettaglio commessa Eliminare il contenuto di BINLODMV per la commessa in elaborazione. COGZS5 restituira' un dettaglio di costi/ricavi; il dettaglio contiene costi/ricavi su righe separate (BMLV-CLASSE); per ottenere dati piu' leggibili, si ripartiranno: * Il totale costi sulle righe di ricavo * Il totale ricavo sulle righe di costo

Il tutto proporzionalmente all'importo contenuto sulle singole righe.

Nome campo Contenuto
BMLV-AZI az-personal
BLMV-COMMESSA T-DET-COM
BLMV-PROG T-DET-PROG
BLMV-RIGA T-DET-RIGA
BLMV-DATA T-DET-DATA
BLMV-MOV-TIP T-DET-MOV-TIP
BLMV-OPE T-DET-OPE
BLMV-MERCE T-DET-MERCE
BLMV-PRS T-DET-PRS
BLMV-FL-RIF T-DET-FL-RIF
BLMV-PRS-ID T-DET-PRS-ID
BLMV-STATO LODPRESC.LPR-STATO
BLMV-QTA T-DET-QTA-MERCE
BLMV-RICAVO-U / BLMV-RICAVO-T Valorizzare ricavo o costo a seconda di T-DET-MOV-TIP
BLMV-COSTO-U / BLMV-COSTO-T
BLMV-CLI-COD LODPRESC.LPM-MED
BLMV-MEDICO LODPRESC.LPM-DOTTORE
BMLV-AZIONE T-DET-AZIONE
BMLV-REPARTO T-DET-REPARTO
BMLV-SOTTOREP T-DET-SOTTOREP
BMLV-TEMPO-TIP T-DET-TEMPO-TIP
BMLV-SEDE T-DET-SEDE (se non significativo, usare BCOM-SEDE)

A.3.1 - Quantita' prestazioni per operatore/totali Per rispondere a "Quante e quali prestazioni ha effettuato un operatore nel periodo?" e "Quante e quali prestazioni sono state effettuate nel periodo in tutto?", i dati vengono estratti dal dettaglio commessa con classe "QtaPrest": * Scansione di LODPNMAT, per tutte le prestazioni (LMT-TIP = 'P') * Ricerca della riga commessa LOD * Ricerca del dettaglio esecuzione LODCMDET

A.4 - Aggiornamento testata commessa Si modifica LODPRESC aggiornando LPM-FL-ESTRATTA = "S".

B - Rimozione commesse cancellate Le commesse cancellate vengono registrate su COGEVLOG. Scorrere COGEVLOG usando EVL-CHIA2, impostando EVL-TIP = K-EVL-CANC-LODCMTES. Per tutti i record corrispondenti: * Verificare se esiste il record BINCOMME: se si: * Cancellare tutti i record di BINLODMV collegati * Cancellare BINCOMME stesso


Estratto da documentazione interna ClickUp