View previous topic :: View next topic |
Author |
Message |
mf_user Intermediate
Joined: 01 Jun 2003 Posts: 372 Topics: 105
|
Posted: Thu Feb 07, 2008 11:03 am Post subject: Would this make sense? |
|
|
Hi,
Code: |
05 S-NEW-XXXER-SW PIC X(01) VALUE 'N'.
88 S-NEW-XXXER VALUE 'Y'.
88 S-NOT-NEW-XXXER VALUE 'N'.
|
Code: |
IF S-XXXER-NOT-FOUND
AND NOT S-NEW-XXXER
MOVE SPACES TO W-XXX-XXXER-KBR-1-4
MOVE W-XXX-XXXER-KBR TO XX-XXX-I-XXX-XXXER-KBR
PERFORM S1350-CALL-LMNS2222-XXX-XXRV
|
Would the above switch declaration and the usage of them as shown make sense?
I thought the "AND NOT S-NEW-XXXER" was not necessary.
Any other thoughts to share please?
Thanks. _________________ MF
==
Any training that does not include the emotions, mind and body is incomplete; knowledge fades without feeling.
== |
|
Back to top |
|
|
Terry_Heinze Supermod
Joined: 31 May 2004 Posts: 391 Topics: 4 Location: Richfield, MN, USA
|
Posted: Thu Feb 07, 2008 2:17 pm Post subject: |
|
|
It makes sense to me simply because, as coded, the IF statement is checking the values of 2 different fields. Both must be true for the "true" part of the IF to be executed. _________________ ....Terry |
|
Back to top |
|
|
mf_user Intermediate
Joined: 01 Jun 2003 Posts: 372 Topics: 105
|
Posted: Tue Mar 11, 2008 6:56 am Post subject: |
|
|
Thanks Terry......
My mistake..........
sorry....... _________________ MF
==
Any training that does not include the emotions, mind and body is incomplete; knowledge fades without feeling.
== |
|
Back to top |
|
|
|
|