Invoking Relection File Transfer from Quick

[Jim Hamer]

OpenVMS PH 7.10.F2, Reflection 7.00.228 P10

I just read the Application Development tip in the latest Supportlink (Vol. 
9 Number 4, page 57) that tells about starting Reflection Transfer from 
Quick. I have done this on numerous occasions, but always from a command 
procedure with lots of ugly, ugly DCL code. The code in the example is nice 
and neat and I would like to make this work in VMS. I can get Alphalk2 
started, but it will not accept my command to invoke the transfer dialog box.

Here is my code.

CANCEL CLEAR
SET VERIFY ERRORS

SCREEN TEST_MENU MENU

; Coded from Cognos Supportlink Vol 9 Number 4, Page 57 Oct-Dec 99.
TEMP T-27 INT*2 INITIAL 27 RESET AT STARTUP
TEMP T-ESC CHAR*2 INITIAL CHAR(T-27)[2:1] RESET AT STARTUP
TEMP T-TRAN-COMM CHAR*60 INITIAL &
         'WRITE SYS$OUTPUT "' + T-ESC + '&oFsend {} to {}"' &
         RESET AT STARTUP

SKIP TO 5

TITLE "01 TEST FILE TRANSFER"

PROCEDURE DESIGNER 01
BEGIN
         RUN COMMAND T-TRAN-COMM
         RUN COMMAND "ALPHALK2"
END

What I get is this:

(#@#@#@)

I recognize this as output from Alphalk2. I get this 5 times and then the 
control returns to my quick program. I suspect that the escape sequence is 
incorrect. If I were to code this like my command procedure, the command 
might look like this:

TEMP T-TRAN-COMM CHAR*60 INITIAL &
         'WRITE SYS$OUTPUT "' + T-ESC + 'P1234;1{send {} to {}' + T-ESC + 
'\"' &
         RESET AT STARTUP

But this gives me the same result.
Does anybody know the correct way to this?

Jim Hamer


Jim Hamer                                      Contract System Analyst
Dairy Farmers of Ontario                       (416) 489-3298
Information Systems Division                   hamer@inforamp.net
(905) 821-8970                                 Toronto, Ontario, Canada
jhamer@milk.org                                http://www.inforamp.net/~hamer/
= = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
Subscribe: "subscribe powerh-l" in message body to majordomo@lists.swau.edu
Unsubscribe: "unsubscribe powerh-l" in message to majordomo@lists.swau.edu
This list is closed, thus to post to the list, you must be a subscriber.