topic Re: QVW folder backup in QlikView

QVW folder backup

srikantj — Wed, 25 Nov 2020 16:16:04 GMT

Hi,

I have folder with 15 dashboards occupying 15 gb .

i want to take backup of this folder without data

i want to reduce size of that folder

and i want all QVW s at once

Any suggestions

Re: QVW folder backup

zhadrakas — Wed, 11 Jan 2017 09:12:50 GMT

Have a look at Script Repsository from Rob Wunderlich

Search Recipes | Qlikview Cookbook

Re: QVW folder backup

srikantj — Wed, 11 Jan 2017 09:21:39 GMT

Wow ... thanks driller

Re: QVW folder backup

srikantj — Wed, 11 Jan 2017 09:29:29 GMT

when i run there are no files in ouput directory

only one log file

Re: QVW folder backup

srikantj — Wed, 11 Jan 2017 09:35:48 GMT

in the output directory one .qvm and .qvs came

how can i get back my qvw from that

Re: QVW folder backup

zhadrakas — Wed, 11 Jan 2017 10:32:02 GMT

Looks like the Script Repository automatically produces ..

- one file for your script (QVS)

- one file for your macro (QVM)

- one file for metadata (_META.TXT)

to backup the frontend (QVW) you Need to manually save the QVW's without data

or you can extend the Script/Macro of "Script Repository.qvw" to do this automatically too.

Re: QVW folder backup

srikantj — Wed, 11 Jan 2017 10:35:36 GMT

Any other way to do this .....

Re: QVW folder backup

zhadrakas — Wed, 11 Jan 2017 10:52:53 GMT

let me help you to get this to work.

Open Script Repository and open the Macro Editor.

Go to Function "Process Document" and replace it with

Sub ProcessDocument (qvwFullPath, outdir)
Dim Qv, doc
Rem Exit sub now if we are processing ourself
If IsInternal() AND (qvwFullPath = ActiveDocument.GetPathName) Then Exit Sub

set Qv = CreateObject("QlikTech.QlikView")
Set doc = Qv.OpenDocEx (qvwFullPath,0,false,"","","",true) ' Open the document, nodata
If typename(doc) <> "Doc" Then
log "***Error - " & qvwFullPath & " failed to open."
'Quit 1
Else
Call extractMeta(qvwFullPath, outdir & GetBaseName(qvwFullPath) & "_meta.txt")
Call extractScript(doc, outdir & GetBaseName(qvwFullPath) & ".qvs")
Call extractModule(doc, outdir & GetBaseName(qvwFullPath) & ".qvm")
activedocument.saveas outdir & GetBaseName(qvwFullPath) & "_Backup_without_data.qvw"
doc.CloseDoc
End If

' Be aware that if you don't quit Qv, errors in the document (External)
' may have left the Qv instance unusable.
'Qv.Quit ' Quit QV
'Wscript.Sleep 250
End Sub

After that the Script Repository will create a backup of your QVW with the prefix "_Backup_without_data.qvw"