Para imprimir o nome da cidade e UF do cadastro da empresa segue exemplo abaixo:

oPrint:Say(nLin,1120,ALLTRIM(SM0->M0_CIDENT)+"-"+SM0->M0_ESTENT+","+STRZERO(DAY(DDATABASE),2)+" de "+MESEXTENSO(DDATABASE)+" de "+StrZero(YEAR(DDATABASE),4))

Máscara para formatação de campos:

Máscara para CEP
TRANSFORM(POSICIONE("SA1",1,xFilial("SA1")+TRA->AB3_CODCLI+TRA->AB3_LOJA,"A1_CEP"),"@R 99999-999")

Máscara para CNPJ
TRANSFORM(POSICIONE("SA1",1,xFilial("SA1")+TRA->AB3_CODCLI+TRA->AB3_LOJA,"A1_CGC"),"@R 99.999.999/9999-99")

Máscara para TELEFONE
TRANSFORM(POSICIONE("SA1",1,xFilial("SA1")+TRA->AB3_CODCLI+TRA->AB3_LOJA,"A1_DDD+A1_TEL"),"@R (99)9999-9999")

ERP Microsiga Protheus

O ADVPL (Advanced Protheus Language) é uma linguagem de programação desenvolvida pela Microsiga e que contém todas as instruções e funções necessárias ao desenvolvimento de um sistema, independente de sua complexidade.

O PROTHEUS, por outro lado, é uma plataforma tecnológica que engloba um Servidor de Aplicação, um Dicionário de Dados e as Interfaces para conexão com o usuário. É o Protheus que executa o código ADVPL e o devido acesso à base da dados.