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

Package: Registration

Routine: DGPTTS2


Information

DGPTTS2 ;ALB/JDS/PLT - FACILITY TREATING SPECIALTY AND 501 MOVEMENTS, cont. ;6/3/15 11:13am

Source Information

Source file <DGPTTS2.m>

Entry Points

Name Comments DBIA/ICR reference
LOOP1
ADT1
ONE ;delete in one ien/save in another ien for 25 icd codes and node 300
TD5
LOL
LOL1
ASIH
O1 ;filing saved movement 25 codes with poa and 300-node data
Q
CK ; -- checks for PTF# in ^DGPM and $D of the PTF in ^DGPT; Y = ifn of adm

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"warning: A PTF record does not exist for this admission - cannot edit",!?10,"Treating Specialty. MIS personnel and your supervisor should",!?10,"be notified."
  • Line Location: CK+2
Function Call: WRITE
  • Prompt: " The PTF option, 'Establish PTF record from Past",!?10,"Admission', may be used to create a PTF record."
  • Line Location: CK+3

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^DGPM - [#405] Classic Fileman Calls
^DGPT - [#45] Classic Fileman Calls
Info |  Source |  Entry Points |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call