Code Monkey home page Code Monkey logo

mvs's Introduction

Discord View SBOM

MVS and VM Goodies

Tapes are the standard way to exchange files, utilities and information between mainframers. Some mainframe shops are now connected thru the HNET Bitnet II international dial-up network.

I also noticed that recently the industry is moving towards a new thing called the "World Wide Web", which is why I now make this collection of tools and utilities available on Github in this crazy new world of the Internet!

This repository includes some very useful utilities for people working with MVS, z/OS, VM/SP and z/VM on real mainframes or emulated ones. Most of the topics covered by these programs are covered in my youtube mainframe channel here: https://www.youtube.com/channel/UCR1ajTWGiUtiAv8X-hpBY7w

Here are some of the programs and tools included in this repo:

  1. recv390 is a receive command for Linux or Windows. It extracts XMIT files. recv390 is by James Morrison. I made some fixes and small enhancements to the program. Compile simply with gcc -o recv90 recv390.c.

  2. SYCPLK.ccdk is a 3390-3 volume (SYSCPK) which includes about 10 or 12 compilers for the mainframe, including:

  • PLI F compiler
  • Cobol compiler from the 60s
  • RPG compiler
  • PL/360 compiler
  • Pascal compiler
  • the amazing ASSIST assembler
  • Simula compiler
  • Basic
  • and tons more!

Simply mount the volume on your system, add it to the VTLST00 member as private, and then extend your JES2 to use the included SYS2.PROCLIB on SYSCPK. This proclib has procedures for all the included compilers. The run-time libraries, like SYSC.PLILIB are of course included in the volume. There is also a version of this volume on 3350 disk image, but OS390 and up don't have support for such old disks anymore. Copying stuff over to a 3390 disk isn't trivial because of the blocking required by certain compiler libraries. In short, there is a need for this volume.

  1. sort.jcl is a sort job which stresses a TK4 MVS 3.8 by creating millions of random records and then using IBM Sort to sort them. Requires TK4-

  2. The amazing standalone operating system for S/360 from Prof Madnick's seminal book on operating system. I also include the assembly output.

  3. My .vimrc file for VIM. It color highlights correctly JCl and assembler for S/370.

  4. VM goodies

  5. The usefuljcl/ directory contains very useful JCL jobs which you will use on adaily basis as a MVS or z/OS SYSPROG

  6. a calculator for ideal blocksize given a DASD type and a logical record length, written by me in Go language. It's called blocksize.go and I also inlude a Linux 64bit binary

  7. the PC370 source code for the simply amazing S370 assembler which runs in MS-DOS.

  8. Lots of JCL and source code files which I use in my moshix mainframe channel vidoes

  9. Some JCL for Cobol and VSAM on z/OS

  10. A REXX programs for both z/OS and MVS 3.8 to get information from the operating system, such as online users, IPL time etc.

  11. SMF reporting tools

  12. Rexx panel programs for TSO

  13. Panel/Rexx programs for TSO

  14. LOGREC cleaning JCL

  15. Creating users on TSO HOWTO

  16. Sort jobs example with IBM Sort (Iceman)

  17. My .X3270pro file (UPDATE: NOW WITH TURBOPASCAL theme)

  18. ISPF Panel Rexx examples

  19. JSON code for interaction between Golang and DB2

  20. A z/VM machine load information utility

  21. A working copy of the original CHRIMAS EXEC (OR CHRISTMA EXEC) worm from 1988

  22. A payroll report source code in MVT Cobol with test data and the JES2 output listing

  23. VM/370 editor

  24. The TELPAR operating system for EDA (Electronic Design Automation) and ATG (Automatic Test Generation) of Stanford University

  25. A disassembler

  26. Sample parameterhandling jobs,

  27. submit bash script for z/OS or MVS workflow in vim

  28. 3270 extended attribute codes

  29. A treatise on the handling of virtual storage in SVS, MFT, MVT and MVS

  30. some very cool VM/370 add-ons.

  31. a tape with VM/370 games.

  32. Matlab for VM/CMS

  33. A JCL and PLI aware small editor

  34. A generalized IP address parser for all your NICS (important when you do IPv4 stuff with Hercules)

  35. An HP41 calculator in Fortran and REXX

  36. an IBM 1403 font

  37. an assembler in bash

  38. and more...much, much more

Printing on VM

Start 00e cl a nosep, on the operator console.

spool print system

print file listing a

CCKD support for Hercules

***@ubuntu:~$ sudo apt install zlib1g-dev

***@ubuntu:~$ sudo apt install libbz2-dev

moshix

July 2024

mvs's People

Contributors

darumaovs avatar ehrt74 avatar moshix avatar

Stargazers

 avatar  avatar  avatar  avatar  avatar  avatar  avatar  avatar  avatar  avatar  avatar  avatar  avatar  avatar  avatar  avatar  avatar  avatar  avatar  avatar  avatar  avatar  avatar  avatar  avatar  avatar  avatar  avatar  avatar  avatar  avatar  avatar  avatar  avatar  avatar  avatar  avatar  avatar  avatar  avatar  avatar  avatar  avatar  avatar  avatar  avatar  avatar  avatar  avatar  avatar  avatar  avatar  avatar  avatar  avatar  avatar  avatar  avatar  avatar  avatar  avatar  avatar  avatar  avatar  avatar  avatar  avatar  avatar  avatar  avatar  avatar  avatar  avatar  avatar  avatar  avatar  avatar  avatar  avatar  avatar  avatar  avatar  avatar  avatar  avatar  avatar  avatar  avatar  avatar  avatar  avatar  avatar  avatar  avatar  avatar  avatar  avatar  avatar  avatar  avatar

Watchers

 avatar  avatar  avatar  avatar  avatar  avatar  avatar  avatar  avatar  avatar  avatar  avatar  avatar  avatar  avatar  avatar  avatar  avatar  avatar  avatar  avatar  avatar  avatar  avatar  avatar  avatar  avatar  avatar  avatar  avatar  avatar  avatar  avatar  avatar  avatar  avatar  avatar  avatar  avatar  avatar

mvs's Issues

TK5 working example of creating a GDG and then adding a new generation

first of all, thanks for being an advocate for the MF community and TK5

in TK5 -- i am trying to create a GDG, and add a new generation to it .. for the life of me i cannot figure it out, because i keep getting JCL errors related to IEF218I A4GDGGEN STEP01 DD01 - PATTERN DSCB RECORD NOT FOUND IN VTOC

here is how i create the GDG

 000001 //A4GDGCR8    JOB ,
 000002 //            CLASS=A,
 000003 //            MSGCLASS=Q,
 000004 //            NOTIFY=&SYSUID,
 000005 //            PRTY=15
 000006 //* CREATE VTOC ENTRY
 000007 //STEP01      EXEC PGM=IDCAMS
 000008 //*
 000009 //GDGMOD      DD DSN=HERC01.GDG11,
 000010 //            DISP=(NEW,CATLG,KEEP),
 000011 //            SPACE=(TRK,(0)),
 000012 //            DCB=(LRECL=80,BLKSIZE=800,RECFM=FB,DSORG=PS),
 000013 //            UNIT=3390
 000014 //*
 000015 //SYSIN       DD *
 000016      DEFINE GENERATIONDATAGROUP( -
 000017             NAME(HERC01.GDG11) -
 000018             LIMIT(12) -
 000019             EMPTY -
 000020             NOSCRATCH)
 000021 /*
 000022 //SYSPRINT    DD SYSOUT=*
 000023 //SYSOUT      DD SYSOUT=*
 000024 /*

it gets created AOK (rc=0000), i see it when i go =3.4

i run into issue when i am trying to actually create a generation (see JCL below) .. no matter what, it is the same error over and over again -- related to that PATTERN DSCB RECORD NOT FOUND IN VTOC

i dug around and found this stackoverflow and IBM article, but again, no success in TK5

https://stackoverflow.com/questions/75834639/mvs-3-8-pattern-dscb-record-not-found-in-vtoc

https://www.ibm.com/docs/en/zos/2.4.0?topic=dge-define-generation-data-group-generation-data-set-within-it-non-sms-case-example-1

any help would be greatly appreciated .. i did do

 000001 //A4GDGGEN    JOB ,
 000002 //            CLASS=A,
 000003 //            MSGCLASS=Q,
 000004 //            NOTIFY=&SYSUID,
 000005 //            PRTY=15
 000006 //* CREATE GDG GENERATION
 000007 //STEP01      EXEC PGM=IEFBR14
 000008 //*
 000009 //DD01        DD DSN=HERC01.GDG11(+1),
 000010 //            DISP=(NEW,CATLG),
 000011 //            DCB=(LRECL=80,BLKSIZE=800,RECFM=FB,DSORG=PS),
 000012 //            SPACE=(TRK,(10,10)),
 000013 //            UNIT=3390
 000014 //*
 000015 //SYSIN       DD *
 000016 /*
 000017 //SYSOUT      DD SYSOUT=*
 000018 //SYSPRINT    DD SYSOUT=*
 000019 //SYSDUMP     DD SYSOUT=*
 000020 /*

cannot get the 'logon screen' in MVS TK4-

I have TK4- installed and it looks like it is working.
I have wc3270 installed and it looks like it is working.

I start TK4- and get all expected messages, I can issue commands and they work.
I start wc3270 and I see a message in TK4- that it has connected,

As I understand I do not need to do anything else with TK-4

From wc3270 I can see the TK4- logo and can use the ‘file’ ‘options’ and ‘Keypad’ functions

I do not get the ‘logon’ message

I have tried everything I can think of for the past 3 days with no success
I have looked for anyone that can help, but no luck there either

Can you get me past this step so I can continue my process of running cobol programs on my win 10 desktop,

Thank you in advance for answering my request.

cannot get MVS TK4- to work with wc3270

I have TK4- installed and it looks like it is working.
I have wc3270 installed and it looks like it is working.

I start TK4- and get all expected messages, I can issue commands and they work.
I start wc3270 and I see a message in TK4- that it has connected,

As I understand I do not need to do anything else with TK-4

From wc3270 I can see the TK4- logo and can use the ‘file’ ‘options’ and ‘Keypad’ functions

I do not get the ‘logon’ message

I have tried everything I can think of for the past 3 days with no success
I have looked for anyone that can help, but no luck there either

Can you get me past this step so I can continue my process of running cobol programs on my win 10 desktop,

Thank you in advance for answering my request.

Invalid Filename Inhibiting Cloning

This filename: virtual1403_J212_HERC01B-2021-11-20T15:28:36Z.pdf

Contains illegal characters (colon) and needs to be changed for cloning on windows systems.

Recommend Projects

  • React photo React

    A declarative, efficient, and flexible JavaScript library for building user interfaces.

  • Vue.js photo Vue.js

    🖖 Vue.js is a progressive, incrementally-adoptable JavaScript framework for building UI on the web.

  • Typescript photo Typescript

    TypeScript is a superset of JavaScript that compiles to clean JavaScript output.

  • TensorFlow photo TensorFlow

    An Open Source Machine Learning Framework for Everyone

  • Django photo Django

    The Web framework for perfectionists with deadlines.

  • D3 photo D3

    Bring data to life with SVG, Canvas and HTML. 📊📈🎉

Recommend Topics

  • javascript

    JavaScript (JS) is a lightweight interpreted programming language with first-class functions.

  • web

    Some thing interesting about web. New door for the world.

  • server

    A server is a program made to process requests and deliver data to clients.

  • Machine learning

    Machine learning is a way of modeling and interpreting data that allows a piece of software to respond intelligently.

  • Game

    Some thing interesting about game, make everyone happy.

Recommend Org

  • Facebook photo Facebook

    We are working to build community through open source technology. NB: members must have two-factor auth.

  • Microsoft photo Microsoft

    Open source projects and samples from Microsoft.

  • Google photo Google

    Google ❤️ Open Source for everyone.

  • D3 photo D3

    Data-Driven Documents codes.