COGL13 - Visualizzazione Offerte¶
Intestazione¶
| Campo | Valore |
|---|---|
| Programma | COGL13 |
| Titolo | Visualizzazione offerte |
| Autore | Stefano Ruozzi - Eurosystem |
| Posizione menu | Magazzino > Produzione > Distinte-Preventivo > Visualizzazione Offerte |
Scopo e logica generale¶
COGL13 e' un programma interattivo di consultazione che mostra le offerte clienti associate a una distinta (pre-distinta o distinta base). Presenta una maschera a schermo con una griglia paginata (15 righe) delle offerte, filtrabile per cliente. Consente la visualizzazione del dettaglio di ogni offerta e la stampa dell'elenco.
Accetta sia codici di merci temporanee (COGMERTP) che definitive (COGMERCI), purche' con flag padre.
Flusso principale¶
- Inizializzazione (
inizio): controllo abilitazione, apertura file, lettura azienda, lettura divisa conto - Selezione merce padre (
a7): accept codice merce tramite COGS22. F4 per pre-distinte (WIN046), F8 per merci anagrafiche - Validazione (
a8): verifica che il codice sia padre (mtp-padre = 'P' o mer-padre = 'P') - Selezione cliente (
a5): accept codice cliente tramite COGS65. Se zero, mostra tutti i clienti - Conferma (
a90): richiesta conferma F3 - Caricamento offerte (
rst-next): scansione COGOFFCL per chiave padre, filtro per cliente se specificato (x3-controlli), riempimento tabella a video - Navigazione griglia (
ela-00->ela-10): - Su/Giu: spostamento cursore
- PagGiu (
rst-next): caricamento pagina successiva - PagSu (
rst-previous): caricamento pagina precedente - Invio (
send-w50): dettaglio offerta tramite WIN050 - F9 (
ela-10-stampa): stampa offerta tramite COGS54 +x1-stampa - Chiusura (
z-chiudi): close file, exit program
File e tabelle acceduti¶
| File logico | Record | Modalita' | Uso |
|---|---|---|---|
| COGMERCI | mer-rec | Input | Anagrafica merci - validazione codice definitivo |
| COGMERTP | mtp-rec | Input | Merci temporanee - validazione codice temporaneo |
| COGGEANA | ana-rec | Input | Anagrafica generale - lettura nome cliente |
| COGOFFCL | ofc-rec | Input | Offerte clienti - scansione e visualizzazione |
| COGTABEL | euta-rec | Input | Tabelle di sistema |
| FLSTA | flsta-rec | I-O | File lista stampa |
| FEURTAB | feurtab | Input | Tabella generale Eurosystem |
Copybook inclusi¶
Strutture dati¶
| Copybook | Contenuto |
|---|---|
cogfiles.cpy / cogmerci.cpy / coggeana.cpy / cogmertp.cpy / cogoffcl.cpy / cogtabel.cpy |
Strutture record file |
flsta.cpy / flsta.fd |
File lista stampa |
cogazien.cpy |
Dati azienda |
k-u10.cpy |
Costanti COGU10 |
Working e utility¶
| Copybook | Contenuto |
|---|---|
wstato.cpy / wopenf.cpy / wgrave.cpy / wnscr.cpy |
Working storage comuni |
utils22.cpy |
Interfaccia COGS22 (selezione merce) |
utils54.cpy |
Interfaccia COGS54 (gestione stampa) |
utils65.cpy |
Interfaccia COGS65 (selezione anagrafica cliente) |
utilu10.cpy |
Interfaccia COGU10 (conversione/formattazione importi) |
stato.cpy / stato1.cpy / winmsg.cpy / open1.cpy / mmmask.cpy / grave.cpy |
Standard fine procedure |
Programmi chiamati (CALL)¶
| Programma | Scopo |
|---|---|
| COGS22 | Selezione codice merce (gruppo/sottogruppo/codice) |
| COGS65 | Selezione cliente da anagrafica |
| COGS54 | Gestione impostazioni di stampa e after-print |
| COGU10 | Formattazione/conversione importi divisa |
| WIN046.COB | Ricerca merci temporanee per codice (F4) |
| WIN050 | Visualizzazione dettaglio offerta (Invio sulla griglia, tramite send-w50) |
Logica di business¶
Griglia paginata¶
La griglia mostra fino a 15 righe (variabile t-size). La navigazione avanti/indietro e' gestita da rst-next e rst-previous che scansionano COGOFFCL in avanti e indietro. Le chiavi di bordo pagina (w-b-* e w-t-*) vengono salvate per consentire la navigazione bidirezionale.
Filtro offerte (x3-controlli)¶
Le offerte vengono filtrate su:
- ofc-pf = codice padre selezionato
- ofc-prog = 0 (solo offerte principali, non dettagli)
- Se tm-cli <> 0: ofc-cli = tm-cli (filtro per cliente)
Conversione divisa¶
Gli importi delle offerte (ofc-valore) vengono convertiti nella divisa conto corrente tramite COGU10 (k-u10-cambio) prima della visualizzazione. La formattazione per display usa COGU10 con operazione k-u10-edita.
Stampa (x1-stampa)¶
La stampa produce un report con testata azienda, codice prodotto/descrizione, e per ogni offerta: codice/nome cliente, data, dettaglio componenti con quantita' e prezzi. Usa il file FLSTA per l'output.
Variabili di stato principali¶
| Variabile | Descrizione |
|---|---|
tab-maschera / tm-macro |
Codice merce padre selezionato |
tm-cli |
Codice cliente filtro (0 = tutti) |
tm-righe(n-t) |
Tabella righe offerte visualizzate (cli, nome, qta, data, importo) |
n-t |
Numero righe caricate nella pagina corrente |
t-size / t-start |
Dimensione griglia e riga iniziale |
fl-read |
Flag stato lettura: 'E' = fine file avanti, 'B' = fine file indietro |
w-b-* / w-t-* |
Chiavi bottom e top della pagina corrente per navigazione |