HP3000-L Archives

March 2002, Week 4

HP3000-L@RAVEN.UTC.EDU

Options: Use Monospaced Font
Show Text Part by Default
Show All Mail Headers

Message: [<< First] [< Prev] [Next >] [Last >>]
Topic: [<< First] [< Prev] [Next >] [Last >>]
Author: [<< First] [< Prev] [Next >] [Last >>]

Print Reply
Subject:
From:
"Hamilton, Allison" <[log in to unmask]>
Reply To:
Hamilton, Allison
Date:
Thu, 28 Mar 2002 17:22:05 -0500
Content-Type:
text/plain
Parts/Attachments:
text/plain (245 lines)
You can check, but I don't know if the Tracer got into 8.19 or not - bring
up QTP and show a set ?  If TRACE shows up as an option then you have it.
SET TRACE DEFINE and it should show the DCE locations.  If it doesn't have
it then the source data output would help a lot.

-----Original Message-----
From: Harrington, Don [mailto:[log in to unmask]]
Sent: Thursday, March 28, 2002 5:21 PM
To: 'Hamilton, Allison'; HP3000-L (E-mail); PowerHouse-L (E-mail)
Subject: RE: Quiz Explanation Requested


Sorry.  HP3000, QUIZ 8.19.C3.

Don Harrington
Sr. Systems Analyst
Facilities Applications Support
Shared Services Group
The Boeing Company
P.O. Box 3707 M/C 2R-32  NEW!
Seattle, WA  98124-2207
(v) 206-544-5679  NEW!  (f) 206-544-5788  NEW! (p) 206-797-6360

The opinions expressed in this e-mail reflect those of the sender.  They do
not necessarily reflect the opinions of The Boeing Company unless
specifically stated otherwise.



-----Original Message-----
From: Hamilton, Allison [mailto:[log in to unmask]]
Sent: Thursday, March 28, 2002 2:13 PM
To: 'Harrington, Don'; HP3000-L (E-mail); PowerHouse-L (E-mail)
Subject: RE: Quiz Explanation Requested


What version?  If you are on a version that has the QTP Tracer (8.2x and
above, I think) you might want to run the code through QTP turning on DCE
and DEFINE tracing.  It will tell you on which DEFINE operation they are
occuring .  It would help if you have an earlier version to see the same
report showing the value for
DT-DAYS-DATE-K2, since it is likely the cause of the problems.

-----Original Message-----
From: Harrington, Don [mailto:[log in to unmask]]
Sent: Thursday, March 28, 2002 5:06 PM
To: HP3000-L (E-mail); PowerHouse-L (E-mail)
Subject: Quiz Explanation Requested


Gang;

Why are these results the same:

> EXE HOL002Z.EXE

ENTER START DATE (YYMMDD):01/01/03


03/28/02                    ISDS FACILITIES SYSTEMS                    PAGE
1

  MY-DT-DAYS-DATE-K2  MY-CHRON-SEQ  MYDT

                              0     0002
                              0     0002
       01/01/00               1     0001
       01/01/00               1     0001
       01/02/00               2     0001
       01/02/00               2     0001
       01/03/00               3     0001
       01/03/00               3     0001
       01/04/00               4     0001
       01/04/00               4     0001
       01/05/00               5     0001
       01/05/00               5     0001
       01/06/00               6     0001
       01/06/00               6     0001
       01/07/00               7     0001
       01/07/00               7     0001
       01/08/00               8     0001
       01/08/00               8     0001
       01/09/00               9     0001
?<User Break>
Do you wish to continue?N
*W* Execution halted at your request.

Records selected:  21
Records sorted:    21
Records reported:  20
Lines printed:     21
Pages printed:     1

** Data conversion errors: 4

> EXE HOL002Z.EXE

ENTER START DATE (YYMMDD):010103

03/28/02                    ISDS FACILITIES SYSTEMS                    PAGE
1

  MY-DT-DAYS-DATE-K2  MY-CHRON-SEQ  MYDT

                              0     0002
                              0     0002
       01/01/00               1     0001
       01/01/00               1     0001
       01/02/00               2     0001
       01/02/00               2     0001
       01/03/00               3     0001
       01/03/00               3     0001
       01/04/00               4     0001
       01/04/00               4     0001
       01/05/00               5     0001
       01/05/00               5     0001
       01/06/00               6     0001
       01/06/00               6     0001
       01/07/00               7     0001
       01/07/00               7     0001
       01/08/00               8     0001
       01/08/00               8     0001
       01/09/00               9     0001
?<User Break>
Do you wish to continue?N
*W* Execution halted at your request.

Records selected:  21
Records sorted:    21
Records reported:  20
Lines printed:     21
Pages printed:     1

** Data conversion errors: 4

> EXE HOL002Z.EXE

ENTER START DATE (YYMMDD):030101

03/28/02                    ISDS FACILITIES SYSTEMS                    PAGE
1

  MY-DT-DAYS-DATE-K2  MY-CHRON-SEQ  MYDT

                              0     0002
                              0     0002
       01/01/00               1     0001
       01/01/00               1     0001
       01/02/00               2     0001
       01/02/00               2     0001
       01/03/00               3     0001
       01/03/00               3     0001
       01/04/00               4     0001
       01/04/00               4     0001
       01/05/00               5     0001
       01/05/00               5     0001
       01/06/00               6     0001
       01/06/00               6     0001
       01/07/00               7     0001
       01/07/00               7     0001
       01/08/00               8     0001
       01/08/00               8     0001
       01/09/00               9     0001
?<User Break>
Do you wish to continue?N
*W* Execution halted at your request.

Records selected:  21
Records sorted:    21
Records reported:  20
Lines printed:     21
Pages printed:     1

** Data conversion errors: 4

The code is:

;FILE HOL002Z.SOURCE - REPORTS DATES IN THE MFG DAY HOLIDAY FILE

;         $History: hol002z.source $

ACCESS HOLIDAYS-FILE

DEFINE START-DATE DATE CENTURY EXCLUDED = &
          PARM PROMPT "ENTER START DATE (YYMMDD):"
DEFINE NEW-DATE DATE  CENTURY EXCLUDED = &
 REMOVECENTURY(DATE(DAYS(DT-DAYS-DATE-K2) + 364))
DEFINE MYDT CHAR*4 = ASC(NEW-DATE,6)
DEFINE MY-CHRON-SEQ NUM = DAYS(NEW-DATE)
DEFINE MY-DT-DAYS-DATE-K2 DATE = REMOVECENTURY(NEW-DATE)

SELECT IF DT-DAYS-DATE-K2 GE START-DATE

SET REPORT LIMIT 5000

SORT ON MY-DT-DAYS-DATE-K2

REPORT  &
     MY-DT-DAYS-DATE-K2 &
     MY-CHRON-SEQ &
     MYDT

BUILD HOL002Z.EXE

Any help would be GREATLY appreciated.

TIA,
Don Harrington
Sr. Systems Analyst
Facilities Applications Support
Shared Services Group
The Boeing Company
P.O. Box 3707 M/C 2R-32  NEW!
Seattle, WA  98124-2207
(v) 206-544-5679  NEW!  (f) 206-544-5788  NEW! (p) 206-797-6360

The opinions expressed in this e-mail reflect those of the sender.  They do
not necessarily reflect the opinions of The Boeing Company unless
specifically stated otherwise.



= = = = = = = = = = = = = = = = = = = = = = = = = = = =
Mailing list: [log in to unmask]
Subscribe: "subscribe" in message body to [log in to unmask]
Unsubscribe: "unsubscribe" in message body to
[log in to unmask]
http://lists.swau.edu/mailman/listinfo/powerh-l
This list is closed, thus to post to the list you must be a subscriber.

This message may contain privileged and/or confidential information.  If you
have received this e-mail in error or are not the intended recipient, you
may not use, copy, disseminate or distribute it; do not open any
attachments, delete it immediately from your system and notify the sender
promptly by e-mail that you have done so.  Thank you.

This message may contain privileged and/or confidential information.  If you
have received this e-mail in error or are not the intended recipient, you
may not use, copy, disseminate or distribute it; do not open any
attachments, delete it immediately from your system and notify the sender
promptly by e-mail that you have done so.  Thank you.

* To join/leave the list, search archives, change list settings, *
* etc., please visit http://raven.utc.edu/archives/hp3000-l.html *

ATOM RSS1 RSS2