Como gerar a linha 016 da DAPIMG?

Protheus 10, Protheus 11

Considerado através dos registro de Entrada.

Caso campo CFOP do documento de entrada (D1_CF) contenha:
1101/1102/1111/1113/1116/1117/1118/1120/1121/1122/1124/1125/1126/1401/1403/1501/1651/1652
Ou
D1_CF contenha 1653 e No cadastro da TES o Campo Credita ICMS (F4_CREDICM ) esteja diferente de Não;

ou No cadastro da TES o Campo Material de consumo (F4_CONSUMO diferente de Sim)

Ou
D1_CF contenha o CFOP 1949 e o campo Tipo Docto. (D1_TIPO) Seja Complemento de ICMS