COGO31 -- Scaduto per Mese¶
Sorgente: cbl/cogo31.cbl | Tipo: Interattivo | Program-ID: COGO31
Menu:
- Ordini > Clienti > Visualizzazioni > Scaduto per mese
Scopo¶
Visualizzazione interattiva dello scaduto/residuo mensile ordini clienti. Basato sulla stessa logica elaborativa di COGO33 (Portafoglio Ordini), adattato per esporre i dati ripartiti per mese con 12 colonne (una per mese). La griglia presenta una sola riga di riepilogo con venduto, residuo e scaduto per ciascun mese dell'anno corrente.
File e tabelle¶
| File/Tabella | Tipo | Modalita' | Descrizione |
|---|---|---|---|
| FEURTAB | Sistema | Input | Tabella di sistema |
| File da cogo31.select | Dati | I-O | Consegne, ordini, anagrafiche, bolle, movimenti magazzino |
| File da cogo31.fd | Dati | I-O | File generati da Screens |
Programmi chiamati¶
| Programma | Scopo |
|---|---|
| GRIDADMN | Gestione griglia avanzata (preparazione, add-record, svuota, personalizzazione, export) |
| COGS65W | Accept clienti con ricerca |
| COGU10W | Formattazione/conversione importi e cambi |
Copybook principali¶
- cogo31.select, cogo31.fd, cogo31.wrk, cogo31.tm, cogo31.imppredf-wrk, cogo31.decla, cogo31-01.scr
- cogfiles.cpy, cogazien.cpy, wstato.cpy, wopenf.cpy, wgrave.cpy, wnscr.cpy
- wgrid.cpy, utilgdad.cpy
- utils52.cpy, utils65.cpy, utils68.cpy, utils93.cpy
- utilu10.cpy, utilu20.cpy, utilimppredf.cpy, utilgesdate.cpy, utilncnf.cpy, utilgesdebug.cpy
- utilcogqs6.cpy
- k-u10.cpy
- cogtesbo.k02, cogconor.k04
- getdcont.cpy, gesdebug.cpy
- wcont.cpy, wcont1.cpy
Struttura del programma¶
Flusso principale¶
-
Inizializzazione (
apri): apre file, carica configurazione debug, legge azienda. Configura tasti funzione (F3, F8/calendario, F9/ric.avanzata, S-F4, S-F5, Ctrl-A/Ctrl-E per aggiunta/eliminazione righe, S-F6 per elaborazione). Crea pulsanti custom (ricerca, magazzino). Legge divisa di contabilizzazione. -
Accept filtri: data inizio/fine, tipo selezione clienti (per codice o ragione sociale), intervallo clienti.
-
Elaborazione (S-F6): stessa logica di COGO33 per calcolo di ordinato, consegnato, residuo e venduto. I dati vengono ripartiti per mese: per ciascun mese dell'anno corrente si calcolano venduto (da COGTESBO), residuo (consegne future) e scaduto (consegne in ritardo). Lo scaduto antecedente all'anno corrente viene accumulato nel mese di gennaio.
-
Presentazione griglia: griglia con 12 mesi in colonna orizzontale, una sola riga di dettaglio. Colonne riepilogative con i totali.
Variabili principali¶
| Variabile | Tipo | Descrizione |
|---|---|---|
| x11-data | 9(08) | Data elaborazione |
| x11-ord-qta / x11-cns-qta / x11-res-qta | s9(07)v999 | Quantita' ordinata/consegnata/residua |
| x11-ord-val / x11-cns-val / x11-res-val | s9(12)v999999 | Valori ordinato/consegnato/residuo |
| x11-sca-val | s9(12)v999999 | Valore scaduto |
| x11-ven-val | s9(12)v999999 | Valore venduto |
| x11-sca-righe | 9(08) | Numero righe scadute |
| w-prezzo-netto | s9(12)v999999 | Prezzo netto calcolato |
| w-importo-tot | s9(12)v999999 | Importo totale |
| w-importo-res | s9(12)v999999 | Importo residuo |
| x11-ana | struct | Anagrafica (tipo + codice) |
| fl-fine-merci | x(01) | Flag fine scansione merci |
Documentazione tecnica -- 2026-04-29