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

Entry Points

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

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

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^DGP(45.87 - [#45.87] Classic Fileman Calls
Info |  Source |  Entry Points |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call