Verified Answers

If an answer to your question is correct, click on "Verify Answer" under the "More" button. The answer will now appear with a checkmark. Please be sure to always mark answers that resolve your issue as verified. Your fellow Community members will appreciate it!  Learn more

  • State Suggested Answer
  • Replies reply
    1
  • Answers answer
    1
  • Subscribers subscribers
    169
  • Views views
    318
  • Users 0 members are here
  • Locked Locked
Related
Options
This discussion has been locked.
You can no longer post new replies to this discussion. If you have a question you can start a new discussion

Variable handling

Nicolas Fornere

Variable handling
I am programming a script in appscript.
executes in an action in an SBM form. the execution ends in the execution of a .bat with parameters.
The first inconvenience is the value of one of these variables (description,of type text), which is a text field with spaces and the .bat receives x number of parameters, I need to send all of these as one, I tried several options but they didn't work for me. the second drawback is handling with dates. (fecha_inicio of type datetime)
and the third is the user who started the workflow(requested_byof type user)

I share my code, any contribution will be very well received. thank you

Option Explicit
' MODIFY THIS CONSTANT FOR YOUR DATABASE
' --------------------------------------
const rp_id = "ISSUEID"
const cmdb_ci = "TMPSIGLA"
const description = "DESCRIPTION"
const fecha_inicio = "TEMP_SCHEDULE_START_DATE"
const requested_by = "RLM_DEVELOPER"
' Name of the field we will work with
' MODIFY THIS CONSTANT FOR YOUR SYSTEM
' ------------------------------------
' Path to the .BAT file
const SCRIPT = "D:\Serena\Scripts\Service-now\crear.bat"


LaunchBatchFile

' Gather params from item fields, pass them to .BAT file.
Sub LaunchBatchFile()

Dim exitCode, irp_id, icmdb_ci, idescription, ifecha_inicio, irequested_by


Call Shell.Item.GetFieldValue( rp_id, irp_id)
Call Shell.Item.GetFieldValue( cmdb_ci, icmdb_ci)
Call Shell.Item.GetFieldValue( cmdb_ci, idescription)
Call Shell.Item.GetFieldValue( requested_by, irequested_by)
Call Shell.Item.GetFieldValue( fecha_inicio, ifecha_inicio)


' Run the .BAT file with params
exitCode = Ext.NewTaskWait(SCRIPT, irp_id, icmdb_ci, idescription)


End Sub

Tags:

  • Suggested Answer

    0

    The "requested_by" field will contain the TS_ID of the user.  If you want the user's name, loginID or email you will need to get it from TS_USERS.

    For the date field, try using the VBScript "FormatDateTime" function to convert it to a string.

    The "Description" field needs to have control characters escaped.  Below is some code I use to do that. The was originally in an SQL script and I've modified it for VBScript.  Hopefully it doesn't cause any "line too long" problems.  The code handles some system fields in the TS_REPORTS table so it has conversions for the SOH, STX and ETX characters.

    ' Fix a string that may contain quotes or other ASCII chars.
'     Used to clean up fields read from TS_REPORTS, among other things.
Function EscapeString(str)
   EscapeString = _
      Replace(  _
         Replace(  _
            Replace(  _
               Replace(  _
                  Replace(  _
                     Replace(  _
                        Replace(  _
                           Replace(  _
                              Replace(  _
                                 Replace(  _
                                    Replace(  _
                                       Replace(  _
                                          Replace(  _
                                             Replace(  _
                                                Replace(str , Chr(7) , "\bel"),  _
                                             Chr(8),"\bs"),  _
                                          Chr(9),"\t"),  _
                                       Chr(10),"\n"),  _
                                    Chr(11),"\vt"),  _
                                 Chr(12),"\ff"),  _
                              Chr(13),"\r"),  _
                           Chr(34),"""),  _
                        Chr(39),"'"),  _
                     Chr(60),"<"),  _
                  Chr(62),">"),  _
               Chr(96),"`"),  _
            Chr(1),"{SOH}"),  _
         Chr(2),"{STX}"),  _
      Chr(3),"{ETX}")
)

Resources

Support
Documentation
Learning Services
Partner Programs
Privacy
Compliance
Help
Company
Privacy Policy
Terms of Use
Cookies Preferences
Accessibility
Anti-Slavery Statement
Support
Contact Us
Careers
Code of Business Conduct and Ethics
The opinions expressed above are the personal opinions of the authors, not of OpenText. By using this site, you accept the Terms of Use. Certain versions of content ("Material") accessible here may contain branding from Hewlett-Packard Company (now HP Inc.), Hewlett Packard Enterprise Company, or Micro Focus. As of January 31, 2023, the Material is now offered by OpenText, a separately owned and operated company. Any reference to the HP, Hewlett Packard Enterprise/HPE, and Micro Focus marks is historical in nature and the HP, Hewlett Packard Enterprise/HPE, and Micro Focus marks are the property of their respective owners.