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

Package: Integrated Billing

Routine: IBJPI2


Information

IBJPI2 ;DAOU/BHS - eIV SITE PARAMETERS SCREEN ACTIONS ;26-JUN-2002

Source Information

Source file <IBJPI2.m>

Entry Points

Name Comments DBIA/ICR reference
IIVEDIT ; -- IBJP IIV EDIT ACTIONS (GP,PW): Edit eIV Site Parameters
LTENT ; entry from list template protocol 'IBJP IIV FIX CORRUPT BUFFERS' from 'IBJP INS VER MENU' menu
FXLST ;IB*763/CKB - Prompt user to run 'Fix or List Corrupt Buffers'
LTOUT ; list template protocol quit
LTCHKRN ; has the CBF been run in the last 15 days
TASKIN(IBSB,IBUS,IBRET,IBFLIN) ; Clean-up corrupted records in the Insurance Verification Processor file #355.33
TSKCLNQ ;
CHKTSK() ;Check if task already scheduled for date/time
TASK(ZTDTH,ZTDESC,ZTRTN,ZTIO,RMSG) ;bypass for queued task
SCHED(ZTDTH,ZTIO) ;
BADRECS ; Clean-up corrupted records in File #355.33.
BADRECQ ; Exit from Cleaning up Buffers.
IBXSAV ; save message into ^XTMP for 15 days
DELDATA ; Delete data from corrupted records
DELREC(FIELD,IBPATNM) ;Delete entire record as it is unrecoverable
XREFC(DELREC) ; Clean up possible bad "C" cross-reference related to (#355.33,60.01)
LIST ;IB*763/CKB - List of Corrupted Buffers in File #355.33
LISTQ ; Exit from List
; Tell TaskManager to delete the task's record
SAVLIST ;IB*763/CKB - Save List output to MSG array
FLHELP ;IB*763/CKB - Help Text for the 'Fix or List Corrupt Buffers' prompt.

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: @IOF,!,"General Parameters",!
  • Line Location: IIVEDIT+6
Function Call: WRITE
  • Prompt: !," Select 'F'ix or 'L'ist",!
  • Line Location: FXLST+11
Function Call: WRITE
  • Prompt: !,"Not submitting Fix Corrupt Buffers to run"
  • Line Location: FXLST+23
Function Call: WRITE
  • Prompt: !,"Not creating List of Corrupt Buffers."
  • Line Location: FXLST+24
Function Call: WRITE
  • Prompt: !!
  • Line Location: FXLST+25
Function Call: WRITE
  • Prompt: !!,"Error in submitting '"_IBFL_"'."
  • Line Location: FXLST+29
Function Call: WRITE
  • Prompt: !,"Please Contact eInsurance Team"
  • Line Location: FXLST+30
Function Call: WRITE
  • Prompt: !!
  • Line Location: FXLST+31
Function Call: WRITE
  • Prompt: IBMSG(IBA),!
  • Line Location: FXLST+31
Function Call: WRITE
  • Prompt: !!
  • Line Location: LTCHKRN+9
Function Call: WRITE
  • Prompt: IBMSF,!
  • Line Location: LTCHKRN+10
Function Call: WRITE
  • Prompt: !!,"Run For: ",$P(IBLCTOP,U,2),!
  • Line Location: LTCHKRN+23
Function Call: WRITE
  • Prompt: IBC
  • Line Location: LTCHKRN+24
Function Call: WRITE
  • Prompt: IBC,!
  • Line Location: LTCHKRN+25
Function Call: WRITE
  • Prompt: !,IBB
  • Line Location: LTCHKRN+26
Function Call: WRITE
  • Prompt: !
  • Line Location: LTCHKRN+27
Function Call: WRITE
  • Prompt: !!,$E(IBSTR,1,$L(IBA1)),!,IBA1,!,IBB1,($E(" ",1,($L(IBA1)-3-$L(IBB1)))),"***",!
  • Line Location: LTCHKRN+31
Function Call: WRITE
  • Prompt: $E(IBSTR,1,$L(IBA1))
  • Line Location: LTCHKRN+32
Function Call: WRITE
  • Prompt: !!," Select Fix to fix corrupted entries in the INSURANCE VERIFICATION PROCESSOR"
  • Line Location: FLHELP+1
Function Call: WRITE
  • Prompt: !," file (#355.33) aka 'the buffer file'. Select List to display corrupted entries"
  • Line Location: FLHELP+2
Function Call: WRITE
  • Prompt: !," in the INSURANCE VERIFICATION PROCESSOR file (#355.33) aka 'the buffer file'."
  • Line Location: FLHELP+3

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^IBE(350.9 - [#350.9] Classic Fileman Calls
^IBA(355.33 - [#355.33] Classic Fileman Calls,  GETS^DIQ
Info |  Source |  Entry Points |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call