This section provides some examples on using the ReElDor utility for minimizing the insertable string substitution and Pretty Print. Consider the following model AModel with Segment ASegment for the examples that follow.
AModel ASegment Insertable IGLG Main Move "X" _DA1:Assign value X to incoming parameter Move "Y" _DA2:Assign value Y to incoming parameter Insertable IGLG2 Main Move "X" _DA1:Assign value X to incoming parameter Move "Y" _DA2:Assign value Y to incoming parameter Report R1 Main Insert IGLG (_DA1 = ABC.DA1 & _DA2 = ABC.DA2) Move SYSOP.KDVSAPRO WG_WORK.WG_KDVSAPRO :KDVSAPRO Move GLB.REPNAME GD_REPNAME :GD_REPNAME Move GLB.ZEROS GG_HEADER_SRV_UIT.GG_PAR :GG_PAR Insert IGLG (_DA1 = ABC.DA1 & _DA2 = XYZ.DA2) DoWhen ((GG_HEADER_SRV_UIT.GG_FAR = GD_REP_FAR) AND \ (GD_REP_ASP = GC_NUM)) Insert IGLG (_DA1 = GRPA.GRPB.DA1 & _DA2 = GRPA.GRPB.DA2) Move GLB.ZEROS GG_FAR End Report R2 Main Insert IGLG2 (_DA1 = ABC.DA1 & _DA2 = ABC.DA
Examples on Refactoring Insertable Substitution Strings