Unbalanced parenthesis.
Should be:
SET VAR vcmd = (('SET VAR vprot VARCHAR =
[')+CHAR(39)+.vprot+'.rtf'+CHAR(39)+']')
&vcmd
Emmitt Dove
Manager, Converting Applications Development
Evergreen Packaging, Inc.
[email protected]
(203) 214-5683 m
(203) 643-8022 o
(203) 643-8086 f
[email protected]
From: [email protected] [mailto:[email protected]] On Behalf Of Emmitt Dove
Sent: Tuesday, August 24, 2010 18:21
To: RBASE-L Mailing List
Subject: [RBASE-L] - Re: converting DOC2RTF
Try this:
SET VAR vcmd = ('SET VAR vprot VARCHAR =
[')+CHAR(39)+.vprot+'.rtf'+CHAR(39)+']')
&vcmd
Substitute this for the two commented lines in your loop; remove the one
where you spell it out. Also, take heed of Mike's remarks about declaring
and typing variables outside the WHILE.
Emmitt Dove
Manager, Converting Applications Development
Evergreen Packaging, Inc.
[email protected]
(203) 214-5683 m
(203) 643-8022 o
(203) 643-8086 f
[email protected]
From: [email protected] [mailto:[email protected]] On Behalf Of Luc
Delcoigne
Sent: Tuesday, August 24, 2010 16:11
To: RBASE-L Mailing List
Subject: [RBASE-L] - Re: converting DOC2RTF
Emmitt,
I still have got a problem with the uploading of the file content in the
BLOB field.
I made the following code :
'
WHENEVER NOT FOUND GOTO errors
CLOSE cur1
DROP CURSOR cur1
DECLARE cur1 CURSOR FOR SELECT consultnummer, punieknummer FROM consult
WHERE punieknummer = '460114RC00' ORDER BY consultnummer
OPEN cur1
FETCH cur1 INTO vconsult IND vi1, vpunieknummer IND vi2
SET VAR vcount INTEGER=0
WHILE SQLCODE <>100 THEN
SET VAR vcount = (.vcount+1)
--SET VAR vprot text = ('c:\protocol\' + .vpunieknummer + '\' + .vconsult)
--SET VAR vprot1 varchar = [.vprot + '.rtf']
set var vprot1 varchar = ['c:\protocol\460114RC00\01080222.rtf']
UPDATE consult SET protocolblob = .vprot1 WHERE consultnummer = .vconsult
FETCH cur1 INTO vconsult IND vi1, vpunieknummer IND vi2
ENDWHILE
CLOSE cur1
DROP CURSOR cur1
RETURN
LABEL errors
CLOSE cur1
DROP CURSOR cur1
RETURN
'
When I put vprot1 = to the filename itself, all goes well and the file
contents is loaded into the BLOB.
However, when I use a variable 'set var vprot1 varchar = .var' I get a
syntax error.
What am I doing wrong here ?
Luc D.
From: Emmitt <mailto:[email protected]> Dove
Sent: Tuesday, August 24, 2010 8:50 PM
To: RBASE-L Mailing List <mailto:[email protected]>
Subject: [RBASE-L] - Re: converting DOC2RTF
You can load the content of any external file into an appropriately-typed
variable using that technique. Just remember, if the file is
character-based, use a varchar; if it is binary, use a varbit.
Emmitt Dove
Manager, Converting Applications Development
Evergreen Packaging, Inc.
[email protected]
(203) 214-5683 m
(203) 643-8022 o
(203) 643-8086 f
[email protected]
From: [email protected] [mailto:[email protected]] On Behalf Of Luc
Delcoigne
Sent: Tuesday, August 24, 2010 13:09
To: RBASE-L Mailing List
Subject: [RBASE-L] - Re: converting DOC2RTF
Emmitt,
I owe you my sincere apologies.
YES, your code works....It's all in the square brackets, isn't it !
I omitted them in my first trial.
Sorry about that.
Thanks a lot. I think this will be the final part of my 'import' problem
solution.
Luc D.
From: Emmitt <mailto:[email protected]> Dove
Sent: Tuesday, August 24, 2010 6:21 PM
To: RBASE-L <mailto:[email protected]> Mailing List
Subject: [RBASE-L] - Re: converting DOC2RTF
Luc,
SET VAR vx VARCHAR = ['filename.rtf']
UPDATE tablename SET columnname = .vx WHERE .
Emmitt Dove
Manager, Converting Applications Development
Evergreen Packaging, Inc.
[email protected]
(203) 214-5683 m
(203) 643-8022 o
(203) 643-8086 f
[email protected]
From: [email protected] [mailto:[email protected]] On Behalf Of Luc
Delcoigne
Sent: Tuesday, August 24, 2010 10:24
To: RBASE-L Mailing List
Subject: [RBASE-L] - Re: converting DOC2RTF
Marco,
I solved 50% of the problem.
the wscript cannot be run with parameters in Rbase when using the
Launch-command.
However it works very well when using the ZIP ROLLOUT command.
Here I can pass the variables and retrieve the .doc and convert it to .rtf
in the same folder.
Now all I have to do is find a way to automatically load this RTF in the
BLOB field of my Rbase table.
Any thoughts how to do this ?
Luc D.
From: Marco Groeneveld <mailto:[email protected]>
Sent: Tuesday, August 24, 2010 2:56 PM
To: Luc <mailto:[email protected]> Delcoigne
Subject: Re: converting DOC2RTF
maakt me niet zo veel uit. Anders beiden. Mogelijk dat dit te combineren
valt. Tenzij je ook in Rbase het pad naar de doc files hebt (oude methode in
Access)
----- Original Message -----
From: Luc Delcoigne <mailto:[email protected]>
To: Marco Groeneveld <mailto:[email protected]>
Sent: Tuesday, August 24, 2010 2:54 PM
Subject: Re: converting DOC2RTF
Wil je de access tabel of de Rbase tabel ?
From: Marco Groeneveld <mailto:[email protected]>
Sent: Tuesday, August 24, 2010 2:51 PM
To: Luc <mailto:[email protected]> Delcoigne
Subject: Re: converting DOC2RTF
is punieknummer het id van de record in access / rbase of heb je nog een
ander id met oplopend nr ?
heb je anders de tabel voor me dan kan ik het een en ander nabootsen (een
eenvoudige voorbeeld met bv 3 record is ook prima.
----- Original Message -----
From: Luc Delcoigne <mailto:[email protected]>
To: Marco Groeneveld <mailto:[email protected]>
Sent: Tuesday, August 24, 2010 2:49 PM
Subject: Re: converting DOC2RTF
Marco,
die tabel heb ik zowel in Access als in Rbase, telkens met het punieknummer
en het consultnummer.
De vraag is hoe kan ik dat optimaal optimaliseren door de tabel Consult te
doorlopen en de rtf 's automatisch te laden in de BLOB van het juist record
van de Consult-tabel in Rbase.
Luc D.
From: Marco <mailto:[email protected]> Groeneveld
Sent: Tuesday, August 24, 2010 2:34 PM
To: Luc <mailto:[email protected]> Delcoigne
Subject: Re: converting DOC2RTF
Luc,
Wat heb je nu in Access staan ? kan daar niet iets worden voorbewerkt zodat
er al een duidelijke tabel aanwezig is, waarbij de patientid and consultid
bekend is, dan hoeft er slechts het bijbehorende doc (nu rtf) te worden
opgezocht en bewaard in R:BASE.
Marco
----- Original Message -----
From: Luc Delcoigne <mailto:[email protected]>
To: Marco Groeneveld <mailto:[email protected]>
Sent: Tuesday, August 24, 2010 2:21 PM
Subject: Fw: converting DOC2RTF
From: Luc <mailto:[email protected]> Delcoigne
Sent: Tuesday, August 24, 2010 2:14 PM
To: [email protected]
Subject: Fw: converting DOC2RTF
Marco and Mike,
I tried the vbs script and it works indeed.
This solves already part of my problem.
Marco, in your example, did you load the rtf-files manually into the BLOB ?
the only problem is that the script has to be placed in the same directory
as the files to convert, although the code apparently could let me pass an
argument.
But when run with the Launch command in Rbase, it doesn't accept parameters.
What I'm looking for is the following:
1. All my radiology reports are in one directory 'c:\Protocol'
2. For each patient a folder is created in this directory. The name of the
folder is the PatID of the patient in the database ..E.G.
c:\Protocol\600829DL00
3. Each reports is named according to the consultnummer of that patient and
is placed in the correct patient-folder. e.g.
c:\Protocol\600829DL00\10082401.doc
I need to find a way to loop through the table consult. In this table I
have a Patid and a consultnummer on each row.
With those two parameters I am able to retrieve each associated report.
4. Then I have to run the Doc2rtf vbs on the report of each patient-folder
in the Protocol-directory.
5. Once I have the converted report I have to load it automatically into the
ProtocolBLOB in the Consult-table.
So I have to be able to loop through the Consult-table, put the patID and
consultnummer into a variable, check if there is an associated folder and
file based on those variables, run the Doc2Rtf on the report of that
consultation and update it in the BLOB of the consult-table with the right
consultnummer.
Luc D.
