...
| Expandir |
|---|
| title | Create (Crear archivo) |
|---|
|
Crea un nuevo fichero en el repositorio y la carpeta asociada al BO si no existe. | Bloque de código |
|---|
| DATA: lo_api_file TYPE REF TO /edge/cl_dc_api_file.
CALL METHOD /edge/cl_dc_api_file=>create
EXPORTING
iv_filename = 'Nombre de fichero' "Nombre del archivo
iv_ar_object = '/EDGE/GRAP' "Clase de documento
iv_repository = 'N1' "ID del repositorio
iv_bo_type = 'BKPF' "Tipo del BO
iv_bo_key = 'AVHU00016000012024' "Clave del BO
iv_extension = 'txt' "Extension del archivo
iv_file = lv_file "Binario
RECEIVING
ro_file = lo_api_file. "Instancia de la API del archivo.
|
|
| Expandir |
|---|
| title | Read (Lee una carpetaun archivo) |
|---|
|
Lee los datos del archivo. Devuelve un flag si existe el archivo y el contenido. | Bloque de código |
|---|
| DATA: lv_exist type xfeld,
lv_content type xstring.
CALL METHOD lo_api_file->read
IMPORTING
ev_content = lv_content
ev_exist = lv_exist. |
|
...
| Expandir |
|---|
| title | Delete (Borra un archivo) |
|---|
|
Borra un archivo | Bloque de código |
|---|
| lo_api_file->delete( ). |
|
En el siguiente fragmento se muestra un ejemplo de uso de ambas clases API:
| Bloque de código |
|---|
|
DATA: lv_exist type xfeld,
lv_id type /edge/dc_repos,
ltr_api_file type table of ref to /edge/cl_dc_api_file.
CALL METHOD lo_api_folder->read
IMPORTING
ev_exist = lv_exist
ev_id = lv_id
etr_api_file = ltr_api_file. |
...
Lee los datos de la carpeta. Devuelve el ID de la carpeta, un flag si existe en el repositorio, y una tabla con los adjuntos, si los tiene, en formato API de adjuntos.
...
...