Hola de nuevo:
 
La definición de la DS es correcta y a mí también me aparecen valores extraños. 
Sin embargo, si te fijas en la descripción de los campos de la DS (en el 
InfoCenter) encontrarás las siguiente definición:
 
Password change date. The date the user's password was last changed, in *DTS 
(date-time stamp) format.
 
Me suena mucho el formato *DTS, si no recuerdo mal se codifica en binario la 
fecha y hora. En estos momentos no encuentro cómo convertir este formato a otro 
leible por los humanos. Si encuentro algo te lo diré.
 
Un saludo, 


Javier Mora 


________________________________

        De: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] En nombre de Sergio 
Bortolo
        Enviado el: miércoles, 29 de agosto de 2007 15:10
        Para: forum.help400
        Asunto: RE: API QSYRUSRI
        
        
        Javier:
        
                 aqui copio la DS completa. Tengo instalado V5R4
         
        Un Saludos y Gracias!!!!
         
        D RCVVAR          DS                  
        D* FORMAT USRI0300                    
        D  BYTRTN                       10I 0 
         * Bytes returned                     
        D  BYTVAL                       10I 0 
         * Bytes available                    
        D  OUSRNM                 9     18    
         * User profile name                  
        D  PRVSGN                19     31    
        d  cent                  19     19    
        d  dia                   20     25    
        d  hora                  26     31    
         * Previous sign-on date and time     
        D  RSV1                  32     32       
         * Reserved                              
        D  SGNATE                       10I 0    
         * Sign-on attempts not valid            
        D  STATUS                37     46       
         * Status                                
        D  PASCHD                47     54a      
         * Password change date                  
        D  NOPWDI                55     55       
         * No password indicator                 
        D  RSV2                  56     56       
         * Reserved                              
        D  PASEXD                       10I 0    
         * Password expiration interval          
        D  DPASEX                61     68       
         * Date password expires                 
        D  DUPAEX                       10I 0    
         * Days until password expires           
        D  SETPEX                73     73       
         * Set password to expire                
        D  USRCLN                74     83       
         * User class name                    
        D  SPCAUT                84     98    
         * Special authorities                
        D  GRPRNA                99    108    
         * Group profile name                 
        D  OWNER                109    118    
         * Owner                              
        D  GRPAUT               119    128    
         * Group authority                    
        D  ASSLEV               129    138    
         * Assistance level                   
        D  CURLIB               139    148    
         * Current library name               
        D  INMENA               149    158    
         * Initial menu name                  
        D  INMELI               159    168    
         * Initial menu library name          
        D  INPRNA               169    178    
         * Initial program name               
        D  INPRLI               179    188    
         * Initial program library name       
        D  LIMCAP               189    198    
         * Limit capabilities                 
        D  TXTDES               199    248    
         * Text description                   
        D  DSPSGI               249    258    
         * Display sign-on information        
        D  LIDESE               259    268    
         * Limit device sessions              
        D  KEYBUF               269    278    
         * Keyboard buffering                 
        D  RSV3                 279    280    
         * Reserved                           
        D  MAALST               281    284B 0 
         * Maximum allowed storage            
        D  STGUSE               285    288B 0 
         * Storage used                       
        D  JISCPR               289    289    
         * Highest scheduling priority        
        D  JOBDNA               290    299    
         * Job description name                 
        D  JOBDLI               300    309      
         * Job description library name         
        D  ACCCOD               310    324      
         * Accounting code                      
        D  MSGQNA               325    334      
         * Message queue name                   
        D  MSGQLI               335    344      
         * Message queue library name           
        D  MSGQDM               345    354      
         * Message queue delivery method        
        D  RSV4                 355    356      
         * Reserved                             
        D  MSGQSE               357    360B 0   
         * Message queue severity               
        D  OUTQNA               361    370      
         * Output queue name                    
        D  OUTQLI               371    380      
         * Output queue library name            
        D  PRTDEV               381    390      
         * Print device                         
        D  SPCENV               391    400             
         * Special environment                         
        D  ATTKNA               401    410             
         * Attention-key-handling program name         
        D  ATTKLI               411    420             
         * Attention-key-handling program library name 
        D  LANID                421    430             
         * Language ID                                 
        D  COREID               431    440             
         * Country or region ID                        
        D  CARCOD               441    444B 0          
         * Character code set ID                       
        D  USROPT               445    480             
         * User options                                
        D  SRTSEN               481    490             
         * Sort sequence table name                    
        D  SRTSEL               491    500             
         * Sort sequence table library name            
        D  OBJAUV               501    510             
         * Object auditing value                       
        D  OBACAU               511    574   
         * User action audit level           
        D  GRPATY               575    584   
         * Group authority type              
        
        

________________________________

                Date: Wed, 29 Aug 2007 13:49:23 +0200
                From: [EMAIL PROTECTED]
                To: forum.help400@listas.combios.es
                Subject: RE: API QSYRUSRI
                
                
                Hola Sergio:
                 
                ¿Puedes enviar el trozo de código donde defines el campo en la 
DS? O la DS entera.
                ¿En que versión estás?
                 
                Un saludo, 
                
                Javier Mora 
                
                 
                 


________________________________

                        De: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED] En 
nombre de Sergio Bortolo
                        Enviado el: miércoles, 29 de agosto de 2007 13:21
                        Para: forum.help400
                        Asunto: API QSYRUSRI
                        
                        

                        Estimados:
                         
                        estoy desarrollando una aplicacion en la cual necesito 
recuperar datos del perfil del usuario, para tal fin estoy utilizando el API 
QSYRUSRI.
                         
                        Dentro del programa estoy utilizando una DS donde estan 
las variables que contienen los datos. 
                         
                        El problema surge con algunos campos que tienen fechas 
y seguin el manual del API de IBM dice que a esos campos hay que definirlos 
como CHAR(8), como por ejemplo:
                         
                        
46       2E      CHAR(8)         Password change date   

                         
                        Cuando visualizo el contenido de esta variable 
encuentro que tiene basura:
                         
                        PASCHD = 'ý¥ÙIV#¢' 
                         
                        He probado en definirla de distintas maneras, pero el 
resultado no es el esperado.
                         
                        Segun el manual esta es la definición de la variable:
                         
                        Password change date. The date the user's password was 
last changed, in *DTS (date-time stamp) format.
                         
                        Alguien tiene alguna idea de que se puede hacer para 
que recupere el varlor en forma correcta????
                         
                        Gracias por lo que puedan aportar.
                         
                        Saludos a todos.
                         
                        Sergio
                        
                         
                        
                        
________________________________

                        Descubre Live.com - tu propia página de inicio, 
personalizada para ver rápidamente todo lo que te interesa en un mismo sitio. 
todo en el mismo sitio. <http://www.live.com/getstarted>  


________________________________

        Comunícate al instante con Windows Live Messenger Windows Live 
Messenger 
<http://imagine-msn.com/messenger/launch80/default.aspx?locale=es-ar&source=joinmsncom/messenger>
  

__________________________________________________
Forum.HELP400 es un servicio m&amp;#225;s de NEWS/400.
&amp;#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

Responder a