¿ªÔÆÌåÓý

ctrl + shift + ? for shortcuts
© 2025 Groups.io

Re: Where to find the output of a COBOL program?

 

Happy to try to help if I can understand what you're trying to do.

Where do you want to see your output?

If you want to see it on your TSO screen, then use MSGCLASS=X

If you want it sent to your PC file prt/prt00e.txt then use MSGCLASS=A

I have no idea what MSGCLASS=O is - is it something you have defined yourself?

In any event, change the SYSOUT statement to //SYSOUT DD SYSOUT=*

HTH, JJ


Re: HHC00398I messages

 

Jo?o Reginato wrote:

What is the cause of the errors below and what can I do to fix them?
[...]
HHC00398I 08:57:51.171843 0:2103 cckd64_gc_percolate(4436):
gcperc selected space 0x0000000000012658 len 65536

HHC00398I 08:57:51.171850 0:2103 cckd64_read(457): file[0]
fd[10] read, off 0x0000000000012658 len 65536

HHC00342E 0:2103 CCKD file[0] d:/zos/devices/herc2/fds002.dev9:
offset 0x0000000000012658 unknown space 7e0bd08200

HHC00007I Previous message from function 'cckd64_gc_percolate'
at cckddasd64.c(4511)
Just out of curiosity, was volume FDS002 (i.e. device 2103 = "d:/zos/devices/herc2/fds002.dev9") created via Hercules's 'convto64' utility?

--
"Fish" (David B. Trout)
Software Development Laboratories

mail: fish@...


Re: HHC00398I messages

 

thanks

-----Mensagem original-----
De: [email protected] <[email protected]> Em nome de Patrik
Schindler
Enviada em: sexta-feira, 19 de agosto de 2022 11:42
Para: [email protected]
Assunto: Re: [H390-MVS] HHC00398I messages

Hello Jo?o,

Am 19.08.2022 um 14:01 schrieb Jo?o Reginato <jb.reginato@...>:

What is the cause of the errors below and what can I do to fix them?
I think your disk has become corrupted. Maybe restore from backup or try to
repair with cckdcdsk64 command.

:wq! PoC






--
O software antiv¨ªrus Avast realizou uma checagem de v¨ªrus neste e-mail.
www.avast.com


--
att.
Jo?o


Re: Where to find the output of a COBOL program?

 

I have had a lot of problems with MSGCLASS, but I would recommend simply deleting it.


On Fri, Aug 19, 2022 at 11:31 AM <doscar.sole@...> wrote:
Hello:

I was trying to compile/run a simple program (as last time I get into Hercules was some months ago, I'm just restarting my training), but I'm not able to see the DISPLAY I put on my program.
I'm using "COBUC" JCL that was on Jay Moseley's tutorial, and tried several things such as
  • Changing MSGCLASS (From "X" to "O")
  • Changing GO.SYSOUT to "DD SYSOUT=B" then putting "$spun1" on the console
But no luck... I'm not seeing anything despite job is finishing with return code 0

PFA some screens regarding the cobol program, jcl and queue output.

Can someone enlight me a bit please? Sorry for posting bare begginer questions :(

Thanks










Where to find the output of a COBOL program?

 

Hello:

I was trying to compile/run a simple program (as last time I get into Hercules was some months ago, I'm just restarting my training), but I'm not able to see the DISPLAY I put on my program.
I'm using "COBUC" JCL that was on Jay Moseley's tutorial, and tried several things such as
  • Changing MSGCLASS (From "X" to "O")
  • Changing GO.SYSOUT to "DD SYSOUT=B" then putting "$spun1" on the console
But no luck... I'm not seeing anything despite job is finishing with return code 0

PFA some screens regarding the cobol program, jcl and queue output.

Can someone enlight me a bit please? Sorry for posting bare begginer questions :(

Thanks










Re: HHC00398I messages

 

Hello Jo?o,

Am 19.08.2022 um 14:01 schrieb Jo?o Reginato <jb.reginato@...>:

What is the cause of the errors below and what can I do to fix them?
I think your disk has become corrupted. Maybe restore from backup or try to repair with cckdcdsk64 command.

:wq! PoC


HHC00398I messages

 

¿ªÔÆÌåÓý

Hi guys

?

What is the cause of the errors below and what can I do to fix them?

?

HHC00398I 08:57:51.170153 0:2101 cckd_write_trkimg(3403): file[0] trk[12681] write_trkimg oldl2 0xd67d8a 55871 55871

HHC00398I 08:57:51.170159 0:2101 cckd_get_space(2188): get_space len 55871 largest 564325 flags 0x02

HHC00398I 08:57:51.170166 0:2101 cckd_get_space(2299): get_space found 0x000000000d060718 len 55871 size 55871

HHC00398I 08:57:51.170173 0:2101 cckd_write(665): file[0] fd[8] write, off 0x000000000d060718 len 55871

HHC00398I 08:57:51.170208 0:2101 cckd_write_l2ent(3299): file[0] l2[49,137] trk[12681] write_l2ent 0xd060718 55871 55871

HHC00398I 08:57:51.170215 0:2101 cckd_write(665): file[0] fd[8] write, off 0x000000000001f358 len 8

HHC00398I 08:57:51.170225 0:2101 cckd_rel_space(2330): rel_space offset 0x0000000000d67d8a len 55871 size 55871

HHC00398I 08:57:51.170232 0:2101 cckd_read_l2ent(3242): file[0] l2[39,164] trk[10148] read_l2ent 0x19f10

HHC00398I 08:57:51.170238 0:2101 cckd_read_l2(3001): file[0] read_l2 39 active 0 49 585

HHC00398I 08:57:51.170246 0:2101 cckd_read_l2(3020): l2[0,39] cache[267] hit

HHC00398I 08:57:51.170252 0:2101 cckd_read_l2ent(3260): file[0] l2[39,164] trk[10148] read_l2ent 0xd757c9 49277 49277

HHC00398I 08:57:51.170259 0:2101 cckd_gc_percolate(5420): gcperc moved 501413 1st 0xb5309b nbr 126

HHC00398I 08:57:51.170271 0:2101 cckd_flush_cache_scan(1695): flush file[0] cache[48] 2101 trk 10095

HHC00398I 08:57:51.170290 0:2101 cckd_flush_space(2434): flush_space nbr 126

HHC00398I 08:57:51.170297 0:2101 cckd_flush_space(2484): rel_flush_space nbr 124 (after merge)

HHC00398I 08:57:51.170321 0:2102 cckd64_gc_percolate(4316): gcperc size 262144 1st 0x0 nbr 0 largest 0

HHC00398I 08:57:51.171828 0:2103 cckd64_gc_percolate(4316): gcperc size 2097152 1st 0x0 nbr 0 largest 0

HHC00398I 08:57:51.171843 0:2103 cckd64_gc_percolate(4436): gcperc selected space 0x0000000000012658 len 65536

HHC00398I 08:57:51.171850 0:2103 cckd64_read(457): file[0] fd[10] read, off 0x0000000000012658 len 65536

HHC00342E 0:2103 CCKD file[0] d:/zos/devices/herc2/fds002.dev9: offset 0x0000000000012658 unknown space 7e0bd08200

HHC00007I Previous message from function 'cckd64_gc_percolate' at cckddasd64.c(4511)

HHC00399I CCKD file: internal cckd trace

?

TIA

Jo?o

?

?

?


N?o cont¨¦m v¨ªrus.

--
att.
Jo?o


Re: Using IND$FILE on c3270?

 

On Sun, Aug 14, 2022 at 10:57 PM, Matthew Wilson wrote:
On 08.14.2022 12:02, doscar.sole@... wrote:
I just installed IND$FILE on my MVS (all using Jay Moseley tutorial),
and now I have access to IND$FILE on my MVS, but as I'm using c3270
instead of x3270 (that's terminal version of x3270), I don't see any
"visual" menu on which start the file transfer so I was wondering if
any of you had the same situation and knows how to start a file
transfer (MVS -> Linux) on c3270.
In c3270, the escape key is Ctrl-]. If you press that, you'll get a
"c3270>" prompt, at which you can type "transfer" to begin a transfer.
It will then prompt you for the various parameters.

Also, with c3270, if you make your terminal window 2 lines taller than
it needs to be for the 3270 model you're emulating, you'll get a status
line at the bottom and a menu bar at the top. For example, if you make
your terminal window 26 lines tall instead of 24 lines tall, you'll get
the menu bar. If mouse reporting is working in your terminal, you'll
be able to click on the File menu and choose File Transfer from that.

Good luck!

-Matthew
To clarify, this was the post that solved my issue.


Re: Using IND$FILE on c3270?

 

¿ªÔÆÌåÓý

If you are using the web interface, please include some context as its not at all obvious which reply answered your question.

Just Highlight the bit you want to quote before hitting reply, or hit the ¡°bubble¡± icon to include it ll.

?

Dave

?

From: [email protected] <[email protected]> On Behalf Of doscar.sole@...
Sent: 15 August 2022 09:23
To: [email protected]
Subject: Re: [H390-MVS] Using IND$FILE on c3270?

?

Oh... thanks for that!
I was able to see that menu line, now it's time to check if I'm able to begin a file transfer :)


Re: Using IND$FILE on c3270?

 

Oh... thanks for that!
I was able to see that menu line, now it's time to check if I'm able to begin a file transfer :)


Re: Using IND$FILE on c3270?

 

On 08.14.2022 12:02, doscar.sole@... wrote:
I just installed IND$FILE on my MVS (all using Jay Moseley tutorial),
and now I have access to IND$FILE on my MVS, but as I'm using c3270
instead of x3270 (that's terminal version of x3270), I don't see any
"visual" menu on which start the file transfer so I was wondering if
any of you had the same situation and knows how to start a file
transfer (MVS -> Linux) on c3270.
In c3270, the escape key is Ctrl-]. If you press that, you'll get a
"c3270>" prompt, at which you can type "transfer" to begin a transfer.
It will then prompt you for the various parameters.

Also, with c3270, if you make your terminal window 2 lines taller than
it needs to be for the 3270 model you're emulating, you'll get a status
line at the bottom and a menu bar at the top. For example, if you make
your terminal window 26 lines tall instead of 24 lines tall, you'll get
the menu bar. If mouse reporting is working in your terminal, you'll
be able to click on the File menu and choose File Transfer from that.

Good luck!

-Matthew


Re: Using IND$FILE on c3270?

 

¿ªÔÆÌåÓý

On Windows/10? Should be a key binding, typically escape.

¡­ but if its on Windows/10 or 11 the enhanced console handling can steal the character

Go to properties on the session and disable quick edit mode and ctrl key shortcuts,

?

Dave

?

From: [email protected] <[email protected]> On Behalf Of doscar.sole@...
Sent: 14 August 2022 20:03
To: [email protected]
Subject: [H390-MVS] Using IND$FILE on c3270?

?

Hello:
I just installed IND$FILE on my MVS (all using Jay Moseley tutorial), and now I have access to IND$FILE on my MVS, but as I'm using c3270 instead of x3270 (that's terminal version of x3270), I don't see any "visual" menu on which start the file transfer so I was wondering if any of you had the same situation and knows how to start a file transfer (MVS -> Linux) on c3270.

Thanks in advance!


Using IND$FILE on c3270?

 

Hello:
I just installed IND$FILE on my MVS (all using Jay Moseley tutorial), and now I have access to IND$FILE on my MVS, but as I'm using c3270 instead of x3270 (that's terminal version of x3270), I don't see any "visual" menu on which start the file transfer so I was wondering if any of you had the same situation and knows how to start a file transfer (MVS -> Linux) on c3270.

Thanks in advance!


Re: MVS38j/nje38 via rscs to vm370

 

NJE38 on MVS 3.8J to VM/370 RSCS works perfectly, if you meet certain criteria.? You need:

- the Peter Coghlan RSCS modifications that allow the old RSCS on VM/370 to communicate using NJE protocols.? I think these are already applied to the RSCS on VM/CE.? If that's true, that RSCS could be copied off of VM/CE to a tape image and brought to your own VM/370 system.
- a version of Hercules or Hyperion that supports the TCPNJE driver.? Hercules 3.13 has this, as do recent SDL Hyperion releases (such as 4.2 and above).
- You need to use the TCPNJE capable Hercules/Hyperion on both the VM system, and for the MVS system.
- MVS itself needs nothing if you are using a TK4 version, other than NJE38 software itself.

The NJE38 Installation and Usage Guide contains an example of the setup for MVS-to-VM, see Appendix A.? It shows you the TCPNJE values in the respective configuration files, and the NJE38 settings and the RSCS settings.

Regards,
Bob


Re: MVS38j/nje38 via rscs to vm370

 

On Mon, Aug 8, 2022 at 01:14 AM, Dave Wade wrote:

I don¡¯t know where we are with the RSCS in VM/370 but the base product only acts as a host.

I was able to establish a SML link between VM/370 CE V1 R1.2 and ?MVS3.8J (TK4- Update 8). From CMSUSER, I can punch a job with the proper tag, it reaches MVS3.8J and is being executed. Problems arise when JES2 tries to send stuff back to VM/370. The initial?acknowledgement, being just 5 records long, does get back to VM/370 and RSCS prints it as it should. However, the job output itself, having several hundred records, quickly "jam" the line and the whole link is screwed. Could it be a buffer/speed problem in DMTSML and/or Hercules 2703 emulation? I don't know and it is way out of my expertise anyway. What a pity, it's almost working...

?

Cheers,

Rene FERLAND, Montreal

P.S. -- Indeed, the NPT link works fine, I can start one, connect Dutch Owen RJE80 program to it, and everything runs smoothly.


Re: MVS38j to VM370 nje38

 

?"Help me... help you. Help me, help you." ¡ª Jerry Maguire (1996)

Think about if you received the email you sent. We have?never seen your systems.

Start by spelling out EXACTLY what you running. What version/edition of:

* Hercules (on both sides)
*?VM/370
* MVS?
* RSCS?
* NJE38

What protocol are you trying to use RJE (host & remote?? Which is the host?), peer-to-peer (NJE?)

How did you connect the two systems? CTC over TCP/IP? BSC over TCP/IP? CTC via MVS under VM? The Psychic Network?

-ahd-


Re: MVS38j to VM370 nje38

 

Tom,

I do not believe that VM370 6PExt is PD. It relies on a specific
modified version of Hyperion.

A hint is that when you ipl VM370 6PExt, bring up RSCS according to your
instructions, and login to the correct version of RSCS, you then need to
tell RSCS to "START nodeid".

Chris
--
<cjar1950@...>



----------------------------------------------------------------------------------------------------------------------------------
On Sun, 07 Aug 2022 08:46:03 -0700
"Tom Chandler" <tchandler48@...> wrote:
I have up and running MVS38j and VM370 6PExt and appear to be working
correctly.? Next I want to connect VM370 to MVS38j so the VM370 system
could send jobs and get prints back.

I have studied the NJE38 manual, but it only shows MVS TO MVS.

I have configured both NJE38 and VM370 for my configuration( node names, ports etc)
When I bring up NJE38 on MVS, it stats waiting for connection.? I start the
RSCS on VM370 and it connects to MVS and on both systems, it shows the line
connected.? I get a BPbuffer size request sent from MVS to VM370 and that appears
to be good.? However I can not pass any traffic in either direction.? So I guess I missed
something, but I can not find any hints in any documentation.

Anyone tried and made this type of connection??

Thank You
Tom c





Re: MVS38j/nje38 via rscs to vm370

 

¿ªÔÆÌåÓý

I don¡¯t know where we are with the RSCS in VM/370 but the base product only acts as a host.

?

Dave

?

From: [email protected] <[email protected]> On Behalf Of Don.isenstadt
Sent: 08 August 2022 08:21
To: [email protected]
Subject: Re: [H390-MVS] MVS38j/nje38 via rscs to vm370

?

Didn¡¯t they use VS1 under vm370 to do the rscs part?

Air 2



On Aug 7, 2022, at 11:56 PM, Mike Schwab <Mike.A.Schwab@...> wrote:

?

Browse rje380 for ideas???

?

On Sun, Aug 7, 2022, 20:26 Tom Chandler <tchandler48@...> wrote:

I am trying to connect MVS38j via nje38 to VM370 via RSCS.? No joy.

Has any be able to do this and if so any tips.

thank
/tc


Re: MVS38j/nje38 via rscs to vm370

 

¿ªÔÆÌåÓý

Didn¡¯t they use VS1 under vm370 to do the rscs part?

Air 2

On Aug 7, 2022, at 11:56 PM, Mike Schwab <Mike.A.Schwab@...> wrote:

?
Browse rje380 for ideas???

On Sun, Aug 7, 2022, 20:26 Tom Chandler <tchandler48@...> wrote:
I am trying to connect MVS38j via nje38 to VM370 via RSCS.? No joy.

Has any be able to do this and if so any tips.

thank
/tc


Re: MVS38j/nje38 via rscs to vm370

 

Browse rje380 for ideas???


On Sun, Aug 7, 2022, 20:26 Tom Chandler <tchandler48@...> wrote:
I am trying to connect MVS38j via nje38 to VM370 via RSCS.? No joy.

Has any be able to do this and if so any tips.

thank
/tc