Skip to content

Instantly share code, notes, and snippets.

@victw

victw/OPMMSGDIV

Created October 21, 2015 23:50
Show Gist options
  • Star 0 You must be signed in to star a gist
  • Fork 0 You must be signed in to fork a gist
  • Save victw/b1539d36f94057873ca7 to your computer and use it in GitHub Desktop.
Save victw/b1539d36f94057873ca7 to your computer and use it in GitHub Desktop.
Download ZIP
Raw
OPMMSGDIV
//Cycle-main with unhandled divide by zero error
Ctl-Opt Option(*SrcStmt:*NoDebugIO);
//Divide by 0 error
Dcl-S Result zoned(2:0) ;
Dcl-S Zero zoned(1:0) Inz(0);
Result = 10/Zero;
*InLR= *ON;
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment