Vai al contenuto

ASN03E - Modelli prestazioni/materiali di default

Sorgente: cbl/asn03e.cbl | Program-ID: ASN03E | Tipo: Programma interattivo (gestore tabella anagrafica)

Menu: Assist 2.0 > Archivi > Tabelle > Modelli prestazioni/materiali


Scopo

Gestisce l'anagrafica dei "modelli" di prestazioni/materiali di default (tipo "G"), usati nella creazione chiamate di assistenza per suggerire al tecnico le prestazioni/materiali previsti. Il modello e' la testata di un kit il cui dettaglio (prestazioni di default) e' gestito da ASN014. Programma standalone con griglia editabile; supporta modalita' "selezione" via utilasn03e.


File e tabelle

File/Tabella Tipo Modalita' Descrizione
FEURTAB ISAM Input Parametri generali azienda
ASNMTRPD ISAM I-O Modelli prestazioni/materiali di default (e relativo dettaglio)

Campi principali del record ASNMTRPD (ampd-):

Campo Descrizione
ampd-chia1 Chiave primaria (tipo + codice + progressivo)
ampd-tipo Tipo record (qui sempre "G" = modello di gruppo)
ampd-codice Codice modello
ampd-prog Progressivo riga di dettaglio (0 = testata modello)
ampd-note Descrizione / note del modello

La testata del modello e' il record con ampd-prog = 0; le righe di dettaglio (progressivi > 0) sono le prestazioni/materiali gestite da ASN014.

Copybook utilizzate

Copybook Descrizione
asn03e.select, asn03e.fd, asn03e.wrk, asn03e.tm, asn03e-01.scr, asn03e.prc, asn03e.decla Screen Designer
asn03e.imppredf-wrk, asn03e.imppredf, utilimppredf.cpy Filtri predefiniti griglia
cogfiles.cpy Layout FEURTAB
wgrave, wnscr, wopenf, wstato, cogazien Working storage standard + dati azienda
wgrid.cpy, utilgdad.cpy Working griglia + linkage GRIDADMN
utils52.cpy, utilu20.cpy Utility controlli/subroutine
utilasn014.cpy Linkage chiamata ASN014 (dettaglio modello)
utilasn03e.cpy Linkage di chiamata esterna

Logica

Pattern standard "tabella anagrafica" con griglia su file di transito (t-grid-det):

  • Caricamento (z-grid-det-crea-transito): scan di ASNMTRPD con ampd-tipo = "G" e ampd-prog = 0 (solo testate modello); ogni testata diventa una riga di griglia. t-gor-r-cod-prec conserva il codice originale per gestire la cancellazione.
  • F6 - Dettaglio: apre ASN014 (asn014-tipo = "G", asn014-in-codice = tm-r-cod) per gestire la composizione del kit (prestazioni di default). Attivo solo su righe gia' salvate (tm-r-cod-prec non vuoto).
  • Editing: Ctrl+A aggiunge una riga, Ctrl+E svuota la riga (cancellazione). Il codice modello non e' modificabile una volta salvato (z-grid-det-cod-be-ep blocca l'accept se tm-r-cod-prec valorizzato). Controlli: descrizione obbligatoria se codice presente.
  • Salvataggio F3 (b-aggiorna): scan del transito. Riga con progressivo ma codice vuoto -> c-cancella-record, che elimina la testata e tutto il dettaglio del modello (scan ASNMTRPD per ampd-tipo = "G" + ampd-codice, del-asnmtrpd in loop). Riga modificata (t-gor-r-riga-mod = "S") -> b-aggiorna-record (wr-asnmtrpd se nuova, rwr-asnmtrpd).
  • Massimo righe griglia: k-max-ele-tab = 900.

Linkage (utilasn03e)

Campo Direzione Descrizione
asn03e-caller in Nome del programma chiamante
asn03e-called in "ASN03E" attiva la modalita' selezione
asn03e-out-cod out Codice modello selezionato
asn03e-out-des out Descrizione modello

Note

  • Cancellazione a cascata: eliminando un modello dalla griglia vengono cancellate anche tutte le righe di dettaglio associate (stesso ampd-codice, tutti i progressivi). Attenzione all'impatto sui riferimenti in chiamate/interventi che usano il modello.
  • Modalita' selezione/gestione commutabili con F3; in selezione l'editing di griglia e' disabilitato.