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

Package: Integrated Billing

Routine: IBJDE1


Information

IBJDE1 ;ALB/RB - DM DATA EXTRACTION (MENU OPTIONS/TRANSMIT E-MAIL) ;15-APR-99

Source Information

Source file <IBJDE1.m>

Entry Points

Name Comments DBIA/ICR reference
VPE ; - View/print entries in IB DM EXTRACT DATA file (#351.71).
VPH ; - Heading for View/Print option.
DER ; - Disable/enable report(s) or extraction process.
DE1 ; - List disabled reports, if any.
DE2
DEH ; - Help message for disable/enable option.
RTN ; - Help message for the field ROUTINE (entry point for the reprot)
MAN1 ; - Manually start DM extraction process.
M1A
MAN2 ; - Manually transmit DM extract file.
M2A
M2B
MSG ; - DM extract reports message (shown when DM Menu is called up).
MSQ
MSH ; - DM extract reports message header.
CHK ; - Check file #351.71 for completed and/or transmitted DM extracts
; (shown when DM Extract Menu is called up).
XM(IBDT) ; - Create/transmit DM extract file message.
ENQ
ENQ1
SEND ; Calls ^XMD to send the mail message with the data extracted
; Obs: By NEWing DUZ, ^XMD will assume DUZ=.5 (Sender=POSTMASTER)

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"There are no entries available.",*7
  • Line Location: VPE+1
Function Call: WRITE
  • Prompt: !
  • Line Location: VPE+7
Function Call: WRITE
  • Prompt: "DIAGNOSTIC MEASURES SUMMARY EXTRACTIONS-",IBDT
  • Line Location: VPH+1
Function Call: WRITE
  • Prompt: " (Status: ",$S(IBS=3:"COMPLETED",IBS=2:"STARTED",1:"ON STANDBY"),")"
  • Line Location: VPH+2
Function Call: WRITE
  • Prompt: !!,"Summary Line Item",?58,"Total",!
  • Line Location: VPH+3
Function Call: WRITE
  • Prompt: "-"
  • Line Location: VPH+3
Function Call: WRITE
  • Prompt: !
  • Line Location: DER+1
Function Call: WRITE
  • Prompt: " ...Done",*7
  • Line Location: DER+9
Function Call: WRITE
  • Prompt: ?3,$P($G(^IBE(351.7,X,0)),U),!
  • Line Location: DE1+5
Function Call: WRITE
  • Prompt: !!,"There are no disabled DM reports.",!
  • Line Location: DE1+6
Function Call: WRITE
  • Prompt: !!,Y(0,0),!
  • Line Location: DE2+2
Function Call: WRITE
  • Prompt: !
  • Line Location: DE2+5
Function Call: WRITE
  • Prompt: " ...Done",*7
  • Line Location: DE2+7
Function Call: WRITE
  • Prompt: !,"Enter the name of the report you want disabled or re-enabled."
  • Line Location: DEH+1
Function Call: WRITE
  • Prompt: !,"If the report you enter is disabled, the monthly DM extraction"
  • Line Location: DEH+2
Function Call: WRITE
  • Prompt: !,"process will not collect summary data from the report until you"
  • Line Location: DEH+3
Function Call: WRITE
  • Prompt: !,"re-enable it again."
  • Line Location: DEH+4
Function Call: WRITE
  • Prompt: !?9,"Enter the entry point for this report. You may enter a program"
  • Line Location: RTN+1
Function Call: WRITE
  • Prompt: !?9,"name (^ROUTINE), or a specific label of a program (TAG^ROUTINE)"
  • Line Location: RTN+2
Function Call: WRITE
  • Prompt: !?9,"or you may also leave it blank.",!
  • Line Location: RTN+3
Function Call: WRITE
  • Prompt: !?9,"Obs: If this field is left blank, it means that the code respon-"
  • Line Location: RTN+4
Function Call: WRITE
  • Prompt: !?9," sible for extracting the data will be invoked by another"
  • Line Location: RTN+5
Function Call: WRITE
  • Prompt: !?9," report.",!
  • Line Location: RTN+6
Function Call: WRITE
  • Prompt: !,"All DM extracts on file have been transmitted.",!,*7
  • Line Location: MAN1+5
Function Call: WRITE
  • Prompt: !
  • Line Location: M1A+8
Function Call: WRITE
  • Prompt: !!,"Extract process started on ",IBS,".",*7
  • Line Location: M1A+12
Function Call: WRITE
  • Prompt: " Done."
  • Line Location: M2B+1
Function Call: WRITE
  • Prompt: !,"If you want, you can restart the DM extract process"
  • Line Location: MSQ+0
Function Call: WRITE
  • Prompt: !,"by using the ""Manually Start DM Extraction"" option in"
  • Line Location: MSQ+1
Function Call: WRITE
  • Prompt: !,"the Diagnostic Measures Extract Menu."
  • Line Location: MSQ+2
Function Call: WRITE
  • Prompt: !,"Data for the following DM reports have not been extracted"
  • Line Location: MSH+1
Function Call: WRITE
  • Prompt: !," for ",IBDT1,":",!!,*7
  • Line Location: MSH+2
Function Call: WRITE
  • Prompt: @IOF,!,"Checking for completed and/or transmitted DM extracts"
  • Line Location: CHK+2
Function Call: WRITE
  • Prompt: !,"Zero node data missing for "_IB0_" entry. Data corruption possible.",!
  • Line Location: CHK+13
Function Call: WRITE
  • Prompt: "Done"
  • Line Location: CHK+25
Function Call: WRITE
  • Prompt: " ",$$M1^IBJDE(IB0,3)
  • Line Location: CHK+28
Function Call: WRITE
  • Prompt: " ",$$M1^IBJDE(IB0,3)
  • Line Location: CHK+34

FileMan Files Accessed Via FileMan Db Call

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