Rocksolid Light

Welcome to novaBBS (click a section below)

mail  files  register  newsreader  groups  login

Message-ID:  

news: gotcha

computers / comp.sys.ibm.as400.misc / Re: Current date in RPGLE

SubjectAuthor
* Current date in RPGLESharad Khare
+- Re: Current date in RPGLEJohn McCann
`* Re: Current date in RPGLEJon Paris
 `- Re: Current date in RPGLESharad Khare

1
Current date in RPGLE

<c0a1a887-142c-448a-b0a2-9872cce5204dn@googlegroups.com>

  copy mid

https://www.novabbs.com/computers/article-flat.php?id=68&group=comp.sys.ibm.as400.misc#68

  copy link   Newsgroups: comp.sys.ibm.as400.misc
X-Received: by 2002:ad4:5246:0:b0:532:118f:25d2 with SMTP id s6-20020ad45246000000b00532118f25d2mr1244070qvq.112.1673245494046;
Sun, 08 Jan 2023 22:24:54 -0800 (PST)
X-Received: by 2002:a05:6871:4585:b0:15b:8669:2375 with SMTP id
nl5-20020a056871458500b0015b86692375mr199483oab.127.1673245493649; Sun, 08
Jan 2023 22:24:53 -0800 (PST)
Path: i2pn2.org!i2pn.org!usenet.blueworldhosting.com!feed1.usenet.blueworldhosting.com!peer01.iad!feed-me.highwinds-media.com!news.highwinds-media.com!news-out.google.com!nntp.google.com!postnews.google.com!google-groups.googlegroups.com!not-for-mail
Newsgroups: comp.sys.ibm.as400.misc
Date: Sun, 8 Jan 2023 22:24:53 -0800 (PST)
Injection-Info: google-groups.googlegroups.com; posting-host=122.161.69.144; posting-account=w1guXwoAAADA7eZgnoQOu32BFcEQTy_b
NNTP-Posting-Host: 122.161.69.144
User-Agent: G2/1.0
MIME-Version: 1.0
Message-ID: <c0a1a887-142c-448a-b0a2-9872cce5204dn@googlegroups.com>
Subject: Current date in RPGLE
From: sharadkh...@gmail.com (Sharad Khare)
Injection-Date: Mon, 09 Jan 2023 06:24:54 +0000
Content-Type: text/plain; charset="UTF-8"
X-Received-Bytes: 1286
 by: Sharad Khare - Mon, 9 Jan 2023 06:24 UTC

Hi All,

I'm trying to get current date using *date in RPGLE but when program called via job it takes job date some time jobs is not restarted same day it shows old date not the current date.

Can you please suggest how to get current date from Job and integrative program run

Thanks!
Sharad

Re: Current date in RPGLE

<ddae635c-2036-44dc-8b9f-f2d0ab0df7fbn@googlegroups.com>

  copy mid

https://www.novabbs.com/computers/article-flat.php?id=69&group=comp.sys.ibm.as400.misc#69

  copy link   Newsgroups: comp.sys.ibm.as400.misc
X-Received: by 2002:ac8:6b52:0:b0:3a8:2e9f:6ae9 with SMTP id x18-20020ac86b52000000b003a82e9f6ae9mr1581374qts.293.1673259122932;
Mon, 09 Jan 2023 02:12:02 -0800 (PST)
X-Received: by 2002:a05:6820:1011:b0:494:ca16:c7ff with SMTP id
v17-20020a056820101100b00494ca16c7ffmr2788136oor.75.1673259122703; Mon, 09
Jan 2023 02:12:02 -0800 (PST)
Path: i2pn2.org!i2pn.org!usenet.blueworldhosting.com!feed1.usenet.blueworldhosting.com!peer01.iad!feed-me.highwinds-media.com!news.highwinds-media.com!news-out.google.com!nntp.google.com!postnews.google.com!google-groups.googlegroups.com!not-for-mail
Newsgroups: comp.sys.ibm.as400.misc
Date: Mon, 9 Jan 2023 02:12:02 -0800 (PST)
In-Reply-To: <c0a1a887-142c-448a-b0a2-9872cce5204dn@googlegroups.com>
Injection-Info: google-groups.googlegroups.com; posting-host=195.102.184.200; posting-account=VvmP5AoAAADulkudbUCIOsPdK9nwQOjo
NNTP-Posting-Host: 195.102.184.200
References: <c0a1a887-142c-448a-b0a2-9872cce5204dn@googlegroups.com>
User-Agent: G2/1.0
MIME-Version: 1.0
Message-ID: <ddae635c-2036-44dc-8b9f-f2d0ab0df7fbn@googlegroups.com>
Subject: Re: Current date in RPGLE
From: john_j_m...@yahoo.co.uk (John McCann)
Injection-Date: Mon, 09 Jan 2023 10:12:02 +0000
Content-Type: text/plain; charset="UTF-8"
X-Received-Bytes: 1281
 by: John McCann - Mon, 9 Jan 2023 10:12 UTC

Hi Sharad

Can you use %DATE instead of *DATE.

DTODAY S D
C EVAL TODAY = %DATE()

Re: Current date in RPGLE

<7b75e76c-6aba-48ac-b9bb-d8c9a1ae39e0n@googlegroups.com>

  copy mid

https://www.novabbs.com/computers/article-flat.php?id=70&group=comp.sys.ibm.as400.misc#70

  copy link   Newsgroups: comp.sys.ibm.as400.misc
X-Received: by 2002:a0c:d651:0:b0:531:d884:ee8d with SMTP id e17-20020a0cd651000000b00531d884ee8dmr1652642qvj.20.1673304083225;
Mon, 09 Jan 2023 14:41:23 -0800 (PST)
X-Received: by 2002:a05:6871:4585:b0:15b:8669:2375 with SMTP id
nl5-20020a056871458500b0015b86692375mr470189oab.127.1673304082990; Mon, 09
Jan 2023 14:41:22 -0800 (PST)
Path: i2pn2.org!i2pn.org!usenet.blueworldhosting.com!feed1.usenet.blueworldhosting.com!peer03.iad!feed-me.highwinds-media.com!news.highwinds-media.com!news-out.google.com!nntp.google.com!postnews.google.com!google-groups.googlegroups.com!not-for-mail
Newsgroups: comp.sys.ibm.as400.misc
Date: Mon, 9 Jan 2023 14:41:22 -0800 (PST)
In-Reply-To: <c0a1a887-142c-448a-b0a2-9872cce5204dn@googlegroups.com>
Injection-Info: google-groups.googlegroups.com; posting-host=99.246.235.217; posting-account=M2CWQwkAAADWPUlV1hc8zQLJMu5PmOBW
NNTP-Posting-Host: 99.246.235.217
References: <c0a1a887-142c-448a-b0a2-9872cce5204dn@googlegroups.com>
User-Agent: G2/1.0
MIME-Version: 1.0
Message-ID: <7b75e76c-6aba-48ac-b9bb-d8c9a1ae39e0n@googlegroups.com>
Subject: Re: Current date in RPGLE
From: jonbo...@partner400.com (Jon Paris)
Injection-Date: Mon, 09 Jan 2023 22:41:23 +0000
Content-Type: text/plain; charset="UTF-8"
Content-Transfer-Encoding: quoted-printable
X-Received-Bytes: 1875
 by: Jon Paris - Mon, 9 Jan 2023 22:41 UTC

On Monday, January 9, 2023 at 1:24:55 AM UTC-5, sharad...@gmail.com wrote:
> Hi All,
>
> I'm trying to get current date using *date in RPGLE but when program called via job it takes job date some time jobs is not restarted same day it shows old date not the current date.
>
> Can you please suggest how to get current date from Job and integrative program run
>
> Thanks!
> Sharad
You are probably using *DATE which is the wrong choice if you want to be certain of getting the current date. *DATE retrieves the _JOB_ date (i.e. the date the job entered the system). What you probably need is to use the BIF %Date() which will retrieve the current date.

Re: Current date in RPGLE

<eda47876-1ae4-4a7d-ad20-bb768c8b7627n@googlegroups.com>

  copy mid

https://www.novabbs.com/computers/article-flat.php?id=73&group=comp.sys.ibm.as400.misc#73

  copy link   Newsgroups: comp.sys.ibm.as400.misc
X-Received: by 2002:ae9:e20f:0:b0:702:16ea:dfab with SMTP id c15-20020ae9e20f000000b0070216eadfabmr2824230qkc.759.1673368437026;
Tue, 10 Jan 2023 08:33:57 -0800 (PST)
X-Received: by 2002:aca:3b83:0:b0:361:26d4:278f with SMTP id
i125-20020aca3b83000000b0036126d4278fmr4392652oia.275.1673368436652; Tue, 10
Jan 2023 08:33:56 -0800 (PST)
Path: i2pn2.org!i2pn.org!weretis.net!feeder8.news.weretis.net!proxad.net!feeder1-2.proxad.net!209.85.160.216.MISMATCH!news-out.google.com!nntp.google.com!postnews.google.com!google-groups.googlegroups.com!not-for-mail
Newsgroups: comp.sys.ibm.as400.misc
Date: Tue, 10 Jan 2023 08:33:56 -0800 (PST)
In-Reply-To: <7b75e76c-6aba-48ac-b9bb-d8c9a1ae39e0n@googlegroups.com>
Injection-Info: google-groups.googlegroups.com; posting-host=64.238.150.148; posting-account=w1guXwoAAADA7eZgnoQOu32BFcEQTy_b
NNTP-Posting-Host: 64.238.150.148
References: <c0a1a887-142c-448a-b0a2-9872cce5204dn@googlegroups.com> <7b75e76c-6aba-48ac-b9bb-d8c9a1ae39e0n@googlegroups.com>
User-Agent: G2/1.0
MIME-Version: 1.0
Message-ID: <eda47876-1ae4-4a7d-ad20-bb768c8b7627n@googlegroups.com>
Subject: Re: Current date in RPGLE
From: sharadkh...@gmail.com (Sharad Khare)
Injection-Date: Tue, 10 Jan 2023 16:33:57 +0000
Content-Type: text/plain; charset="UTF-8"
Content-Transfer-Encoding: quoted-printable
 by: Sharad Khare - Tue, 10 Jan 2023 16:33 UTC

On Tuesday, 10 January 2023 at 04:11:24 UTC+5:30, Jon Paris wrote:
> On Monday, January 9, 2023 at 1:24:55 AM UTC-5, sharad...@gmail.com wrote:
> > Hi All,
> >
> > I'm trying to get current date using *date in RPGLE but when program called via job it takes job date some time jobs is not restarted same day it shows old date not the current date.
> >
> > Can you please suggest how to get current date from Job and integrative program run
> >
> > Thanks!
> > Sharad
> You are probably using *DATE which is the wrong choice if you want to be certain of getting the current date. *DATE retrieves the _JOB_ date (i.e. the date the job entered the system). What you probably need is to use the BIF %Date() which will retrieve the current date.
Thank You!!

1
server_pubkey.txt

rocksolid light 0.9.8
clearnet tor