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: PSXDODB1

Package: CMOP

Routine: PSXDODB1


Information

PSXDODB1 ;BIR/HTW-HL7 2.1 FILE AND PATIENT SAFETY CHECKS ;01/15/02 13:10:52

Source Information

Source file <PSXDODB1.m>

Entry Points

Name Comments DBIA/ICR reference
EN
TESTBT ;test the sequence of the messages in the batch
; stored in ^TMP($J,"PSXDOD",I)
ERRMSG ;send error message to PSXCMOPMGR key and copy file to pending.
CHECK ;patient safety check; pull variables from segments/elements
BLDSEQ ;build check sequence of SEGMENTS
SEGBLD ; data for checking sequencing of segments.
PIECE(REC,DLM,XX) ;
; Set variable V = piece P of REC using delimiter DLM
PUT(REC,DLM,XX) ;
; Set Variable V into piece P of REC using delimiter DLM
EXIT ;
LOAD ; used for testing seperate from the call from PSXDODB

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: " ",SEG," "
  • Line Location: TESTBT+8
Function Call: WRITE
  • Prompt: !,"Batch Orders ",PSXERR,!,$G(PTCNTB),?40,$G(PTCNT)
  • Line Location: TESTBT+15
Function Call: WRITE
  • Prompt: !
  • Line Location: ERRMSG+13
Function Call: WRITE
  • Prompt: !,PSXTXT(I,0)
  • Line Location: ERRMSG+13
Function Call: WRITE
  • Prompt: !,"Order Batch ID ",PSXERR,!,BATIDM,?40,BATIDB
  • Line Location: CHECK+5
Function Call: WRITE
  • Prompt: !,"Order Sequence ",PSXERR,!,ORDSEQG,?40,ORDSEQH
  • Line Location: CHECK+7
Function Call: WRITE
  • Prompt: !,"RX Number ",PSXERR,!,RXIDR,?40,RXIDZ
  • Line Location: CHECK+10
Function Call: WRITE
  • Prompt: !,"Batch Orders ",PSXERR,!,PTCNTB,?40,PTCNT
  • Line Location: CHECK+14
Function Call: WRITE
  • Prompt: !,"Batch Totals ",PSXERR,!,ORDCNTB,?40,ORDCNT
  • Line Location: CHECK+16

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^PSX(554 - [#554] GET1^DIQ
Info |  Source |  Entry Points |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call