{"id":111,"date":"2011-08-23T16:50:31","date_gmt":"2011-08-23T21:50:31","guid":{"rendered":"http:\/\/tommysprinkle.com\/txxos\/?p=111"},"modified":"2021-04-17T18:30:18","modified_gmt":"2021-04-17T23:30:18","slug":"assemble-and-execute","status":"publish","type":"post","link":"https:\/\/tommysprinkle.com\/txxos\/?p=111","title":{"rendered":"Assemble and Execute"},"content":{"rendered":"<p>I assembled the program using the IFOX00 Assembler running on MVS 3.8 under Hercules.\u00a0 I then link edited and ran the program using the following JCL:<\/p>\n<pre>\/\/CARD80 JOB (TXXOS),'GEN IPL DECK',CLASS=A,MSGCLASS=A\r\n\/\/CARD80 EXEC PGM=CARD80\r\n\/\/STEPLIB  DD DISP=SHR,DSN=TXXOS.CARD.LOAD\r\n\/\/PUNCH    DD UNIT=00D<\/pre>\n<p>I chose to send the output directly to the card punch device (located at 00D on my system) instead of sending it to the spool and then punching it using JES2.\u00a0 Before running the program verify the device address for your punch device and verify it is not allocated to JES2 (using $du).\u00a0 If necessary you can stop the JES device using something like $ppun1.<\/p>\n<p>Also before running the program you will need to prepare the Hercules punch.\u00a0 At the Hercules console I used the DEVINIT command:<\/p>\n<pre>DEVINIT 00D card.ipl ebcdic<\/pre>\n<p>This command tells Hercules to set device 00D to output to the file &#8220;card80.ipl&#8221;.\u00a0 You can specify a path if you desire or else the file will be created in the directory you started Hercules from.\u00a0 For example you might use something like &#8220;..\/punch\/card80.ipl&#8221; as the file path and name.\u00a0 I chose to simply place it in the default directory and then move it using a Linux line command.\u00a0 It is very important you specify ebcdic so Hercules does not attempt to translate the output into ASCII.\u00a0 ASCII translation will mangle the CCWs and machine code in the IPL deck and the IPL will fail.<\/p>\n<p>Once the program has completed execution you can close the output file by simply using the Hercules command:<\/p>\n<pre>DEVINIT 00D<\/pre>\n<p>At this point we have our IPL deck and we are ready to set up a Hercules mainframe to run it.<\/p>\n<p>[<a title=\"Hercules Setup and IPL\" href=\"http:\/\/tommysprinkle.com\/txxos\/?p=118\">Next -Hercules Setup and IPL<\/a>]<\/p>\n","protected":false},"excerpt":{"rendered":"<p>I assembled the program using the IFOX00 Assembler running on MVS 3.8 under Hercules.\u00a0 I then link edited and ran the program using the following JCL: \/\/CARD80 JOB (TXXOS),&#8217;GEN IPL DECK&#8217;,CLASS=A,MSGCLASS=A \/\/CARD80 EXEC PGM=CARD80 \/\/STEPLIB DD DISP=SHR,DSN=TXXOS.CARD.LOAD \/\/PUNCH DD UNIT=00D &hellip; <a href=\"https:\/\/tommysprinkle.com\/txxos\/?p=111\">Continue reading <span class=\"meta-nav\">&rarr;<\/span><\/a><\/p>\n","protected":false},"author":1,"featured_media":0,"comment_status":"open","ping_status":"open","sticky":false,"template":"template-page-builder-no-sidebar.php","format":"standard","meta":{"jetpack_post_was_ever_published":false,"_jetpack_newsletter_access":"","_jetpack_dont_email_post_to_subs":false,"_jetpack_newsletter_tier_id":0,"_jetpack_memberships_contains_paywalled_content":false,"_jetpack_memberships_contains_paid_content":false,"footnotes":"","jetpack_publicize_message":"","jetpack_publicize_feature_enabled":true,"jetpack_social_post_already_shared":false,"jetpack_social_options":{"image_generator_settings":{"template":"highway","default_image_id":0,"font":"","enabled":false},"version":2}},"categories":[1],"tags":[],"class_list":["post-111","post","type-post","status-publish","format-standard","hentry","category-uncategorized"],"jetpack_publicize_connections":[],"jetpack_featured_media_url":"","jetpack_shortlink":"https:\/\/wp.me\/p1CPQT-1N","jetpack_sharing_enabled":true,"_links":{"self":[{"href":"https:\/\/tommysprinkle.com\/txxos\/index.php?rest_route=\/wp\/v2\/posts\/111","targetHints":{"allow":["GET"]}}],"collection":[{"href":"https:\/\/tommysprinkle.com\/txxos\/index.php?rest_route=\/wp\/v2\/posts"}],"about":[{"href":"https:\/\/tommysprinkle.com\/txxos\/index.php?rest_route=\/wp\/v2\/types\/post"}],"author":[{"embeddable":true,"href":"https:\/\/tommysprinkle.com\/txxos\/index.php?rest_route=\/wp\/v2\/users\/1"}],"replies":[{"embeddable":true,"href":"https:\/\/tommysprinkle.com\/txxos\/index.php?rest_route=%2Fwp%2Fv2%2Fcomments&post=111"}],"version-history":[{"count":5,"href":"https:\/\/tommysprinkle.com\/txxos\/index.php?rest_route=\/wp\/v2\/posts\/111\/revisions"}],"predecessor-version":[{"id":113,"href":"https:\/\/tommysprinkle.com\/txxos\/index.php?rest_route=\/wp\/v2\/posts\/111\/revisions\/113"}],"wp:attachment":[{"href":"https:\/\/tommysprinkle.com\/txxos\/index.php?rest_route=%2Fwp%2Fv2%2Fmedia&parent=111"}],"wp:term":[{"taxonomy":"category","embeddable":true,"href":"https:\/\/tommysprinkle.com\/txxos\/index.php?rest_route=%2Fwp%2Fv2%2Fcategories&post=111"},{"taxonomy":"post_tag","embeddable":true,"href":"https:\/\/tommysprinkle.com\/txxos\/index.php?rest_route=%2Fwp%2Fv2%2Ftags&post=111"}],"curies":[{"name":"wp","href":"https:\/\/api.w.org\/{rel}","templated":true}]}}