Advertisement
Guest User

Untitled

a guest
Dec 13th, 2018
192
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
COBOL 0.24 KB | None | 0 0
  1.  MOVE W02-TRAN-KEY TO W04-PL-KEY              
  2.  MOVE W02-TRAN-TYPE TO W04-PL-TRANTYPE        
  3.  MOVE "ERROR" TO W04-PL-FIELDNAME              
  4.  MOVE "NO MATCHING MASTER" TO  W04-PL-OLDVALUE
  5.  MOVE "********************" TO W04-NP-NEWVALUE
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement