Quintiq file version 2.0 
 | 
#parent: pPP/bPP 
 | 
Response OnClick () id:Response_pPP_bPP_OnClick 
 | 
{ 
 | 
  #keys: '[413988.0.1186700628]' 
 | 
  CanBindMultiple: false 
 | 
  DefinitionID: 'Responsedef_WebButton_OnClick' 
 | 
  QuillAction 
 | 
  { 
 | 
    Body: 
 | 
    [* 
 | 
      try { 
 | 
        uploadJsonString := Application.GetFile(); 
 | 
        if ( uploadJsonString <> "" ) { 
 | 
          uploadJson := JSON::Parse( uploadJsonString ); 
 | 
          Archive::VerifyTheFileName( uploadJson ); 
 | 
           
 | 
          fileName := uploadJson.Get( "name" ).GetString(); 
 | 
          base64String := uploadJson.Get( "data" ).GetString(); 
 | 
               
 | 
          webFileBinaryData := BinaryData::FromBase64EncodedString( base64String ); 
 | 
           
 | 
          efPP.Text( fileName ); 
 | 
          dhOriginalFileNamePP.Data( fileName ); 
 | 
          dhBinaryDataPP.Data( &webFileBinaryData ); 
 | 
        } 
 | 
      } onerror { 
 | 
        WebMessageBox::Error( e.GeneralInformation() ); 
 | 
      } 
 | 
    *] 
 | 
    GroupServerCalls: false 
 | 
  } 
 | 
} 
 |