Function to Add Leading Characters to a Value or Field

No votes yet

A function to facilitate the addition of a leading character to a field value. The function takes three parameters:
- &LEADCHAR: The character you want to append to your value.
- &FIELDZISE: The over all size of your value after appending your desired character.
- &FIELDVALUE: The value you want to append the character to.

Function add_leading_char(&LEADCHAR, &FIELDSIZE, &FIELDVALUE, &RESULTFIELD);
   /*this function accepts a character value, fieldsize parameter, and a field value parameter and adds a leading character up to the size of the field.  The result is passed back in a result field.*/
   &LEADCHAR = Left(&LEADCHAR, 1);
   &FIELDVALUE = String(&FIELDVALUE);
   &FIELDLEN = Len(&FIELDVALUE);
   &FIELDFILL = &FIELDSIZE - &FIELDLEN;
   &LEFT_HALF = Rept(&LEADCHAR, &FIELDFILL);
   &RESULTFIELD = &LEFT_HALF | &FIELDVALUE;
End-Function;

/*Example calling the above function*/
&CHAR = "0";
&FIELDSIZE = 5;
&FIELDVALUE = 7;
add_leading_char(&CHAR, &FIELDSIZE, &FIELDVALUE, &RESULTFIELD);

/*after execution, the &RESULTFIELD value would be equal to 00007*/

Please try to help out with unanswered topics on the forum. Chances are you have had the same issue/question some time in your IT career!

Comments

Have a question? Please ask it on the forum instead.

Post new comment

The content of this field is kept private and will not be shown publicly.
CAPTCHA
The question below is to prevent automated spam submissions.
Image CAPTCHA
Enter the characters shown in the image.