Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables |  All
Print Page as PDF
Routine: DGPTRPO

Package: Registration

Routine: DGPTRPO


Information

DGPTRPO ;ALB/MTC,HIOFO/FT - RECORD PRINT OUT (RPO);5/26/15 3:24pm

Source Information

Source file <DGPTRPO.m>

Call Graph

Call Graph

Call Graph Total: 13

Package Total Call Graph
VA FileMan 5 NOW^%DTC  FILE^DICN  ^DIE  ^DIK  ^DIR  
Registration 4 ROUTER^DGPTFTR  LO^DGUTL  $$SITE^VASITE  ^VATRAN  
Kernel 2 HOME^%ZIS  $$REPEAT^XLFSTR  
MailMan 2 GET^XMA2  ENT1^XMD  

Caller Graph

Legends:

Legend of Colors

Package Component Superscript legend

protocol O screenman SM broker B event driver Ed print P extended action Ea limited protocol LP edit E server Se subscriber Su inquire I run routine RR action A

Caller Graph

Caller Graph Total: 6

Package Total Caller Graph
Registration 6 DGPT 150  DGPT 151  DGPT TOOL RPO  DGPTF09X  DGPTOOL  DGPTRPP  

Entry Points

Name Comments DBIA/ICR reference
CHKFLD ;-- check data for valid entries
EN ;-- generic N15x call. Record Print-Out (RPO) [DGPTTOOL RPO]
CHKFLDQ ;
EDIT
FMT ;-- select format 150/151; set trans router to PTF125
TRAN ;
SEND
HDRPX ;called from [DGPT 150] and [DGPT 151] input templates
ENQ
INIT ;
PRETRAN ;-- get mailman msg #
DEL ;-- KILL ENTRY
FMTQ
INITQ
ASK ;-- On error in record check for re-edit
ASKQ
CHKERR ;
PREQ

External References

Name Field # of Occurrence
NOW^%DTC EN+3
HOME^%ZIS INIT+1
ROUTER^DGPTFTR TRAN+1
LO^DGUTL INIT+1
FILE^DICN EN+3
^DIE EDIT+2, TRAN+4
^DIK DEL+1
^DIR SEND+1, ASK+3, FMT+3
$$SITE^VASITE INIT+2
^VATRAN FMT+6
$$REPEAT^XLFSTR SEND+6
GET^XMA2 PRETRAN+2
ENT1^XMD TRAN+3

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"****** ",DGCTL," TRANSACTION SENT ******"
  • Line Location: SEND+7
Function Call: WRITE
  • Prompt: !,"*** ",$P("^^^^SSN^ADMISSION DATE/TIME^ADMITTING FACILITY NUMBER/SUFFIX^REQUESTING FACILITY NUMBER/SUFFIX","^",DGJ)," field is empty."
  • Line Location: CHKERR+1
Function Call: WRITE
  • Prompt: @IOF,$C(13),?18,">>> Facsimile of ",DGCTL," Transaction <<<"
  • Line Location: HDRPX+1
Function Call: WRITE
  • Prompt: !!?9,"'",$J(DGCTL,4),"' '",$J(DGSSN,10),"' '",$J(DGADM,10),"' '",$J(DGFAC,6),"' '",$J(DGRFAC,6),"'"
  • Line Location: HDRPX+5
Function Call: WRITE
  • Prompt: !?2,"col# :"
  • Line Location: HDRPX+6
Function Call: WRITE
  • Prompt: ?10,"1--4 5--------1 1--------2 2----3 3----3",!
  • Line Location: HDRPX+7
Function Call: WRITE
  • Prompt: ?10," 4 5 4 5 0 1 6",!
  • Line Location: HDRPX+8
Function Call: WRITE
  • Prompt: !?2,"block:"
  • Line Location: HDRPX+9
Function Call: WRITE
  • Prompt: ?10," SSN Admission Admitting Requesting",!
  • Line Location: HDRPX+10
Function Call: WRITE
  • Prompt: ?10," Date/Time Facility Facility",!
  • Line Location: HDRPX+11
Function Call: WRITE
  • Prompt: ?10," Num/Suffix Num/Suffix",!!
  • Line Location: HDRPX+12
Function Call: WRITE
  • Prompt: !,"For the 151 the Admission DATE/TIME and",!,"the Admitting Facility Num/Suffix CANNOT be filled in.",!!
  • Line Location: HDRPX+13
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: FMT+3
Function Call: WRITE
  • Prompt: !!,"*** ERROR *** Unable to create Mail Message... Try again later."
  • Line Location: PRETRAN+4
Routine Call
  • %ZIS
  • Line Location:
    • INIT+1
Routine Call
  • DIE
  • Line Location:
    • EDIT+2
    • TRAN+4
Routine Call
  • DIR
  • Line Location:
    • SEND+1
    • ASK+3
    • FMT+3

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^DGP(45.87 - [#45.87] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DGP(45.87 - [#45.87] EDIT+1, CHKFLD+2, CHKFLD+3
^DPT - [#2] CHKFLD+7
^VA(200 - [#200] TRAN+2
^XMB(3.9 - [#3.9] SEND+5*, SEND+6*, TRAN+2*

Label References

Name Line Occurrences
ASK EDIT+2, SEND+1
CHKERR CHKFLD+4, CHKFLD+5, CHKFLD+6
CHKFLD EDIT+2
CHKFLDQ CHKFLD+2
DEL EDIT+2, SEND+1
EDIT SEND+1
EN EDIT+2, SEND+1, SEND+2, SEND+8
ENQ EN+1, EN+2, EN+4, EDIT+2, SEND+1, SEND+8
FMT EN+2
FMTQ FMT+3, FMT+6
INIT EN+1
PREQ PRETRAN+3
PRETRAN SEND+2
TRAN SEND+7

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
% EN+3, ENQ!
DA EN+4*, EDIT+2*, ENQ!, TRAN+4*, DEL+1*
DB ENQ!
DD EN+3!, ENQ!
DE ENQ!
DGADM SEND+5, ENQ!, HDRPX+5, INIT+2*
DGCTL EDIT, SEND, SEND+5, SEND+7, ENQ!, CHKFLD+4, CHKFLD+5, CHKFLD+6, ASK+2, HDRPX+1
, HDRPX+5, HDRPX+13, FMT+5*, PRETRAN+1, INIT+2*
DGDA EN+4*, EDIT+1, EDIT+2, ENQ!, CHKFLD+2, CHKFLD+3, TRAN+4, DEL+1
DGDR EDIT*, EDIT+2, ENQ!
DGFAC SEND+5, ENQ!, HDRPX+5, INIT+2*
DGFNAM ENQ!, HDRPX+3, INIT+2*
DGI EDIT+2*, ENQ!
DGINST EDIT+1*, ENQ!, INIT+2*
DGJ CHKFLD+4*, CHKFLD+5*, CHKFLD+6*, CHKFLDQ+1!, CHKERR+1
DGNAME ENQ!, CHKFLD+7*, HDRPX+2, INIT+2*
DGOUT EN+1, EN+2, EDIT+2, SEND*, SEND+1, SEND+2, ENQ!, CHKFLD+1*, CHKFLD+2*, CHKFLD+4*
, CHKFLD+5*, CHKFLD+6*, ASK+1*, ASK+4*, FMT+1*, FMT+2*, FMT+3*, FMT+6*, PRETRAN+1*, PRETRAN+4*
, INIT+1*
DGPAT EDIT+1*, ENQ!, INIT+2*
DGRFAC SEND+5, ENQ!, HDRPX+5, INIT+2*
DGRPO ENQ!, CHKFLD+3*, CHKFLD+4, CHKFLD+5, CHKFLD+6, CHKFLD+7, CHKFLDQ+1!
DGSSN SEND+4*, SEND+5, ENQ!, HDRPX+4*, HDRPX+5, INIT+2*
DGTADM ENQ!, INIT+2*
DGY FMT+4*, FMT+5, FMTQ!
DIC EN+3*!, ENQ!
DIC(0 EN+3*
DIE EDIT*, ENQ!, TRAN+4*, TRAN+5!
DIK ENQ!, DEL+1*
DIR ENQ!, ASKQ!, FMTQ!
DIR("?" FMT+2*
DIR("A" SEND*, ASK+2*, FMT+2*
DIR("B" SEND*, ASK+2*, FMT+2*
DIR(0 SEND*, ASK+2*, FMT+2*
DIROUT ENQ!
DIRUT SEND+1, ENQ!, ASK+4, FMT+3, FMTQ!
DO EN+3!, ENQ!
DQ ENQ!
DR EDIT*, EDIT+2*, ENQ!, TRAN+4*, TRAN+5!
DT TRAN+2
DUZ PRETRAN+1, TRAN+2
IOF HDRPX+1, FMT+3
U EDIT+1, CHKFLD+4, CHKFLD+5, CHKFLD+6, CHKFLD+7, TRAN+2, INIT+2
VAT ENQ!
VATERR ENQ!, FMT+6
VATNAME ENQ!, FMT+6*
X EN+3*, SEND+3!*, SEND+5, ENQ!
XMDUN ENQ!, TRAN+2*
XMDUZ ENQ!, PRETRAN+1*
XMSUB ENQ!, PRETRAN+1*
XMTEXT ENQ!
XMY TRAN+1!
XMZ SEND+5, SEND+6, PRETRAN+3, TRAN+2, TRAN+4, TRAN+5!
Y EN+4, SEND+1, SEND+2, ENQ!, ASK+4, FMT+3, FMT+4
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables |  All