<?xml version="1.0" encoding="UTF-8"?>
<rss xmlns:content="http://purl.org/rss/1.0/modules/content/" xmlns:dc="http://purl.org/dc/elements/1.1/" xmlns:rdf="http://www.w3.org/1999/02/22-rdf-syntax-ns#" xmlns:taxo="http://purl.org/rss/1.0/modules/taxonomy/" version="2.0">
  <channel>
    <title>topic Re: OpenVMS TASK 100% CPU LOAD - HELP! in Operating System - OpenVMS</title>
    <link>https://community.hpe.com/t5/operating-system-openvms/openvms-task-100-cpu-load-help/m-p/4046037#M85472</link>
    <description>&lt;BR /&gt;Interesting solution, anyway I modified BLACKLIST.COM as follow:&lt;BR /&gt;&lt;BR /&gt;This will wait 1 min and then retry, and after 3 retry will send a TRAP (using DCLSIG app) if FAIL still occour.&lt;BR /&gt;&lt;BR /&gt;$ START:&lt;BR /&gt;$ OPEN /ERROR=OPEN_ERROR  HFILE3 tmp_black.txt&lt;BR /&gt;$ OPEN /WRITE HFILE4 smsc$root:[tmp]black.prl&lt;BR /&gt;$ LOOP:&lt;BR /&gt;$ READ/END_OF_FILE=CLOSEFILE1 HFILE3 black&lt;BR /&gt;$ IF black .NES. "EXIT"&lt;BR /&gt;$ THEN &lt;BR /&gt;$     WRITE HFILE4 "ADD BLACK ''black'"&lt;BR /&gt;$ ENDIF&lt;BR /&gt;$ GOTO LOOP&lt;BR /&gt;$ OPEN_ERROR:&lt;BR /&gt;$ ErrorCount=ErrorCount+1&lt;BR /&gt;$ if ErrorCount .EQS. "4" THEN&lt;BR /&gt;$  DCLSIG "Error Opening tmp_black.txt. Trying to backup it as tmp_black.fail" "FA"&lt;BR /&gt;$ copy tmp_black.txt tmp_black.fail&lt;BR /&gt;$ goto CLOSEFILE1:&lt;BR /&gt;$ END IF&lt;BR /&gt;$ SHOW SYMB $STATUS&lt;BR /&gt;$ WAIT 00:01:00&lt;BR /&gt;$ CLOSE HFILE3&lt;BR /&gt;$ CLOSE HFILE4&lt;BR /&gt;$ GOTO START&lt;BR /&gt;$ CLOSEFILE1:</description>
    <pubDate>Mon, 30 Jul 2007 07:27:08 GMT</pubDate>
    <dc:creator>SMSC</dc:creator>
    <dc:date>2007-07-30T07:27:08Z</dc:date>
    <item>
      <title>OpenVMS TASK 100% CPU LOAD - HELP!</title>
      <link>https://community.hpe.com/t5/operating-system-openvms/openvms-task-100-cpu-load-help/m-p/4046025#M85460</link>
      <description>&lt;BR /&gt;Hello,&lt;BR /&gt;I've a problem with OpenVMS 7.2.&lt;BR /&gt;I've a task running that take 100% CPU LOAD.&lt;BR /&gt;&lt;BR /&gt;If I use PS I get:&lt;BR /&gt;20800424 TASK_145A0094&lt;BR /&gt;&lt;BR /&gt;But witch is TASK_145A0094???&lt;BR /&gt;How can get information about this task??&lt;BR /&gt;&lt;BR /&gt;Please Help!&lt;BR /&gt;</description>
      <pubDate>Mon, 30 Jul 2007 03:08:45 GMT</pubDate>
      <guid>https://community.hpe.com/t5/operating-system-openvms/openvms-task-100-cpu-load-help/m-p/4046025#M85460</guid>
      <dc:creator>SMSC</dc:creator>
      <dc:date>2007-07-30T03:08:45Z</dc:date>
    </item>
    <item>
      <title>Re: OpenVMS TASK 100% CPU LOAD - HELP!</title>
      <link>https://community.hpe.com/t5/operating-system-openvms/openvms-task-100-cpu-load-help/m-p/4046026#M85461</link>
      <description>&lt;BR /&gt;This is TOP CPU LOAD list (attached)&lt;BR /&gt;&lt;BR /&gt;&lt;BR /&gt;&lt;BR /&gt;      &lt;BR /&gt;</description>
      <pubDate>Mon, 30 Jul 2007 03:17:10 GMT</pubDate>
      <guid>https://community.hpe.com/t5/operating-system-openvms/openvms-task-100-cpu-load-help/m-p/4046026#M85461</guid>
      <dc:creator>SMSC</dc:creator>
      <dc:date>2007-07-30T03:17:10Z</dc:date>
    </item>
    <item>
      <title>Re: OpenVMS TASK 100% CPU LOAD - HELP!</title>
      <link>https://community.hpe.com/t5/operating-system-openvms/openvms-task-100-cpu-load-help/m-p/4046027#M85462</link>
      <description>Hi dfdfdsf &lt;BR /&gt;&lt;BR /&gt;First of all, welcome to HP ITRC OpenVMS Forum.&lt;BR /&gt;&lt;BR /&gt;Task_xxxxx is a network process. It is created if you invoke a non-transparent Task-Task communication over DECnet.&lt;BR /&gt;&lt;BR /&gt;What you could do is the following:&lt;BR /&gt;&lt;BR /&gt;- Use SDA to find out what files this task has oppened&lt;BR /&gt;- set proc/suspend/id=  ! Suspend the process, so it stops looping and you can check why it's looping&lt;BR /&gt;- stop/id= ! to stop the looping process.&lt;BR /&gt;&lt;BR /&gt;If you find out the login Directory of your Task-process (with SDA), then you will find there a file called NETSERVER.log (DECnet V4) or a NET$SERVER.LOG (DECnet OSI9. In this file you can find further informations whats going wrong&lt;BR /&gt;&lt;BR /&gt;hope that helps&lt;BR /&gt;&lt;BR /&gt;Regards&lt;BR /&gt;&lt;BR /&gt;Geni</description>
      <pubDate>Mon, 30 Jul 2007 03:19:54 GMT</pubDate>
      <guid>https://community.hpe.com/t5/operating-system-openvms/openvms-task-100-cpu-load-help/m-p/4046027#M85462</guid>
      <dc:creator>Heinz W Genhart</dc:creator>
      <dc:date>2007-07-30T03:19:54Z</dc:date>
    </item>
    <item>
      <title>Re: OpenVMS TASK 100% CPU LOAD - HELP!</title>
      <link>https://community.hpe.com/t5/operating-system-openvms/openvms-task-100-cpu-load-help/m-p/4046028#M85463</link>
      <description>&lt;BR /&gt;Thanks for your fast reply Geni.&lt;BR /&gt;Fast and clear, except for SDA using.&lt;BR /&gt;&lt;BR /&gt;Can you please post an example? I don't know what is SDA!&lt;BR /&gt;&lt;BR /&gt;Thanks againg!&lt;BR /&gt;</description>
      <pubDate>Mon, 30 Jul 2007 03:44:58 GMT</pubDate>
      <guid>https://community.hpe.com/t5/operating-system-openvms/openvms-task-100-cpu-load-help/m-p/4046028#M85463</guid>
      <dc:creator>SMSC</dc:creator>
      <dc:date>2007-07-30T03:44:58Z</dc:date>
    </item>
    <item>
      <title>Re: OpenVMS TASK 100% CPU LOAD - HELP!</title>
      <link>https://community.hpe.com/t5/operating-system-openvms/openvms-task-100-cpu-load-help/m-p/4046029#M85464</link>
      <description>Hi dfdfdsf&lt;BR /&gt;&lt;BR /&gt;SDA stands for SystemDumpAnalyzer&lt;BR /&gt;&lt;BR /&gt;Here a small example:&lt;BR /&gt;&lt;BR /&gt;OBELIX_GENI $ analyze/system&lt;BR /&gt;&lt;BR /&gt;OpenVMS system analyzer&lt;BR /&gt;&lt;BR /&gt;SDA&amp;gt; show summary&lt;BR /&gt;&lt;BR /&gt;Current process summary&lt;BR /&gt;-----------------------&lt;BR /&gt;&lt;BR /&gt; Extended Indx Process name    Username     State   Pri PCB/KTB    PHD    Wkset&lt;BR /&gt;-- PID -- ---- --------------- ------------ ------- --- -------- -------- ------&lt;BR /&gt; 20200101 0001 SWAPPER         SYSTEM       HIB      16 820E37C8 820E3200      0&lt;BR /&gt; 20201402 0002 IAM_SERVER_SUB  IAM_STARTUP  LEF       6 82D1B800 8992A000    377&lt;BR /&gt; 20201403 0003 IAM_ACTION      IAM_STARTUP  LEF       6 82D37500 8992C000     98&lt;BR /&gt; 20201404 0004 IAM_STARTUP     IAM_STARTUP  LEF       4 82D24880 8992E000    367&lt;BR /&gt; 20200106 0006 CLUSTER_SERVER  SYSTEM       HIB      12 82A076C0 898C2000    103&lt;BR /&gt; 20200107 0007 SHADOW_SERVER   SYSTEM       HIB       6 82A091C0 898C4000    118&lt;BR /&gt; 20200108 0008 CONFIGURE       SYSTEM       HIB       8 828F3EC0 898BE000     20&lt;BR /&gt;&lt;BR /&gt;            .........&lt;BR /&gt;&lt;BR /&gt; 2020015F 005F GFR_PAGER_SRV5  SYSTEM       HIB       8 82CB3400 89920000    116&lt;BR /&gt; 20204260 0060 APACHE$SWS000B  APACHE$WWW   LEF       6 82D7F340 8994E000   1151&lt;BR /&gt;&lt;BR /&gt;    Press RETURN for more.&lt;BR /&gt;&lt;BR /&gt;SDA&amp;gt; set proc/index=0060   ! APACHE$SWS000B&lt;BR /&gt;SDA&amp;gt; sho proc/channel      ! Show Open Channels/open Files process has&lt;BR /&gt;&lt;BR /&gt;Process index: 0060   Name: APACHE$SWS000B    Extended PID: 20204260&lt;BR /&gt;--------------------------------------------------------------------&lt;BR /&gt;&lt;BR /&gt;&lt;BR /&gt;                            Process active channels&lt;BR /&gt;                            -----------------------&lt;BR /&gt;&lt;BR /&gt;Channel    CCB     Window     Status    Device/file accessed&lt;BR /&gt;-------    ---     ------     ------    --------------------&lt;BR /&gt;  0010  7FF70000  00000000              DSA7:&lt;BR /&gt;  0020  7FF70020  8374D340              DSA1:[WEBSERVER.APACHE]APACHE$HTTPD.EXE;1&lt;BR /&gt;  0030  7FF70040  829F60C0              DSA0:[VMS$COMMON.SYSLIB]DECC$SHR_EV56.EXE;1 (section file)&lt;BR /&gt;  0040  7FF70060  829F5940              DSA0:[VMS$COMMON.SYSLIB]DPML$SHR.EXE;1 (section file)&lt;BR /&gt;  0050  7FF70080  82A00780              DSA0:[VMS$COMMON.SYSEXE]DCL.EXE;1 (section file)&lt;BR /&gt;  0060  7FF700A0  83BD01C0              DSA0:[VMS$COMMON.SYSLIB]DCLTABLES.EXE;442 (section file)&lt;BR /&gt;  0070  7FF700C0  832E6600              DSA1:[WEBSERVER.APACHE.SPECIFIC.OBELIX]APACHE$SWS000B.LOG;662&lt;BR /&gt;  0080  7FF700E0  82CFB1C0              DSA1:[WEBSERVER.APACHE.SPECIFIC.OBELIX]APACHE$SWS000B.COM;1&lt;BR /&gt;  0090  7FF70100  829F41C0              DSA0:[VMS$COMMON.SYSLIB]CMA$TIS_SHR.EXE;1 (section file)&lt;BR /&gt;  00A0  7FF70120  829F1E40              DSA0:[VMS$COMMON.SYSLIB]LIBOTS.EXE;1 (section file)&lt;BR /&gt;&lt;BR /&gt;            .........&lt;BR /&gt;&lt;BR /&gt;  03D0  7FF70780  00000000              MBA37266:&lt;BR /&gt;  03E0  7FF707A0  00000000              MBA37266:&lt;BR /&gt;  03F0  7FF707C0  00000000              MBA37267:&lt;BR /&gt;  0480  7FF708E0  00000000              MBA37271:&lt;BR /&gt;&lt;BR /&gt;  Total number of open channels : 79.&lt;BR /&gt;SDA&amp;gt; exit&lt;BR /&gt;&lt;BR /&gt;Regards&lt;BR /&gt;&lt;BR /&gt;Geni</description>
      <pubDate>Mon, 30 Jul 2007 03:58:18 GMT</pubDate>
      <guid>https://community.hpe.com/t5/operating-system-openvms/openvms-task-100-cpu-load-help/m-p/4046029#M85464</guid>
      <dc:creator>Heinz W Genhart</dc:creator>
      <dc:date>2007-07-30T03:58:18Z</dc:date>
    </item>
    <item>
      <title>Re: OpenVMS TASK 100% CPU LOAD - HELP!</title>
      <link>https://community.hpe.com/t5/operating-system-openvms/openvms-task-100-cpu-load-help/m-p/4046030#M85465</link>
      <description>&lt;BR /&gt;Find one DCL script in loop. That's why TASK take 100% CPU LOAD.&lt;BR /&gt;Ten points for your reply! ;)&lt;BR /&gt;&lt;BR /&gt;Thanks Geni you save my life! :D&lt;BR /&gt;</description>
      <pubDate>Mon, 30 Jul 2007 04:44:49 GMT</pubDate>
      <guid>https://community.hpe.com/t5/operating-system-openvms/openvms-task-100-cpu-load-help/m-p/4046030#M85465</guid>
      <dc:creator>SMSC</dc:creator>
      <dc:date>2007-07-30T04:44:49Z</dc:date>
    </item>
    <item>
      <title>Re: OpenVMS TASK 100% CPU LOAD - HELP!</title>
      <link>https://community.hpe.com/t5/operating-system-openvms/openvms-task-100-cpu-load-help/m-p/4046031#M85466</link>
      <description>dfdfdsf,&lt;BR /&gt;&lt;BR /&gt;before you kill the process as per Geni's advice, try to get as much info as possible. SUSPENDing the process might stop activity, it also prevents a lot of possibilities for investigation.&lt;BR /&gt;You might first try a $ SET PROCES/ID=20800424/prio=0 &lt;BR /&gt;Now it will still consume any available CPU cycles, but at least the other processes get them first.&lt;BR /&gt;Now $ SHOW PROCES/ID=20800424/ALL will give a lot of info, and it may well be the case, that you can find out which remote process is (or WAS!!) causing this. It may be the case, that this process is trying to send something to a remote process that is no longer there.&lt;BR /&gt;&lt;BR /&gt;Yes, searching for these cases can be somewhat of trail-seeking, with every bit of info you find pointing the direction for the next step.&lt;BR /&gt;&lt;BR /&gt;hth&lt;BR /&gt;&lt;BR /&gt;Proost.&lt;BR /&gt;&lt;BR /&gt;Have one on me.&lt;BR /&gt;&lt;BR /&gt;jpe</description>
      <pubDate>Mon, 30 Jul 2007 04:49:53 GMT</pubDate>
      <guid>https://community.hpe.com/t5/operating-system-openvms/openvms-task-100-cpu-load-help/m-p/4046031#M85466</guid>
      <dc:creator>Jan van den Ende</dc:creator>
      <dc:date>2007-07-30T04:49:53Z</dc:date>
    </item>
    <item>
      <title>Re: OpenVMS TASK 100% CPU LOAD - HELP!</title>
      <link>https://community.hpe.com/t5/operating-system-openvms/openvms-task-100-cpu-load-help/m-p/4046032#M85467</link>
      <description>&lt;BR /&gt;Too late Jan,&lt;BR /&gt;customer ask me to stop process ID and give me no time for analyze it. Look at the following channel list. &lt;BR /&gt;DSA1:[SMSC.SCRIPTS]BLACKLIST.COM was called every 15 mins from another remote node and by another script using GOLD:&lt;BR /&gt;$@gld_lib:lib_exec_remote SMWI31 dsa1:[smsc.scripts]blacklist.com&lt;BR /&gt;Normaly I've no problem on it!!!!&lt;BR /&gt;&lt;BR /&gt;                            Process active channels&lt;BR /&gt;                            -----------------------&lt;BR /&gt;&lt;BR /&gt;Channel    CCB     Window     Status    Device/file accessed&lt;BR /&gt;-------    ---     ------     ------    --------------------&lt;BR /&gt;  0010  7FED0000  00000000              DSA1:&lt;BR /&gt;  0020  7FED0020  820CBD00              DSA1:[SMSC.SCRIPTS]BLACKLIST.COM;18&lt;BR /&gt;  0030  7FED0040  81FD0254  Busy        NET6406:&lt;BR /&gt;  0040  7FED0060  821C34D4              NET6407:&lt;BR /&gt;  0050  7FED0080  81AFD300              DSA0:[VMS$COMMON.SYSEXE]DCL.EXE;1 (section file)&lt;BR /&gt;  0060  7FED00A0  81AEDF80              DSA0:[VMS$COMMON.SYSLIB]DCLTABLES.EXE;257 (section file)&lt;BR /&gt;  0070  7FED00C0  00000000              NLA0:&lt;BR /&gt;  0080  7FED00E0  81C46040              DSA0:[VMS$COMMON.SYSEXE]NET$SERVER.COM;1</description>
      <pubDate>Mon, 30 Jul 2007 05:22:51 GMT</pubDate>
      <guid>https://community.hpe.com/t5/operating-system-openvms/openvms-task-100-cpu-load-help/m-p/4046032#M85467</guid>
      <dc:creator>SMSC</dc:creator>
      <dc:date>2007-07-30T05:22:51Z</dc:date>
    </item>
    <item>
      <title>Re: OpenVMS TASK 100% CPU LOAD - HELP!</title>
      <link>https://community.hpe.com/t5/operating-system-openvms/openvms-task-100-cpu-load-help/m-p/4046033#M85468</link>
      <description>dfdfdsf,&lt;BR /&gt;&lt;BR /&gt;I would recommend two things:&lt;BR /&gt;&lt;BR /&gt;- $ SHOW PROCESS/ALL/ID=20800424&lt;BR /&gt;- $ SHOW DEVICE/FILES on the various disks, particularly the disk that is the default device for the account that owns that process&lt;BR /&gt;&lt;BR /&gt;The symptoms are those of a program in a long or perhaps an infinite loop. Tracking down the problem is a step-by-step process of understanding. In the end, it is always clear what is happening, but it can take several steps to get there.&lt;BR /&gt;&lt;BR /&gt;- Bob Gezelter, &lt;A href="http://www.rlgsc.com" target="_blank"&gt;http://www.rlgsc.com&lt;/A&gt;</description>
      <pubDate>Mon, 30 Jul 2007 05:25:30 GMT</pubDate>
      <guid>https://community.hpe.com/t5/operating-system-openvms/openvms-task-100-cpu-load-help/m-p/4046033#M85468</guid>
      <dc:creator>Robert Gezelter</dc:creator>
      <dc:date>2007-07-30T05:25:30Z</dc:date>
    </item>
    <item>
      <title>Re: OpenVMS TASK 100% CPU LOAD - HELP!</title>
      <link>https://community.hpe.com/t5/operating-system-openvms/openvms-task-100-cpu-load-help/m-p/4046034#M85469</link>
      <description>dfdfdsf,&lt;BR /&gt;&lt;BR /&gt;to prepare for the next time this will happen, consider to have a look into the BLACKLIST.COM DCL procedure.&lt;BR /&gt;&lt;BR /&gt;Maybe you can find out just by code inspection, if there are possible infinite loops in the procedure itself or in any procedures or images it may invoke.&lt;BR /&gt;&lt;BR /&gt;If this happens again, start with SDA&amp;gt; SHOW PROC/CHAN to document the open files, before you stop the process. Run $ MONITOR MODE to find out, if the CPU loop is in Supervisor Mode, then you would know it's a loop within a DCL procedure.&lt;BR /&gt;&lt;BR /&gt;When it comes to this, consider to read the following VTJ article, which explains how to find the current DCL command with SDA:&lt;BR /&gt;&lt;BR /&gt;&lt;A href="http://h71000.www7.hp.com/openvms/journal/v1/dcl.html" target="_blank"&gt;http://h71000.www7.hp.com/openvms/journal/v1/dcl.html&lt;/A&gt;&lt;BR /&gt;&lt;BR /&gt;Volker.</description>
      <pubDate>Mon, 30 Jul 2007 05:38:30 GMT</pubDate>
      <guid>https://community.hpe.com/t5/operating-system-openvms/openvms-task-100-cpu-load-help/m-p/4046034#M85469</guid>
      <dc:creator>Volker Halle</dc:creator>
      <dc:date>2007-07-30T05:38:30Z</dc:date>
    </item>
    <item>
      <title>Re: OpenVMS TASK 100% CPU LOAD - HELP!</title>
      <link>https://community.hpe.com/t5/operating-system-openvms/openvms-task-100-cpu-load-help/m-p/4046035#M85470</link>
      <description>&lt;BR /&gt;I would like to thank all precious advices.&lt;BR /&gt;I write down this usefull post on my Hard Disk for future use!&lt;BR /&gt;&lt;BR /&gt;There is a loop into blacklist.com script that read one text file line by line:&lt;BR /&gt;.....&lt;BR /&gt;.....&lt;BR /&gt;$ START:&lt;BR /&gt;$ OPEN /ERROR=OPEN_ERROR  HFILE3 tmp_black.txt&lt;BR /&gt;$ OPEN /WRITE HFILE4 black.prl&lt;BR /&gt;$ LOOP:&lt;BR /&gt;$ READ/END_OF_FILE=CLOSEFILE1 HFILE3 black&lt;BR /&gt;$ IF black .NES. "EXIT"&lt;BR /&gt;$ THEN &lt;BR /&gt;$    WRITE HFILE4 "ADD BLACK ''black'"&lt;BR /&gt;$ ENDIF&lt;BR /&gt;$ GOTO LOOP&lt;BR /&gt;$ OPEN_ERROR:&lt;BR /&gt;$ GOTO START&lt;BR /&gt;.....&lt;BR /&gt;.....&lt;BR /&gt;&lt;BR /&gt;Probably "tmp_black.txt" file was used by last instance and was impossible to open/read... Then goto to infinite LOOP!&lt;BR /&gt;</description>
      <pubDate>Mon, 30 Jul 2007 06:24:26 GMT</pubDate>
      <guid>https://community.hpe.com/t5/operating-system-openvms/openvms-task-100-cpu-load-help/m-p/4046035#M85470</guid>
      <dc:creator>SMSC</dc:creator>
      <dc:date>2007-07-30T06:24:26Z</dc:date>
    </item>
    <item>
      <title>Re: OpenVMS TASK 100% CPU LOAD - HELP!</title>
      <link>https://community.hpe.com/t5/operating-system-openvms/openvms-task-100-cpu-load-help/m-p/4046036#M85471</link>
      <description>Consider to add some code here:&lt;BR /&gt;&lt;BR /&gt;$ OPEN_ERROR:&lt;BR /&gt;$ SHOW SYMB $STATUS&lt;BR /&gt;$ WAIT 0:0:1&lt;BR /&gt;$ GOTO START&lt;BR /&gt;&lt;BR /&gt;This would at least show (in the NETSERVER.LOG file), if there had been an error during the OPEN. It will also give you the error status and it will wait 1 second before re-trying the OPEN. This would at least lower the CPU load if this error should happen again.&lt;BR /&gt;&lt;BR /&gt;You could also implement a retry counter and send mail to someone or send an OPCOM message, if the OPEN fails after n retries...&lt;BR /&gt;&lt;BR /&gt;Whether it would make any sense at all to go back to START: if the open fails, is another question alltogether. Answering this question would need a lot more background about this procedure.&lt;BR /&gt;&lt;BR /&gt;Volker.</description>
      <pubDate>Mon, 30 Jul 2007 06:33:29 GMT</pubDate>
      <guid>https://community.hpe.com/t5/operating-system-openvms/openvms-task-100-cpu-load-help/m-p/4046036#M85471</guid>
      <dc:creator>Volker Halle</dc:creator>
      <dc:date>2007-07-30T06:33:29Z</dc:date>
    </item>
    <item>
      <title>Re: OpenVMS TASK 100% CPU LOAD - HELP!</title>
      <link>https://community.hpe.com/t5/operating-system-openvms/openvms-task-100-cpu-load-help/m-p/4046037#M85472</link>
      <description>&lt;BR /&gt;Interesting solution, anyway I modified BLACKLIST.COM as follow:&lt;BR /&gt;&lt;BR /&gt;This will wait 1 min and then retry, and after 3 retry will send a TRAP (using DCLSIG app) if FAIL still occour.&lt;BR /&gt;&lt;BR /&gt;$ START:&lt;BR /&gt;$ OPEN /ERROR=OPEN_ERROR  HFILE3 tmp_black.txt&lt;BR /&gt;$ OPEN /WRITE HFILE4 smsc$root:[tmp]black.prl&lt;BR /&gt;$ LOOP:&lt;BR /&gt;$ READ/END_OF_FILE=CLOSEFILE1 HFILE3 black&lt;BR /&gt;$ IF black .NES. "EXIT"&lt;BR /&gt;$ THEN &lt;BR /&gt;$     WRITE HFILE4 "ADD BLACK ''black'"&lt;BR /&gt;$ ENDIF&lt;BR /&gt;$ GOTO LOOP&lt;BR /&gt;$ OPEN_ERROR:&lt;BR /&gt;$ ErrorCount=ErrorCount+1&lt;BR /&gt;$ if ErrorCount .EQS. "4" THEN&lt;BR /&gt;$  DCLSIG "Error Opening tmp_black.txt. Trying to backup it as tmp_black.fail" "FA"&lt;BR /&gt;$ copy tmp_black.txt tmp_black.fail&lt;BR /&gt;$ goto CLOSEFILE1:&lt;BR /&gt;$ END IF&lt;BR /&gt;$ SHOW SYMB $STATUS&lt;BR /&gt;$ WAIT 00:01:00&lt;BR /&gt;$ CLOSE HFILE3&lt;BR /&gt;$ CLOSE HFILE4&lt;BR /&gt;$ GOTO START&lt;BR /&gt;$ CLOSEFILE1:</description>
      <pubDate>Mon, 30 Jul 2007 07:27:08 GMT</pubDate>
      <guid>https://community.hpe.com/t5/operating-system-openvms/openvms-task-100-cpu-load-help/m-p/4046037#M85472</guid>
      <dc:creator>SMSC</dc:creator>
      <dc:date>2007-07-30T07:27:08Z</dc:date>
    </item>
    <item>
      <title>Re: OpenVMS TASK 100% CPU LOAD - HELP!</title>
      <link>https://community.hpe.com/t5/operating-system-openvms/openvms-task-100-cpu-load-help/m-p/4046038#M85473</link>
      <description>SMSC,&lt;BR /&gt;&lt;BR /&gt;there are a couple of errors in the DCL code shown:&lt;BR /&gt;&lt;BR /&gt;Make sure to initialize ErrorCount=0&lt;BR /&gt;&lt;BR /&gt;$ GOTO CLOSEFILE1: ! remove ':'&lt;BR /&gt;&lt;BR /&gt;$ SHOW SYMB $STATUS must be moved to the line immediately following the $ OPEN_ERROR: label.&lt;BR /&gt;&lt;BR /&gt;$ CLOSE HFILE3 ! will give %DCL-W-UNDFIL as the open failed.&lt;BR /&gt;&lt;BR /&gt;Volker.</description>
      <pubDate>Mon, 30 Jul 2007 07:37:55 GMT</pubDate>
      <guid>https://community.hpe.com/t5/operating-system-openvms/openvms-task-100-cpu-load-help/m-p/4046038#M85473</guid>
      <dc:creator>Volker Halle</dc:creator>
      <dc:date>2007-07-30T07:37:55Z</dc:date>
    </item>
    <item>
      <title>Re: OpenVMS TASK 100% CPU LOAD - HELP!</title>
      <link>https://community.hpe.com/t5/operating-system-openvms/openvms-task-100-cpu-load-help/m-p/4046039#M85474</link>
      <description>&lt;BR /&gt;Volker,&lt;BR /&gt;it was just a try, not a final version, but anyway, thanks for your WARNING! ;)&lt;BR /&gt; &lt;BR /&gt;For "CLOSE HFILE3", I must be sure that all handles was closed first to LOOP, so I'll put also:&lt;BR /&gt;&lt;BR /&gt;$ ON ERROR THEN CONTINUE&lt;BR /&gt;&lt;BR /&gt;Just to be sure that DCL script ends and to avoid errors.&lt;BR /&gt;</description>
      <pubDate>Mon, 30 Jul 2007 07:53:01 GMT</pubDate>
      <guid>https://community.hpe.com/t5/operating-system-openvms/openvms-task-100-cpu-load-help/m-p/4046039#M85474</guid>
      <dc:creator>SMSC</dc:creator>
      <dc:date>2007-07-30T07:53:01Z</dc:date>
    </item>
    <item>
      <title>Re: OpenVMS TASK 100% CPU LOAD - HELP!</title>
      <link>https://community.hpe.com/t5/operating-system-openvms/openvms-task-100-cpu-load-help/m-p/4046040#M85475</link>
      <description>&lt;BR /&gt;&lt;BR /&gt;&amp;gt;&amp;gt;&amp;gt;&lt;BR /&gt;For "CLOSE HFILE3", I must be sure that all handles was closed first to LOOP, so I'll put also:&lt;BR /&gt;&amp;lt;&amp;lt;&amp;lt;&lt;BR /&gt;&lt;BR /&gt;You can first test it:&lt;BR /&gt;$ if f$trnlnm("hfile3") .nes. "" then close hfile3&lt;BR /&gt;&lt;BR /&gt;hth&lt;BR /&gt;&lt;BR /&gt;Proost.&lt;BR /&gt;&lt;BR /&gt;Have one on me.&lt;BR /&gt;&lt;BR /&gt;jpe&lt;BR /&gt;</description>
      <pubDate>Mon, 30 Jul 2007 07:58:55 GMT</pubDate>
      <guid>https://community.hpe.com/t5/operating-system-openvms/openvms-task-100-cpu-load-help/m-p/4046040#M85475</guid>
      <dc:creator>Jan van den Ende</dc:creator>
      <dc:date>2007-07-30T07:58:55Z</dc:date>
    </item>
    <item>
      <title>Re: OpenVMS TASK 100% CPU LOAD - HELP!</title>
      <link>https://community.hpe.com/t5/operating-system-openvms/openvms-task-100-cpu-load-help/m-p/4046041#M85476</link>
      <description>&lt;BR /&gt;It works thanks!&lt;BR /&gt;I forgot f$trnlnm lexical command!&lt;BR /&gt;hehehe! I need to refresh my DCL knoledge!&lt;BR /&gt;</description>
      <pubDate>Mon, 30 Jul 2007 08:19:51 GMT</pubDate>
      <guid>https://community.hpe.com/t5/operating-system-openvms/openvms-task-100-cpu-load-help/m-p/4046041#M85476</guid>
      <dc:creator>SMSC</dc:creator>
      <dc:date>2007-07-30T08:19:51Z</dc:date>
    </item>
    <item>
      <title>Re: OpenVMS TASK 100% CPU LOAD - HELP!</title>
      <link>https://community.hpe.com/t5/operating-system-openvms/openvms-task-100-cpu-load-help/m-p/4046042#M85477</link>
      <description>SMSC,&lt;BR /&gt;&lt;BR /&gt;It is also a good safety check to make sure that the file is not already opened when opening it. &lt;BR /&gt;&lt;BR /&gt;It is particularly useful when manually debugging.&lt;BR /&gt;&lt;BR /&gt;- Bob Gezelter, &lt;A href="http://www.rlgsc.com" target="_blank"&gt;http://www.rlgsc.com&lt;/A&gt;</description>
      <pubDate>Mon, 30 Jul 2007 14:28:01 GMT</pubDate>
      <guid>https://community.hpe.com/t5/operating-system-openvms/openvms-task-100-cpu-load-help/m-p/4046042#M85477</guid>
      <dc:creator>Robert Gezelter</dc:creator>
      <dc:date>2007-07-30T14:28:01Z</dc:date>
    </item>
    <item>
      <title>Re: OpenVMS TASK 100% CPU LOAD - HELP!</title>
      <link>https://community.hpe.com/t5/operating-system-openvms/openvms-task-100-cpu-load-help/m-p/4046043#M85478</link>
      <description>&amp;gt;&amp;gt;&amp;gt;It is also a good safety check to make sure that the file is not already opened when opening it.&amp;lt;&amp;lt;&amp;lt;&lt;BR /&gt;&lt;BR /&gt;I usually slam the file with a CLOSE/NOLOG, just before issuing an OPEN command.</description>
      <pubDate>Mon, 30 Jul 2007 15:55:46 GMT</pubDate>
      <guid>https://community.hpe.com/t5/operating-system-openvms/openvms-task-100-cpu-load-help/m-p/4046043#M85478</guid>
      <dc:creator>Hoff</dc:creator>
      <dc:date>2007-07-30T15:55:46Z</dc:date>
    </item>
    <item>
      <title>Re: OpenVMS TASK 100% CPU LOAD - HELP!</title>
      <link>https://community.hpe.com/t5/operating-system-openvms/openvms-task-100-cpu-load-help/m-p/4046044#M85479</link>
      <description>SMSC,&lt;BR /&gt;&lt;BR /&gt;and there is another error:&lt;BR /&gt;&lt;BR /&gt;$ copy tmp_black.txt tmp_black.fail&lt;BR /&gt;&lt;BR /&gt;Why would you expect this command to work, if a DCL OPEN failed ? &lt;BR /&gt;&lt;BR /&gt;Something like:&lt;BR /&gt;&lt;BR /&gt;$ IF F$SEARCH("tmp_black.txt") .NES. ""&lt;BR /&gt;$ THEN&lt;BR /&gt;$   BACK/IGN=INTER tmp_black.txt tmp_black.fail&lt;BR /&gt;$ ENDIF&lt;BR /&gt;&lt;BR /&gt;may have a better chance to succeed.&lt;BR /&gt;&lt;BR /&gt;Volker.</description>
      <pubDate>Tue, 31 Jul 2007 00:27:59 GMT</pubDate>
      <guid>https://community.hpe.com/t5/operating-system-openvms/openvms-task-100-cpu-load-help/m-p/4046044#M85479</guid>
      <dc:creator>Volker Halle</dc:creator>
      <dc:date>2007-07-31T00:27:59Z</dc:date>
    </item>
  </channel>
</rss>

