Creazione documenti magazzino - COGS26¶

Panoramica¶

COGS26 è il programma centralizzato per la creazione di documenti di magazzino. Gestisce anche i trasferimenti tra magazzini e l'integrazione con Modula.

File: cbl/cogs26.cbl

Flusso inserimento¶

Documento normale¶

d-inserisci
    └── (fine) invio-lista-inser (se magazzino Modula)

Trasferimento¶

d-inserisci (documento uscita)
d-inserisci (documento entrata)
aggancia-testate-trasferimenti (crea raccordo)
    └── invio-lista-inser (per ogni documento su Modula)

Integrazione Modula (COGD53/COGD53DF)¶

Condizioni di attivazione¶

tm-cfg-modula-db-frontiera = "S"
w-fl-esegui-cogd53df = "S" (impostato durante inserimento righe)
Magazzino = az-mag-modula
tm-ope-modula <> k-ope-accantona-vers

Routine invio-lista-inser¶

Chiama COGD53 in tre fasi: 1. DOC-PRECEDENTE - inizializza contesto 2. DOC-ATTUALE - passa il documento corrente (tes-chia3) 3. DOC-ESEGUI - esegue l'elaborazione

Importante: La routine usa i dati di tes-rec. Per i trasferimenti, bisogna ricaricare tes-rec prima di ogni chiamata per avere i dati corretti di ciascun documento.

Note sui trasferimenti¶

Per i trasferimenti, invio-lista-inser viene chiamato dopo aggancia-testate-trasferimenti. Questo permette a COGD53DF di: - Riconoscere il documento come trasferimento (tramite il raccordo) - Modificare il tipo di lista inviata di conseguenza

Variabili chiave¶

Variabile	Descrizione
`d-trasferimento`	"S" se stiamo creando un trasferimento
`w-trasf-usc`	Chiave documento uscita (trasferimento)
`w-trasf-ent`	Chiave documento entrata (trasferimento)
`w-fl-esegui-cogd53df`	Flag per esecuzione differita COGD53
`w-tu-mag` / `w-te-mag`	Magazzino uscita/entrata