MVSFORUMS.com

sasidhar001

Hi Can anybody translate this sentence in terms of COBOL and tell me:

if <custid> begins with '6'{ This is the sentence to be translated in terms of cobol language}
then
<do processing>
_________________
venkat

jsharon1248 · Posted: Mon Sep 17, 2007 11:13 am Post subject:

As long as you mean the first character in the field, and the field is a display type ( e.g. PIC X(05) or PIC 9(05)):

sasidhar001 · Posted: Mon Sep 17, 2007 11:17 am Post subject:

Thanks buddy for your help.....

jsharon1248 · Posted: Mon Sep 17, 2007 11:36 am Post subject:

There are probably half a dozen ways to do this. Here's a couple more. Take your pick.

sasidhar001 · Posted: Tue Sep 18, 2007 6:27 am Post subject:

Thanks buddy..................I think the first one is simpler...
_________________
venkat