COGM82 - Visualizzazione / Stampa Valore Produzione¶
Descrizione¶
Programma interattivo che visualizza e stampa il valore della produzione per articolo in un dato periodo. Elabora i dati da due file temporanei di transazione (COGTRANS e COGTRANS2) contenenti rispettivamente il riepilogo per merce e il dettaglio delle fasi di produzione. Mostra in griglia: quantita' prodotta, prezzo, valore effettivo, valore d'ordine e scostamento percentuale. Supporta visualizzazione su griglia, stampa e export Excel.
Tipo: Visualizzazione/stampa interattiva con griglia dati.
Menu: Magazzino > Produzione > Produzione > Visualizzazioni > Valore Produzione
Tabelle utilizzate¶
| Tabella | Accesso | Descrizione |
|---|---|---|
| FEURTAB (cogtabel) | Input | Tabella parametri generali azienda |
| COGTRANS | Input | File temporaneo riepilogo per merce (chiave1: merce gru+sot+cod; chiave2: descrizione merce) |
| COGTRANS2 | Input | File temporaneo dettaglio fasi (chiave1: fase+posizione+fl-comp+merce-padre+merce; chiave2: fl-comp+merce+fas+pos+merce-padre) |
| FLSTA | Output | File di stampa |
Struttura record COGTRANS¶
trs-chia1:trs-merce(gru x(02) + sot x(02) + cod 9(05))trs-chia2:trs-des-mercex(40)- Dati:
trs-comp(flag componente),trs-qtas9(07)v999,trs-prezzo9(12)v9(06),trs-valores9(12)v9(06),trs-valore-ords9(12)v9(06),trs-sel(selezione),trs-currency(divisa)
Struttura record COGTRANS2¶
trs2-chia1: fase 9(04) + posizione 9(04) + fl-comp x(01) + merce-padre + merce- Dati: fase-padre, posizione-padre, qta, prezzo, valore, currency
Copybook principali¶
| Copybook | Descrizione |
|---|---|
| cogm82.select | SELECT per i file del programma |
| cogm82.fd | File description |
| cogm82.wrk | Working storage generata da Screens |
| cogm82-01.scr | Screen section maschera |
| cogm82.decla | Declaratives |
| cogfiles.cpy | Descrizione record FEURTAB |
| utils52.cpy | Utility date (COGS52W) |
| utils54.cpy | Utility stampante (COGS54) |
| utils65.cpy | Utility selezione anagrafica (COGS65W) |
| utils68.cpy | Utility selezione merce (COGS68) |
| utilu10.cpy / k-u10.cpy | Utility importi e conversione valuta (COGU10W) |
| utilw06.cpy | Utility gestione griglia |
| utilcogl61.cpy | Utility distinte/produzione |
| utilncnf.cpy | Utility lettura configurazione RNEWCONF |
| wgrid.cpy / utilgdad.cpy | Griglia dati |
| tabmperc.cpy | Tabella percentuali merce |
Parametri maschera (tab-maschera)¶
| Campo | Variabile | Descrizione |
|---|---|---|
| Divisa | tm-divisa |
Divisa di valorizzazione |
| Da data | tm-da-data |
Inizio periodo (con calendario F8) |
| A data | tm-a-data |
Fine periodo |
| Classificazione | tm-cla |
Flag classificazione |
| Ricerca | tm-ric |
Modalita' di ricerca |
| Opzione data | tm-opz-data |
Opzione sul campo data |
| Merce | tm-merce (gru+sot+cod) |
Filtro per articolo specifico |
| Anagrafica | tm-ana |
Filtro per anagrafica |
| Ordinamento stato | tm-ord-sta |
Criterio ordinamento |
| Livello | tm-liv |
Livello di dettaglio |
Flusso di elaborazione¶
- Inizializzazione: costruzione nomi file temporanei
name-trsename-trs2daext-tmp-dir+#+k-program-id+A/B.+wo-oper. Lettura configurazione RNEWCONF (x99-confi). - Maschera parametri (
a4): accept dei campi di selezione. - Elaborazione (alla conferma F3): scansione COGTRANS per merce nel range selezionato; per ogni merce, lettura di COGTRANS2 per i dettagli di fase; calcolo di
w-perc(differenza percentuale valore/valore-ordine); popolazione della griglia (tm-tab). - Visualizzazione griglia: record
grid-recordcon merce, qta, prezzo, valore, selezione. - Stampa (F9): ciclo su righe griglia; intestazione
testa1(data, titolo "Stampa valore produzione", pagina),testa2(azienda, livello, periodo); riga dettagliorigel(merce, descrizione, qta, prezzo, valore, dst, valore-ordine, dif%); totale inrig-tot. - Export Excel (Shift+F5): chiamata utility esportazione griglia.
Costanti di configurazione (RNEWCONF)¶
Il programma legge parametri di configurazione tramite x99-confi (utilncnf). Tra i parametri: configurazione prezzo/importo (tm-cfg-pre, tm-cfg-imp) identificate dalle costanti k-tm-cfg-pre = "23" e k-tm-cfg-imp = "24".
Chiamate a sottoprogrammi¶
| Programma | Scopo |
|---|---|
| COGS54 | Gestione stampante |
| COGS52W | Gestione campo data con calendario |
| COGS65W | Selezione anagrafica |
| COGS68 | Selezione merce (F8 su campo merce) |
| COGU10W | Conversione e formattazione importi/divise |
| RNEWCONF | Lettura parametri di configurazione |
Note tecniche¶
- I file COGTRANS e COGTRANS2 sono temporanei, generati da programmi upstream nella catena produzione; i loro nomi contengono il suffisso dell'operatore (
wo-oper) per la gestione multi-utente. - La griglia supporta fino a
k-max-ele-tab = 100elementi. - La larghezza di stampa e'
k-siz-stampa = 136caratteri. - Le costanti
k-rg-prezzo..k-trs-valore(valori "1"-"21") identificano i diversi campi numerici gestiti tramite COGU10W per la formattazione degli importi. - Il campo
trs-valore-ordrappresenta il valore di riferimento dall'ordine di produzione; lo scostamento percentuale (rg-perc) e' calcolato come(valore - valore-ord) / valore-ord * 100.