#uservalu | Explore Tumblr Posts and Blogs

femalestunning · 6 months

Text

ester expósito via instagram

201 notes · View notes

narcobarbies · 5 months

Text

DANNA PAOLA via instagram

95 notes · View notes

elitenetflixsource · 2 years

Text

ÉLITE NETFLIX via Instagram

#elite #elite netflix #valentia zenere #uservalu #ours #videos #news #aljoscha*

6 notes · View notes

carolamandaus · 1 month

Text

Mastering On-Page SEO:

Your content should be easily readable, well-organized, and free from grammatical errors. Utilize headings, subheadings, bullet points, and concise paragraphs to enhance the readability of your content.

#OnPageSEO #ContentCreation #KeywordResearch #UserValue #HighQualityContent #SEOStrategy

0 notes

exceltricks · 7 months

Link

#Aufgabenpriorisieren #BusinessValue #Controllinginstrument #CostofDelay #CustomerValue #Entwicklungskosten #ExcelDatei #ExcelVorlage #Excel-Tool #InternerAufwand #JobSize #KomplexitätderImplementierung #OpportunityEnablementValue #Projektpriorisierung #RiskReduction #UserValue #WeightedShortestJobFirst #WertDegression #WSJF

0 notes

craigbrownphd-blog-blog · 6 years

Text

Tip: How To Get SAP GUI Scripting Profile Parameters with PowerShell and NCo

Often it is necessary to set the SAP GUI Scripting parameters with transaction code RZ11 in an SAP system. In this post I will present an example how to get and set this parameters via a PowerShell script and NCo. In the first step the script gets the attributes from sapgui/user_script% from table TPFYPROPTY. Then it looks whether the attribute can be changed. If it is possible it gets via RFM PFL_GET_PARAMETER_INFO the user and the default value. Then it compares this values with the necessary standard and if they are different it changes the value. If I use the RFM TH_CHANGE_PARAMETER via NCo, it delivers always the error NOT_IN_SAME_SYSTEM. So I programmed a wrapper Z_TH_CHANGE_PARAMETER which adds DESTINATION ‘NONE’ to the call. #-Begin----------------------------------------------------------------- #-Loads SAP dotNET Connector Libraries---------------------------------- Function Load-NCo { [String]$ScriptDir = $PSScriptRoot If ([Environment]::Is64BitProcess) { [String]$Path = $ScriptDir + "\x64\" } Else { [String]$Path = $ScriptDir + "\x86\" } [String]$File = $Path + "sapnco.dll"; Add-Type -Path $File $File = $Path + "sapnco_utils.dll"; Add-Type -Path $File } #-Delivers SAP Destination---------------------------------------------- Function Get-Destination { $cfgParams = New-Object SAP.Middleware.Connector.RfcConfigParameters $cfgParams.Add($cfgParams::Name, "TEST") $cfgParams.Add($cfgParams::AppServerHost, "ABAP702") $cfgParams.Add($cfgParams::SystemNumber, "00") $cfgParams.Add($cfgParams::Client, "001") $cfgParams.Add($cfgParams::User, "BCUSER") $SecPasswd = Read-Host -Prompt "Passwort" -AsSecureString $ptrPasswd = ` [Runtime.InteropServices.Marshal]::SecureStringToBStr($SecPasswd) $Passwd = ` [Runtime.InteropServices.Marshal]::PtrToStringBStr($ptrPasswd) $cfgParams.Add($cfgParams::Password, $Passwd) Return [SAP.Middleware.Connector.RfcDestinationManager]::GetDestination($cfgParams) } #-Shows SAP GUI Scripting Parameters from Transaction Code RZ11--------- Function Get-SAPGUIScriptingParams { $destination = Get-Destination $RfcReadTable = $destination.Repository.CreateFunction("RFC_READ_TABLE") $RfcParamInfo = $destination.Repository.CreateFunction("PFL_GET_PARAMETER_INFO") #$RfcParamChange = $destination.Repository.CreateFunction("TH_CHANGE_PARAMETER") $RfcParamChange = $destination.Repository.CreateFunction("Z_TH_CHANGE_PARAMETER") #-Get Parameter Attributes from SAP GUI Scripting--------------------- $RfcReadTable.SetValue("QUERY_TABLE", "TPFYPROPTY") $RfcReadTable.SetValue("DELIMITER", ";") [SAP.Middleware.Connector.IRfcTable]$Fields = $RfcReadTable.GetTable("FIELDS") $Fields.Append() $Fields.SetValue("FIELDNAME", "PARANAME") #Profile parameter name $Fields.Append() $Fields.SetValue("FIELDNAME", "CHG") #Flag for changes $Fields.Append() $Fields.SetValue("FIELDNAME", "DESCR") #Short description $Fields.Append() $Fields.SetValue("FIELDNAME", "DYNAMIC") #Param. can be changed dynamically [SAP.Middleware.Connector.IRfcTable]$Options = $RfcReadTable.GetTable("OPTIONS") $Options.Append() $Options.SetValue("TEXT", "PARANAME LIKE 'sapgui/user_script%'") $RfcReadTable.Invoke($destination) [SAP.Middleware.Connector.IRfcTable]$Table = $RfcReadTable.GetTable("DATA") ForEach ($Line In $Table) { [System.Array]$Data = $Line.GetValue("WA").Split(";") If ($Data[1] -ne "X" -or $Data[3] -ne "X") { #Check if Param. can be changed Continue } $RfcParamInfo.SetValue("PARNAME", $Data[0]) $RfcParamInfo.SetValue("PARTYPE", "I") $RfcParamInfo.Invoke($destination) [SAP.Middleware.Connector.IRfcStructure]$SubVal = ` $RfcParamInfo.GetStructure("SUB_VAL") Write-Host $SubVal.GetValue("NAME") $SubVal.GetValue("USERVALUE") ` $SubVal.GetValue("DEFVALUE") Switch ($SubVal.GetValue("NAME")) { "sapgui/user_scripting" { If ($SubVal.GetValue("USERVALUE") -ne "TRUE" -and ` $SubVal.GetValue("DEFVALUE") -ne "TRUE") { $RfcParamChange.SetValue("PARAMETER_NAME", "sapgui/user_scripting") $RfcParamChange.SetValue("PARAMETER_VALUE", "TRUE") $RfcParamChange.Invoke($destination) } } { @("sapgui/user_scripting_disable_recording", "sapgui/user_scripting_force_notification", "sapgui/user_scripting_per_user", "sapgui/user_scripting_set_readonly") -contains $_ } { If ($SubVal.GetValue("USERVALUE") -ne "FALSE" -and ` $SubVal.GetValue("DEFVALUE") -ne "FALSE") { $RfcParamChange.SetValue("PARAMETER_NAME", $SubVal.GetValue("NAME")) $RfcParamChange.SetValue("PARAMETER_VALUE", "FALSE") $RfcParamChange.Invoke($destination) } } } } } #-Main Function--------------------------------------------------------- Function Main () { If ($PSVersionTable.PSVersion.Major -ge 5) { Load-NCo Get-SAPGUIScriptingParams } } #-Main------------------------------------------------------------------ Main #-Error Routine--------------------------------------------------------- Trap { [System.Reflection.Assembly]::LoadWithPartialName("System.Windows.Forms") > $Null [Void][System.Windows.Forms.MessageBox]::Show( ` $_.Exception.GetType().FullName + ` [System.Environment]::NewLine + ` "Error at line " + $_.InvocationInfo.ScriptLineNumber + ` " in " + $_.InvocationInfo.ScriptName + ` [System.Environment]::NewLine + [System.Environment]::NewLine + ` $_.Exception.Message, "An Error Occurred", 0) Exit } #-End------------------------------------------------------------------- Here the result: Here the RFM wrapper for TH_CHANGE_PARAMETER: FUNCTION Z_TH_CHANGE_PARAMETER. *"---------------------------------------------------------------------- *"*"Lokale Schnittstelle: *" IMPORTING *" VALUE(PARAMETER_NAME) LIKE TPFET-PARNAME *" VALUE(PARAMETER_VALUE) LIKE TPFET-PVALUE *" VALUE(CHECK_PARAMETER) LIKE SY-INDEX DEFAULT 1 *" EXCEPTIONS *" NOT_AUTHORIZED *" NOT_IN_SAME_SYSTEM *" NOT_CHANGEABLE *" NOT_FOUND *" INVALID_VALUE *" SHMPRF_ERROR *" UNKNOWN_OPCODE *" LENGTH_EXCEEDED *" UNKNOWN *"---------------------------------------------------------------------- CALL FUNCTION 'TH_CHANGE_PARAMETER' DESTINATION 'NONE' EXPORTING PARAMETER_NAME = PARAMETER_NAME PARAMETER_VALUE = PARAMETER_VALUE EXCEPTIONS NOT_AUTHORIZED = 1 NOT_IN_SAME_SYSTEM = 2 NOT_CHANGEABLE = 3 NOT_FOUND = 4 INVALID_VALUE = 5 SHMPRF_ERROR = 6 UNKNOWN_OPCODE = 7 LENGTH_EXCEEDED = 8 OTHERS = 9. CASE sy-subrc. WHEN 1. RAISE NOT_AUTHORIZED. WHEN 2. RAISE NOT_IN_SAME_SYSTEM. WHEN 3. RAISE NOT_CHANGEABLE. WHEN 4. RAISE NOT_FOUND. WHEN 5. RAISE INVALID_VALUE. WHEN 6. RAISE SHMPRF_ERROR. WHEN 7. RAISE UNKNOWN_OPCODE. WHEN 8. RAISE LENGTH_EXCEEDED. WHEN 9. RAISE UNKNOWN. ENDCASE. ENDFUNCTION. On this way it is easy possible to check and to set the profile parameters for SAP GUI Scripting. Also this example is a good base to do the same with other profile parameters. Enjoy it. Cheers Stefan http://bit.ly/2k0XoFO #SAP #SAPCloud #AI

0 notes

femalestunning · 5 months

Text