Utilizamos cookies propias y de terceros para mejorar la experiencia de navegación, y ofrecer contenidos y publicidad de interés.
Al continuar con la navegación entendemos que se acepta nuestra política de cookies.
Iniciar sesión Cerrar
Correo:
Contraseña:
Entrar
Recordar sesión en este navegador
Iniciar sesiónIniciar sesiónCrear cuentaCrear cuenta

AS/400 - me Inicio en ILERPG

  Imprimir  
Vista:

me Inicio en ILERPG

Publicado por Damaris Beard (2 intervenciones) el 19/05/2009 02:43:52
hola para los mas avanzados quiero me si pueden me envien la informacion del signigicado de subdvr y como se usa
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

RE:me Inicio en ILERPG

Publicado por Sergio (74 intervenciones) el 19/05/2009 15:38:14
Hola Damaris, la instruccion es SUBDUR y te sirve para calcular un tiempo.

aqui te anexo la estructura, espero te sea de utilidad.

SUBDUR Examples
Figure 325. SUBDUR Operations

CL0N01Factor1+++++++Opcode(E)+Factor2+++++++Result++++++++Len++D+HiLoEq....
* Determine a LOANDATE which is xx years, yy months, zz days prior to
* the DUEDATE.
C DUEDATE SUBDUR XX:*YEARS LOANDATE
C SUBDUR YY:*MONTHS LOANDATE
C SUBDUR ZZ:*DAYS LOANDATE
* Add 30 days to a loan due date
*
C SUBDUR -30:*D LOANDUE
* Calculate the number or days between a LOANDATE and a DUEDATE.
C LOANDATE SUBDUR DUEDATE NUM_DAYS:*D 5 0
* Determine the number of seconds between LOANDATE and DUEDATE.
C LOANDATE SUBDUR DUEDATE NUM_SECS:*S 5 0
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:me Inicio en ILERPG

Publicado por damaris perez (2 intervenciones) el 26/05/2009 19:13:39
gracias creo estoy en via de solucion de mi programa espero si tienes mas rutina interesante me la continue enviando
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar