COGV29 - Ricerca Componenti¶

Scopo¶

Dato un codice componente, ricerca e visualizza tutte le distinte base (prodotti finiti) in cui quel componente compare. Include anche la ricerca attraverso i componenti sostitutivi (tabella COGDBAGG).

Struttura¶

Programma standalone con maschera GUI (mmmask.cpy). Flusso principale:

Immissione: accept del componente con validazione su COGMERCI
Caricamento: scansione di COGDBASE per chiave secondaria (k02: dba-merce-f) e COGDBAGG per sostitutivi
Visualizzazione: griglia con fino a 8.000 risultati
Stampa: stampa diretta dell'elenco tramite COGS54

Tabelle/File utilizzati¶

Tabella	Accesso	Descrizione
COGDBASE	Lettura (chiave 2: dba-merce-f)	Distinta base - cerca le distinte che contengono il componente
COGDBAGG	Lettura	Componenti aggiuntivi/sostitutivi della distinta
COGMERCI	Lettura	Anagrafica merci - validazione componente e recupero descrizioni
COGMERA3	Lettura	Anagrafica merci estesa - recupero unita' produttiva (ma3-unita-produttiva)
FEURTAB	Configurazione	Tabella configurazioni standard

Logica di elaborazione¶

Caricamento griglia (carica-griglia / carica-griglia-loop)¶

Posizionamento su COGDBASE per chiave secondaria (k02) con dba-merce-f = tm-comp
Loop sequenziale: per ogni record con dba-merce-f = tm-comp, salva in tabella tm-righe(i):
dba-merce -> tm-merce(i) (codice prodotto finito)
dba-qta -> tm-qta(i) (quantita' in distinta)
mer-um -> tm-um-comp(i) (UM del componente)
ma3-unita-produttiva -> tm-unita-prod(i) (letta da COGMERA3)
Limite: k-max-ele-tab = 8.000 righe

Trattamento sostitutivi (tratta-sostituti)¶

Scansione sequenziale di COGDBAGG con dbg-tip = "S" (sostitutivi)
Per ogni sostitutivo dove dbg-ss-gru/sot/cod = tm-comp, esegue ciclo-dbase:
Rilegge COGDBASE per il prodotto indicato in dbg-db
Filtra solo i record con dba-merce-f = dbg-comp
Aggiunge alla stessa tabella

Funzione F2 - Giacenze¶

Chiama COGV35 (COGV35-CALLED) passando il codice merce selezionato nella griglia.

Stampa¶

Stampa diretta gestita internamente: testata con descrizione componente, corpo con elenco distinte e quantita', coda con totale quantita'. Usa COGS54 per gestione stampante.

Chiamate a sottoprogrammi¶

Programma	Scopo
COGV35	Visualizzazione giacenze merce (chiamato con F2)
COGS54	Gestione stampante
COGS68W	Gestione campo merce con ricerca avanzata
GRIDADMN	Gestione griglia (preparazione, riempimento, personalizzazione)

COPY utilizzate¶

File/Select¶

feurtab.fd, cogv29.select, cogv29.fd, flsta.fd, flsta.cpy

Working storage¶

cogv29.wrk, wgrave.cpy, wnscr.cpy, wopenf.cpy, wstato.cpy, cogazien.cpy
wgrid.cpy, utilgdad.cpy, utils54.cpy, utils68.cpy, utilu20.cpy

Linkage¶

wcont.cpy, utilv35.cpy, wcont1.cpy

Screen¶

cogv29-01.scr

Procedure¶

grave.cpy, mmmask.cpy, opengen.cpy, stato.cpy, stato1.cpy, winmsg.cpy
cogv29.prc, utilgrid.cpy, cogdbase.k02

Note¶

Usa la chiave secondaria k02 di COGDBASE (cogdbase.k02) per accesso per componente (dba-merce-f).
La griglia e' ridimensionabile (gestione ntf-resized con ricalcolo dimensioni).
Le righe marcate con data 050324 aggiungono il supporto per unita' produttiva e unita' di misura componente nella griglia.