Uruchamianie SUBTPY: Typy płatności

MGTTPY: Wykonywanie zatwierdzania transakcji rozliczeniowej

Ten Entry point służy do wstawiania dodatkowego wyrażenia logicznego, następującego po zatwierdzaniu transakcji rozliczeniowych.

W przypadku każdej transakcji użytkownik ma możliwość ponownego odczytywania okna (i w ten sposób generowanych ekranów), aby wykonywać dowolne modyfikacje pól na ekranach wprowadzania płatności lub nawet liczby zakładek w oknie.

Kontekst i metoda działania

Transakcja

Brak transakcji w toku.

Plik log

Zgodnie z kontekstem:

- Pojedyncze zatwierdzanie: brak otwartego pliku log.

- Masowe zatwierdzanie: istnieje otwarty plik log.

Różne przypadki wywoływania

Entry point jest wywoływany po standardowym procesie zatwierdzania w przypadku transakcji rozliczeniowych.

Zatwierdzanie transakcji rozliczeniowych jest uruchamiane w przypadku:

- funkcji GESTPY „Zarządzanie transakcjami płatniczymi”: zatwierdzanie transakcji (pojedyncze zatwierdzanie)

- funkcja GENMSKTRT „Zarządzanie transakcjami”: zatwierdzanie wszystkich transakcji (masowe zatwierdzanie)

- programów PATCH i GENDOS, istniejących w procesie SUBTPY: masowe zatwierdzanie, albo podczas zatwierdzania folderu albo dowolnej poprawki.

Zgodnie z modyfikacjami wykonywanymi w Entry point, konieczne będzie powtórzenie zatwierdzania zmodyfikowanych ekranów i potencjalnie okna, jeżeli wiele ekranów (=zakładek) zostało zmodyfikowanych.

- do ponownego zatwierdzania ekranu 1: Call VALID(MASKDES1,APPLI,[F:ADS]NBRLAN,[F:ADS]LAN,1,OK) From VALMSK

- do ponownego zatwierdzania ekranu 2: Call VALID(MASKDES2,APPLI,[F:ADS]NBRLAN,[F:ADS]LAN,1,OK) From VALMSK

- do ponownego zatwierdzania okna: Call VALID(NOMWIN,APPLI,1,OK) From VALWIN

Na przykład:

$MGTTYP

Trbegin [AMK2]

Read [F:AMZ2]CODE = MASKDES1;'BPR' : # Odczytaj pole, które ma być modyfikowane

If fstat

[F:AMZ2]SAIAFF=3 :# Pole staje się niewidoczne

Rewrite [F:AMZ2]

If fstat

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

Endif

Endif

Commit

# Ponowne zatwierdzenie modyfikowanego pola

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

Return

Dostępne zmienne oraz maski

Maski TPYx są otwarte tylko podczas pojedynczego zatwierdzania.

Otwarte tabele

W tabeli poniżej flaga ważnej zawartości wskazuje, że zawartość ta jest zgodna z kontekstem (...).