COGO35 - Visualizzazione Impegnato/Ordinato per Merce
Panoramica
Programma interattivo per la visualizzazione dell'impegnato (ordini cliente) e dell'ordinato (ordini fornitore) per articolo (merce). Presenta i dati in una griglia ordinabile con quantita' ordinate, consegnate, residue, prezzi, cambi, lotti e destinazioni. Supporta la gestione del blocco/sblocco righe per ambito amministrativo e produttivo. Puo' essere chiamato esternamente da altri programmi (modalita' "called") passando il codice merce da visualizzare.
| Menu |
Percorso |
| Ordini |
Clienti > Visualizzazioni > Ordinato per Merce |
| Ordini |
Fornitori > Visualizzazioni > Ordinato per Merce |
| Vendite |
Mediatori > Ordinato x Merce |
Struttura del programma
File e tabelle utilizzati
| File/Tabella |
Tipo |
Descrizione |
| FEURTAB |
Input |
Tabella di sistema |
| COGTABEL |
Input |
Tabella generica (causali, tipi) |
| COGMERCI |
Input |
Anagrafica merci/articoli |
| COGGEANA |
Input |
Anagrafica generale clienti/fornitori |
| COGMAGAZ |
Input |
Anagrafica magazzini |
| COGTESOR |
Input |
Testata ordini |
| COGRIGOR |
Input |
Righe ordini |
| COGLAVOR |
Input |
Lavorazioni (commesse) |
| COGCONOR |
Input |
Consegne ordini |
| COGMOVDB |
Input |
Movimenti distinta base |
| COGTESBP |
Input |
Testata buoni di prelievo |
| COGRIGBP |
Input |
Righe buoni di prelievo |
| COGDESTI |
Input |
Destinazioni |
| COGTORAG |
Input |
Testata raggruppamento ordini |
| COGRORA2 |
Input |
Righe ordini raggruppamento (seconda tabella, contiene canale di spedizione) |
| COGTRANS |
I-O (temp) |
File di transito temporaneo per elaborazione dati griglia |
Copybook principali
| Copybook |
Descrizione |
| cogo35.select |
SELECT dei file |
| cogo35.fd |
File Description |
| cogo35.wrk |
Working storage generata |
| cogo35.prc |
Procedure generate da Screens |
| cogo35-01.scr |
Screen section |
| k-u10.cpy |
Costanti formattazione importi |
| k-personal.cpy |
Costanti personalizzazioni clienti |
| wgrid.cpy |
Variabili gestione griglia |
| utilgdad.cpy |
Interfaccia GRIDADMN |
| utilo35.cpy |
Interfaccia per richiamo come "called" |
| utilu25.cpy |
Interfaccia COGU25 |
| utilu78.cpy |
Interfaccia COGU78 |
| utilw36.cpy |
Interfaccia WIN036 |
| utilw44.cpy |
Interfaccia WIN044 |
| utilncnf.cpy |
Configurazioni RNEWCONF |
| utildlg.cpy |
Interfaccia DIALOGS |
Chiamate a sottoprogrammi (CALL)
| Programma |
Scopo |
| GRIDADMN |
Gestione griglia avanzata (personalizzazione colonne, export) |
| COGU10W |
Formattazione/conversione importi e cambi (chiamato per prezzi, prezzi in divisa conto, prezzi trasferimento) |
| COGU25 |
Utilita' ordini (gestione magazzino stoccaggio) |
| COGU78 |
Stampa/esportazione dati griglia |
| COGO35 |
Richiama se stesso ricorsivamente per seconda istanza con dati diversi |
| WIN044 |
Finestra di visualizzazione consegne ordine |
| DIALOGS |
Gestione dialoghi conferma (sblocco/blocco) |
| RNEWCONF |
Lettura configurazioni |
Logica di elaborazione
Flusso principale
- Inizializzazione (
apri): carica lingua, legge azienda, apre file, legge configurazioni. Determina se si tratta di ordini clienti ("C" - impegnato/vendita) o fornitori ("F" - ordinato/acquisto) in base al parametro. Se chiamato dall'esterno (o35-called = "COGO35-CALLED"), riceve codice merce e tipo.
- Creazione file transito (
a4): crea un file temporaneo indicizzato COGTRANS nella directory temp, con nome univoco per operatore/istanza. Il file e' usato per l'elaborazione e l'ordinamento dei dati griglia.
- Filtri (
a-tm-merce ... a-tm-fl-vp): accept dei parametri di selezione: codice merce, tipo ordine (Aperto/Chiuso/Tutti), magazzino, solo/meno, date da/a, tipo visualizzazione (Vendita/Produzione).
- Caricamento griglia: scorre gli ordini dal file di transito, calcola prezzi in divisa conto tramite COGU10W, popola la tabella
tm-tab e costruisce la griglia.
- Navigazione griglia (
a-grid): gestisce paginamento (page up/down), esportazione (S-F4/S-F5), personalizzazione colonne, e visualizzazione consegne su riga selezionata (F3/Invio tramite WIN044).
- Blocco/Sblocco (F2/S-F6): funzione aggiunta nel maggio 2024 per bloccare/sbloccare righe ordine per ambito amministrativo e/o produttivo, con dialogo di conferma tramite DIALOGS.
Calcolo prezzi in divisa conto
Per ogni riga della griglia, il prezzo viene convertito nella divisa di contabilizzazione tramite COGU10W con operazione "Cambio", utilizzando il cambio e la data dell'ordine.
Gestione impegno produzione
Se il record ha una distinta base associata (trs-db not = low-values), il prezzo viene azzerato (l'impegno da produzione non ha un prezzo proprio) e viene visualizzato il codice della distinta base al posto del prezzo.
Note tecniche
- Il programma utilizza un file di transito temporaneo (
COGTRANS) per pre-elaborare e ordinare i dati prima di presentarli in griglia. Il file viene creato nella directory temporanea con nome basato su programma, operatore e istanza.
- Supporta il richiamo ricorsivo: COGO35 puo' richiamare una seconda istanza di se stesso (tramite la linkage
utilo35 con campo istanza).
- La griglia supporta fino a 900 elementi (
k-max-ele-tab).
- Le chiavi secondarie utilizzate includono:
cogrigor.k03, cogmovdb.k03, cogconor.k05, coglavor.k05, cogrigbp.k04.
- Dimensione sorgente: circa 114K, 2.715 righe.
- Canale di spedizione (230426): per ogni riga ordine viene letto il canale di spedizione dalla tabella COGRORA2 (
ra2-canale-spedizione) e la relativa descrizione da COGTABEL (tipo "CS"). I campi trs-canale-sped e trs-canale-sped-d vengono scritti nel file di transito e visualizzati in griglia come colonne grd-canale-sped e grd-canale-sped-d.