I thought of that, but the same programs are working in other accounts. I have compared all source code between accounts and they are the same.
John John Israel Senior ERP Developer Dayton Superior Corporation 1125 Byers Rd Miamisburg, OH 45342 Office: 937-866-0711 x44380 Fax: 937-865-9182 [email protected] This message w/attachments (message) is intended solely for the use of the intended recipient(s) and may contain information that is privileged, confidential or proprietary. If you are not an intended recipient, please notify the sender, and then please delete and destroy all copies and attachments, and be advised that any review or dissemination of, or the taking of any action in reliance on, the information contained in or attached to this message is prohibited. -----Original Message----- From: [email protected] [mailto:[email protected]] On Behalf Of Allen Egerton Sent: Friday, January 20, 2012 1:07 PM To: U2 Users List Subject: Re: [U2] Date Problem On 1/20/2012 12:36 PM, Israel, John R. wrote: > I have an INCLUDE that I use in ALL programs I touch. It simply does a bunch > of assigning of variables so that I can use them as needed. One of these > assignments is: > TODAY = @DATE > > I have 1 program in 1 account that is consistently returning: 16066 (which is > 12/26/11). This program is initiated via a Redback call but so are many many > others. > > In the pgm that is failing, immediately after my INCLUDE, I just added code > to write the following to disk: > TODAY > DATE() > @DATE > > Both TODAY and @DATE ALWAYS return 16066 for this 1 program, but no others. > The same program is working correctly in other accounts, and the value of > TODAY is correct in EVERY other program I have ever used. > > Does anyone have a clue? > > I could replace @DATE with DATE() in my INCLUDE, but to do my due diligence, > I should recompile EVERY program that uses the INCLUDE (and that is NOT going > to happen). @DATE is writable, check to see if you're inadvertently over-writing it in that one program. Example code: 0001: CRT "DATE(): ": DATE() 0002: CRT "@DATE : ": @DATE 0003: @DATE = "XY" 0004: CRT "@DATE : ": @DATE 0005: STOP Example results: >RUN ADE.BP TT DATE(): 16091 @DATE : 16091 @DATE : XY -- allen egerton; [email protected] _______________________________________________ U2-Users mailing list [email protected] http://listserver.u2ug.org/mailman/listinfo/u2-users _______________________________________________ U2-Users mailing list [email protected] http://listserver.u2ug.org/mailman/listinfo/u2-users
