Portal | References | Downloads | Info | Programs | JCLs | Mainframe wiki | Quick Ref
IBM Mainframe Forum Index
IBM Mainframe Forum Index Mainframe: Search IBM Mainframe Forum: FAQ Memberlist Profile Log in to check your private messages Log in

Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> PL/I & Assembler
View previous topic :: :: View next topic  
Author Message

Active Member

Joined: 30 Nov 2013
Posts: 859
Location: The Universe

PostPosted: Fri Feb 08, 2019 7:56 am    Post subject: "Standard" SYSIN, SYSPRINT DCBs
Reply with quote

Near the end of this topic some one calling himself CICSWOLF improperly posted this-
Hi Gentlemen,
I have the task to convert modules from AMODE 24 to AMODE 31,
after a couple intents, decided to separate DCB module from CICS module in order the second run in AMODE 31,
the code I take as example has 3 statements to set vector table as:
DC A(SYSPRT) Vector to standard sysprint DCB
DC A(SYSIN) Vector to standard sysin DCB
DC A(0)
tried to assembly and got errors in those, decided to
include macro CVT instead and assemble ok,
can still this module to be called by the CICS Module?
I will appreciate your Feedback.

Sorry, CICSWOLF. There ain't no such thing. No doubt you are thinking about something like STDOUT and STDIN in the *NIX world.

This is probably a "requirement" from some PHB type. Most of the time it's entirely unnecessary make work. Frequently this task can be accomplished by by adding a csectnm AMODE 31 statement after the CSECT statement, sometimes with no other changes. Moreover, programs intended to run in the CICS environment are not supposed to use I/O directly addressed to DCB data areas. If you want real assistance here you need to tell us more or address a more detailed query in the CICS area of this forum.
Back to top
View user's profile Send private message

View previous topic :: :: View next topic  
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> PL/I & Assembler All times are GMT + 6 Hours
Page 1 of 1


Search our Forum:

Similar Topics
Topic Author Forum Replies Posted
No new posts Am I missing something on "FREE ... rodferrn CLIST & REXX 10 Fri Sep 04, 2020 6:51 am
No new posts special characters pipes "|"... VINAY PALLELA COBOL Programming 1 Mon Jun 08, 2020 9:19 am
No new posts Started transaction enters "firs... Marso CICS 3 Sun May 31, 2020 2:14 pm
No new posts concatenate sysin to dsn jzhardy JCL & VSAM 7 Fri May 15, 2020 5:35 am
No new posts Error when compiling a REXX exec with... Ricardo Viegas CLIST & REXX 2 Tue Dec 18, 2018 5:44 am

Back to Top
Job Vacancies | Forum Rules | Bookmarks | Subscriptions | FAQ | Polls | Contact Us