SWC007 - Scaricamento Tabella Magazzini e Magazzini Periferici per SW-ING¶
Sorgente: cbl/swc007.cbl | Program-ID: SWC007 | Tipo: Batch BI (interattivo + Aglancio)
Menu: Statistiche > Estrazione dati vs B.I.Swing > Tabelle & Anagrafiche > Magazzini e magazzini periferici
Scopo¶
Esporta la tabella magazzini principali (COGMAGAZ filtrata su magz-tipo = "M") e la tabella magazzini periferici (COGMAGPE) verso il sottosistema BI SW-ING.
File e tabelle¶
Input¶
| File | Tipo | Modalita' | Uso |
|---|---|---|---|
| FEURTAB | ISAM | Input | Parametri |
| COGMAGAZ | ISAM | Input | Tabella magazzini (filtro magz-tipo = "M") |
| COGMAGPE | ISAM | Input | Magazzini periferici (scan completo) |
Output BI¶
| Tabella BI | Record | Modalita' | Contenuto |
|---|---|---|---|
| BINMAGAZ | bmag-rec | I-O | Magazzini (bmag-cod, bmag-descr) |
| BINMAGPE | bmgp-rec | I-O | Magazzini periferici (tipo, codice, nome, flag close/terzi/ubicazione) |
| ARPSTPRC | a-stpr-rec | I-O | Stato processi Aglancio |
Copybook utilizzate¶
| Copybook | Contenuto |
|---|---|
swc007.select, swc007.fd, swc007.wrk, swc007-01.scr, swc007.decla, swc007.prc |
Screen Designer |
binmagaz.cpy, binmagpe.cpy, relative -sql-ws.cpy / -sql-prc.cpy |
Tabelle BI |
arpstprc.cpy, arpstprc-sql-ws.cpy |
Stato processi |
sql-decla-ws.cpy |
Working storage SQL |
utilncnf.cpy, utilgesdebug.cpy, utilswgets.cpy, utilagprg.cpy |
Utility |
cogazien.cpy, k-personal.cpy |
Dati azienda |
Logica di elaborazione¶
Apertura¶
Standard SWC*: lettura azienda, configurazione, apertura connessione BI.
Elaborazione (elabora)¶
fase1: scan COGMAGAZ conmagz-tipo = "M"; per ogni record scrive BINMAGAZ (bmag-cod=magz-cod,bmag-descr=magz-nome). Esce su cambio tipo.fase2: scan completo COGMAGPE; per ogni record scrive BINMAGPE valorizzando tipo, codice, nome, flag close/terzi/ubicazione.
Chiusura¶
Standard SWC*; in modalita' batch aggiorna ARPSTPRC.
Chiamate esterne (CALL)¶
| Programma | Scopo |
|---|---|
| RNEWCONF | Configurazione (BI e Aglancio) |
| SWGETS | Conn-string AreaGate |
| C$NARG, C$PARAMSIZE, C$RERR | Runtime AcuCOBOL |
Configurazioni (RNEWCONF)¶
BI (x99-src-cfg, gruppo abilita)¶
Standard: bin-tipo, bin-db-path, bin-db-conn-string (1-3), bin-db-log-level.
Aglancio (x99-src-cfg-agl, gruppo areaapp)¶
cod-azienda, db-log-level, AGLANCIO-ATTIVO.
Schedulazione (Aglancio)¶
k-id-processo = 50007, k-tabella-statosyn = "SWC007". Logica standard SWC*.
Note¶
- Il filtro su
magz-tipo = "M"esclude i magazzini di tipo diverso (es. fittizi o di sistema). - Non c'e' fase di cancellazione iniziale: le scritture usano fallback wr/rwr.