1
00:00:01,580 --> 00:00:06,820
Para crear un procedimiento hay que usar la palabra Create o Reemplace Procedure.

2
00:00:08,400 --> 00:00:16,719
A continuación se indica un nombre al procedimiento y entre paréntesis los parámetros que se utilizan.

3
00:00:16,839 --> 00:00:20,160
En este caso IN y a continuación la palabra AS.

4
00:00:30,899 --> 00:00:38,679
Después declaramos el cursor y le agregamos un nombre, en este caso Cursor Cliente.

5
00:00:38,679 --> 00:00:50,850
La condición pide el código cliente, entonces comparamos el código cliente igual al nombre C cliente.

6
00:01:00,899 --> 00:01:13,599
Agregamos un nuevo dato, en este caso R cliente y utilizamos el row type para el mismo tipo de fila que devuelve el cursor.

7
00:01:16,280 --> 00:01:19,719
Recuperamos el registro del cliente a partir del código del cliente.

8
00:01:19,719 --> 00:01:32,519
cliente. Aquí es donde se agregará la información, código cliente, nombre, ciudad, país, donde se

9
00:01:32,519 --> 00:01:44,310
agregará la información del cliente. Escribimos una cabecera para el detalle de los pagos. Creamos

10
00:01:44,310 --> 00:01:56,760
el bucle. Dentro del bucle se procesa la información. Creamos las instrucciones. Agregamos

11
00:01:56,760 --> 00:02:03,760
las iteraciones. En cada iteración se hace una lectura automáticamente. Finalizamos

12
00:02:03,760 --> 00:02:12,840
el bucle con nLob. Resultados finales del proceso. Mostramos la cantidad total que es

13
00:02:12,840 --> 00:02:22,139
la suma de cada línea calculada en la iteración del bucle. Agregamos el mensaje que ha terminado

14
00:02:22,139 --> 00:02:29,879
correctamente el procedimiento. Excepción. Control de errores. Escribimos excepción

15
00:02:29,879 --> 00:02:34,139
que intentará controlar los errores previsibles

16
00:02:34,139 --> 00:02:41,460
when other than captura cualquier excepción

17
00:02:41,460 --> 00:02:42,780
por lo tanto no podemos

18
00:02:42,780 --> 00:02:46,939
no perdemos el control del programa

19
00:02:46,939 --> 00:02:51,500
este será el mensaje de error que mostrará

20
00:02:56,580 --> 00:02:57,699
y finalizamos

21
00:02:57,699 --> 00:03:03,860
para su ejecución escribimos begin

22
00:03:03,860 --> 00:03:10,360
el nombre del procedimiento

23
00:03:10,360 --> 00:03:19,659
más el número del código del cliente que quieras buscar.

24
00:03:19,659 --> 00:03:28,460
Finalizamos con EN y pulsamos la tecla F8 y este sería el resultado.