CRM030W - Wrapper Gestione Nominativi CRM

Campo	Valore
Sorgente	cbl/crm030w.cbl (~47 righe)
Tipo	Wrapper di chiamata (no file, no UI propria)
Posizione menu	CRM > Operativo > Gestione Nominativi

Scopo

Programma minimale (~47 righe) il cui unico ruolo e' incapsulare la chiamata a CRM030 (gestione scheda nominativi/clienti potenziali) in un sottoprogramma "USING" separato. Permette il richiamo ricorsivo di CRM030 anche quando l'ingresso avviene dal menu, evitando conflitti di stato/cancel tra due istanze del programma.

File e tabelle

Nessuna (no file section, no open).

Programmi chiamati

Programma	Scopo
CRM030	Gestione scheda nominativi (con cancel dopo l'uscita)

Configurazioni RNEWCONF

Nessuna.

Logica di elaborazione

1. Se wo-parametro non vuoto:
2. Imposta crm030-called = "CRM030-CALLED"
3. Imposta crm030-tcl = wo-parametro (tipo di clientela / contesto)
4. Chiama CRM030 con util-crm030.
5. Esegue cancel "CRM030".

Note implementative

• Copybook usate: utilcrm030.cpy, wcont.cpy, wcont1.cpy.
• Source-computer/object-computer: rmcobol (non pc-sperry ne' acu-cobol).
• Nessun valore funzionale autonomo, ma indispensabile alla ricorsione del menu su Gestione Nominativi.