Open BucksGit opened 5 years ago
``
body { min-height: 75rem; background-color: black; font-family: 'Open Sans', sans-serif !important; }
a { color: #7056b0; }
mmmmm
italicas
` NOSKIP // No realiza eject al imprimir la línea
DO CASE
CASE Upper(Trim(&TipoLog)) = !'ERR'
&TextoLog = '|ERROR| ' + &TextoLog
IF &DEBUG_MODE = 1 &TextoLog = TtoC(Now(),0,8) + ': ' + &TextoLog ENDIF
PRINT LineaLog
PJSDN024.Call(&Pgmname, &pgfape, EventoTipo.Error, &TextoLog, &ConteoTotal, &Conteo_KO, &AplOrigen, &AplDestino)
CASE Upper(Trim(&TipoLog)) = !'MSG'
IF &DEBUG_MODE = 1
&TextoLog = TtoC(Now(),0,8) + ': ' + &TextoLog
ENDIF
PRINT LineaLog
PJSDN024.Call(&Pgmname, &pgfape, EventoTipo.Informativo, &TextoLog, &ConteoTotal,
&Conteo_KO, &AplOrigen, &AplDestino)
`
encabezado
ejemplo de una indicencia
fallando
`
body { min-height: 75rem; background-color: black; font-family: 'Open Sans', sans-serif !important; }
a { color: #7056b0; }`