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

Package: Event Capture

Routine: ECUTL


Information

ECUTL ;ALB/GTS/JAM - Event Capture Utilities ;23 Jul 2008

Source Information

Source file <ECUTL.m>

Entry Points

Name Comments DBIA/ICR reference
FNDVST(ECVST,ECRECNUM,EC2PCE) ; Search EC Patient records for associated Visits
FNDVSTQ
RSEND(ECIEN,ECPCE) ; Prepare EC Patient record for resending to PCE
RSENDQ
MODSCN() ;Screen CPT Procedure Modifier
ASKMOD(PROC,MOD,PRDT,ECMOD,ECERR) ; Ask CPT modifiers for CPT procedure
; Input PROC = CPT Procedure
; MOD = Default modifier
; PRDT = Date/Time of procedure. Checks modifier status
AGAIN
ASKMODQ
VALMOD(PROC,X,PRDT) ;Validate modifiers
MODHLP ;Help for CPT modifiers
MOD(ECIEN,MFT,OUTARR) ;Returns modifiers associated with an EC Patient IEN
; Input: ECIEN - IEN entry in file 721/^ECH(
; MFT - format to provide modifier
; "I" - ien format
; "E" - .01 format (default)

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !?2,"Modifier: ",SUB," Invalid - ",$P(DATA,U,2)
  • Line Location: ASKMOD+21
Function Call: WRITE
  • Prompt: !?2,"Modifier: ",SUB," ",$P(ECMOD(PROC,SUB),U)
  • Line Location: ASKMOD+25
Function Call: WRITE
  • Prompt: " ...deleted"
  • Line Location: AGAIN+6
Function Call: WRITE
  • Prompt: !?2,"Answer with CPT MODIFIER",!?1,"Choose from:"
  • Line Location: MODHLP+3
Function Call: WRITE
  • Prompt: !,?4,MOD
  • Line Location: MODHLP+4
Function Call: WRITE
  • Prompt: !?6,"You may enter a new CPT MODIFIER, if you wish"
  • Line Location: MODHLP+5
Function Call: WRITE
  • Prompt: !?6,"Enter a modifier that is valid for the CPT procedure code."
  • Line Location: MODHLP+6

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^ECH - [#721] GETS^DIQ
^ICPT - [#81] Classic Fileman Calls
^DIC(81.3 - [#81.3] Classic Fileman Calls
Info |  Source |  Entry Points |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call