COGM88 -- Evasione Bolla da Buono di Prelievo¶

Sorgente: cbl/cogm88.cbl | Tipo: Programma con interfaccia grafica (maschera + griglia) | Program-ID: COGM88

Menu: Magazzino > Uscite > Packing List > Evasione Bolla

Scopo¶

Genera una bolla di magazzino (DDT o fattura) a partire da uno o piu' buoni di prelievo (BDP). Il programma:

Legge testata e righe del BDP selezionato
Compila automaticamente i dati della bolla dai dati del BDP e dell'ordine collegato
Permette all'utente di completare/modificare i dati del documento
Genera la bolla con le righe corrispondenti
Chiude il BDP

Puo' funzionare in modalita' autonoma (da menu) o richiamato (CALLED) da altri programmi con operazioni specifiche.

Interfaccia utente¶

Modalita' di funzionamento¶

Modalita'	Condizione	Comportamento
Autonomo	Chiamata diretta da menu	L'utente seleziona il BDP e compila i dati della bolla
Chiamato	`cogm88-called = "COGM88-CALLED"`	Riceve BDP e operazione via linkage
Silent mode	`w-dc-silent-mode = "S"`	Generazione automatica senza interazione utente

Operazioni CALLED¶

Operazione (`w-dc-ope`)	Comportamento
`Azzera-BDP`	Inizializza la tabella buoni e termina
`Aggiungi-BDP`	Aggiunge un BDP alla tabella buoni e termina
`Crea-doc`	Attiva il silent mode e procede alla generazione

Maschera dati (tab-maschera)¶

Campo	Tipo	Descrizione
`tm-mag`	x(01)	Magazzino
`tm-aa`	9(04)	Anno BDP
`tm-num`	9(06)	Numero BDP
`tm-cli`	9(05)	Cliente
`tm-rif`	x(25)	Riferimento BDP
`tm-currency`	x(02)	Divisa
`tm-tipo-doc`	x(01)	Tipo documento: D=DDT, F=Fattura
`tm-dataop`	9(08)	Data operazione
`tm-data-acc`	9(08)	Data accettazione
`tm-clm-cod`	x(03)	Classe di movimento
`tm-clm-cau`	9(02)	Causale da classe movimento
`tm-annota1`, `tm-annota2`	x(50)	Note
`tm-aspetto`	x(40)	Aspetto merce
`tm-porto`	x(20)	Porto/resa
`tm-colli`	9(04)	Numero colli
`tm-peso`	9(07)v999	Peso
`tm-volume`	9(07)v999	Volume
`tm-vet-cod`	9(05)	Codice vettore
`tm-dst-id`	(tip x(01) + idx 9(04))	Destinazione
`tm-causale`	9(02)	Causale documento
`tm-tipobolla`	x(01)	Tipo bolla (I=Interna)
`tm-pagamento`	9(02)	Codice pagamento
`tm-fl-chiam`	x(01)	Flag collegamento chiamata Assist

Griglia righe (tm-tab)¶

Campo	Tipo	Descrizione
`tm-tva-voce`	x(02)	Voce tabella
`tm-tva-des`	x(23)	Descrizione voce
`tm-tva-merce`	x(09)	Codice merce (gru+sot+cod)
`tm-tva-imp`	9(12)v999999	Importo
`tm-tva-rbp-chia1`	x(20)	Chiave riga BDP

Tasti funzione¶

Tasto	Funzione
F3	Conferma e genera la bolla
F5	Selezione multipla BDP (send-s61)
F8	Aiuto/ricerca contestuale (magazzini, calendario)
S-F4	Gestione griglia (GRIDADMN)
Invio	Modifica riga griglia

File e Tabelle¶

File/Tabella	Copybook	Uso
COGTESBP	cogm88.fd (via select)	Testata buoni di prelievo (lettura BDP)
COGRIGBP	cogm88.fd (via select)	Righe buoni di prelievo
COGGEANA	cogm88.fd (via select)	Anagrafica clienti/fornitori
COGANAPP	cogm88.fd (via select)	Appendice anagrafica (trasporto, concorsuale)
COGMERCI	cogm88.fd (via select)	Anagrafica merci
COGMAGAZ	cogm88.fd (via select)	Anagrafica magazzini
COGTABEL	cogm88.fd (via select)	Tabelle generiche (classi mov., aspetto, divise, ecc.)
COGTESOR	cogm88.fd (via select)	Testata ordini (per dati collegati)
COGCONOR	cogm88.fd (via select)	Conferme ordine
COGGENER	cogm88.fd (via select)	Generici/collegamenti
COGCONFI	cogm88.fd (via select)	Configurazione programma
COGMDTES	cogm88.fd (via select)	Testata liste Modula
COGTRANS	(definito inline)	File di transito per elaborazione
TRAN-M96	tran-m96.fd, tran-m96.cpy	File transito esterno (condiviso, EXTERNAL)
FEURTAB	cogfiles.cpy	File tabelle Euro

File COGTRANS (transito)¶

Struttura per le righe della bolla in elaborazione, con chiave primaria su BDP + progressivo e chiave alternata su merce + BDP e su BDP + EAN.

Chiamate esterne¶

Programma	Scopo
RNEWCONF	Lettura configurazioni
COGS52W	Gestione campo data
COGS68W	Gestione campo merce
COGS63W	Gestione campo testuale
COGS86W	Utility
COGS89W	Gestione classe di movimento
COGS72W	Utility
COGL26	Gestione listino/prezzo
COGM96	Gestione righe documento
COGU01	Utility generica
COGU02	Utility generica
COGU07	Utility conti
COGU09	Utility
COGU10W	Utility valute/divisioni
COGU12	Aggiornamento quantita' prenotate
COGU18	Utility
COGU30	Utility
COGU33	Utility vettori
COGU43	Utility colli/stampa
COGV64L	Gestione lotti
COGW36	Selezione magazzino
COGW92	Finestra di selezione
WIN105	Finestra
COGP86	Stampa bolla
COGD72	Utility
COGE08C	Gestione anagrafica (personalizzazione EXON)
COGS10W	Gestione serial number
GRIDADMN	Gestione griglia interattiva
COGSA0	Creazione BDP
COGS01	Selezione anagrafica
COGS25W	Gestione anagrafica

Copybook utilizzate¶

Copybook generate da Screens¶

cogm88.select, cogm88.fd, cogm88.wrk, cogm88.prc, cogm88.decla, cogm88-01.scr

Copybook di libreria¶

cogfiles.cpy -- Definizione file Euro
k-personal.cpy -- Costanti personalizzazione
k-tipi-cogtabel.cpy -- Costanti tipi tabella
k-rma.cpy -- Costanti RMA (conto anticipi)
k-u10.cpy, wrk-u10.cpy -- Utility valute
wstato.cpy, wopenf.cpy, wgrave.cpy, wnscr.cpy -- Working storage standard
cogazien.cpy -- Dati azienda
wgrid.cpy, utilgdad.cpy -- Griglia interattiva
utilncnf.cpy -- Interfaccia RNEWCONF
utildlg.cpy -- Utility dialog box
Numerose copybook util*.cpy per interfacce con sottoprogrammi

Linkage¶

wcont.cpy -- Struttura linkage standard
utilcogm88.cpy -- Interfaccia per chiamata esterna (CALLED)
utile08c.cpy -- Interfaccia COGE08C
utill14.cpy, utils01.cpy, utilv52.cpy, utilv56.cpy, utilv58.cpy, utilv71.cpy -- Interfacce varie
utils10.cpy -- Interfaccia serial number
wcont1.cpy -- Linkage supplementare

Logica di elaborazione¶

Flusso principale¶

Inizializzazione: apertura file, lettura configurazione, impostazione parametri default (magazzino principale, data odierna)
Selezione BDP (a-tm-mag, a-tm-aa, a-tm-num): l'utente inserisce le coordinate del BDP. Con F5 puo' selezionare da lista
Lettura BDP (a10-read): legge la testata (COGTESBP), verifica stato apertura e collegamento chiamate
Preparazione dati (a7-prepara-documento): compila i dati della bolla dai dati del BDP, dell'anagrafica cliente, dell'ordine collegato
Accept dati bolla: tipo documento, data, classe di movimento, note, aspetto, vettore, destinazione, pagamento
Generazione bolla: crea il documento di magazzino con le righe corrispondenti, aggiorna giacenze, chiude il BDP

Gestione BDP multipli¶

La tabella tm-tab-buoni (fino a k-max-ele-bdp = 100 elementi) permette di accumulare piu' BDP per generare un'unica bolla. L'operazione CALLED Aggiungi-BDP aggiunge un BDP alla tabella, e Crea-doc genera il documento cumulativo.

Gestione Kit¶

Se tm-cfg-gestione-kit = "K", il programma apre il file di transito tran-m96 e gestisce l'esplosione dei kit di prodotti nelle righe della bolla.

Chiamata collegata¶

Se il BDP e' collegato a una chiamata di assistenza (tbp-fl-chiam <> spaces), la chiamata deve essere chiusa (tbp-fl-chiam = "C") per procedere. Il campo tm-fl-chiam viene usato per saltare la ricerca ordini collegati.

Controllo giacenza¶

Se configurato (tm-cfg-ctr-gia), il programma verifica le giacenze prima di consentire l'evasione, con possibilita' di sblocco via password (tm-cfg-ctr-gia-sblocco-password).

Consolidato¶

Il programma cerca il consolidato di periodo (leggi-consolidato) per determinare la data minima del documento.

Configurazioni¶

Lette tramite RNEWCONF e x99-src-confi:

Parametro	Note
`tm-cfg-asp`	Aspetto merce predefinito
`tm-cfg-cod-ass` / `tm-cfg-cod-tra`	Codici assistenza/trasporto
`tm-cfg-gestione-kit`	Attiva gestione Kit ("K")
`tm-cfg-cau-conto-ant`	Causale conto anticipi (pers. EXON)
`tm-cfg-clm-entrata` / `tm-cfg-clm-uscita`	Classi movimento predefinite
`euta-c041-ctr-gia`	Controllo giacenza attivo
`ctr-gia-sblocco-password`	Password per sblocco controllo giacenza

Documentazione tecnica -- 2026-04-16