COGX24 - Vetture Disponibili / Vetture Assegnate
Scopo
Visualizzazione e gestione del parco vetture aziendali in griglia, con distinzione tra vetture disponibili (tipo "V") e assegnate (tipo "A"). Supporta selezione multipla, modifica tramite programmi dedicati, generazione proposte commerciali, stampa elenchi e trasferimento da disponibili ad assegnate.
- Magazzino > Gestione Veicoli > Commerciale > Vetture Disponibili
- Magazzino > Gestione Veicoli > Commerciale > Vetture Assegnate
File e Tabelle
| File |
Copybook |
Utilizzo |
| FEURTAB |
cogfiles.cpy |
Tabella file di sistema |
| cogx24.select |
(generato da Screens) |
SELECT dei file specifici |
| cogx24.fd |
(generato da Screens) |
FD dei file specifici (include BCVETTUR, COGRACMT, BCRIGPRO) |
| BCVETTUR |
(da cogx24.select) |
Anagrafica vetture |
| COGRACMT |
(da cogx24.select) |
Raccolta mezzi di trasporto (scheda auto) |
| BCRIGPRO |
(da cogx24.select) |
Righe proposte commerciali |
| COGTRANS |
tran-x24.cpy |
File di lavoro temporaneo (elenco vetture filtrate) |
| FLSTA |
flsta.cpy |
File stampante |
Copybook
Working storage
k-u10.cpy, cogx24.wrk
wgrave.cpy, wnscr.cpy, wopenf.cpy, wstato.cpy, cogazien.cpy
wgrid.cpy, utilgdad.cpy
utils52.cpy, utils54.cpy, utilu10.cpy
utilx15.cpy, utilx18.cpy, utilx25.cpy, utilx26.cpy, utilx29.cpy
Linkage
wcont.cpy, wcont1.cpy, utilx24.cpy
Procedure
grave.cpy, mmmask.cpy, opengen.cpy, stato.cpy, stato1.cpy, winmsg.cpy
cogx24.prc, dtab.cpy, fscrol2.cpy, getdcont.cpy, utilpggr.cpy
- Chiavi:
bcvettur.k02, bcvettur.k03, bcrigpro.k02
- Chiavi cogtrans:
cogtrans.k01 thru cogtrans.k05
CALL
| Programma |
Scopo |
| COGS52 |
Input data con calendario |
| COGS54 |
Gestione stampante |
| COGU10W |
Conversione divisa |
| COGX15 |
Scheda auto dettagliata |
| COGX18 |
Gestione contratti veicoli |
| COGX25 |
Modifica/Inserimento/Cancellazione vettura assegnata |
| COGX26 |
Generazione proposta commerciale |
| COGX29 |
Modifica/Inserimento/Cancellazione vettura disponibile |
| GRIDADMN |
Amministrazione griglia (personalizzazione colonne) |
Parametri di chiamata (linkage)
util-x24 (utilx24.cpy):
x24-called: se = k-program-id, e' una chiamata esterna
x24-caller: programma chiamante
x24-in-tip: tipo vettura da visualizzare ('A' o 'V')
x24-bvt-chia1: output - chiave della vettura selezionata (se chiamata esterna)
Logica di elaborazione
Determinazione tipo visualizzazione
dep-tip = "V": Vetture Disponibili (parametro menu o da chiamante)
dep-tip = "A": Vetture Assegnate
Flusso principale
- Apertura file, lettura azienda, configurazione pulsanti custom
- Determinazione tipo (da
wo-parametro o da w-dc-tip)
- Input filtri opzionali (data, ordinamento, esclusioni, marca/modello/colore/targa)
carica-dati: legge BCVETTUR, filtra per tipo e criteri, scrive su COGTRANS (file temporaneo)
carica-tab / inizia-tab: popola la griglia dalla prima pagina del file COGTRANS
- Loop griglia (
a-grid): navigazione, selezione, operazioni
File di lavoro COGTRANS
- Path:
ext-tmp-dir/#$COGX24.<operatore> (uso singolo) o ext-tmp-dir/#$COGX24S.<operatore> (chiamata esterna)
- Copybook:
tran-x24.cpy
- Chiave primaria: modello + colore + bvt-chia1
- Chiave alternata 4: selezione (
trs-sel)
- Contiene i dati completi della vettura per la griglia
Struttura griglia
- Grid con
GRIDADMN per personalizzazione colonne
- Fino a 900 elementi (
k-max-ele-tab)
- Record griglia (
grid-record): selezione, perizia, stock, situazione amministrativa, proposta, ordine, dati veicolo, valori commerciali, info
- Paginazione tramite
utilpggr.cpy
Operazioni su vetture
- Modifica (F3): chiama COGX25 (assegnate) o COGX29 (disponibili) con operazione "M"
- Inserimento (Ctrl-A): chiama COGX25/COGX29 con operazione "I"
- Cancellazione (Ctrl-E): chiama COGX25/COGX29 con operazione "C"
- Selezione (Invio): toggle flag
trs-sel su COGTRANS; in chiamata esterna restituisce x24-bvt-chia1
- Genera vettura assegnata (Shift-F7 da Disponibili): copia bvt con tipo "A", verifica marca/modello/targa obbligatorie, genera random per chiave
- Genera proposta (F8 da Assegnate): chiama COGX26 per le vetture selezionate non gia' in ordine/stock/uscita
- Scheda auto (F7): cerca in COGRACMT per targa, chiama COGX15
- Contratto (F7 se scheda auto non presente, su Assegnate): chiama COGX18 con tipo "X" e targa
Stampa (F9)
- Stampa le vetture selezionate (flag
trs-sel = "S")
- Larghezza: 152 caratteri
- Colonne: colore, telaio, targa, modello, data immatricolazione
- Intestazione: data, titolo (Assegnate/Disponibili), pagina
Note tecniche
- GUI (screen section con
cogx24-01.scr)
- Due pulsanti custom con icone bitmap: "Genera Vettura Assegnata (S-F7)" e "Selezione Vetture Bercar (S-F8)"
- La chiave random delle vetture e' generata con
FUNCTION RANDOM + timestamp per unicita'
- Supporta chiamata esterna per selezione vettura (restituisce bvt-chia1 al chiamante)