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

Package: IFCAP

Routine: PRCHJS07


Information

PRCHJS07 ;OI&T/KCL - IFCAP/ECMS INTERFACE RETRANSMIT 2237;6/6/12

Source Information

Source file <PRCHJS07.m>

Entry Points

Name Comments DBIA/ICR reference
ENTACT(PRCDUZ) ;Option [PRCHJ RETRANS 2237] entry action
RETRANS ;Option [PRCHJ RETRANS 2237] run routine
DISP2237(DA) ;Display 2237 Utility
CONTINUE() ;Pause display utility

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,">>> You are not authorized to use this option!"
  • Line Location: ENTACT+26
Function Call: WRITE
  • Prompt: !?4,"User is not setup as Manager or Accountable Officer."
  • Line Location: ENTACT+27
Function Call: WRITE
  • Prompt: !
  • Line Location: RETRANS+12
Function Call: WRITE
  • Prompt: !
  • Line Location: RETRANS+25
Function Call: WRITE
  • Prompt: !
  • Line Location: RETRANS+39
Function Call: WRITE
  • Prompt: !
  • Line Location: RETRANS+52
Function Call: WRITE
  • Prompt: !!,"Retransmitting 2237 transaction to eCMS..."
  • Line Location: RETRANS+64
Function Call: WRITE
  • Prompt: !?3,">>> 2237 transaction has been successfully retransmitted to eCMS."
  • Line Location: RETRANS+70
Function Call: WRITE
  • Prompt: !?7,"Transaction Number: "_$P($G(PRCSELCT),U,2)
  • Line Location: RETRANS+71
Function Call: WRITE
  • Prompt: !?11,"HLO Message ID: "_$G(PRCMSGID)
  • Line Location: RETRANS+72
Function Call: WRITE
  • Prompt: !!?3,">>> Updating retransmission in IFCAP/ECMS Transaction file..."
  • Line Location: RETRANS+74
Function Call: WRITE
  • Prompt: !?7,"Error: "_$P($G(PRCLOGER),U,2)
  • Line Location: RETRANS+80
Function Call: WRITE
  • Prompt: !?3,">>> ERROR: 2237 was not retransmitted to eCMS!"
  • Line Location: RETRANS+82
Function Call: WRITE
  • Prompt: !?7,"Transaction Number: "_$P($G(PRCSELCT),U,2)
  • Line Location: RETRANS+83
Function Call: WRITE
  • Prompt: !?7,"Error #"_$G(PRCIDX1)_": "_$G(PRCER(PRCIDX1))
  • Line Location: RETRANS+95
Function Call: WRITE
  • Prompt: !!?3,">>> Updating transmission error in IFCAP/ECMS Transaction file..."
  • Line Location: RETRANS+97
Function Call: WRITE
  • Prompt: !?7,"Error: "_$P($G(PRCLOGER),U,2)
  • Line Location: RETRANS+99
Function Call: WRITE
  • Prompt: !!?3,">>> Sending error notification mail message to Accountable Officer..."
  • Line Location: RETRANS+101
Function Call: WRITE
  • Prompt: !
  • Line Location: RETRANS+116

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^VA(200 - [#200] GETS^DIQ
^PRC(443 - [#443] Classic Fileman Calls
Info |  Source |  Entry Points |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call