Programma SUBTPY : Transazioni pagamenti/incassi

MGTTPY: In seguito alla validazione di una transazione di pagamento

Questo entry point permette di assumere il controllo in seguito alla validazione delle transazioni di pagamenti.

Per ogni transazione, l'utente ha la possibilità di rileggere la finestra (e quindi le videate generate) per eventualemente apportare delle modifiche sui campi delle videate di inserimento di pagamenti oppure anche il numero di folder della finestra.

Contesto e modalità di funzionamento

Transazione

Non c'è transazione in corso.

File traccia

Secondo il contesto: 

 - Validazione unitaria: non ci sono file di traccia aperti

 - Validazione in massa: c'è un file traccia aperto

Vari casi di chiamata

Questo entry point è chiamato dopo il programma standard di validazione di una transazione di pagamento.

La validazione delle transazioni di pagamento è lanciata sotto:

    - La funzione GESTPY "Gestione delle transazioni di pagamento": validazione di una sola transazione (validazione unitaria)

    - La funzione GENMSKTRT "Generazione delle transazioni": validazione di tutte le transazioni (validazione in massa)

    - Nel programma SUBTPY esistono i programmi PATCH e GENDOS: validazione in massa anche durante la validazione di dossier o di eventuale patch

A seconda delle modifiche apportate nell'entry point, bisognerà validare nuovamente la o le videate modificate ed eventualmente la finestra se il numero di videate (= folder) è stata modificato.

  - per rivalidare la videata 1: Call VALID(MASKDES1,APPLI,[F:ADS]NBRLAN,[F:ADS]LAN,1,OK) From VALMSK

  - per rivalidare la videata 2 :  Call VALID(MASKDES2,APPLI,[F:ADS]NBRLAN,[F:ADS]LAN,1,OK) From VALMSK

  - per rivalidare la finestra: Call VALID(NOMWIN,APPLI,1,OK) From VALWIN

 Esempio:

$MGTTYP

Trbegin [AMK2]

Read [F:AMZ2]CODE = MASKDES1;"BPR"  : # Lettura del campo da modificare

If !fstat

  [F:AMZ2]SAIAFF=3 : # Campo diventato nascosto

  Rewrite [F:AMZ2]

 If fstat

GOK=0 : Call FSTA("AMZ2") From GLOCK : Rollback : Return

 Endif

Endif 

Commit

# Rivalidazione della videata modificata

Call VALID(MASKDES1,APPLI,[F:ADS]NBRLAN,[F:ADS]LAN,1,OK) From VALMSK

Return

Variabili e videate disponibili

Le videate TPYx sono aperte solo in caso di validazione unitaria.

Tabelle aperte

Nel riquadro sottostante, il flag contenuto significativo indica che il contenuto è allineato al contesto (...).