Routine: PSOPOST3

Information

PSOPOST3 ;BIR/SAB-index AD cross reference on login date field ;07/29/96

Source file <PSOPOST3.m>

Package	Total	Call Graph
VA FileMan	3	NOW^%DTC EN1^DIK EN^DIU2
Kernel	1	BMES^XPDUTL

Name	Comments	DBIA/ICR reference
SUS	;Deleting invalid "AQ" cross references ; Patch PSO715 post init
MW	;Update routing field in Pending File
IDNODE	; resets ^DD(52,0,"ID",6) node PSO725
PEND	;Delete invalid Renewal cross references
SUBF	;hanging sub-file 59.30001 removal

Name	Field # of Occurrence
NOW^%DTC	PSOPOST3+11
EN1^DIK	PSOPOST3+12
EN^DIU2	SUBF+1
BMES^XPDUTL	PSOPOST3+8, SUS+2, MW+1, MW+7, MW+13, IDNODE+2, PEND+1

Name	Line Occurrences
Function Call: WRITE	Prompt: "." Line Location: PSOPOST3+12

FileNo	Call Tags
^PS(52.41 - [#52.41]	Classic Fileman Calls

Name	Line Occurrences (* Changed, ! Killed)
^DD(	SUBF+1
^DD(52	IDNODE+3*
^DD(55	IDNODE+4!
^PS(52.41 - [#52.41]	PSOPOST3+7!, PSOPOST3+9, PSOPOST3+10, PSOPOST3+11, MW+3, MW+4, MW+5, MW+15, MW+16, MW+19 , PEND+3!
^PS(52.5 - [#52.5]	SUS+4, SUS+5!
^PS(59 - [#59]	MW+8, MW+9, MW+10, MW+11, MW+12*

Name	Field # of Occurrence
^(0	PEND+3

Name	Field # of Occurrence
%	PSOPOST3+11, PSOPOST3+13!
%H	PSOPOST3+13!
%I	PSOPOST3+13!
DA	PSOPOST3+10*, PSOPOST3+11, PSOPOST3+13!
DIC	PSOPOST3+13!
DIK	PSOPOST3+12*, PSOPOST3+13!
DIK(1	PSOPOST3+12*
DIU	SUBF+1*!
DIU(0	SUBF+1*
INST	PSOPOST3+9, PSOPOST3+10, PSOPOST3+13!, MW+2~, MW+3
NODE	MW+2~, MW+3*, MW+5
PAT	PSOPOST3+9, PSOPOST3+10, PSOPOST3+13!, MW+2~, MW+3
PIEN	MW+2~, MW+3*, MW+4, MW+5
PSOD	SUS+3~, SUS+4*, SUS+5
PSODA	MW+14~, MW+15*, MW+16, MW+19
PSOIN	SUS+3~, SUS+4*, SUS+5
PSOINZ	MW+2~, MW+8*, MW+9, MW+10, MW+11, MW+12
PSONODE	MW+14~, MW+16*, MW+17, MW+18, MW+19
PSOP	SUS+3~, SUS+4*, SUS+5
PSOPIN	MW+14~, MW+15*
PSOPN	PEND+2~, PEND+3*
PSOPNI	PEND+2~, PEND+3*
PSOPT	MW+14~, MW+15*
RELIN	MW+2~, MW+8*, MW+11, MW+12
X	PSOPOST3+13!
Y	PSOPOST3+13!