Type : CREATION_INTERNE
Les données sont fournies directement via les paramètres de la macro (`str` et `dlm`). Aucune lecture de fichier externe ou de librairie SAS n'est effectuée.
| 1 | %macro AHGindex2(str,dlm); |
| 2 | %local i one RESULT; |
| 3 | %let RESULT=0; |
| 4 | %DO i=1 %to %LENGTH(&str); |
| 5 | %IF %qsubstr(&str,&i,1) = &dlm and (&RESULT=0) and (&one=1) %THEN %let RESULT=&i; |
| 6 | %IF %qsubstr(&str,&i,1) eq &dlm %THEN %let one=1; |
| 7 | %END; |
| 8 | &RESULT |
| 9 | %mend; |