`Refresh(2)` View Job To Program

`STRING(TODAY)`   `STRING(TIME, "HH:MM:SS")`

JobPrgID
Name
4GL Program
`JobPrg.JobPrgID`
`JobPrg.Name`
`JobPrg.PrgName`