Poniżej podano domyślne parametry SyncSort, które można zmienić zgodnie z powyższym opisem. BMSG zawiera listę alternatywnych parametrów określonych przez ORTPARM na zestawie danych komunikatu wyjściowego. Ta wartość domyślna powoduje ograniczone sprawdzanie poprawności danych zawartych w polach oznaczonych jako spakowane lub podzielone na strefy. Aby zakończyć sortowanie, jeśli dane w polach PD lub ZD są nieprawidłowe, należy podać CMPCPD. W przypadku sortowań przywoływanych przez program za pomocą procedur wyjścia należy określić ilość pamięci potrzebną dla wyjść, a następnie określić COREMAX-nnn K. NOSNAP będzie tłumił zrzut SNAP SyncSort, który jest generowany w przypadku krytycznego błędu. Jeśli masz instrukcję SYSUDUMP DD, otrzymasz zwykły zrzut systemu operacyjnego. Jeśli potrzebujesz zrzut SNAP, określ parametr DEBUG. Dla bardziej efektywnego sortowania kolejność rekordów nie jest zachowywana. Jeśli zamówienie ma zostać zachowane, użyj słowa kluczowego EQUALS. Komunikaty o błędach są generowane, gdy wystąpi błąd IO. Jeśli określono IOERRABE, nastąpi UŻYTKOWNIK 999 ABEND. Instrukcje kontrolne będą wymienione w zestawie danych SYSOUT. NOLIST wyłączy to. Domyślną nazwą DD zbioru danych komunikatu jest SYSOUT. Każda inna poprawna nazwa DD może zostać podstawiona. Aby być zgodnym z opcjami wyświetlania procedur wyjściowych COBOL, zdefiniowane cechy zestawu danych komunikatu to: DCB (LRECL121, BLKSIZE121, RECFMFA) Niepowodzenie sortowania spowoduje wydanie kodu powrotu 16. Jeśli określono RC16ABE, UŻYTKOWNIK 16 ABEND wystąpi. Niewykorzystane miejsce w zestawach danych sortowni zostanie zwolnione w czasie wykonywania, chyba że sortowanie jest inicjowane przez program. Aby zwolnić nadmiar miejsca w zbiorze danych SORTOUT, można określić RLSOUT. RESET musi być podany jako parametr, jeśli zestaw danych SORTOUT jest plikiem VSAM, który został utworzony z opcją POWTÓRZ, aby uniemożliwić SyncSort traktowanie programu SORTOUT jako zestawu danych MOD. W razie potrzeby przydzielana jest dodatkowa alokacja zestawów danych sortowania. Nie zostaną przeprowadzone testy poprawności rekordów o zmiennej długości. Dokumentacja narzędzia SyncSort znajduje się w instrukcji SyncSort Release 3.4 dla programistów firmy SyncSort, Inc. Można zamówić instrukcje od dostawcy pod tym adresem: SyncSort Incorporated 50 Tice Boulevard Woodcliff Lake, NJ 07675 Telefon 201930-9700 e-mail: mvstechsyncsort Faks: (201) 930-8284 Do wiadomości: Usługi produktów Syncsort Jeśli potrzebujesz pomocy przy korzystaniu z SyncSort w EIampO, skontaktuj się z biurem obsługi klienta EIampO telefonicznie pod numerem (352) 392-2061 lub pocztą e-mail na adres consultlists. ufl. edu. Twoje komentarze są mile widziane Czekamy na Twoje komentarze i sugestie dotyczące tej i całej dokumentacji UFIT. Wyślij swoje uwagi na adres: UF Information Technology 2046 NE Waldo Rd, Suite 2100 Gainesville, Florida 32609-8942Supnij po prostu plik danych wejściowych, który został wybrany w tym przykładzie dla I8217. To są dane z roku 2008. -------- 1 -------- 2 -------- 3 -------- 4 ---- ---- 5 -------- 6 ---- AG10001160 Ramesh CHANDRA GUHA INDIA160160160160 MAHARASHT MUMBAI160160160 01000 AG10002160 QUASAR SHABBIR CHUN INDIA160160160160 MAHARASHT PUNE160160160160160 02000 AG10003160 Veeramani DARYAGANJ INDIA160160160160 MAHARASHT NAGPUR160160160 03000 AG10004160 DELPHAN FERANDAZ160160160 INDIA160160160160 TAMIL NAD CHENNAI160160 04000 AG10005160 PADMAVATHI SUNDARAM INDIA160160160160 TAMIL NAD SALEM160160160160 05000 AG10006160 NEELESHWARI IYER160160160 INDIA160160160160 TAMIL NAD Ernakulam 06000 AG10007160 Ajay NANUBHAI PARSA INDIA160160160160 WEST Beng KOLKATA160160 07000 AG10008160 Mehul POPATLAL sUTA INDIA160160160160 WEST Beng Kharagpur 08000 AG10009160 KRITHIKA RAMANUJAM160 INDIA160160160160 WEST Beng Sundarban 09000 AG10010160 ANKUR CHOUDHARY160160160160 INDIA160160160160 PUNJAB160160160 AMRITSAR160 10000 AG10011160 Hiren NITIN SHETH160160 INDIA160160160160 PUNJAB160160160 JALANDHAR 11000 AG10012160 DARSHAN SHAH160160160160160160160 INDIA160160160160 HARYANA160160 CHANDIGAR 12000 W roku 2009, ze względu na premię za wyniki, przyznaną Agentom Ubezpieczeniowym, wszyscy dokładali większych starań, aw następnym kwartale zaobserwowano, że ich Sprzedaż wzrosła o 10 procent. Napisz Batch JOBJCL, który zwiększa sprzedaż ubezpieczeń o 10 procent. Musisz więc wygenerować raport dotyczący sprzedaży za rok finansowy kończący się w 2009 r., Pokazujący 10 wzrost wartości sprzedaży dla wszystkich agentów. Aby wykonać operacje arytmetyczne (takie jak rosnącoaddition) w polach numerycznych, możemy użyć kilku operatorów, takich jak ADD, SUB, MUL, DIV, MOD w instrukcji OUTREC FIELDS Control. Aby traktować pole jako numeryczne i móc wykonywać na nim operacje numeryczne, kodujemy specyfikator ZD (Zoned Decimal). Aby zwiększyć wartość sprzedaży o 10 procent, musimy pomnożyć sprzedaż x 1,1. Ale ponieważ wartości dziesiętne (zmiennoprzecinkowe) nie są dozwolone, pomnożymy SALES x 11, a następnie opiszemy format wynikowego pola Edited. Format edytowanego pola można określić za pomocą parametru EDIT. Jeśli mamy wejściową sprzedaż 1000, pomnożymy przez 11, 1000 x 11 11000. Aby wyświetlić poprawny wynik, przecinek dziesiętny musi zostać przesunięty o jedno miejsce w lewo. Zatem format to TTTT. T (gdzie T oznacza dowolną znaczącą cyfrę do wyświetlenia). Możemy dodać przecinek taki jak T, TTT. T. Niektóre liczby sprzedaży przekraczają 10 000 (5 cyfr). Musimy więc upewnić się, że są one wyświetlane poprawnie. Dlatego musimy dodać I (Nieznaczną cyfrę). Określamy format pola wyjściowego za pomocą EDYTUJ parametr. Będziemy zakodować parametr EDIT dla powyższego przykładu, tak, jak wygląda Batch JOBJCL dla zwiększenia sprzedaży o 10 procent. -------- 1 -------- 2 -------- 3 -------- 4 -------- 5 ----- --- 6 -------- 7-- CAA0176K PRACY A123 Quasar, CLASSG, MSGCLASSY, NOTIFYampSYSUID160160160160160160160160160160160 STEP01 EXEC160 PGMSORT, REGION1024K160160160160160160160160160160160160160160160160160160160160160160160160160160160160160160160160160160160 SORTIN DD160160160 DSNCAA0176.DEMO. SORTIN, DISPSHR160160160160160160160160160160160160160160160160160160160160160160160160 SYSPRINT DD160 SYSOUT160160160160160160160160160160160160160160160160160160160160160160160160160160160160160160160160160160160160160160160160160160160160160160160160 SYSOUT DD160160160 SYSOUT160160160160160160160160160160160160160160160160160160160160160160160160160160160160160160160160160160160160160160160160160160160160160160160160 SORTXSUM DD160 DSNCAA0176. DEMO. REPORT, DISPSHR160160160160160160160160160160160160160160160160160160160160160160160160 SORTOUT DD160160 DSNCAA0176.DEMO. SORTOUT, DISPSHR160160160160160160160160160160160160160160160160160160160160160160160160160160160160160160160160160160160160 SYSIN160 DD160160160 160160160160160160160160160160160160160160160160160160160160160160160160160160160160160160160160160160160160160160160160160160160160160160160160160160160160160160160 pola sortowania 160 (30,5, CH A) -160160160160160160160160160160160160160160160160160160160160160160160160160160160160160160160160160160160160160160160160160160160160 160 outrec pola (30,5,2X (60,5 ZD Mul, 11), EDIT (IT TTT. T) 80: X ) 160160160160160160160160 160160160160160160160160160160160160160160160160160160160160160160160160160160160160160160160160160160160160160160160160160160160160160160160160160160160160160160160160160160160160160160160160160160160160160 po złożeniu powyższego Stream Job, końcowy raport Wyjście sprzedaży 2009, który pokazuje 10 wzrost sprzedaży każdego agenta ubezpieczeniowego, wygląda mniej więcej tak - -------- 1 ---- INDIA160160 1 100,0 INDIA160160 2.200,0 INDIA160160 3 300,0 INDIA160160 4 400,0 INDIA160160 5,500,0 INDIA160160 6,600,0 INDIA160160 7,700,0 INDIA160160 8,800,0 INDIA160160 9,900,0 I NDIA160 11 000,0 INDIA160 12 100,0 INDIA160 13,200,0 P. Jak zmienić format rekordów za pomocą instrukcji OUTREC OVERLAY Control Kiedy używamy pól OUTREC do ponownego formatowania rekordów wyjściowych, musisz określić wszystkie pola, które chcesz umieścić w rekordzie wyjściowym. Musisz poinformować narzędzie DFSORT za pomocą instrukcji kontrolnej OUTREC FIELDS, każdej pozycji, którą chcesz nagrać. W związku z tym musisz zbudować ponownie sformatowany rekord, po jednym elemencie - pole po polu. Pomiędzy nimi możesz dodać znaki specjalne, takie jak przecinek (,) lub symbol waluty (). Może to być bardzo uciążliwe i kłopotliwe, jeśli rekord ma dużą długość i zawiera wiele kolumn terenowych. Jeśli chcesz zmodyfikować tylko garść kolumn, łatwiejszym i wygodniejszym rozwiązaniem jest użycie OLALAY Control Statement. Zauważ, że instrukcja OVERLAY może być używana do wykonywania tych samych zadań, które możesz wykonać za pomocą instrukcji OUTREC. Pozwól, że pokażę ci prosty przykład, który ilustruje, w jaki sposób podnieść wartość sprzedaży agentów ubezpieczeniowych, jak w powyższym przykładzie, ale używając instrukcji OUTREC OVERLAY. Ten przykład pokazuje, jak łatwo można użyć instrukcji OVERLAY w przeciwieństwie do skrupulatnej i uciążliwej instrukcji kontroli OUTREC FIELDS. -------- 1 -------- 2 -------- 3 -------- 4 -------- 5 ----- --- 6 -------- 7-- CAA0176A PRACY A123 Quasar, CLASSG, MSGCLASSY, PRTY15, NOTIFYampSYSUID160 STEP01 EXEC160 PGMSORT, REGION1024K160160160160160160160160160160160160160160160160160160160160160160160160160160160160160160160160160 SORTIN DD160160160 DSNCAA0176.DEMO. SORTIN, DISPSHR160160160160160160160160160160160160160160160160160160160160160160 SYSPRINT DD160 SYSOUT160160160160160160160160160160160160160160160160160160160160160160160160160160160160160160160160160160160160160160160160160160160160160160 SYSOUT DD160160160 SYSOUT160160160160160160160160160160160160160160160160160160160160160160160160160160160160160160160160160160160160160160160160160160160160160160 SORTXSUM DD160 DSNCAA0176.DEMO. REPORT, DISPSHR160160160160160160160160160160160160160160160160160160160160160160 SORTOUT DD160160 DSNCAA0176.DEMO. SORTOUT, DISPSHR160160160160160160160160160160160160160160160160160160160160160 SYSIN160 DD160160160 16016016016016016016016016016016016016016016016 0160160160160160160160160160160160160160160160160160160160160160160160160160160160160160160160160160160160160160 160 OPCJA KOPIA -160160160160160160160160160160160160160160160160160160160160160160160160160160160160160160160160160160160160160160160160160160160160160160160160160160160160160160 160 outrec nakładki (60: 60,5, ZD, ADD (60,5, ZD, DIV, 10), TOZD, LENGTH5) 160160160 Q. Jak komunikat praca outrec IFTHEN sterowania Można opracować przez pokazując prosty strumień JCLJob OUTREC FIELDS i OUTREC Overlay pozwala na zastosowanie tego samego formatowania do wszystkich rekordów wyników. Jeśli jednak chcesz zastosować różne ponowne formatowanie do różnych rekordów wyjściowych, należy użyć opcji IFTHEN. Używając opcji IFTHEN można zastosować różne instrukcje OUTREC FIELDS lub OUTREC OVERLAY (formaty) do różnych rekordów wyjściowych. Załóżmy, że chcielibyśmy wygenerować raport wyjściowy w następujący sposób: 1) Jeśli SPRZEDAŻ Agent 06000, następnie Zwiększ 10 2) Jeśli SPRZEDAŻ Agent 06000, następnie Zwiększ 20 Tak, dla wszystkich rekordów mających sprzedaż o wartości 6000, pomnóżmy (MUL) o 1.1. Dla wszystkich rekordów o sprzedaży gt 06000 mnożymy (MUL) 1,2. W ten sposób możemy pomnożyć rekord odpowiednio przez 11 i 12, w JCL i wyświetlić pole wyjściowe za pomocą EDIT Format, EDIT (IT, TTT. T) -------- 1 -------- 2 -------- 3 -------- 4 -------- 5 -------- 6 -------- 7--160 - -------------------------------------------------- ----------------- OUTREC IFTHEN Control Statement 8211 Reformatowanie Rekordy inaczej160160160160 ------------------------- ------------------------------------------- CAA0176Q ZADANIE A123, QUASAR, CLASSG , MSGCLASSY, PRTY15, NOTIFYampSYSUID160160160 STEP01 EXEC160 PGMSORT, REGION1024K160160160160160160160160160160160160160160160160160160160160160160160160160160160160160160160160160160160 SORTIN DD160160160 DSNCAA0176.DEMO. SORTIN, DISPSHR ltINPUT FILE160160160160160160160160160160 SYSPRINT DD160 SYSOUT160160160160160160160160160160160160160160160160160160160160160160160160160160160160160160160160160160160160160160160160160160160160160160160160 SYSOUT DD160160160 SYSOUT160160160160160160160160160160160160160160160160160160160160160160160160160160160 160160160160160160160160160160160160160160160160160160160160160 SORTOF01 DD160 DSNCAA0176.DEMO. REPORT jednorazo (stary ZACHOWAJ ZACHOWAJ) ltREPORT160160 SORTOUT DD160160 DSNCAA0176.DEMO. SORTOUT jednorazo (stary ZACHOWAJ ZACHOWAJ) ltOUTPUT160 SYSIN160 DD160160160 160160160160160160 LT In-Stream STEROWANIA STATEMENTS160160160160160160160160160160160160160160160160160 160 WARIANT COPY160160160160160160160160160160160160160160160160160160160160160160160160160160160160160160160160160160160160160160160160160160160160160160160160160160160160160160160160160160 160 outrec IFTHEN (PO (60,5, ZD, LT, 06000), -160160160160160160160160160160160160160160160160160160160160160160160160160160160160 160 BUILD (1: 1,9,10: 10,20, X, (60,5, ZD, MUL, 11), EDYCJA (IT, TTT. T ))), 160160160160160160160160160 160 JESZCZE (GDY (60,5, ZD, GE, 06000), -160160160160160160160160160160160160160160160160160160160160160160160160160160160160160160160160160160160160160160160160160160160160160160160160160160160 160 BUDOWA (1: 1,9,10: 10,20, X, (60,5, ZD, MUL, 12 ), EDIT (IT, TTT. T))) Raport wyjściowy dla powyższego Batch JobJCL wygląda następująco małpy. AG10004 -------- 1 ------ AG10001160 1 100,0 AG10002160 2.200.0 AG10003160 3300,0 AG10004160 4400.0 AG10005160 5 500,00 AG10006160 7200,0 AG10007160 840000 AG10008160 9600,0 AG10009 10,800,0 AG10010 12,000,0 AG10011 132,000 AG10012 14,400.0JCL sortowanie Syncsort JCL SORT lub SYNCSORT narzędzie w JCL służy do sortowania zestawów danych, łączenia zbiorów danych i kopiowania zestawów danych. Większość instalacji zmienia nazwę programu narzędziowego SYNCSORT na SORTOWANIE. Format wyciągu JCL SORT: Pozycja początkowa wskazuje położenie klucza sortowania w rekordzie. Długość wskazuje długość klucza sortowania. Format wskazuje typ pola, który może mieć wartości CH Character, ZD Zonal Decimal, PD Packed Decimal i BI Binary. AscDes wskazuje kolejność sortowania Rosnąco Malejąco. Przykłady: SORTOWANIE POLA (1,3, CH, A) SORTOWANIE POLA (1,5, D), CH SUM FIELDS NONE opcja eliminuje duplikaty. Np .: pola SORT FIELDS (1,5, D), CH SUM FI NONE SKIPREC i STOPAFT SKIPREC n Instrukcja pomija n rekordów przed kopiowaniem lub sortowaniem. SORTOWANIE KOPII SKIPREC 1000 Powyższe stwierdzenie pomija pierwsze 1000 rekordów i kopiuje pozostałe rekordy. Instrukcja STOPAFT n kopiuje lub sortuje co najwyżej n rekordów. SORT FIELDS COPY STOPAFT 1000 Powyższa instrukcja wypisuje pierwsze 1000 rekordów po zakończeniu przetwarzania. MERGE można użyć do scalenia dwóch lub więcej wstępnie posortowanych zestawów danych. Możemy połączyć maksymalnie 32 zestawy danych. Format wyciągu MERGE: INCLUDE COND: Instrukcja Include może zawierać rekordy w zależności od konkretnego warunku. INCLUDE COND (pozycja początkowa, długość, operator warunkowy, wartość) Przykład: SORT POLA KOPIA ZAWIERA COND (1,3, EQ, JCL) W powyższych przykładach kopiowane są zapisy zawierające JCL w pierwszych 3 pozycjach. OMIT COND: Podobnie możemy pominąć rekordy z zestawu danych w oparciu o konkretny warunek. SORTOWANIE POLA KOPIUJ POMOC KOND (1,3, EQ, JCL) W powyższych przykładach rekordy, które zawierają JCL w pierwszych 3 pozycjach, nie są kopiowane. Zależy od tego, jak chcesz sformatować daty. Tak, istnieją sposoby na ponowne sformatowanie pól dat za pomocą Sortuj. Oto przykład instrukcji INCLUDE, która porównuje spakowaną datę dziesiętną w postaci P8217yyymmdd8217, a datę postaci w postaci C8217yyy-ddd8217, do wczoraj8217s daty: ZAWSZE COND (21,5, PD, GE, DATA1P-1, OR, 3,8, CH, GE, DATE3 (-) - 1) Zapisy z datą P8217yyymmdd8217 lub datą C8217yyy-ddd8217 większą lub równą wczoraj8217s datę będą zawarte w zestawie danych wyjściowych. Cześć, dziękuję za dostarczone informacje. Czy masz jakieś dobre mateirale, które wszystkie wszystkie opcje SYNCSORT
Comments
Post a Comment