Delete document from Backend

l_entity_name varchar2(20)                :=  'PO_LINES';   
l_pk1_value varchar2 (20)                  :=  '12345';      
l_delete_document_flag varchar2 (1)   :=  'Y';     

BEGIN

fnd_global.apps_initialize ( user_id          =>  &v_user_id
                                   ,resp_id          =>  &v_resp_id
                                   ,resp_appl_id  =>  &v_resp_appl_id);
fnd_attached_documents2_pkg.delete_attachments
( X_entity_name                 =>  l_entity_name
, X_pk1_value                    =>   l_pk1_value
, X_delete_document_flag    =>   l_delete_document_flag); 
END;