Patrón de diseño Factory Method

En este artículo vamos a aprender a utilizar e implementar en patrón de diseño Factory Method.
Implementamos el patrón de diseño Factory Method creando la interfaz local LIF_EXPEDIENTE que declara el método TIPO_EXPEDIENTE.
Creamos dos clases locales LCL_EXPEDIENTE_OBRA y LCL_EXPEDIENTE_SUMINISTRO que implementan la interfaz.
Para cumplir con los requerimientos del patrón Factory Method creamos la clase local LCL_FACTORIA que implementa el método CREAR_EXPEDIENTE, método que se utiliza cómo Factory Method para las clases locales que han implementado la interfaz.
Generamos todo el desarrollo en un programa ejecutable y utilizamos el evento START-OF-SELECTION para probar el código creado.