Hi Experts,
I hv one old program which I don't understand how does this dbprofile works. Please explain. Next please help me to solve this old codes, it is giving this error - "Server Error : Entry not found in Index" and here is the codes..
F :="names.nsf";
S :=@GetProfileField("(dbPro
file)";"pA
ddressServ
er");
ENVIRONMENT DocType :=
@If( @Contains( @DbLookup( ""; S : F ;"Groups";"ZPClaim" ; "Members"); @Name([CN];@UserName));
"Claims Requisition" ;
@If( @Contains( @DbLookup( ""; S : F ;"Groups";"APMovex(Post Sales)" ; "Members"); @Name([CN];@UserName));
"Movex(Post Sales) Claims Requisition" ;
@If( @Contains( @DbLookup( ""; S : F ;"Groups";"APMovex(GrpA)" ; "Members"); @Name([CN];@UserName));
"Movex(Pre Sales) Claims Requisition" ;
@If( @Contains( @DbLookup( ""; S : F ;"Groups";"LAPSystem" ; "Members"); @Name([CN];@UserName));
"System Claims Requisition" ;
@If( @Contains( @DbLookup( ""; S : F ;"Groups";"LAPEPronto" ; "Members"); @Name([CN];@UserName));
"Pronto Claims Requisition (GrpE)" ;
@If( @Contains( @DbLookup( ""; S : F;"Groups";"APClmAccounts"
; "Members"); @Name([CN];@UserName));
"Accounts Claims Requisition" ;
@If( @Contains( @DbLookup( ""; S : F ;"Groups";"APBI(GrpA)" ; "Members"); @Name([CN];@UserName));
"BI Claims Requisition(GrpA)" ;
@If( @Contains( @DbLookup( ""; S : F ;"Groups";"APBI(GrpB)" ; "Members"); @Name([CN];@UserName));
"BI Claims Requisition(GrpB)" ;
@If( @Contains( @DbLookup( ""; S : F ;"Groups";"LAPAPronto" ; "Members"); @Name([CN];@UserName));
"Pronto Claims Requisition (GrpA)" ;
@If( @Contains( @DbLookup( ""; S : F ;"Groups";"LAPBPronto" ; "Members"); @Name([CN];@UserName));
"Pronto Claims Requisition (GrpB)" ;
@If( @Contains( @DbLookup( ""; S : F ;"Groups";"LAPCPronto" ; "Members"); @Name([CN];@UserName));
"Pronto Claims Requisition (GrpC)" ;
@If( @Contains( @DbLookup( ""; S : F ;"Groups";"LAPDPronto" ; "Members"); @Name([CN];@UserName));
"Pronto Claims Requisition (GrpD)" ;
@If( @Contains( @DbLookup( ""; S : F ;"Groups";"LAPEPronto" ; "Members"); @Name([CN];@UserName));
"Pronto Claims Requisition (GrpE)" ;
@If( @Contains( @DbLookup( ""; S : F ;"Groups";"APManagement" ; "Members"); @Name([CN];@UserName));
"Management Claims Requisition" ;
@If( @Contains( @DbLookup( ""; S : F ;"Groups";"APMovex" ; "Members"); @Name([CN];@UserName));
"Movex Claims Requisition" ;
@If( @Contains( @DbLookup( ""; S : F ;"Groups";"APSLRetail(GrpA
)" ; "Members"); @Name([CN];@UserName));
"SLRetail Claims Requisition(GrpA)" ;
@If( @Contains( @DbLookup( ""; S : F ;"Groups";"APSLRetail(GrpB
)" ; "Members"); @Name([CN];@UserName));
"SLRetail Claims Requisition(GrpB)" ;
@If( @Contains( @DbLookup( ""; S : F ;"Groups";"APBI(GrpA1)" ; "Members"); @Name([CN];@UserName));
"BI Claims Requisition (GrpA1)" ;
@If( @Contains( @DbLookup( ""; S : F ;"Groups";"APMovex(SE)" ; "Members"); @Name([CN];@UserName));
"Movex(SE) Claims Requisition" ;
Null
)))))))))))))))))));
@If( DocType = Null ;
@Prompt([Ok];"Reminder";"P
lease contact your administrator to ensure that you are assigned to your division group.");
@PostedCommand([Compose]; DocType))
Please help, Thank you.
Start Free Trial