Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Entry Points |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call
Print Page as PDF
Routine: MDPSU

Package: Clinical Procedures

Routine: MDPSU


Information

MDPSU ; HOIFO/NCA - CP/Medicine Report Generator Utility;5/18/04 09:48

Source Information

Source file <MDPSU.m>

Entry Points

Name Comments DBIA/ICR reference
EN1(MDGLO,MDDFN,MDSDT,MDEDT,MDMAX,MDPSC,MDALL) ; Return the List of Completed Studies
; Input: MDGLO - Return Global Array (Required)
; MDDFN - Patient DFN (Required)
; MDSDT - Start Date in FM Internal Format (Optional)
; MDEDT - End Date in FM Internal Format (Optional)
; MDMAX - Number of studies to return (Optional)
; MDPSC - Procedure Summary Code (Optional)
; MDALL - Return the all text reports with
; the procedures list (Optional)
; (Returns all studies for Patient, if no MDSDT, MDEDT,and MDMAX.)
GET702(MDGLO,MDDFN,MDC,MDSDT,MDEDT,MDMAX) ; Gather the new 702 entries
CPF ; Full Report - Health Summary Component
CPS ; One Line Summary Report
PR702 ; Return the Result Text for File 702 records
NXT
PR690 ; Return the Result text for File 690 Medicine report record
PRINT ; Print the text for Display
GETARY(MDG,MDCON) ; Get the Medicine Result
SETLINE(MDG,MDGL) ; Set Global Lines

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"No Procedure Data for the patient."
  • Line Location: CPF+7
Function Call: WRITE
  • Prompt: !,"No Procedure Data for the patient."
  • Line Location: CPS+6
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: PRINT+6

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^ORD(100.01 - [#100.01] GET1^DIQ
^GMR(123 - [#123] GET1^DIQ,  GETS^DIQ
^MDD(702 - [#702] GET1^DIQ
Info |  Source |  Entry Points |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call