Perguntas M460FIM Transmissão NF-E

Luizão,

Criei um fonte e chamei ele dentro do M460FIM, ficou da seguinte forma.

#Include 'Protheus.ch'

User Function EnvSefazS( _cSerie, _cDoc )

Local cURL := ""
Local lOk := .T.
Local oWs
Local cAmbiente
Local cIdEnt

oWs := WsSpedCfgNFe():New()
cURL := PadR(GetMv("MV_SPEDURL"),250)
If CTIsReady()

oWS:cUSERTOKEN := "TOTVS"
oWS:cID_ENT := cIdEnt
oWS:nAmbiente := 0
oWS:_URL := AllTrim(cURL)+"/SPEDCFGNFe.apw"
lOk := oWS:CFGAMBIENTE()
cAmbiente := oWS:cCfgAmbienteResult
cAmbiente := Substr(cAmbiente,1,1)
AutoNfeEnv(cEmpAnt,SF2->F2_FILIAL,"0","2",SF2->F2_SERIE,SF2->F2_DOC,SF2->F2_DOC)
Endif
Return

Só que eu estou tendo erro nessa linha:

cAmbiente := Substr(cAmbiente,1,1)

Ele dá aquele erro de expected onde esperava caracter mas recebeu uma variável tipo U, eu debuguei e o valor vem como NIL, você tem alguma idéia?

Abraços.