Locking in movement

Forgive me, but I don't know what this is called. I have a piece of text in a top layer and below it a video. I want to be able to have the text's movement match a feature in the video, so it appears to move with it.
Does FCE do this, or are there plug ins?
Thanks!

Look up Motion Keyframes, that is how you will do it
Highlight the text and use the Motion parameters in the Canvas
Or in the Canvas select Image + Wireframe and use the crosshairs to move the title using keyframes: Set a Keyframe then move, set a Keyframe then move, etc and FCE will animate the movement
Manuals will have more detail

Similar Messages

Locking a movie that is a level under another movie

Hi, I am loading a movie onto a level above another movie,
but the buttons of the movie below are still clickable through the
movie above. Is there anyway I can lock the movie below when I load
another one over it?
Cheers!

The only way I think of doing it is by putting a large button
covering the whole movie that is transparent and doesnt do
anything. That would disable the buttons on the level underneath
from functioning.
There must be a way of creating a layer that doesnt allow
anything underneath it to be clickable?

Ios 6.1.3 locks syncing movies on iphones not ipad

Ihave two iphones (4S) and an ipad. when I updated to 6.1.3 I can no longer sync movies on either iphone but i can on my ipad. It is not a space issue as all three units have about 40% free space and I am only trying to sync a single movie. and it does not mater what movies NONE will sync to the iphones but all will sync to the ipad. When I say won;t sync I mean it locks itunes to the point a message comes up saying that itunes has stopped working. I have narrowed it to movies not syncing but all of them woudl sync just fine on the previous ios 6.whatever.
Help please.

Hello, mcolfam.
The articles below may help you resolve the iTunes error you are receiving. Please be sure to test the results after processing a troubleshooting step. I am not sure what operating system you are on so I will include the articles for Windows 7 and Vista. The corresponding articles for Windows XP are in these links.
iTunes for Windows Vista or Windows 7: Troubleshooting unexpected quits, freezes, or launch issues
http://support.apple.com/kb/TS1717
Removing and reinstalling iTunes, QuickTime, and other software components for Windows Vista or Windows 7
http://support.apple.com/kb/HT1923
iPhone, iPad, or iPod touch: Windows displays a blue screen message or restarts when connecting your device
http://support.apple.com/kb/TS1502
Hope this helps,
Jason H.

HP touchsmart lock screen; move clock

Is there any way for me to move the clock on the lock screen of my laptop? HP touchsmart. Or mabey get rid of it or something?? It's in the way lol Thanks

@Panda_Ninja ,
Hello and thank you for posting on the HP support forums. Please check out the following link it will help you when posting so that we can provide the best possible help.
Advice for asking the "Very Best Question"
When you post back please include your full model and product number.
HP Notebook PCs - How Do I Find My Model Number or Product Number?
Here is a link until you have a chance to post back that may be of use.
Lock Screen Clock Time Format - Change in Windows 8
Thank you again for posting and have a great day.
Please click the "Thumbs Up" on the bottom right of this post to say thank you if you appreciate the support I provide!
Also be sure to mark my post as “Accept as Solution" if you feel my post solved your issue, it will help others who face the same challenge find the same solution.
D5GR
I work on behalf of HP

How to make a circle and a line ending (at the centre of the circle) lock and move together?

I'm new to Illustrator and perhaps it's not the best software of CS6 Master for doing this, but:
I have a few (13) circles, they are connected with lines (one line from the centre of a circle to the centre of the next one, so 13 connecting lines). I need to move the circles around in order to create the appearance that suits me best, but I want the connecting ending to move together (see picture below). I need to do this often and get an immediate visual feedback. How do I do it? Am I using the wrong software altogether?
Thanks in advance to all who will try and help out!

Here's a way of doing it with the Appearance panel and multiple fills converted to an ellipse.
1 You create your path with all the segmentts you require can be an open or closed path.
2. Convert the fill only to an Ellipse. Effect>Convert to Shape>Ellipse (use the Absolute option and give it the dimension you want the circle to be) (cn cahnge this at anytime in the future as well as the color of the circles)
3. Using the Effect>Distort and Transform>Transform move the circle fill to a position corresponding to an anchor of the path as to position the circle with the nchor as the center.
4. In the Appearance panel Option (Alt) drag the fill with the convert to ellipse and the transform down or up to duplicate it, or se the flyout of the Appearance panel to duplicte the fill.
(do this for each circle you need) You will only have to adjust the transformation vertical and horizontal positions, Bith effects will be duplicated when you copy the fill so you only adjust the transformeffecct that is already associated with the fill.
Like this:

Lock mask, move video/image underneath?

Sorry if this is a dumb question. I want to mask a particular track with a circle and then move the content while the mask stays stationary. Right now when I try to move something, the mask moves with the image. Help!

Hi
You'll need to create a mask in Photoshop or alike, and put that one track higher than your footage.
Or you can use Video Generators > Shape > Circle and put that one track lower and then select Composite Mode > Travel Matte Luma on the footage that you want to mask.
Rienk

Lock the movie with waiting time

Hello:
Can you help me with this code, please?
The wait handler stop my movie and I can't interact with the
application.
Thank you.
on mouseUp me
global gOutConnected
global xm
if (gOutConnected) then
Instrum=5
Channel=1
--Chord A6
sendProgramChange(xm, Channel, Instrum) --
C3=64
E3=68
G3=71
A3=73
--play notes
sendNoteOn(xm, Channel, C3, 90)
wait 1
sendNoteOn(xm, Channel, E3, 90)
wait 1
sendNoteOff(xm, 1, C3, 90)
end
on wait numTicks
set startTime =the ticks
repeat while the ticks < startTime + (numTicks*60)
nothing
end repeat
end

Hi Arielle,
Director does exactly what you told it: Execute the repeat
loop as fast as possible, and do
nothing. You must never create a repeat loop like this,
running for more than a few ms.
If you search the forum, you will find that an estimated 20%
of users fall for this once.
You can check your time in an exitframe-handler, or create a
timeout-object.
HTH,
Udo

Auto align layers moves my locked layer?

I am using CS4 and I want to align a couple of layers. I have no problem getting it to work, except for the fact that it will move all of my layers, even my background layer wich is locked. I thought that if you first locked a layer, then selected the other layers, all of those unlocked layers would be aligned to the locked layer? I want to keep that background layer from moving.
Thanks,
Steve

Yes the new Auto-align feature in Photoshop should be better implemented than it is. Locking the Movement of layers should certainly regsiter with Auto_align, and its quite ridiculous that it doesn't. If all selected layers happen to be locked then a warning should come up
D. Fosse has your answer over how to do this at present, it requires re-ordering your layers.
You should post a Feature Request about this.

Mailbox Move Issue - Mailbox Locked

Hi
I have tried 3 user mailboxes for local move request.
It get-moverequest says all three completed.
Then I cleared the same with Clear-moverequest command.
Now get-moverequest says none.
Now if i login with owa, it says mailbox locked for Movement.
If i try to delete content or once again try to move, it says Mailbox locked by MRS and will be released automatically after 2 hrs.
but its been more than a day still the error remains the same.
Restarted all Exchange services.. Restarted Exchange server.. still no hope
The Exchange console still shows these 3 mailboxes with Old DB name.
If i query through shell, for Mailboxdb for these users, it shows blank.
How do i bring back these mailboxes active and make it usable?
regards Sundaresan.C

This has been resolved now.
The problem was the movement of mailboxes when the users are accessing it.
This has gone to a stage where both the database has these users listing. One in Live and other in disconnected state.
I need to reduce the DB Mailbox retention to Zero -> disable the mailbox -> clean DB -> reconnect the Mailbox to existing user -> Clean DB.
This made users access their mailboxes with all old mails.
Lesson learnt: Do not move mailboxes when users accessing it though Microsoft says no issues. It may be locked inbetween.
regards Sundaresan.C

Cannot move [MOV filename]: It is in use by another person or program

Hello. I have recently installed version 7.41 of Quicktime for Windows (had the same problem with 7.4). What appears to be happening is that when I boot my computer, without opening any programs, if I go to a location where I have a MOV (Quicktime movie file) file, and try to cut and paste it to another folder it gives me the message:
Cannot move [MOV filename]: It is in use by another person or program. Close any programs that might be using the file and try again.
I have found by using some memory/file monitoring tools that EXPLORER.EXE is opening a handle to the file (accessing it for some reason) and then holding on to that handle thus not allowing me to move the file from one directory to another. By forcing the handles closed, it then allows me to move it, but then immediately maintains it open again, and cannot move it again.
This only happens with QuickTime MOV files. I have renamed the file to another format, just for kicks basically, and it works fine using another extension. I have also reassociated the MOV files with another app, but still has the same issues.
I have not run or any applications before this point and especially not anything related to QuickTime. Does anyone have any insight into what might be happening?

Hello akaMisterAnderson
I am having the exact problem when I try to rename or move the MOV file. I use Unlocker to determine which process is locking the MOV file and like you have said: it is the Explorer process.
I hope there will be a patch for this problem soon and if you know of any solution, please inform me.
Thanks.

Shake warning - Disc cache locked...

I'm learning Shake on a G5 - 2.3ghz, OS 10.5.6 leopard - It seems to crash a lot and when I reboot it a box appears saying - Warning, disc cache is locked due to another Shake UI running or a previous session crashing. Remove lock or move current cache? I've tried reinstalling Shake but the warning continues to appear. How do I get rid of this or unlock the disc cache? Thanks

See here:
http://www.digitalrebellion.com/blog/posts/shakeerror_disk_cachelocked.html

Unlocking movies on all devices

i use my ipad and my comuter to purchase and watch movies from itunes, and for some reason i cannot find movies on my ipad that i have purchased on my laptop and vice versa, is there something i have to do like un lock the movies so i can view where it say purchased??

Welcome to the Apple Community.
Movies will only auto download to your iPad if you have set it up to do so. (settings > iTunes & app store).
You can re-download content purchased from the iTunes store (availability varies depending on location) using the purchased option from the Quick Links section in the top right corner of the iTunes homepage in your iTunes application on your computer.
You can re-download content purchased from the iTunes store (availability varies depending on location) using the purchased option which is revealed in the iTunes app on your iOS device by tapping the more button at the bottom of the screen.

HELP, objects wont move in Photoshop elements 12

Hey there , it was working fine hours ago
i have trouble shooted everything adobes awful support has told me to. Reseted the settings and all that jazz.
Problem is still occurring.
If i select a layer image (im pasting in a picture of a car to a back ground)
then i go to move the car .... it just snaps back to where it was pasted , it will move a tiny bit or not at all, but it doesnt let me move it wherever i would like.
I know that withe Command T i can go to "free transform" and do whatever.
But i do a lot of editing with a lot of layers, theres no way im going to Command T every time i want to make a small adjustment of any type.
It was working fine before, and as soon as i pasted the image in, it was in free transform mode....
PLEASE HELP

When the Move tool is in use, you should already have a bounding Box (by default at least, this can be turned off) without having to use the Command-T for Free Transform. The Bounding Box and Free Transform do exactly the same thing.
You can switch to the Move tool by clicking the V key (no modifiers needed). You can temporarily engage the Move tool while any other tool is selected by holding down the Command key. Do either of these change the behavior you are seeing?
What editing mode are you in? Quick, Guided, or Expert?
Holding down the Shift key while moving can lock your movements to a certain axis (horizontal, vertical, or 45 degrees diagonal). If your Shift key is engaged, you may not be able to move your file to where you want because of this lock. I have seen third-party applications engage modifier keys like Shift even when you aren't pressing them on the keyboard. Usually, holding down the key will disengage it when this is the case.
Can you provide a screen shot of what things look like right after pasting in an object?

Cannot move/use/open anncilary (popup?) windows in multiple applicationsI

I have started having trouble with numerous Finder related tasks:
1. I cannot close/move/use certain windows on the desktop. Usually these are what I would describe as ancillary windows. For example, iCal automatic reminder windows cannot be closed nor removed. In Dreamweaver, tools menus get stuck and cannot be moved. This problem progresses to where I can no longer use or even open Dreamweaver tools windows, (e.g., I am unable to type in open spaces and cannot get popup menus to scroll.)
Re-booting my computer makes the stuck iCal windows disappear, but the next time iCal sends me a reminder, I’m back in the same situation. Re-launching Dreamweaver restores functioning for a while, but within 5 minutes or so, the problems return.
I have no idea if this is related, but about 2 weeks ago, I had even worse problems (e.g., was unable to rename folders on the desktop or move them to the trash.) Pushing F6, the number lock key, eliminated those problems, but now I am having increasing difficulty with the issues described above.
Thank you for any help you can offer!
PowerBook G4 Mac OS X (10.4.7)

Hello akaMisterAnderson
I am having the exact problem when I try to rename or move the MOV file. I use Unlocker to determine which process is locking the MOV file and like you have said: it is the Explorer process.
I hope there will be a patch for this problem soon and if you know of any solution, please inform me.
Thanks.

Program to lock users

Dear Pros,
As a security admin. I would appreciate if someone could help me program to lock users vis following requiremnt:
1)       Has logged onto the system in the past, but has not logged on in the last 90 days.
2)       Has never logged onto the system in the past 30 days.
3)       Does NOT belong to User Group SUPER.
4)       Dialog Users ONLY.
Thanks for any help or suggestion

Hi,
   Try with this program or you can modify:
Selection Text
001     Program Parameter
002     User Lockeds
003     User Erased
004     Report of User Lokeds and Erased
005     User
006     Last Access Date
007     Creation Date
008     Result
009     Full Name
010     Exception (Not to erase these users)
CHECK_T Test ejecution
CLASS     Users Group
MESBL     Months to Lock
MESBO     Months to Delete
S_EXCEP     Users
REPORT ZBAR0009 NO STANDARD PAGE HEADING LINE-SIZE 155 LINE-COUNT 60.
TABLES: USR02,              "Datos logon
        USR21,              "Asignación nombre usuario - clave dirección
        ADRP.               "Personas (gestión de direcciones central)
DATA: BEGIN OF IT_USBOR OCCURS 0,
          BNAME LIKE USR02-BNAME, "Nombre de usuario según maestro de us
          ERDAT LIKE USR02-ERDAT, "Fecha de creación del maestro de usua
          TRDAT LIKE USR02-TRDAT. "Fecha del último acceso al sistema
DATA END OF IT_USBOR.
DATA: BEGIN OF IT_USBLO OCCURS 0,
          BNAME LIKE USR02-BNAME, "Nombre de usuario según maestro de us
          ERDAT LIKE USR02-ERDAT, "Fecha de creación del maestro de usua
          TRDAT LIKE USR02-TRDAT. "Fecha del último acceso al sistema
DATA END OF IT_USBLO.
DATA: BEGIN OF BDCDATAC OCCURS 5.
        INCLUDE STRUCTURE BDCDATA.
DATA: END OF BDCDATAC.                 "Estructura Batch Input
Tablas de mensajes generados por el batch input de modificación.
DATA: BEGIN OF BDCMSGCOLLM OCCURS 5.
        INCLUDE STRUCTURE BDCMSGCOLL.
DATA: END OF BDCMSGCOLLM.
DATA: FECHA1 LIKE USR02-TRDAT,
      FECHA2 LIKE USR02-TRDAT,
      FECHA3 LIKE USR02-TRDAT,
      TR_MS(30),
      I      TYPE I,
      P      TYPE I,
      CONT   TYPE I.
SELECTION-SCREEN: BEGIN OF BLOCK B1 WITH FRAME TITLE TEXT-001.
    PARAMETERS: MESBL(2) DEFAULT '03',
                MESBO(2) DEFAULT '06',
                CLASS LIKE USR02-CLASS DEFAULT 'UPSTREAM',
                CHECK_T AS CHECKBOX DEFAULT 'X'.
SELECTION-SCREEN END OF BLOCK B1.
SELECTION-SCREEN: BEGIN OF BLOCK C1 WITH FRAME TITLE TEXT-010.
    SELECT-OPTIONS: S_EXCEP FOR USR02-BNAME.
SELECTION-SCREEN END OF BLOCK C1.
START-OF-SELECTION.
Armado de Fechas
MOVE SY-DATUM TO FECHA1.
FECHA2 = FECHA1 - ( 30 * MESBL ).
FECHA3 = FECHA1 - ( 30 * MESBO ).
PERFORM EXTRACCIÓN_US_BLOQUEAR.
PERFORM EXTRACCIÓN_US_BORRAR.
PERFORM VALIDAR_EXCEPCIONES.
PERFORM EJECUTAR_TRANS.
TOP-OF-PAGE.
      FORMAT COLOR 4 ON.
      SKIP.
      WRITE: /57 TEXT-004, 134 'Fecha: ', SY-DATUM.
      WRITE: /134 'Página: ', SY-PAGNO, 151 ' '.
      SKIP.
END-OF-PAGE.
*&      Form EXTRACCIÓN_US_BORRAR
      text
--> p1        text
<-- p2        text
FORM EXTRACCIÓN_US_BORRAR.
Selección de los Usuarios a Borrar que han entrado alguna vez
    SELECT BNAME ERDAT TRDAT APPENDING CORRESPONDING FIELDS OF TABLE
                       IT_USBOR FROM USR02 WHERE TRDAT LT FECHA3 AND
                                            TRDAT NE '00000000' AND
                                            CLASS EQ CLASS.
Selección de los Usuarios a Borrar que aún no han entrado
    SELECT BNAME ERDAT TRDAT APPENDING CORRESPONDING FIELDS OF TABLE
                       IT_USBOR FROM USR02 WHERE ERDAT LT FECHA3 AND
                                            TRDAT EQ '00000000' AND
                                            CLASS EQ CLASS.
ENDFORM.                    " EXTRACCIÓN_US_BORRAR
*&      Form EXTRACCIÓN_US_BLOQUEAR
      text
--> p1        text
<-- p2        text
FORM EXTRACCIÓN_US_BLOQUEAR.
Selección de los Usuarios a Bloquear que han entrado alguna vez
    SELECT BNAME ERDAT TRDAT APPENDING CORRESPONDING FIELDS OF TABLE
                     IT_USBLO FROM USR02 WHERE TRDAT LT FECHA2 AND
                                            TRDAT GE FECHA3 AND
                                            CLASS EQ CLASS.
Selección de los Usuarios a Bloquear que aún no han entrado
    SELECT BNAME ERDAT TRDAT APPENDING CORRESPONDING FIELDS OF TABLE
                   IT_USBLO FROM USR02 WHERE ERDAT LT FECHA2 AND
                                            ERDAT GE FECHA3 AND
                                            TRDAT EQ '00000000' AND
                                            CLASS EQ CLASS.
ENDFORM.                    " EXTRACCIÓN_US_BLOQUEAR
*&      Form VALIDAR_EXCEPCIONES
      text
--> p1        text
<-- p2        text
FORM VALIDAR_EXCEPCIONES.
    IF S_EXCEP NE SPACE.
        DELETE IT_USBLO WHERE BNAME EQ 'SAP*' OR
                              BNAME EQ 'DDIC' OR
                              BNAME EQ 'MAILADM' OR
                              BNAME EQ 'SAPGUEST' OR
                              BNAME EQ 'WF-BATCH' OR
                              BNAME IN S_EXCEP.
        DELETE IT_USBOR WHERE BNAME EQ 'SAP*' OR
                              BNAME EQ 'DDIC' OR
                              BNAME EQ 'MAILADM' OR
                              BNAME EQ 'SAPGUEST' OR
                              BNAME EQ 'WF-BATCH' OR
                              BNAME IN S_EXCEP.
    ELSE.
        DELETE IT_USBLO WHERE BNAME EQ 'SAP*' OR
                              BNAME EQ 'DDIC' OR
                              BNAME EQ 'MAILADM' OR
                              BNAME EQ 'SAPGUEST' OR
                              BNAME EQ 'WF-BATCH'.
        DELETE IT_USBOR WHERE BNAME EQ 'SAP*' OR
                              BNAME EQ 'DDIC' OR
                              BNAME EQ 'MAILADM' OR
                              BNAME EQ 'SAPGUEST' OR
                              BNAME EQ 'WF-BATCH'.
    ENDIF.
ENDFORM.                    " VALIDAR_EXCEPCIONES
*&      Form EJECUTAR_TRANS
      text
--> p1        text
<-- p2        text
FORM EJECUTAR_TRANS.
DATA: L TYPE I.
    DESCRIBE TABLE IT_USBLO LINES L.
    IF L GT 0.
        LOOP AT IT_USBLO.
            ADD 1 TO CONT.
            IF CHECK_T EQ SPACE.
                PERFORM EJECUTAR_US01 USING 'LOCK' IT_USBLO-BNAME.
            ENDIF.
            PERFORM LISTAR USING IT_USBLO-BNAME IT_USBLO-ERDAT
                                 IT_USBLO-TRDAT TR_MS 'LOCK'.
            AT LAST.
                ULINE /1(152).
            ENDAT.
        ENDLOOP.
    ENDIF.
    DESCRIBE TABLE IT_USBOR LINES L.
    IF L GT 0.
        CLEAR CONT.
        LOOP AT IT_USBOR.
            ADD 1 TO CONT.
            IF CHECK_T EQ SPACE.
                PERFORM EJECUTAR_US01 USING 'DELE' IT_USBOR-BNAME.
            ENDIF.
            PERFORM LISTAR USING IT_USBOR-BNAME IT_USBOR-ERDAT
                                 IT_USBOR-TRDAT TR_MS 'DELE'.
            AT LAST.
                ULINE /1(152).
            ENDAT.
        ENDLOOP.
    ENDIF.
ENDFORM.                    " EJECUTAR_TRANS
*&      Form EJECUTAR_US01
      text
     -->P_0154   text                                                *
FORM EJECUTAR_US01 USING VALCODE USUARIO.
REFRESH BDCDATAC.
MOVE: 'SAPLSUU5' TO BDCDATAC-PROGRAM,
      '0050'     TO BDCDATAC-DYNPRO,
      'X'        TO BDCDATAC-DYNBEGIN.
APPEND BDCDATAC.
CLEAR BDCDATAC.
MOVE: 'USR02-BNAME' TO BDCDATAC-FNAM, "Usuario SAP
       USUARIO TO BDCDATAC-FVAL.
APPEND BDCDATAC.
CLEAR BDCDATAC.
IF VALCODE EQ 'LOCK'.
MOVE: 'BDC_OKCODE' TO BDCDATAC-FNAM, "OK_CODE
      '=LOCK' TO BDCDATAC-FVAL.
APPEND BDCDATAC.
CLEAR BDCDATAC.
MOVE: 'SAPLSUU5' TO BDCDATAC-PROGRAM,
      '0500'     TO BDCDATAC-DYNPRO,
      'X'        TO BDCDATAC-DYNBEGIN.
APPEND BDCDATAC.
CLEAR BDCDATAC.
MOVE: 'BDC_OKCODE' TO BDCDATAC-FNAM, "OK_CODE
      '=LOCK' TO BDCDATAC-FVAL.
APPEND BDCDATAC.
CLEAR BDCDATAC.
ELSEIF VALCODE EQ 'DELE'.
MOVE: 'BDC_OKCODE' TO BDCDATAC-FNAM, "OK_CODE
      '=DELE' TO BDCDATAC-FVAL.
APPEND BDCDATAC.
CLEAR BDCDATAC.
MOVE: 'SAPLSPO1' TO BDCDATAC-PROGRAM,
      '0300'     TO BDCDATAC-DYNPRO,
      'X'        TO BDCDATAC-DYNBEGIN.
APPEND BDCDATAC.
CLEAR BDCDATAC.
MOVE: 'BDC_OKCODE' TO BDCDATAC-FNAM, "OK_CODE
      '=YES' TO BDCDATAC-FVAL.
APPEND BDCDATAC.
CLEAR BDCDATAC.
ENDIF.
CALL TRANSACTION 'SU01' USING BDCDATAC
       MODE 'N'
       UPDATE 'S'
       MESSAGES INTO BDCMSGCOLLM.
REFRESH BDCDATAC.
      MOVE BDCMSGCOLLM-MSGV1(30) TO TR_MS.
      CLEAR BDCMSGCOLLM.
      REFRESH BDCMSGCOLLM.
ENDFORM.                    " EJECUTAR_US01
*&      Form LISTAR
      text
     -->P_IT_USBLO_USUARIO text                                     *
FORM LISTAR USING CODUS FECHA1 FECHA2 MENSAGE ACC.
DATA: NOMBRE(50), LOCKSTATE LIKE USLOCK . "RM 06-04-05
Búsqueda del Nombre Completo del Usuario
    CLEAR NOMBRE.
    SELECT PERSNUMBER INTO USR21-PERSNUMBER FROM USR21
                      WHERE BNAME EQ CODUS.
    ENDSELECT.
    SELECT NAME_FIRST NAME_LAST INTO (ADRP-NAME_FIRST, ADRP-NAME_LAST)
                      FROM ADRP
                      WHERE PERSNUMBER EQ USR21-PERSNUMBER.
    ENDSELECT.
    CONCATENATE ADRP-NAME_FIRST ADRP-NAME_LAST INTO NOMBRE
                                SEPARATED BY SPACE.
    IF ACC EQ 'LOCK'.
        ADD 1 TO I.
        IF I EQ 1.
            ULINE /1(30).
            WRITE: / SY-VLINE, 2 TEXT-002, 30 SY-VLINE.
            ULINE /1(152).
            WRITE: / SY-VLINE, 2 TEXT-005, 15 SY-VLINE, 17 TEXT-009,
                   68 SY-VLINE, 70 TEXT-007, 93 SY-VLINE, 95 TEXT-006,
                   118 SY-VLINE, 120 TEXT-008, 152 SY-VLINE.
            ULINE /1(152).
        ENDIF.
        IF CONT EQ 1.
            FORMAT COLOR 2 INTENSIFIED ON.
        ELSEIF CONT EQ 2.
            CLEAR CONT.
            FORMAT COLOR 2 INTENSIFIED OFF.
        ENDIF.
      Búsqueda del Status de Bloqueo del Usuario
        CALL FUNCTION 'SUSR_USER_LOCKSTATE_GET'
             EXPORTING
                  USER_NAME           = CODUS
             IMPORTING
                  LOCKSTATE           = LOCKSTATE
             EXCEPTIONS
                  USER_NAME_NOT_EXIST = 1
                  OTHERS              = 2.
       IF LOCKSTATE-LOCAL_LOCK EQ 'X'.   "RM 06-04-05
           MOVE 'BLOQUEADO' TO MENSAGE.
       ELSE.
           CLEAR MENSAGE.
       ENDIF.
        WRITE: / SY-VLINE, 2 CODUS, 15 SY-VLINE, 17 NOMBRE,
                 68 SY-VLINE, 70 FECHA1, 93 SY-VLINE, 95 FECHA2,
                 118 SY-VLINE, 120 MENSAGE, 152 SY-VLINE.
    ELSEIF ACC EQ 'DELE'.
        ADD 1 TO P.
        IF P EQ 1.
            ULINE /1(30).
            WRITE: / SY-VLINE, 2 TEXT-003, 30 SY-VLINE.
            ULINE /1(152).
            WRITE: / SY-VLINE, 2 TEXT-005, 15 SY-VLINE, 17 TEXT-009,
                    68 SY-VLINE, 70 TEXT-007, 93 SY-VLINE, 95 TEXT-006,
                    118 SY-VLINE, 120 TEXT-008, 152 SY-VLINE.
            ULINE /1(152).
        ENDIF.
        IF CONT EQ 1.
            FORMAT COLOR 2 INTENSIFIED ON.
        ELSEIF CONT EQ 2.
            CLEAR CONT.
            FORMAT COLOR 2 INTENSIFIED OFF.
        ENDIF.
        WRITE: / SY-VLINE, 2 CODUS, 15 SY-VLINE, 17 NOMBRE,
                 68 SY-VLINE, 70 FECHA1, 93 SY-VLINE, 95 FECHA2,
                 118 SY-VLINE, 120 MENSAGE, 152 SY-VLINE.
    ENDIF.
ENDFORM.                    " LISTAR

Locking in movement

Similar Messages

Maybe you are looking for