Perguntas Valida Rateio - Doc de Entrada e Pedido de compra

Pessoal, bom dia.

Preciso criar uma validação via ponto de entrada para obrigar o usuário a informar o Centro de Custo e Conta Contábil no Doc de Entrada e no Pedido de Compra.
Consigo validar os campos da linha selecionada em SC7 e SD1, mas estou me batendo para consultar se existe ou não algum rateio informado.

Alguém tem alguma sugestão de como fazer isso?

Obrigado,

Pessoal, bom dia!

Alguma dica sobre como capturar os campos da tela de rateio?
Qualquer ajuda é bem vinda.

Obrigado!

Não sei se te ajuda, mas tem uma ponto de entrada que usamos aqui.

MT100LOK

basicamente isso

Local _nRateio := aScan( aHeader, {|x| UPPER(AllTrim(x[2])) == "D1_RATEIO" })

depois tem esse if

If aCols[n][_nRateio]<>"1"
If (Empty(aCols[n][_nPConta]) .Or. Empty(aCols[n][_nPITCTA])) .AND. !('LEXML' $ ALLTRIM(FUNNAME()))
//If (Empty(aCols[n][_nPConta]) .Or. Empty(aCols[n][_nPITCTA])) .AND. ALLTRIM(FUNNAME()) <> "U_LEXML" .AND. ALLTRIM(FUNNAME()) <> "U_LEXMLSC"
_cProd := Trim(SB1->B1_COD) + '-' + Trim(SB1->B1_DESC)
MsgBox( 'Informe a Conta Contábil e Item Contábil - Campos Obrigatório se o Item da NFE não foi Rateado - Verifique!', _cProd )
_lOk := .F.
EndIf