#SETG nChangedInstanceID:(instid)
#SETG nChangedAttrID:(attrid)
#SETG nChangedModelID:(modelid)
CC "Core" GET_CLASS_ID classname:"Paragraph"
SETL nParagraphClassID:(classid)
CC "Core" GET_ATTR_ID classid:(nParagraphClassID) attrname:("Link to the paragraph")
SETL nLinkedToParagraphAttrID:(attrid)
CC "Core" GET_CLASS_ID objid:(nChangedInstanceID)
SETL nCurrentClassID:(classid)
IF (nParagraphClassID = nCurrentClassID) {
  IF (nChangedAttrID = nLinkedToParagraphAttrID) {
    CC "Core" GET_ATTR_VAL objid:(nChangedInstanceID) attrname:("Link to the paragraph")
    SETL sNewAttrVal:(val)
    IF (sNewAttrVal = "ITEM \"<automatically>\" param:\"\"") {
      CC "Core" SET_ATTR_VAL objid:(nChangedInstanceID) attrname:("Paragraph Status") val:("Unavailable")
    } ELSE {
      CC "Core" SET_ATTR_VAL objid:(nChangedInstanceID) attrname:("Paragraph Status") val:("Changed")
    }
  }
}