Rex,

Try this jobstream (make appropriate substitutions):

===========================================
//UNZIP    EXEC PGM=GIMUNZIP,PARM='HASH=NO'          
//SYSUT3   DD UNIT=WORKDA,SPACE=(CYL,(50,10))                   
//SYSUT4   DD UNIT=WORKDA,SPACE=(CYL,(25,5))                    
//SMPOUT   DD SYSOUT=*                                          
//SYSPRINT DD SYSOUT=*                                          
//SMPDIR   DD PATH='/gimzip/cicsptfs/SMPPTFIN',      <=== Change
//            PATHDISP=KEEP                                     
//SYSIN    DD DATA,DLM=$$                                       
<GIMUNZIP>                                                      
<ARCHDEF                                                        
name="S0001.SHOPZ.S6254966.SMPMCS.pax.Z"          <=== Change 
volume="SMP394"                                   <=== Change
newname="SMP.CICSTS23.RSU0508.SMPMCS">            <=== Change
</ARCHDEF>                                                      
<ARCHDEF                                                        
name="S0002.SHOPZ.S6254966.SMPHOLD.pax.Z"          <=== Change
volume="SMP394"                                    <=== Change
newname="SMP.CICSTS23.RUS0508.HOLDDATA">           <=== Change
</ARCHDEF>                                                      
</GIMUNZIP>                                                     
$$                                                              
//REC  EXEC PGM=IKJEFT01,COND=(4,LT,UNZIP),REGION=8M            
//SMPCSI   DD DISP=SHR,                                         
//            DSN=SMP.CICSTS23.GLOBAL.CSI           <=== Change 
//SMPPTS   DD DISP=OLD,                                         
//            DSN=SMP.CICSTS23.SMPPTS               <=== Change
//SMPOUT   DD SYSOUT=*                                          
//SMPRPT   DD SYSOUT=*                                          
//SMPLIST  DD SYSOUT=*                                          
//SYSPRINT DD SYSOUT=*                                          
//SMPLOG   DD SYSOUT=*                                          
//SMPLOGA  DD DUMMY                                             
//SYSUT1   DD UNIT=WORKDA,SPACE=(CYL,(20,1)),DISP=(,DELETE)     
//SYSUT2   DD UNIT=WORKDA,SPACE=(CYL,(20,1)),DISP=(,DELETE)     
//SYSUT3   DD UNIT=WORKDA,SPACE=(CYL,(20,1)),DISP=(,DELETE)     
//SYSUT4   DD UNIT=WORKDA,SPACE=(TRK,(20,1)),DISP=(,DELETE)     
//SMPCNTL  DD DATA,DLM=$$                                       
 SET    BOUNDARY (GLOBAL)                                       
              .                                                 
 RECEIVE /* Receive the SYSMODs and HOLDDATA */                 
              .                                                 
$$                                                              
//SYSTSPRT DD SYSOUT=*                                          
//SYSTSIN  DD DATA,DLM=$$                                       
 ALLOC FI(SMPPTFIN) SHR DA('SMP.CICSTS23.RSU0508.SMPMCS')   <=== Change
 ALLOC FI(SMPHOLD)  SHR DA('SMP.CICSTS23.RUS0508.HOLDDATA') <=== Change
 CALL *(GIMSMP)                                                 
$$                                                               
===============================

    -jc-

> -----Original Message-----
> From: IBM Mainframe Discussion List 
> [mailto:[EMAIL PROTECTED] On Behalf Of Pommier, Rex R.
> Sent: Monday, February 18, 2008 2:02 PM
> To: [email protected]
> Subject: Catch-22 question on SMP/E receive fromnts command
> 
> Hi list. 
> 
> I have what is probably a dumb question but I've never done a 
> receive across the internet before.  I am trying to install 
> java on z/OS 1.7.
> According to the documentation I need either ICSF or java 
> already running on the box to get the hashes calculated.  The 
> doc further says that if I don't have either of these (which 
> I currently don't, being that I'm trying to install java) 
> that I need to transfer the CBPDO across to my PC, FTP it to 
> the host, then run a receive fromnts command to get the CBPDO 
> received.
> 
> My problem is that when I do the RECEIVE FROMNTS, I get a 
> RC=12 but no error message.  The information messages I get 
> as well as the documentation seems to indicate that if I have 
> neither ICSF or the JAVA available, the RECEIVE will simply 
> skip the hash check and continue.
> I've tried reading the furnished materials as well as the 
> message descriptions and am stumped.  Any help will be appreciated.
> 
> Here is what I get from the RECEIVE job:
> 
> //SMPER1  EXEC PGM=GIMSMP,REGION=0M,       
> //             PARM='PROCESS=WAIT',        
> //             DYNAMNBR=120                
> //SMPCSI   DD  DISP=SHR,DSN=SMPE.GLOBAL.CSI
> //SMPNTS   DD  PATHDISP=KEEP,              
> //             PATH='/smpnts/'             
> //SMPOUT   DD  SYSOUT=*                    
> //SMPRPT   DD  SYSOUT=*                    
> //SMPLIST  DD  SYSOUT=*                    
> //SYSPRINT DD  SYSOUT=*                    
> //SMPCNTL  DD  *   
>   SET      BOUNDARY (GLOBAL) .  
>   RECEIVE                       
>    FROMNTS(JAVA)                
>       .                         
> /*                              
> 
> 
> 
> GIM69218I    PROGRAM GIMJVCLT COULD NOT BE STARTED.
> 
> GIM23411I    DATA INTEGRITY VERIFICATION WILL NOT BE PERFORMED ON
> PACKAGE JAVA            
>              BECAUSE ICSF IS NOT AVAILABLE AND AN ATTEMPT TO USE AN
> ALTERNATE             
>              SERVICE HAS FAILED.
> 
> GIM20501I    RECEIVE PROCESSING IS COMPLETE. THE HIGHEST 
> RETURN CODE WAS
> 12.              
>  
> 
> 
> The JAVA directory appears to be set up correctly:
> 
> -rw-r-----   1 OMVSKERN OEDFLTG    12160 Feb 14 14:37 GIMPAF.XML
> 
> -rw-r-----   1 OMVSKERN OEDFLTG     4800 Feb 14 14:37 GIMPAF.XSL
> 
> -rw-r-----   1 OMVSKERN OEDFLTG     9234 Feb 14 14:37
> S0001.CSP.CSP.README               
> -rw-r-----   1 OMVSKERN OEDFLTG    32256 Feb 14 14:37
> S0002.CSP.OSP10901.DOCLIB.pax.Z    
> -rw-r-----   1 OMVSKERN OEDFLTG    32256 Feb 14 14:37
> S0003.CSP.OSP10901.RIMLIB.pax.Z    
> -rw-r-----   1 OMVSKERN OEDFLTG    64512 Feb 14 14:37
> S0005.CSP.OSP10901.PGMDIR.pax.Z    
> -rw-r-----   1 OMVSKERN OEDFLTG     2539 Feb 15 16:36
> S0017.CSP.OSP10901.GIMUNZIP        
> drwxr-xr-x   2 OMVSKERN OEDFLTG      320 Feb 14 14:37 SMPHOLD
> 
> drwxr-xr-x   2 OMVSKERN OEDFLTG      640 Feb 14 14:44 SMPPTFIN
> 
> drwxr-xr-x   2 OMVSKERN OEDFLTG      576 Feb 14 14:45 SMPRELF
> 
> 
> 
> The GIM23411I message as well as what I've deciphered from 
> the doc seems to indicate that processing will just continue 
> without verifying the hash totals.  
> 
> So finally, my questions:
> 
> Do I need to unzip the files within the SMP???? Directories 
> before running the RECEIVE step or is the RECEIVE supposed to 
> do this for me?
> As an example, the SMPHOLD directory shows 1 file:
> 
> -rw-r-----   1 OMVSKERN OEDFLTG   225792 Feb 14 14:37
> S0004.CSP.OSP10901.HOLDDATA.pax.Z   
> 
> If I need to manually unzip the files, can I do this from 
> another platform that has gunzip or do I need to install 
> gunzip on the Z?  Or am I missing something completely here?
> 
> What am I missing in the above RECEIVE job?
> 
> Am I in a catch-22 with trying to install JAVA 1.4 on this 
> box using internet delivery and I in fact need JAVA 1.4 
> before I can use internet delivery?  Do I need to go back and 
> reorder the software using tape shipment?
> 
> Sorry for the length of this question/request for help.
> 
> Rex Pommier
> 
> CNA Surety
> 101 South Phillips Ave
> Sioux Falls, SD  57104
> 605-977-7719
> 
> A bus station is where a bus stops. A train station is where 
> a train stops. On my desk I have a work station....
> 
> 
> 
> ----------------------------------------------------------------------
> For IBM-MAIN subscribe / signoff / archive access 
> instructions, send email to [EMAIL PROTECTED] with the 
> message: GET IBM-MAIN INFO Search the archives at 
> http://bama.ua.edu/archives/ibm-main.html
> 

----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html

Reply via email to