APPLY SMP/E command



IBM's hierarchical database management system with a Database Manager (IMS DB) and a Transaction Manager(IMS DC)

APPLY SMP/E command

Postby futohomok » Mon Oct 09, 2023 2:14 pm

Dear Friends,

on route to my goal I am stranded. My goal is to run an online MPP application in IMS control region. For this I created the required IMS objects: COBOL sourrce code, PSB, DBD, MFs, target and distribution regions, FUNCTION type SYSMOD object in the target region. I runned the SMP/E RECEIVE command for to insert the my SYSMOD object into global zone. These steps all returned success state. And finish I runned the SMP/E APPLY command for insert the my required load modules into target libraries. This step returned also success state. But the load modules not creted. Not in the target libraries and not in anywhere. For thie please send me some words about to result this problem.

Best Regards
futohomok from Hungary (in Europe)
futohomok
 
Posts: 20
Joined: Wed Aug 24, 2022 8:22 pm
Has thanked: 8 times
Been thanked: 0 time

Re: APPLY SMP/E command

Postby Robert Sample » Mon Oct 09, 2023 6:53 pm

The SMPLOG should give you some idea about what happened.
Robert Sample
Global moderator
 
Posts: 3719
Joined: Sat Dec 19, 2009 8:32 pm
Location: Dubuque, Iowa, USA
Has thanked: 1 time
Been thanked: 279 times

Re: APPLY SMP/E command

Postby futohomok » Tue Oct 10, 2023 12:58 pm

Dear Robert,

very thanks for your reply, but that's just my problem. Nothing error message is in SMPLOG or in SYSTEM LOG or anywhere. On every place is only RC=0 or SUCCESSFUL UPDATE message.

Best Regards
futohomok from Hungary (in Europe)
futohomok
 
Posts: 20
Joined: Wed Aug 24, 2022 8:22 pm
Has thanked: 8 times
Been thanked: 0 time

Re: APPLY SMP/E command

Postby Robert Sample » Tue Oct 10, 2023 9:41 pm

What does the DDDEF for LOADLIB have?

These users thanked the author Robert Sample for the post:
futohomok (Mon Oct 16, 2023 8:16 pm)
Robert Sample
Global moderator
 
Posts: 3719
Joined: Sat Dec 19, 2009 8:32 pm
Location: Dubuque, Iowa, USA
Has thanked: 1 time
Been thanked: 279 times

Re: APPLY SMP/E command

Postby futohomok » Mon Oct 16, 2023 9:01 pm

Dear Robert,

very thanks for your reply, and excuse me that I don't know what you name LOADLIB. I defined two DDDEF entries in the SYSMOD definirion. MODBLKS for target library and SYSPUNCH for didtribution library

SET BDY(IMSTZ91). /* new FUNCTION SYSMOD inserting into IMSTZ91 */
UCLIN.
ADD SYSMOD(LIA7908) FUNCTION
DESCRIPTION(ZNONLN)
APPLY RECDATE(23285) INSDATE(23285)
FMID(LIA7908).
ADD DDDEF(MODBLKS)
DA(IMS.V9R1.IMSA.MODBLKS)
SHR.
ADD DDDEF(SYSPUNCH)
DA(IMS.V9R1.IMSA.SYSPUNCH)
SHR.
ENDUCL.

And I made a MCS file which contains a ++JCLIN command

++FUNCTION(LIA7908) DESCRIPTION(ZNONLN) /* ZNONLN MPP app */.
++VER(P115).
++JCLIN TXLIB(SMPJCLIN).
++MOD(DFSDDIRA) DISTLIB(MODBLKS) LMOD(DFSDDIRA) TXLIB(SMPJCLIN).
++MOD(DFSISDBA) DISTLIB(MODBLKS) LMOD(DFSISDBA) TXLIB(SMPJCLIN).
++MOD(DFSPDIRA) DISTLIB(MODBLKS) LMOD(DFSPDIRA) TXLIB(SMPJCLIN).
++MOD(DFSRCTEA) DISTLIB(MODBLKS) LMOD(DFSRCTEA) TXLIB(SMPJCLIN).
++MOD(DFSSMB0A) DISTLIB(MODBLKS) LMOD(DFSSMB0A) TXLIB(SMPJCLIN).

And this MCS file calls the SMPJCLIN dataset which contain the definitions for new IMSA region. These are all OK. My problem is that in SMPJCLIN ds are modules which don't assembled by ASMA90 utility. Example

//STEP12 EXEC PGM=ASMA90,REGION=0M,
// PARM=(OBJECT,NODECK,NODBCS,NOLIST,NOTERM,
// 'SIZE(MAX,ABOVE)',NOUSING,FLAG(NOPUSH),COMPAT(NOCASE))
//SYSLIB DD DSN=IMS.V9R1.IMSA.OPTIONS,DISP=SHR
// DD DSN=IMS.V9R1.ADFSMAC,DISP=SHR
// DD DSN=SYS1.MACLIB,DISP=SHR
// DD DSN=SYS1.MODGEN,DISP=SHR
//SYSLIN DD DISP=OLD,
// DSN=IMS.V9R1.IMSA.OBJDSET(DFSDDIRA)
//SYSPRINT DD SYSOUT=A,
// DCB=(BLKSIZE=605),
// SPACE=(605,(100,50),RLSE,,ROUND)
//SYSUT1 DD UNIT=SYSDA,DISP=(,DELETE),
// DCB=BLKSIZE=13024,
// SPACE=(CYL,(15,15))
//SYSIN DD *
DFSDMD ADMIDX1,0000,4
DFSDMD ADMOBJ1,0000,4
DFSDMD ADMSYSDF,0000,4
DFSDMD CELDCUST,0000,3
DFSDMD CELDCUSX,0000,3
DFSDMD CELDPROD,0000,3
DFSDMD CELDPROX,0000,3
....
DFSDMD ZNDBD,0000,3
DFSDMD GEN
END


That is the DFSDDIRA object don't created in IMS.V9R1.IMSA.OBJDSET pds. For this I would like to ask from you that send me some words about this.

Best Regards
futohomok from Hungary (in Europe)
futohomok
 
Posts: 20
Joined: Wed Aug 24, 2022 8:22 pm
Has thanked: 8 times
Been thanked: 0 time


Return to IMS DB/DC

 


  • Related topics
    Replies
    Views
    Last post