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 |  Used in RPC |  FileMan Files Accessed Via FileMan Db Call  | All
Print Page as PDF
Routine: MDRPCOO

Package: Clinical Procedures

Routine: MDRPCOO


Information

MDRPCOO ; HOIFO/DP - Object RPCs (TMDOutput) ; [03-24-2003 15:44]

Source Information

Source file <MDRPCOO.m>

Entry Points

Name Comments DBIA/ICR reference
ANALYZE ; [Procedure] Analyze an insturment interface
; Checks the CP instrument file for completeness of an entry.
; Special Note, variable RTN actually contains the IEN of the
; entry.
DIQ(DD,IENS) ; [Procedure] Gather data about an entry
; Input parameters
; 1. DD [Literal/Required] DDNumber
; 2. IENS [Literal/Required] IENS of entry to retrieve
EXECUTE ; [Procedure] Execute the output
EXIT ; [Procedure] Cleanup
HFSCLOSE(HANDLE) ; [Procedure]
; Input parameters
; 1. HANDLE [Literal/Required] File Handle
HFSOPEN(HANDLE) ; [Procedure] Open Host File for output
; Input parameters
; 1. HANDLE [Literal/Required] File Handle
INIT ; [Procedure] Cleanup environment before starting
INST(IEN) ; [Procedure] Display Instrument
; Input parameters
; 1. IEN [Literal/Required] Instrument IEN or * for all
LINE(DD,IENS,FIELD,COL,TITLE) ; [Procedure] Display a default line of a field loaded from DIQ above
; Input parameters
; 1. DD [Literal/Required] DD Number
; 2. IENS [Literal/Required] Record IENS
; 3. FIELD [Literal/Required] Field number
; 4. COL [Literal/Required] Column for data
; 5. TITLE [Literal/Required] Use FileMan TITLE:1 or LABEL:0
PAR ; [Procedure] Display System Parameters
; Variables:
; MD: [Private] Scratch
; MDLST: [Private] Scratch
; MDMULT: [Private] Scratch
; MDPAR: [Private] Scratch
; MDWP: [Private] Scratch
PROC(IEN) ; [Procedure] Display a procedure
; Input parameters
; 1. IEN [Literal/Required] Procedure IEN or * for all
RPC(RESULTS,OPTION,RTN) ; [Procedure] Main RPC for TMD_Output Object
; RPC: [MD TMDOUTPUT]
EXT(VALUE,LENGTH) ; [Function] $Extract with ... trailer
; Input parameters
; 1. VALUE [Literal/Required] Value to truncate
; 2. LENGTH [Literal/Required] Result length

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: $$LINE(702.09,IEN_",",.01,0,1),!!
  • Line Location: INST+15
Function Call: WRITE
  • Prompt: $S($G(TITLE):$$GET1^DID(DD,FIELD,"","TITLE"),1:$$GET1^DID(DD,FIELD,"","LABEL"))
  • Line Location: LINE+10
Function Call: WRITE
  • Prompt: ": ",?($G(COL,0)),$S(^TMP($J,DD,IENS,FIELD)]"":^(FIELD),1:"<Blank>")
  • Line Location: LINE+11
Function Call: WRITE
  • Prompt: "System Parameters For: ",$$KSP^XUPARAM("WHERE")
  • Line Location: PAR+10
Function Call: WRITE
  • Prompt: !," Value: ",$$GET^XPAR("SYS",MDPAR,,"E")
  • Line Location: PAR+21
Function Call: WRITE
  • Prompt: !?2,MDWP(X,0)
  • Line Location: PAR+24
Function Call: WRITE
  • Prompt: $$LINE(702.01,IEN_",",.01,0,1),!
  • Line Location: PROC+16
Function Call: WRITE
  • Prompt: !!,"Associated Instruments",!,$TR($J("",30)," ","-"),!
  • Line Location: PROC+20
Function Call: WRITE
  • Prompt: ?5,"<None>"
  • Line Location: PROC+22
Function Call: WRITE
  • Prompt: $P(^(X,0),U,2),!
  • Line Location: PROC+23

Used in RPC

RPC Name Call Tags
MD TMDOUTPUT RPC

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^MDS(702.01 - [#702.01] LIST^DIC
702.011 LIST^DIC
^MDS(702.09 - [#702.09] LIST^DIC
Info |  Source |  Entry Points |  Interaction Calls |  Used in RPC |  FileMan Files Accessed Via FileMan Db Call  | All