Web Only Version Pain

We seem to be having an issue with old “web only” versions.  There are times when the “web only” version causes the other version to not egen correctly.  So, below is the SQL that can be used to select the “web only” versions.

SELECT count(*) FROM COPD811/F983051
WHERE VRVCC2='1'             

If you want to be more precise, you can grab the “web only” versions that have been executed prior to a certain date by using the VRVED field and the six digit date which can be found on the e1 dates page.

Backup All SQL Server Databases

I came across this script to backup all SQL Server databases:

DECLARE @name VARCHAR(50) -- database name
DECLARE @path VARCHAR(256) -- path for backup files
DECLARE @fileName VARCHAR(256) -- filename for backup
DECLARE @fileDate VARCHAR(20) -- used for file name

SET @path = 'E:\Backups\Dynamics' 

SELECT @fileDate = CONVERT(VARCHAR(20),GETDATE(),112)

DECLARE db_cursor CURSOR FOR
SELECT name
FROM master.dbo.sysdatabases
WHERE name NOT IN ('master','model','msdb','tempdb') 

OPEN db_cursor
FETCH NEXT FROM db_cursor INTO @name  

WHILE @@FETCH_STATUS = 0
BEGIN
       SET @fileName = @path + @name + '_' + @fileDate + '.BAK'
       BACKUP DATABASE @name TO DISK = @fileName 

       FETCH NEXT FROM db_cursor INTO @name
END  

CLOSE db_cursor
DEALLOCATE db_cursor

Add Record To OCM – F986101

The other day, I had a need to insert many records into the OCM (F986101).  So I set out to create a quick SQL statement that would serve that purpose.  Below is what I came up with:

INSERT INTO SY811/F986101                         

VALUES('DV811',0,'OBJECTNAME','LOCAL','','*PUBLIC',  

'*ALL','P','','H95','AV','SQL','BSFN',            

'USERNAME','','','',0,'',0,'','','','')            

Remember � you may have to make entries in both the SY811 and SVM811 F986101 files.

Access To Environments

To find out what users or groups have access to a certain environment run the following SQL:

select * from sy811/f0093
where llll='<enviornment>'    

To find out what environments a user or group has access to run the following SQL:

select * from sy811/f0093
where lluser='<userid>'