Punkty wejścia > Moduł Dane podstawowe > Standardowy skrypt TRTWIP 

MAJITMMVT: Dodatkowa aktualizacja plików po aktualizacji produkcji w toku

Prezentacja

Ten entry point dotyczy zarządzania produkcją w toku.

Służy do przeprowadzania dodatkowych aktualizacji plików po każdym działaniu na zapasach produkcji w toku.

Kontekst i metoda działania

Transakcja

Jedna transakcja jest w toku. Wartość zmiennej GOK jest ustawiona na 1.

Różne przypadki wywołań

Ten entry point jest wywoływany w przetwarzaniu TRTWIP, które samo jest wywoływane po każdym procesie (Magazyn, Zakup, Sprzedaż, Produkcja), aby umożliwić utworzenie, modyfikację lub usunięcie zapasów produkcji w toku.

Zmienne znaczące

WMAJCOD zawiera : ' C ' przy tworzeniu rekordu ORDERS

' M ' przy przepisywaniu rekordu ORDERS

' A ' przy usuwaniu rekordu ORDERS

Jeśli WMAJCOD = 'M'

WRMNEXTQTY zawiera pozostałą ilość przed przepisaniem produkcji w toku z jej nową ilością.

WOLDWIPSTA zawiera poprzedni status produkcji w toku (1 = 'Potwierdzone' », 2 = 'Planowane', 3= 'Sugerowane', 4 ='Zamknięte').

Otwarte tabele

W poniższej tabeli flaga ważnej zawartości wskazuje, że zawartość ta jest zgodna z kontekstem (bieżąca wysyłka jest załadowana ... poza tymi pozycjami).

Tabela

Ważna zawartość

Tytuł tabeli

ORDERS

TAK

Produkcja w toku

Otwórz ekrany

Ekran

Ważna zawartość

Tytuł ekranu

ORDK

TAK

Ustawienia produkcji w toku

Przypadek szczególny

W celu wczytania sumy wymagania (na przykład BESSTO) w tabeli artykuł-lokalizacja ogółem (ITMMVT), należy wykonać następujące czynności :

Dla zamówień

- SOF (Zamówienie klienta) ( [F:ORD]WIPTYP=1 i [F :ORD]WIPSTA=1 )

- MWF (Surowce) ( [F:ORD]WIPTYP=6 i [F :ORD]WIPSTA=1 )

- TPF (Żądanie międzymagazynowe) ( [F:ORD]WIPTYP=8 i [F :ORD]WIPSTA=1 )

Jeśli WMAJCOD = ' C '

[F :ITV]BESSTO += [F:ORD]RMNEXTQTY

Jeśli WMAJCOD = ' M '

Jeśli WOLSWIPSTA = 2 lub WOLDWIPSTA = 3 i [F :ORD]WIPSTA = 1 (zmiana statusu z 'Planowane/Sugerowane' na 'Potwierdzone')

[F :ITV]BESSTO += [F:ORD]RMNEXTQTY

Jeśli nie

[F :ITV]BESSTO += [F:ORD]RMNEXTQTY

Jeśli WMAJCOD = ' A '

[F :ITV]BESSTO -= [F:ORD]EXTQTY – [F :ORD]CPLQTY

ORDMAJ: Aktualizacja pól specjalnych/niestandardowych w pliku ORDERS produkcji w

Ten entry point dotyczy zarządzania produkcją w toku.

Jest on używany do przejęcia kontroli krótko przed utworzeniem lub modyfikacją rekordu produkcji w toku (co umożliwia na przykład inicjalizację pól niestandardowych/specjalnych lub ponowną kalkulację ilości w aktywnych jednostkach).

Kontekst i metoda działania

Transakcja

Jedna transakcja jest w toku. Wartość zmiennej GOK jest ustawiona na 1.

Różne przypadki wywołań

Ten entry point jest wywoływany w trybie tworzenia i modyfikacji przetwarzania TRTWIP, które samo jest wywoływane po każdym procesie (Magazyn, Zakup, Sprzedaż, Produkcja) wykorzystywanym do tworzenia rekordu produkcji w toku.

Zaleca się zatem przetestowanie zmiennych GFONCTION i WMAJCOD w celu identyfikacji kontekstu wywołania.

Zmienne znaczące

WMAJCOD zawiera :

' C ' przy wpisywaniu rekordu ORDERS

' M ' przy przepisywaniu rekordu ORDERS

Należy zauważyć, że przy ponownej kalkulacji ilości w aktywnej jednostce, uwzględnia się tylko zamówienia pochodzące z zakupu.

Poniżej znajduje się przykład niestandardowego procesu zarządzania tym wymaganiem :

$ACTION

Przykład ACTION

Kiedy 'ORDMAJ' : Gosub ORDMAJ

Kiedy Domyślny :

Endcase

Zwrot

#-----------------------------------#

# Przeliczenie - ilości w aktywnej jednostce #

# dla zamówień pochodzących z zakupów #

# - [F:ORD]RMNEXTQTY #

# - [F:ORD]CPLQTY #

# - [F:ORD]EXTQTY #

#-----------------------------------#

$ORDMAJ

Jeśli find([F:ORD]WIPTYP,2,7) & left$([M:ORDK]ABBFIL,1)='P'

Jeżeli [F:ITM]ITMREF<>[F:ORD]ITMREF

Odczyt [ITM] ITM0=[F:ORD]ITMREF: Jeżeli fstat Raz [F:ITM]: Koniec jeśli

Koniec jeśli

Jeśli [F:ITM]STOMGTCOD=3 & [F:ITM]DEFPOT<>0

[F:ORD]RMNEXTQTY=[F:ORD]RMNEXTQTY*[F:ITM]DEFPOT/100

Wywołaj QTEARR ([F:ORD]RMNEXTQTY,[F:ITM]STU) z TRTDIV

Jeśli [F:ORD]CPLQTY <> 0

[F:ORD]CPLQTY=[F:ORD]CPLQTY*[F:ITM]DEFPOT/100

Wywołaj QTEARR ([F:ORD]CPLQTY,[F:ITM]STU) z TRTDIV

Koniec jeśli

Jeśli [F:ORD]EXTQTY <> 0

[F:ORD]EXTQTY=[F:ORD]EXTQTY*[F:ITM]DEFPOT/100

Wywołaj QTEARR ([F:ORD]EXTQTY,[F:ITM]STU) z TRTDIV

Koniec jeśli

Koniec jeśli

Koniec jeśli

Zwrot

Otwarte tabele

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

Tabela

Ważna zawartość

Tytuł tabeli

ORDERS

TAK

Produkcja w toku

Otwórz ekrany

Ekran

Ważna zawartość

Tytuł ekranu

ORDK

TAK

Ustawienia produkcji w toku