When a source line happens to contain an ampersand it can still be read by ISREDIT (THELINE) = LINE &ROW
However, an attempt to rewrite it back [even unchanged!] ISREDIT LINE &ROW = &THELINE fails, and so does an attempt to examine its contents with the &SUBSTR function. I've looked through the manuals, tried SCAN OFF/ON but ended up with replacing the ampersands BEFORE reading the line ISREDIT LABEL &ROW = .CURR ISREDIT CHANGE X'50' X'EF' .CURR .CURR ALL and restoring them back later ISREDIT CHANGE X'EF' X'50' .CURR .CURR ALL This works [except for the rare case when X'EF' is actually part of the original source code and thus gets mistakenly replaced with the ampersand] but just doesn't feel right. I guess it would if the restore was done through UNDO but it's unavailable to ISREDIT. Am I missing something stupid or is this a known limitation? Thanks! -Victor- _ This message and any attachments are intended only for the use of the addressee and may contain information that is privileged and confidential. If the reader of the message is not the intended recipient or an authorized representative of the intended recipient, you are hereby notified that any dissemination of this communication is strictly prohibited. If you have received this communication in error, please notify us immediately by e-mail and delete the message and any attachments from your system. ---------------------------------------------------------------------- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html