Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables |  All
Print Page as PDF
Routine: BAREDIUT

Package: IHS Accounts Receivable

Routine: BAREDIUT


Information

BAREDIUT ; IHS/SD/LSL - UTILITY FOR TANSPORT FILE ;

Source Information

Source file <BAREDIUT.m>

Call Graph

Call Graph Total: 7

Package Total Call Graph
VA Fileman 4 ^DIC  ^DIE  $$GET1^DIQ  ^DIR  
IHS VA Utilities 2 ($$DIC,$$VAL,ENP,ENPM)^XBDIQ1  VIEWR^XBLM  
Kernel 1 $$LIST^%ZISH  

Caller Graph

Caller Graph Total: 3

Package Total Caller Graph
IHS Accounts Receivable 3 BAR ERA IMPORT DELETE  BAREDP00  BAREDP01  

Entry Points

Name Comments DBIA/ICR reference
END ;
PRINT(TRDA,IMPDA) ; EP
; Print records of import IMPDA
ELMSEQDA(TRDA,SEGDA,SEQ) ; EP
; return ELMDA given TRDA,SEGDA, SEQ
PRTVARA(TRDA) ; EP
; PRINT POSTING VARIABLES BY VARIABLE NAME ALPHABETICAL
CLAIMS(IMPDA) ; EP
; Print the Claims in a transport for posting
DELIMP ; EP
; Delete an Import
VIEW(TRDA,IMPDA) ; EP
; Browse an Import
RECPRT(RECDA) ;
; print an import record and its elements
; note SEQ in elements 1,2,3,4 .. may not be the
; the same as ELMDA , as SEQ=ELMDA(.03)
; use 'ac' index to look up element by sequence
FNAME1 ;
FNAME ; EP
; Select a file (directory can be pre-loaded into XBDIR)
STRIP(XX) ; EP
; Strip training spaces
STATUS() ;PREPARE STRING OF STATUSES OF CLAIMS P.OTT
PRTVARS(TRDA) ; EP
; PRINT POSTING VARIABLES BY SEGMENT ORDER

External References

Name Field # of Occurrence
$$LIST^%ZISH FNAME1+13
^DIC DELIMP+7
^DIE DELIMP+42
$$GET1^DIQ VIEW+2, VIEW+5, PRINT+4
^DIR DELIMP+13, DELIMP+20, DELIMP+34, FNAME1+4, FNAME1+21
$$DIC^XBDIQ1 DELIMP+39
$$VAL^XBDIQ1 PRTVARA+6, RECPRT+21
ENP^XBDIQ1 PRTVARA+10, PRTVARS+11, RECPRT+8, PRINT+9, CLAIMS+5, DELIMP+23
ENPM^XBDIQ1 PRINT+14, CLAIMS+7
VIEWR^XBLM VIEW+6

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,VAR,?12,SEGNM,?25,ELM(.01),?35,ELM(.02)
  • Line Location: PRTVARA+11
Function Call: WRITE
  • Prompt: !
  • Line Location: PRTVARS+13
Function Call: WRITE
  • Prompt: ?20,ELM(.01),?30,ELM(.02),?65,ELM(.08)
  • Line Location: PRTVARS+15
Function Call: WRITE
  • Prompt: !!,"*",REC(.02),?10,REC(.03)
  • Line Location: RECPRT+14
Function Call: WRITE
  • Prompt: !,$E(X,1,25),?27,REC(10,SEQ)
  • Line Location: RECPRT+22
Function Call: WRITE
  • Prompt: !!,"This is to delete ERA Import file",!
  • Line Location: DELIMP+3
Function Call: WRITE
  • Prompt: !!,"None Chosen",!
  • Line Location: DELIMP+9
Function Call: WRITE
  • Prompt: !,"This file has one or more posted claims. Cannot delete."
  • Line Location: DELIMP+16
Function Call: WRITE
  • Prompt: !,"No posted claims for this file. "
  • Line Location: DELIMP+21
Function Call: WRITE
  • Prompt: !
  • Line Location: DELIMP+24
Function Call: WRITE
  • Prompt: !
  • Line Location: DELIMP+24
Function Call: WRITE
  • Prompt: !
  • Line Location: DELIMP+25
Function Call: WRITE
  • Prompt: !,"IMPORT: ",IMP(.01)
  • Line Location: DELIMP+26
Function Call: WRITE
  • Prompt: !,"EDI : ",IMP(.03)
  • Line Location: DELIMP+27
Function Call: WRITE
  • Prompt: !,"ERA : ",IMP(.05)
  • Line Location: DELIMP+28
Function Call: WRITE
  • Prompt: !!,IMP(.01)," NOT DELETED ",!
  • Line Location: DELIMP+36
Function Call: WRITE
  • Prompt: !!,IMP(.01)," DELETED",!
  • Line Location: DELIMP+43
Function Call: WRITE
  • Prompt: !?5,XBI,?10,XBFL(XBI)
  • Line Location: FNAME1+15
Routine Call
  • DIE
  • Line Location:
    • DELIMP+42
Routine Call
  • DIC
  • Line Location:
    • DELIMP+7
Routine Call
  • DIR
  • Line Location:
    • DELIMP+13
    • DELIMP+20
    • DELIMP+34
    • FNAME1+4
    • FNAME1+21

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^BAREDI("I",7819,0) - [#90056.02] GET1^DIQ

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^BAREDI("1T" - [#90056.01] PRTVARA+3, PRTVARA+5, PRTVARA+8, PRTVARS+3, PRTVARS+4, PRTVARS+6, PRTVARS+8, PRTVARS+9, ELMSEQDA+3
^BAREDI("I" CLAIMS+3, STATUS+3, DELIMP+15
^TMP($J PRINT+6!, PRINT+16

Label References

Name Line Occurrences
$$ELMSEQDA RECPRT+20
DELIMP DELIMP+36, DELIMP+44
FNAME FNAME1+11
FNAME1 FNAME1+10
RECPRT PRINT+16

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
ADJ CLAIMS+6!
>> ALL RECPRT+9, RECPRT+10, RECPRT+11, RECPRT+12
>> BARIMP VIEW+5*, VIEW+6
>> BARQUIT RECPRT+9*, RECPRT+10*, RECPRT+11*, RECPRT+12*, RECPRT+13, PRINT+13*
CLM CLAIMS+4!
>> CLMDA CLAIMS+2*, CLAIMS+3*
DA DELIMP+2!, DELIMP+37!, DELIMP+41*
DIC DELIMP+2!, DELIMP+4*
DIC("W" DELIMP+6*
DIC(0 DELIMP+5*
>> DIDEL DELIMP+38*
DIE DELIMP+37!, DELIMP+39*
DIR DELIMP+10!, DELIMP+17!, DELIMP+30!, DELIMP+35!, FNAME+2!, FNAME1+5!, FNAME1+18!, FNAME1+22!
DIR("A" DELIMP+11*, DELIMP+18*, DELIMP+31*, FNAME1+3*, FNAME1+20*
DIR("B" DELIMP+33*, FNAME1+10*
DIR(0 DELIMP+12*, DELIMP+19*, DELIMP+32*, FNAME1+2*, FNAME1+19*
DR DELIMP+2!, DELIMP+37!, DELIMP+40*
>> DTOUT FNAME1+6
DUZ(2 CLAIMS+3, STATUS+3, DELIMP+15
ELM PRTVARA+9!, PRTVARS+10!
ELM( PRTVARA+11, PRTVARS+12, PRTVARS+15
>> ELMDA PRTVARA+7*, PRTVARA+8*, PRTVARS+9*, RECPRT+20*
>> I STRIP+3*
IMP DELIMP+22!
IMP( DELIMP+26, DELIMP+27, DELIMP+28, DELIMP+36, DELIMP+43
IMPDA VIEW~, VIEW+2, VIEW+4, VIEW+5, PRINT~, PRINT+3, PRINT+4, CLAIMS~, CLAIMS+3, DELIMP+14*
, DELIMP+15, DELIMP+23, DELIMP+41
L STRIP+2~*, STRIP+3
>> PATH RECPRT+17*, RECPRT+18, RECPRT+19
>> PRVB RECPRT+9, PRINT+10*
>> PRVE RECPRT+10, PRINT+11*
REC RECPRT+7!
REC( RECPRT+9, RECPRT+10, RECPRT+11, RECPRT+12, RECPRT+14, RECPRT+17
REC(10 RECPRT+15, RECPRT+16, RECPRT+22
RECDA RECPRT~, PRINT+15*, PRINT+16*
SEGDA PRTVARA+4*, PRTVARA+5*, PRTVARA+8, PRTVARS+4*, PRTVARS+5, PRTVARS+6, PRTVARS+8, PRTVARS+9, RECPRT+19*, RECPRT+20
, ELMSEQDA~, ELMSEQDA+3
>> SEGLNM PRTVARS+2*, PRTVARS+14, PRTVARS+16*
>> SEGNM PRTVARA+6*, PRTVARA+11, PRTVARS+2*, PRTVARS+3*, PRTVARS+4, PRTVARS+14, PRTVARS+16
SEQ RECPRT+15*, RECPRT+16, RECPRT+20, RECPRT+22, ELMSEQDA~, ELMSEQDA+3
>> SEQDA PRTVARS+7*, PRTVARS+8*, PRTVARS+9
STA STATUS+1~, STATUS+3*
STR STATUS+1~, STATUS+2*, STATUS+3*, STATUS+4
TR PRINT+8!
TR( PRINT+10, PRINT+11, PRINT+12
TRDA PRTVARA~, PRTVARA+3, PRTVARA+5, PRTVARA+8, PRTVARS~, PRTVARS+3, PRTVARS+4, PRTVARS+6, PRTVARS+8, PRTVARS+9
, VIEW~, VIEW+2*, VIEW+3, RECPRT+18*, RECPRT+20, PRINT~, PRINT+2, PRINT+4*, PRINT+5, PRINT+9
, ELMSEQDA~, ELMSEQDA+3
>> TRLB RECPRT+11, PRINT+12*
U FNAME1+14
>> VAR PRTVARA+2*, PRTVARA+3*, PRTVARA+5, PRTVARA+8, PRTVARA+11
X RECPRT+21*, RECPRT+22, ELMSEQDA+2~, ELMSEQDA+3*, END+1, STRIP+3*, FNAME1+13*, FNAME1+14, FNAME1+18*
>> XBDIR FNAME1+13
XBFL FNAME1+12!, FNAME1+13
XBFL( FNAME1+10, FNAME1+14, FNAME1+15
>> XBFN FNAME1+1*, FNAME1+24*
>> XBI FNAME1+14*, FNAME1+15, FNAME1+16
XX STRIP~, STRIP+2, STRIP+3*, STRIP+4
>> Y STATUS+3, DELIMP+8, DELIMP+14, DELIMP+36, FNAME1+7, FNAME1+8, FNAME1+9, FNAME1+10, FNAME1+11, FNAME1+13
, FNAME1+18*, FNAME1+24
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables |  All