Copyright © Cloud Software Group, Inc. All Rights Reserved

COPYLIB

Copies all the rules from a source library to a destination library. (C)

Invocation

CALL COPYLIB(source_lib, dest_lib)

 

source_lib	The name of the source library
dest_lib	The name of a predefined destination library

Usage Notes

•	The local variable MSG must be declared by the calling rule. It contains a message indicating how many rules were copied, if the copy is successful, or a message indicating that the copy failed.

•	If a rule in the copied library exists in the destination library it is overwritten.

Exceptions

 

LIBCOPYFAILED

Returns a message if the copy fails.

 

The exception must be handled by the calling rule.

Example

The following rule copies the rules from the USR40 library to the DOCUMENT library and returns the status of the copy to the ENDMSG:

---

 

RULE EDITOR ===> SCROLL: P

COPYLIB_EX;

_ LOCAL MSG;

_ ---------------------------------------------------------------------------

_ ------------------------------------------------------------+--------------

_ CALL COPYLIB('USR40', 'DOCUMENT'); | 1

_ CALL ENDMSG(MSG); | 2

_ ---------------------------------------------------------------------------

_ ON LIBCOPYFAILED:

_ CALL ENDMSG(MSG);

---

 

It returns the following ENDMSG:

Library copy succeeded, 75 rules copied.

Copyright © Cloud Software Group, Inc. All Rights Reserved