SEFAZ do Pará altera web services autorização NF-e

[MSDN]

Segue link com a matéria : https://blog.tecnospeed.com.br/sefaz-do ... RD+Station

[JoséQuintas]

Pra quem usa sefazclass, só aviso de precaução:
Quando alterar, mover "PA" pro CASE de cima, de SVRS.

Código: Selecionar todos

STATIC FUNCTION SoapUrlNfe( aSoapList, cUF, cVersao )

   LOCAL nPos, cUrl

   nPos := AScan( aSoapList, { | e | cUF == e[ 1 ] .AND. cVersao == e[ 2 ] } )
   IF nPos != 0
      cUrl := aSoapList[ nPos, 3 ]
   ENDIF
   DO CASE
   CASE ! Empty( cUrl )
   CASE cUf $ "AC,AL,AP,DF,ES,PB,RJ,RN,RO,RR,SC,SE,TO"
      cURL := SoapURLNFe( aSoapList, "SVRS", cVersao )
   CASE cUf $ "MA,PA,PI"
      cURL := SoapUrlNFe( aSoapList, "SVAN", cVersao )
   ENDCASE

   RETURN cUrl