IMPPREDF

Posizione nel menu Programma non a menu Linkage section

Tipo	Nome campo	Note
Input	IMPPREDF-PROGRAMMA	Codice programma su cui lavorare
Input	IMPPREDF-OPE	Operazione
I/O	IMPPREDF-PNT	Numero di elementi nella tabella valori
I/O	IMPPREDF-ELE	Tabella che contiene da 1 a 999 elementi. Ogni elemento sarà composto da:
		Nome variabile
		Tipo di variabile:
		Valore numerico variabile
		Valore alfanumerico variabile
Output	IMPPREDF-ESITO	Esito dell'operazione

NB: la linkage è già presente in "UTILIMPPREDF.CPY°. Logica generale Funzione che permette la completa gestione delle impostazioni predefinite per programma Maschera del programma Testata Operazione Etichetta che indica l'operazione attuale: * "Salva impostazione": permette di impostare una descrizione e aggiungere la nuova impostazione all'elenco * "Seleziona impostazione": permette la selezione di una impostazione esistente Descrizione Titolo dell'impostazione Questo campo sarà abilitato solo in caso di operazione "SALVA": qui l'utente dovrà dare un nome all'impostazione. Visibilità Campo a valori fissi in cui sarà possibile selezionare: * "U":Pubblico: l'impostazione è visibile a tutti * "P":Privato: l'impostazione è visibile solo a chi la ha inserita. Dettaglio Nel dettaglio sarà presente una griglia non paginata modificabile. Conterrà l'elenco delle impostazioni predefinite presenti sul programma selezionato. Per riempire la griglia: * Scansione di COGIPDTS su IDT-CHIA3, impostando: * IDT-PROGRAMMA = IMPPREDF-PROGRAMMA * Se IDT-VISIBILITA vale * "U" (pubblico): il record viene selezionato * "P" (privato): * cercare l'esistenza di un record su COGIPDAB impostando: * IDB-PROGRAMMA = IDT-PROGRAMMA * IDB-PROGR = IDT-PROGR * IDB-OPE = wo-oper * Se il record esiste, l'impostazione viene selezionata * Con ciascun record riempire la griglia che conterrà:

Nome colonna	Contenuto	Note
Progressivo	IDT-PROGR
Descrizione	IDT-DES
Default		Cercare l'esistenza di un record su COGIPDAB impostando: Se il record esiste e IDB-DEFAULT = "S", impostare "D", altrimenti " "
Visibilità	IDB-VISIBILITA	Campo di tipo "ckeck" con i valori previsti

Elaborazione L'elaborazione cambia a seconda dell'operazione richiesta. Operazione "SALVA" In questo caso si dovrà aprire la maschera, visualizzare la griglia e permettere di inserire: * descrizione * visibilità nei campi appositi; alla conferma procedere con l'inserimento: Inserimento di un record su COGIPDTS

Nome campo	Note
IDT-PROGRAMMA	IMPPREDF-PROGRAMMA
IDT-PROGR	Primo progressivo libero
IDT-SEQ	IDT-PROGR
IDT-DES	Descrizione digitata
IDT-VISIBILITA	Il valore impostato su "Visibilità"

Inserimento COGIPDAB Se l'impostazione è "Privata", inserire anche un record qui:

Nome campo	Note
IDB-PROGRAMMA	IDT-PROGRAMMA
IDB-PROGR	IDT-PROGR
IDB-OPE	operatore attivo
IDB-DEFAULT	" "

Inserimento COGIPDDT Per ciascun elemento della tabella valori (IMPPREDF-PNT) creare un nuovo record:

Nome campo	Note
IDD-PROGRAMMA	IDT-PROGRAMMA
IDD-PROGR	IDT-PROGR
IDD-VAR	IMPPREDF-VAR
IDD-TIPO-DATO	IMPPREDF-TIPO
IDD-CONTENUTO-A	IMPPREDF-VALORE-A
IDD-CONTENUTO-N	IMPPREDF-VALORE-N

Modifica griglia Ora sarà possibile modificare il contenuto della griglia (vedi operazione "SELEZIONA") Operazione "CARICA-DEFAULT" Con questa operazione il programma dovrà lavorare in background, quindi non emettere la maschera. Ricerca impostazione predefinita per l'operatore * Scansione di COGIPDTS su IDT-CHIA3, impostando: * IDT-PROGRAMMA = IMPPREDF-PROGRAMMA * Per ciascun record letto: * Lettura di COGIPDAB impostando: * IDB-PROGRAMMA = IDT-PROGRAMMA * IDB-PROGR = IDT-PROGR * IDB-OPE = wo-oper * Se il record esiste e ha IDB-DEFAULT = "S", il record rappresenta l'impostazione di default per l'operatore Restituzione impostazione predefinita Quindi: * se il default non viene trovato * inizializzare la tabella elementi in linkage * restituire IMPPPREDF-PNT = 0 * impostare IMPPREDF-ESITO = "N" * Se il default viene trovato: * scorrere i record COGIPDDT per l'impostazione di default e riempire la tabella di linkage con il procedimento inverso rispetto a "SALVA". * Impostare IMPPREDF-PNT = numero elementi trovati * Impostare IMPPREDF-ESITO = "S" Operazione "SELEZIONA" Con questa operazione il programma aprirà la maschera e caricherà le impostazioni del programma in griglia, come spiegato in Dettaglio. Qui saranno attivati i tasti funzione: * "F3 - Modifica" / "F3 - Seleziona": con questi tasti funzione (già usati in tutti i programmi di gestione tabella in griglia) il programma permetterà di entrare in modifica delle impostazioni memorizzate, o ritornerà in selezione; Modalità "Seleziona" L'utente potrà selezionare una riga e restituire i dati nella tabella di linkage, come spiegato nell'operazione "CARICA-DEFAULT". Se viene selezionato un elemento restituire IMPPREDF-ESITO = "S", altrimenti restituire "N" Modalità "Modifica" In questa modalità la griglia potrà essere modificabile. Operazioni possibili: * TF: "Ctrl-E - Elimina": permette di eliminare l'impostazione predefinita selezionata: sarà cancellato il record COGIPDTS e i record COGIPDAB e COGIPDDT collegati * Doppio click sulla colonna "Default": permetterà di modificare il contenuto del campo; equivale a modificare il dato IDB-DEFAULT sul record COGIPDAB * Attenzione: puo' esistere solo un'impostazione di default per ogni operatore; quindi se viene impostato "Default" su una colonna si dovrà togliere automaticamente sulla riga dove era già presente * Doppio click sulla colonna "Visibilità": permetterà di modificare il contenuto del campo; equivale a modificare il dato IDT-VISIBILITA sul record COGIPDTS * Oltre a modificare quersto dato, se una riga diventa: * Pubblica: -> Ok * Privata: -> Segnalare errore: non è possibile far diventare "privata" un'impostazione pubblica * Riordinamento impostazioni: usando il drag&drop permettere il riordinamento delle righe (che sono lette usando la chiave IDT-CHIA3, che gira su IDT-SEQ: dopo un riordinamento rinumerare i campi IDT-SEQ in funzione del nuovo ordinamento.

---

Estratto da documentazione interna ClickUp