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

Package: Hospital Based Home Care

Routine: HBHCXMT


Information

HBHCXMT ; LR VAMC(IRMS)/MJT-HBHC TRANSMIT TO AUSTIN; Feb 22, 2021@07:22

Source Information

Source file <HBHCXMT.m>

Entry Points

Name Comments DBIA/ICR reference
DQ ; De-queue
; Set Transmission in Progress Flag
CLEANUP ; Cleanup Transmit History (HBHC(634.6)) to maintain maximum of last 12 transmit batches
PRINT ; Print Transmit Report if default printer exists in 631.9
; HBHCIOP set in PROMPT2^HBHCR15B
EXIT ; Exit module
MAIL ; Send mail message
LOOP ; Loop thru ^HBHC(631,"AE") (Form 3 Transmit Flag), ^HBHC(631,"AF") (Form 5 Transmit Flag), & ^HBHC(632,"AC") (Form 4 Transmit Flag) cross-refs to set batch initial MM message number & mailman message date fields in ^HBHC(631/632)
; also loop thru ^HBHC(633.2,"AC") (Form 7 Transmit Flag)
HISTORY ; Update HBHC(634.6 Transmit History file

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: $C(7),!,"File Update in progress. Please try again later."
  • Line Location: HBHCXMT+6
Function Call: WRITE
  • Prompt: $C(7),!!,"Records containing errors exist and must be corrected before file can",!,"be transmitted.",!!
  • Line Location: HBHCXMT+7
Function Call: WRITE
  • Prompt: $C(7),!!,"No data on file to transmit."
  • Line Location: HBHCXMT+8
Function Call: WRITE
  • Prompt: $C(7),!!,"Data on file has been transmitted to Austin; duplicate transmission not allowed."
  • Line Location: HBHCXMT+9
Function Call: WRITE
  • Prompt: !,"Transmit Report will be printed on device: ",HBHCPRTR
  • Line Location: HBHCXMT+10
Function Call: WRITE
  • Prompt: "."
  • Line Location: HBHCXMT+10
Function Call: WRITE
  • Prompt: $C(7),!!,"Transmission request has been queued. Task number: ",ZTSK,!!
  • Line Location: HBHCXMT+12

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^HBHC(631 - [#631] Classic Fileman Calls
^HBHC(632 - [#632] Classic Fileman Calls
^HBHC(633.2 - [#633.2] Classic Fileman Calls
^HBHC(634.6 - [#634.6] Classic Fileman Calls
Info |  Source |  Entry Points |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call