IBM Mainframe Forum Index
 
Log In
 
IBM Mainframe Forum Index Mainframe: Search IBM Mainframe Forum: FAQ Register
 

FLMLNK SCLM


IBM Mainframe Forums -> IBM Tools
Post new topic   Reply to topic
View previous topic :: View next topic  
Author Message
Pandora-Box

Global Moderator


Joined: 07 Sep 2006
Posts: 1592
Location: Andromeda Galaxy

PostPosted: Tue Jun 14, 2011 5:13 pm
Reply with quote

Hi,

We have SCLM and I am trying to build a component type say source through rexx.
I tried invoking FLMLNK and it fails

I just passed on the values need to the following command

Code:


"FLMLNK("SERVICE","PROJECT","SCLM_ID","SLMLIB",",
           SLMLIB2","SLMLIB3","SLMLIB4","           ,
           SLMTYP","SLMMEM","USER","ALL_HIER","     ,
           CONFIRM","MIX","WS","                    ,
           PRESERVE","AUTHCODE","CHGCODE","         ,
           MSGE","RPT","LIST","EXT");"



But It failed with

INVALID COMMAND NAME SYNTAX
+++ RC(-3) +++

Can you please let me know where I would I have went wrong

Thanks in advance
Back to top
View user's profile Send private message
anatol

Active User


Joined: 20 May 2010
Posts: 121
Location: canada

PostPosted: Tue Jun 14, 2011 6:13 pm
Reply with quote

Do you have
ADDRESS ISPEXEC

before this command?
Back to top
View user's profile Send private message
Pandora-Box

Global Moderator


Joined: 07 Sep 2006
Posts: 1592
Location: Andromeda Galaxy

PostPosted: Tue Jun 14, 2011 6:19 pm
Reply with quote

I believe thats not needed for this one
Back to top
View user's profile Send private message
anatol

Active User


Joined: 20 May 2010
Posts: 121
Location: canada

PostPosted: Tue Jun 14, 2011 6:25 pm
Reply with quote

Usually I've used FLMLNK for PL/I , for rexx I've used the command form in ADDRESS TSO , like:
"FLMCMD PROMOTE,"FLL",,N,R,,RPT1,PROMEXIT,"
Back to top
View user's profile Send private message
PeterHolland

Global Moderator


Joined: 27 Oct 2009
Posts: 2481
Location: Netherlands, Amstelveen

PostPosted: Tue Jun 14, 2011 6:26 pm
Reply with quote

If you are using FLMLNK, you must pad each parameter to the maximum length. To do so, you must insert blank spaces so that each parameter takes up exactly the maximum amount of space allotted for it.
Back to top
View user's profile Send private message
Pandora-Box

Global Moderator


Joined: 07 Sep 2006
Posts: 1592
Location: Andromeda Galaxy

PostPosted: Tue Jun 14, 2011 6:42 pm
Reply with quote

I changed to FLMCMD and got some SCLM messages and trying to fix them.Will let you know once done.

Thanks.
Back to top
View user's profile Send private message
Pandora-Box

Global Moderator


Joined: 07 Sep 2006
Posts: 1592
Location: Andromeda Galaxy

PostPosted: Wed Jun 15, 2011 3:18 pm
Reply with quote

Hi please find the error I along with trance output and code

Please help me out if I had left out anything


Trace Output

Code:



      3 *-* CALL Init
      7 *-*  INIT:
      9 *-*  PROJECT    = 'DEVSCLM'
        >L>    "DEVSCLM"
 ***
     10 *-*  SLMLIB     = 'PRKRTE  '
        >L>    "PRKRTE  "
     11 *-*  SLMLIB2    = '        '
        >L>    "        "
     12 *-*  SLMLIB3    = '        '
        >L>    "        "
     13 *-*  SLMLIB4    = '        '
        >L>    "        "
     14 *-*  SLMTYP     = 'DB2PARM'
        >L>    "DB2PARM"
     15 *-*  SLMMEM     = 'PRKR10M '
        >L>    "PRKR10M "
     16 *-*  SERVICE    = 'BUILD   '
        >L>    "BUILD   "
     17 *-*  DDNAME     = 'BUILD   '
        >L>    "BUILD   "
     18 *-*  USER       = 'PRKRTE  '
        >L>    "PRKRTE  "
     19 *-*  ALL_HIER   = 'N'
        >L>    "N"
     20 *-*  IMAC       = '        '
        >L>    "        "
     21 *-*  PROF       = '        '
 ***
        >L>    "        "
     22 *-*  CONFIRM    = 'N'
        >L>    "N"
     23 *-*  MIX        = 'N'
        >L>    "N"
     24 *-*  WS         = 'Y'
        >L>    "Y"
     25 *-*  PRESERVE   = 'PRKRTE'
        >L>    "PRKRTE"
     26 *-*  AUTHCODE   = ' '
        >L>    " "
     27 *-*  CHGCODE    = '    '
        >L>    "    "
     28 *-*  SCLM_ID    = '    '
        >L>    "    "
     29 *-*  MSGE       = 'BLDMSGS'
        >L>    "BLDMSGS"
     30 *-*  RPT        = 'BLDREPT'
        >L>    "BLDREPT"
     31 *-*  LIST       = 'BLDLIST'
        >L>    "BLDLIST"
     32 *-*  EXT        = 'BLDEXIT'
        >L>    "BLDEXIT"
     34 *-*  FLMCMD_DDN.1 = 'BLDMSGS'
        >L>    "BLDMSGS"
     35 *-*  flmcmd_type.1 = 'MESSAGES'
        >L>    "MESSAGES"
     36 *-*  FLMCMD_DDN.2 = 'BLDREPT'
        >L>    "BLDREPT"
     37 *-*  flmcmd_type.2 = 'REPORT'
        >L>    "REPORT"
     38 *-*  FLMCMD_DDN.3 = 'BLDEXIT'
        >L>    "BLDEXIT"
     39 *-*  FLMCMD_TYPE.3 = 'BLDEXIT'
        >L>    "BLDEXIT"
     40 *-*  flmcmd_attr.3 = 'DSORG(PS) RECFM(F,B) LRECL(160) SPACE(10,10)'
        >L>    "DSORG(PS) RECFM(F,B) LRECL(160) SPACE(10,10)"
     41 *-*  flmcmd_attr.3 = flmcmd_attr.3 'BLKSIZE(3200) MOD'
        >V>    "DSORG(PS) RECFM(F,B) LRECL(160) SPACE(10,10)"
        >L>    "BLKSIZE(3200) MOD"
        >O>    "DSORG(PS) RECFM(F,B) LRECL(160) SPACE(10,10) BLKSIZE(3200) MOD"
     42 *-*  FLMCMD_DDN.4 = 'BLDLIST'
        >L>    "BLDLIST"
     43 *-*  flmcmd_type.4 = 'LISTINGS'
        >L>    "LISTINGS"
     44 *-*  flmcmd_type.0 = 4
 ***
        >L>    "4"
     45 *-*  RETURN
      4 *-* CALL Alloc_ds
     47 *-*  Alloc_ds:
     48 *-*  /******************************************************************
 ****/
     49 *-*  /* Allocate data sets for SCLM build
    */
     50 *-*  /******************************************************************
 ****/
     51 *-*  flmds_rc = 0
        >L>    "0"
     52 *-*  Do l = 1 to flmcmd_type.0                       /* loop thru datase
 ts */
        >L>    "1"
        >V>    "4"
     53 *-*   "ALLOC FI("flmcmd_ddn.l") DA(*)"
        >L>     "ALLOC FI("
        >C>     "FLMCMD_DDN.1"
        >V>     "BLDMSGS"
        >O>     "ALLOC FI(BLDMSGS"
        >L>     ") DA(*)"
        >O>     "ALLOC FI(BLDMSGS) DA(*)"
 ***
     55 *-*   /* already created        */
     56 *-*  End                      /* end loop thru flmcmd_type
    */
     52 *-*  Do l = 1 to flmcmd_type.0                       /* loop thru datase
 ts */
     53 *-*   "ALLOC FI("flmcmd_ddn.l") DA(*)"
        >L>     "ALLOC FI("
        >C>     "FLMCMD_DDN.2"
        >V>     "BLDREPT"
        >O>     "ALLOC FI(BLDREPT"
        >L>     ") DA(*)"
        >O>     "ALLOC FI(BLDREPT) DA(*)"
     55 *-*   /* already created        */
     56 *-*  End                      /* end loop thru flmcmd_type
    */
     52 *-*  Do l = 1 to flmcmd_type.0                       /* loop thru datase
 ts */
     53 *-*   "ALLOC FI("flmcmd_ddn.l") DA(*)"
        >L>     "ALLOC FI("
        >C>     "FLMCMD_DDN.3"
        >V>     "BLDEXIT"
        >O>     "ALLOC FI(BLDEXIT"
        >L>     ") DA(*)"
 ***
        >O>     "ALLOC FI(BLDEXIT) DA(*)"
     55 *-*   /* already created        */
     56 *-*  End                      /* end loop thru flmcmd_type
    */
     52 *-*  Do l = 1 to flmcmd_type.0                       /* loop thru datase
 ts */
     53 *-*   "ALLOC FI("flmcmd_ddn.l") DA(*)"
        >L>     "ALLOC FI("
        >C>     "FLMCMD_DDN.4"
        >V>     "BLDLIST"
        >O>     "ALLOC FI(BLDLIST"
        >L>     ") DA(*)"
        >O>     "ALLOC FI(BLDLIST) DA(*)"
     55 *-*   /* already created        */
     56 *-*  End                      /* end loop thru flmcmd_type
    */
     52 *-*  Do l = 1 to flmcmd_type.0                       /* loop thru datase
 ts */
     57 *-*  Return
      5 *-* CALL Process
     59 *-*  PROCESS :
     60 *-*  /*"FLMCMD "SERVICE","PROJECT","SCLM_ID","SLMLIB",",
                           SLMTYP","SLMMEM","USER","ALL_HIER","     ,
 ***
                            CONFIRM","MIX","WS","                    ,
                             PRESERVE","                              ,
                              MSGE","RPT","LIST","EXT */
     65 *-*  "FLMCMD "SERVICE","PROJECT","SCLM_ID","SLMLIB",",
                         SLMTYP","SLMMEM","USER","ALL_HIER","     ,
                          CONFIRM","MIX","WS","                    ,
                           PRESERVE","                              ,
                            MSGE","RPT","LIST","EXT
        >L>    "FLMCMD "
        >V>    "BUILD   "
        >O>    "FLMCMD BUILD   "
        >L>    ","
        >O>    "FLMCMD BUILD   ,"
        >V>    "DEVSCLM"
        >O>    "FLMCMD BUILD   ,DEVSCLM"
        >L>    ","
        >O>    "FLMCMD BUILD   ,DEVSCLM,"
        >V>    "    "
        >O>    "FLMCMD BUILD   ,DEVSCLM,    "
        >L>    ","
        >O>    "FLMCMD BUILD   ,DEVSCLM,    ,"
        >V>    "PRKRTE  "
        >O>    "FLMCMD BUILD   ,DEVSCLM,    ,PRKRTE  "
 ***
        >L>    ","
        >O>    "FLMCMD BUILD   ,DEVSCLM,    ,PRKRTE  ,"
        >V>    "DB2PARM"
        >O>    "FLMCMD BUILD   ,DEVSCLM,    ,PRKRTE  , DB2PARM"
        >L>    ","
        >O>    "FLMCMD BUILD   ,DEVSCLM,    ,PRKRTE  , DB2PARM,"
        >V>    "PRKR10M "
        >O>    "FLMCMD BUILD   ,DEVSCLM,    ,PRKRTE  , DB2PARM,PRKR10M "
        >L>    ","
        >O>    "FLMCMD BUILD   ,DEVSCLM,    ,PRKRTE  , DB2PARM,PRKR10M ,"
        >V>    "PRKRTE  "
        >O>    "FLMCMD BUILD   ,DEVSCLM,    ,PRKRTE  , DB2PARM,PRKR10M ,PRKRTE
 "
        >L>    ","
        >O>    "FLMCMD BUILD   ,DEVSCLM,    ,PRKRTE  , DB2PARM,PRKR10M ,PRKRTE
 ,"
        >V>    "N"
        >O>    "FLMCMD BUILD   ,DEVSCLM,    ,PRKRTE  , DB2PARM,PRKR10M ,PRKRTE
 ,N"
        >L>    ","
        >O>    "FLMCMD BUILD   ,DEVSCLM,    ,PRKRTE  , DB2PARM,PRKR10M ,PRKRTE
 ,N,"
        >V>    "N"
 ***
        >O>    "FLMCMD BUILD   ,DEVSCLM,    ,PRKRTE  , DB2PARM,PRKR10M ,PRKRTE
 ,N, N"
        >L>    ","
        >O>    "FLMCMD BUILD   ,DEVSCLM,    ,PRKRTE  , DB2PARM,PRKR10M ,PRKRTE
 ,N, N,"
        >V>    "N"
        >O>    "FLMCMD BUILD   ,DEVSCLM,    ,PRKRTE  , DB2PARM,PRKR10M ,PRKRTE
 ,N, N,N"
        >L>    ","
        >O>    "FLMCMD BUILD   ,DEVSCLM,    ,PRKRTE  , DB2PARM,PRKR10M ,PRKRTE
 ,N, N,N,"
        >V>    "Y"
        >O>    "FLMCMD BUILD   ,DEVSCLM,    ,PRKRTE  , DB2PARM,PRKR10M ,PRKRTE
 ,N, N,N,Y"
        >L>    ","
        >O>    "FLMCMD BUILD   ,DEVSCLM,    ,PRKRTE  , DB2PARM,PRKR10M ,PRKRTE
 ,N, N,N,Y,"
        >V>    "PRKRTE"
        >O>    "FLMCMD BUILD   ,DEVSCLM,    ,PRKRTE  , DB2PARM,PRKR10M ,PRKRTE
 ,N, N,N,Y, PRKRTE"
        >L>    ","
        >O>    "FLMCMD BUILD   ,DEVSCLM,    ,PRKRTE  , DB2PARM,PRKR10M ,PRKRTE
 ,N, N,N,Y, PRKRTE,"
 ***

        >V>    "BLDMSGS"
        >O>    "FLMCMD BUILD   ,DEVSCLM,    ,PRKRTE  , DB2PARM,PRKR10M ,PRKRTE
 ,N, N,N,Y, PRKRTE, BLDMSGS"
        >L>    ","
        >O>    "FLMCMD BUILD   ,DEVSCLM,    ,PRKRTE  , DB2PARM,PRKR10M ,PRKRTE
 ,N, N,N,Y, PRKRTE, BLDMSGS,"
        >V>    "BLDREPT"
        >O>    "FLMCMD BUILD   ,DEVSCLM,    ,PRKRTE  , DB2PARM,PRKR10M ,PRKRTE
 ,N, N,N,Y, PRKRTE, BLDMSGS,BLDREPT"
        >L>    ","
        >O>    "FLMCMD BUILD   ,DEVSCLM,    ,PRKRTE  , DB2PARM,PRKR10M ,PRKRTE
 ,N, N,N,Y, PRKRTE, BLDMSGS,BLDREPT,"
        >V>    "BLDLIST"
        >O>    "FLMCMD BUILD   ,DEVSCLM,    ,PRKRTE  , DB2PARM,PRKR10M ,PRKRTE
 ,N, N,N,Y, PRKRTE, BLDMSGS,BLDREPT,BLDLIST"
        >L>    ","
        >O>    "FLMCMD BUILD   ,DEVSCLM,    ,PRKRTE  , DB2PARM,PRKR10M ,PRKRTE
 ,N, N,N,Y, PRKRTE, BLDMSGS,BLDREPT,BLDLIST,"
        >V>    "BLDEXIT"
        >O>    "FLMCMD BUILD   ,DEVSCLM,    ,PRKRTE  , DB2PARM,PRKR10M ,PRKRTE
 ,N, N,N,Y, PRKRTE, BLDMSGS,BLDREPT,BLDLIST,BLDEXIT"
 FLM42100 - USER DEFINED DDNAME:  BLDMSGS FOR BUILD MESSAGE NOT ALLOCATED
 FLM42000 - BUILD PROCESSOR INITIATED - 11:38:20 ON 2011/06/15
 ***

 FLM42004 - INVALID INPUT PARAMETER
            GROUP                 - PRKRTE
            TYPE                  -  DB2PARM
            MEMBER                - PRKR10M
            USERID                - PRKRTE
            BUILD MODE            -  N
            BUILD SCOPE           - N
            ERROR LISTINGS ONLY   - N
            REPORT REQUEST        - Y
            PREFIX USERID         -  PRKRTE
 FLM41002 - ERROR OCCURRED DURING INITIALIZATION
 FLM46000 - BUILD PROCESSOR COMPLETED - 11:38:20 ON 2011/06/15
 FLM87107 - BUILD FAILED FOR MEMBER PRKR10M AT 11:38:20, CODE: 8
        +++ RC(8) +++
 ***






Code

Code:


/*REXX*/
TRACE i
CALL Init
CALL Alloc_ds
CALL Process
EXIT
INIT:

 PROJECT    = 'DEVSCLM'
 SLMLIB     = 'PRKRTE  '
 SLMLIB2    = '        '
 SLMLIB3    = '        '
 SLMLIB4    = '        '
 SLMTYP     = 'DB2PARM'
 SLMMEM     = 'PRKR10M '
 SERVICE    = 'BUILD   '
DDNAME     = 'BUILD   '
 USER       = 'PRKRTE  '
 ALL_HIER   = 'N'
 IMAC       = '        '
 PROF       = '        '
 CONFIRM    = 'N'
 MIX        = 'N'
 WS         = 'Y'
 PRESERVE   = 'PRKRTE'
 AUTHCODE   = ' '
 CHGCODE    = '    '
 SCLM_ID    = '    '
 MSGE       = 'BLDMSGS'
 RPT        = 'BLDREPT'
 LIST       = 'BLDLIST'
 EXT        = 'BLDEXIT'

FLMCMD_DDN.1 = 'BLDMSGS'
flmcmd_type.1 = 'MESSAGES'
FLMCMD_DDN.2 = 'BLDREPT'
flmcmd_type.2 = 'REPORT'
FLMCMD_DDN.3 = 'BLDEXIT'
FLMCMD_TYPE.3 = 'BLDEXIT'
flmcmd_attr.3 = 'DSORG(PS) RECFM(F,B) LRECL(160) SPACE(10,10)'
flmcmd_attr.3 = flmcmd_attr.3 'BLKSIZE(3200) MOD'
FLMCMD_DDN.4 = 'BLDLIST'
flmcmd_type.4 = 'LISTINGS'
flmcmd_type.0 = 4
RETURN

Alloc_ds:
/**********************************************************************/
/* Allocate data sets for SCLM build                                  */
/**********************************************************************/
flmds_rc = 0
Do l = 1 to flmcmd_type.0                       /* loop thru datasets */
    "ALLOC FI("flmcmd_ddn.l") DA(*)"

                                            /* already created        */
End                      /* end loop thru flmcmd_type                 */
Return

PROCESS :
/*"FLMCMD "SERVICE","PROJECT","SCLM_ID","SLMLIB",",
             SLMTYP","SLMMEM","USER","ALL_HIER","     ,
             CONFIRM","MIX","WS","                    ,
             PRESERVE","                              ,
             MSGE","RPT","LIST","EXT */
  "FLMCMD "SERVICE","PROJECT","SCLM_ID","SLMLIB",",
             SLMTYP","SLMMEM","USER","ALL_HIER","     ,
             CONFIRM","MIX","WS","                    ,
             PRESERVE","                              ,
             MSGE","RPT","LIST","EXT

Back to top
View user's profile Send private message
PeterHolland

Global Moderator


Joined: 27 Oct 2009
Posts: 2481
Location: Netherlands, Amstelveen

PostPosted: Wed Jun 15, 2011 3:31 pm
Reply with quote

Code:

/*"FLMCMD "SERVICE","PROJECT","SCLM_ID","SLMLIB",",
             SLMTYP","SLMMEM","USER","ALL_HIER","     ,
             CONFIRM","MIX","WS","                    ,
             PRESERVE","                              ,
             MSGE","RPT","LIST","EXT */


I miss a lot of /* and */ here.
Back to top
View user's profile Send private message
Nic Clouston

Global Moderator


Joined: 10 May 2007
Posts: 2454
Location: Hampshire, UK

PostPosted: Wed Jun 15, 2011 3:32 pm
Reply with quote

Another case of assuming somthing was done OK. You do a file allocation but do not check the return code. This message was written:
Code:
FLM42100 - USER DEFINED DDNAME:  BLDMSGS FOR BUILD MESSAGE NOT ALLOCATED

It does help to read ALL messages and check them out.
Back to top
View user's profile Send private message
Pandora-Box

Global Moderator


Joined: 07 Sep 2006
Posts: 1592
Location: Andromeda Galaxy

PostPosted: Wed Jun 15, 2011 4:44 pm
Reply with quote

Hi Nic,

Thanks for your response.

I had tried that aswell just pasting the snapshot of the TRACE

Code:


     53 *-*   "ALLOC FI("flmcmd_ddn.l") DA(*)"
        >L>     "ALLOC FI("
        >C>     "FLMCMD_DDN.1"
        >V>     "BLDMSGS"
        >O>     "ALLOC FI(BLDMSGS"
        >L>     ") DA(*)"
        >O>     "ALLOC FI(BLDMSGS) DA(*)"
 ***

     54 *-*   If Rc ¬= 0
        >V>     "0"
        >L>     "0"
        >O>     "0"
     60 *-*    /* already created        */
     61 *-*  End                      /* end loop thru flmcmd_type
    */

[/code]
Back to top
View user's profile Send private message
anatol

Active User


Joined: 20 May 2010
Posts: 121
Location: canada

PostPosted: Wed Jun 15, 2011 6:32 pm
Reply with quote

Yoy have wrong parameter for build processor.
BUILD SCOPE - N
Should be one of this:
C|F|R|U
Indicates the build mode (C=conditional, F=forced, R=report, U=unconditional)
Back to top
View user's profile Send private message
anatol

Active User


Joined: 20 May 2010
Posts: 121
Location: canada

PostPosted: Wed Jun 15, 2011 6:48 pm
Reply with quote

Sorry, BUILD MODE - N
not scope
Back to top
View user's profile Send private message
Pandora-Box

Global Moderator


Joined: 07 Sep 2006
Posts: 1592
Location: Andromeda Galaxy

PostPosted: Wed Jun 15, 2011 8:59 pm
Reply with quote

The parms passed were not in order i changed and it worked

Thanks all :-)
Back to top
View user's profile Send private message
View previous topic :: :: View next topic  
Post new topic   Reply to topic View Bookmarks
All times are GMT + 6 Hours
Forum Index -> IBM Tools

 


Similar Topics
Topic Forum Replies
No new posts Substitue for SCLM IBM Tools 6
No new posts SCLM -- not installed -- panel ISRNOSLM IBM Tools 4
No new posts SCLM error in RDz 9.1 All Other Mainframe Topics 11
No new posts SCLM Compiler options IBM Tools 1
No new posts SCLM Promotion All Other Mainframe Topics 2
Search our Forums:

Back to Top