Try something like:
if not type Decimal::TryParse(fldDescr1::Text, BCL-DESC)
*> invalid numeric data
move 0 to BCL-DESC
end-if
↧
Channel:
Visual COBOL - Forum - Recent Threads
X
Are you the publisher?
Claim or
contact us
about this channel.
X
0
Channel Details:
- Title: Visual COBOL - Forum - Recent Threads
- Channel Number: 12804762
- Language: English
- Registered On: April 27, 2013, 1:56 pm
- Number of Articles: 4356
- Latest Snapshot: February 26, 2019, 5:05 am
- RSS URL: http://community.microfocus.com/microfocus/cobol/visual_cobol/f/18/rss.aspx?threadless=1
- Publisher: https://community.microfocus.com/microfocus/cobol/visual_cobol/f/forum
- Description:
- Catalog: //twice-allied23.rssing.com/catalog.php?indx=12804762
© 2025 //www.rssing.com