Subversion Repositories DevTools

Rev

Rev 255 | Rev 3832 | Go to most recent revision | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 255 Rev 295
Line 117... Line 117...
117 
    connectRM(\$RM_DB, $opt_verbose);
 117 
    connectRM(\$RM_DB, $opt_verbose);
118 
 
 118 
 
119 
    # First get details from pv_id
 119 
    # First get details from pv_id
120 
    Message("Extract data");
 120 
    Message("Extract data");
121 
    my $m_sqlstr = "SELECT rt.RTAG_ID, rt.RTAG_NAME, rt.DESCRIPTION, pj.PROJ_ID, pj.PROJ_NAME, rt.OFFICIAL" .
 121 
    my $m_sqlstr = "SELECT rt.RTAG_ID, rt.RTAG_NAME, rt.DESCRIPTION, pj.PROJ_ID, pj.PROJ_NAME, rt.OFFICIAL" .
122 
                    " FROM RELEASE_TAGS rt, PROJECTS pj" .
 122 
                    " FROM RELEASE_MANAGER.RELEASE_TAGS rt, RELEASE_MANAGER.PROJECTS pj" .
123 
                    " WHERE rt.PROJ_ID = pj.PROJ_ID" .
 123 
                    " WHERE rt.PROJ_ID = pj.PROJ_ID" .
124 
                    " ORDER BY pj.PROJ_NAME";
 124 
                    " ORDER BY pj.PROJ_NAME";
125 
    my $sth = $RM_DB->prepare($m_sqlstr);
 125 
    my $sth = $RM_DB->prepare($m_sqlstr);
126 
    if ( defined($sth) )
 126 
    if ( defined($sth) )
127 
    {
 127 
    {