Try turning the 'SET MSG IUCV' to 'WAKEUP +0 (IUCVMSG' ..   I think this
gets WAKEUP ready - and also issues the SET MSG IUCV.   The example under
'HELP WAKEUP' shows it done this way and I seem to recall needing to do it
in something I'd written.

Scott Rohling

On Thu, Aug 4, 2011 at 9:28 AM, Frank M. Ramaekers <framaek...@ailife.com>wrote:

> ** ** ** ** ** **
>
> I don’t quite understand why I’m missing the first IUCV MSG sent to my
> virtual machine after an IPL.   The basics of this program is:****
>
> ** **
>
> **1)                   **Send a SMSG to VMUTIL of ‘RUOKAY’****
>
> **2)                   **VMUTIL, if alive, will send back a MSG response
> “IMOKAY”****
>
> **3)                   **If the proper response is received the RC is set
> to zero, all other cases it’s set to 1****
>
> ** **
>
> My short REXX:****
>
> ** **
>
>   Trace "O"                                                      ****
>
>   "PIPE LITERAL QUERY SET",                                      ****
>
>       "|  CP",                                                   ****
>
>       "|  SPLIT AT ,",                                           ****
>
>       "|  STRIP",                                                ****
>
>       "|  FIND MSG"||,                                           ****
>
>       "|  SPEC W2 1",                                            ****
>
>       "|  VAR SETMSG"                                            ****
>
>   "CP SET MSG IUCV"                                              ****
>
>   "CP SMSG VMUTIL RUALIVE"                                       ****
>
>   "WAKEUP +00:02 (QUIET IUCVMSG CONS"                            ****
>
>   wurc=rc                                                        ****
>
>   XRC=1  /* Assume bad */                                        ****
>
>   Select                                                         ****
>
>     When wurc==5 then          /* Message arrived */             ****
>
>       Do queued()                                                ****
>
>         Parse pull WuType WuWho WuMsg                            ****
>
>         If WuType=="*MSG" & WuWho=="VMUTIL" & WuMsg="IMOKAY" then****
>
>           XRC=0                                                  ****
>
>       End                                                        ****
>
>     When wurc==6 then          /* Console interrupt */           ****
>
>       Say "Interrupted" ****
>
>     Otherwise           ****
>
>       Nop               ****
>
>   End /* Select */      ****
>
>   "CP SET MSG" SetMsg   ****
>
>   /* Flush everything */****
>
>   "DESBUF"              ****
>
>   If Externals()>0 then ****
>
>     Parse external .    ****
>
> Exit XRC                ****
>
> l
> maint
> ****
>
> ENTER PASSWORD  (IT WILL NOT APPEAR WHEN
> TYPED):                                                                ***
> *
>
>
>
> ****
>
> HCPLNM101E DASD 0CF1 forced R/O; R/O by SYSTEM; stable by
> SYSTEM                                                ****
>
> HCPLNM101E DASD 0CF2 forced R/O; R/O by SYSTEM; stable by
> SYSTEM                                                ****
>
> z/VM Version 5 Release 4.0, Service Level 1003
> (64-bit),                                                        ****
>
> built on IBM Virtualization
> Technology
>                       ****
>
> There is no logmsg
> data
> ****
>
> FILES: 0066 RDR, 0007 PRT,   NO
> PUN
> ****
>
> LOGON AT 10:25:22 CDT THURSDAY
> 08/04/11
> ****
>
> z/VM V5.4.0    2011-03-31
> 08:13
> ****
>
>
>
> ****
>
> PIPINX086I CMS/TSO Pipelines, 5654-030/5655-A17 1.0112
> (Version.Release/Mod) - Generated 3 Jul 2010 at 11:32:36.****
>
> Source:  **Princeton** Runtime
> Distribution
> ****
>
> Ready; T=0.02/0.02
> 10:25:24
> ****
>
> vmutil
>
> ****
>
>  10:25:25  * MSG FROM VMUTIL  :
> IMOKAY
> ****
>
> Ready(00001); T=0.01/0.01 10:25:27
>                                                     ****
>
> vmutil                     ****
>
> Ready; T=0.01/0.01 10:25:41****
>
> vmutil                     ****
>
> Ready; T=0.01/0.01 10:25:44****
>
> vmutil                     ****
>
> Ready; T=0.01/0.01 10:25:44****
>
> vmutil                     ****
>
> Ready; T=0.01/0.01 10:25:45****
>
> ** **
>
> Any way to avoid missing this first MSG?****
>
> ** **
>
>  Frank M. Ramaekers Jr.****
>
> ** **
>
> ** **
>
> Systems Programmer****
>
> MCP, MCP+I, MCSE & RHCE****
>
> ** **
>
> American Income Life Insurance Co.****
>
> Phone: (254)761-6649****
>
> ** **
>
> 1200 Wooded ****Acres Dr****.****
>
> Fax: (254)741-5777****
>
> ** **
>
> ****Waco**, **Texas**  **76701********
>
> ** **
>
> ** **
>
> ** **
>
> ** **
>  _____________________________________________________ This message
> contains information which is privileged and confidential and is solely for
> the use of the intended recipient. If you are not the intended recipient, be
> aware that any review, disclosure, copying, distribution, or use of the
> contents of this message is strictly prohibited. If you have received this
> in error, please destroy it immediately and notify us at
> privacy...@ailife.com.
>

Reply via email to