This website requires Javascript to function properly. Please go to the setting of your web browser and enable Javascript for this website.

Ad by

予人玫瑰，手有余香：加拿大新天地工作移民诚聘求职顾问&行业导师！

Ad by

予人玫瑰，手有余香：加拿大新天地工作移民诚聘求职顾问&行业导师！

please help me to solve this problem, I am tring to call a cl program on AS/400 from Window platform, I used two methods, however, none of them works

42channel(Channel)

method 1: I use addtrgPF to a file, which invoke the cl program, when a record is inserted in the file, the cl program is supposed to be invoked.

result 1: when I inserted a record to a file in AS400 platform , the CL program could be invoked properly, however, when the inserting is done from window platform, the record has been inserted into the file, however, the cl program can not be invoked. I tried two way to insert the record from window, one is to append member to that file, the other is to exactly using the SQL insert statement by using VB.

Method2: I called the stored procedure to call the cl program from windown platform by using VB, it does not work.
my part code is as following:

(#2596994@0)
Last Updated: 2005-11-8
This post has been archived. It cannot be replied.

Report

Replies, comments and Discussions:

工作学习 / 专业知识杂谈 / please help me to solve this problem, I am tring to call a cl program on AS/400 from Window platform, I used two methods, however, none of them works -42channel(Channel); 2005-11-8 {706} (#2596994@0)
method 1: I use addtrgPF to a file, which invoke the cl program, when a record is inserted in the file, the cl program is supposed to be invoked.

result 1: when I inserted a record to a file in AS400 platform , the CL program could be invoked properly, however, when the inserting is done from window platform, the record has been inserted into the file, however, the cl program can not be invoked. I tried two way to insert the record from window, one is to append member to that file, the other is to exactly using the SQL insert statement by using VB.

Method2: I called the stored procedure to call the cl program from windown platform by using VB, it does not work.
my part code is as following:

continue... -42channel(Channel); 2005-11-8 {564} (#2596996@0)
Dim conn As Connection
Dim cmd As Command
Dim Stmt As String

Set conn = New ADODB.Connection
Set cmd = New ADODB.Command

conn.Open "DSN=DOWNLOADS;Uid=***;PWD=***"
cmd.CommandTimeout = 110
cmd.ActiveConnection = conn

'Stmt = "insert into yao.trgfile (addin) values('n')"
Stmt = "CALL QSYS.QCMDEXC1 ('call yao/addlib', 0000000015.00000)"

cmd.Prepared = True
cmd.CommandText = Stmt
cmd.Execute

conn.Close
Set cmd = Nothing
Set conn = Nothing
continue.. -42channel(Channel); 2005-11-8 {399} (#2597006@0)
the insert statement works well, however the QSYS.QCMDEXC statement does not work, it is said "syntax error or access viloation"

My questiones:

Method1 : why I can not invoke the cl program from window platform even the record has been inserted?

Method2: I could not figure out any syntax error from theshort statement, does it mean other further meaning?

I appreciate any suggestion!
method1: check JOBD of default USRPRF used, make sure LIBL is correct -mssg(Wild_Killer); 2005-11-8 (#2597054@0)

could you please explain that clearly? I do not use the *libl, when I did addpftrg command, I specified the file and invoked program in my library instead of *libl. do you mean I have to use the *libl -42channel(Channel); 2005-11-8 (#2597131@0)

talk to sys admin if you have no authority to change it. -mssg(Wild_Killer); 2005-11-8 (#2597141@0)

I can do that, however, I have not got your point, could you explain clearly? I very appreciate that. -42channel(Channel); 2005-11-8 (#2597161@0)

every active job has USRPRF / JOBD / LIBL. look up SPLF in outq QEZJOBLOG -mssg(Wild_Killer); 2005-11-8 (#2597171@0)

@Sacramento

please help me to solve this problem, I am tring to call a cl program on AS/400 from Window platform, I used two methods, however, none of them works

Replies, comments and Discussions:

More Topics