| Campo |
Valore |
| Sorgente |
cbl/cogg02.cbl |
| Tipo |
Interattivo (maschera carattere 56x10) |
| Richiamato da |
Menu |
Descrizione
Programma di anagrafica per la definizione delle informazioni personalizzate dei clienti potenziali. Ogni informazione e' un campo configurabile (tipo, lunghezza, decimali, riferimento tabella, totalizzazione) che viene poi utilizzato da COGG03 per raccogliere i dati specifici di ogni cliente potenziale. I dati sono memorizzati nella tabella COGINFPT.
File e tabelle
| File/Tabella |
Modalita' |
Descrizione |
| FEURTAB |
Input |
Tabella file aziendali |
| COGTABEL |
Input |
Tabelle di sistema (validazione tipo tabella) |
| COGINFPT |
I-O |
Definizione informazioni personalizzate clienti potenziali |
Copybook principali
| Copybook |
Tipo |
Utilizzo |
cogfiles.cpy |
FD |
Struttura record FEURTAB |
cogtabel.cpy |
FD |
Struttura record tabelle |
coginfpt.cpy |
FD |
Struttura record informazioni potenziali |
utils21.cpy |
Working |
Interfaccia COGS21 (selezione S/N) |
utils25.cpy |
Working |
Interfaccia COGS25 (numeratori) |
utils60.cpy |
Working |
Interfaccia COGS60 (selezione da lista) |
utilgw01.cpy |
Working |
Interfaccia ricerca tabelle |
utilgw04.cpy |
Working |
Interfaccia ricerca informazioni |
wcont.cpy |
Linkage |
Stringhe di comunicazione |
Logica di elaborazione
Flusso principale
- L'utente indica un progressivo informazione (o lo cerca con F1/F8).
- Se il record esiste in COGINFPT, si caricano i dati (fl-ope = 'V'), altrimenti si entra in inserimento (fl-ope = 'I').
Accept campi
I campi vengono richiesti in sequenza:
- Descrizione (a-20): obbligatoria, non puo' essere vuota.
- Tipo informazione (a-30): scelta tramite COGS60 tra: A=Alfanumerica, N=Numero/Importo, D=Data, T=Tabella, V=Valori fissi.
- Lunghezza (a-40): obbligatoria per tipi A, N, V. Per tipo D viene fissata a 8, per tipo T a 8. Limiti: max 80 (A), max 16 (N), max 20 (V).
- Decimali (a-50): solo per tipo N, deve essere < lunghezza.
- Tipo tabella (a-60): solo per tipo T, validato contro COGTABEL tipo 31. F8 per aiuto selezione.
- Totalizzazione (a-70): solo per tipo N, scelta S/N tramite COGS21.
Inserimento (a-900-ins)
- Scrive record in COGINFPT:
ipt-num, ipt-seq, ipt-des, ipt-tip, ipt-lun, ipt-lun-dec, ipt-tab, ipt-fl-tot, ipt-fl-agg = 'W'.
- Per tipo V, salva i valori fissi (a5-agg-val).
- Incrementa numeratore codice 21 via COGS25.
Variazione (a-900-var)
- Riscrive il record COGINFPT con
ipt-fl-agg = 'R'.
- Aggiorna i valori fissi.
Cancellazione (a-900-can)
- Cancella il record COGINFPT.
- Cancella i valori fissi associati.
- Decrementa il numeratore.
Chiamate a sottoprogrammi
| Programma |
Descrizione |
| COGS60 |
Selezione da lista (tipo informazione: A/N/D/T/V) |
| COGS21 |
Selezione S/N (totalizzazione) |
| COGS25 |
Gestione numeratori (codice 21 = informazioni potenziali) |
| GW01 |
Ricerca tipo tabella |
| GW04 |
Ricerca informazioni codificate |