Как открыть файл оффиса с полномочиями только на просмотр?

Левон

Использую

Code:

  CALL METHOD cl_gui_frontend_services=>execute
       EXPORTING: document    = lv_document
                  operation   = 'OPEN'
       EXCEPTIONS:
        OTHERS     = 20.
  IF sy-subrc = 0.

для открытия документов оффиса. Открываются файлы всегда с возможностью вносить изменения. Можно ли сделать так, чтоб они открывались и с возможностью просмотра?

Т.е. нужно предусмотреть оба варианта в зависимости от внешних условий. Думал метить файл как рид-онли...может можно еще как?

Igor Moskvin

А через OLE не хочется открывать?
Для Ворда например есть WordApp.ActiveDocument.Protect(ProtectType,NoReset,Password)... на абапе наверно будет типа call method ActiveDocumet->Protect exporting...
только по константам поизучать придется доку...

Левон

Не хотелось бы завязываться на тип документа...пока механизм универсален и откроет все что можно...

creo

Есть макрос Word'a:

Code:

 ActiveDocument.Protect Password:="111", NoReset:=False, Type:= _
        wdAllowOnlyRevisions, UseIRM:=False, EnforceStyleLock:=False

Пробую написать на ABAP:

Code:

 CALL METHOD OF gs_actdoc 'Protect'
         EXPORTING
              #1 = '111'
              #2 = 0
              #3 = 0
              #4 = 0
              #5 = 0

не работает! при отладке посмотрел что
_wdAllowOnlyRevisions равно 0. И что может быть не так?

p.s. gs_actdoc получен и работает корректно с другими методами

p.s.s. Помню был когда-то прикол, что методу надо обязательно передавать все параметры, а как их узнать?

creo

Хм... думаю дело в чем-то другом, т.к. <я не знать русский языка> вручную защитить документ паролем и программно снять... не фига..

пробовал и так:

Code:

SET PROPERTY OF gs_actdoc 'UnProtect' = '111'.

и так:

Code:

    CALL METHOD OF gs_actdoc 'UnProtect'
         EXPORTING
              #1 = '111'.

Исходный макрос:

Code:

ActiveDocument.UnProtect("111")

vga

Если запускать без параметров:
CALL METHOD OF gs_actdoc 'RUN' EXPORTING #1 = 'macro.xls!Macro2'.

Если с параметрами, то точно не скажу, предположительно так:

CALL METHOD OF gs_actdoc 'RUN'
EXPORTING
#1 = 'macro.xls!Macro2'.
#2 = param_count
#3 = param1
#4 = param2
#5 = param3

creo

Разобрался!! Все оказалось намного проще :-)

)

Посмотрел в ObjectBrowser порядок передачи параметров, так вот он какой:

Code:

  CALL METHOD OF gs_actdoc 'Protect'
         EXPORTING
              #1 = 0
              #2 = 0
              #3 = '111'
              #4 = 0
              #5 = 0
           .

Правила форума

Как открыть файл оффиса с полномочиями только на просмотр?

Кто сейчас на конференции