January 10, 2022

Print code for $T Programs in Meditech C/S

  1. Select the Report DPM NPR.DOLT
  2. Enter a report name (any name you like)
  3. Page 1 will just need a Report Title and the Active field set to Y, and set Page Banner to NONE
  4. Add the following Footnotes:
    AL START start
    SFF NO
    EFF NO
    PFF NO
  5. File and translate your report
  6. Add a macro called start with the following code:
    ""^NPR.DOLT.program.name,
    DO{@Next(NPR.DOLT.program.name) IF{NPR.DOLT.program.name="IPL";
    1^/DOLT,
    NPR.DOLT.program.name^c.procedure.urn,
    %NPR.PROC.list.logic.M.compile(""),
    I("PROGRAM: "_c.procedure.urn)N^!,
    ""^X,
    DO{+/R.MV["D",X]^X I(/R.MV["D",X,10])N^!},
    ""^X,
    DO{@Add(1,X)'>3 N("")^!}}}
  7. File and translate your macro and then retranslate your report again

The code for the program IPL does not print via this report. I have found that the NPR.PROC.list.logic.M.compile macro crashes when printing the IPL program.

Topics: Report Writing, NPR Report

You Might Also Enjoy

Select the Report DPM NPR.PROC Enter a report name (any name you like) Page 1 will need a ...

Steps: Select the Report DPM NPR.DOLT Enter a report name (any name you like) Page 1 will ...

NPR.SEG.id.editor is a very useful routine in MEDITECH's C/S software that provides handy ...

Meditech's C/S software has a nice function for "spying" on your own "job". If you are ...

The Footnote FD (Field Delimiter) requires you to enter the ASCII code for a keystroke. ...