anchor.diff:  unstringStatement :
   	UNSTRING qualifiedDataName
   	(
  -		DELIMITED BY? ALL? (identifier | literal) (OR ALL? (identifier | literal))*
  +		DELIMITED BY? ALL? (identifier | literal)
  +		(OR ALL? (identifier | literal))*
   	)?
   	INTO
   	(
  -		identifier (DELIMITER IN? identifier)? (COUNT IN? identifier)?
  +		identifier
  +		(DELIMITER IN? identifier)?
  +		(COUNT IN? identifier)?
   	)+
   	(WITH? POINTER qualifiedDataName)?
   	(TALLYING IN? qualifiedDataName)?
  
positive.code: ;
  
  subtractFromGivingStatement :
  	(identifier | literal)+ FROM (identifier | literal) ROUNDED? GIVING (identifier ROUNDED?)+
  ;
  
  subtractCorrespondingStatement :
  
negative.code: 	SORT fileName
  	(ON? (ASCENDING | DESCENDING) KEY? qualifiedDataName+)+
  	(WITH? DUPLICATES IN? ORDER?)?
  	(
  		COLLATING? SEQUENCE IS? alphabetName+
  		(FOR? ALPHANUMERIC IS? alphabetName)?
  		(FOR? NATIONAL IS? alphabetName)?
  	)?
  	(
  		USING fileName+ 
  		| INPUT PROCEDURE IS? procedureName ((THROUGH | THRU) procedureName)?
  	)
  	(
  		GIVING (fileName (LOCK | SAVE | NO REWIND | CRUNCH | RELEASE | WITH REMOVE CRUNCH)?)+
  		| OUTPUT PROCEDURE IS? procedureName ((THROUGH | THRU) procedureName)?
  	)
  ;
  
  // start statement
  