RPF: Rob's Programming Facility

Inleiding

RPF is een software pakket, wat draait op S/370, S/390 en z/Series mainframes. Het is beschikbaar in TSO onder de operating systemen MVS, MVS/XA, MVS/ESA, OS/390 en z/OS. 
RPF is alleen bruikbaar voor mensen, die een goede basiskennis van IBM mainframes hebben en de bijbehorende operating systemen. 
RPF kan op 24-bit en 31-bit MVS operating systemen gebruikt worden (MVS 3.7 en hoger). RPF is geschreven in S/370 assembler (IFOX00), maar kan ook vertaald worden met Assembler-H (IEV90) of HL-assembler (ASMA90).

Ontstaan van RPF

RPF is ontwikkeld omdat we in de jaren 80 niet beschikten over een moderne editor in MVS. Voor TSO heeft IBM een prachtige editor beschikbaar nl. ISPF. Deze werd toentertijd niet door mijn werkgever aangeschaft. De reden was, dat TSO te weinig gebruikt werd en dat ISPF erg duur was.

Ik kwam bij deze werkgever in dienst en had wel een TSO achtergrond (jaren mee gewerkt), dus ik had wel behoefte aan een full-screen editor onder MVS en TSO. Daarom besloot ik zelf een editor te ontwikkelen. Ik schreef hem in de avonduren op de computer van mijn werkgever, die deze graag ter beschikking hiervoor stelde. 
Na maandenlang ontwikkeling werd in 1979 het eerste prototype in test genomen. Vele collega's testen RPF en kwamen met bugs en suggesties. Daardoor onstond het huidige RPF, waar vele jaren mee gewerkt is.
In 1984 werd MVS en TSO dermate gemeengoed, dat mijn werkgever toch de IBM editor ISPF heeft aangeschaft. Tot begin 90'er jaren werden beide produkten gebruikt. Daarna werd RPF steeds minder gebruikt en raakte uit de gratie. Ook de ontwikkeling van RPF werd door mij gestaakt.

Browse op een groot scherm van 62 lines en 160 kolommen

In 2000 werd er een emulator (Hercules) beschikbaar gesteld, die in staat is om MVS en zijn opvolgers te kunnen draaien onder Linux en later ook onder Windows. Plotseling beschikte ik over een mainframe op mijn eigen PC met vele "Herculeans" 
IBM besloot MVS rel. 3.8J vrij te geven, dus er hoeft geen licentiekosten voor betaald te worden. ISPF werd uiteraard niet public domain, omdat ISPF heden nog steeds gebruikt wordt. 
MVS/TSO zonder full-screen editor werkt niet fijn. Daarom besloot ik RPF beschikbaar te stellen aan de gebruikers van Hercules, die MVS draaien op hun PC. Door deze actie kwam ook de verdere ontwikkeling van RPF weer op gang.

Functies van RPF

RPF bestaat uit slechts uit 1 versie, die op alle MVS achtige platforms draait (MVS38J, MVS/380, MVS/XA, MVS/ESA, OS/390 en z/OS). Op MVS/XA en hoger en MVS/380 gebruikt RPF extended addressing. De meeste RPF modules draaien dan in 31-bit mode.
RPF wordt opgestart in TSO. Na het aanloggen aan TSO is het commando "RPF" voldoende om over alle functies van RPF te beschikken. 
De functies van RPF zijn:

• Edit van card-images (record lengte 80 bytes), zoals parameters en broncode (source) voor programma's zoals PL/1, Cobol, Fortran en uiteraard Assembler.
• Edit van andere data sets en members met een fixed of variabel record formaat en een record lengte t/m 255 bytes.
• Bladeren (Browse/View) door bestanden en members van Partitioned Datasets (PDS) onder MVS.
• Bladeren (Browse/View) door bestanden met undefined records, zoals LOAD modules.
• Vertalen (assembleren) van Assembler source code en het linken ervan tot uitvoerbare programma's
• Creeëren (allocate) van MVS bestanden en het verwijderen (delete) ervan.
• Uitlijsten van Volume Table Of Contents (VTOC) van DASD volumes. Tevens kan men in een "dataset selection list" de bestanden (datasets) browsen, editten, deleten, uncatalog en catalog en compress van PDS'en
• Uitvoeren van TSO commando's.
• Bekijken, opnieuw in de rij zetten (requeue), printen en verwijderen van JOB uitvoer.
• Edit, Browse van Librarian modules. Librarian is een produkt van Computer Associates (Broadcom). Librarian is geen onderdeel van RPF. Slechts de vrij te distrubueren FAIR routines van Librarian worden gebruikt.
• Edit, Browse van Panvalet. Panvalet is ook een product van Computer Associates (Broadcom).
• Edit, Browse, print en delete van ARCHIVER items. ARCHIVER kan gedownload worden vanaf www.cbttape.org file 147.
• Move en Copy van PDS members.
• Reset en verwijderen van ISPF statistics.
• Zoeken naar tekenreeksen in data sets.

Installatie van RPF

RPF wordt geleverd in zeven unloaded partitioned bestanden. Deze bestanden en de RPF User's Guide kan in onderstaand tabel gedownload worden. De bestanden kunnen bijvoorbeeld IND$FILE in de 3270 geëmuleerde terminal naar het MVS systeem geüpload worden.

RPF draait in MVS 3.8J en zijn opvolgers. In MVS/XA en hoger draait RPF in 31 bit mode.

RPF 1.9.7 is beschikbaar

De volgende wijzigingen zijn aangebracht:

• EDIT: Top of data regel toegevoegd;
• BROWSE: Bottom of data regel toegevoegd;
• Library, Move/Copy, DS-List, Archiver, Librarian: END regel toegevoegd met totalen;
• Library/Arschiver:  Confirm member delete kan nu geselecteerd worden;
• Move/Copy (option 3.3): Alle mogelijke sequentiele bestanden kunnen gekopiëerd worden;
• Een aantal 0C4 fouten zijn opgelost;
• Kleine verbeteringen toegepast.

RPF 1.9.7 vervangt alle oude releases van RPF.

RPF 1.9.7 is getest op MVS38J, MVS380, MVS/XA en in z/OS.

Het installatiepakket van RPF 1.9.7 bestaat uit 7 gezipte XMI bestanden en kunnen met Hercules DASDLOAD,  met RECV370 of met TSO RECEIVE.geïnstalleerd worden.

Klik hier voor een voorbeeld van een RECV370 job. Als alternatief kan TSO RECEIVE worden gebruikt, nadat de bestanden met PC-3270 File Transfer program (IND$FILE) zijn geupload.

Huidige releases

Release notes

RPF kunt u ook vinden op de CBT tape website (file 415). Klik op het symbool hieronder om naar cbttape.org te gaan. De laatste versie staat op de UPDATES pagina van cbttape.org.

Dowload en unzip de file en transfer de file met IND$FILE naar je host. Lees member @FILE415 om de RPF loadlibrary te installeren.

Een usermod om Addressing mode 31 mogelijkheden in MVS38J te installeren

Paul Edwards en Gerhard Postpischil hebben een SVC 120 (GETMAIN) interface geschreven, voor ondersteuning van de adressing mode 31 basis component in MVS38J. Deze component wordt ook wel MVS380 genoemd. Met deze toevoeging kan er met RPF grote data sets bewerkt worden tot 1 miljoen regels.

Ik heb een SMP4 usermod geschreven om deze toevoeging te installeren.  Deze usermod heeft usermod ZP60033 van Greg Price nodig. ZP60033 voegt de  LOC operand toe in GETMAIN.

Klik op de knop hieronder om de usermod te downloaden.

Download MVS380 usermod