Example - Manual - SIMATIC AX - Instructions that can be used for Freeport communication. - Siemens.Simatic.S71500.CommunicationsProcessor.PointToPoint,library

USING Siemens.Simatic.S71500.CommunicationsProcessor.PointToPoint;

PROGRAM SendP2PProgram
    VAR
        sendP2pData : MySendP2PData;
        sendP2P : SendP2P;
        SendBuffer : ARRAY[0..31] OF BYTE;
    END_VAR
    // set SendP2PData
    sendP2pData.PORT := WORD#16#115;
    // ...

    sendP2P(
            REQUEST := sendP2pData.REQUEST,
            PORT := sendP2pData.PORT,
            LENGTH := sendP2pData.LENGTH,
            BUFFER := SendBuffer,
            DONE => sendP2pData.DONE,
            ERROR => sendP2pData.ERROR,
            STATUS => sendP2pData.STATUS);
END_PROGRAM

TYPE
    MySendP2PData : STRUCT
        REQUEST : BOOL; 
        PORT : WORD := WORD#16#0;
        LENGTH : UINT := UINT#16#0000;
        DONE : BOOL; 
        ERROR : BOOL;
        STATUS : WORD := WORD#16#7000;
    END_STRUCT;
END_TYPE