Hola:
¿has revisado la lista de bibliotecas del origen de datos ODBC myas400 ?
2007/1/4, Gerardo Santillana <[EMAIL PROTECTED]>:
*Saludos a todos*
**
* Estoy llamando a un programa del 400 desde una pagina web, esto es parte
del programa*
Dim cnt
Dim rs
DIM fld
Dim cmd
dim nfld
cmdtxt="call mylib.oc800b3 ('" & zitem & "')"
Set cnt = Server.CreateObject("ADODB.Connection")
cnt.open "dsn=myas400", "user", "password"
set cmd=cnt.execute(cmdtxt)
Set rs = cnt.execute("Select * from mylib.oc800wk")
*y al checar el trabajo QZDASOINIT en el joblog veo este mensaje de error,
*
Display Job Log
System: DEV
Job . . : QZDASOINIT User . . : QUSER Number . . . : 177825
!
Job 177825/QUSER/QZDASOINIT started on 01/03/07 at 16:04:55 in subsystem
QUSRWRK in QSYS. Job entered system on 01/03/07 at 16:04:55.
Printer device TESTQ not found.
Errors on CHGJOB command for job 177825/QUSER/QZDASOINIT.
Printer device TESTQ not found.
ACGDTA for 177825/QUSER/QZDASOINIT not journaled; reason 1.
Job changed successfully; however errors occurred.
User WEBUSER from client XX.XX.X.XX connected to server.
Library *SYSLIBL not found.
*Al presionar F1 sobre el mensaje "Library *SYSLIB not found" esto es lo
que me muestra*
Additional Message Information !
Message ID . . . . . . : CPF2110 Severity . . . . . . . : 40
Message type . . . . . : Escape
Date sent . . . . . . : 01/04/07 Time sent . . . . . . : 10:35:01
Message . . . . : Library *SYSLIBL not found.
Cause . . . . . : Library *SYSLIBL does not exist in the auxiliary storage
pools (ASPs) accessed by the command or API.
Recovery . . . : Either create the library (CRTLIB command), correct the
library name, or make the primary or secondary auxiliary storage pool
(ASP)
where storage for the library is allocated accessible to the command or
API.
Then try the request again. !
To make the ASP accessible, check that the ASP device has the status
required by the command or API (WRKCFGSTS command). Then, if the command
or
API has an auxiliary storage pool parameter, use it to specify the ASP.
Otherwise, set the ASP group containing the ASP as the ASP group for the
current thread (SETASPGRP command).
*Alguna pista?... Gracias*
Gerardo Santillana
------------------------------
*Join Excite! - http://www.excite.com*
The most personalized portal on the Web!
__________________________________________________
Forum.HELP400 es un servicio m&#225;s de NEWS/400.
&#169; Publicaciones Help400, S.L. - Todos los derechos reservados
http://www.help400.es
_____________________________________________________
Para darte de baja visita la siguente URL:
http://listas.combios.es/mailman/listinfo/forum.help400
--
Mi blog sobre as400
http://www.ajut400.com
__________________________________________________
Forum.HELP400 es un servicio m&#225;s de NEWS/400.
&#169; Publicaciones Help400, S.L. - Todos los derechos reservados
http://www.help400.es
_____________________________________________________
Para darte de baja visita la siguente URL:
http://listas.combios.es/mailman/listinfo/forum.help400
