Vai al contenuto

COSO96 - Inserimento Sconti

Scopo

Gestione (inserimento/modifica/cancellazione) degli sconti applicabili al singolo socio/cliente: sconto quota, sconto servizio, sconto IVA, ciascuno con date di validita' specifiche. I dati risiedono sull'anagrafica UNANASO; un file di transito (COGTRANS) supporta l'editing in griglia.

File e tabelle

File Tipo Descrizione
UNANASO Indicizzato Anagrafica soci/clienti (storage permanente degli sconti)
COGTRANS Indicizzato Transito griglia (chiave: progressivo + socio, 2 chiavi alternate)
COGTABEL Indicizzato Tabelle di sistema
COGAZIEN Indicizzato Dati azienda
COGFILES Indicizzato Master file

Copybook

Copybook Sezione Utilizzo
coso96.wrk / .fd tutte Strutture generate da Screens
utilgdad.cpy WORKING-STORAGE Gestione griglia
utils65.cpy WORKING-STORAGE Lookup anagrafica
utilu20.cpy WORKING-STORAGE Input numerico con decimali

CALL

Programma Quando Scopo
GRIDADMN All'avvio griglia Gestione griglia visuale
COGS65W Su F8 Lookup soci/clienti
COGU10W Per importi Conversione valute/tassi

Logica di elaborazione

Flusso principale

  1. Lettura parametro socio (facoltativo, se omesso elabora tutti i soci con sconti).
  2. Caricamento degli sconti da UNANASO in griglia tramite COGTRANS.
  3. Inserimento, modifica e cancellazione righe in griglia.
  4. Su F3: aggiornamento batch di UNANASO con le modifiche.
  5. Chiusura file di transito e sincronizzazione.

Note tecniche

  • COGTRANS ha 2 chiavi alternate (progressivo, socio).
  • Validazione: socio valido (tipo 'C' su UNANASO), sconto 0-9999,99, date coerenti.
  • Visualizzazione date GG/MM/AAAA.
  • Limite 100 righe in griglia.

Note operative

  • L'aggiornamento dell'anagrafica avviene solo alla conferma con F3 (atomico per sessione).