COGSAA - Ricerca azienda gruppo¶
Posizione nel menu Programma non a menu Linkage section UTIL-COGSB0
| Tipo | Dato | Formato | Contenuto |
|---|---|---|---|
| INPUT | COGSAA-OPE | x(20) | Operazione da eseguire |
| COGSAA-MAG-TIP | x(01) | Tipo magazzino su cui effettuare la ricerca | |
| COGSAA-MAG-COD | x(05) | Codice magazzino su cui effettuare la ricerca | |
| COGSAA-I-DATA | data | Data di competenza | |
| COGSAA-I-ANA-TIP | x(01) | Tipo anagrafico su cui effettuare la ricerca | |
| COGSAA-I-ANA-COD | 9(05) | Codice anagrafico su cui effettuare la ricerca | |
| OUTPUT | COGSAA-O-GRP-AZ-COD | x(04) | Codice azienda trovato |
| COGSAA-ESITO | x(01) | Esito dell'operazione | |
| COGSAA-O-MSG | x(150) | Messaggio restituito | |
| FILLER | x(2000) |
Logica generale Programma che esegue la ricerca di un codice "azienda gruppo" in funzione di parametri di input ricevuti. Questo programma ha significato quando è configurata la gestione gruppo aziende. Configurazioni
| Gruppo | Parametro | Note |
|---|---|---|
| assist | gestione-gruppo-aziende | |
| assist | tecnici-mag-fisso |
Elaborazione L'elaborazione cambia a seconda dell'operazione richiesta.
Operazione: CERCA-DA-MAGAZZINO¶
Descrizione Riceve in input un magazzino e restituisce il codice azienda gruppo collegato. Chiamata standard
| Tipo | Dato | Formato | Contenuto |
|---|---|---|---|
| INPUT | COGSAA-OPE | x(20) | "CERCA-DA-MAGAZZINO" |
| COGSAA-I-MAG-TIP | x(01) | Tipo magazzino su cui effettuare la ricerca | |
| COGSAA-I-MAG-COD | x(05) | Codice magazzino su cui effettuare la ricerca | |
| COGSAA-I-DATA | data | Data di competenza | |
| OUTPUT | COGSAA-O-GRP-AZ-COD | x(04) | Codice azienda trovato |
| COGSAA-ESITO | x(01) | Esito dell'operazione | |
| COGSAA-O-MSG | x(150) | Messaggio restituito | |
| FILLER | x(2000) |
Elaborazione Come prima cosa verifichiamo che i campi obbligatori siano compilati e corretti. Se non è cosi' restituire COGSA8-ESITO = "N", e in COGSA8-MSG la descrizione del problema. La ricerca segue due strade principali a seconda del tipo di magazzino passato in input. A - Magazzino principale La ricerca puà avvenire se il magazzino passato è collegato ad un cliente. Se si, si effettua semplicemente una ricerca su COGAZGRP, usando AZG-CHIA2 Se trovato, il codice azienda viene restituito al programma chiamante.
| Dato | Contenuto |
|---|---|
| COGSAA-ESITO | "S" |
| COGSAA-MSG | "" |
| COGSAA-O-GRP-AZ-COD | AZG-COD |
e uscire. B - Magazzino secondario In questo caso ci sono due casi possibili: * B.1 - Magazzino secondario collegato a cliente/fornitore * B.2 - Magazzino secondario "tecnico" B.1 - Magazzino secondario collegato a cliente/fornitore Tramite la lettura di COGMAGPE verifichiamo se il magazzino è collegato ad un cliente/fornitore (MGP-ANA significativo) Se trovato, si effettua una ricerca a seconda di MGP-ANA-TIP: * "C": Ricerca su COGAZGRP, usando AZG-CHIA2 * "F": Ricerca su COGAZGRP, usando AZG-CHIA3 Se trovato, il codice azienda viene restituito al programma chiamante.
| Dato | Contenuto |
|---|---|
| COGSAA-ESITO | "S" |
| COGSAA-MSG | "" |
| COGSAA-O-GRP-AZ-COD | AZG-COD |
e uscire. B.2 - Magazzino secondario "tecnico" Questa strada si può prendere se la configurazione tecnici-mag-fisso è attiva. B.2.1 - Ricerca tecnico collegato Si cerca su COGANAT2 se il magazzino è collegato ad un tecnico (ATN2-MAGAZZINO). Se non trovato, si esce B.2.2 - Ricerca fornitore di competenza Il fornitore verrà cercato tramite ASNS21:
| Dato | Contenuto |
|---|---|
| ASNS21-OPE | "CERCA" |
| ASNS21-TECNICO | Codice tecnico trovato |
| ASNS21-DATA | COGSAA-DATA |
In ASNS21-FOR-LISTINO verrà restituito il fornitore eventualmente trovato collegato al tecnico. B.2.3 - Ricerca azienda Se trovato, si effettua una ricerca COGAZGRP, usando AZG-CHIA3 Se trovato, il codice azienda viene restituito al programma chiamante.
| Dato | Contenuto |
|---|---|
| COGSAA-ESITO | "S" |
| COGSAA-MSG | "" |
| COGSAA-O-GRP-AZ-COD | AZG-COD |
e uscire.
Operazione: CERCA-DA-INTERL¶
Descrizione Riceve in input un interlocutore (cliente/fornitore) e restituisce il codice azienda gruppo collegato. Chiamata standard
| Tipo | Dato | Formato | Contenuto |
|---|---|---|---|
| INPUT | COGSAA-OPE | x(20) | "CERCA-DA-INTERL" |
| COGSAA-I-ANA-TIP | x(01) | Tipo anagrafico su cui effettuare la ricerca | |
| COGSAA-I-ANA-COD | x(05) | Codice anagrafico su cui effettuare la ricerca | |
| OUTPUT | COGSAA-O-GRP-AZ-COD | x(04) | Codice azienda trovato |
| COGSAA-ESITO | x(01) | Esito dell'operazione | |
| COGSAA-O-MSG | x(150) | Messaggio restituito | |
| FILLER | x(2000) |
Elaborazione Come prima cosa verifichiamo che i campi obbligatori siano compilati e corretti. Se non è cosi' restituire COGSA8-ESITO = "N", e in COGSA8-MSG la descrizione del problema. Si effettua una ricerca a seconda di COGSAA-I-ANA-TIP: * "C": Ricerca su COGAZGRP, usando AZG-CHIA2 * "F": Ricerca su COGAZGRP, usando AZG-CHIA3 Se trovato, il codice azienda viene restituito al programma chiamante.
| Dato | Contenuto |
|---|---|
| COGSAA-ESITO | "S" |
| COGSAA-MSG | "" |
| COGSAA-O-GRP-AZ-COD | AZG-COD |
e uscire.
Estratto da documentazione interna ClickUp