Sv: Date Prompting Problem ....
Ole Hansen, ScanConsult
oh@scanconsult.dk
Mon, 3 Jul 2000 18:51:40 +0200
Hi Art,
If your samples are truly cut-and-paste, then your date input is
" 20000601" (note leading blank) rather than "20000601" as far as I can see.
/Ole Hansen
====================================================================
E-mail: oh@scanconsult.dk Cell Phone: +45 22 17 36 50
====================================================================
ScanConsult IT-Partners Voice : +45 87 34 55 07
Udviklingsparken Aarhus Fax : +45 87 34 15 07
Soenderhoej 46 Support : support@scanconsult.dk
DK-8260 Viby J. Sales : sales@scanconsult.dk
Denmark Web : http://www.scanconsult.dk
=== M A C H : Menu-based Air Cargo Handling system ===
=== ScanConsult is Authorized by Hewlett-Packard as: ===
=== * HP 3000 Select Independent Software Vendor * ===
=== ** HP9000 Power Partner ** ===
-----Oprindelig meddelelse-----
Fra: Art Bahrs <abahrs@denkor.com>
Til: POWERH-L@sphere.swau.edu <POWERH-L@sphere.swau.edu>
Dato: 3. juli 2000 18:10
Emne: Date Prompting Problem ....
>Hi All :)
> Hopefully, someone can help me on this Holiday Eve (at least for us
>'Yanks' hehe)
>
> I am attempting to get a start and end date via the PROMPT method on a
>local memory variable in a Quiz run (which will then set a CI variable) and
>I am getting an error stating that the string I am imputting is too long...
>yet the $STDLIST shows that I am only getting 8 characters.... which is what
>I have defined the the field to be in Quiz....I have included the errant
>section of Quiz Code, the related JCL and the related part of the $STDLIST.
>
>I am using the format of CCYYMMDD for my dates...
>
>We are running Quiz 8.19.C3, JMS and MPE/iX 5.5 (patched) on a 979-200....
>
>Any help will be very much appreciated.... I.E. what did I do wrong this
>time????
>
>Art "hmmm.... it should work? but it doesn't... is it Monday? hehe" Bahrs
>
>
>Quiz Source Code:
>;* define local memory variables
>DEFINE P-BEGIN-DATE CHAR*08 = PARM PROMPT "ENTER BEGIN DATE YYYYMMDD: "
>DEFINE BEGIN-DATE CHAR*08 = TRUNCATE(P-BEGIN-DATE) &
> IF (SETSYSTEMVAL("BEG_DTE", TRUNCATE(P-BEGIN-DATE))) &
> ELSE " "
>
>
>JCL in Job Stream File:
>
>!QUIZ
>Q U I Z (PowerHouse 8.19.C3)
>Copyright 1998 COGNOS INCORPORATED
>DenKor Dental Management Corp.
>
>EXE PHYRXDT1.OBJR.COGACCT
>.\CURREOM,13C\01
>.\CURREOM,53\
>
>
>JCL in $STDLIST:
>> EXE PHYRXDT1.OBJR.COGACCT
>ENTER BEGIN DATE YYYYMMDD: 20000601
>This string is too long. Please re-enter.
>The maximum number of reprompts (0) used .
>An error occurred while prompting for DEFINE with PARM.
>
>
>
>= = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
>Subscribe: "subscribe powerh-l" in message body to majordomo@lists.swau.edu
>Unsubscribe: "unsubscribe powerh-l" in message to majordomo@lists.swau.edu
>This list is closed, thus to post to the list, you must be a subscriber.
>
= = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
Subscribe: "subscribe powerh-l" in message body to majordomo@lists.swau.edu
Unsubscribe: "unsubscribe powerh-l" in message to majordomo@lists.swau.edu
This list is closed, thus to post to the list, you must be a subscriber.