RE: Duda en API CEEDYMK

[Francisco Gor]

Title: Mensaje

 En vez de buscar la API en tu sistema comprueba que tu compilaci�n es coherente con las restricciones de la nota adjunta. Toda la informaci�n adicional que necesitas est� en el Information Center.

If you use ILE RPG, you can call functions that require operational descriptors using either of the following approaches.

C                   CALLB(D)   'CEExxxx'
C                   PARM                  parm1
C                   PARM                  parm2
                    ...
C                   PARM                  parmn
C                   PARM                  fc

or

D CEExxxx         PR                  OPDESC
D   parm1
D   parm2
D   ...
D   parmn
D   fc

C                   CALLP     CEExxxx(parm1 : parm2 :
C                                     ... : parmn : fc)

Note: If you use ILE RPG to call ILE CEE APIs, the following restriction applies:

• APIs cannot be used if DFTACTGRP(*YES) is specified on the CRTBNDRPG CL command. ILE static binding is not available when a program is created with DFTACTGRP(*YES). This means that your program cannot contain a CALLB operation. (Also, you cannot use the BNDDIR or ACTGRP parameters when creating this program.) Specifying DFTACTGRP(*YES) during the creation of an ILE RPG program means that the program will always run in the default activation group. See the ILE RPG for AS/400 Programmer's Guide for more information about the CRTBNDRPG CL command and the DFTACTGRP parameter.

-----Mensaje original-----
De: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED]]En nombre de Alfredo Reyes
Enviado el: viernes 27 de septiembre de 2002 5:14
Para: Forum 400 Europeo
Asunto: Duda en API CEEDYMK

Hola a todos:

 

    Hace algunas semanas, Alex Corretge env�o un ejemplo para calcular el nombre del d�a de la semana de una fecha espec�fica basado en la API CEEDYMK.

 

    No encuentro dicha API en el sistema, ser� alguna utiler�a que hay que crear o ser� una funci�n del lenguaje C ?

 

    Adjunto el email para una mayor referencia.

 

==================================================================

Una vez tienes la fecha Lilian, d�as que van desde que se implant�
calendario Gregoriano por el que nos regimos, el 14 octubre 1582 creado por
el se�or Aloisius Lilius, llama a la API CEEDYWK de la siguiente manera

 

d    d_Data                       d   DatFmt(*Iso)
d*
d  j_Lilian       s             10i 0
d  j_DSetmana     s             10i 0
d  j_FeedBack     s             12a   Varying
d  j_DataInici    s               d   DatFmt(*ISO) Inz(d'1582-10-14')

 

c*
c* Recuperem la data Lilian
c     d_Data        SubDur    d'1582-10-14' j_Lilian:*D
c*
c* Cridem a l'API que ens retorna el dia de la setmana
c                   CallB     'CEEDYWK'
c                   Parm                    j_Lilian
c                   Parm                    j_DSetmana
c                   Parm                    j_FeedBack

 

Si j_DSetmana es 0 quiere decir que han ocurrido errores.
1 Domingo, 2 Lunes, 3 Martes, etc....

==================================================================

 

    Agradezco de antemano su ayuda.

 

   Jos� Alfredo Reyes Moncayo
Sistemas de Computaci�n Administrativa 
          Email: [EMAIL PROTECTED]