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

Package: Registration

Routine: DGMTAUD1


Information

DGMTAUD1 ;ALB/CAW,LD,BRM - Audit Changes to Means Tests - Con't ; 12/20/01 9:07am

Source Information

Source file <DGMTAUD1.m>

Entry Points

Name Comments DBIA/ICR reference
D(I) ;Date function
U(I) ;User function
C(I) ;Change type function
SR(I,DGMTI) ;Get source of test
S(I) ;MT status
A(I) ;Agree to pay deduct
HDR ;Header

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: @IOF,!,"PATIENT: ",$E(DGNAM,1,38),?40,$P("MEANS^COPAY^^LTC EXEMPTION","^",DGMTYPT)_" TEST DATE: ",$$D^DGMTAUD1(DGMTD),!
  • Line Location: HDR+1
Function Call: WRITE
  • Prompt: ?40,$$SR^DGMTAUD1($G(^DGMT(408.31,DGMTI,0)))_" "_$P("MEANS^COPAY^^LTC EXEMPTION","^",DGMTYPT)_" TEST",!
  • Line Location: HDR+2
Function Call: WRITE
  • Prompt: ?33,"CHANGES",!!
  • Line Location: HDR+3
Function Call: WRITE
  • Prompt: ?2,"Date",?23,"Type of Change",?57,"User",!,DGDASH,!
  • Line Location: HDR+4

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^DIC(4 - [#4] FIND^DIC
^DGMT(408.31 - [#408.31] GET1^DIQ
Info |  Source |  Entry Points |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call