INCLUDE prprom01.lst

VARIAVEL Z_DATAATE = DATE()
variavel zpgpreco = "  "
variavel zptipo   = "     "     
variavel zpref    = "     "     
variavel zpposicao= "          "     

T6,4,17,76,Parametros
T3,3,Zerar Precos Promocionais Com Vigencia da Promocao Ate:,8,z_dataate,99.99.99
T5,3,Grupo de Precos........:,2,zpgpreco,XX
T6,3,Tipo de Produtos.......:,5,zptipo,XXXXX
T7,3,Referencia dos Produtos:,5,zpref,XXXXX
T8,3,Posicao dos Produtos...:,10,zpposicao,XXXXXxxxxxx

FILTRO "/"+alltrim(ZPGPRECO)+"/" == "//" .OR. alltrim(zpgpreco)=alltrim(pgpreco)
FILTRO "/"+alltrim(ZPref)   +"/" == "//" .OR. alltrim(zpref)=alltrim(pref)
FILTRO "/"+alltrim(ZPtipo)  +"/" == "//" .OR. alltrim(zptipo)=alltrim(ptipo)
FILTRO "/"+alltrim(Zpposicao)+"/"== "//" .OR. alltrim(zpposicao)=alltrim(pposicao)


C
C **** Relacao de Produtos com Precos Promocionais Zerados Ate [z_dataate]
C

COMANDO DURANTE REGLOCK()
COMANDO DURANTE PUT_VAR("pvluven2",  0 )
COMANDO DURANTE PUT_VAR("pdataprog", ctod("") )

